Mercurial > hg-old > index.cgi
annotate lwlink/lwlink.c @ 254:c7a41b4c89b3 2.x
Added struct support to LWASM
| author | lost |
|---|---|
| date | Sat, 19 Dec 2009 06:38:43 +0000 |
| parents | bae1e3ecdce1 |
| children |
| rev | line source |
|---|---|
| 112 | 1 /* |
| 2 lwlink.c | |
| 118 | 3 Copyright © 2009 William Astle |
| 112 | 4 |
| 5 This file is part of LWLINK. | |
| 6 | |
| 7 LWLINK is free software: you can redistribute it and/or modify it under the | |
| 8 terms of the GNU General Public License as published by the Free Software | |
| 9 Foundation, either version 3 of the License, or (at your option) any later | |
| 10 version. | |
| 11 | |
| 12 This program is distributed in the hope that it will be useful, but WITHOUT | |
| 13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
| 14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for | |
| 15 more details. | |
| 16 | |
| 17 You should have received a copy of the GNU General Public License along with | |
| 18 this program. If not, see <http://www.gnu.org/licenses/>. | |
| 19 | |
| 20 | |
| 21 | |
| 22 */ | |
| 23 | |
| 212 | 24 #include <config.h> |
| 112 | 25 |
| 26 #define __lwlink_c_seen__ | |
| 27 | |
| 28 #include <argp.h> | |
| 29 #include <errno.h> | |
| 30 #include <stdio.h> | |
| 31 #include <stdlib.h> | |
| 171 | 32 #include <string.h> |
| 112 | 33 |
| 34 #include "lwlink.h" | |
|
114
c65fcec346cd
Handle input files on command line and add some memory management utility functions
lost
parents:
112
diff
changeset
|
35 #include "util.h" |
| 112 | 36 |
| 37 int debug_level = 0; | |
| 38 int outformat = OUTPUT_DECB; | |
| 39 char *outfile = NULL; | |
| 117 | 40 char *scriptfile = NULL; |
|
184
220a760ec654
Make lwlink display all undefined references instead of bailing after the first one
lost
parents:
180
diff
changeset
|
41 int symerr = 0; |
| 185 | 42 char *map_file = NULL; |
| 112 | 43 |
| 115 | 44 fileinfo_t **inputfiles = NULL; |
|
114
c65fcec346cd
Handle input files on command line and add some memory management utility functions
lost
parents:
112
diff
changeset
|
45 int ninputfiles = 0; |
|
c65fcec346cd
Handle input files on command line and add some memory management utility functions
lost
parents:
112
diff
changeset
|
46 |
| 180 | 47 int nlibdirs = 0; |
| 48 char **libdirs = NULL; | |
| 49 | |
| 50 int nscriptls = 0; | |
| 51 char **scriptls = NULL; | |
| 52 | |
|
114
c65fcec346cd
Handle input files on command line and add some memory management utility functions
lost
parents:
112
diff
changeset
|
53 void add_input_file(char *fn) |
|
c65fcec346cd
Handle input files on command line and add some memory management utility functions
lost
parents:
112
diff
changeset
|
54 { |
| 115 | 55 inputfiles = lw_realloc(inputfiles, sizeof(fileinfo_t *) * (ninputfiles + 1)); |
| 56 inputfiles[ninputfiles] = lw_malloc(sizeof(fileinfo_t)); | |
| 171 | 57 memset(inputfiles[ninputfiles], 0, sizeof(fileinfo_t)); |
| 205 | 58 inputfiles[ninputfiles] -> forced = 1; |
| 115 | 59 inputfiles[ninputfiles++] -> filename = lw_strdup(fn); |
|
114
c65fcec346cd
Handle input files on command line and add some memory management utility functions
lost
parents:
112
diff
changeset
|
60 } |
|
c65fcec346cd
Handle input files on command line and add some memory management utility functions
lost
parents:
112
diff
changeset
|
61 |
| 180 | 62 void add_input_library(char *libname) |
| 63 { | |
| 64 inputfiles = lw_realloc(inputfiles, sizeof(fileinfo_t *) * (ninputfiles + 1)); | |
| 65 inputfiles[ninputfiles] = lw_malloc(sizeof(fileinfo_t)); | |
| 66 memset(inputfiles[ninputfiles], 0, sizeof(fileinfo_t)); | |
| 67 inputfiles[ninputfiles] -> islib = 1; | |
| 205 | 68 inputfiles[ninputfiles] -> forced = 0; |
| 180 | 69 inputfiles[ninputfiles++] -> filename = lw_strdup(libname); |
| 70 } | |
| 71 | |
| 72 void add_library_search(char *libdir) | |
| 73 { | |
| 74 libdirs = lw_realloc(libdirs, sizeof(char*) * (nlibdirs + 1)); | |
| 75 libdirs[nlibdirs] = lw_strdup(libdir); | |
| 76 nlibdirs++; | |
| 77 } | |
| 78 | |
| 79 void add_section_base(char *sectspec) | |
| 80 { | |
| 81 char *base; | |
| 82 int baseaddr; | |
| 83 char *t; | |
| 84 int l; | |
| 85 | |
| 86 base = strchr(sectspec, '='); | |
| 87 if (!base) | |
| 88 { | |
| 89 l = strlen(sectspec); | |
| 90 baseaddr = 0; | |
| 91 } | |
| 92 else | |
| 93 { | |
| 94 baseaddr = strtol(base + 1, NULL, 16); | |
| 95 l = base - sectspec; | |
| 96 *base = '\0'; | |
| 97 } | |
| 98 baseaddr = baseaddr & 0xffff; | |
| 99 | |
| 100 t = lw_malloc(l + 25); | |
| 101 sprintf(t, "section %s load %04X", sectspec, baseaddr); | |
| 102 if (base) | |
| 103 *base = '='; | |
| 104 | |
| 105 scriptls = lw_realloc(scriptls, sizeof(char *) * (nscriptls + 1)); | |
| 106 scriptls[nscriptls++] = t; | |
| 107 } |