void *class_ptr;
khiter_t k;
gint r, nmethods = 0;
+ gboolean seen_index = false;
k = kh_put (lua_class_set, lua_classes, classname, &r);
class_ptr = RSPAMD_LIGHTUSERDATA_MASK (kh_key (lua_classes, k));
if (methods) {
for (;;) {
if (methods[nmethods].name != NULL) {
+ if (strcmp (methods[nmethods].name, "__index") == 0) {
+ seen_index = true;
+ }
nmethods ++;
}
else {
}
lua_createtable (L, 0, 3 + nmethods);
- lua_pushstring (L, "__index");
- lua_pushvalue (L, -2); /* pushes the metatable */
- lua_settable (L, -3); /* metatable.__index = metatable */
+
+ if (!seen_index) {
+ lua_pushstring (L, "__index");
+ lua_pushvalue (L, -2); /* pushes the metatable */
+ lua_settable (L, -3); /* metatable.__index = metatable */
+ }
lua_pushstring (L, "class");
lua_pushstring (L, classname);
lua_logger_out_userdata (lua_State *L, gint pos, gchar *outbuf, gsize len,
struct lua_logger_trace *trace)
{
- gint r, top;
+ gint r = 0, top;
const gchar *str = NULL;
gboolean converted_to_str = FALSE;
lua_gettable (L, -2);
if (!lua_istable (L, -1)) {
+
+ if (lua_isfunction (L, -1)) {
+ /* Functional metatable, try to get __tostring directly */
+ lua_pushstring (L, "__tostring");
+ lua_gettable (L, -3);
+
+ if (lua_isfunction (L, -1)) {
+ lua_pushvalue (L, pos);
+
+ if (lua_pcall (L, 1, 1, 0) != 0) {
+ lua_settop (L, top);
+
+ return 0;
+ }
+
+ str = lua_tostring (L, -1);
+
+ if (str) {
+ r = rspamd_snprintf (outbuf, len, "%s", str);
+ }
+
+ lua_settop (L, top);
+
+ return r;
+ }
+ }
lua_settop (L, top);
return 0;