static void registerSegment( orl_sec_handle o_shnd ) //************************************************** { orl_sec_flags sec_flags; orl_sec_handle reloc_section; orl_sec_alignment alignment; char * content; int ctr; segment *seg; seg = NewSegment(); seg->name = ORLSecGetName( o_shnd ); seg->size = ORLSecGetSize( o_shnd ); seg->start = 0; seg->use_32 = 1; // only 32-bit object files use ORL seg->attr = ( 2 << 2 ); // (?) combine public alignment = ORLSecGetAlignment( o_shnd ); // FIXME: Need better alignment translation. switch( alignment ) { case 0: seg->attr |= ( 1 << 5 ); break; case 1: seg->attr |= ( 2 << 5 ); break; case 3: case 4: seg->attr |= ( 3 << 5 ); break; case 8: seg->attr |= ( 4 << 5 ); break; case 2: seg->attr |= ( 5 << 5 ); break; case 12: seg->attr |= ( 6 << 5 ); break; default: // fprintf( stderr, "NOTE! 'Strange' alignment (%d) found. Using byte alignment.\n", alignment ); seg->attr |= ( 1 << 5 ); break; } sec_flags = ORLSecGetFlags( o_shnd ); if( !( sec_flags & ORL_SEC_FLAG_EXEC ) ) { seg->data_seg = true; } if( seg->size > 0 && ORLSecGetContents( o_shnd, &content ) == ORL_OKAY ) { Segment = seg; // Putting contents into segment struct. for( ctr = 0; ctr < seg->size; ctr++ ) { PutSegByte( ctr, content[ctr] ); } } if( !HashTableInsert( SectionToSegmentTable, (hash_value)o_shnd, (hash_data)seg ) ) { SysError( ERR_OUT_OF_MEM, false ); } reloc_section = ORLSecGetRelocTable( o_shnd ); if( reloc_section ) { if( !addRelocSection( reloc_section ) ) { SysError( ERR_OUT_OF_MEM, false ); } } }
static return_val textOrDataSectionInit( orl_sec_handle shnd ) { return_val error; orl_sec_handle reloc_sec; error = createLabelList( shnd ); if( error == RC_OKAY ) { error = createRefList( shnd ); if( error == RC_OKAY ) { reloc_sec = ORLSecGetRelocTable( shnd ); if( reloc_sec != ORL_NULL_HANDLE ) { error = addRelocSection( reloc_sec ); } } } return( error ); }
orl_return PrintSecInfo( orl_sec_handle o_shnd ) /**********************************************/ { char *buf; int loop; int loop2; orl_sec_size size; orl_sec_type sec_type; orl_sec_flags sec_flags; orl_sec_handle reloc_section; orl_sec_handle symbol_table; orl_sec_handle string_table; int sep; int segname_printed = 0; size = 0; // just because gcc is a little retarded sectionFound = 1; if( dump.sections || dump.sec_contents ) { buf = ORLSecGetName( o_shnd ); printf( "[%s]\n", buf ); segname_printed = 1; size = ORLSecGetSize( o_shnd ); } if( dump.sections ) { //printf( "\nSection Handle:\t0x%x\n", o_shnd ); printf( "Size=%8.8x ", size ); sec_type = ORLSecGetType( o_shnd ); printf( "Align=%4.4x ", ORLSecGetAlignment( o_shnd ) ); //printf( "Section Type:\t%d\n", sec_type ); printf( "(" ); switch( sec_type ) { case ORL_SEC_TYPE_NONE: printf( "sec_type_none" ); break; case ORL_SEC_TYPE_NO_BITS: printf( "no bits" ); break; case ORL_SEC_TYPE_PROG_BITS: printf( "program bits" ); break; case ORL_SEC_TYPE_SYM_TABLE: printf( "symbol table" ); break; case ORL_SEC_TYPE_DYN_SYM_TABLE: printf( "dynamic symbol table" ); break; case ORL_SEC_TYPE_STR_TABLE: printf( "string table" ); break; case ORL_SEC_TYPE_RELOCS: printf( "relocs" ); break; case ORL_SEC_TYPE_RELOCS_EXPADD: printf( "relocs with explicit addends" ); break; case ORL_SEC_TYPE_HASH: printf( "hash table" ); break; case ORL_SEC_TYPE_DYNAMIC: printf( "dynamic linking information" ); break; case ORL_SEC_TYPE_NOTE: printf( "note or comment" ); break; default: printf( "unknown type? %s", sec_type ); break; } printf( ") " ); sec_flags = ORLSecGetFlags( o_shnd ); printf( "ORL_flags=0x%x\n", sec_flags ); sep = 0; if( sec_flags ) printf( " " ); if( sec_flags & ORL_SEC_FLAG_EXEC ) { printf( "executable code" ); sep++; } if( sec_flags & ORL_SEC_FLAG_INITIALIZED_DATA ) { if( sep++ ) printf( ", " ); printf( "initialized data" ); } if( sec_flags & ORL_SEC_FLAG_UNINITIALIZED_DATA ) { if( sep++ ) printf( ", " ); printf( "uninitialized data" ); } if( sec_flags & ORL_SEC_FLAG_GROUPED ) { if( sep++ ) printf( ", " ); printf( "grouped section" ); } if( sec_flags & ORL_SEC_FLAG_NO_PADDING ) { if( sep++ ) printf( ", " ); printf( "no padding to next boundary" ); } if( sec_flags & ORL_SEC_FLAG_OVERLAY ) { if( sep++ ) printf( ", " ); printf( "contains an overlay" ); } if( sec_flags & ORL_SEC_FLAG_REMOVE ) { if( sep++ ) printf( ", " ); printf( "remove at link-time" ); } if( sec_flags & ORL_SEC_FLAG_COMDAT ) { if( sep++ ) printf( ", " ); printf( "communal data" ); } if( sec_flags & ORL_SEC_FLAG_DISCARDABLE ) { if( sep++ ) printf( ", " ); printf( "discardable" ); } if( sec_flags & ORL_SEC_FLAG_NOT_CACHED ) { if( sep++ ) printf( ", " ); printf( "cannot be cached" ); } if( sec_flags & ORL_SEC_FLAG_NOT_PAGEABLE) { if( sep++ ) printf( ", " ); printf( "not pageable" ); } if( sec_flags & ORL_SEC_FLAG_SHARED ) { if( sep++ ) printf( ", " ); printf( "shared in memory" ); } if( sec_flags & ORL_SEC_FLAG_EXECUTE_PERMISSION ) { if( sep++ ) printf( ", " ); printf( "execute permission" ); } if( sec_flags & ORL_SEC_FLAG_READ_PERMISSION ) { if( sep++ ) printf( ", " ); printf( "read permission" ); } if( sec_flags & ORL_SEC_FLAG_WRITE_PERMISSION) { if( sep++ ) printf( ", " ); printf( "write permission" ); } if( sep ) printf( "\n" ); } if( dump.sec_contents ) { if( ORLSecGetContents( o_shnd, (unsigned_8 **)&buf ) == ORL_OKAY ) { printf( "Contents:\n" ); for( loop = 0; loop < size; loop += 16 ) { printf( "0x%8.8x: ", loop ); for( loop2 = 0; loop2 < 16; loop2++ ) { if( loop + loop2 < size ) { printf( "%2.2x ", buf[loop+loop2] ); } else { printf( " " ); } if( loop2 == 7 ) { printf( " " ); } } printf( " " ); for( loop2 = 0; loop2 < 16 && loop + loop2 < size; loop2++ ) { if( buf[loop+loop2] >= 32 && buf[loop+loop2] <= 122 ) { printf( "%c", buf[loop+loop2] ); } else { printf( "." ); } if( loop2 == 7 ) { printf( " " ); } } printf( "\n" ); } } } if( dump.relocs ) { reloc_section = ORLSecGetRelocTable( o_shnd ); if( reloc_section ) { if( !segname_printed++ ) { buf = ORLSecGetName( o_shnd ); printf( "[%s]\n", buf ); } printf( "Relocs in [%s], ", ORLSecGetName( reloc_section ) ); symbol_table = ORLSecGetSymbolTable( reloc_section ); if( symbol_table ) { printf( "symtab='%s', ", ORLSecGetName( symbol_table ) ); string_table = ORLSecGetStringTable( symbol_table ); if( string_table ) { printf( "strtab='%s'.\n", ORLSecGetName( string_table ) ); } else { printf( "strtab=none.\n" ); } } else { printf( "symtab=none, strtab=none.\n" ); } //printf( "Relocs:\n" ); ORLRelocSecScan( reloc_section, &PrintRelocInfo ); } } return( ORL_OKAY ); }