6 // (C) 2010 Underground Software
8 // JLH = James Hammons <jlhamm@acm.org>
9 // JPM = Jean-Paul Mari <djipi.mari@gmail.com>
12 // --- ---------- ------------------------------------------------------------
13 // JLH 01/16/2010 Created this log ;-)
14 // JLH 02/28/2010 Added functions to look inside .ZIP files and handle
16 // JLH 06/01/2012 Added function to check ZIP file CRCs against file DB
17 // JPM 06/06/2016 Visual Studio support
18 // JPM 06/15/2016 ELF format support
19 // JPM 06/19/2016 Soft debugger support
20 // JPM 07/15/2016 DWARF format support
25 #include "_MSC_VER/config.h"
35 #include "universalhdr.h"
38 #include "libelf/libelf.h"
39 #include "libelf/gelf.h"
41 #include "debugger/ELFManager.h"
42 #include "debugger/DBGManager.h"
45 // Private function prototypes
47 static int gzfilelength(gzFile gd
);
48 //#if defined(_MSC_VER) || defined(__MINGW64__)|| defined(__MINGW32__) || defined(__CYGWIN__)
49 static bool CheckExtension(const uint8_t *filename
, const char *ext
);
51 //static bool CheckExtension(const char * filename, const char * ext);
53 //static int ParseFileType(uint8_t header1, uint8_t header2, uint32_t size);
55 // Private variables/enums
59 // Generic ROM loading
61 uint32_t JaguarLoadROM(uint8_t * &rom
, char * path
)
63 // We really should have some kind of sanity checking for the ROM size here to prevent
64 // a buffer overflow... !!! FIX !!!
66 #pragma message("Warning: !!! FIX !!! Should have sanity checking for ROM size to prevent buffer overflow!")
68 #warning "!!! FIX !!! Should have sanity checking for ROM size to prevent buffer overflow!"
72 WriteLog("FILE: JaguarLoadROM attempting to load file '%s'...", path
);
73 char * ext
= strrchr(path
, '.');
75 // No filename extension == YUO FAIL IT (it is loading the file).
76 // This is naive, but it works. But should probably come up with something a little
77 // more robust, to prevent problems with dopes trying to exploit this.
80 WriteLog("FAILED!\n");
84 WriteLog("\nFILE: Succeeded in finding extension (%s)!\n", ext
);
85 WriteLog("FILE: Loading \"%s\"...", path
);
87 if (strcasecmp(ext
, ".zip") == 0)
89 // Handle ZIP file loading here...
90 WriteLog("(ZIPped)...");
92 // uint8_t * buffer = NULL;
93 // romSize = GetFileFromZIP(path, FT_SOFTWARE, buffer);
94 romSize
= GetFileFromZIP(path
, FT_SOFTWARE
, rom
);
98 WriteLog("Failed!\n");
102 // memcpy(rom, buffer, romSize);
107 // Handle gzipped files transparently [Adam Green]...
109 gzFile fp
= gzopen(path
, "rb");
113 WriteLog("Failed!\n");
117 romSize
= gzfilelength(fp
);
118 rom
= new uint8_t[romSize
];
119 gzseek(fp
, 0, SEEK_SET
);
120 gzread(fp
, rom
, romSize
);
124 WriteLog("OK (%i bytes)\n", romSize
);
131 // Jaguar file loading
132 // We do a more intelligent file analysis here instead of relying on (possible
133 // false) file extensions which people don't seem to give two shits about
136 bool JaguarLoadFile(char * path
)
139 GElf_Ehdr ElfEhdr
, *PtrGElfEhdr
;
141 Elf_Data
*PtrElfData
;
142 GElf_Shdr GElfShdr
, *PtrGElfShdr
;
144 uint8_t *buffer
= NULL
;
146 size_t ElfSectionNameType
;
147 int DBGType
= DBG_NO_TYPE
;
151 jaguarROMSize
= JaguarLoadROM(buffer
, path
);
153 if (jaguarROMSize
== 0)
155 // It's up to the GUI to report errors, not us. :-)
156 WriteLog("FILE: Could not load ROM from file \"%s\"...\nAborting load!\n", path
);
160 jaguarMainROMCRC32
= crc32_calcCheckSum(buffer
, jaguarROMSize
);
161 WriteLog("CRC: %08X\n", (unsigned int)jaguarMainROMCRC32
);
162 // TODO: Check for EEPROM file in ZIP file. If there is no EEPROM in the user's EEPROM
163 // directory, copy the one from the ZIP file, if it exists.
165 jaguarRunAddress
= 0x802000; // For non-BIOS runs, this is true
166 int fileType
= ParseFileType(buffer
, jaguarROMSize
);
167 jaguarCartInserted
= false;
170 if (fileType
== JST_ROM
)
172 jaguarCartInserted
= true;
173 memcpy(jagMemSpace
+ 0x800000, buffer
, jaguarROMSize
);
174 // Checking something...
175 jaguarRunAddress
= GET32(jagMemSpace
, 0x800404);
176 WriteLog("FILE: Cartridge run address is reported as $%X...\n", jaguarRunAddress
);
180 else if (fileType
== JST_ALPINE
)
182 // File extension ".ROM": Alpine image that loads/runs at $802000
183 WriteLog("FILE: Setting up Alpine ROM... Run address: 00802000, length: %08X\n", jaguarROMSize
);
184 memset(jagMemSpace
+ 0x800000, 0xFF, 0x2000);
185 memcpy(jagMemSpace
+ 0x802000, buffer
, jaguarROMSize
);
188 // Maybe instead of this, we could try requiring the STUBULATOR ROM? Just a thought...
189 // Try setting the vector to say, $1000 and putting an instruction there that loops forever:
190 // This kludge works! Yeah!
191 SET32(jaguarMainRAM
, 0x10, 0x00001000);
192 SET16(jaguarMainRAM
, 0x1000, 0x60FE); // Here: bra Here
195 else if (fileType
== JST_ELF32
)
199 char *PtrELFExe
= (char *)ELFManager_ExeCopy(buffer
, jaguarROMSize
);
201 if (PtrELFExe
!= NULL
)
203 if ((elf_version(EV_CURRENT
) != EV_NONE
) && (ElfMem
= ELFManager_MemOpen(PtrELFExe
, jaguarROMSize
)))
205 if (ELFManager_DwarfInit(ElfMem
))
207 DBGType
|= DBG_ELFDWARF
;
210 if (!elf_getshdrnum(ElfMem
, &NbrSect
))
212 if (((PtrGElfEhdr
= gelf_getehdr(ElfMem
, &ElfEhdr
)) != NULL
) && ((PtrElfScn
= elf_getscn(ElfMem
, 0)) != NULL
))
214 for (error
= false; (PtrElfScn
!= NULL
) && (error
== false); PtrElfScn
= elf_nextscn(ElfMem
, PtrElfScn
))
218 if ((PtrGElfShdr
= gelf_getshdr(PtrElfScn
, &GElfShdr
)) == NULL
)
224 NameSection
= elf_strptr(ElfMem
, PtrGElfEhdr
->e_shstrndx
, (size_t)PtrGElfShdr
->sh_name
);
225 WriteLog("FILE: ELF Section name: %s\n", NameSection
);
227 if ((ElfSectionNameType
= ELFManager_GetSectionType(NameSection
)) == ELF_NO_TYPE
)
229 WriteLog("FILE: ELF Section not listed\n");
234 switch (PtrGElfShdr
->sh_type
)
240 if ((PtrGElfShdr
->sh_flags
& (SHF_ALLOC
| SHF_WRITE
| SHF_EXECINSTR
)))
242 if (PtrGElfShdr
->sh_addr
>= 0x800000)
244 memcpy(jagMemSpace
+ PtrGElfShdr
->sh_addr
, buffer
+ PtrGElfShdr
->sh_offset
, PtrGElfShdr
->sh_size
);
249 memcpy(jaguarMainRAM
+ PtrGElfShdr
->sh_addr
, buffer
+ PtrGElfShdr
->sh_offset
, PtrGElfShdr
->sh_size
);
254 switch (ElfSectionNameType
)
256 case ELF_debug_aranges_TYPE
:
257 case ELF_debug_info_TYPE
:
258 case ELF_debug_abbrev_TYPE
:
259 case ELF_debug_line_TYPE
:
260 case ELF_debug_frame_TYPE
:
261 case ELF_debug_ranges_TYPE
:
262 case ELF_debug_str_TYPE
:
263 case ELF_debug_loc_TYPE
:
269 case ELF_comment_TYPE
:
284 while ((error
== false) && ((PtrElfData
= elf_getdata(PtrElfScn
, PtrElfData
)) != NULL
))
286 if (!ELFManager_AddTab(PtrElfData
, ElfSectionNameType
))
301 jaguarRunAddress
= (uint32_t)PtrGElfEhdr
->e_entry
;
302 WriteLog("FILE: Setting up ELF 32bits... Run address: %08X\n", jaguarRunAddress
);
317 WriteLog("FILE: libelf version is not recognized or libelf memory cannot be opened\n");
323 WriteLog("FILE: ELFManager cannot allocate memory\n");
330 WriteLog("FILE: ELF parsing error\n");
332 if ((err
= elf_errno()))
334 WriteLog("FILE: ELF error: %s\n", elf_errmsg(err
));
341 DBGManager_SetType(DBGType
);
345 else if (fileType
== JST_ABS_TYPE1
)
347 // For ABS type 1, run address == load address
348 uint32_t loadAddress
= GET32(buffer
, 0x16),
349 codeSize
= GET32(buffer
, 0x02) + GET32(buffer
, 0x06);
350 WriteLog("FILE: Setting up homebrew (ABS-1)... Run address: %08X, length: %08X\n", loadAddress
, codeSize
);
351 memcpy(jagMemSpace
+ loadAddress
, buffer
+ 0x24, codeSize
);
353 jaguarRunAddress
= loadAddress
;
356 else if (fileType
== JST_ABS_TYPE2
)
358 uint32_t loadAddress
= GET32(buffer
, 0x28), runAddress
= GET32(buffer
, 0x24),
359 codeSize
= GET32(buffer
, 0x18) + GET32(buffer
, 0x1C);
360 WriteLog("FILE: Setting up homebrew (ABS-2)... Run address: %08X, length: %08X\n", runAddress
, codeSize
);
361 memcpy(jagMemSpace
+ loadAddress
, buffer
+ 0xA8, codeSize
);
363 jaguarRunAddress
= runAddress
;
366 // NB: This is *wrong*
368 Basically, if there is no "JAG" at position $1C, then the long there is the load/start
369 address in LITTLE ENDIAN.
370 If "JAG" is present, the the next character ("R" or "L") determines the size of the
371 JagServer command (2 bytes vs. 4). Following that are the commands themselves;
372 typically it will either be 2 (load) or 3 (load & run). Command headers go like so:
391 10: (Poll for commands)
393 12: (Load & run user program)
394 filname, terminated with NULL
399 else if (fileType
== JST_JAGSERVER
)
401 // This kind of shiaut should be in the detection code below...
402 // (and now it is! :-)
403 // if (buffer[0x1C] == 'J' && buffer[0x1D] == 'A' && buffer[0x1E] == 'G')
405 // Still need to do some checking here for type 2 vs. type 3. This assumes 3
406 // Also, JAGR vs. JAGL (word command size vs. long command size)
407 uint32_t loadAddress
= GET32(buffer
, 0x22), runAddress
= GET32(buffer
, 0x2A);
408 WriteLog("FILE: Setting up homebrew (Jag Server)... Run address: $%X, length: $%X\n", runAddress
, jaguarROMSize
- 0x2E);
409 memcpy(jagMemSpace
+ loadAddress
, buffer
+ 0x2E, jaguarROMSize
- 0x2E);
411 jaguarRunAddress
= runAddress
;
413 // Hmm. Is this kludge necessary?
414 SET32(jaguarMainRAM
, 0x10, 0x00001000); // Set Exception #4 (Illegal Instruction)
415 SET16(jaguarMainRAM
, 0x1000, 0x60FE); // Here: bra Here
419 // else // Special WTFOMGBBQ type here...
421 // uint32_t loadAddress = (buffer[0x1F] << 24) | (buffer[0x1E] << 16) | (buffer[0x1D] << 8) | buffer[0x1C];
422 // WriteLog("FILE: Setting up homebrew (GEMDOS WTFOMGBBQ type)... Run address: $%X, length: $%X\n", loadAddress, jaguarROMSize - 0x20);
423 // memcpy(jagMemSpace + loadAddress, buffer + 0x20, jaguarROMSize - 0x20);
425 // jaguarRunAddress = loadAddress;
429 else if (fileType
== JST_WTFOMGBBQ
)
431 uint32_t loadAddress
= (buffer
[0x1F] << 24) | (buffer
[0x1E] << 16) | (buffer
[0x1D] << 8) | buffer
[0x1C];
432 WriteLog("FILE: Setting up homebrew (GEMDOS WTFOMGBBQ type)... Run address: $%X, length: $%X\n", loadAddress
, jaguarROMSize
- 0x20);
433 memcpy(jagMemSpace
+ loadAddress
, buffer
+ 0x20, jaguarROMSize
- 0x20);
435 jaguarRunAddress
= loadAddress
;
439 // We can assume we have JST_NONE at this point. :-P
440 WriteLog("FILE: Failed to load headerless file.\n");
446 // "Debugger" file loading
447 // To keep the things separate between "Debugger" and "Alpine" loading until usage clarification has been done
449 bool DebuggerLoadFile(char * path
)
451 return (AlpineLoadFile(path
));
456 // "Alpine" file loading
457 // Since the developers were coming after us with torches and pitchforks, we
458 // decided to allow this kind of thing. ;-) But ONLY FOR THE DEVS, DAMMIT! >:-U
461 bool AlpineLoadFile(char * path
)
463 uint8_t * buffer
= NULL
;
464 jaguarROMSize
= JaguarLoadROM(buffer
, path
);
466 if (jaguarROMSize
== 0)
468 // It's up to the GUI to deal with failure, not us. ;-)
469 WriteLog("FILE: Could not load Alpine from file \"%s\"...\nAborting load!\n", path
);
473 jaguarMainROMCRC32
= crc32_calcCheckSum(buffer
, jaguarROMSize
);
474 WriteLog("FILE: CRC is %08X\n", (unsigned int)jaguarMainROMCRC32
);
477 jaguarRunAddress
= 0x802000;
479 WriteLog("FILE: Setting up Alpine ROM with non-standard length... Run address: 00802000, length: %08X\n", jaguarROMSize
);
481 memset(jagMemSpace
+ 0x800000, 0xFF, 0x2000);
482 memcpy(jagMemSpace
+ 0x802000, buffer
, jaguarROMSize
);
485 // Maybe instead of this, we could try requiring the STUBULATOR ROM? Just a thought...
486 // Try setting the vector to say, $1000 and putting an instruction there
487 // that loops forever:
488 // This kludge works! Yeah!
489 SET32(jaguarMainRAM
, 0x10, 0x00001000); // Set Exception #4 (Illegal Instruction)
490 SET16(jaguarMainRAM
, 0x1000, 0x60FE); // Here: bra Here
497 // Get the length of a (possibly) gzipped file
499 static int gzfilelength(gzFile gd
)
501 int size
= 0, length
= 0;
502 unsigned char buffer
[0x10000];
508 // Read in chunks until EOF
509 size
= gzread(gd
, buffer
, 0x10000);
524 // Compare extension to passed in filename. If equal, return true; otherwise false.
526 //#if defined(_MSC_VER) || defined(__MINGW64__)|| defined(__MINGW32__) || defined(__CYGWIN__)
527 static bool CheckExtension(const uint8_t *filename
, const char *ext
)
529 //static bool CheckExtension(const char * filename, const char * ext)
532 // Sanity checking...
533 if ((filename
== NULL
) || (ext
== NULL
))
536 const char * filenameExt
= strrchr((const char *)filename
, '.'); // Get the file's extension (if any)
538 if (filenameExt
== NULL
)
541 return (strcasecmp(filenameExt
, ext
) == 0 ? true : false);
546 // Get file from .ZIP
547 // Returns the size of the file inside the .ZIP file that we're looking at
548 // NOTE: If the thing we're looking for is found, it allocates it in the passed in buffer.
549 // Which means we have to deallocate it later.
551 uint32_t GetFileFromZIP(const char * zipFile
, FileType type
, uint8_t * &buffer
)
553 // NOTE: We could easily check for this by discarding anything that's larger than the RAM/ROM
554 // size of the Jaguar console.
555 #if defined(_MSC_VER)
556 #pragma message("Warning: !!! FIX !!! Should have sanity checking for ROM size to prevent buffer overflow!")
558 #warning "!!! FIX !!! Should have sanity checking for ROM size to prevent buffer overflow!"
560 const char ftStrings
[5][32] = { "Software", "EEPROM", "Label", "Box Art", "Controller Overlay" };
561 // ZIP * zip = openzip(0, 0, zipFile);
562 FILE * zip
= fopen(zipFile
, "rb");
566 WriteLog("FILE: Could not open file '%s'!\n", zipFile
);
574 // The order is here is important: If the file is found, we need to short-circuit the
575 // readzip() call because otherwise, 'ze' will be pointing to the wrong file!
576 // while (!found && readzip(zip))
577 while (!found
&& GetZIPHeader(zip
, ze
))
581 // Here we simply rely on the file extension to tell the truth, but we know
582 // that extensions lie like sons-a-bitches. So this is naive, we need to do
583 // something a little more robust to keep bad things from happening here.
584 #if defined(_MSC_VER)
585 #pragma message("Warning: !!! Checking for image by extension can be fooled !!!")
587 #warning "!!! Checking for image by extension can be fooled !!!"
589 if ((type
== FT_LABEL
) && (CheckExtension(ze
.filename
, ".png") || CheckExtension(ze
.filename
, ".jpg") || CheckExtension(ze
.filename
, ".gif")))
592 WriteLog("FILE: Found image file '%s'.\n", ze
.filename
);
595 if ((type
== FT_SOFTWARE
) && (CheckExtension(ze
.filename
, ".j64")
596 || CheckExtension(ze
.filename
, ".rom") || CheckExtension(ze
.filename
, ".abs")
597 || CheckExtension(ze
.filename
, ".cof") || CheckExtension(ze
.filename
, ".coff")
598 || CheckExtension(ze
.filename
, ".jag") || CheckExtension(ze
.filename
, ".elf")))
601 WriteLog("FILE: Found software file '%s'.\n", ze
.filename
);
604 if ((type
== FT_EEPROM
) && (CheckExtension(ze
.filename
, ".eep") || CheckExtension(ze
.filename
, ".eeprom")))
607 WriteLog("FILE: Found EEPROM file '%s'.\n", ze
.filename
);
611 fseek(zip
, ze
.compressedSize
, SEEK_CUR
);
614 uint32_t fileSize
= 0;
618 WriteLog("FILE: Uncompressing...");
619 // Insert file size sanity check here...
620 buffer
= new uint8_t[ze
.uncompressedSize
];
622 // if (readuncompresszip(zip, ze.compressedSize, buffer) == 0)
623 // if (UncompressFileFromZIP(zip, ze.compressedSize, buffer) == 0)
624 if (UncompressFileFromZIP(zip
, ze
, buffer
) == 0)
626 fileSize
= ze
.uncompressedSize
;
627 WriteLog("success! (%u bytes)\n", fileSize
);
633 WriteLog("FAILED!\n");
637 // Didn't find what we're looking for...
638 WriteLog("FILE: Failed to find file of type %s...\n", ftStrings
[type
]);
646 uint32_t GetFileDBIdentityFromZIP(const char * zipFile
)
648 FILE * zip
= fopen(zipFile
, "rb");
652 WriteLog("FILE: Could not open file '%s'!\n", zipFile
);
658 // Loop through all files in the zip file under consideration
659 while (GetZIPHeader(zip
, ze
))
661 // & loop through all known CRC32s in our file DB to see if it's there!
664 while (romList
[index
].crc32
!= 0xFFFFFF)
666 if (romList
[index
].crc32
== ze
.crc32
)
675 // We didn't find it, so skip the compressed data...
676 fseek(zip
, ze
.compressedSize
, SEEK_CUR
);
680 return (uint32_t )-1;
684 bool FindFileInZIPWithCRC32(const char * zipFile
, uint32_t crc
)
686 FILE * zip
= fopen(zipFile
, "rb");
690 WriteLog("FILE: Could not open file '%s'!\n", zipFile
);
696 // Loop through all files in the zip file under consideration
697 while (GetZIPHeader(zip
, ze
))
705 fseek(zip
, ze
.compressedSize
, SEEK_CUR
);
714 // Parse the file type based upon file size and/or headers.
716 uint32_t ParseFileType(uint8_t * buffer
, uint32_t size
)
718 // Check headers first...
721 if (buffer
[EI_CLASS
] == ELFCLASS32
)
723 if (((BigToLittleEndian16(((Elf32_Ehdr
*)buffer
)->e_machine
) & 0xFF) == EM_68K
) && (BigToLittleEndian16(((Elf32_Ehdr
*)buffer
)->e_type
) == ET_EXEC
) && (buffer
[0] == ELFMAG0
) && (buffer
[1] == ELFMAG1
) && (buffer
[2] == ELFMAG2
) && (buffer
[3] == ELFMAG3
))
728 if (buffer
[0] == 0x60 && buffer
[1] == 0x1B)
729 return JST_ABS_TYPE1
;
732 if (buffer
[0] == 0x01 && buffer
[1] == 0x50)
733 return JST_ABS_TYPE2
;
735 // Jag Server & other old shite
736 if (buffer
[0] == 0x60 && buffer
[1] == 0x1A)
738 if (buffer
[0x1C] == 'J' && buffer
[0x1D] == 'A' && buffer
[0x1E] == 'G')
739 return JST_JAGSERVER
;
741 return JST_WTFOMGBBQ
;
744 // And if that fails, try file sizes...
746 // If the file size is divisible by 1M, we probably have an regular ROM.
747 // We can also check our CRC32 against the internal ROM database to be sure.
748 // (We also check for the Memory Track cartridge size here as well...)
749 if ((size
% 1048576) == 0 || size
== 131072)
752 // If the file size + 8192 bytes is divisible by 1M, we probably have an
753 // Alpine format ROM.
754 if (((size
+ 8192) % 1048576) == 0)
762 // Check for universal header
764 bool HasUniversalHeader(uint8_t * rom
, uint32_t romSize
)
770 for(int i
=0; i
<8192; i
++)
771 if (rom
[i
] != universalCartHeader
[i
])
781 Stubulator ROM vectors...
782 handler 001 at $00E00008
783 handler 002 at $00E008DE
784 handler 003 at $00E008E2
785 handler 004 at $00E008E6
786 handler 005 at $00E008EA
787 handler 006 at $00E008EE
788 handler 007 at $00E008F2
789 handler 008 at $00E0054A
790 handler 009 at $00E008FA
791 handler 010 at $00000000
792 handler 011 at $00000000
793 handler 012 at $00E008FE
794 handler 013 at $00E00902
795 handler 014 at $00E00906
796 handler 015 at $00E0090A
797 handler 016 at $00E0090E
798 handler 017 at $00E00912
799 handler 018 at $00E00916
800 handler 019 at $00E0091A
801 handler 020 at $00E0091E
802 handler 021 at $00E00922
803 handler 022 at $00E00926
804 handler 023 at $00E0092A
805 handler 024 at $00E0092E
806 handler 025 at $00E0107A
807 handler 026 at $00E0107A
808 handler 027 at $00E0107A
809 handler 028 at $00E008DA
810 handler 029 at $00E0107A
811 handler 030 at $00E0107A
812 handler 031 at $00E0107A
813 handler 032 at $00000000
815 Let's try setting up the illegal instruction vector for a stubulated jaguar...
817 SET32(jaguar_mainRam, 0x08, 0x00E008DE);
818 SET32(jaguar_mainRam, 0x0C, 0x00E008E2);
819 SET32(jaguar_mainRam, 0x10, 0x00E008E6); // <-- Should be here (it is)...
820 SET32(jaguar_mainRam, 0x14, 0x00E008EA);//*/
823 ABS Format sleuthing (LBUGDEMO.ABS):
825 000000 60 1B 00 00 05 0C 00 04 62 C0 00 00 04 28 00 00
826 000010 12 A6 00 00 00 00 00 80 20 00 FF FF 00 80 25 0C
829 DRI-format file detected...
830 Text segment size = 0x0000050c bytes
831 Data segment size = 0x000462c0 bytes
832 BSS Segment size = 0x00000428 bytes
833 Symbol Table size = 0x000012a6 bytes
834 Absolute Address for text segment = 0x00802000
835 Absolute Address for data segment = 0x0080250c
836 Absolute Address for BSS segment = 0x00004000
839 000000 01 50 00 03 00 00 00 00 00 03 83 10 00 00 05 3b
840 000010 00 1c 00 03 00 00 01 07 00 00 1d d0 00 03 64 98
841 000020 00 06 8b 80 00 80 20 00 00 80 20 00 00 80 3d d0
843 000030 2e 74 78 74 00 00 00 00 00 80 20 00 00 80 20 00 .txt (+36 bytes)
844 000040 00 00 1d d0 00 00 00 a8 00 00 00 00 00 00 00 00
845 000050 00 00 00 00 00 00 00 20
846 000058 2e 64 74 61 00 00 00 00 00 80 3d d0 00 80 3d d0 .dta (+36 bytes)
847 000068 00 03 64 98 00 00 1e 78 00 00 00 00 00 00 00 00
848 000078 00 00 00 00 00 00 00 40
849 000080 2e 62 73 73 00 00 00 00 00 00 50 00 00 00 50 00 .bss (+36 bytes)
850 000090 00 06 8b 80 00 03 83 10 00 00 00 00 00 00 00 00
851 0000a0 00 00 00 00 00 00 00 80
853 Header size is $A8 bytes...
855 BSD/COFF format file detected...
857 Symbol Table offset = 230160 ($00038310)
858 Symbol Table contains 1339 symbol entries ($0000053B)
859 The additional header size is 28 bytes ($001C)
860 Magic Number for RUN_HDR = 0x00000107
861 Text Segment Size = 7632 ($00001DD0)
862 Data Segment Size = 222360 ($00036498)
863 BSS Segment Size = 428928 ($00068B80)
864 Starting Address for executable = 0x00802000
865 Start of Text Segment = 0x00802000
866 Start of Data Segment = 0x00803dd0