- 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",cfg_infile.c_str());
+ }
+
+ // 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; i<tape.size();i++){
+ bool spaced=false;
+ if (!tape[i]->has_known_type()){
+ FILE * fp;
+ if (cfg_ignore_unknown_block_errors){
+ fp=stdwarn;
+ warning=true;