Function db_bootstrap

lua/sp.c:4867–4905

}

static int db_bootstrap(Lua L)
{
    luaL_checkudata(L, 1, dbtypes.db);
    lua_pop(L, 1);

    lua_Debug ar = {0};
    const int frame = 2; // 0 -> db_bootstrap , 1 -> comdb2_main, 2 -> SP
    if (lua_getstack(L, frame, &ar) == 0) return 0;

    lua_getglobal(L, "_SP");
    lua_newtable(L);
    lua_setfield(L, -2, "cdb2_func_refs");
    lua_newtable(L);
    lua_setfield(L, -2, "cdb2_func_names");

    lua_getfield(L, 1, "cdb2_func_refs");
    lua_getfield(L, 1, "cdb2_func_names");

    // Stack:
    //   3: table for lookup by name
    //   2: table for lookup by ref
    //   1: _SP{}

    int n = 1; // 1st local variable
    const char *name;
    while ((name = lua_getlocal(L, &ar, n++)) != NULL) {
        if (!lua_isfunction(L, -1)) {
            lua_pop(L, 1);
            continue;
        }
        lua_pushvalue(L, -1);     // push copy of func
        lua_setfield(L, 3, name); // _SP.cdb2_func_names[funcname] = func
        lua_pushstring(L, name);
        lua_settable(L, 2); // _SP.cdb2_func_refs[func] = funcname
    }
    lua_settop(L, 0);

    return 0;
}

static int db_ctrace(Lua L)
{