Function push_param

lua/sp.c:5888–5947

}

static int push_param(Lua L, struct sqlclntstate *clnt, int64_t index)
{
    struct param_data p = {0};
    if (param_value(clnt, &p, index) != 0) {
        if (p.type > CLIENT_MINTYPE && p.type < CLIENT_MAXTYPE)
            return p.type;
        return -1;
    }
    if (p.null || p.type == COMDB2_NULL_TYPE) {
        return push_null(L, p.type);
    }
    if (p.arraylen) {
        switch (p.type) {
        case CLIENT_BLOB: return push_blob_array(L, &p);
        case CLIENT_CSTR: return push_string_array(L, &p);
        case CLIENT_INT: return push_int_array(L, &p);
        case CLIENT_REAL: return push_real_array(L, &p);
        }
        return -1;
    }
    switch (p.type) {
    case CLIENT_INT:
    case CLIENT_UINT: luabb_pushinteger(L, p.u.i); break;
    case CLIENT_REAL: luabb_pushreal(L, p.u.r); break;
    case CLIENT_CSTR:
    case CLIENT_PSTR:
    case CLIENT_PSTR2:
    case CLIENT_VUTF8: luabb_pushcstringlen(L, p.u.p, p.len); break;
    case CLIENT_BYTEARRAY:
    case CLIENT_BLOB: {
        blob_t b = {.length = p.len, .data = p.u.p};
        luabb_pushblob(L, &b);
        break;
    }
    case CLIENT_DATETIME: {
        cdb2_client_datetime_t t;
        dttz_to_client_datetime(&p.u.dt, clnt->tzname, &t);
        datetime_t datetime;
        client_datetime_to_datetime_t(&t, &datetime, 0);
        luabb_pushdatetime(L, &datetime);
        break;
    }
    case CLIENT_DATETIMEUS: {
        cdb2_client_datetimeus_t t;
        dttz_to_client_datetimeus(&p.u.dt, clnt->tzname, &t);
        datetime_t datetime;
        client_datetimeus_to_datetime_t(&t, &datetime, 0);
        luabb_pushdatetime(L, &datetime);
        break;
    }
    default:
        logmsg(LOGMSG_ERROR, "Unknown type %d\n", p.type);
        return -1;
    }
    if (gbl_dump_sql_dispatched) {
        logmsg(LOGMSG_USER, "%s type %d %s len %d null %d bind\n", p.name,
               p.type, strtype(p.type), p.len, p.null);
    }