source: trunk/test/vector_test.cc @ 710

// $Id: vector_test.cc 710 2006-12-20 22:08:25Z jari $

/*
  Copyright (C) The authors contributing to this file.

  This file is part of the yat library, http://lev.thep.lu.se/trac/yat

  The yat library is free software; you can redistribute it and/or
  modify it under the terms of the GNU General Public License as
  published by the Free Software Foundation; either version 2 of the
  License, or (at your option) any later version.

  The yat library is distributed in the hope that it will be useful,
  but WITHOUT ANY WARRANTY; without even the implied warranty of
  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  General Public License for more details.

  You should have received a copy of the GNU General Public License
  along with this program; if not, write to the Free Software
  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
  02111-1307, USA.
*/

#include "yat/utility/Exception.h"
#include "yat/utility/FileUtil.h"
#include "yat/utility/utility.h"
#include "yat/utility/vector.h"

#include <fstream>
#include <sstream>

using namespace theplu::yat;

void check_file_access(std::string& str)
{
  utility::FileUtil file(str);
  if (file.access_rights(str,"r")) {
    std::cerr << "test_nni: Cannot access file " << str << std::endl;
    exit(-1);
  }
}

int main(const int argc,const char* argv[])
{  
  bool print = (argc>1 && argv[1]==std::string("-p"));
  bool ok = true;

  utility::vector vec(12);
  for (unsigned int i=0; i<vec.size(); i++) 
    vec(i)=i;

  // checking that shuffle works
  double sum_before = vec.sum();
  shuffle(vec);
  double sum_after = vec.sum();
  if (sum_after != sum_before)
    ok = false;

  // checking that view works
  sum_before=0;
  for (unsigned int i=0; i<vec.size(); i+=2) 
    sum_before+=vec[i];
  utility::vector vec_view(vec,0,6,2);
  sum_after=vec_view.sum();
  if (sum_after != sum_before)
    ok = false;
  vec[0]=0;
  vec_view[0]=24;
  if (vec[0]!=vec_view[0])
    ok=false;

  // checking that copy constructor creates an independent object
  utility::vector vec2(vec);
  if (vec.size()!=vec2.size())
    ok=false;
  if (&vec2 == &vec)
    ok=false;
  if (vec2.isview())
    ok=false;

  // checking that copy constructor creates an independent object when
  // copying a view
  vec2=vec_view;
  if (vec_view.size()!=vec2.size())
    ok=false;
  if ((&vec2 == &vec_view) || (&vec2 == &vec))
    ok=false;
  if (vec2.isview())
    ok=false;
  vec2[0]=0;
  vec_view[0]=24;
  if (vec2[0]==vec_view[0])
    ok=false;

  // checking that reading vectors from properly formatted files works
  try {
    std::string data1("data/vector1.data");
    std::string data2("data/vector2.data");
    std::string data3("data/vector3.data");
    std::string data4("data/vector4.data");
    check_file_access(data1);
    check_file_access(data2);
    check_file_access(data3);
    check_file_access(data4);
    std::ifstream data_stream1(data1.c_str());
    std::ifstream data_stream2(data2.c_str());
    std::ifstream data_stream3(data3.c_str());
    std::ifstream data_stream4(data4.c_str());
    vec=utility::vector(data_stream1);
    if (vec.size()!=9)
      ok=false;
    vec=utility::vector(data_stream2);
    if (vec.size()!=9)
      ok=false;
    vec=utility::vector(data_stream3);
    if (vec.size()!=12)
      ok=false;
    vec=utility::vector(data_stream4);
    if (vec.size()!=12)
      ok=false;
  } catch (utility::IO_error& err) {
    if (print)
      std::cerr << err.what() << std::endl;
    ok=false;
  }

  // Checking that vector stream input operator can read whatever
  // vector stream output operator produces.
  std::stringstream s;
  s << vec;
  vec2=utility::vector(s);
  if (!(vec==vec2))
    ok=false;


  // Checking that badly formatted files are not accepted, or at least
  // throws an exception for the programmer to catch.
  bool this_ok=false;
  // Checking that unexpected characters in a stream gives error. 
  try {
    std::string data5("data/vector5.data");
    check_file_access(data5);
    std::ifstream data_stream5(data5.c_str());
    vec=utility::vector(data_stream5); // this will give an exception
  } catch (utility::IO_error& err) {
    if (print)
      std::cerr << err.what() << std::endl;
    this_ok=true; // good, exceoption thrown, test passed
  }
  try {
    std::string data("data/vector6.data");
    check_file_access(data);
    std::ifstream data_stream(data.c_str());
    vec=utility::vector(data_stream); // this will give an exception
  } catch (utility::IO_error& err) {
    if (print)
      std::cerr << err.what() << std::endl;
    this_ok=true; // good, exceoption thrown, test passed
  }
  if (!this_ok)
    ok=false;
  this_ok=false;
  try {
    std::string data("data/vector7.data");
    check_file_access(data);
    std::ifstream data_stream(data.c_str());
    vec=utility::vector(data_stream); // this will give an exception
  } catch (utility::IO_error& err) {
    if (print)
      std::cerr << err.what() << std::endl;
    this_ok=true; // good, exceoption thrown, test passed
  }
  if (!this_ok)
    ok=false;

  return (ok ? 0 : -1);
}