//
-// RLN - Reboot's Linker for the Atari Jaguar console system
-// Copyright (C) 199x Allan K. Pratt, 2011-2018 Reboot & Friends
+// RLN - Renamed Linker for the Atari Jaguar console system
+// Copyright (C) 199x Allan K. Pratt, 2011-2021 Reboot & Friends
//
#ifndef __RLN_H__
#endif
#define MAJOR 1 // Major version number
-#define MINOR 6 // Minor version number
-#define PATCH 3 // Patch release number
+#define MINOR 7 // Minor version number
+#define PATCH 4 // Patch release number
#ifdef WIN32
#define PLATFORM "Win32" // Release platform - Windows
#define OST_BLOCK 0x400000 // Output symbol table block (4MB)
#define DSTSEG_D 1 // Include file destination seg (DATA)
#define DSTSEG_T 2 // Include file destination seg (TEXT)
-#define MAXARGS 256 // Max number of args in a command file
+#define MAXARGS 4096 // Max number of args in a command file
// Headers
#include <stdint.h>
#include <dirent.h>
+// Alcyon object file header structures.
+//
+// Same as an Atari ST/GEMDOS/TOS executable file header.
+//
+// References:
+// http://cd.textfiles.com/ataricompendium/BOOK/HTML/CHAP2.HTM#processes
+// https://mikro.naprvyraz.sk/docs/GEM/GEMDOS.TXT
+// MADMAC source from Landon Dyer (See below for URL)
+//
+// Note the above disagree on the last entry in the header layout: In practice
+// the files MADMAC produces and that ALN consumes use the header layout from
+// the Atari Compendium page.
+struct ALCHEADER
+{
+ uint16_t magic; // $601A
+ uint32_t tsize; // text segment size
+ uint32_t dsize; // data segment size
+ uint32_t bsize; // BSS segment size
+ uint32_t ssize; // symbol table size
+ uint32_t reserved0; // unused
+ uint32_t reserved1; // unused
+ uint16_t absflag; // Always '0' (relocatable) for obj files
+};
+
+// Alcyon/DRI symbol type bits - From size.c:show_dri_symbol_type() in
+// https://github.com/cubanismo/jag_utils, as well as
+// the GEMDOS Reference Manual, 4/4/86, "Executable Files" section, in the
+// table "Values For Symbol Types," available various places, e.g.,
+// https://mikro.naprvyraz.sk/docs/GEM/GEMDOS.TXT
+#define ALCSYM_DEFINED 0x8000
+#define ALCSYM_EQUATED 0x4000
+#define ALCSYM_GLOBAL 0x2000
+#define ALCSYM_EQUATED_REG 0x1000
+#define ALCSYM_EXTERN 0x0800
+#define ALCSYM_DATA 0x0400
+#define ALCSYM_TEXT 0x0200
+#define ALCSYM_BSS 0x0100
+
+// Alcyon/DRI symbol relocation flags - Derived from mark.c in the
+// original MADMAC sources released by Landon Dyer on his blog:
+//
+// https://dadhacker-125488.ingress-alpha.ewp.live/
+//
+// At this link from his September 2nd, 2008 post:
+//
+// http://www.dadhacker.com/Downloads/madmac.zip
+//
+// Downloaded from the Internet Archive Wayback Machine November 2015
+// snapshot of the above URL, here:
+//
+// https://web.archive.org/web/20151120225539/http://www.dadhacker.com/Downloads/madmac.zip
+//
+// Another valuable source of information on the Alcyon relocation data,
+// and the Alcyon/DRI C object file format in general is the Sozobon 2.0
+// source code:
+//
+// https://sourceforge.net/projects/sozobon/files/
+//
+// Sozobon is a reimplementation of the original Atari Alcyon C compiler
+// suite that can generate and link Alcyon/DRI object files compatible
+// with the original. Take a look at the jas/cpy.c file for an alternate
+// implementation of Alcyon/DRI relocation section data generation than
+// the one in MADMAC, as well as an alternate Alcyon/DRI relocation
+// data processing implementation in ld/rel.c.
+#define ALCREL_ABS 0x0000 // No relocation at this location
+#define ALCREL_DATA 0x0001 // Local address from data segment
+#define ALCREL_TEXT 0x0002 // Local address from text segment
+#define ALCREL_BSS 0x0003 // Local address from BSS segment
+#define ALCREL_EXTABS 0x0004 // External fixup: Absolute address
+#define ALCREL_LONG 0x0005 // Relocation type is in next word
+#define ALCREL_EXTPCREL 0x0006 // External fixup: PC relative address
+#define ALCREL_SYMIDX(rval) ((rval) >> 3) // 0-based index of ext fixup symbol
+
+struct ALCSYM
+{
+ uint8_t name[8]; // fixed-size, padded with zeros. NOT NUL-terminated!
+ uint16_t type; // symbol type mask, from ALCSYM_* flags above.
+ uint32_t value; // value
+};
+
struct OHEADER
{
uint32_t magic; // $0107 for .o, $601B for .abs
#define new_oheader() (struct OHEADER *)malloc(sizeof(struct OHEADER))
+// BSD/a.out object relocation flags.
+#define BSDREL_MOVEI 0x00000001 // Word-swapped (I.e., JRISC movei) long
+#define BSDREL_WORD 0x00000002
+#define BSDREL_OP 0x00000004 // Object Processor relocation
+#define BSDREL_GLOBAL 0x00000010 // AKA external reference
+#define BSDREL_ABS 0x00000040
+#define BSDREL_PCREL 0x000000A0 // Note this implies BSDREL_GLOBAL
+#define BSDREL_SYMIDX_SHIFT 8 // Bits to shift
+#define BSDREL_SYMIDX(_rf) ((_rf) >> BSDREL_SYMIDX_SHIFT)
+#define BSDREL_SEGMASK 0xFFFFFF00
+#define BSDREL_SEG_ABS 0x00000200
+#define BSDREL_SEG_TEXT 0x00000400
+#define BSDREL_SEG_DATA 0x00000600
+#define BSDREL_SEG_BSS 0x00000800
+
struct ARHEADER
{
uint8_t a_fname[14];
// Symbol Record
-// SYMREC: Used by builddir for the lists of exports and imports, and by the
-// linker for the output symbol table (that's why there are type and value
-// fields, unused in builddir)
+// SYMREC: Used by the linker for the output symbol table
-#define SYMLEN 100 // Symbol name size (incl. null)
+#define OST_SIZE_INIT 8 // Half the initial output symbol table size
struct SYMREC
{
- uint8_t s_name[SYMLEN]; // Including null terminator
- uint16_t s_type;
+ uint32_t s_idx;
+ uint32_t s_type;
uint32_t s_value;
- struct SYMREC * s_next;
};
#define new_symrec() (struct SYMREC *)malloc(sizeof(struct SYMREC))
// and Globals share a hash table, but their value fields are interpreted
// differently.
+#define SYMLEN 256 // Symbol name size (incl. null)
+
struct HREC
{
uint8_t h_sym[SYMLEN];