nasm/rdoff/rdf2bin.c
H. Peter Anvin 038d861ede Remove obsolete types; add <inttypes.h> where needed; header fixes
- Remove obsolete types like "uint32"; use "uint32_t" consistently.
- Make sure we include <inttypes.h> where needed.
- Header file guards should be FOO_H or SUBDIR_FOO_H; _FOO_H infringes
  on the C implementation's namespace and should only be used when
  writing libc!
- Change a few "int8_t" back to "char" where appropriate.  There are
  a lot more places where that should be done, though.
- Clean up the check for getuid/getgid in rdoff/rdlar.h.
2007-04-12 16:54:50 +00:00

135 lines
3.2 KiB
C

/*
* rdf2bin.c - convert an RDOFF object file to flat binary
*/
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include "rdfload.h"
#include "../nasmlib.h"
int32_t origin = 0;
int align = 16;
int8_t *getfilename(int8_t *pathname)
{
int8_t *lastslash = pathname - 1;
int8_t *i = pathname;
while (*i) {
if (*i == '/')
lastslash = i;
i++;
}
return lastslash + 1;
}
int main(int argc, char **argv)
{
rdfmodule *m;
int tmp;
FILE *of;
int8_t *padding;
int codepad, datapad, bsspad = 0;
if (argc < 2) {
puts("Usage: rdf2bin [-o relocation-origin] [-p segment-alignment] " "input-file output-file");
puts(" rdf2com [-p segment-alignment] input-file output-file");
return 1;
}
if (!nasm_stricmp(getfilename(*argv), "rdf2com")) {
origin = 0x100;
}
argv++, argc--;
while (argc > 2) {
if (!strcmp(*argv, "-o")) {
argv++, argc--;
origin = readnum(*argv, &tmp);
if (tmp) {
fprintf(stderr, "rdf2bin: invalid parameter: %s\n", *argv);
return 1;
}
} else if (!strcmp(*argv, "-p")) {
argv++, argc--;
align = readnum(*argv, &tmp);
if (tmp) {
fprintf(stderr, "rdf2bin: invalid parameter: %s\n", *argv);
return 1;
}
} else if (!strcmp(*argv, "-b")) {
argv++, argc--;
bsspad = readnum(*argv, &tmp);
if (tmp) {
fprintf(stderr, "rdf2bin: invalid parameter: %s\n", *argv);
return 1;
}
} else
break;
argv++, argc--;
}
if (argc < 2) {
puts("rdf2bin: required parameter missing");
return -1;
}
m = rdfload(*argv);
if (!m) {
rdfperror("rdf2bin", *argv);
return 1;
}
printf("relocating %s: origin=%lx, align=%d\n", *argv, origin, align);
m->textrel = origin;
m->datarel = origin + m->f.seg[0].length;
if (m->datarel % align != 0) {
codepad = align - (m->datarel % align);
m->datarel += codepad;
} else
codepad = 0;
m->bssrel = m->datarel + m->f.seg[1].length;
if (m->bssrel % align != 0) {
datapad = align - (m->bssrel % align);
m->bssrel += datapad;
} else
datapad = 0;
printf("code: %08lx\ndata: %08lx\nbss: %08lx\n",
m->textrel, m->datarel, m->bssrel);
rdf_relocate(m);
argv++;
of = fopen(*argv, "wb");
if (!of) {
fprintf(stderr, "rdf2bin: could not open output file %s\n", *argv);
return 1;
}
padding = malloc(align);
if (!padding) {
fprintf(stderr, "rdf2bin: out of memory\n");
return 1;
}
if (fwrite(m->t, 1, m->f.seg[0].length, of) != m->f.seg[0].length ||
fwrite(padding, 1, codepad, of) != codepad ||
fwrite(m->d, 1, m->f.seg[1].length, of) != m->f.seg[1].length) {
fprintf(stderr, "rdf2bin: error writing to %s\n", *argv);
return 1;
}
if (bsspad) {
void *p = calloc(bsspad -= (m->bssrel - origin), 1);
fwrite(p, 1, bsspad, of);
}
fclose(of);
return 0;
}