Function comdb2_table

lua/sp.c:1236–1271

}

static int comdb2_table(Lua lua)
{
    if (!lua_isstring(lua, 1))
        return luabb_error(lua, getsp(lua), "bad argument to 'table'");
    const char *table_name = lua_tostring(lua, 1);
    while (isspace(*table_name))
        ++table_name;
    char n1[MAXTABLELEN], n2[MAXTABLELEN];
    if (two_part_tbl_name(table_name, n1, n2) != 0) {
        return luabb_error(lua, getsp(lua), "bad argument to 'table'");
    }

    dbtable_t *dbtable;
    new_lua_t(dbtable, dbtable_t, DBTYPES_DBTABLE);
    strcpy(dbtable->table_name, table_name);

    // figure out if dbtable is a tmp-tbl
    if (strcasecmp(n1, "temp") == 0) {
        dbtable->is_temp_tbl = 1;
    } else if (strcmp(n1, "") == 0) {
        // not main.tablename or fdb.tablename
        // go through tmp tbls
        SP sp = getsp(lua);
        tmptbl_info_t *tbl;
        LIST_FOREACH(tbl, &sp->tmptbls, entries) {
            char n3[MAXTABLELEN], n4[MAXTABLELEN];
            two_part_tbl_name(tbl->name, n3, n4);
            if (strcasecmp(n2, n4) == 0) {
                dbtable->is_temp_tbl = 1;
                break;
            }
        }
    }
    lua_pushinteger(lua, 0);
    return 2;
}

static int new_temp_table(Lua lua)
{