dmlib: tools/objlink.c annotate

annotate tools/objlink.c @ 2411:829e3080e0ad

Cosmetic cleanups.

author	Matti Hamalainen <ccr@tnsp.org>
date	Mon, 13 Jan 2020 23:12:21 +0200
parents	bc05bcfc4598
children	203b0fbb05d3

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
2411 829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	4 * (C) Copyright 2002-2020 Tecnic Software productions (TNSP)
407 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 */
1432 a9516570cc26 Improve build, so that we can build the tools and tests with minimal Matti Hamalainen <ccr@tnsp.org> parents: 1431 diff changeset	8 #include "dmtool.h"
407 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
2411 829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	13
1681 bd68c9adc7ca Rename some constants. Matti Hamalainen <ccr@tnsp.org> parents: 1679 diff changeset	14 #define SET_MAX_FILENAMES (128)
bd68c9adc7ca Rename some constants. Matti Hamalainen <ccr@tnsp.org> parents: 1679 diff changeset	15 #define SET_MAX_MEMBLOCKS (128)
407 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 {
864 b111cccf45fc Portability fixes. Matti Hamalainen <ccr@tnsp.org> parents: 860 diff changeset	22 int start, end; // Start and end address
407 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 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	26 } DMMemBlock;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	27
2411 829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	28
407 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;
864 b111cccf45fc Portability fixes. Matti Hamalainen <ccr@tnsp.org> parents: 860 diff changeset	33 int size; // Total addressable memory size
b111cccf45fc Portability fixes. Matti Hamalainen <ccr@tnsp.org> parents: 860 diff changeset	34 int nmemBlocks; // Defined memory areas
1681 bd68c9adc7ca Rename some constants. Matti Hamalainen <ccr@tnsp.org> parents: 1679 diff changeset	35 DMMemBlock memBlocks[SET_MAX_MEMBLOCKS];
407 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
2411 829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	38
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	39 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	40 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	41 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	42 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	43 int placement;
864 b111cccf45fc Portability fixes. Matti Hamalainen <ccr@tnsp.org> parents: 860 diff changeset	44 int addr;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	45 } DMSourceFile;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	46
2411 829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	47
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	48 // 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	49 enum
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	50 {
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_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	52 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	53 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	54 };
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	55
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	56 // 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	57 enum
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	58 {
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_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	60 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	61 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	62 };
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 enum
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	65 {
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_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	67 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	68 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	69 };
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 enum
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	72 {
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_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	74 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	75 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	76 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	77 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	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
501 d13d8770477a Add new -L option for forcing loading address on the destination file, or Matti Hamalainen <ccr@tnsp.org> parents: 500 diff changeset	80 enum
d13d8770477a Add new -L option for forcing loading address on the destination file, or Matti Hamalainen <ccr@tnsp.org> parents: 500 diff changeset	81 {
d13d8770477a Add new -L option for forcing loading address on the destination file, or Matti Hamalainen <ccr@tnsp.org> parents: 500 diff changeset	82 LA_NONE = -2,
d13d8770477a Add new -L option for forcing loading address on the destination file, or Matti Hamalainen <ccr@tnsp.org> parents: 500 diff changeset	83 LA_AUTO = -1
d13d8770477a Add new -L option for forcing loading address on the destination file, or Matti Hamalainen <ccr@tnsp.org> parents: 500 diff changeset	84 };
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	85
2411 829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	86
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	87 /* 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	88 */
2411 829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	89 const DMMemModel memoryModels[] =
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	90 {
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	91 { "C64 unrestricted", "$01 = $34",
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	92 64 * 1024,
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	93 0,
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	94 {
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	95 { 0x0000, 0x0000, 0 , NULL , 0 }
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	96 }
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	97 },
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	98
2411 829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	99 { "C64 normal (IO+Basic+Kernal)", "$01 = $37",
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	100 64 * 1024,
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	101 3,
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	102 {
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	103 { 0xA000, 0xBFFF, MTYPE_ROM_WT , "Basic ROM" , PLACE_STATIC },
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	104 { 0xD000, 0xDFFF, MTYPE_IO , "I/O" , PLACE_STATIC },
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	105 { 0xE000, 0xFFFF, MTYPE_ROM_WT , "Kernal ROM" , PLACE_STATIC },
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	106 }
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	107 },
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	108
2411 829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	109 { "C64 modified (IO+Kernal)", "$01 = $36",
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	110 64 * 1024,
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	111 2,
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	112 {
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	113 { 0xD000, 0xDFFF, MTYPE_IO , "I/O" , PLACE_STATIC },
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	114 { 0xE000, 0xFFFF, MTYPE_ROM_WT , "Kernal ROM" , PLACE_STATIC },
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	115 }
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	116 },
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	117
2411 829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	118 { "C64 modified (IO only)", "$01 = $35",
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	119 64 * 1024,
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	120 1,
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	121 {
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	122 { 0xD000, 0xDFFF, MTYPE_IO , "I/O" , PLACE_STATIC },
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	123 }
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	124 },
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	125
2411 829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	126 { "C64 modified (Char+Kernal+Basic)", "$01 = $33",
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	127 64 * 1024,
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	128 3,
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	129 {
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	130 { 0xA000, 0xBFFF, MTYPE_ROM_WT , "Basic ROM" , PLACE_STATIC },
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	131 { 0xD000, 0xDFFF, MTYPE_ROM , "Char ROM" , PLACE_STATIC },
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	132 { 0xE000, 0xFFFF, MTYPE_ROM_WT , "Kernal ROM" , PLACE_STATIC },
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	133 }
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	134 },
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	135 };
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	136
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	137 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	138
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 /* 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	141 */
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	142 int nsrcFiles = 0; // Number of source files
1681 bd68c9adc7ca Rename some constants. Matti Hamalainen <ccr@tnsp.org> parents: 1679 diff changeset	143 DMSourceFile srcFiles[SET_MAX_FILENAMES]; // Source file names
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	144
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	145 int nmemBlocks = 0;
1681 bd68c9adc7ca Rename some constants. Matti Hamalainen <ccr@tnsp.org> parents: 1679 diff changeset	146 DMMemBlock memBlocks[SET_MAX_FILENAMES];
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	147
2411 829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	148 char *optDestName = NULL;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	149 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	150 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	151 BOOL optDescribe = FALSE,
2411 829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	152 optAllowOverlap = FALSE,
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	153 optCropOutput = FALSE;
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	154 unsigned int optCropStart, optCropEnd;
829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	155 unsigned int optInitValue = 0;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	156 int optInitValueType = 1;
2411 829e3080e0ad Cosmetic cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 2410 diff changeset	157 int optLoadAddress = LA_AUTO;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	158 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	159 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	160 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	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
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	163 /* Arguments
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	164 */
860 daebbf28953d The argument handling API in dmargs* was synced with th-libs. Matti Hamalainen <ccr@tnsp.org> parents: 830 diff changeset	165 static const DMOptArg optList[] =
daebbf28953d The argument handling API in dmargs* was synced with th-libs. Matti Hamalainen <ccr@tnsp.org> parents: 830 diff changeset	166 {
2410 bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	167 { 0, '?', "help" , "Show this help", OPT_NONE },
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	168 { 1, 0, "license" , "Print out this program's license agreement", OPT_NONE },
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	169 { 2, 'v', "verbose" , "Be more verbose", OPT_NONE },
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	170
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	171 { 10, 'r', "input-raw" , "RAW input: -r <file>:<addr>", OPT_ARGREQ },
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	172 { 12, 'p', "input-prg" , "PRG input: -p <file>[:<addr>]", OPT_ARGREQ },
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	173 { 14, 's', "section" , "Reserved section: -s <start>-<end>[,name] or <start>:<len>[,name]", OPT_ARGREQ },
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	174 { 16, 'o', "output" , "Specify output file, -o <file>", OPT_ARGREQ },
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	175 { 18, 'O', "overlap" , "Allow overlapping memory areas", OPT_NONE },
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	176 { 20, 'm', "model" , "Set memory model", OPT_ARGREQ },
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	177 { 22, 'l', "link-file" , "Output addresses and labels into file", OPT_ARGREQ },
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	178 { 24, 'f', "format" , "Format of link-file: (g)eneric, (p)lain, (d)ecimal", OPT_ARGREQ },
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	179 { 26, 'i', "init-value" , "Initialize memory with: -i <byte/word/dword>:[bwd]", OPT_ARGREQ },
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	180 { 28, 'd', "describe" , "Output ASCII memory map description", OPT_NONE },
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	181 { 30, 'c', "crop" , "Crop output file to: -c <start>-<end> or <start>:<len>", OPT_ARGREQ },
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	182 { 32, 'L', "load-address" , "Set output file load address (or 'none' for 'raw' output)", OPT_ARGREQ },
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	183 };
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 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	186
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	187
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	188 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	189 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	190 dmPrintBanner(stdout, dmProgName, "[options]");
2402 b7cd5dd0b82e Merge one more change from th-libs args processing. Matti Hamalainen <ccr@tnsp.org> parents: 2384 diff changeset	191 dmArgsPrintHelp(stdout, optList, optListN, 0, 80 - 2);
407 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 printf(
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	194 "\n"
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	195 "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	196 "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	197 "\n"
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	198 "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	199
1678 bddedc2e0ebb Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 1677 diff changeset	200 for (int i = 0; i < nmemoryModels; i++)
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	201 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	202 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	203 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	204 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	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 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	207
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	208
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	209 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	210 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	211 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	212 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	213 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	214 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	215 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	216 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	217
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 /* 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	220 */
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	221 BOOL dmReserveMemBlock(int startAddr, int endAddr, const char *blockName, int blockType)
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	222 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	223 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	224 {
958 985225a93aeb Add error code parameter to dmError() and dmErrorVA(). Matti Hamalainen <ccr@tnsp.org> parents: 871 diff changeset	225 dmErrorMsg("ERROR! Block '%s' has startAddr=$%.4x > endAddr=$%.4x!\n",
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	226 blockName, startAddr, endAddr);
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	227 return FALSE;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	228 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	229
1681 bd68c9adc7ca Rename some constants. Matti Hamalainen <ccr@tnsp.org> parents: 1679 diff changeset	230 if (nmemBlocks < SET_MAX_FILENAMES)
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	231 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	232 memBlocks[nmemBlocks].start = startAddr;
497 b02f1bfce53b Improve and clean up section parsing support. Matti Hamalainen <ccr@tnsp.org> parents: 486 diff changeset	233 memBlocks[nmemBlocks].end = endAddr;
b02f1bfce53b Improve and clean up section parsing support. Matti Hamalainen <ccr@tnsp.org> parents: 486 diff changeset	234 memBlocks[nmemBlocks].name = dm_strdup(blockName);
b02f1bfce53b Improve and clean up section parsing support. Matti Hamalainen <ccr@tnsp.org> parents: 486 diff changeset	235 memBlocks[nmemBlocks].type = blockType;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	236 nmemBlocks++;
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	237 return TRUE;
407 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 else
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	240 {
958 985225a93aeb Add error code parameter to dmError() and dmErrorVA(). Matti Hamalainen <ccr@tnsp.org> parents: 871 diff changeset	241 dmErrorMsg("Maximum number of memBlock definitions (%d) exceeded!\n",
1681 bd68c9adc7ca Rename some constants. Matti Hamalainen <ccr@tnsp.org> parents: 1679 diff changeset	242 SET_MAX_FILENAMES);
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	243 return FALSE;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	244 }
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
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	247
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	248 int dmCompareMemBlock(const void cva, const void cvb)
407 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 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	251 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	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
484 81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	254
871 fc272f5f2d15 Make value type of dmGetIntVal() unsigned. Matti Hamalainen <ccr@tnsp.org> parents: 864 diff changeset	255 BOOL dmParseSection(const char arg, unsigned int sectStart, unsigned int sectEnd, char *sectName, BOOL canHasName)
484 81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	256 {
497 b02f1bfce53b Improve and clean up section parsing support. Matti Hamalainen <ccr@tnsp.org> parents: 486 diff changeset	257 char sectMode, sep, str, *namesep;
871 fc272f5f2d15 Make value type of dmGetIntVal() unsigned. Matti Hamalainen <ccr@tnsp.org> parents: 864 diff changeset	258 unsigned int tmpi;
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	259 BOOL res = FALSE;
484 81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	260
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	261 // Define reserved section
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	262 // Create a copy of the argument
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	263 if ((str = dm_strdup(arg)) == NULL)
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	264 {
958 985225a93aeb Add error code parameter to dmError() and dmErrorVA(). Matti Hamalainen <ccr@tnsp.org> parents: 871 diff changeset	265 dmErrorMsg("Could not allocate temporary string!\n");
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	266 goto out;
484 81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	267 }
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	268
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	269 // Get start address
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	270 if ((sep = strchr(str, '-')) == NULL &&
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	271 (sep = strchr(str, ':')) == NULL)
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	272 {
958 985225a93aeb Add error code parameter to dmError() and dmErrorVA(). Matti Hamalainen <ccr@tnsp.org> parents: 871 diff changeset	273 dmErrorMsg("Section definition '%s' invalid.\n", arg);
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	274 goto out;
484 81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	275 }
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	276 sectMode = *sep;
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	277 *sep = 0;
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	278
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	279 // Get value
2004 161e731eb152 Improve dmGetIntVal() to accept an optional negative value boolean flag Matti Hamalainen <ccr@tnsp.org> parents: 1681 diff changeset	280 if (!dmGetIntVal(str, sectStart, NULL))
484 81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	281 {
958 985225a93aeb Add error code parameter to dmError() and dmErrorVA(). Matti Hamalainen <ccr@tnsp.org> parents: 871 diff changeset	282 dmErrorMsg("Section start address '%s' in '%s' invalid.\n", str, arg);
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	283 goto out;
484 81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	284 }
1238 e8c99da451cd Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 1167 diff changeset	285
497 b02f1bfce53b Improve and clean up section parsing support. Matti Hamalainen <ccr@tnsp.org> parents: 486 diff changeset	286 // Check for name
b02f1bfce53b Improve and clean up section parsing support. Matti Hamalainen <ccr@tnsp.org> parents: 486 diff changeset	287 namesep = strchr(sep + 1, ',');
b02f1bfce53b Improve and clean up section parsing support. Matti Hamalainen <ccr@tnsp.org> parents: 486 diff changeset	288 if (canHasName && namesep != NULL)
b02f1bfce53b Improve and clean up section parsing support. Matti Hamalainen <ccr@tnsp.org> parents: 486 diff changeset	289 {
b02f1bfce53b Improve and clean up section parsing support. Matti Hamalainen <ccr@tnsp.org> parents: 486 diff changeset	290 *namesep = 0;
b02f1bfce53b Improve and clean up section parsing support. Matti Hamalainen <ccr@tnsp.org> parents: 486 diff changeset	291 namesep++;
b02f1bfce53b Improve and clean up section parsing support. Matti Hamalainen <ccr@tnsp.org> parents: 486 diff changeset	292 if (*namesep == 0)
b02f1bfce53b Improve and clean up section parsing support. Matti Hamalainen <ccr@tnsp.org> parents: 486 diff changeset	293 {
958 985225a93aeb Add error code parameter to dmError() and dmErrorVA(). Matti Hamalainen <ccr@tnsp.org> parents: 871 diff changeset	294 dmErrorMsg("Section definition '%s' name is empty. Either specify name or leave it out.\n",
497 b02f1bfce53b Improve and clean up section parsing support. Matti Hamalainen <ccr@tnsp.org> parents: 486 diff changeset	295 arg);
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	296 goto out;
497 b02f1bfce53b Improve and clean up section parsing support. Matti Hamalainen <ccr@tnsp.org> parents: 486 diff changeset	297 }
b02f1bfce53b Improve and clean up section parsing support. Matti Hamalainen <ccr@tnsp.org> parents: 486 diff changeset	298 *sectName = dm_strdup(namesep);
b02f1bfce53b Improve and clean up section parsing support. Matti Hamalainen <ccr@tnsp.org> parents: 486 diff changeset	299 }
b02f1bfce53b Improve and clean up section parsing support. Matti Hamalainen <ccr@tnsp.org> parents: 486 diff changeset	300 else
b02f1bfce53b Improve and clean up section parsing support. Matti Hamalainen <ccr@tnsp.org> parents: 486 diff changeset	301 if (namesep != NULL)
b02f1bfce53b Improve and clean up section parsing support. Matti Hamalainen <ccr@tnsp.org> parents: 486 diff changeset	302 {
958 985225a93aeb Add error code parameter to dmError() and dmErrorVA(). Matti Hamalainen <ccr@tnsp.org> parents: 871 diff changeset	303 dmErrorMsg("Section definition does not allow a name, syntax error in '%s' at '%s'.\n",
497 b02f1bfce53b Improve and clean up section parsing support. Matti Hamalainen <ccr@tnsp.org> parents: 486 diff changeset	304 arg, namesep);
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	305 goto out;
497 b02f1bfce53b Improve and clean up section parsing support. Matti Hamalainen <ccr@tnsp.org> parents: 486 diff changeset	306 }
484 81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	307
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	308 // Get end address or length
2004 161e731eb152 Improve dmGetIntVal() to accept an optional negative value boolean flag Matti Hamalainen <ccr@tnsp.org> parents: 1681 diff changeset	309 if (!dmGetIntVal(sep + 1, &tmpi, NULL))
484 81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	310 {
958 985225a93aeb Add error code parameter to dmError() and dmErrorVA(). Matti Hamalainen <ccr@tnsp.org> parents: 871 diff changeset	311 dmErrorMsg("Section %s '%s' in '%s' invalid.\n",
484 81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	312 sectMode == '-' ? "end address" : "length",
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	313 sep + 1, arg);
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	314 goto out;
484 81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	315 }
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	316
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	317 if (sectMode == ':')
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	318 {
497 b02f1bfce53b Improve and clean up section parsing support. Matti Hamalainen <ccr@tnsp.org> parents: 486 diff changeset	319 sectEnd = sectStart + tmpi - 1;
484 81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	320 }
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	321 else
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	322 {
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	323 if (tmpi < *sectStart)
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	324 {
958 985225a93aeb Add error code parameter to dmError() and dmErrorVA(). Matti Hamalainen <ccr@tnsp.org> parents: 871 diff changeset	325 dmErrorMsg("Section start address > end address in '%s'.\n",
484 81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	326 arg);
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	327 goto out;
484 81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	328 }
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	329 *sectEnd = tmpi;
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	330 }
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	331
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	332 res = TRUE;
484 81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	333
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	334 out:
484 81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	335 dmFree(str);
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	336 return res;
484 81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	337 }
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	338
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	339
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	340 BOOL dmParseInputFile(char arg, const int type1, const int type2, const char desc, BOOL requireAddr)
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	341 {
871 fc272f5f2d15 Make value type of dmGetIntVal() unsigned. Matti Hamalainen <ccr@tnsp.org> parents: 864 diff changeset	342 unsigned int tmpi = 0;
484 81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	343 BOOL hasAddr = FALSE;
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	344 char *sep;
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	345
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	346 if ((sep = strrchr(arg, ':')) != NULL)
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	347 {
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	348 *sep = 0;
2004 161e731eb152 Improve dmGetIntVal() to accept an optional negative value boolean flag Matti Hamalainen <ccr@tnsp.org> parents: 1681 diff changeset	349 if (!dmGetIntVal(sep + 1, &tmpi, NULL))
484 81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	350 {
958 985225a93aeb Add error code parameter to dmError() and dmErrorVA(). Matti Hamalainen <ccr@tnsp.org> parents: 871 diff changeset	351 dmErrorMsg("Invalid %s address '%s' specified for '%s'.\n",
484 81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	352 desc, sep + 1, arg);
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	353 return FALSE;
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	354 }
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	355 hasAddr = TRUE;
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	356 }
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	357 else
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	358 if (requireAddr)
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	359 {
958 985225a93aeb Add error code parameter to dmError() and dmErrorVA(). Matti Hamalainen <ccr@tnsp.org> parents: 871 diff changeset	360 dmErrorMsg("No %s loading address specified for '%s'.\n", desc, arg);
484 81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	361 return FALSE;
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	362 }
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	363
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	364 srcFiles[nsrcFiles].filename = arg;
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	365 srcFiles[nsrcFiles].type = hasAddr ? type1 : type2;
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	366 srcFiles[nsrcFiles].addr = tmpi;
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	367 nsrcFiles++;
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	368 return TRUE;
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	369 }
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	370
81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	371
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	372 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	373 {
484 81b92a0e754b Clean up and modularize parsing of some options (specifying sections). Matti Hamalainen <ccr@tnsp.org> parents: 407 diff changeset	374 char *p;
871 fc272f5f2d15 Make value type of dmGetIntVal() unsigned. Matti Hamalainen <ccr@tnsp.org> parents: 864 diff changeset	375 unsigned int tmpi;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	376
2410 bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	377 switch (optN)
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	378 {
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	379 case 0:
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	380 argShowHelp();
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	381 exit(0);
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	382 break;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	383
2410 bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	384 case 1:
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	385 dmPrintLicense(stdout);
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	386 exit(0);
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	387 break;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	388
2410 bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	389 case 2:
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	390 dmVerbosity++;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	391 break;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	392
2410 bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	393 case 10:
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	394 // Add RAW
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	395 if (!dmParseInputFile(optArg, STYPE_RAW, STYPE_RAW, "RAW", TRUE))
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	396 return FALSE;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	397 break;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	398
2410 bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	399 case 12:
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	400 // Add PRG
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	401 if (!dmParseInputFile(optArg, STYPE_PRGA, STYPE_PRG, "PRG", FALSE))
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	402 return FALSE;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	403 break;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	404
2410 bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	405 case 14:
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	406 {
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	407 char *sectName = "Clear";
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	408 unsigned int sectStart, sectEnd, sectLen;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	409 if (!dmParseSection(optArg, &sectStart, &sectEnd, &sectName, TRUE))
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	410 return FALSE;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	411
2410 bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	412 // Allocate memory block
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	413 sectLen = sectEnd - sectStart + 1;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	414 dmMsg(1, "Reserve $%.4x - $%.4x ($%x, %d bytes) as '%s'\n",
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	415 sectStart, sectEnd, sectLen, sectLen, sectName);
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	416
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	417 if (!dmReserveMemBlock(sectStart, sectEnd, sectName, MTYPE_RES))
1238 e8c99da451cd Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 1167 diff changeset	418 return FALSE;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	419 }
2410 bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	420 break;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	421
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	422 case 16:
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	423 // Set output file name
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	424 optDestName = optArg;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	425 break;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	426
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	427 case 18:
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	428 // Allow overlapping segments
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	429 optAllowOverlap = TRUE;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	430 break;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	431
2410 bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	432 case 20:
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	433 // Set memory model
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	434 optMemModel = atoi(optArg);
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	435 if (optMemModel < 0 \|\| optMemModel >= nmemoryModels)
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	436 {
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	437 dmErrorMsg("Invalid memory model number %i!\n", optMemModel);
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	438 return FALSE;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	439 }
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	440 break;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	441
2410 bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	442 case 22:
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	443 // Linker file
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	444 optLinkFileName = optArg;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	445 break;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	446
2410 bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	447 case 24:
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	448 // Linker file format
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	449 switch (tolower(optArg[0]))
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	450 {
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	451 case 'g':
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	452 optLinkFileFormat = FMT_GENERIC;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	453 break;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	454 case 'p':
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	455 optLinkFileFormat = FMT_PLAIN;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	456 break;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	457 case 'd':
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	458 optLinkFileFormat = FMT_DECIMAL;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	459 break;
485 c1d5cccbf5b3 Implement output data cropping option -c, with which the memory area to be Matti Hamalainen <ccr@tnsp.org> parents: 484 diff changeset	460
2410 bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	461 default:
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	462 dmErrorMsg("Invalid/unknown linker file format '%s'!\n",
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	463 optArg);
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	464 return FALSE;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	465 }
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	466 break;
485 c1d5cccbf5b3 Implement output data cropping option -c, with which the memory area to be Matti Hamalainen <ccr@tnsp.org> parents: 484 diff changeset	467
2410 bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	468 case 26:
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	469 // Initialization value
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	470 optInitValueType = 1;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	471 if ((p = strrchr(optArg, ':')) != NULL)
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	472 {
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	473 *p = 0;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	474 switch (tolower(p[1]))
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	475 {
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	476 case 'b': optInitValueType = 1; break;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	477 case 'w': optInitValueType = 2; break;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	478 case 'd': optInitValueType = 4; break;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	479 default:
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	480 dmErrorMsg("Invalid init value type '%c' specified for '%s'.\n",
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	481 p[1], optArg);
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	482 return FALSE;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	483 }
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	484 }
2004 161e731eb152 Improve dmGetIntVal() to accept an optional negative value boolean flag Matti Hamalainen <ccr@tnsp.org> parents: 1681 diff changeset	485 if (!dmGetIntVal(optArg, &tmpi, NULL))
504 b0ee847a14d3 Oops, actually fix the load address setting functionality to work. And make Matti Hamalainen <ccr@tnsp.org> parents: 501 diff changeset	486 {
2410 bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	487 dmErrorMsg("Invalid initvalue '%s'.\n", optArg);
504 b0ee847a14d3 Oops, actually fix the load address setting functionality to work. And make Matti Hamalainen <ccr@tnsp.org> parents: 501 diff changeset	488 return FALSE;
b0ee847a14d3 Oops, actually fix the load address setting functionality to work. And make Matti Hamalainen <ccr@tnsp.org> parents: 501 diff changeset	489 }
2410 bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	490 optInitValue = tmpi;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	491 break;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	492
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	493 case 28:
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	494 // Set describe mode
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	495 optDescribe = TRUE;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	496 break;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	497
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	498 case 30:
501 d13d8770477a Add new -L option for forcing loading address on the destination file, or Matti Hamalainen <ccr@tnsp.org> parents: 500 diff changeset	499 {
2410 bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	500 size_t cropLen;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	501 if (!dmParseSection(optArg, &optCropStart, &optCropEnd, NULL, FALSE))
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	502 return FALSE;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	503
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	504 cropLen = optCropEnd - optCropStart + 1;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	505 dmMsg(1, "Cutting output to $%.4x - $%.4x "
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	506 "($%" DM_PRIx_SIZE_T ", %" DM_PRIu_SIZE_T " bytes)\n",
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	507 optCropStart, optCropEnd,
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	508 cropLen, cropLen);
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	509
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	510 optCropOutput = TRUE;
501 d13d8770477a Add new -L option for forcing loading address on the destination file, or Matti Hamalainen <ccr@tnsp.org> parents: 500 diff changeset	511 }
2410 bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	512 break;
501 d13d8770477a Add new -L option for forcing loading address on the destination file, or Matti Hamalainen <ccr@tnsp.org> parents: 500 diff changeset	513
2410 bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	514 case 32:
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	515 // Set loading address
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	516 if (strcasecmp(optArg, "none") == 0)
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	517 {
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	518 optLoadAddress = LA_NONE;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	519 }
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	520 else
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	521 {
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	522 if (!dmGetIntVal(optArg, &tmpi, NULL))
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	523 {
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	524 dmErrorMsg("Invalid loading address '%s'.\n", optArg);
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	525 return FALSE;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	526 }
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	527 if (tmpi >= 64*1024)
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	528 {
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	529 dmErrorMsg("Invalid or insane loading address %d/$%x!\n",
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	530 tmpi, tmpi);
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	531 return FALSE;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	532 }
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	533 optLoadAddress = tmpi;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	534 }
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	535 break;
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	536
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	537 default:
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	538 dmErrorMsg("Unimplemented option argument '%s'.\n", currArg);
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	539 return FALSE;
407 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
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	542 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	543 }
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
1676 e0d618663574 Constify. Matti Hamalainen <ccr@tnsp.org> parents: 1675 diff changeset	546 int dmLoadPRG(const char *filename, const BOOL forceAddr, const int destAddr)
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	547 {
1674 0f256e7340a3 Rename varibles. Matti Hamalainen <ccr@tnsp.org> parents: 1673 diff changeset	548 FILE *fh;
1675 bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	549 int dataSize, loadAddr, endAddr, res = DMERR_OK;
486 cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	550 Uint16 tmpAddr;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	551
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	552 // Open the input file
1674 0f256e7340a3 Rename varibles. Matti Hamalainen <ccr@tnsp.org> parents: 1673 diff changeset	553 if ((fh = fopen(filename, "rb")) == NULL)
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	554 {
1675 bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	555 res = dmGetErrno();
1431 ed04fb6da07c Get rid of direct 'errno' usage. Matti Hamalainen <ccr@tnsp.org> parents: 1238 diff changeset	556 dmErrorMsg("Error opening input file '%s' #%d: %s.\n",
1675 bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	557 filename, res, dmErrorStr(res));
bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	558 goto out;
407 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
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	561 // Get filesize
1674 0f256e7340a3 Rename varibles. Matti Hamalainen <ccr@tnsp.org> parents: 1673 diff changeset	562 if ((dataSize = dmGetFileSize(fh) - 2) < 0)
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	563 {
1675 bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	564 res = dmGetErrno();
1431 ed04fb6da07c Get rid of direct 'errno' usage. Matti Hamalainen <ccr@tnsp.org> parents: 1238 diff changeset	565 dmErrorMsg("Error getting file size for '%s' #%d: %s.\n",
1675 bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	566 filename, res, dmErrorStr(res));
bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	567 goto out;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	568 }
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 // Get loading address
1674 0f256e7340a3 Rename varibles. Matti Hamalainen <ccr@tnsp.org> parents: 1673 diff changeset	571 if (!dm_fread_le16(fh, &tmpAddr))
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	572 {
1675 bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	573 res = dmGetErrno();
1431 ed04fb6da07c Get rid of direct 'errno' usage. Matti Hamalainen <ccr@tnsp.org> parents: 1238 diff changeset	574 dmErrorMsg("Error reading input file '%s' #%d: %s.\n",
1675 bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	575 filename, res, dmErrorStr(res));
bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	576 goto out;
407 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
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	579 // Show information
486 cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	580 loadAddr = forceAddr ? destAddr : tmpAddr;
cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	581 endAddr = loadAddr + dataSize - 1;
407 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 dmPrint(1, "* Loading '%s', %s at $%.4x-$%.4x",
486 cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	584 filename, forceAddr ? "PRGA" : "PRG", loadAddr, endAddr);
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	585
486 cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	586 if (endAddr >= memModel->size)
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	587 {
1675 bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	588 res = DMERR_BOUNDS;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	589 dmPrint(1, " .. Does not fit into the memory!\n");
1675 bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	590 goto out;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	591 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	592
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	593 // Load data
1674 0f256e7340a3 Rename varibles. Matti Hamalainen <ccr@tnsp.org> parents: 1673 diff changeset	594 if (fread(&memory[loadAddr], dataSize, 1, fh) < 1)
486 cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	595 {
1675 bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	596 res = dmGetErrno();
1431 ed04fb6da07c Get rid of direct 'errno' usage. Matti Hamalainen <ccr@tnsp.org> parents: 1238 diff changeset	597 dmPrint(1, " .. Error #%d: %s.\n",
1675 bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	598 res, dmErrorStr(res));
bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	599 goto out;
486 cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	600 }
cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	601
cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	602 dmPrint(1, " .. OK\n");
cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	603
cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	604 // Add to list of blocks
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	605 if (!dmReserveMemBlock(loadAddr, endAddr, filename, MTYPE_RES))
7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	606 res = DMERR_MALLOC;
486 cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	607
1675 bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	608 out:
bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	609 if (fh != NULL)
bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	610 fclose(fh);
bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	611
bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	612 return res;
486 cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	613 }
cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	614
cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	615
864 b111cccf45fc Portability fixes. Matti Hamalainen <ccr@tnsp.org> parents: 860 diff changeset	616 int dmLoadRAW(const char *filename, const int destAddr)
486 cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	617 {
1674 0f256e7340a3 Rename varibles. Matti Hamalainen <ccr@tnsp.org> parents: 1673 diff changeset	618 FILE *fh;
1675 bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	619 int dataSize, endAddr, res = DMERR_OK;
486 cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	620
cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	621 // Open the input file
1674 0f256e7340a3 Rename varibles. Matti Hamalainen <ccr@tnsp.org> parents: 1673 diff changeset	622 if ((fh = fopen(filename, "rb")) == NULL)
486 cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	623 {
1675 bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	624 res = dmGetErrno();
1431 ed04fb6da07c Get rid of direct 'errno' usage. Matti Hamalainen <ccr@tnsp.org> parents: 1238 diff changeset	625 dmErrorMsg("Error opening input file '%s' #%d: %s.\n",
1675 bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	626 filename, res, dmErrorStr(res));
bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	627 goto out;
486 cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	628 }
cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	629
cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	630 // Get filesize
1674 0f256e7340a3 Rename varibles. Matti Hamalainen <ccr@tnsp.org> parents: 1673 diff changeset	631 if ((dataSize = dmGetFileSize(fh)) < 0)
486 cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	632 {
1675 bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	633 res = dmError(DMERR_FREAD,
bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	634 "Error getting file size for '%s'.\n", filename);
bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	635 goto out;
486 cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	636 }
cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	637
cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	638 // Show information
cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	639 endAddr = destAddr + dataSize - 1;
cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	640 dmPrint(1, "* Loading '%s', RAW at $%.4x-$%.4x",
cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	641 filename, destAddr, endAddr);
cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	642
cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	643 if (endAddr >= memModel->size)
cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	644 {
1675 bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	645 res = DMERR_BOUNDS;
486 cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	646 dmPrint(1, " .. Does not fit into the memory!\n");
1675 bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	647 goto out;
486 cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	648 }
cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	649
cb61c44f7846 Clean up PRG/RAW loading. Matti Hamalainen <ccr@tnsp.org> parents: 485 diff changeset	650 // Load data
1674 0f256e7340a3 Rename varibles. Matti Hamalainen <ccr@tnsp.org> parents: 1673 diff changeset	651 if (fread(&memory[destAddr], dataSize, 1, fh) < 1)
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	652 {
1675 bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	653 res = dmGetErrno();
bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	654 dmPrint(1, " .. Error reading data #%d: %s.\n",
bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	655 res, dmErrorStr(res));
bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	656 goto out;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	657 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	658
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	659 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	660
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	661 // Add info to list
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	662 if (!dmReserveMemBlock(destAddr, endAddr, filename, MTYPE_RES))
7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	663 res = DMERR_MALLOC;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	664
1675 bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	665 out:
bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	666 if (fh != NULL)
bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	667 fclose(fh);
bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	668
bc5a75888fa9 Improve error handling and plug filehandle leaks. Matti Hamalainen <ccr@tnsp.org> parents: 1674 diff changeset	669 return res;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	670 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	671
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	672
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	673 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	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 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	676 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	677
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	678 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	679
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	680 // 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	681 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	682 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	683 {
958 985225a93aeb Add error code parameter to dmError() and dmErrorVA(). Matti Hamalainen <ccr@tnsp.org> parents: 871 diff changeset	684 dmErrorMsg("Could not allocate memory for string '%s'!\n",
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	685 blockName);
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	686 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	687 }
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 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	690 s = (t + 1);
1678 bddedc2e0ebb Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 1677 diff changeset	691 else
bddedc2e0ebb Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 1677 diff changeset	692 if ((t = strrchr(tmpStr, '\\')))
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	693 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	694 else
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	695 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	696
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	697 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	698 *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	699
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	700 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	701 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	702 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	703 *t = '_';
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	704 }
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 // 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	707 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	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 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	710 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	711 break;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	712
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	713 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	714 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	715 break;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	716
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	717 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	718 default:
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	719 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	720 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	721 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	722 break;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	723 }
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 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	726 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	727 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	728
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 /* 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	731 */
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	732 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	733 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	734 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	735 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	736
864 b111cccf45fc Portability fixes. Matti Hamalainen <ccr@tnsp.org> parents: 860 diff changeset	737 void memPrintEmpty(FILE *f, int n)
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	738 {
1678 bddedc2e0ebb Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 1677 diff changeset	739 for (int i = 0; i < n; i++)
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	740 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	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
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	743 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	744 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	745 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	746
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	747 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	748
1678 bddedc2e0ebb Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 1677 diff changeset	749 for (int i = 0; i < nmemBlocks; i++)
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	750 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	751 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	752 char desc[512], *s;
864 b111cccf45fc Portability fixes. Matti Hamalainen <ccr@tnsp.org> parents: 860 diff changeset	753 int siz, kz;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	754
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	755 // Check for empty, unreserved areas
828 c20a99411a1a Fix a silly segfault. Matti Hamalainen <ccr@tnsp.org> parents: 652 diff changeset	756 if (prev != NULL)
c20a99411a1a Fix a silly segfault. Matti Hamalainen <ccr@tnsp.org> parents: 652 diff changeset	757 siz = (curr->start - 1) - (prev->end + 1) + 1;
c20a99411a1a Fix a silly segfault. Matti Hamalainen <ccr@tnsp.org> parents: 652 diff changeset	758 else
c20a99411a1a Fix a silly segfault. Matti Hamalainen <ccr@tnsp.org> parents: 652 diff changeset	759 siz = 0;
1238 e8c99da451cd Cosmetics. Matti Hamalainen <ccr@tnsp.org> parents: 1167 diff changeset	760
499 c9b83226e21a Fix empty blocks size calculation, was off by one. Matti Hamalainen <ccr@tnsp.org> parents: 498 diff changeset	761 if (prev != NULL && siz > 1)
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	762 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	763 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	764
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	765 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	766
500 49701129c5dd Remove the redundant word 'bytes' from Empty sections in describe output. Matti Hamalainen <ccr@tnsp.org> parents: 499 diff changeset	767 snprintf(desc, sizeof(desc), "EMPTY (%d)", siz);
498 270a2d695607 Describe option did not actually show the unreserved/unused areas of the Matti Hamalainen <ccr@tnsp.org> parents: 497 diff changeset	768 fprintf(f, "$%.4x - $%.4x \| %-40s \|\n", prev->end + 1, curr->start - 1, desc);
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	769
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	770 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	771 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	772 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	773 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	774
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	775 // 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	776 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	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 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	779 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	780 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	781 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	782 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	783 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	784 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	785
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	786 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	787 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	788
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	789 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	790 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	791 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	792 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	793 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	794
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	795 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	796
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	797 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	798 "\n"
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	799 "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	800 "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	801 "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	802 "\n"
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	803 );
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	804 }
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 /*
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	808 * 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	809 */
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	810 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	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 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	813 BOOL hasOverlaps;
864 b111cccf45fc Portability fixes. Matti Hamalainen <ccr@tnsp.org> parents: 860 diff changeset	814 int startAddr, endAddr, dataSize, totalSize;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	815
1677 c2ad6c0e4975 Bump copyright year and version. Matti Hamalainen <ccr@tnsp.org> parents: 1676 diff changeset	816 dmInitProg("objlink", "Simple file-linker", "0.82", NULL, NULL);
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	817 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	818
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	819 // 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	820 if (!dmArgsProcess(argc, argv, optList, optListN,
860 daebbf28953d The argument handling API in dmargs* was synced with th-libs. Matti Hamalainen <ccr@tnsp.org> parents: 830 diff changeset	821 argHandleOpt, NULL, OPTH_BAILOUT))
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	822 goto out;
407 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 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	825 {
958 985225a93aeb Add error code parameter to dmError() and dmErrorVA(). Matti Hamalainen <ccr@tnsp.org> parents: 871 diff changeset	826 dmErrorMsg("Nothing to do. (try --help)\n");
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	827 goto out;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	828 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	829
2410 bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	830 // Warn about overlaps if enabled
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	831 if (optAllowOverlap)
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	832 dmMsg(-1, "WARNING: Overlapping data has been allowed!\n");
bc05bcfc4598 Add a C file with the generic BSD license text and a function for Matti Hamalainen <ccr@tnsp.org> parents: 2402 diff changeset	833
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	834 // 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	835 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	836 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	837 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	838
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	839 if ((memory = (Uint8 *) dmMalloc(memModel->size + 32)) == NULL)
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	840 {
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	841 dmErrorMsg("Could not allocate memory for memory model!\n");
7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	842 goto out;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	843 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	844
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	845 // 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	846 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	847
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	848 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	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 dmPrint(1, "BYTE 0x%.2x\n", optInitValue);
1167 848a88ce7a57 Use dmMemset(). Matti Hamalainen <ccr@tnsp.org> parents: 958 diff changeset	851 dmMemset(memory, optInitValue, memModel->size);
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	852 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	853 else
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	854 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	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 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	857 dmPrint(1, "WORD 0x%.4x\n", optInitValue);
1673 a2b45dddfe79 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 1432 diff changeset	858 for (int i = memModel->size / sizeof(*mp); i; i--)
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	859 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	860 *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	861 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	862 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	863 else
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	864 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	865 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	866 dmPrint(1, "DWORD 0x%.8x\n", optInitValue);
1673 a2b45dddfe79 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 1432 diff changeset	867 for (int i = memModel->size / sizeof(*mp); i; i--)
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	868 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	869 *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	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 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	872
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	873 // Load the datafiles
1673 a2b45dddfe79 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 1432 diff changeset	874 for (int i = 0; i < nsrcFiles; i++)
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	875 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	876 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	877 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	878 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	879 break;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	880
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	881 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	882 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	883 break;
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 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	886 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	887 break;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	888 }
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 // 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	891 dmMsg(1, "Applying memory model restrictions...\n");
1673 a2b45dddfe79 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 1432 diff changeset	892 for (int i = 0; i < memModel->nmemBlocks; i++)
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	893 {
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	894 if (!dmReserveMemBlock(
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	895 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	896 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	897 memModel->memBlocks[i].name,
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	898 memModel->memBlocks[i].type))
7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	899 goto out;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	900 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	901
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	902 // Sort the blocks
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	903 qsort(memBlocks, nmemBlocks, sizeof(DMMemBlock), dmCompareMemBlock);
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	904
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	905 // 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	906 hasOverlaps = FALSE;
1673 a2b45dddfe79 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 1432 diff changeset	907 for (int i = 0; i < nmemBlocks; i++)
a2b45dddfe79 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 1432 diff changeset	908 for (int j = 0; j < nmemBlocks; j++)
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	909 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	910 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	911 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	912 *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	913
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	914 // 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	915 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	916 (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	917 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	918 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	919 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	920 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	921 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	922 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	923 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	924
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	925 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	926 {
958 985225a93aeb Add error code parameter to dmError() and dmErrorVA(). Matti Hamalainen <ccr@tnsp.org> parents: 871 diff changeset	927 dmErrorMsg("Error occured, overlaps not allowed.\n");
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	928 goto out;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	929 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	930
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	931 // 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	932 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	933 totalSize = endAddr = 0;
1673 a2b45dddfe79 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 1432 diff changeset	934 for (int i = 0; i < nmemBlocks; i++)
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	935 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	936 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	937 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	938 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	939 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	940 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	941
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	942 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	943 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	944
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	945 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	946 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	947 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	948
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	949 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	950 {
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	951 dmErrorMsg("Invalid saveblock addresses (start=$%.4x, end=$%.4x)!\n",
7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	952 startAddr, endAddr);
7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	953 goto out;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	954 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	955
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	956 // 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	957 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	958 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	959 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	960 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	961 {
1431 ed04fb6da07c Get rid of direct 'errno' usage. Matti Hamalainen <ccr@tnsp.org> parents: 1238 diff changeset	962 int err = dmGetErrno();
ed04fb6da07c Get rid of direct 'errno' usage. Matti Hamalainen <ccr@tnsp.org> parents: 1238 diff changeset	963 dmErrorMsg("Error creating file '%s' #%d: %s.\n",
ed04fb6da07c Get rid of direct 'errno' usage. Matti Hamalainen <ccr@tnsp.org> parents: 1238 diff changeset	964 optLinkFileName, err, dmErrorStr(err));
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	965 goto out;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	966 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	967
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	968 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	969 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	970 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	971 default:
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	972 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	973 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	974 break;
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	975 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	976
1673 a2b45dddfe79 Cleanups. Matti Hamalainen <ccr@tnsp.org> parents: 1432 diff changeset	977 for (int i = 0; i < nmemBlocks; i++)
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	978 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	979 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	980 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	981 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	982
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	983 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	984 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	985
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	986 // Show some information
485 c1d5cccbf5b3 Implement output data cropping option -c, with which the memory area to be Matti Hamalainen <ccr@tnsp.org> parents: 484 diff changeset	987 if (optCropOutput)
c1d5cccbf5b3 Implement output data cropping option -c, with which the memory area to be Matti Hamalainen <ccr@tnsp.org> parents: 484 diff changeset	988 {
c1d5cccbf5b3 Implement output data cropping option -c, with which the memory area to be Matti Hamalainen <ccr@tnsp.org> parents: 484 diff changeset	989 startAddr = optCropStart;
c1d5cccbf5b3 Implement output data cropping option -c, with which the memory area to be Matti Hamalainen <ccr@tnsp.org> parents: 484 diff changeset	990 endAddr = optCropEnd;
c1d5cccbf5b3 Implement output data cropping option -c, with which the memory area to be Matti Hamalainen <ccr@tnsp.org> parents: 484 diff changeset	991 }
c1d5cccbf5b3 Implement output data cropping option -c, with which the memory area to be Matti Hamalainen <ccr@tnsp.org> parents: 484 diff changeset	992
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	993 dataSize = endAddr - startAddr + 1;
485 c1d5cccbf5b3 Implement output data cropping option -c, with which the memory area to be Matti Hamalainen <ccr@tnsp.org> parents: 484 diff changeset	994
c1d5cccbf5b3 Implement output data cropping option -c, with which the memory area to be Matti Hamalainen <ccr@tnsp.org> parents: 484 diff changeset	995 if (dataSize - totalSize > 0)
c1d5cccbf5b3 Implement output data cropping option -c, with which the memory area to be Matti Hamalainen <ccr@tnsp.org> parents: 484 diff changeset	996 {
c1d5cccbf5b3 Implement output data cropping option -c, with which the memory area to be Matti Hamalainen <ccr@tnsp.org> parents: 484 diff changeset	997 dmMsg(1, "Total of %d/$%x bytes unused(?) areas.\n",
c1d5cccbf5b3 Implement output data cropping option -c, with which the memory area to be Matti Hamalainen <ccr@tnsp.org> parents: 484 diff changeset	998 dataSize - totalSize, dataSize - totalSize);
c1d5cccbf5b3 Implement output data cropping option -c, with which the memory area to be Matti Hamalainen <ccr@tnsp.org> parents: 484 diff changeset	999 }
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	1000
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	1001 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	1002 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	1003
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	1004
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	1005 // 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	1006 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	1007 {
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	1008 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	1009 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	1010 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	1011 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	1012 {
1431 ed04fb6da07c Get rid of direct 'errno' usage. Matti Hamalainen <ccr@tnsp.org> parents: 1238 diff changeset	1013 int err = dmGetErrno();
ed04fb6da07c Get rid of direct 'errno' usage. Matti Hamalainen <ccr@tnsp.org> parents: 1238 diff changeset	1014 dmErrorMsg("Error creating output file '%s' #%d: %s.\n",
ed04fb6da07c Get rid of direct 'errno' usage. Matti Hamalainen <ccr@tnsp.org> parents: 1238 diff changeset	1015 optDestName, err, dmErrorStr(err));
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	1016 goto out;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	1017 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	1018 else
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	1019 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	1020
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	1021 // Save loading address
501 d13d8770477a Add new -L option for forcing loading address on the destination file, or Matti Hamalainen <ccr@tnsp.org> parents: 500 diff changeset	1022 if (optLoadAddress >= 0)
504 b0ee847a14d3 Oops, actually fix the load address setting functionality to work. And make Matti Hamalainen <ccr@tnsp.org> parents: 501 diff changeset	1023 {
b0ee847a14d3 Oops, actually fix the load address setting functionality to work. And make Matti Hamalainen <ccr@tnsp.org> parents: 501 diff changeset	1024 dmMsg(1, "Using specified loading address $%.4x\n", optLoadAddress);
501 d13d8770477a Add new -L option for forcing loading address on the destination file, or Matti Hamalainen <ccr@tnsp.org> parents: 500 diff changeset	1025 dm_fwrite_le16(dfile, optLoadAddress);
504 b0ee847a14d3 Oops, actually fix the load address setting functionality to work. And make Matti Hamalainen <ccr@tnsp.org> parents: 501 diff changeset	1026 }
501 d13d8770477a Add new -L option for forcing loading address on the destination file, or Matti Hamalainen <ccr@tnsp.org> parents: 500 diff changeset	1027 else
d13d8770477a Add new -L option for forcing loading address on the destination file, or Matti Hamalainen <ccr@tnsp.org> parents: 500 diff changeset	1028 if (optLoadAddress == LA_AUTO)
504 b0ee847a14d3 Oops, actually fix the load address setting functionality to work. And make Matti Hamalainen <ccr@tnsp.org> parents: 501 diff changeset	1029 {
b0ee847a14d3 Oops, actually fix the load address setting functionality to work. And make Matti Hamalainen <ccr@tnsp.org> parents: 501 diff changeset	1030 dmMsg(1, "Using automatic loading address $%.4x\n", startAddr);
501 d13d8770477a Add new -L option for forcing loading address on the destination file, or Matti Hamalainen <ccr@tnsp.org> parents: 500 diff changeset	1031 dm_fwrite_le16(dfile, startAddr);
504 b0ee847a14d3 Oops, actually fix the load address setting functionality to work. And make Matti Hamalainen <ccr@tnsp.org> parents: 501 diff changeset	1032 }
b0ee847a14d3 Oops, actually fix the load address setting functionality to work. And make Matti Hamalainen <ccr@tnsp.org> parents: 501 diff changeset	1033 else
b0ee847a14d3 Oops, actually fix the load address setting functionality to work. And make Matti Hamalainen <ccr@tnsp.org> parents: 501 diff changeset	1034 {
b0ee847a14d3 Oops, actually fix the load address setting functionality to work. And make Matti Hamalainen <ccr@tnsp.org> parents: 501 diff changeset	1035 dmMsg(1, "Writing raw output, without loading address.\n");
b0ee847a14d3 Oops, actually fix the load address setting functionality to work. And make Matti Hamalainen <ccr@tnsp.org> parents: 501 diff changeset	1036 }
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	1037
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	1038 // 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	1039 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	1040 {
1431 ed04fb6da07c Get rid of direct 'errno' usage. Matti Hamalainen <ccr@tnsp.org> parents: 1238 diff changeset	1041 int err = dmGetErrno();
ed04fb6da07c Get rid of direct 'errno' usage. Matti Hamalainen <ccr@tnsp.org> parents: 1238 diff changeset	1042 dmErrorMsg("Error writing to file #%d: %s.\n",
ed04fb6da07c Get rid of direct 'errno' usage. Matti Hamalainen <ccr@tnsp.org> parents: 1238 diff changeset	1043 err, dmErrorStr(err));
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	1044 goto out;
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	1045 }
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	1046
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	1047 // Describe the memory layout
7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	1048 if (optDescribe)
7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	1049 dmDescribeMemory(dfile != stdout ? stdout : stderr);
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	1050
1679 7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	1051 out:
7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	1052 if (dfile != NULL && dfile != stdout)
7b0c76cd7686 Clean up and improve error handling. Matti Hamalainen <ccr@tnsp.org> parents: 1678 diff changeset	1053 fclose(dfile);
407 59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	1054
59244a7ae37f Move c64 utilities to the engine lib, as we benefit from a common framework. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	1055 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	1056 }

Mercurial > hg > dmlib

annotate tools/objlink.c @ 2411:829e3080e0ad