X-Git-Url: http://gitweb.hachti.de/?a=blobdiff_plain;f=pc-tools%2Fldc2%2Fsrc%2Fmain.cpp;h=34f2279b29a479e04191030fa77c47e986175156;hb=874a2bd89fd65e5a1763d88c218f066a424e0d04;hp=311774605888b0f378021184224f8b8b99abc0df;hpb=fd9632c025ce5974aaa8737721180fecd8d7a1c6;p=h316.git diff --git a/pc-tools/ldc2/src/main.cpp b/pc-tools/ldc2/src/main.cpp index 3117746..34f2279 100644 --- a/pc-tools/ldc2/src/main.cpp +++ b/pc-tools/ldc2/src/main.cpp @@ -1,38 +1,247 @@ -/* -r -$Id: main.cpp,v 1.4 2006/11/20 01:20:11 hachti Exp $ -$Log: main.cpp,v $ -Revision 1.4 2006/11/20 01:20:11 hachti -*** empty log message *** +/* ldc2 preliminary main program */ -Revision 1.3 2006-11-20 01:19:48 hachti -Another revision -*/ -#include -#include +#include +#include + +#include "config.hh" +#include "tool.hh" #include "tape_block.hh" -#include "data_block.hh" +#include "data_block_0.hh" -void tape_start(void* m){ - printf("tape_start\n"); -} +using namespace std; -void tape_stop(void* m){ - printf("tape_stop\n"); -} +#ifndef BUILD_STAMP +#define BUILD_STAMP "" +#endif + +#ifndef VERSION +#define VERSION "0.0" +#endif + +#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. + +static int errors=0; +static int warnings=0; +static int errcode=0; //! Variable for error codes. -int main(){ - tape_block * myblock=0; - do{ - if (myblock) delete myblock; - myblock=tape_block::gen_from_fd(0); - - vector desc=myblock->get_description(); - for (vector::iterator iter=desc.begin(); - iter!=desc.end();iter++) - printf("%s\n",(*iter).c_str()); - } while (myblock->get_state()==tape_block::TBS_OK); - return 0; + +void exit_on_error(){ + if (errors){ + fprintf(stderr,"Failed. (%i)\n",errcode); + exit(errcode); + } } + +/******************************************************************************/ +/*! + *\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. + + 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); + } + + 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"); + } + error=true; + errcode=2; + break; // Immediately leave read loop. + } + + catch(tape_block::eof_illegal_exception &e){ + block=e.get_block(); + err_integrity=true; + read_ahead=false; + if (cfg_ignore_block_errors){ + message="Warning: Block integrity check failed!\n"; + warning=true; + } else { + message="Error: Block integrity check failed!\n"; + error=true; + errcode=3; + } + } + + catch(tape_block::checksum_error_exception &e){ + block=e.get_block(); + err_checksum=true; + if (cfg_ignore_checksum_errors){ + message="Warning: Block checksum wrong!\n"; + warning=true; + } else { + message="Error: Block checksum wrong!\n"; + error=true; + read_ahead=false; + errcode=4; + } + } + + // 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 (error||warning||cfg_verbose){ + fprintf(fp,"\n"); + spaced=true; + } + if (error) errors++; + if (warning) warnings++; + } // while.... + if (cfg_verbose){ + 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); + } + } + } +} // type_check() + +/******************************************************************************/ +/*! + *\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; +} // main() +