X-Git-Url: http://gitweb.hachti.de/?a=blobdiff_plain;f=pc-tools%2Fldc2%2Fsrc%2Fmain.cpp;h=34f2279b29a479e04191030fa77c47e986175156;hb=16b4d690e1a97837a883abe60d30b5cd032be935;hp=ba8a36c7a28da538f525590f6dc148c182ced7e7;hpb=7880ae2dd0ed55ec671be0fc449487420a126626;p=h316.git diff --git a/pc-tools/ldc2/src/main.cpp b/pc-tools/ldc2/src/main.cpp index ba8a36c..34f2279 100644 --- a/pc-tools/ldc2/src/main.cpp +++ b/pc-tools/ldc2/src/main.cpp @@ -20,69 +20,62 @@ using namespace std; #define VERSION "0.0" #endif -#define ID_STRING "\n ldc2 - The X16 object analyser\n\ +#define ID_STRING "\n ldc2 - The X16 object tape analyser\n\ (C) 2007 Philipp Hachtmann\n\n\ Version %s, built %s\n %s\n\n" +/******************************************************************************/ +static FILE * stdwarn; //! Suppressable warning output file pointer. +static vector tape; //! Represents the whole tape contents. +static vector > objects; //! Tape content in objects. -/*! - *\brief The main routine. - */ -int main(int argc, char ** args){ +static int errors=0; +static int warnings=0; +static int errcode=0; //! Variable for error codes. - - // Do all the configuration stuff - do_config(argc,args); - - if (cfg_version){ - fprintf(stderr, ID_STRING, VERSION, BUILD_DATE, BUILD_STAMP); - exit(0); + +void exit_on_error(){ + if (errors){ + fprintf(stderr,"Failed. (%i)\n",errcode); + exit(errcode); } +} - vector tape; - vector > objects; - vector current_object; +/******************************************************************************/ +/*! + *\brief Read in Tape data and do some checks and messages. + * + * This routine reads in the tape data. + * During reading in, checksums are checked and + * /da001/ information is generated. No object integrity test. + * Tape block object pointers are put into the global vector + * tape. + */ +void read_tape(){ + + tape_block * block=0; //! Pointer to current block. + bool read_ahead=true; //! Continue scanning for blocks. + int read_pointer=0; //! Read position in input. + int block_start=0; //! Start of block position in input. + int block_end=0; //! End of block position in input. + int blocks_read=0; //! Number of blocks read in. - 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; - - bool spaced=false; + bool spaced=false; //! Help flag for spaced messages. + + string message; //! A warning or help message. + while(read_ahead){ + + bool err_checksum=false; + bool err_integrity=false; + + bool warning=false; + bool error=false; + 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()); } catch(tape_block::eof_legal_exception &e){ @@ -96,180 +89,157 @@ int main(int argc, char ** args){ } else { fprintf(stderr,"Error: Could not read from stdin!\n"); } - errors++; + error=true; 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); - + err_integrity=true; + read_ahead=false; if (cfg_ignore_block_errors){ - fprintf(stderr,"Warning: Block integrity check failed!\n"); - warnings++; + message="Warning: Block integrity check failed!\n"; + warning=true; } else { - fprintf(stderr,"Error: Block integrity check failed!\n"); - errors++; + message="Error: Block integrity check failed!\n"; + error=true; 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); - 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); - + err_checksum=true; if (cfg_ignore_checksum_errors){ - fprintf(stderr,"Warning: Block checksum wrong!\n"); - warnings++; + message="Warning: Block checksum wrong!\n"; + warning=true; } else { - fprintf(stderr,"Error: Block checksum wrong!\n"); - errors++; + message="Error: Block checksum wrong!\n"; + error=true; read_ahead=false; errcode=4; } - if(cfg_list_contents) - dump_vector(block->get_description()); - fprintf(stderr,"\n"); - spaced=true; } - - } // 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); - } + // Now let's check for block type + if ((!error)&&(!warning)&&!block->has_known_type()){ + if (cfg_ignore_unknown_block_errors){ + message="Warning: Unknown Block type!"; + warning=true; + }else{ + message="Error: Unknown Block type!"; + error=true; + read_ahead=false; + errcode=5; + } + } + + // Count 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; + + FILE * fp=stdwarn; + if (error) fp=stderr; + + if (cfg_verbose||error||warning){ + if (!spaced) fprintf(fp,"\n"); + spaced=false; + fprintf(fp,"Block No.%03i: Start:0x%04x End:0x%04x Size:0x%02x\n", + blocks_read-1, + block_start, + block_end, + block->get_raw_size()); + } + + if (error) fprintf(stderr,message.c_str()); + if (warning) fprintf(stdwarn,message.c_str()); + + if(cfg_list_contents){ + dump_vector(block->get_description()); + if (!error&&!warning) spaced=false; + } - if (errors>0){ - fprintf(stderr,"Failed. (%i)\n",errcode); - exit(errcode); - } - + if (error||warning||cfg_verbose){ + fprintf(fp,"\n"); + spaced=true; + } + if (error) errors++; + if (warning) warnings++; + } // while.... if (cfg_verbose){ - fprintf(stderr,"Data read successfully.\n"); + close(in_fd); + fprintf(stderr,"Reading finished.\n"); + fprintf(stderr,"Bytes read:%i, Blocks read:%i\n",read_pointer,blocks_read); + } +} // read_tape() + +/******************************************************************************/ + +void type_check(){ + bool warning=false; + bool error=false; + + for (unsigned int i=0; ihas_known_type()){ + FILE * fp; + if (cfg_ignore_unknown_block_errors){ + fp=stdwarn; + warning=true; + } else { + fp=stderr; + error=true; + } + if (!spaced) { + spaced=false;fprintf(fp,"\n"); + fprintf(fp,"Warning: Unknown Block type! Block No.%i\n",i); + dump_vector_fp(tape[i]->get_description(),fp); + fprintf(fp,"\n"); + spaced=true; + } + if (!cfg_ignore_unknown_block_errors){ + int errcode=5; + fprintf(stdwarn,"Failed. (%i)\n",errcode); + exit(errcode); + } + } } - 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)); -// } +} // type_check() -// 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 +/******************************************************************************/ +/*! + *\brief The main routine. + */ +int main(int argc, char ** args){ -// } + // Do all the configuration stuff + do_config(argc,args); + + // Output a version message if desired + if (cfg_version){ + fprintf(stderr, ID_STRING, VERSION, BUILD_DATE, BUILD_STAMP); + exit(0); + } + + // Assign warning output according to configuration + if (cfg_quiet) stdwarn=fopen("/dev/null","w"); + else stdwarn=stderr; + + read_tape(); // Process input to completion. + exit_on_error(); + + + + if (cfg_split_objects){ + for (unsigned int i=0; idump_to_fd(out_fd); + } + } return 0;