*** empty log message ***
[h316.git] / pc-tools / ldc2 / src / main.cpp
index 3e1244b19e98690c7456d1682e49238ebf4321bb..ba8a36c7a28da538f525590f6dc148c182ced7e7 100644 (file)
 /* ldc2 preliminary main program */
 
+
 #include <vector>
 #include <string>
 
-#include <stdio.h>
-#include <unistd.h>
-#include <sys/types.h>
-#include <sys/stat.h>
-#include <fcntl.h>
+#include "config.hh"
+#include "tool.hh"
 
 #include "tape_block.hh"
-#include "argument_reader.hh"
+#include "data_block_0.hh"
 
 using namespace std;
 
-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());
-    res=1;
-  }
-  return res;
-}
+#ifndef BUILD_STAMP
+#define BUILD_STAMP ""
+#endif
+
+#ifndef VERSION
+#define VERSION "0.0"
+#endif
+
+#define ID_STRING "\n     ldc2 - The X16 object analyser\n\
+            (C) 2007 Philipp Hachtmann\n\n\
+     Version %s, built %s\n     %s\n\n"
 
 
 
+/*!
+ *\brief The main routine.
+ */
 int main(int argc, char ** args){
+
   
-  string infile, outfile;
-  int infile_set, outfile_set;
-  int help_wanted;
+  // Do all the configuration stuff
+  do_config(argc,args);
+  if (cfg_version){
+    fprintf(stderr, ID_STRING, VERSION, BUILD_DATE, BUILD_STAMP);
+    exit(0);
+  }
   
-  int greet_want;
-  string greetings;
+  vector<tape_block*> tape;
+  vector<vector<tape_block *> > objects;
+  vector<tape_block *> current_object;  
   
-  int in_fd, out_fd;
+  tape_block * block=0;
+  bool read_ahead=true;
 
-  in_fd=0;  //stdin   {O _ \ 
-  out_fd=1; //stdout  {O ^ /
+  int read_pointer=0;
+  int block_start=0;
+  int block_end=0;
+  int blocks_read=0;
 
-  argument_reader ar("ldc2");
-  ar.add_param("h","help","Output this help text.",&help_wanted);
-  ar.add_param("g","greet","Wonderful bla bla. It is here only to test the output\
-capabilities of the arg_reader.",&greet_want);
+  bool in_object=false;
 
-  ar.add_argument("<input-file>","File from where data is read",&infile_set,&infile);
-  ar.add_argument("<output-file>","File to where output is redirected",&outfile_set,&outfile);
+  int errors=0;
+  int warnings=0;
+  int errcode=0;
 
+  bool spaced=false;
 
-  if((dump_vector(ar.read_args(argc,args))||help_wanted)){
-    dump_vector(ar.get_help());
-    exit(1);
-  }
-  if(greet_want)printf("Hallo!\n");
-  
-  if (infile_set==1){
-    printf("Opening file for input:%s\n",infile.c_str());
-    in_fd=open(infile.c_str(),O_RDONLY);
-    if (in_fd<0){
-      printf("Error: could not open file:%s\n",infile.c_str());
-      exit (3);
+  while(read_ahead){
+    try{
+      block=tape_block::gen_from_fd(in_fd);
+      blocks_read++;
+      tape.insert(tape.end(),block);
+      block_start=read_pointer+block->get_discarded_bytes();
+      block_end=block_start+block->get_raw_size()-1;
+      read_pointer=block_end+1;
+      
+      if (cfg_verbose) {
+       char buffer[200];
+       if (!spaced) fprintf(stderr,"\n");
+       spaced=false;
+       
+       snprintf(buffer,200,"Block No.%03i:  Start:0x%04x  End:0x%04x  Size:0x%02x\n",
+                blocks_read-1,
+                block_start,
+                block_end,
+                block->get_raw_size());
+       fprintf(stderr,buffer);
+      }
+      if(cfg_list_contents)
+       dump_vector(block->get_description());
     }
-  }
-  
-  vector<tape_block*> tape;
-  
-  
-  tape_block * block=0;
-  while(1){
-    block=tape_block::gen_from_fd(in_fd);
-    if (block->get_state()==tape_block::TBS_OK){
+    
+    catch(tape_block::eof_legal_exception &e){
+      read_pointer+=e.get_consumed();
+      break; // Immediately leave read loop.
+    }
+    
+    catch(tape_block::io_error_exception){
+      if (in_fd){
+       fprintf(stderr,"Error: Could not read from \"%s\"!\n",cfg_infile.c_str());
+      } else {
+       fprintf(stderr,"Error: Could not read from stdin!\n");
+      }
+      errors++;
+      errcode=2;
+      break; // Immediately leave read loop.
+    }
+    
+    catch(tape_block::eof_illegal_exception &e){
+      block=e.get_block();
+      blocks_read++;
+      tape.insert(tape.end(),block);
+      block_start=read_pointer+block->get_discarded_bytes();
+      block_end=block_start+block->get_raw_size()-1;
+      read_pointer=block_end+1;
+      
+      if (!spaced) fprintf(stderr,"\n");
+      spaced=false;
+      char buffer[200];
+      snprintf(buffer,200,"Block No.%03i:  Start:0x%04x  End:0x%04x  Size:0x%02x\n",
+              blocks_read-1,
+              block_start,
+              block_end,
+              block->get_raw_size());
+      fprintf(stderr,buffer);
+      
+      if (cfg_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;
+      }
+      if(cfg_list_contents)
+       dump_vector(block->get_description());
+      fprintf(stderr,"\n");
+      spaced=true;
+    }
+    
+    catch(tape_block::checksum_error_exception &e){
+      block=e.get_block();
+      blocks_read++;
       tape.insert(tape.end(),block);
-      dump_vector(block->get_description());
+      block_start=read_pointer+block->get_discarded_bytes();
+      block_end=block_start+block->get_raw_size()-1;
+      read_pointer=block_end+1;
+      
+      
+      if (!spaced) fprintf(stderr,"\n");
+      spaced=false;
+      char buffer[200];
+      snprintf(buffer,200,"Block No.%03i:  Start:0x%04x  End:0x%04x  Size:0x%02x\n",
+              blocks_read-1,
+              block_start,
+              block_end,
+              block->get_raw_size());
+      fprintf(stderr,buffer);
+      
+      if (cfg_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;
+      }
+      if(cfg_list_contents)
+       dump_vector(block->get_description());
+      fprintf(stderr,"\n");
+      spaced=true;
     }
-    else break;
+    
+        
+  } // while (read_ahead)
+
+  // Now we have our blocks, tell the user about that!
+  if (!spaced) fprintf(stderr,"\n");
+  spaced=false;
+  char buffer[200];
+  sprintf(buffer,"Bytes read:%i Blocks read:%i\nErrors:%i Warnings:%i\n",
+         read_pointer,blocks_read,errors,warnings);
+  if(cfg_output_info){
+    write (out_fd,buffer,strlen(buffer));
+  } else {
+    fprintf(stderr,buffer);
   }
 
-  switch(block->get_state()){
-  case tape_block::TBS_EOF_LEGAL: printf("File successfully read.\n");
-    break;
-  case tape_block::TBS_EOF_ILLEGAL: printf("EOF while in block!\n");
-    break;
-  case tape_block::TBS_CHECKSUM:
-    printf("Checksum error!\n");
-    break;
-  case tape_block::TBS_DEFAULT:
-    printf("TBS_DEFAULT encountered ->> SEVERY INTERNAL ERROR!\n");
-    exit(88);
-  case tape_block::TBS_IOERR:
-    printf("I/O Error... Why?\n");
-    exit (43);
+  if (errors>0){
+    fprintf(stderr,"Failed. (%i)\n",errcode);
+    exit(errcode);
+  }
+  
+  if (cfg_verbose){
+    fprintf(stderr,"Data read successfully.\n");
   }
+  close(in_fd);
+//     switch(block->get_state()){ // switchy
+//     case tape_block::TBS_EOF_LEGAL: 
+//       delete block;
+//       if (!in_object){
+//     fprintf(stderr,"File successfully read.\n");
+//       } else {
+//     if (cfg_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:
+//       break;
+//     case tape_block::TBS_CHECKSUM:
+//       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:
+//     case tape_block::TBS_OK:
+//       tape.insert(tape.end(),block);
+//       blocks_read++;
+      
+//       if (cfg_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(cfg_list_contents)
+//     dump_vector(block->get_description());
+      
+//       if (block->get_type()==0x10){ // Unknown data block!
+//     if (cfg_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
+
+
+//   }
+  
   return 0;
 } // main()