# include <getopt.h>	// getopt
# include "qwav.hh"
# include "qexception.hh"

#include <iostream>

#ifdef NLS
  # include <locale.h>
  # include <libintl.h>
  # define _(s) gettext (s)
#else
  # define _(s) (s)
#endif

void usage () {
  cerr << ' ' << APPNAME << _(": extract and/or delete parts of a wav file\n");
  cerr << _(" syntax: ") << APPNAME << _(" [option]... file\n");
  cerr << _(" options:\n");
  cerr << _("   -B, --set-begin <cut point>: set the first sample from the beginning of the file\n");
  cerr << _("   -b, --set-begin-from-eof <cut point>: set the first sample from the end of the file\n");
  cerr << _("   -d, --delete: deletes the fragment\n");
  cerr << _("   -E, --set-end <cut point>: set the last sample from the beginning of the file\n");
  cerr << _("   -e, --set-end-from-eof <cut point>: set the last sample from the end of the file\n");
  cerr << _("   -h, --help: show this help and exit\n");
  cerr << _("   -o, --output <file>: output file where the fragment is stored\n");
  cerr << _("   -s, --size <cut point>: specifies the size of the cut\n");
  cerr << _("   -S, --slice <time spec>-<time spec>: set the cut as a time slice\n");
  cerr << _("   -v, --verbose: verbose\n");
  cerr << _("   -V, --version: show version and exit\n");
  cerr << _(" <cut point> = <value>[j|s|m|b|k|M]\n");
  cerr << _(" <time spec> = [[h:]m:]s[.ms]\n");
  cerr << _(" see info manual for more info about options and usage\n");
}
     

int main (int argc, char **argv) {

  string outfile;
  string infile;
  bool del = false, verbose=false, slice_defined = false;
  qvf vfbegin,vfSize,vfend,vfBegin,vfEnd; 

  static struct option long_options[] = {
    {"set-begin",required_argument,0,'B'},
    {"set-begin-from-eof",required_argument,0,'b'},
    {"delete",no_argument,0,'d'},
    {"set-end",required_argument,0,'E'},
    {"set-end-from-eof",required_argument,0,'e'},
    {"help",no_argument,0,'h'},
    {"output",required_argument,0,'o'},
    {"size",required_argument,0,'s'},
    {"slice",required_argument,0,'S'},
    {"verbose",no_argument,0,'v'},
    {"version",no_argument,0,'V'},
    {0,0,0,0}
  };

#ifdef NLS
  setlocale(LC_ALL, "");
  bindtextdomain(PACKAGE, LOCALEDIR);
  textdomain(PACKAGE);
#endif

  int option;
  qcuthandler h;

 // supress getopt error messages:
  opterr = 0;

  while ((option = getopt_long(argc, argv, "b:B:de:E:ho:s:S:vV",long_options,0)) != EOF) 
    try {
      switch (option) {
        case 'b':
          vfbegin = qvf(optarg);
        break;  
        case 'B':
          vfBegin = qvf(optarg);
        break;  
        case 'd':
          del=true;
        break;
        case 'e':
          vfend = qvf(optarg);
        break;  
        case 'E':
          vfEnd = qvf(optarg);
        break;  
        case 'h':
          usage();
          return 1;
        break;
        case 'o': 
          outfile=optarg; 
        break;
        case 's':
          vfSize = qvf(optarg);
        break;  
        case 'S':
          slice_defined = true;
          h = qcuthandler(optarg);
        break;
        case 'v':
          verbose=true;
        break;
        case 'V':
          cerr << APPNAME << " - " << _("version") << ' ' << VERSION
	       << _("build") << ' ' << __DATE__ << '\n';
          return 0;
        break;
        case '?':
        default: 
          cerr << APPNAME << ": " << _("option") << " '" << argv[optind-1]
	       << "' " << _("is not recognized or bad used") << '\n';
          usage();
          return 1;
      }
    }
    catch (qexception e) {
      cerr << e << endl;
    }

  if (argc-optind!=1) {
    cerr << APPNAME << _(": only one file to cut must be specified") << endl;
    usage();
    return 1;
  }
  
  infile = argv[optind];

  if (!slice_defined) {
    h.setBegin(vfBegin);
    h.setbegin(vfbegin);
    h.setEnd(vfEnd);
    h.setend(vfend);
  }
  h.setSize(vfSize);
  h.setDel(del);
  h.setOutfile(outfile);

  try {
    u_int32_t mode = del?qwav::READWRITE:qwav::READ;
    qwav wav (infile,mode); 
    wav.cut(h); 

    if (verbose) {
      cerr << wav << endl;
      if (outfile!="") {
        qwav wavout(outfile);
        cerr << wavout << endl;
      }
    }
  }
  catch (qexception e) {
    cerr << e << endl;
    return 1;
  }

  return 0;
}