|
@@ -943,6 +943,13 @@ VALUE sr_kemi_ruby_exec_func_ex(ksr_ruby_context_t *R, sr_kemi_t *ket, int argc,
|
|
|
ret = ((sr_kemi_fmsssn_f)(ket->func))(env_R->msg,
|
|
|
&vps[0].s, &vps[1].s, &vps[2].s, vps[3].n);
|
|
|
return sr_kemi_ruby_return_int(ket, ret);
|
|
|
+ } else if(ket->ptypes[0]==SR_KEMIP_STR
|
|
|
+ && ket->ptypes[1]==SR_KEMIP_STR
|
|
|
+ && ket->ptypes[2]==SR_KEMIP_INT
|
|
|
+ && ket->ptypes[3]==SR_KEMIP_STR) {
|
|
|
+ ret = ((sr_kemi_fmssns_f)(ket->func))(env_R->msg,
|
|
|
+ &vps[0].s, &vps[1].s, vps[2].n, &vps[3].s);
|
|
|
+ return sr_kemi_ruby_return_int(ket, ret);
|
|
|
} else if(ket->ptypes[0]==SR_KEMIP_STR
|
|
|
&& ket->ptypes[1]==SR_KEMIP_STR
|
|
|
&& ket->ptypes[2]==SR_KEMIP_INT
|
|
@@ -950,6 +957,27 @@ VALUE sr_kemi_ruby_exec_func_ex(ksr_ruby_context_t *R, sr_kemi_t *ket, int argc,
|
|
|
ret = ((sr_kemi_fmssnn_f)(ket->func))(env_R->msg,
|
|
|
&vps[0].s, &vps[1].s, vps[2].n, vps[3].n);
|
|
|
return sr_kemi_ruby_return_int(ket, ret);
|
|
|
+ } else if(ket->ptypes[0]==SR_KEMIP_STR
|
|
|
+ && ket->ptypes[1]==SR_KEMIP_INT
|
|
|
+ && ket->ptypes[2]==SR_KEMIP_STR
|
|
|
+ && ket->ptypes[3]==SR_KEMIP_STR) {
|
|
|
+ ret = ((sr_kemi_fmsnss_f)(ket->func))(env_R->msg,
|
|
|
+ &vps[0].s, vps[1].n, &vps[2].s, &vps[3].s);
|
|
|
+ return sr_kemi_ruby_return_int(ket, ret);
|
|
|
+ } else if(ket->ptypes[0]==SR_KEMIP_STR
|
|
|
+ && ket->ptypes[1]==SR_KEMIP_INT
|
|
|
+ && ket->ptypes[2]==SR_KEMIP_STR
|
|
|
+ && ket->ptypes[3]==SR_KEMIP_INT) {
|
|
|
+ ret = ((sr_kemi_fmsnsn_f)(ket->func))(env_R->msg,
|
|
|
+ &vps[0].s, vps[1].n, &vps[2].s, vps[3].n);
|
|
|
+ return sr_kemi_ruby_return_int(ket, ret);
|
|
|
+ } else if(ket->ptypes[0]==SR_KEMIP_STR
|
|
|
+ && ket->ptypes[1]==SR_KEMIP_INT
|
|
|
+ && ket->ptypes[2]==SR_KEMIP_INT
|
|
|
+ && ket->ptypes[3]==SR_KEMIP_STR) {
|
|
|
+ ret = ((sr_kemi_fmsnns_f)(ket->func))(env_R->msg,
|
|
|
+ &vps[0].s, vps[1].n, vps[2].n, &vps[3].s);
|
|
|
+ return sr_kemi_ruby_return_int(ket, ret);
|
|
|
} else if(ket->ptypes[0]==SR_KEMIP_STR
|
|
|
&& ket->ptypes[1]==SR_KEMIP_INT
|
|
|
&& ket->ptypes[2]==SR_KEMIP_INT
|
|
@@ -964,6 +992,27 @@ VALUE sr_kemi_ruby_exec_func_ex(ksr_ruby_context_t *R, sr_kemi_t *ket, int argc,
|
|
|
ret = ((sr_kemi_fmnsss_f)(ket->func))(env_R->msg,
|
|
|
vps[0].n, &vps[1].s, &vps[2].s, &vps[3].s);
|
|
|
return sr_kemi_ruby_return_int(ket, ret);
|
|
|
+ } else if(ket->ptypes[0]==SR_KEMIP_INT
|
|
|
+ && ket->ptypes[1]==SR_KEMIP_STR
|
|
|
+ && ket->ptypes[2]==SR_KEMIP_STR
|
|
|
+ && ket->ptypes[3]==SR_KEMIP_INT) {
|
|
|
+ ret = ((sr_kemi_fmnssn_f)(ket->func))(env_R->msg,
|
|
|
+ vps[0].n, &vps[1].s, &vps[2].s, vps[3].n);
|
|
|
+ return sr_kemi_ruby_return_int(ket, ret);
|
|
|
+ } else if(ket->ptypes[0]==SR_KEMIP_INT
|
|
|
+ && ket->ptypes[1]==SR_KEMIP_STR
|
|
|
+ && ket->ptypes[2]==SR_KEMIP_INT
|
|
|
+ && ket->ptypes[3]==SR_KEMIP_STR) {
|
|
|
+ ret = ((sr_kemi_fmnsns_f)(ket->func))(env_R->msg,
|
|
|
+ vps[0].n, &vps[1].s, vps[2].n, &vps[3].s);
|
|
|
+ return sr_kemi_ruby_return_int(ket, ret);
|
|
|
+ } else if(ket->ptypes[0]==SR_KEMIP_INT
|
|
|
+ && ket->ptypes[1]==SR_KEMIP_STR
|
|
|
+ && ket->ptypes[2]==SR_KEMIP_INT
|
|
|
+ && ket->ptypes[3]==SR_KEMIP_INT) {
|
|
|
+ ret = ((sr_kemi_fmnsnn_f)(ket->func))(env_R->msg,
|
|
|
+ vps[0].n, &vps[1].s, vps[2].n, vps[3].n);
|
|
|
+ return sr_kemi_ruby_return_int(ket, ret);
|
|
|
} else if(ket->ptypes[0]==SR_KEMIP_INT
|
|
|
&& ket->ptypes[1]==SR_KEMIP_INT
|
|
|
&& ket->ptypes[2]==SR_KEMIP_STR
|
|
@@ -971,6 +1020,13 @@ VALUE sr_kemi_ruby_exec_func_ex(ksr_ruby_context_t *R, sr_kemi_t *ket, int argc,
|
|
|
ret = ((sr_kemi_fmnnss_f)(ket->func))(env_R->msg,
|
|
|
vps[0].n, vps[1].n, &vps[2].s, &vps[3].s);
|
|
|
return sr_kemi_ruby_return_int(ket, ret);
|
|
|
+ } else if(ket->ptypes[0]==SR_KEMIP_INT
|
|
|
+ && ket->ptypes[1]==SR_KEMIP_INT
|
|
|
+ && ket->ptypes[2]==SR_KEMIP_STR
|
|
|
+ && ket->ptypes[3]==SR_KEMIP_INT) {
|
|
|
+ ret = ((sr_kemi_fmnnsn_f)(ket->func))(env_R->msg,
|
|
|
+ vps[0].n, vps[1].n, &vps[2].s, vps[3].n);
|
|
|
+ return sr_kemi_ruby_return_int(ket, ret);
|
|
|
} else if(ket->ptypes[0]==SR_KEMIP_INT
|
|
|
&& ket->ptypes[1]==SR_KEMIP_INT
|
|
|
&& ket->ptypes[2]==SR_KEMIP_INT
|
|
@@ -986,8 +1042,7 @@ VALUE sr_kemi_ruby_exec_func_ex(ksr_ruby_context_t *R, sr_kemi_t *ket, int argc,
|
|
|
vps[0].n, vps[1].n, vps[2].n, vps[3].n);
|
|
|
return sr_kemi_ruby_return_int(ket, ret);
|
|
|
} else {
|
|
|
- LM_ERR("invalid parameters for: %.*s\n",
|
|
|
- fname->len, fname->s);
|
|
|
+ LM_ERR("invalid parameters for: %.*s\n", fname->len, fname->s);
|
|
|
return Qfalse;
|
|
|
}
|
|
|
break;
|