testparse.c
1
#include <stdio.h>
2
#include <stdlib.h>
3
#include "mojoshader.h"
6
#if MOJOSHADER_DEBUG_MALLOC
7
8
9
10
11
12
13
14
15
16
17
18
19
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)
{
20
21
int *ptr = (((int *) _ptr) - 1);
int len = *ptr;
22
23
24
25
26
27
28
29
printf("free() %d bytes (%p)\n", len, ptr);
free(ptr);
} // Free
#else
#define Malloc NULL
#define Free NULL
#endif
30
static const char *shader_type(const MOJOSHADER_shaderType s)
31
32
33
34
35
36
37
{
switch (s)
{
case MOJOSHADER_TYPE_UNKNOWN: return "unknown";
case MOJOSHADER_TYPE_PIXEL: return "pixel";
case MOJOSHADER_TYPE_VERTEX: return "vertex";
case MOJOSHADER_TYPE_GEOMETRY: return "geometry";
38
default: return "(bogus value?)";
39
40
} // switch
41
return NULL; // shouldn't hit this.
42
43
44
} // shader_type
45
static void do_parse(const unsigned char *buf, const int len, const char *prof)
46
47
48
{
const MOJOSHADER_parseData *pd;
49
pd = MOJOSHADER_parse(prof, buf, len, Malloc, Free, NULL);
50
51
52
printf("PROFILE: %s\n", prof);
if (pd->error != NULL)
printf("ERROR: %s\n", pd->error);
53
54
55
56
57
else
{
printf("SHADER TYPE: %s\n", shader_type(pd->shader_type));
printf("VERSION: %d.%d\n", pd->major_ver, pd->minor_ver);
printf("INSTRUCTION COUNT: %d\n", (int) pd->instruction_count);
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
printf("ATTRIBUTES:");
if (pd->attribute_count == 0)
printf(" (none.)\n");
else
{
int i;
printf("\n");
for (i = 0; i < pd->attribute_count; i++)
{
static const char *usagenames[] = {
"position", "blendweight", "blendindices", "normal",
"psize", "texcoord", "tangent", "binormal", "tessfactor",
"positiont", "color", "fog", "depth", "sample"
};
const MOJOSHADER_attribute *a = &pd->attributes[i];
char numstr[16] = { 0 };
if (a->index != 0)
snprintf(numstr, sizeof (numstr), "%d", a->index);
printf(" * %s%s\n", usagenames[(int) a->usage], numstr);
} // for
} // else
81
82
83
84
85
86
87
88
89
printf("UNIFORMS:");
if (pd->uniform_count == 0)
printf(" (none.)\n");
else
{
int i;
printf("\n");
for (i = 0; i < pd->uniform_count; i++)
{
90
static const char *typenames[] = { "float", "int", "bool" };
91
const MOJOSHADER_uniform *u = &pd->uniforms[i];
92
printf(" * %d: %s\n", u->index, typenames[(int) u->type]);
93
94
95
} // for
} // else
96
97
98
if (pd->output != NULL)
printf("OUTPUT:\n%s\n", pd->output);
} // else
99
100
101
102
103
printf("\n\n");
MOJOSHADER_freeParseData(pd);
} // do_parse
104
105
int main(int argc, char **argv)
{
106
printf("MojoShader testparse\n");
107
108
printf("Compiled against version %d\n", MOJOSHADER_VERSION);
printf("Linked against version %d\n", MOJOSHADER_version());
109
printf("\n");
111
112
if (argc <= 2)
printf("\n\nUSAGE: %s <profile> [file1] ... [fileN]\n\n", argv[0]);
113
else
115
116
117
118
const char *profile = argv[1];
int i;
for (i = 2; i < argc; i++)
120
121
122
FILE *io = fopen(argv[i], "rb");
printf("FILE: %s\n", argv[i]);
if (io == NULL)
123
printf(" ... fopen('%s') failed.\n", argv[i]);
124
125
126
127
128
else
{
unsigned char *buf = (unsigned char *) malloc(1000000);
int rc = fread(buf, 1, 1000000, io);
fclose(io);
129
do_parse(buf, rc, profile);
130
131
132
133
free(buf);
} // else
} // for
} // else
134
135
136
137
138
return 0;
} // main
// end of testparse.c ...