main()

int main	(	int	iargc,
		char *	argv[]
	)

Definition at line 107 of file binarytest.cc.

References BINARYTEST_VERSION, datrw::binary::Fdouble, datrw::binary::Finfo, datrw::binary::Fsrce, Options::iofile, Options::iotest, datrw::binary::magic, reportseries(), reportsff(), Options::skipsamples, values(), and Options::verbose.

{

  // define usage information
  char usage_text[]=
  {
    BINARYTEST_VERSION "\n"
    "usage: binarytest [-v] [-iotest file] [-skip]" "\n"
    "   or: binarytest --help|-h" "\n"
  };

  // define full help text
  char help_text[]=
  {
    "\n"
    "-v           be verbose\n"
    "-iotest file execute fixed I/O test with file \"file\"\n"
    "-skip        skip samples of series, just count\n"
  };

  // define commandline options
  using namespace tfxx::cmdline;
  static Declare options[]= 
  {
    // 0: print help
    {"help",arg_no,"-"},
    // 1: verbose mode
    {"v",arg_no,"-"},
    // 2: skip samples
    {"skip",arg_no,"-"},
    // 3: verbose mode
    {"iotest",arg_yes,"-"},
    {NULL}
  };

  // no arguments? print usage...
  if (iargc<2) 
  {
    cerr << usage_text << endl;
    exit(0);
  }

  // collect options from commandline
  Commandline cmdline(iargc, argv, options);

  // help requested? print full help text...
  if (cmdline.optset(0))
  {
    cerr << usage_text << endl;
    cerr << help_text << endl;
    exit(0);
  }

  Options opt;
  opt.verbose=cmdline.optset(1);
  opt.skipsamples=cmdline.optset(2);
  opt.iotest=cmdline.optset(3);
  opt.iofile=cmdline.string_arg(3);

  /*
  // dummy operation: print option settings
  for (int iopt=0; iopt<2; iopt++)
  {
    cout << "option: '" << options[iopt].opt_string << "'" << endl;
    if (cmdline.optset(iopt)) {  cout << "  option was set"; }
    else { cout << "option was not set"; }
    cout << endl;
    cout << "  argument (string): '" << cmdline.string_arg(iopt) << "'" << endl;
    cout << "     argument (int): '" << cmdline.int_arg(iopt) << "'" << endl;
    cout << "    argument (long): '" << cmdline.long_arg(iopt) << "'" << endl;
    cout << "   argument (float): '" << cmdline.float_arg(iopt) << "'" << endl;
    cout << "  argument (double): '" << cmdline.double_arg(iopt) << "'" << endl;
    cout << "    argument (bool): '";
    if (cmdline.bool_arg(iopt))
    { cout << "true"; } else { cout << "false"; }
    cout << "'" << endl;
  }
  while (cmdline.extra()) { cout << cmdline.next() << endl; }

  // dummy operation: print rest of command line
  while (cmdline.extra()) { cout << cmdline.next() << endl; }
  */

  /*----------------------------------------------------------------------*/

  if (opt.iotest)
  {
    // prepare test data
    datrw::Tiseries iseries(-10,10);
    datrw::Tdseries dseries(15);
    datrw::Tfseries fseries(20);
    for (int i=iseries.f(); i<=iseries.l(); ++i)
    { iseries(i)=2*i; }
    for (int i=dseries.f(); i<=dseries.l(); ++i)
    { dseries(i)=double(i)*i; }
    for (int i=fseries.f(); i<=fseries.l(); ++i)
    { fseries(i)=sin((i-fseries.f())*2.
                     *3.141592653589793115998/(fseries.size()-1)); }
    ::sff::WID2 wid2;
    ::sff::INFO info;
    ::sff::SRCE srce;
    ::sff::FREE free;

    wid2.nsamples=50;
    wid2.dt=1.e-4;
    wid2.date=libtime::TAbsoluteTime(2010,5,6,18,23,12,13,14);
    wid2.station="STAT";
    wid2.channel="CHA";
    wid2.auxid="AUX";
    wid2.instype="my seismometer type";
    
    info.cx=1.;
    info.cy=2.;
    info.cz=3.;
    info.nstacks=49;
    
    srce.cx=-1.;
    srce.cy=-2.;
    srce.cz=-3.;
    srce.type="my source type for this test";
    srce.date=libtime::TAbsoluteTime(2006,1,1,9,15,12,345,678);

    free.append(BINARYTEST_VERSION);
    free.append("my free comment line");

    char fflags=
      datrw::binary::Finfo|
      datrw::binary::Fdouble;
    char tflags=
      datrw::binary::Fsrce;

    const char* const magic="B123";
    // write data
    {
      std::ofstream ofs(opt.iofile.c_str(),
                        std::ios_base::out|std::ios_base::binary);
      datrw::binary::obinstream os(ofs, magic);

      os << wid2;
      os << free;
      os << fseries;
      os << info;
      os << dseries;
      os << srce;
      os << char(fflags);
      os << char(tflags);
      os << iseries;
    }

    // reread file
    {
      std::ifstream ifs(opt.iofile.c_str(),
                        std::ios_base::in|std::ios_base::binary);
      datrw::binary::ibinstream is(ifs, magic);

      ::sff::WID2 inwid2;
      is >> inwid2;
      reportsff(wid2, inwid2);
      
      ::sff::FREE infree;
      is >> infree;
      reportsff(free, infree);

      if (opt.skipsamples) 
      {
        cout << "skipped " << is.skipfseries() << " samples" << endl; 
      }
      else
      {
        datrw::Tfseries infseries;
        is >> infseries;
        reportseries(fseries, infseries);
      }
      
      ::sff::INFO ininfo;
      is >> ininfo;
      reportsff(info, ininfo);

      if (opt.skipsamples) 
      {
        cout << "skipped " << is.skipdseries() << " samples" << endl; 
      }
      else
      {
        datrw::Tdseries indseries;
        is >> indseries;
        reportseries(dseries, indseries);
      }

      ::sff::SRCE insrce;
      is >> insrce;
      reportsff(srce, insrce);

      char inflags;
      is >> inflags;
      values(char(fflags), inflags);
      is >> inflags;
      values(char(tflags), inflags);

      if (opt.skipsamples) 
      {
        cout << "skipped " << is.skipiseries() << " samples" << endl; 
      }
      else
      {
        datrw::Tiseries iniseries;
        is >> iniseries;
        reportseries(iseries, iniseries);
      }
    }

  }
}

Here is the call graph for this function: