2 // RLN - Reboot's Linker for the Atari Jaguar Console System
3 // RLN.H - Application Header
4 // Copyright (C) 199x Allan K. Pratt, 2011 Reboot & Friends
10 // Required Include Files
14 // Requirements for Windows Compilation
17 //#define _OPEN_FLAGS _O_BINARY|_O_RDWR
18 #define _OPEN_FLAGS _O_BINARY|_O_RDONLY
19 #define PATH_DELIMITER '\\'
22 #pragma warning(disable:4996)
31 #include <sys/types.h>
36 // Requirements for Mac OS-X or Linux Compilation
39 //#define _OPEN_FLAGS O_RDWR
40 #define _OPEN_FLAGS O_RDONLY
41 #define PATH_DELIMITER '/'
42 #include <sys/fcntl.h>
47 #include <sys/types.h>
53 #define MAJOR 1 // Major version number
54 #define MINOR 3 // Minor version number
55 #define PATCH 0 // Patch release number
58 #define PLATFORM "Win32" // Release platform - Windows
61 #define PLATFORM "OSX/Linux" // Release platform - MAC OSX or Linux
63 #define PLATFORM "Unknown" // Release platform - Not Specified
67 // Command link flag, warning macro
68 #define warn(x, f) printf("Warning: repeated flag `%c'%s\n", x, f ? "; previous one(s) ignored." : ".")
70 // Macro for max: good because longs, shorts, or pointers can be compared
72 #define MAX(a,b) ((a) > (b) ? (a) : (b))
75 // Macro to swap the 16-bit words of a 32-bit integer
76 #define _SWAPWORD(x) (((unsigned)(x) >> 16) | ((unsigned)(x) << 16))
78 #define FARGSIZE 1024 // Number of chars in filename argument
79 #define FNLEN 1024 // Size of a file name
80 #define NHANDLES 256 // Number of open file handles at once
81 #define OST_BLOCK 0x400000 // Output symbol table block (4MB)
82 #define DSTSEG_D 1 // Include file destination seg (DATA)
83 #define DSTSEG_T 2 // Include file destination seg (TEXT)
84 #define MAXARGS 256 // Max number of args in a command file
88 // Most of these structures reflect the actual format of the object in
89 // question, on a 68000: char means one byte, int means two bytes, long means
90 // four. If the host machine doesn't have this same format (like a VAX), you
91 // will have to read the file into a buffer and stuff the values into the
92 // structure (see slongio.c).
94 // Rather than rely on dodgy compilers for something that's now a C99 standard,
100 uint32_t magic; // $0107 for .o, $601B for .abs
107 uint32_t tsize; // Text relocation size
108 uint32_t dsize; // Data relocation size
109 uint8_t reserved[12];
112 uint32_t stksize; // Unused
113 uint32_t tstart; // Start of TEXT
114 uint32_t rbflag; // -1 if no fixups at all
115 uint32_t dstart; // Start of DATA
116 uint32_t bstart; // Start of BSS
119 uint8_t * ostbase; // Base of output symbol table
120 uint32_t fsize; // Length of fixups
121 uint8_t * fixups; // Start of fixups
124 #define new_oheader() (struct OHEADER *)malloc((uint32_t)sizeof(struct OHEADER))
134 uint16_t reserved; // Two bytes zeroes btw header & file
137 #define new_arheader() (struct ARHEADER *)malloc((uint32_t)sizeof(struct ARHEADER))
139 // Object File Structure and Related Items
143 uint8_t o_name[FNLEN]; // Fixed-length names
144 uint8_t o_arname[FNLEN]; // Name of archive this is from
145 struct OFILE * o_next; // Next object file
146 uint32_t o_tbase, o_dbase, o_bbase; // Computed bases for this ofile
147 uint16_t o_symstart; // First sym in image is nth in out
148 uint16_t o_flags; // Flags (see O_*)
149 struct OHEADER o_header; // Header of this file
150 uint8_t * o_image; // Image of this file
151 uint8_t isArchiveFile; // Temporary extra flag
154 #define new_ofile() (struct OFILE *)malloc((uint32_t)sizeof(struct OFILE))
156 // Flags in an Object File's o_flags field
157 // O_USED: means this ofile is used or is on the command line or in a -x
158 #define O_USED 0x0001
159 #define O_ARCHIVE 0x0002 // This is a dummy archive entry
163 // SYMREC: Used by builddir for the lists of exports and imports, and by the
164 // linker for the output symbol table (that's why there are type and value
165 // fields, unused in builddir)
167 #define SYMLEN 100 // Symbol name size (incl null)
171 uint8_t s_name[SYMLEN]; // Including null terminator
174 struct SYMREC * s_next;
177 #define new_symrec() (struct SYMREC *)malloc((uint32_t)sizeof(struct SYMREC))
181 // HREC: One item in a hash bucket, including a link to the next item. Commons
182 // and Globals share a hash table, but their value fields are interpreted
187 uint8_t h_sym[SYMLEN];
188 struct HREC * h_next;
189 struct OFILE * h_ofile;
191 //Shamus: This was an "int" but as per above, should have been a 16-bit value.
192 // Changing it to a 32-bit value (as per compiler warning).
196 #define new_hrec() (struct HREC *)malloc((uint32_t)sizeof(struct HREC))
198 #define NBUCKETS 1024 // Number of hash buckets
200 // Bit definitions for the type field of a symbol.
202 // There is a special case for the linker here: the bit T_OST is a flag
203 // meaning that the symbol's value field contains an INT (in host-machine
204 // format, in the first two bytes of the field) which is the index of the
205 // symbol in the output symbol table.
207 // If that field is -1, it means you have to look this symbol up in the
208 // ost to get its index. This happens when the symbol was extern to this
209 // module and defined by a LATER module.
211 // The upshot is that a symbol which isn't in the ost has its type & value
212 // fields intact, while a symbol which is in the ost has T_OST set and
213 // its index in its value field (or -1 if you have to look it up).
214 // When producing the output fixups, you either output a symbol fixup with
215 // the new index (for a partial link), or resolve the symbol based on its
216 // type & value from the output symbol table.
218 #define ABST_DEFINED 0x8000
219 #define ABST_EQUATED 0x4000
220 #define ABST_GLOBAL 0x2000
221 #define ABST_REGISTER 0x1000
222 #define ABST_EXTERN 0x0800
223 #define ABST_DATA 0x0400 /* data-based relocatable */
224 #define ABST_TEXT 0x0200 /* text-based relocatable */
225 #define ABST_BSS 0x0100 /* bss-based relocatable */
226 #define ABST_FILE 0x0080 // file symbol
227 #define ABST_ARCHIVE 0x0040 // only when FILE set: archive file or no
228 #define ABST_OST 0x0001 // private: "symbol is in ost": see above
229 #define T_COMMON (T_GLOBAL | T_EXTERN)
230 #define T_SEG (T_DATA | T_TEXT | T_BSS) // segment bits
232 // Symbol Table - Type Definitions
234 #define T_UNDF 0x00000000 // Undefined Symbol
235 #define T_EXT 0x01000000 // External Bit, OR'ed In (Global)
236 #define T_ABS 0x02000000 // Absolute Symbol (Equated)
237 #define T_TEXT 0x04000000 // TEXT Segment
238 #define T_DATA 0x06000000 // DATA Segment
239 #define T_BSS 0x08000000 // BSS Segment
241 // These macros are used with the TYPE field of a SYMBOL.
243 Absolutes (equates) can't be externals (line 434)
244 -- they are non-relocatable
247 //#define iscommon(type) (((type) & T_EXT) == T_EXT)
248 #define iscommon(type) (((type) & T_EXT) == 0)
249 #define isglobal(type) (((type) & T_EXT) == T_EXT)
250 #define isextern(type) (((type) & T_EXT) == T_EXT)
251 #define islocal(type) (((type) & T_EXT) == 0)
255 Just look at this. I can't believe that somebody actually wrote this piece of
256 failure and thought it was a good idea. I'm leaving it here as a testament to
257 complete, total, and utter failure. :-)
260 // This macro is used to compare two symbols for equality. It depends on
261 // symcopy remaining as it is (copies two longs plus a null)
263 //#define symcmp(a,b) ((*(long *)(a) == *(long *)(b)) && \
264 // (*(long *)((a) + sizeof(long)) == \
265 // *(long *)((b) + sizeof(long))))
267 // Function Prototypes
269 int doargs(int, char *[]);
270 char * make_string(char *);
271 void put_name(struct OFILE *);
272 int flush_handles(void);
273 void symcopy(char *, char *);
274 int ost_add(char *,int, long);
276 void display_help(void);
277 void display_version(void);
278 int pladd(char *, char *);
279 char * path_tail(char *);
281 int segmentpad(FILE *, long, int);
282 int ost_lookup(char *);