dmlib: objlink.c annotate

author	Matti Hamalainen <ccr@tnsp.org>
date	Sat, 03 Nov 2012 02:19:51 +0200
parents
children	81b92a0e754b

rev	line source
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	1 /*
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	2 * objlink - Link files (RAW and PRG) into one PRG object
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	3 * Programmed and designed by Matti 'ccr' Hamalainen
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	4 * (C) Copyright 2002-2012 Tecnic Software productions (TNSP)
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	5 *
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	6 * Please read file 'COPYING' for information on license and distribution.
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	7 */
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	8 #include <errno.h>
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	9 #include "dmlib.h"
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	10 #include "dmargs.h"
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	11 #include "dmfile.h"
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	12 #include "dmmutex.h"
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	13
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	14 #define MAX_FILENAMES (128)
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	15 #define MAX_MEMBLOCKS (128)
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	16
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	17
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	18 /* Typedefs
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	19 */
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	20 typedef struct
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	21 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	22 ssize_t start, end; // Start and end address
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	23 int type; // Type
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	24 char *name; // Name of the block
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	25 ssize_t size;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	26 int placement;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	27 } DMMemBlock;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	28
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	29 typedef struct
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	30 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	31 char *name; // Description of memory model
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	32 char *desc;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	33 ssize_t size; // Total addressable memory size
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	34 ssize_t nmemBlocks; // Defined memory areas
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	35 DMMemBlock memBlocks[MAX_MEMBLOCKS];
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	36 } DMMemModel;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	37
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	38 typedef struct
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	39 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	40 char *filename;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	41 int type;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	42 int placement;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	43 ssize_t addr;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	44 } DMSourceFile;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	45
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	46 // Source file type
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	47 enum
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	48 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	49 STYPE_RAW = 1,
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	50 STYPE_PRG,
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	51 STYPE_PRGA
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	52 };
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	53
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	54 // How to determine block placement / address
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	55 enum
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	56 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	57 PLACE_STATIC = 1, // Already known
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	58 PLACE_ARGUMENT, // Commandline argument
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	59 PLACE_FILE, // From file
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	60 };
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	61
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	62 enum
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	63 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	64 FMT_GENERIC = 1,
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	65 FMT_PLAIN,
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	66 FMT_DECIMAL
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	67 };
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	68
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	69 enum
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	70 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	71 MTYPE_NONE = 0,
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	72 MTYPE_ROM, // Hard ROM
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	73 MTYPE_ROM_WT, // Write to RAM through ROM
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	74 MTYPE_IO, // I/O lines
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	75 MTYPE_RES // RESERVED
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	76 };
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	77
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	78
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	79 /* Memory models
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	80 */
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	81 const DMMemModel memoryModels[] = {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	82 { "C64 unrestricted", "$01 = $34", (64*1024), 0, {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	83 { 0, 0, 0, NULL, 0, 0 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	84 }},
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	85
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	86 { "C64 normal (IO+Basic+Kernal)", "$01 = $37", (64*1024), 3, {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	87 { 0xA000, 0xBFFF, MTYPE_ROM_WT, "Basic ROM", 0, PLACE_STATIC },
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	88 { 0xD000, 0xDFFF, MTYPE_IO, "I/O", 0, PLACE_STATIC },
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	89 { 0xE000, 0xFFFF, MTYPE_ROM_WT, "Kernal ROM", 0, PLACE_STATIC },
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	90 }},
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	91
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	92 { "C64 modified (IO+Kernal)", "$01 = $36", (64*1024), 2, {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	93 { 0xD000, 0xDFFF, MTYPE_IO, "I/O", 0, PLACE_STATIC },
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	94 { 0xE000, 0xFFFF, MTYPE_ROM_WT, "Kernal ROM", 0, PLACE_STATIC },
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	95 }},
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	96
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	97 { "C64 modified (IO only)", "$01 = $35", (64*1024), 1, {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	98 { 0xD000, 0xDFFF, MTYPE_IO, "I/O", 0, PLACE_STATIC },
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	99 }},
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	100
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	101 { "C64 modified (Char+Kernal+Basic)", "$01 = $33", (64*1024), 3, {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	102 { 0xA000, 0xBFFF, MTYPE_ROM_WT, "Basic ROM", 0, PLACE_STATIC },
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	103 { 0xD000, 0xDFFF, MTYPE_ROM, "Char ROM", 0, PLACE_STATIC },
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	104 { 0xE000, 0xFFFF, MTYPE_ROM_WT, "Kernal ROM", 0, PLACE_STATIC },
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	105 }},
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	106
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	107 /*
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	108 { "C64 normal", "$01 = $37", (64*1024), 0, {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	109 { 0x0000, 0x0000, MTYPE_RAM, "" },
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	110 }},
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	111 */
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	112 };
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	113
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	114 static const int nmemoryModels = sizeof(memoryModels) / sizeof(memoryModels[0]);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	115
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	116
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	117 /* Global variables
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	118 */
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	119 int nsrcFiles = 0; // Number of source files
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	120 DMSourceFile srcFiles[MAX_FILENAMES]; // Source file names
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	121
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	122 int nmemBlocks = 0;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	123 DMMemBlock memBlocks[MAX_FILENAMES];
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	124
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	125 char *optLinkFileName = NULL;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	126 int optLinkFileFormat = FMT_GENERIC;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	127
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	128 BOOL optDescribe = FALSE,
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	129 optAllowOverlap = FALSE;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	130
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	131 Uint32 optInitValue = 0;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	132 int optInitValueType = 1;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	133
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	134 int optMemModel = 0;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	135 const DMMemModel *memModel = NULL;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	136 Uint8 *memory = NULL;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	137
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	138 char *optDestName = NULL;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	139
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	140
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	141 /* Arguments
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	142 */
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	143 static DMOptArg optList[] = {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	144 { 0, '?', "help", "Show this help", OPT_NONE },
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	145 { 1, 'r', "input-raw", "RAW input: -r <file>:<addr>", OPT_ARGREQ },
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	146 { 2, 'p', "input-prg", "PRG input: -p <file>[:<addr>]", OPT_ARGREQ },
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	147 { 12, 's', "section", "Reserved section: -s <start>-<end> or <start>:<len>", OPT_ARGREQ },
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	148 { 5, 'o', "output", "Specify output file, -o <file>", OPT_ARGREQ },
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	149 { 6, 'O', "overlap", "Allow overlapping memory areas", OPT_NONE },
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	150 { 7, 'm', "model", "Set memory model", OPT_ARGREQ },
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	151 { 8, 'l', "link-file", "Output addresses and labels into file", OPT_ARGREQ },
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	152 { 9, 'f', "format", "Format of link-file: (g)eneric, (p)lain, (d)ecimal", OPT_ARGREQ },
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	153 { 10, 'i', "initvalue", "Initialize memory with: -i <byte/word/dword>:[bwd]", OPT_ARGREQ },
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	154 { 11, 'd', "describe", "Output ASCII memory map description", OPT_NONE },
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	155 };
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	156
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	157 static const int optListN = sizeof(optList) / sizeof(optList[0]);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	158
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	159
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	160 void argShowHelp()
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	161 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	162 int i;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	163
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	164 dmPrintBanner(stdout, dmProgName, "[options]");
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	165 dmArgsPrintHelp(stdout, optList, optListN);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	166
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	167 printf(
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	168 "\n"
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	169 "Each numeric argument can be prefixed with $ or 0x for hexadecimal values.\n"
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	170 "NOTICE! -p filename:<addr> will ignore load address and use <addr> instead!\n"
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	171 "\n"
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	172 "Available memory models:\n");
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	173
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	174 for (i = 0; i < nmemoryModels; i++)
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	175 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	176 const DMMemModel *m = &memoryModels[i];
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	177 printf(" %d = %-40s [%s] (%d kB)\n",
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	178 i, m->name, m->desc, m->size / 1024);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	179 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	180 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	181
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	182
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	183 off_t dmGetFileSize(FILE *f)
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	184 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	185 off_t len, pos = ftell(f);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	186 fseeko(f, 0, SEEK_END);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	187 len = ftell(f);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	188 fseek(f, pos, SEEK_SET);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	189 return len;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	190 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	191
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	192
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	193 /* Memory block handling
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	194 */
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	195 void reserveMemBlock(ssize_t startAddr, ssize_t endAddr, const char *blockName, int blockType)
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	196 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	197 if (startAddr > endAddr)
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	198 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	199 dmError("ERROR! Block '%s' has startAddr=$%.4x > endAddr=$%.4x!\n",
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	200 blockName, startAddr, endAddr);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	201 exit(4);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	202 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	203
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	204 if (nmemBlocks < MAX_FILENAMES)
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	205 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	206 memBlocks[nmemBlocks].start = startAddr;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	207 memBlocks[nmemBlocks].end = endAddr;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	208 memBlocks[nmemBlocks].size = (endAddr - startAddr + 1);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	209 memBlocks[nmemBlocks].name = dm_strdup(blockName);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	210 memBlocks[nmemBlocks].type = blockType;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	211 nmemBlocks++;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	212 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	213 else
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	214 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	215 dmError("Maximum number of memBlock definitions (%d) exceeded!\n",
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	216 MAX_FILENAMES);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	217 exit(4);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	218 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	219 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	220
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	221
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	222 int compareMemBlock(const void cva, const void cvb)
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	223 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	224 const DMMemBlock a = cva, b = cvb;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	225 return a->start - b->start;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	226 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	227
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	228 BOOL argHandleOpt(const int optN, char optArg, char currArg)
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	229 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	230 char p, s;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	231 ssize_t tmpi;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	232
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	233 switch (optN) {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	234 case 0:
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	235 argShowHelp();
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	236 exit(0);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	237 break;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	238
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	239 case 1:
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	240 // Add RAW
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	241 if ((p = strrchr(optArg, ':')) != NULL)
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	242 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	243 *p = 0;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	244 if (!dmGetIntVal(p + 1, &tmpi))
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	245 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	246 dmError("Invalid RAW address '%s' specified for '%s'.\n",
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	247 p + 1, optArg);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	248 return FALSE;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	249 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	250 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	251 else
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	252 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	253 dmError("No RAW loading address specified for '%s'.\n", optArg);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	254 return FALSE;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	255 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	256 srcFiles[nsrcFiles].filename = optArg;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	257 srcFiles[nsrcFiles].type = STYPE_RAW;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	258 srcFiles[nsrcFiles].addr = tmpi;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	259 nsrcFiles++;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	260 break;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	261
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	262 case 2:
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	263 // Add PRG
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	264 if ((p = strrchr(optArg, ':')) != NULL)
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	265 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	266 *p = 0;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	267 if (!dmGetIntVal(p + 1, &tmpi))
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	268 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	269 dmError("Invalid PRG address '%s' specified for '%s'.\n",
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	270 p + 1, optArg);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	271 return FALSE;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	272 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	273 srcFiles[nsrcFiles].addr = tmpi;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	274 srcFiles[nsrcFiles].type = STYPE_PRGA;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	275 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	276 else
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	277 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	278 srcFiles[nsrcFiles].type = STYPE_PRG;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	279 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	280
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	281 srcFiles[nsrcFiles].filename = optArg;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	282 nsrcFiles++;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	283 break;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	284
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	285 case 5:
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	286 // Set output file name
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	287 optDestName = optArg;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	288 break;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	289
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	290 case 6:
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	291 // Allow overlapping segments
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	292 optAllowOverlap = TRUE;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	293 dmError("Warning, allowing overlapping data.\n");
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	294 break;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	295
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	296 case 7:
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	297 // Set memory model
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	298 optMemModel = atoi(optArg);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	299 if (optMemModel < 0 \|\| optMemModel >= nmemoryModels)
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	300 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	301 dmError("Invalid memory model number %i!\n", optMemModel);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	302 return FALSE;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	303 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	304 break;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	305
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	306 case 8:
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	307 // Linker file
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	308 optLinkFileName = optArg;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	309 break;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	310
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	311 case 9:
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	312 // Linker file format
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	313 switch (tolower(optArg[0]))
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	314 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	315 case 'g':
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	316 optLinkFileFormat = FMT_GENERIC;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	317 break;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	318 case 'p':
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	319 optLinkFileFormat = FMT_PLAIN;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	320 break;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	321 case 'd':
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	322 optLinkFileFormat = FMT_DECIMAL;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	323 break;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	324
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	325 default:
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	326 dmError("Invalid/unknown linker file format '%s'!\n",
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	327 optArg);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	328 return FALSE;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	329 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	330 break;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	331
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	332 case 10:
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	333 // Initialization value
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	334 optInitValueType = 1;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	335 if ((p = strrchr(optArg, ':')) != NULL)
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	336 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	337 *p = 0;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	338 switch (tolower(p[1]))
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	339 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	340 case 'b': optInitValueType = 1; break;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	341 case 'w': optInitValueType = 2; break;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	342 case 'd': optInitValueType = 4; break;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	343 default:
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	344 dmError("Invalid init value type '%c' specified for '%s'.\n",
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	345 p[1], optArg);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	346 return FALSE;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	347 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	348 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	349 if (!dmGetIntVal(optArg, &tmpi))
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	350 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	351 dmError("Invalid initvalue '%s'.\n", optArg);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	352 return FALSE;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	353 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	354 optInitValue = tmpi;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	355 break;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	356
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	357 case 11:
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	358 // Set describe mode
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	359 optDescribe = TRUE;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	360 break;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	361
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	362 case 12:
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	363 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	364 ssize_t sectStart, sectEnd, sectLen;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	365 char sectMode;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	366
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	367 // Define reserved section
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	368 // Create a copy of the argument
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	369 if ((s = dm_strdup(optArg)) == NULL)
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	370 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	371 dmError("Could not allocate temporary string!\n");
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	372 exit(128);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	373 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	374
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	375 // Get start address
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	376 if ((p = strchr(s, '-')) == NULL &&
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	377 (p = strchr(s, ':')) == NULL)
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	378 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	379 dmFree(s);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	380 dmError("Section definition '%s' invalid.\n", optArg);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	381 return FALSE;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	382 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	383 sectMode = *p;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	384 *p = 0;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	385
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	386 // Get value
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	387 if (!dmGetIntVal(s, &sectStart))
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	388 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	389 dmError("Section start address '%s' in '%s' invalid.\n", s, optArg);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	390 dmFree(s);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	391 return FALSE;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	392 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	393
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	394 // Get end address or length
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	395 if (!dmGetIntVal(p + 1, &tmpi))
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	396 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	397 dmError("Section %s '%s' in '%s' invalid.\n",
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	398 sectMode == '-' ? "end address" : "length",
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	399 p, optArg);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	400 dmFree(s);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	401 return FALSE;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	402 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	403
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	404 dmFree(s);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	405
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	406 if (sectMode == ':')
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	407 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	408 sectEnd = sectStart + tmpi;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	409 sectLen = tmpi;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	410 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	411 else
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	412 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	413 if (tmpi < sectStart)
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	414 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	415 dmError("Section start address > end address in '%s'.\n",
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	416 optArg);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	417 return FALSE;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	418 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	419 sectLen = tmpi - sectStart + 1;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	420 sectEnd = tmpi;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	421 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	422
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	423 // Allocate memory block
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	424 dmMsg(1, "Reserve $%.4x - $%.4x ($%x, %d bytes) as 'Clear'\n",
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	425 sectStart, sectEnd, sectLen, sectLen);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	426
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	427 reserveMemBlock(sectStart, sectEnd, "Clear", MTYPE_RES);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	428 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	429 break;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	430
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	431 default:
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	432 dmError("Unknown argument '%s'.\n", currArg);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	433 return FALSE;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	434 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	435
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	436 return TRUE;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	437 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	438
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	439
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	440 int dmLoadPRG(const char *fname, BOOL forceAddr, int destAddr)
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	441 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	442 FILE *f;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	443 ssize_t a, b, s;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	444
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	445 // Open the input file
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	446 if ((f = fopen(fname, "rb")) == NULL)
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	447 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	448 dmError("Error opening input file '%s' (%s).\n",
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	449 fname, strerror(errno));
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	450 return 1;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	451 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	452
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	453 // Get filesize
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	454 if ((s = dmGetFileSize(f) - 2) < 0)
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	455 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	456 dmError("Error getting file size for '%s'.\n", fname);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	457 return 6;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	458 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	459
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	460 // Get loading address
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	461 if ((a = fgetc(f)) < 0)
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	462 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	463 dmError("Error reading input file '%s' (%s).\n",
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	464 fname, strerror(errno));
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	465 return 2;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	466 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	467
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	468 if ((b = fgetc(f)) < 0)
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	469 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	470 dmError("Error reading input file '%s' (%s).\n",
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	471 fname, strerror(errno));
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	472 return 3;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	473 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	474
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	475 // Show information
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	476 if (forceAddr)
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	477 a = destAddr;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	478 else
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	479 a = a + (b * 0x100);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	480
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	481 dmPrint(1, "* Loading '%s', %s at $%.4x-$%.4x",
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	482 fname, forceAddr ? "PRGA" : "PRG", a, (a + s - 1));
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	483
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	484 if (a + s >= memModel->size)
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	485 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	486 dmPrint(1, " .. Does not fit into the memory!\n");
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	487 return 5;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	488 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	489
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	490 // Load data
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	491 if (fread(&memory[a], s, 1, f) < 1)
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	492 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	493 dmPrint(1, " .. Error: %s.\n",
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	494 strerror(errno));
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	495 return 4;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	496 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	497
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	498 dmPrint(1, " .. OK\n");
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	499
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	500 // Add info to list

407

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

1 /*

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

2 * objlink - Link files (RAW and PRG) into one PRG object

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

3 * Programmed and designed by Matti 'ccr' Hamalainen

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

5 *

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

6 * Please read file 'COPYING' for information on license and distribution.

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

7 */

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

8 #include <errno.h>

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

9 #include "dmlib.h"

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

10 #include "dmargs.h"

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

11 #include "dmfile.h"

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

12 #include "dmmutex.h"

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

13

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

14 #define MAX_FILENAMES (128)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

15 #define MAX_MEMBLOCKS (128)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

16

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

17

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

18 /* Typedefs

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

19 */

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

20 typedef struct

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

21 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

22 ssize_t start, end; // Start and end address

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

23 int type; // Type

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

24 char *name; // Name of the block

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

25 ssize_t size;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

26 int placement;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

27 } DMMemBlock;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

28

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

29 typedef struct

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

30 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

31 char *name; // Description of memory model

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

32 char *desc;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

33 ssize_t size; // Total addressable memory size

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

34 ssize_t nmemBlocks; // Defined memory areas

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

35 DMMemBlock memBlocks[MAX_MEMBLOCKS];

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

36 } DMMemModel;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

37

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

38 typedef struct

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

39 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

40 char *filename;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

41 int type;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

42 int placement;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

43 ssize_t addr;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

44 } DMSourceFile;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

45

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

46 // Source file type

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

47 enum

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

48 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

49 STYPE_RAW = 1,

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

50 STYPE_PRG,

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

51 STYPE_PRGA

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

52 };

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

53

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

54 // How to determine block placement / address

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

55 enum

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

56 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

57 PLACE_STATIC = 1, // Already known

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

58 PLACE_ARGUMENT, // Commandline argument

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

59 PLACE_FILE, // From file

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

60 };

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

61

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

62 enum

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

63 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

64 FMT_GENERIC = 1,

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

65 FMT_PLAIN,

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

66 FMT_DECIMAL

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

67 };

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

68

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

69 enum

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

70 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

71 MTYPE_NONE = 0,

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

72 MTYPE_ROM, // Hard ROM

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

73 MTYPE_ROM_WT, // Write to RAM through ROM

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

74 MTYPE_IO, // I/O lines

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

75 MTYPE_RES // RESERVED

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

76 };

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

77

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

78

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

79 /* Memory models

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

80 */

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

81 const DMMemModel memoryModels[] = {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

82 { "C64 unrestricted", "$01 = $34", (64*1024), 0, {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

83 { 0, 0, 0, NULL, 0, 0 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

84 }},

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

85

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

86 { "C64 normal (IO+Basic+Kernal)", "$01 = $37", (64*1024), 3, {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

87 { 0xA000, 0xBFFF, MTYPE_ROM_WT, "Basic ROM", 0, PLACE_STATIC },

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

88 { 0xD000, 0xDFFF, MTYPE_IO, "I/O", 0, PLACE_STATIC },

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

89 { 0xE000, 0xFFFF, MTYPE_ROM_WT, "Kernal ROM", 0, PLACE_STATIC },

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

90 }},

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

91

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

92 { "C64 modified (IO+Kernal)", "$01 = $36", (64*1024), 2, {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

93 { 0xD000, 0xDFFF, MTYPE_IO, "I/O", 0, PLACE_STATIC },

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

94 { 0xE000, 0xFFFF, MTYPE_ROM_WT, "Kernal ROM", 0, PLACE_STATIC },

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

95 }},

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

96

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

97 { "C64 modified (IO only)", "$01 = $35", (64*1024), 1, {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

98 { 0xD000, 0xDFFF, MTYPE_IO, "I/O", 0, PLACE_STATIC },

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

99 }},

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

100

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

101 { "C64 modified (Char+Kernal+Basic)", "$01 = $33", (64*1024), 3, {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

102 { 0xA000, 0xBFFF, MTYPE_ROM_WT, "Basic ROM", 0, PLACE_STATIC },

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

103 { 0xD000, 0xDFFF, MTYPE_ROM, "Char ROM", 0, PLACE_STATIC },

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

104 { 0xE000, 0xFFFF, MTYPE_ROM_WT, "Kernal ROM", 0, PLACE_STATIC },

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

105 }},

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

106

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

107 /*

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

108 { "C64 normal", "$01 = $37", (64*1024), 0, {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

109 { 0x0000, 0x0000, MTYPE_RAM, "" },

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

110 }},

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

111 */

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

112 };

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

113

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

114 static const int nmemoryModels = sizeof(memoryModels) / sizeof(memoryModels[0]);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

115

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

116

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

117 /* Global variables

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

118 */

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

119 int nsrcFiles = 0; // Number of source files

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

120 DMSourceFile srcFiles[MAX_FILENAMES]; // Source file names

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

121

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

122 int nmemBlocks = 0;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

123 DMMemBlock memBlocks[MAX_FILENAMES];

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

124

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

125 char *optLinkFileName = NULL;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

126 int optLinkFileFormat = FMT_GENERIC;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

127

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

128 BOOL optDescribe = FALSE,

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

129 optAllowOverlap = FALSE;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

130

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

131 Uint32 optInitValue = 0;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

132 int optInitValueType = 1;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

133

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

134 int optMemModel = 0;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

135 const DMMemModel *memModel = NULL;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

136 Uint8 *memory = NULL;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

137

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

138 char *optDestName = NULL;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

139

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

140

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

141 /* Arguments

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

142 */

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

143 static DMOptArg optList[] = {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

144 { 0, '?', "help", "Show this help", OPT_NONE },

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

145 { 1, 'r', "input-raw", "RAW input: -r <file>:<addr>", OPT_ARGREQ },

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

146 { 2, 'p', "input-prg", "PRG input: -p <file>[:<addr>]", OPT_ARGREQ },

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

147 { 12, 's', "section", "Reserved section: -s <start>-<end> or <start>:<len>", OPT_ARGREQ },

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

148 { 5, 'o', "output", "Specify output file, -o <file>", OPT_ARGREQ },

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

149 { 6, 'O', "overlap", "Allow overlapping memory areas", OPT_NONE },

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

150 { 7, 'm', "model", "Set memory model", OPT_ARGREQ },

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

151 { 8, 'l', "link-file", "Output addresses and labels into file", OPT_ARGREQ },

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

152 { 9, 'f', "format", "Format of link-file: (g)eneric, (p)lain, (d)ecimal", OPT_ARGREQ },

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

153 { 10, 'i', "initvalue", "Initialize memory with: -i <byte/word/dword>:[bwd]", OPT_ARGREQ },

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

154 { 11, 'd', "describe", "Output ASCII memory map description", OPT_NONE },

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

155 };

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

156

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

157 static const int optListN = sizeof(optList) / sizeof(optList[0]);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

158

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

159

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

160 void argShowHelp()

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

161 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

162 int i;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

163

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

164 dmPrintBanner(stdout, dmProgName, "[options]");

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

165 dmArgsPrintHelp(stdout, optList, optListN);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

166

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

167 printf(

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

168 "\n"

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

169 "Each numeric argument can be prefixed with $ or 0x for hexadecimal values.\n"

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

170 "NOTICE! -p filename:<addr> will ignore load address and use <addr> instead!\n"

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

171 "\n"

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

172 "Available memory models:\n");

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

173

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

174 for (i = 0; i < nmemoryModels; i++)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

175 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

176 const DMMemModel *m = &memoryModels[i];

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

177 printf(" %d = %-40s [%s] (%d kB)\n",

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

178 i, m->name, m->desc, m->size / 1024);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

179 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

180 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

181

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

182

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

183 off_t dmGetFileSize(FILE *f)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

184 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

185 off_t len, pos = ftell(f);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

186 fseeko(f, 0, SEEK_END);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

187 len = ftell(f);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

188 fseek(f, pos, SEEK_SET);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

189 return len;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

190 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

191

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

192

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

193 /* Memory block handling

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

194 */

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

195 void reserveMemBlock(ssize_t startAddr, ssize_t endAddr, const char *blockName, int blockType)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

196 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

197 if (startAddr > endAddr)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

198 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

199 dmError("ERROR! Block '%s' has startAddr=$%.4x > endAddr=$%.4x!\n",

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

200 blockName, startAddr, endAddr);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

201 exit(4);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

202 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

203

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

204 if (nmemBlocks < MAX_FILENAMES)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

205 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

206 memBlocks[nmemBlocks].start = startAddr;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

207 memBlocks[nmemBlocks].end = endAddr;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

208 memBlocks[nmemBlocks].size = (endAddr - startAddr + 1);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

209 memBlocks[nmemBlocks].name = dm_strdup(blockName);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

210 memBlocks[nmemBlocks].type = blockType;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

211 nmemBlocks++;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

212 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

213 else

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

214 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

215 dmError("Maximum number of memBlock definitions (%d) exceeded!\n",

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

216 MAX_FILENAMES);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

217 exit(4);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

218 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

219 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

220

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

221

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

222 int compareMemBlock(const void *cva, const void *cvb)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

223 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

224 const DMMemBlock *a = cva, *b = cvb;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

225 return a->start - b->start;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

226 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

227

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

228 BOOL argHandleOpt(const int optN, char *optArg, char *currArg)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

229 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

230 char *p, *s;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

231 ssize_t tmpi;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

232

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

233 switch (optN) {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

234 case 0:

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

235 argShowHelp();

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

236 exit(0);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

237 break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

238

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

239 case 1:

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

240 // Add RAW

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

241 if ((p = strrchr(optArg, ':')) != NULL)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

242 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

243 *p = 0;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

244 if (!dmGetIntVal(p + 1, &tmpi))

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

245 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

246 dmError("Invalid RAW address '%s' specified for '%s'.\n",

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

247 p + 1, optArg);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

248 return FALSE;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

249 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

250 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

251 else

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

252 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

253 dmError("No RAW loading address specified for '%s'.\n", optArg);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

254 return FALSE;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

255 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

256 srcFiles[nsrcFiles].filename = optArg;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

257 srcFiles[nsrcFiles].type = STYPE_RAW;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

258 srcFiles[nsrcFiles].addr = tmpi;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

259 nsrcFiles++;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

260 break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

261

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

262 case 2:

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

263 // Add PRG

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

264 if ((p = strrchr(optArg, ':')) != NULL)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

265 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

266 *p = 0;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

267 if (!dmGetIntVal(p + 1, &tmpi))

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

268 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

269 dmError("Invalid PRG address '%s' specified for '%s'.\n",

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

270 p + 1, optArg);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

271 return FALSE;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

272 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

273 srcFiles[nsrcFiles].addr = tmpi;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

274 srcFiles[nsrcFiles].type = STYPE_PRGA;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

275 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

276 else

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

277 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

278 srcFiles[nsrcFiles].type = STYPE_PRG;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

279 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

280

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

281 srcFiles[nsrcFiles].filename = optArg;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

282 nsrcFiles++;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

283 break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

284

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

285 case 5:

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

286 // Set output file name

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

287 optDestName = optArg;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

288 break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

289

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

290 case 6:

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

291 // Allow overlapping segments

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

292 optAllowOverlap = TRUE;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

293 dmError("Warning, allowing overlapping data.\n");

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

294 break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

295

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

296 case 7:

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

297 // Set memory model

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

298 optMemModel = atoi(optArg);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

299 if (optMemModel < 0 || optMemModel >= nmemoryModels)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

300 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

301 dmError("Invalid memory model number %i!\n", optMemModel);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

302 return FALSE;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

303 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

304 break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

305

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

306 case 8:

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

307 // Linker file

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

308 optLinkFileName = optArg;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

309 break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

310

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

311 case 9:

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

312 // Linker file format

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

313 switch (tolower(optArg[0]))

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

314 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

315 case 'g':

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

316 optLinkFileFormat = FMT_GENERIC;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

317 break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

318 case 'p':

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

319 optLinkFileFormat = FMT_PLAIN;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

320 break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

321 case 'd':

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

322 optLinkFileFormat = FMT_DECIMAL;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

323 break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

324

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

325 default:

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

326 dmError("Invalid/unknown linker file format '%s'!\n",

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

327 optArg);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

328 return FALSE;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

329 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

330 break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

331

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

332 case 10:

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

333 // Initialization value

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

334 optInitValueType = 1;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

335 if ((p = strrchr(optArg, ':')) != NULL)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

336 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

337 *p = 0;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

338 switch (tolower(p[1]))

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

339 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

340 case 'b': optInitValueType = 1; break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

341 case 'w': optInitValueType = 2; break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

342 case 'd': optInitValueType = 4; break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

343 default:

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

344 dmError("Invalid init value type '%c' specified for '%s'.\n",

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

345 p[1], optArg);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

346 return FALSE;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

347 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

348 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

349 if (!dmGetIntVal(optArg, &tmpi))

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

350 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

351 dmError("Invalid initvalue '%s'.\n", optArg);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

352 return FALSE;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

353 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

354 optInitValue = tmpi;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

355 break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

356

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

357 case 11:

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

358 // Set describe mode

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

359 optDescribe = TRUE;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

360 break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

361

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

362 case 12:

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

363 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

364 ssize_t sectStart, sectEnd, sectLen;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

365 char sectMode;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

366

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

367 // Define reserved section

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

368 // Create a copy of the argument

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

369 if ((s = dm_strdup(optArg)) == NULL)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

370 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

371 dmError("Could not allocate temporary string!\n");

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

372 exit(128);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

373 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

374

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

375 // Get start address

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

376 if ((p = strchr(s, '-')) == NULL &&

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

377 (p = strchr(s, ':')) == NULL)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

378 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

379 dmFree(s);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

380 dmError("Section definition '%s' invalid.\n", optArg);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

381 return FALSE;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

382 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

383 sectMode = *p;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

384 *p = 0;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

385

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

386 // Get value

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

387 if (!dmGetIntVal(s, &sectStart))

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

388 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

389 dmError("Section start address '%s' in '%s' invalid.\n", s, optArg);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

390 dmFree(s);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

391 return FALSE;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

392 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

393

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

394 // Get end address or length

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

395 if (!dmGetIntVal(p + 1, &tmpi))

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

396 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

397 dmError("Section %s '%s' in '%s' invalid.\n",

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

398 sectMode == '-' ? "end address" : "length",

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

399 p, optArg);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

400 dmFree(s);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

401 return FALSE;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

402 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

403

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

404 dmFree(s);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

405

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

406 if (sectMode == ':')

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

407 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

408 sectEnd = sectStart + tmpi;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

409 sectLen = tmpi;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

410 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

411 else

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

412 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

413 if (tmpi < sectStart)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

414 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

415 dmError("Section start address > end address in '%s'.\n",

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

416 optArg);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

417 return FALSE;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

418 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

419 sectLen = tmpi - sectStart + 1;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

420 sectEnd = tmpi;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

421 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

422

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

423 // Allocate memory block

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

424 dmMsg(1, "Reserve $%.4x - $%.4x ($%x, %d bytes) as 'Clear'\n",

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

425 sectStart, sectEnd, sectLen, sectLen);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

426

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

427 reserveMemBlock(sectStart, sectEnd, "Clear", MTYPE_RES);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

428 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

429 break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

430

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

431 default:

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

432 dmError("Unknown argument '%s'.\n", currArg);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

433 return FALSE;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

434 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

435

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

436 return TRUE;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

437 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

438

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

439

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

440 int dmLoadPRG(const char *fname, BOOL forceAddr, int destAddr)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

441 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

442 FILE *f;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

443 ssize_t a, b, s;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

444

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

445 // Open the input file

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

446 if ((f = fopen(fname, "rb")) == NULL)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

447 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

448 dmError("Error opening input file '%s' (%s).\n",

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

449 fname, strerror(errno));

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

450 return 1;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

451 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

452

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

453 // Get filesize

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

454 if ((s = dmGetFileSize(f) - 2) < 0)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

455 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

456 dmError("Error getting file size for '%s'.\n", fname);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

457 return 6;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

458 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

459

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

460 // Get loading address

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

461 if ((a = fgetc(f)) < 0)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

462 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

463 dmError("Error reading input file '%s' (%s).\n",

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

464 fname, strerror(errno));

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

465 return 2;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

466 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

467

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

468 if ((b = fgetc(f)) < 0)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

469 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

470 dmError("Error reading input file '%s' (%s).\n",

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

471 fname, strerror(errno));

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

472 return 3;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

473 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

474

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

475 // Show information

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

476 if (forceAddr)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

477 a = destAddr;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

478 else

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

479 a = a + (b * 0x100);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

480

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

481 dmPrint(1, "* Loading '%s', %s at $%.4x-$%.4x",

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

482 fname, forceAddr ? "PRGA" : "PRG", a, (a + s - 1));

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

483

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

484 if (a + s >= memModel->size)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

485 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

486 dmPrint(1, " .. Does not fit into the memory!\n");

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

487 return 5;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

488 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

489

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

490 // Load data

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

491 if (fread(&memory[a], s, 1, f) < 1)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

492 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

493 dmPrint(1, " .. Error: %s.\n",

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

494 strerror(errno));

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

495 return 4;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

496 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

497

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

498 dmPrint(1, " .. OK\n");

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

499

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

500 // Add info to list

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

501 reserveMemBlock(a, (a + s + 1), fname, MTYPE_RES);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

502

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

503 return 0;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

504 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

505

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

506

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

507 int dmLoadRAW(const char *fname, int destAddr)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

508 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

509 FILE *f;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

510 ssize_t s;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

511

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

512 // Open the input file

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

513 if ((f = fopen(fname, "rb")) == NULL)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

514 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

515 dmError("Error opening input file '%s' (%s).\n",

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

516 fname, strerror(errno));

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

517 return 1;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

518 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

519

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

520 // Get filesize

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

521 s = dmGetFileSize(f);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

522 if (s < 0)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

523 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

524 dmError("Error getting file size for '%s'.\n", fname);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

525 return 6;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

526 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

527

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

528 // Show information

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

529 dmPrint(1, "* Loading '%s', RAW at $%.4x-$%.4x",

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

530 fname, destAddr, (destAddr + s - 1));

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

531

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

532 if (destAddr + s >= memModel->size)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

533 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

534 dmPrint(1, " .. Does not fit into the memory!\n");

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

535 return 5;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

536 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

537

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

538 // Load data

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

539 if (fread(&memory[destAddr], s, 1, f) < 1)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

540 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

541 dmPrint(1, " .. Error: %s.\n",

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

542 strerror(errno));

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

543 return 4;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

544 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

545

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

546 dmPrint(1, " .. OK\n");

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

547

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

548 // Add info to list

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

549 reserveMemBlock(destAddr, (destAddr + s + 1), fname, MTYPE_RES);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

550

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

551 return 0;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

552 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

553

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

554

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

555 int outputLinkData(FILE *dfile, const char *blockName, const int blockStart, const int blockEnd)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

556 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

557 char *tmpStr, *s, *t;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

558 int blockSize;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

559

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

560 blockSize = (blockEnd - blockStart + 1);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

561

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

562 // Create label name from filename

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

563 tmpStr = dm_strdup(blockName);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

564 if (tmpStr == NULL)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

565 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

566 dmError("Could not allocate memory for string '%s'!\n",

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

567 blockName);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

568 return -1;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

569 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

570

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

571 if ((t = strrchr(tmpStr, '/')))

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

572 s = (t + 1);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

573 else if ((t = strrchr(tmpStr, '\\')))

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

574 s = (t + 1);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

575 else

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

576 s = tmpStr;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

577

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

578 if ((t = strrchr(s, '.')))

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

579 *t = 0;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

580

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

581 for (t = s; *t; t++)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

582 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

583 if (!isalnum(*t))

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

584 *t = '_';

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

585 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

586

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

587 // Print the label line

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

588 switch (optLinkFileFormat)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

589 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

590 case FMT_PLAIN:

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

591 fprintf(dfile, "%s = $%.4x\n", tmpStr, blockStart);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

592 break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

593

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

594 case FMT_DECIMAL:

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

595 fprintf(dfile, "%s = %d\n", tmpStr, blockStart);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

596 break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

597

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

598 case FMT_GENERIC:

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

599 default:

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

600 fprintf(dfile, "; %s ($%.4x - $%.4x, %d/$%x bytes)\n",

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

601 blockName, blockStart, blockEnd, blockSize, blockSize);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

602 fprintf(dfile, "%s = $%.4x\n", s, blockStart);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

603 break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

604 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

605

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

606 dmFree(tmpStr);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

607 return 0;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

608 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

609

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

610

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

611 /* Print out an ASCII presentation of memory map

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

612 */

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

613 void memPrintLine(FILE *f)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

614 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

615 fprintf(f, " +------------------------------------------+\n");

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

616 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

617

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

618 void memPrintEmpty(FILE *f, ssize_t n)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

619 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

620 ssize_t i;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

621 for (i = 0; i < n; i++)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

622 fprintf(f, " | |\n");

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

623 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

624

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

625 void dmDescribeMemory(FILE *f)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

626 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

627 int i;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

628 DMMemBlock *prev = NULL;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

629

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

630 memPrintLine(f);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

631

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

632 for (i = 0; i < nmemBlocks; i++)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

633 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

634 DMMemBlock *curr = &memBlocks[i];

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

635 char desc[512], *s;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

636 ssize_t siz, kz;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

637

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

638 // Check for empty, unreserved areas

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

639 if (prev != NULL && prev->start - 1 > curr->end + 1)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

640 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

641 siz = (prev->start - 1) - (curr->end + 1);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

642 kz = siz / (1024 * 2);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

643

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

644 if (kz > 1) memPrintEmpty(f, kz);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

645

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

646 snprintf(desc, sizeof(desc), "EMPTY (%d)", siz);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

647 fprintf(f, "$%.4x - $%.4x | %-40s |\n", curr->end + 1, prev->start - 1, desc);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

648

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

649 if (kz > 1) memPrintEmpty(f, kz);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

650 memPrintLine(f);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

651 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

652 prev = curr;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

653

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

654 // Print current block

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

655 switch (curr->type)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

656 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

657 case MTYPE_NONE: s = "N/A (NC)"; break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

658 case MTYPE_ROM: s = "ROM"; break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

659 case MTYPE_ROM_WT: s = "ROM/WT"; break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

660 case MTYPE_IO: s = "I/O"; break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

661 case MTYPE_RES: s = "RSVD"; break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

662 default: s = "????"; break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

663 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

664

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

665 siz = curr->end - curr->start + 1;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

666 kz = siz / (1024 * 2);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

667

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

668 if (kz > 1) memPrintEmpty(f, kz);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

669 snprintf(desc, sizeof(desc), "%s (%s, %d)", curr->name, s, siz);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

670 fprintf(f, "$%.4x - $%.4x | %-40s |\n", curr->start, curr->end, desc);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

671 if (kz > 1) memPrintEmpty(f, kz);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

672 memPrintLine(f);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

673

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

674 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

675

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

676 fprintf(f,

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

677 "\n"

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

678 "NC = Not Connected\n"

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

679 "RSVD = Reserved\n"

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

680 "ROM/WT = RAM under 'write-through' ROM\n"

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

681 "\n"

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

682 );

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

683 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

684

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

685

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

686 /*

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

687 * The main program

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

688 */

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

689 int main(int argc, char *argv[])

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

690 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

691 FILE *dfile = NULL;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

692 BOOL hasOverlaps;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

693 int i, j;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

694 ssize_t startAddr, endAddr, dataSize, totalSize;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

695

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

696 dmInitProg("objlink", "Simple file-linker", "0.80", NULL, NULL);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

697 dmVerbosity = 1;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

698

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

699 // Parse arguments

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

700 if (!dmArgsProcess(argc, argv, optList, optListN,

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

701 argHandleOpt, NULL, TRUE))

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

702 exit(1);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

703

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

704 if (nsrcFiles < 1)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

705 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

706 dmError("Nothing to do. (try --help)\n");

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

707 exit(0);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

708 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

709

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

710 // Allocate memory

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

711 memModel = &memoryModels[optMemModel];

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

712 dmMsg(1, "Using memory model #%d '%s', %d bytes.\n",

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

713 optMemModel, memModel->name, memModel->size);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

714

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

715 memory = (Uint8 *) dmMalloc(memModel->size + 32);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

716 if (memory == NULL)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

717 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

718 dmError("Could not allocate memory.\n");

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

719 exit(2);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

720 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

721

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

722 // Initialize memory

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

723 dmMsg(1, "Initializing memory with ");

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

724

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

725 if (optInitValueType == 1 || optInitValue <= 0xff)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

726 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

727 dmPrint(1, "BYTE 0x%.2x\n", optInitValue);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

728 memset(memory, optInitValue, memModel->size);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

729 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

730 else

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

731 if (optInitValueType == 2 || optInitValue <= 0xffff)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

732 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

733 uint16_t *mp = (uint16_t *) memory;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

734 dmPrint(1, "WORD 0x%.4x\n", optInitValue);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

735 for (i = memModel->size / sizeof(*mp); i; i--)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

736 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

737 *mp++ = optInitValue;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

738 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

739 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

740 else

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

741 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

742 Uint32 *mp = (Uint32 *) memory;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

743 dmPrint(1, "DWORD 0x%.8x\n", optInitValue);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

744 for (i = memModel->size / sizeof(*mp); i; i--)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

745 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

746 *mp++ = optInitValue;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

747 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

748 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

749

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

750 // Load the datafiles

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

751 for (i = 0; i < nsrcFiles; i++)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

752 switch (srcFiles[i].type)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

753 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

754 case STYPE_RAW:

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

755 dmLoadRAW(srcFiles[i].filename, srcFiles[i].addr);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

756 break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

757

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

758 case STYPE_PRG:

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

759 dmLoadPRG(srcFiles[i].filename, FALSE, 0);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

760 break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

761

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

762 case STYPE_PRGA:

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

763 dmLoadPRG(srcFiles[i].filename, TRUE, srcFiles[i].addr);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

764 break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

765 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

766

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

767 // Add memory model blocks

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

768 dmMsg(1, "Applying memory model restrictions...\n");

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

769 for (i = 0; i < memModel->nmemBlocks; i++)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

770 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

771 reserveMemBlock(

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

772 memModel->memBlocks[i].start,

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

773 memModel->memBlocks[i].end,

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

774 memModel->memBlocks[i].name,

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

775 memModel->memBlocks[i].type);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

776 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

777

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

778 // Sort the blocks

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

779 qsort(memBlocks, nmemBlocks, sizeof(DMMemBlock), compareMemBlock);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

780

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

781 // Check for overlapping conflicts

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

782 hasOverlaps = FALSE;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

783 for (i = 0; i < nmemBlocks; i++)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

784 for (j = 0; j < nmemBlocks; j++)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

785 if (j != i && memBlocks[i].type == MTYPE_RES)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

786 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

787 DMMemBlock *mbi = &memBlocks[i],

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

788 *mbj = &memBlocks[j];

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

789

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

790 // Check for per-file conflicts

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

791 if ((mbj->start >= mbi->start && mbj->start <= mbi->end) ||

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

792 (mbj->end >= mbi->start && mbj->end <= mbi->end))

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

793 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

794 dmPrint(1, "* '%s' and '%s' overlap ($%.4x-$%.4x vs $%.4x-$%.4x)\n",

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

795 mbi->name, mbj->name, mbi->start,

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

796 mbi->end, mbj->start, mbj->end);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

797 hasOverlaps = TRUE;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

798 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

799 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

800

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

801 if (!optAllowOverlap && hasOverlaps)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

802 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

803 dmError("Error occured, overlaps not allowed.\n");

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

804 exit(5);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

805 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

806

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

807 // Find out start and end-addresses

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

808 startAddr = memModel->size;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

809 totalSize = endAddr = 0;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

810 for (i = 0; i < nmemBlocks; i++)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

811 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

812 DMMemBlock *mbi = &memBlocks[i];

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

813 if (mbi->type == MTYPE_RES)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

814 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

815 if (mbi->start < startAddr)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

816 startAddr = mbi->start;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

817

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

818 if (mbi->end > endAddr)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

819 endAddr = mbi->end;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

820

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

821 totalSize += (mbi->end - mbi->start + 1);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

822 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

823 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

824

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

825 if (startAddr >= memModel->size || endAddr < startAddr)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

826 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

827 dmError("Invalid saveblock addresses (start=$%.4x, end=$%.4x)!\n", startAddr, endAddr);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

828 exit(8);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

829 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

830

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

831 // Output linkfile

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

832 if (optLinkFileName)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

833 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

834 dmMsg(1, "Writing linkfile to '%s'\n", optLinkFileName);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

835 if ((dfile = fopen(optLinkFileName, "wb")) == NULL)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

836 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

837 dmError("Error creating file '%s' (%s).\n", optLinkFileName, strerror(errno));

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

838 exit(1);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

839 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

840

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

841 switch (optLinkFileFormat)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

842 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

843 case FMT_GENERIC:

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

844 default:

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

845 fprintf(dfile, "; Definitions generated by %s v%s\n",

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

846 dmProgName, dmProgVersion);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

847 break;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

848 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

849

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

850 for (i = 0; i < nmemBlocks; i++)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

851 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

852 DMMemBlock *mbi = &memBlocks[i];

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

853 outputLinkData(dfile, mbi->name, mbi->start, mbi->end);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

854 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

855

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

856 fclose(dfile);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

857 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

858

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

859 // Show some information

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

860 dataSize = endAddr - startAddr + 1;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

861 dmMsg(1, "Total of %d/$%x bytes unused(?) areas.\n",

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

862 dataSize - totalSize, dataSize - totalSize);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

863

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

864 dmMsg(1, "Writing $%.4x - $%.4x (%d/$%x bytes) ",

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

865 startAddr, endAddr, dataSize, dataSize);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

866

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

867

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

868 // Open the destination file

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

869 if (optDestName == NULL)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

870 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

871 dfile = stdout;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

872 dmPrint(1, "...\n");

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

873 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

874 else if ((dfile = fopen(optDestName, "wb")) == NULL)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

875 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

876 dmError("Error creating output file '%s' (%s).\n", optDestName, strerror(errno));

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

877 exit(1);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

878 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

879 else

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

880 dmPrint(1, "to '%s'\n", optDestName);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

881

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

882 // Save loading address

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

883 dm_fwrite_le16(dfile, startAddr);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

884

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

885 // Save the data

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

886 if (fwrite(&memory[startAddr], dataSize, 1, dfile) < 1)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

887 {

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

888 dmError("Error writing to file (%s)\n", strerror(errno));

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

889 }

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

890

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

891 fclose(dfile);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

892

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

893 // Describe

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

894 if (optDescribe)

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

895 dmDescribeMemory(stdout);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

896

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

897 exit(0);

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

898 return 0;

59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework.

Matti Hamalainen <ccr@tnsp.org>

parents:

diff changeset

899 }

Mercurial > hg > dmlib

annotate objlink.c @ 407:59244a7ae37f