diff options
| author | forsyth <forsyth@vitanuova.com> | 2010-04-27 21:15:13 +0100 |
|---|---|---|
| committer | forsyth <forsyth@vitanuova.com> | 2010-04-27 21:15:13 +0100 |
| commit | c0927006217e7a7e0214add5828659287c7498d6 (patch) | |
| tree | 528acb9e0df2d33eaa2481b8e3ff37c252082fd2 /utils/8l/obj.c | |
| parent | 2303ddadf6e5cbf9705ccf25abe6114af1126b79 (diff) | |
20100427-2115
Diffstat (limited to 'utils/8l/obj.c')
| -rw-r--r-- | utils/8l/obj.c | 20 |
1 files changed, 17 insertions, 3 deletions
diff --git a/utils/8l/obj.c b/utils/8l/obj.c index 07e5c53f..a2cd7c9a 100644 --- a/utils/8l/obj.c +++ b/utils/8l/obj.c @@ -17,6 +17,7 @@ char *thestring = "386"; * -H2 -T4128 -R4096 is plan9 format * -H3 -Tx -Rx is MS-DOS .COM * -H4 -Tx -Rx is fake MS-DOS .EXE + * -H5 -T0x80100020 -R4096 is ELF */ static int @@ -94,8 +95,13 @@ main(int argc, char *argv[]) break; case 'x': /* produce export table */ doexp = 1; - if(argv[1] != nil && argv[1][0] != '-' && !isobjfile(argv[1])) - readundefs(ARGF(), SEXPORT); + if(argv[1] != nil && argv[1][0] != '-' && !isobjfile(argv[1])){ + a = ARGF(); + if(strcmp(a, "*") == 0) + allexport = 1; + else + readundefs(a, SEXPORT); + } break; case 'u': /* produce dynamically loadable module */ dlm = 1; @@ -172,6 +178,15 @@ main(int argc, char *argv[]) if(debug['v']) Bprint(&bso, "HEADR = 0x%ld\n", HEADR); break; + case 5: /* elf executable */ + HEADR = rnd(52L+3*32L, 16); + if(INITTEXT == -1) + INITTEXT = 0x80100020L; + if(INITDAT == -1) + INITDAT = 0; + if(INITRND == -1) + INITRND = 4096; + break; } if(INITDAT != 0 && INITRND != 0) print("warning: -D0x%lux is ignored because of -R0x%lux\n", @@ -185,7 +200,6 @@ main(int argc, char *argv[]) diag("phase error in optab: %d", i); errorexit(); } - maxop = i; for(i=0; i<Ymax; i++) ycover[i*Ymax + i] = 1; |