123 #include <stringprep.h> |
123 #include <stringprep.h> |
124 |
124 |
125 static int stringprep_prep(lua_State *L, const Stringprep_profile *profile) |
125 static int stringprep_prep(lua_State *L, const Stringprep_profile *profile) |
126 { |
126 { |
127 size_t len; |
127 size_t len; |
128 const char *s = luaL_checklstring(L, 1, &len); |
128 const char *s; |
129 char string[1024]; |
129 char string[1024]; |
130 int ret; |
130 int ret; |
|
131 if(!lua_isstring(L, 1)) { |
|
132 lua_pushnil(L); |
|
133 return 1; |
|
134 } |
|
135 s = lua_tolstring(L, 1, &len); |
131 if (len >= 1024) { |
136 if (len >= 1024) { |
132 lua_pushnil(L); |
137 lua_pushnil(L); |
133 return 1; // TODO return error message |
138 return 1; // TODO return error message |
134 } |
139 } |
135 strcpy(string, s); |
140 strcpy(string, s); |