finderrors.c
1
2
3
4
5
6
7
8
9
/**
* 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.
*/
10
11
12
13
14
15
16
17
18
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <stdarg.h>
#include <sys/types.h>
#include <errno.h>
#include "mojoshader.h"
19
20
#if FINDERRORS_COMPILE_SHADERS
#include "SDL.h"
21
22
23
24
25
static void *lookup(const char *fnname, void *unused)
{
(void) unused;
return SDL_GL_GetProcAddress(fnname);
} // lookup
28
#ifdef _MSC_VER
29
30
#define WIN32_LEAN_AND_MEAN 1
#include <windows.h>
31
#include <malloc.h> // for alloca().
32
#define snprintf _snprintf
33
34
#else
#include <dirent.h>
35
36
#endif
37
#define report printf
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
static int do_file(const char *profile, const char *dname, const char *fn, int *total)
{
int do_quit = 0;
#if FINDERRORS_COMPILE_SHADERS
SDL_Event e; // pump event queue to keep OS happy.
while (SDL_PollEvent(&e))
{
if (e.type == SDL_QUIT)
do_quit = 1;
} // while
SDL_GL_SwapBuffers();
#endif
if (do_quit)
{
report("FAIL: user requested quit!\n");
return 0;
} // if
59
60
int assembly = 0;
if (strstr(fn, ".bytecode") != NULL)
61
assembly = 0;
62
63
64
else if (strstr(fn, ".disasm") != NULL)
assembly = 1;
else
65
66
67
68
69
70
71
72
73
74
75
76
77
78
return 1;
(*total)++;
char *fname = (char *) alloca(strlen(fn) + strlen(dname) + 1);
sprintf(fname, "%s/%s", dname, fn);
FILE *io = fopen(fname, "rb");
if (io == NULL)
{
report("FAIL: %s fopen() failed.\n", fname);
return 1;
} // if
static unsigned char buf[1024 * 256];
79
int rc = fread(buf, 1, sizeof (buf), io);
80
81
82
83
84
85
86
fclose(io);
if (rc == -1)
{
report("FAIL: %s %s\n", fname, strerror(errno));
return 1;
} // if
87
88
89
90
if (assembly)
{
const MOJOSHADER_parseData *a;
91
buf[rc] = '\0'; // make sure the source is null-terminated.
92
a = MOJOSHADER_assemble(fname, (char *) buf, rc, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0);
94
if (a->error_count > 0)
96
97
98
99
report("FAIL: %s (line %d) %s\n",
a->errors[0].filename ? a->errors[0].filename : "???",
a->errors[0].error_position,
a->errors[0].error);
100
101
102
103
104
105
106
107
108
109
110
111
112
113
return 1;
} // if
else if (a->output_len > sizeof (buf))
{
report("FAIL: %s buffer overflow in finderrors.c\n", fname);
return 1;
} // if
rc = a->output_len;
memcpy(buf, a->output, rc);
MOJOSHADER_freeParseData(a);
} // if
114
#if FINDERRORS_COMPILE_SHADERS
115
MOJOSHADER_glShader *shader = MOJOSHADER_glCompileShader(buf, rc, NULL, 0);
116
117
118
if (shader == NULL)
report("FAIL: %s %s\n", fname, MOJOSHADER_glGetError());
else
119
120
121
122
123
124
125
126
127
128
129
130
131
132
{
const MOJOSHADER_parseData *pd = MOJOSHADER_glGetShaderParseData(shader);
MOJOSHADER_glShader *v = (pd->shader_type == MOJOSHADER_TYPE_VERTEX) ? shader : NULL;
MOJOSHADER_glShader *p = (pd->shader_type == MOJOSHADER_TYPE_PIXEL) ? shader : NULL;
MOJOSHADER_glProgram *program = MOJOSHADER_glLinkProgram(v, p);
if (program == NULL)
report("FAIL: %s %s\n", fname, MOJOSHADER_glGetError());
else
{
report("PASS: %s\n", fname);
MOJOSHADER_glDeleteProgram(program);
} // else
MOJOSHADER_glDeleteShader(shader);
}
133
#else
134
const MOJOSHADER_parseData *pd = MOJOSHADER_parse(profile, buf, rc, NULL, 0, NULL, NULL, NULL);
135
if (pd->error != NULL)
136
report("FAIL: %s (position %d) %s\n", fname, pd->error_position, pd->error);
137
138
139
140
141
142
143
144
145
else
report("PASS: %s\n", fname);
MOJOSHADER_freeParseData(pd);
#endif
return 1;
} // do_file
146
static int do_dir(const char *dname, const char *profile)
147
148
{
int total = 0;
149
150
151
152
#ifdef _MSC_VER
WIN32_FIND_DATA dent;
HANDLE dirp = INVALID_HANDLE_VALUE;
153
FindFirstFileA(dname, &dent);
154
155
156
157
158
159
if (dirp != INVALID_HANDLE_VALUE)
{
do
{
if (!do_file(profile, dname, dent.cFileName, &total))
break;
160
} while (FindNextFileA(dirp, &dent) != 0);
161
162
163
164
CloseHandle(dirp);
} // if
#else
struct dirent *dent = NULL;
165
166
167
168
169
DIR *dirp = opendir(dname);
if (dirp != NULL)
{
while ((dent = readdir(dirp)) != NULL)
{
170
if (!do_file(profile, dname, dent->d_name, &total))
172
173
174
} // while
closedir(dirp);
} // if
175
#endif
176
177
178
179
180
181
182
183
return total;
} // do_dir
int main(int argc, char **argv)
{
//printf("MojoShader finderrors\n");
184
185
//printf("Compiled against changeset %s\n", MOJOSHADER_CHANGESET);
//printf("Linked against changeset %s\n", MOJOSHADER_changeset());
186
187
188
189
190
191
192
//printf("\n");
if (argc <= 2)
printf("\n\nUSAGE: %s <profile> [dir1] ... [dirN]\n\n", argv[0]);
else
{
int total = 0;
194
const char *profile = argv[1];
196
197
#if FINDERRORS_COMPILE_SHADERS
SDL_Init(SDL_INIT_VIDEO);
198
SDL_GL_LoadLibrary(NULL);
199
SDL_SetVideoMode(640, 480, 0, SDL_OPENGL);
200
printf("Best profile is '%s'\n", MOJOSHADER_glBestProfile(lookup, 0));
201
MOJOSHADER_glContext *ctx;
202
ctx = MOJOSHADER_glCreateContext(profile, lookup, 0, 0, 0, 0);
203
if (ctx == NULL)
205
printf("MOJOSHADER_glCreateContext() fail: %s\n", MOJOSHADER_glGetError());
206
207
208
SDL_Quit();
return 1;
} // if
209
MOJOSHADER_glMakeContextCurrent(ctx);
212
for (i = 2; i < argc; i++)
213
total += do_dir(argv[i], profile);
215
printf("Saw %d files.\n", total);
217
#if FINDERRORS_COMPILE_SHADERS
218
MOJOSHADER_glDestroyContext(ctx);
219
220
SDL_Quit();
#endif
221
222
223
224
225
226
} // else
return 0;
} // main
// end of finderrors.c ...