Function luabb_dumpcstack_

lua/luautil.c:113–165

don't call from any of the l_*_tostring functions

//don't call from any of the l_*_tostring functions
void luabb_dumpcstack_(Lua lua)
{
    int i;
    int top = lua_gettop(lua);

    for (i = top; i;  --i) {
        logmsg(LOGMSG_USER, "%2d: ", i);
        switch (lua_type(lua, i)) {
        case LUA_TNIL:
            logmsg(LOGMSG_USER, "nil\n");
            break;
        case LUA_TBOOLEAN:
            logmsg(LOGMSG_USER, "boolean: %s\n", lua_toboolean(lua, i) == 0 ? "false" : "true");
            break;
        case LUA_TLIGHTUSERDATA:
            logmsg(LOGMSG_USER, "lightuserdata\n");
            break;
        case LUA_TNUMBER:
            logmsg(LOGMSG_USER, "number: %f\n", lua_tonumber(lua, i));
            break;
        case LUA_TSTRING:
            logmsg(LOGMSG_USER, "string: \"%s\"\n", lua_tostring(lua, i));
            break;
        case LUA_TTABLE:
            logmsg(LOGMSG_USER, "table\n");
            break;
        case LUA_TFUNCTION:
            logmsg(LOGMSG_USER, "function\n");
            break;
        case LUA_TTHREAD:
            logmsg(LOGMSG_USER, "thread\n");
            break;
        case LUA_TUSERDATA: {
            dbtypes_enum luabb_dbtype(lua_State *, int index);
            dbtypes_enum t = luabb_dbtype(lua, i);
            if (t >= DBTYPES_MAXTYPE) {
                logmsg(LOGMSG_USER, "invalid type\n");
            } else {
                if (dbtypes_tostring[t]) {
                    logmsg(LOGMSG_USER, "%s: %s\n", dbtypes_str[t], luabb_tostring(lua, i));
                } else {
                    logmsg(LOGMSG_USER, "%s\n", dbtypes_str[t]);
                }
            }
            break;
        }
        default:
            logmsg(LOGMSG_USER, "unknown type %d\n",lua_type(lua, i));
            break;

        }
    }
}

int luabb_issql_type(lua_State *lua, int index, int sql_type)
{