From ae4e17fc743ca0344af818ab767db7311ea7829c Mon Sep 17 00:00:00 2001 From: sanine Date: Tue, 23 Aug 2022 13:28:01 -0500 Subject: add basic transforms --- src/gl/shader.c | 19 ++++++++++++++++++- 1 file changed, 18 insertions(+), 1 deletion(-) (limited to 'src/gl') diff --git a/src/gl/shader.c b/src/gl/shader.c index b4d03e6..3732aff 100644 --- a/src/gl/shader.c +++ b/src/gl/shader.c @@ -18,6 +18,8 @@ int gl_uniform_get_location(lua_State *L); int gl_uniform_1i(lua_State *L); int gl_uniform_4f(lua_State *L); +int gl_uniform_matrix_4fv(lua_State *L); + void setup_shader(lua_State *L, int gl_index) { @@ -37,6 +39,8 @@ void setup_shader(lua_State *L, int gl_index) hs_str_cfunc("Uniform1i", gl_uniform_1i), hs_str_cfunc("Uniform4f", gl_uniform_4f), + hs_str_cfunc("UniformMatrix4fv", gl_uniform_matrix_4fv), + /******** enums ********/ /* shader types */ hs_str_int("VERTEX_SHADER", GL_VERTEX_SHADER), @@ -63,7 +67,7 @@ int gl_shader_set_source(lua_State *L) lua_Integer shader; char *code; hs_parse_args(L, hs_int(shader), hs_str(code)); - glShaderSource(shader, 1, &code, NULL); + glShaderSource(shader, 1, (const GLchar * const*)&code, NULL); return 0; } @@ -161,3 +165,16 @@ int gl_uniform_4f(lua_State *L) glUniform4f(location, v0, v1, v2, v3); return 0; } + + +int gl_uniform_matrix_4fv(lua_State *L) +{ + lua_Integer location; + bool transpose; + void *ptr; + hs_parse_args(L, hs_int(location), hs_bool(transpose), hs_user(ptr)); + + float *value = ptr; + glUniformMatrix4fv(location, 1, transpose, value); + return 0; +} -- cgit v1.2.1