*** empty log message ***
[h316.git] / pc-tools / ldc2 / src / main.cpp
index 237d9971aaf52f397df9c8aa982964369df7fb96..068ca6e22439e3649ca89c65f6da2fd322ba07e8 100644 (file)
 
 #include <stdio.h>
 #include <unistd.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <fcntl.h>
 
 #include "tape_block.hh"
-#include "data_block.hh"
+#include "data_block_0.hh"
 
-#include "argread.hh"
+#include "configuration_manager.hh"
 
 using namespace std;
 
-void tape_start(void* m){
-  printf("tape_start\n");
-}
+static int in_fd, out_fd;
 
-void tape_stop(void* m){
-  printf("tape_stop\n");
-}
 
-void dump_vector(vector<string> arguments){
+int dump_vector(vector<string> arguments){
+  int res=0;
   for (vector<string>::iterator iter=arguments.begin();iter<arguments.end();iter++){
-    printf("%s\n",(*iter).c_str());
+    char buffer[2000];
+    snprintf(buffer,2000,"%s\n",(*iter).c_str());
+    write (out_fd,buffer,strlen(buffer));
+    res=1;
   }
+  return res;
 }
 
+
+/*!
+ *\brief The main routine.
+ *
+ * Here we do the configuration management and process the data.
+ *
+ */
 int main(int argc, char ** args){
-  int help_needed;
-  int name_set;
-  int file_set;
-  string name="Philipp";
-  string filename;
-
-  argreader ar("ldc2");
-  ar.add_param("h","help","Give help",&help_needed);
-  ar.add_param("n","name=","Enter other name",&name_set,&name,"<name>");
-  ar.add_param("n","name=","Enter other name",&name_set,&name,"<name>");
-  ar.add_param("n","name=","Enter other name",&name_set,&name,"<name>");
-  ar.add_param("n","name=","Enter other name Gelaber Gelaber  Gelaber Gelaber M M M M M M M M M M M M M M M M M M M M M M M M M M M M M M M M",&name_set,&name,"<name>");
-  ar.add_param("n","name=","Enter other name",&name_set,&name,"<name>");
-  ar.add_param("n","name=","Enter other name",&name_set,&name,"<name>");
-  ar.add_param("n","name=","Enter other name",&name_set,&name,"<name>");
-  ar.add_param("n","name=","Enter other name",&name_set,&name,"<name>");
-  ar.add_param("n","name=","Enter other name",&name_set,&name,"<name>");
-  ar.add_param("n","name=","Enter other name",&name_set,&name,"<name>");
-  ar.add_param("n","name=","Enter other name",&name_set,&name,"<name>");
-  ar.add_param("n","name=","Enter other name",&name_set,&name,"<name>");
-  ar.add_param("n","name=","Enter other name",&name_set,&name,"<name>");
-  ar.add_param("n","name=","Enter other name",&name_set,&name,"<name>");
-  ar.add_param("n","name=","Enter other name",&name_set,&name,"<name>");
-  ar.add_param("n","name=","Enter other name",&name_set,&name,"<name>");
-  ar.add_param("n","name=","Enter other name",&name_set,&name,"<name>");
-  ar.add_param("n","name=","Enter other name",&name_set,&name,"<name>");
-  ar.add_param("n","name=","Enter other name",&name_set,&name,"<name>");
-  ar.add_param("n","name=","Enter other name",&name_set,&name,"<name>");
-  ar.add_param("n","name=","Enter other name",&name_set,&name,"<name>");
-  ar.add_free_param("<input-blaaaaaaaaaaaaaaa-filename>","File to read data from",&file_set,&filename);
-                  
-  dump_vector(ar.read_args(argc,args));
-
-  if (help_needed){
+  /* Configuration data */
+  string config_file;
+  string infile, outfile;
+  int infile_set=0, outfile_set=0, config_file_set=0;
+  
+  int 
+    do_help=0,
+    output_info=0,
+    output_called=0,
+    output_exported=0,
+    output_unsatisfied=0,
+    split_objects=0,
+    split_objects_numbered=0,
+    ignore_block_errors=0,
+    ignore_checksum_errors=0,
+    pause_on_checksum_error=0,
+    ignore_unknown_block_errors=0,
+    ignore_object_integrity_errors=0,
+    list_contents=1,
+    verbose=0;
+  
+  in_fd=0;  /* stdin   {O _ \ */
+  out_fd=1; /* stdout  {O ^ / */
+
+  configuration_manager ar("ldc2");
+  
+  /* Here come the configuration switches */
+  ar.add_option_switch("h","help",
+                      "Output this help text and exit.",
+                      &do_help,false,true);
+
+  ar.add_option_switch("a","output_info",
+                      "Print tape data information (default)",
+                      &output_info,true,true);
+
+  ar.add_option_switch("c","output_called",
+                      "Print all called symbols from the object(s).",
+                      &output_called,true,true);
+
+  ar.add_option_switch("e","output_exported",
+                      "Print all exported symbols from the object(s).",
+                      &output_exported,true,true);
+
+  ar.add_option_switch("u","output_unsatisfied",
+                      "List all unsatisfied symbols.",
+                      &output_unsatisfied,true,true);
+
+  ar.add_option_switch("S","split_objects_numbered",
+                      "Split input data into distinct numbered files",
+                      &split_objects_numbered,true,true);
+
+  ar.add_option_switch("s","split_objects",
+                      "Split input data into distinct object files.",
+                      &split_objects,true,true);
+  
+  ar.add_option_switch("b","ignore_block_errors",
+                      "Ignore block integrity errors. This will output broken blocks,too",
+                      &ignore_block_errors,true,true);
+
+  ar.add_option_switch("k","ignore_checksum_errors",
+                      "Ignore block checksum errors. Errors will be converted to warnings.",
+                      &ignore_checksum_errors,true,true);
+
+  ar.add_option_switch("p","pause_on_checksum_error",
+                      "Wait for user input on checksum error.",
+                      &pause_on_checksum_error,true,true);
+  
+  ar.add_option_switch("n","ignore_unknown_block_errors",
+                      "Ignore errors caused by unknown block types. Errors will be converted to warnings.",
+                      &ignore_unknown_block_errors,true,true);
+
+  ar.add_option_switch("g","ignore_object_integrity_errors",
+                      "Ignore errors caused by objects without proper end block. \
+Errors will be converted to warnings.",
+                      &ignore_object_integrity_errors,true,true);
+
+  ar.add_option_switch("v","verbose",
+                      "Be a bit more verbose.",
+                      &verbose,true,true);
+  
+  ar.add_option_value("i","in_file",
+                     "specify input file",
+                 &infile_set,&infile,
+                     "<input-file>",true,false);
+                     
+  ar.add_option_value("o","out_file",
+                     "Specify output file.",
+                     &outfile_set,&outfile,
+                     "<output_file>",true,true);
+  
+  ar.add_argument("File from where data is read",
+                 &infile_set,&infile,
+                 "<input-file>");
+  
+  ar.add_argument("File to where output is redirected",
+                 &outfile_set,&outfile,
+                 "<output-file>");
+
+  ar.add_option_value("F","config_file",
+                     "Use the specified configuration file.", 
+                     &config_file_set,&config_file,
+                     "<file-name>",false,true);
+
+  
+  // If there's a config file mentioned in the environment, take it!
+  char * env_ldc_config=getenv("LDC_CONFIG");
+  if(env_ldc_config){
+    fprintf(stderr,"Using config file:\"%s\"\n",env_ldc_config);
+    if(dump_vector(ar.read_file(env_ldc_config))){
+      dump_vector(ar.get_help());
+      exit(1);
+    }
+  }
+
+  // Process command line first time
+  if(dump_vector(ar.read_args(argc,args))){
+    dump_vector(ar.get_help());
+    exit(7);
+  }
+  
+  if (do_help) {
     dump_vector(ar.get_help());
-    exit(1);
+    exit(0);
   }
 
-  printf("\n\n\nHallo %s!\n",name.c_str());
-  exit(0);
-  tape_block * myblock=0;
-  do{
-    if (myblock) delete myblock;
-    myblock=tape_block::gen_from_fd(0);
-    
-    vector<string> desc=myblock->get_description();
-    for (vector<string>::iterator iter=desc.begin();
-        iter!=desc.end();iter++)
-      printf("%s\n",(*iter).c_str());
-  } while (myblock->get_state()==tape_block::TBS_OK);
-    return 0;
-}
+  // If user has a config file, use it.
+  if (config_file_set){
+    fprintf(stderr,"Using config file:\"%s\"\n",config_file.c_str());
+    if(dump_vector(ar.read_file(config_file))){
+      dump_vector(ar.get_help());
+      exit(7);
+    }
+
+    // Process command line a second time to override values from config file.
+    if(dump_vector(ar.read_args(argc,args))||do_help){
+      dump_vector(ar.get_help());
+      exit(7);
+    }
+  }
+  if (infile_set==1){
+    fprintf(stderr,"Opening file for input:%s\n",infile.c_str());
+    in_fd=open(infile.c_str(),O_RDONLY);
+    if (in_fd<0){
+      fprintf(stderr,"Error: could not open file \"%s\" for reading!\n",infile.c_str());
+      exit (1);
+    }
+  }
+  
+  if (outfile_set==1){
+    fprintf(stderr,"Opening file for output:%s\n",outfile.c_str());
+    out_fd=open(outfile.c_str(),O_WRONLY|O_TRUNC);
+    if (out_fd<0){
+      fprintf(stderr,"Error: could not open file \"%s\" for writing!\n",outfile.c_str());
+      exit (1);
+    }
+  }
+  
+  // The configuration implications according to /cfg007/
+  if (in_fd==0) pause_on_checksum_error=0;
+  if (pause_on_checksum_error==1) ignore_checksum_errors=1;
+  if (output_info||output_called||output_exported||output_unsatisfied)
+    list_contents=0;
+
+  // Now we go to read the data!
+
+  vector<tape_block*> tape;
+  vector<vector<tape_block *> > objects;
+  vector<tape_block *> current_object;  
+  
+  tape_block * block=0;
+  bool read_ahead=true;
+  int read_pointer=0;
+  int block_start=0;
+  int block_end=0;
+  int blocks_read=0;
+  bool in_object=false;
+  int errors=0;
+  int warnings=0;
+  int errcode=0;
+
+  while(read_ahead){
+    block=tape_block::gen_from_fd(in_fd);
+
+    block_start=read_pointer+block->get_discarded_bytes();
+    block_end=block_start+block->get_raw_size()-1;
+    read_pointer=block_end+1;
+    //printf("Discarded:%2x, Raw Size:%2x\n",block->get_discarded_bytes(),block->get_raw_size());
+    switch(block->get_state()){ // switchy
+    case tape_block::TBS_EOF_LEGAL: 
+      delete block;
+      if (!in_object){
+       fprintf(stderr,"File successfully read.\n");
+      } else {
+       if (ignore_object_integrity_errors){
+         fprintf(stderr,"Warning: Object integrity check failed!\n");
+         warnings++;
+       } else {
+         fprintf(stderr,"Error: Object integrity check failed!\n");
+         errors++;
+         errcode=6;
+       }
+      }
+      read_ahead=false;
+      break;
+    case tape_block::TBS_EOF_ILLEGAL:
+      delete block;
+      if (ignore_block_errors){
+       fprintf(stderr,"Warning: Block integrity check failed!\n");
+       warnings++;
+      } else {
+       fprintf(stderr,"Error: Block integrity check failed!\n");
+       errors++;
+       errcode=3;
+      }
+      read_ahead=false;
+      break;
+    case tape_block::TBS_CHECKSUM:
+      delete block;
+      if (ignore_checksum_errors){
+       fprintf(stderr,"Warning: Block checksum wrong!\n");
+       warnings++;
+      } else {
+       fprintf(stderr,"Error: Block checksum wrong!\n");
+       errors++;
+       read_ahead=false;
+       errcode=4;
+      }
+      break;
+    case tape_block::TBS_DEFAULT:
+      delete block;
+      fprintf(stderr,"TBS_DEFAULT encountered ->> SEVERE INTERNAL ERROR!\n");
+      errors++;
+      errcode=100;
+      read_ahead=false;
+      break;
+    case tape_block::TBS_IOERR:
+      delete block;
+      if (in_fd){
+       fprintf(stderr,"Error: Could not read from \"%s\"!\n",infile.c_str());
+      } else {
+       fprintf(stderr,"Error: Could not read from stdin!\n");
+      }
+      errors++;
+      read_ahead=false;
+      errcode=2;
+    case tape_block::TBS_OK:
+      tape.insert(tape.end(),block);
+      blocks_read++;
+      
+      if (verbose){
+       char buffer[200];
+       snprintf(buffer,200,"Block No. %3i: Start(hex):%5x End(hex):%5x Size(hex):%3x\n",
+                blocks_read-1,
+                block_start,
+                block_end,
+                block->get_raw_size());
+       write (out_fd,buffer,strlen(buffer));
+      }
+
+      if(list_contents)
+       dump_vector(block->get_description());
+      
+      if (block->get_type()==0x10){ // Unknown data block!
+       if (ignore_unknown_block_errors){
+         fprintf(stderr,"Warning: Unknown block type!\n");
+         warnings++;
+       }else {
+         fprintf(stderr,"Error: Unknown block type!\n");
+         errors++;
+         errcode=5;
+         read_ahead=false;
+       }
+      }
+      
+      current_object.insert(current_object.end(),block);
+      
+      if ((block->get_type()==data_block::TBT_EOT)
+         ||((block->get_type()==0)&&(block->get_subtype()==3))
+         ||((block->get_type()==4)||(block->get_type()==3))
+         ||((block->get_type()==0)&&(block->get_subtype()==014))){
+       in_object=false;
+       objects.insert(objects.end(),current_object);
+       current_object.clear();
+      } else {
+       in_object=true;
+      }
+      
+      break;
+    } // switch
+  } // generate loop
+  close(in_fd);
+
+  // Now we have our blocks, tell the user about that!
+  char buffer[200];
+  sprintf(buffer,"Bytes read:%i Blocks read:%i\nErrors:%i Warnings:%i\n",
+         read_pointer,blocks_read,errors,warnings);
+  if(output_info){
+    write (out_fd,buffer,strlen(buffer));
+  } else {
+    fprintf(stderr,buffer);
+  }
+  
+  if (errors>0){
+    fprintf(stderr,"Errors make me sick. Goodbye!\n");
+    exit(errcode);
+  }
+
+  return 0;
+} // main()