Function sp_column_ptr

lua/sp.c:606–646

}

void *sp_column_ptr(struct response_data *arg, int col, int type, size_t *len)
{
    SP sp = arg->sp;
    Lua L = sp->lua;
    int idx = col_to_idx(arg->ncols, col);
    char *c;
    blob_t b;
    lua_cstring_t *cs;
    switch (type) {
    case SQLITE_TEXT:
        switch (luabb_type(L, idx)) {
        case DBTYPES_LNUMBER:
        case DBTYPES_LSTRING:
            c = (char *)lua_tolstring(L, idx, len);
            break;
        case DBTYPES_CSTRING:
            cs = lua_touserdata(L, idx);
            c = cs->val;
            *len = strlen(c);
            break;
        default:
            c = (char *)luabb_tostring_noerr(L, idx);
            if (!c) break;
            c = strdup(c);
            *len = strlen(c);
            luabb_pushcstring_dl(L, c);
            lua_replace(L, idx);
        }
        return c;
    case SQLITE_BLOB:
        if (luabb_toblob_noerr(L, idx, &b))
            break;
        if (luabb_type(L, idx) != DBTYPES_BLOB) {
            luabb_pushblob_dl(L, &b);
            lua_replace(L, idx);
        }
        *len = b.length;
        return b.data;
    }
    return NULL;
}

char *sp_column_name(struct response_data *arg, int col)
{