summaryrefslogtreecommitdiff
path: root/src/cglm_bindings.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/cglm_bindings.c')
-rw-r--r--src/cglm_bindings.c184
1 files changed, 71 insertions, 113 deletions
diff --git a/src/cglm_bindings.c b/src/cglm_bindings.c
index 300b85b..8123d7a 100644
--- a/src/cglm_bindings.c
+++ b/src/cglm_bindings.c
@@ -236,80 +236,62 @@ int honey_cglm_vec4_norm(lua_State* L)
int honey_cglm_vec4_add(lua_State* L)
{
- if (!honey_lua_validate_types(L, 2, HONEY_USERDATA, HONEY_USERDATA))
- lua_error(L);
-
- float* a = lua_touserdata(L, 1);
- float* b = lua_touserdata(L, 2);
-
- float* dest = lua_newuserdata(L, 4*sizeof(float));
-
+ float* a, *b, *dest;
+ honey_lua_parse_arguments(L, 3,
+ HONEY_USERDATA, &a,
+ HONEY_USERDATA, &b,
+ HONEY_USERDATA, &dest);
glm_vec4_add(a, b, dest);
-
- return 1;
+ return 0;
}
/* ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ */
int honey_cglm_vec4_adds(lua_State* L)
{
- if (!honey_lua_validate_types(L, 2, HONEY_NUMBER, HONEY_USERDATA))
- lua_error(L);
-
- float a = lua_tonumber(L, 1);
- float* v = lua_touserdata(L, 2);
-
- float* dest = lua_newuserdata(L, 4*sizeof(float));
-
+ float a, *v, *dest;
+ honey_lua_parse_arguments(L, 3,
+ HONEY_NUMBER, &a,
+ HONEY_USERDATA, &v,
+ HONEY_USERDATA, &dest);
glm_vec4_adds(v, a, dest);
-
- return 1;
+ return 0;
}
/* ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ */
int honey_cglm_vec4_mul(lua_State* L)
{
- if (!honey_lua_validate_types(L, 2, HONEY_USERDATA, HONEY_USERDATA))
- lua_error(L);
-
- float* a = lua_touserdata(L, 1);
- float* b = lua_touserdata(L, 2);
-
- float* dest = lua_newuserdata(L, 4*sizeof(float));
-
+ float *a, *b, *dest;
+ honey_lua_parse_arguments(L, 3,
+ HONEY_USERDATA, &a,
+ HONEY_USERDATA, &b,
+ HONEY_USERDATA, &dest);
glm_vec4_mul(a, b, dest);
-
- return 1;
+ return 0;
}
/* ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ */
int honey_cglm_vec4_muls(lua_State* L)
{
- if (!honey_lua_validate_types(L, 2, HONEY_NUMBER, HONEY_USERDATA))
- lua_error(L);
-
- float a = lua_tonumber(L, 1);
- float* v = lua_touserdata(L, 2);
-
- float* dest = lua_newuserdata(L, 4*sizeof(float));
-
+ float a, *v, *dest;
+ honey_lua_parse_arguments(L, 3,
+ HONEY_NUMBER, &a,
+ HONEY_USERDATA, &v,
+ HONEY_USERDATA, &dest);
glm_vec4_scale(v, a, dest);
-
- return 1;
+ return 0;
}
/* ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ */
int honey_cglm_vec4_normalize(lua_State* L)
{
- if (!honey_lua_validate_types(L, 1, HONEY_USERDATA))
- lua_error(L);
+ float* a;
+ honey_lua_parse_arguments(L, 1, HONEY_USERDATA, &a);
- float* v = lua_touserdata(L, 1);
-
- glm_vec4_normalize(v);
+ glm_vec4_normalize(a);
return 0;
}
@@ -318,11 +300,10 @@ int honey_cglm_vec4_normalize(lua_State* L)
int honey_cglm_vec4_distance(lua_State* L)
{
- if (!honey_lua_validate_types(L, 2, HONEY_USERDATA, HONEY_USERDATA))
- lua_error(L);
-
- float* a = lua_touserdata(L, 1);
- float* b = lua_touserdata(L, 2);
+ float* a, *b;
+ honey_lua_parse_arguments(L, 2,
+ HONEY_USERDATA, &a,
+ HONEY_USERDATA, &b);
float distance = glm_vec4_distance(a, b);
lua_pushnumber(L, distance);
@@ -334,18 +315,15 @@ int honey_cglm_vec4_distance(lua_State* L)
int honey_cglm_vec4_lerp(lua_State* L)
{
- if (!honey_lua_validate_types(L, 3, HONEY_USERDATA, HONEY_USERDATA, HONEY_NUMBER))
- lua_error(L);
-
- float* a = lua_touserdata(L, 1);
- float* b = lua_touserdata(L, 2);
- float s = lua_tonumber(L, 3);
-
- float* dest = lua_newuserdata(L, 4*sizeof(float));
-
+ float* a, *b, s, *dest;
+ honey_lua_parse_arguments(L, 4,
+ HONEY_USERDATA, &a,
+ HONEY_USERDATA, &b,
+ HONEY_NUMBER, &s,
+ HONEY_USERDATA, &dest);
glm_vec4_lerp(a, b, s, dest);
- return 1;
+ return 0;
}
/* ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
@@ -369,64 +347,52 @@ int honey_cglm_mat4_identity(lua_State* L)
int honey_cglm_mat4_pick3(lua_State* L)
{
- if (!honey_lua_validate_types(L, 1, HONEY_USERDATA))
- lua_error(L);
-
- float* matrix = lua_touserdata(L, 1);
-
- float* dest = lua_newuserdata(L, 9*sizeof(float));
+ float* matrix, *dest;
+ honey_lua_parse_arguments(L, 2,
+ HONEY_USERDATA, &matrix,
+ HONEY_USERDATA, &dest);
glm_mat4_pick3(matrix, dest);
- return 1;
+ return 0;
}
/* ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ */
int honey_cglm_mat4_mul(lua_State* L)
{
- if (!honey_lua_validate_types(L, 2, HONEY_USERDATA))
- lua_error(L);
-
- float* A = lua_touserdata(L, 1);
- float* B = lua_touserdata(L, 2);
-
- float* dest = lua_newuserdata(L, 16*sizeof(float));
-
+ float* A, *B, *dest;
+ honey_lua_parse_arguments(L, 3,
+ HONEY_USERDATA, &A,
+ HONEY_USERDATA, &B,
+ HONEY_USERDATA, &dest);
glm_mat4_mul(A, B, dest);
-
- return 1;
+ return 0;
}
/* ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ */
int honey_cglm_mat4_muls(lua_State* L)
{
- if (!honey_lua_validate_types(L, 2, HONEY_NUMBER, HONEY_USERDATA))
- lua_error(L);
-
- float a = lua_tonumber(L, 1);
- float* M = lua_touserdata(L, 2);
-
- float* dest = lua_newuserdata(L, 16*sizeof(float));
+ float a;
+ float* M;
+ honey_lua_parse_arguments(L, 2,
+ HONEY_NUMBER, &a,
+ HONEY_USERDATA, &M);
glm_mat4_scale(M, a);
- return 1;
+ return 0;
}
/* ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ */
int honey_cglm_mat4_mulv(lua_State* L)
{
- if (!honey_lua_validate_types(L, 2, HONEY_USERDATA))
- lua_error(L);
-
- float* M = lua_touserdata(L, 1);
- float* v = lua_touserdata(L, 2);
-
- float* dest = lua_newuserdata(L, 4*sizeof(float));
-
+ float* M, *v, *dest;
+ honey_lua_parse_arguments(L, 3,
+ HONEY_USERDATA, &M,
+ HONEY_USERDATA, &v,
+ HONEY_USERDATA, &dest);
glm_mat4_mulv(M, v, dest);
-
- return 1;
+ return 0;
}
/* ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ */
@@ -477,32 +443,24 @@ int honey_cglm_mat4_trace(lua_State* L)
int honey_cglm_mat4_inv(lua_State* L)
{
- if (!honey_lua_validate_types(L, 1, HONEY_USERDATA))
- lua_error(L);
-
- float* M = lua_touserdata(L, 1);
-
- float* dest = lua_newuserdata(L, 16*sizeof(float));
-
+ float* M, *dest;
+ honey_lua_parse_arguments(L, 2,
+ HONEY_USERDATA, &M,
+ HONEY_USERDATA, &dest);
glm_mat4_inv(M, dest);
-
- return 1;
+ return 0;
}
/* ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ */
int honey_cglm_mat4_inv_fast(lua_State* L)
{
- if (!honey_lua_validate_types(L, 1, HONEY_USERDATA))
- lua_error(L);
-
- float* M = lua_touserdata(L, 1);
-
- float* dest = lua_newuserdata(L, 16*sizeof(float));
-
+ float* M, *dest;
+ honey_lua_parse_arguments(L, 2,
+ HONEY_USERDATA, &M,
+ HONEY_USERDATA, &dest);
glm_mat4_inv_fast(M, dest);
-
- return 1;
+ return 0;
}
/* ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~