/
mojoshader-compiler.c
263 lines (222 loc) · 6.57 KB
1
2
3
4
5
6
7
8
9
10
11
/**
* MojoShader; generate shader programs from bytecode of compiled
* Direct3D shaders.
*
* Please see the file LICENSE.txt in the source's root directory.
*
* This file written by Ryan C. Gordon.
*/
#include <stdio.h>
#include <stdlib.h>
12
#include <string.h>
13
14
#include "mojoshader.h"
15
16
17
static const char **include_paths = NULL;
static unsigned int include_path_count = 0;
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
#if MOJOSHADER_DEBUG_MALLOC
static void *Malloc(int len)
{
void *ptr = malloc(len + sizeof (int));
int *store = (int *) ptr;
printf("malloc() %d bytes (%p)\n", len, ptr);
if (ptr == NULL) return NULL;
*store = len;
return (void *) (store + 1);
} // Malloc
static void Free(void *_ptr)
{
int *ptr = (((int *) _ptr) - 1);
int len = *ptr;
printf("free() %d bytes (%p)\n", len, ptr);
free(ptr);
} // Free
#else
#define Malloc NULL
#define Free NULL
#endif
41
42
43
44
45
46
47
48
49
static void fail(const char *err)
{
printf("%s.\n", err);
exit(1);
} // fail
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
static int open_include(MOJOSHADER_includeType inctype, const char *fname,
const char *parent, const char **outdata,
unsigned int *outbytes, MOJOSHADER_malloc m,
MOJOSHADER_free f, void *d)
{
int i;
for (i = 0; i < include_path_count; i++)
{
const char *path = include_paths[i];
const size_t len = strlen(path) + strlen(fname) + 2;
char *buf = (char *) m(len, d);
if (buf == NULL)
return 0;
snprintf(buf, len, "%s/%s", path, fname);
FILE *io = fopen(buf, "rb");
f(buf, d);
if (io == NULL)
continue;
if (fseek(io, 0, SEEK_END) != -1)
{
const long fsize = ftell(io);
if ((fsize == -1) || (fseek(io, 0, SEEK_SET) == -1))
{
fclose(io);
return 0;
} // if
char *data = (char *) m(fsize, d);
if (data == NULL)
{
fclose(io);
return 0;
} // if
if (fread(data, fsize, 1, io) != 1)
{
f(data, d);
fclose(io);
return 0;
} // if
fclose(io);
*outdata = data;
*outbytes = (unsigned int) fsize;
return 1;
} // if
} // for
return 0;
} // open_include
104
105
static void close_include(const char *data, MOJOSHADER_malloc m,
MOJOSHADER_free f, void *d)
106
107
108
109
110
{
f((void *) data, d);
} // close_include
111
static int preprocess(const char *fname, const char *buf, int len,
112
113
114
const char *outfile,
const MOJOSHADER_preprocessorDefine *defs,
unsigned int defcount)
115
{
116
FILE *io = outfile ? fopen(outfile, "wb") : stdout;
117
118
119
120
121
122
123
124
125
if (io == NULL)
{
printf(" ... fopen('%s') failed.\n", outfile);
return 0;
} // if
const MOJOSHADER_preprocessData *pd;
int retval = 0;
126
127
pd = MOJOSHADER_preprocess(fname, buf, len, defs, defcount, open_include,
close_include, Malloc, Free, NULL);
128
129
130
131
132
133
if (pd->error_count > 0)
{
int i;
for (i = 0; i < pd->error_count; i++)
{
134
135
printf("%s:%d: ERROR: %s\n",
pd->errors[i].filename ? pd->errors[i].filename : "???",
136
137
138
139
140
141
142
143
144
145
pd->errors[i].error_position,
pd->errors[i].error);
} // for
} // if
else
{
if (pd->output != NULL)
{
if (fwrite(pd->output, pd->output_len, 1, io) != 1)
printf(" ... fwrite('%s') failed.\n", outfile);
146
else if ((outfile != NULL) && (fclose(io) == EOF))
147
148
149
150
151
152
153
154
printf(" ... fclose('%s') failed.\n", outfile);
else
retval = 1;
} // if
} // else
MOJOSHADER_freePreprocessData(pd);
return retval;
155
} // preprocess
156
157
158
159
160
int main(int argc, char **argv)
{
int retval = 1;
161
162
163
const char *infile = NULL;
const char *outfile = NULL;
int i;
164
165
166
167
168
169
170
171
172
173
174
MOJOSHADER_preprocessorDefine *defs = NULL;
unsigned int defcount = 0;
for (i = 1; i < argc; i++)
{
const char *arg = argv[i];
if (strcmp(arg, "-o") == 0)
{
if (outfile != NULL)
175
fail("multiple output files specified");
176
177
178
arg = argv[++i];
if (arg == NULL)
179
fail("no filename after '-o'");
180
181
182
outfile = arg;
} // if
183
else if (strcmp(arg, "-I") == 0)
184
185
186
{
arg = argv[++i];
if (arg == NULL)
187
188
fail("no path after '-I'");
189
190
191
192
193
194
include_paths = (const char **) realloc(include_paths,
(include_path_count+1) * sizeof (char *));
include_paths[include_path_count] = arg;
include_path_count++;
} // if
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
else if (strncmp(arg, "-D", 2) == 0)
{
arg += 2;
char *ident = strdup(arg);
char *ptr = strchr(ident, '=');
const char *val = "";
if (ptr)
{
*ptr = '\0';
val = ptr+1;
} // if
defs = (MOJOSHADER_preprocessorDefine *) realloc(defs,
(defcount+1) * sizeof (MOJOSHADER_preprocessorDefine));
defs[defcount].identifier = ident;
defs[defcount].definition = val;
defcount++;
} // else if
else
{
if (infile != NULL)
217
fail("multiple input files specified.");
218
219
220
221
222
infile = arg;
} // else
} // for
if (infile == NULL)
223
fail("no input file specified.");
224
225
226
227
FILE *io = fopen(infile, "rb");
if (io == NULL)
printf(" ... fopen('%s') failed.\n", infile);
228
229
else
{
230
231
232
233
234
235
236
fseek(io, 0, SEEK_END);
long fsize = ftell(io);
fseek(io, 0, SEEK_SET);
if (fsize == -1)
fsize = 1000000;
char *buf = (char *) malloc(fsize);
const int rc = fread(buf, 1, fsize, io);
237
238
239
fclose(io);
if (rc == EOF)
printf(" ... fread('%s') failed.\n", infile);
240
241
else
{
242
243
if (preprocess(infile, buf, rc, outfile, defs, defcount))
retval = 0;
244
245
else
{
246
if (outfile != NULL)
247
248
remove(outfile);
} // else
249
250
free(buf);
} // else
251
252
} // else
253
for (i = 0; i < defcount; i++)
254
free((void *) defs[i].identifier);
255
256
free(defs);
257
258
free(include_paths);
259
260
261
return retval;
} // main
262
// end of mojoshader-compiler.c ...