--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/utils/testglcompile.c Tue Oct 13 01:02:07 2020 -0400
@@ -0,0 +1,110 @@
+// A simple program to see if the GL implementation will accept a shader
+// generated by MojoShader, as they could also fail to compile what
+// we produce.
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <errno.h>
+
+#include "SDL.h"
+#include "mojoshader.h"
+
+static void * MOJOSHADERCALL get_proc_addr(const char *fnname, void *data)
+{
+ return SDL_GL_GetProcAddress(fnname);
+}
+
+int main(int argc, char **argv)
+{
+ int retval = 1;
+ SDL_Window *sdlwindow = NULL;
+ MOJOSHADER_glContext *mojo = NULL;
+ int i;
+
+ printf("MojoShader testglcompile\n");
+ printf("Compiled against changeset %s\n", MOJOSHADER_CHANGESET);
+ printf("Linked against changeset %s\n", MOJOSHADER_changeset());
+ printf("\n");
+
+ if (argc <= 2)
+ printf("\n\nUSAGE: %s <profile> [file1] ... [fileN]\n\n", argv[0]);
+ else if (SDL_Init(SDL_INIT_VIDEO) == -1)
+ fprintf(stderr, "SDL_Init() error: %s\n", SDL_GetError());
+ else if (SDL_GL_LoadLibrary(NULL) == -1)
+ fprintf(stderr, "SDL_GL_LoadLibrary() error: %s\n", SDL_GetError());
+ else if ((sdlwindow = SDL_CreateWindow(argv[0], SDL_WINDOWPOS_UNDEFINED, SDL_WINDOWPOS_UNDEFINED, 640, 480, SDL_WINDOW_OPENGL)) == NULL)
+ fprintf(stderr, "SDL_CreateWindow() error: %s\n", SDL_GetError());
+ else if (SDL_GL_CreateContext(sdlwindow) == NULL)
+ fprintf(stderr, "SDL_GL_CreateContext() error: %s\n", SDL_GetError());
+ else if ((mojo = MOJOSHADER_glCreateContext(argv[1], get_proc_addr, NULL, NULL, NULL, NULL)) == NULL)
+ fprintf(stderr, "MOJOSHADER_glCreateContext() error: %s\n", MOJOSHADER_glGetError());
+ else
+ retval = 0;
+
+ if (retval != 0)
+ {
+ SDL_Quit();
+ return retval;
+ } // if
+
+ MOJOSHADER_glMakeContextCurrent(mojo);
+
+ for (i = 2; i < argc; i++) {
+ const char *fname = argv[i];
+ static unsigned char buffer[1024 * 512];
+ MOJOSHADER_glShader *shader;
+ MOJOSHADER_glProgram *program;
+ const MOJOSHADER_parseData *pd;
+ int isvshader;
+ FILE *io;
+ size_t br;
+
+ io = fopen(fname, "rb");
+ if (!io) {
+ fprintf(stderr, "Failed to open %s: %s\n", fname, strerror(errno));
+ retval = 1;
+ continue;
+ }
+
+ br = fread(buffer, 1, sizeof (buffer), io);
+ fclose(io);
+
+ shader = MOJOSHADER_glCompileShader(buffer, (unsigned int) br, NULL, 0, NULL, 0);
+ if (!shader) {
+ fprintf(stderr, "Compiling %s failed: %s\n", fname, MOJOSHADER_glGetError());
+ retval = 1;
+ continue;
+ }
+
+ shader = MOJOSHADER_glCompileShader(buffer, (unsigned int) br, NULL, 0, NULL, 0);
+ if (!shader) {
+ fprintf(stderr, "Compiling %s failed: %s\n", fname, MOJOSHADER_glGetError());
+ retval = 1;
+ continue;
+ }
+
+ pd = MOJOSHADER_glGetShaderParseData(shader);
+ isvshader = (pd->shader_type == MOJOSHADER_TYPE_VERTEX);
+ program = MOJOSHADER_glLinkProgram(isvshader ? shader : NULL, isvshader ? NULL : shader);
+ if (!program) {
+ fprintf(stderr, "Linking %s failed: %s\n", fname, MOJOSHADER_glGetError());
+ retval = 1;
+ MOJOSHADER_glDeleteShader(shader);
+ continue;
+ }
+
+ printf("%s: okay\n", fname);
+
+ MOJOSHADER_glDeleteProgram(program);
+ MOJOSHADER_glDeleteShader(shader);
+ }
+
+ MOJOSHADER_glDestroyContext(mojo);
+ SDL_Quit();
+
+ return retval;
+}
+
+// end of testglcompile.c ...
+