From 4329c4e47c43dd34a106b5c8158f06728780629a Mon Sep 17 00:00:00 2001 From: Tomasz Kramkowski Date: Tue, 27 Mar 2018 18:51:07 +0100 Subject: glprog: Wrap OpenGL program object loading glprog provides a simple interface to loadign OpenGL program objects and getting their uniform locations. --- glprog.c | 72 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 72 insertions(+) create mode 100644 glprog.c (limited to 'glprog.c') diff --git a/glprog.c b/glprog.c new file mode 100644 index 0000000..84f2bab --- /dev/null +++ b/glprog.c @@ -0,0 +1,72 @@ +/* + * Copyright (C) 2018 Tomasz Kramkowski + * SPDX-License-Identifier: MIT + */ +#include + +#include "eprintf.h" +#include "glprog.h" +#include "loadgl.h" + +enum { + LOGSIZE = 1024, +}; + +static GLuint load_shader(const struct shdrdat *shdr) +{ + GLuint id; + GLint success; + char log[LOGSIZE]; + + id = gl_shdr_create(shdr->type); + gl_shdr_source(id, 1, &shdr->src, &shdr->len); + gl_shdr_compile(id); + gl_shdr_param(id, GL_COMPILE_STATUS, &success); + + if (!success) { + gl_shdr_infolog(id, sizeof log, NULL, log); + eprintf("Failed to compile shader:\n%s", log); + } + + return id; +} + +void detach_shaders(GLuint prog) +{ + GLsizei count; + GLuint shdr; + + while (gl_prog_getshdrs(prog, 1, &count, &shdr), count) + gl_prog_detachshdr(prog, shdr); +} + +GLuint glprog_load(int nshdrs, const struct shdrdat *shdrs, int nunis, const struct unidat *unis) +{ + GLuint prog; + GLint success; + char log[LOGSIZE]; + + assert(nshdrs > 0); + assert(shdrs != NULL); + assert(nunis <= 0 || unis != NULL); + + prog = gl_prog_create(); + for (int i = 0; i < nshdrs; i++) { + GLuint shdr = load_shader(&shdrs[i]); + gl_prog_attachshdr(prog, shdr); + gl_shdr_del(shdr); + } + gl_prog_link(prog); + gl_prog_param(prog, GL_LINK_STATUS, &success); + if (!success) { + gl_prog_infolog(prog, sizeof log, NULL, log); + eprintf("Failed to link program:\n%s", log); + } + + detach_shaders(prog); + + for (int i = 0; i < nunis; i++) + *unis[i].loc = gl_uni_loc(prog, unis[i].name); + + return prog; +} -- cgit v1.2.3-54-g00ecf