Function push_args

lua/sp.c:6391–6433

}

static int push_args(const char **argstr, struct sqlclntstate *clnt, char **err, int *argc)
{
    const char *s = *argstr;
    SP sp = clnt->sp;
    Lua lua = sp->lua;

    const char *msg = s;
    int argcnt = 0;
    sparg_t arg;

    int rc;
    while ((rc = getarg(&s, clnt, &arg)) > arg_end) {
        if ((rc = !lua_checkstack(lua, 1)) != 0) break;
        switch (arg.type) {
        case arg_null: luabb_pushnull(lua, DBTYPES_CSTRING); break;
        case arg_int: lua_pushnumber(lua, arg.u.i); break;
        case arg_real: lua_pushnumber(lua, arg.u.d); break;
        case arg_str: lua_pushstring(lua, arg.u.c); break;
        case arg_blob: luabb_pushblob(lua, &arg.u.b); break;
        case arg_bool: lua_pushboolean(lua, arg.u.i); break;
        case arg_param: rc = push_param(lua, clnt, arg.u.i); break;
        default: rc = 99; break;
        }
        free(arg.mbuf);
        ++argcnt;
        if (rc) break;
        msg = s;
    }
    if (rc != arg_end) {
        *err = malloc(64);
        if (arg.type == arg_param) {
            snprintf0(*err, 60, "Bad parameter:%s type:%d", arg.buf + 1, rc);
        } else {
            if (snprintf0(*err, 60, "bad argument -> %s", msg) >= 60) {
                strcat(*err, "...");
            }
        }
        reset_sp(sp);
        return -1;
    }
    *argc = argcnt;
    return 0;
}

static int run_sp_int(struct sqlclntstate *clnt, int argcnt, char **err)
{