Module: kamailio Branch: master Commit: e5813d980ed3eaab82435322002dac64bc19b78b URL: https://github.com/kamailio/kamailio/commit/e5813d980ed3eaab82435322002dac6… Author: Daniel-Constantin Mierla <miconda(a)gmail.com> Committer: Daniel-Constantin Mierla <miconda(a)gmail.com> Date: 2016-04-13T16:36:45+02:00 app_lua: implemented execution of kemi api functions with 3 params --- Modified: modules/app_lua/app_lua_sr.c --- Diff: https://github.com/kamailio/kamailio/commit/e5813d980ed3eaab82435322002dac6… Patch: https://github.com/kamailio/kamailio/commit/e5813d980ed3eaab82435322002dac6… --- diff --git a/modules/app_lua/app_lua_sr.c b/modules/app_lua/app_lua_sr.c index 6cb9ff0..b7bb39c 100644 --- a/modules/app_lua/app_lua_sr.c +++ b/modules/app_lua/app_lua_sr.c @@ -1542,9 +1542,79 @@ int sr_kemi_exec_func(lua_State* L, str *mname, int midx, str *fname) } break; case 3: - LM_ERR("invalid parameters for: %.*s\n", - fname->len, fname->s); - return app_lua_return_false(L); + if(ket->ptypes[0]==SR_KEMIP_INT) { + if(ket->ptypes[1]==SR_KEMIP_INT) { + if(ket->ptypes[2]==SR_KEMIP_INT) { + ret = ((sr_kemi_fmnnn_f)(ket->func))(env_L->msg, + vps[0].n, vps[1].n, vps[2].n); + return sr_kemi_return(L, ket, ret); + } else if(ket->ptypes[2]==SR_KEMIP_STR) { + ret = ((sr_kemi_fmnns_f)(ket->func))(env_L->msg, + vps[0].n, vps[1].n, &vps[2].s); + return sr_kemi_return(L, ket, ret); + } else { + LM_ERR("invalid parameters for: %.*s\n", + fname->len, fname->s); + return app_lua_return_false(L); + } + } else if(ket->ptypes[1]==SR_KEMIP_STR) { + if(ket->ptypes[2]==SR_KEMIP_INT) { + ret = ((sr_kemi_fmnsn_f)(ket->func))(env_L->msg, + vps[0].n, &vps[1].s, vps[2].n); + return sr_kemi_return(L, ket, ret); + } else if(ket->ptypes[2]==SR_KEMIP_STR) { + ret = ((sr_kemi_fmnss_f)(ket->func))(env_L->msg, + vps[0].n, &vps[1].s, &vps[2].s); + return sr_kemi_return(L, ket, ret); + } else { + LM_ERR("invalid parameters for: %.*s\n", + fname->len, fname->s); + return app_lua_return_false(L); + } + } else { + LM_ERR("invalid parameters for: %.*s\n", + fname->len, fname->s); + return app_lua_return_false(L); + } + } else if(ket->ptypes[0]==SR_KEMIP_STR) { + if(ket->ptypes[1]==SR_KEMIP_INT) { + if(ket->ptypes[2]==SR_KEMIP_INT) { + ret = ((sr_kemi_fmsnn_f)(ket->func))(env_L->msg, + &vps[0].s, vps[1].n, vps[2].n); + return sr_kemi_return(L, ket, ret); + } else if(ket->ptypes[2]==SR_KEMIP_STR) { + ret = ((sr_kemi_fmsns_f)(ket->func))(env_L->msg, + &vps[0].s, vps[1].n, &vps[2].s); + return sr_kemi_return(L, ket, ret); + } else { + LM_ERR("invalid parameters for: %.*s\n", + fname->len, fname->s); + return app_lua_return_false(L); + } + } else if(ket->ptypes[1]==SR_KEMIP_STR) { + if(ket->ptypes[2]==SR_KEMIP_INT) { + ret = ((sr_kemi_fmssn_f)(ket->func))(env_L->msg, + &vps[0].s, &vps[1].s, vps[2].n); + return sr_kemi_return(L, ket, ret); + } else if(ket->ptypes[2]==SR_KEMIP_STR) { + ret = ((sr_kemi_fmsss_f)(ket->func))(env_L->msg, + &vps[0].s, &vps[1].s, &vps[2].s); + return sr_kemi_return(L, ket, ret); + } else { + LM_ERR("invalid parameters for: %.*s\n", + fname->len, fname->s); + return app_lua_return_false(L); + } + } else { + LM_ERR("invalid parameters for: %.*s\n", + fname->len, fname->s); + return app_lua_return_false(L); + } + } else { + LM_ERR("invalid parameters for: %.*s\n", + fname->len, fname->s); + return app_lua_return_false(L); + } break; case 4: if(ket->ptypes[0]==SR_KEMIP_STR