deleted file mode 100644

@@ -1,1877 +0,0 @@

-/*

- * dialog module - basic support for dialog tracking

- *

- * Copyright (C) 2006 Voice Sistem SRL

- * Copyright (C) 2011 Carsten Bock, carsten@ng-voice.com

- *

- * This file is part of Kamailio, a free SIP server.

- *

- * Kamailio is free software; you can redistribute it and/or modify

- * it under the terms of the GNU General Public License as published by

- * the Free Software Foundation; either version 2 of the License, or

- * (at your option) any later version

- *

- * Kamailio is distributed in the hope that it will be useful,

- * but WITHOUT ANY WARRANTY; without even the implied warranty of

- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

- * GNU General Public License for more details.

- *

- * You should have received a copy of the GNU General Public License

- * along with this program; if not, write to the Free Software

- * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA

- *

- */

-

-/*!

- * \file

- * \brief Module interface

- * \ingroup dialog

- * Module: \ref dialog

- */

-

-/**

- * @defgroup dialog dialog :: Kamailio dialog module

- * @brief Kamailio dialog module

- *

- * The dialog module provides dialog awareness to the Kamailio proxy. Its

- * functionality is to keep track of the current dialogs, to offer

- * information about them (like how many dialogs are active) or to manage

- * them. The module exports several functions that could be used directly

- * from scripts.

- * The module, via an internal API, also provide the foundation to build

- * on top of it more complex dialog-based functionalities via other

- * Kamailio modules.

- */

-

-#include <stdio.h>

-#include <string.h>

-#include <stdlib.h>

-#include <sys/time.h>

-

-#include "../../sr_module.h"

-#include "../../lib/srdb1/db.h"

-#include "../../dprint.h"

-#include "../../error.h"

-#include "../../ut.h"

-#include "../../pvar.h"

-#include "../../mod_fix.h"

-#include "../../script_cb.h"

-#include "../../fmsg.h"

-#include "../../hashes.h"

-#include "../../counters.h"

-#include "../../mem/mem.h"

-#include "../../lib/kmi/mi.h"

-#include "../../timer_proc.h"

-#include "../../lvalue.h"

-#include "../../parser/parse_to.h"

-#include "../../modules/tm/tm_load.h"

-#include "../../rpc_lookup.h"

-#include "../../srapi.h"

-#include "../rr/api.h"

-#include "dlg_hash.h"

-#include "dlg_timer.h"

-#include "dlg_handlers.h"

-#include "dlg_load.h"

-#include "dlg_cb.h"

-#include "dlg_db_handler.h"

-#include "dlg_req_within.h"

-#include "dlg_profile.h"

-#include "dlg_var.h"

-#include "dlg_transfer.h"

-#include "dlg_cseq.h"

-#include "dlg_dmq.h"

-

-MODULE_VERSION

-

-

-#define RPC_DATE_BUF_LEN 21

-

-static int mod_init(void);

-static int child_init(int rank);

-static void mod_destroy(void);

-

-/* module parameter */

-static int dlg_hash_size = 4096;

-static char* rr_param = "did";

-static int dlg_flag = -1;

-static str timeout_spec = {NULL, 0};

-static int default_timeout = 60 * 60 * 12;  /* 12 hours */

-static int seq_match_mode = SEQ_MATCH_STRICT_ID;

-static char* profiles_wv_s = NULL;

-static char* profiles_nv_s = NULL;

-str dlg_extra_hdrs = {NULL,0};

-static int db_fetch_rows = 200;

-static int db_skip_load = 0;

-int initial_cbs_inscript = 1;

-int dlg_wait_ack = 1;

-static int dlg_timer_procs = 0;

-static int _dlg_track_cseq_updates = 0;

-int dlg_ka_failed_limit = 1;

-

-int dlg_enable_dmq = 0;

-

-int dlg_event_rt[DLG_EVENTRT_MAX];

-

-str dlg_bridge_controller = str_init("sip:controller@kamailio.org");

-

-str dlg_bridge_contact = str_init("sip:controller@kamailio.org:5060");

-

-str ruri_pvar_param = str_init("$ru");

-pv_elem_t * ruri_param_model = NULL;

-str empty_str = STR_NULL;

-

-/* statistic variables */

-int dlg_enable_stats = 1;

-int active_dlgs_cnt = 0;

-int early_dlgs_cnt = 0;

-int detect_spirals = 1;

-int dlg_send_bye = 0;

-int dlg_timeout_noreset = 0;

-stat_var *active_dlgs = 0;

-stat_var *processed_dlgs = 0;

-stat_var *expired_dlgs = 0;

-stat_var *failed_dlgs = 0;

-stat_var *early_dlgs  = 0;

-

-struct tm_binds d_tmb;

-struct rr_binds d_rrb;

-pv_spec_t timeout_avp;

-

-int dlg_db_mode_param = DB_MODE_NONE;

-

-str dlg_xavp_cfg = {0};

-int dlg_ka_timer = 0;

-int dlg_ka_interval = 0;

-int dlg_clean_timer = 90;

-

-str dlg_lreq_callee_headers = {0};

-

-/* db stuff */

-static str db_url = str_init(DEFAULT_DB_URL);

-static unsigned int db_update_period = DB_DEFAULT_UPDATE_PERIOD;

-

-static int pv_get_dlg_count( struct sip_msg *msg, pv_param_t *param,

-		pv_value_t *res);

-

-void dlg_ka_timer_exec(unsigned int ticks, void* param);

-void dlg_clean_timer_exec(unsigned int ticks, void* param);

-

-/* commands wrappers and fixups */

-static int fixup_profile(void** param, int param_no);

-static int fixup_get_profile2(void** param, int param_no);

-static int fixup_get_profile3(void** param, int param_no);

-static int w_set_dlg_profile(struct sip_msg*, char*, char*);

-static int w_unset_dlg_profile(struct sip_msg*, char*, char*);

-static int w_is_in_profile(struct sip_msg*, char*, char*);

-static int w_get_profile_size2(struct sip_msg*, char*, char*);

-static int w_get_profile_size3(struct sip_msg*, char*, char*, char*);

-static int w_dlg_isflagset(struct sip_msg *msg, char *flag, str *s2);

-static int w_dlg_resetflag(struct sip_msg *msg, char *flag, str *s2);

-static int w_dlg_setflag(struct sip_msg *msg, char *flag, char *s2);

-static int w_dlg_set_property(struct sip_msg *msg, char *prop, char *s2);

-static int w_dlg_manage(struct sip_msg*, char*, char*);

-static int w_dlg_bye(struct sip_msg*, char*, char*);

-static int w_dlg_refer(struct sip_msg*, char*, char*);

-static int w_dlg_bridge(struct sip_msg*, char*, char*, char*);

-static int w_dlg_set_timeout(struct sip_msg*, char*, char*, char*);

-static int w_dlg_set_timeout_by_profile2(struct sip_msg *, char *, char *);

-static int w_dlg_set_timeout_by_profile3(struct sip_msg *, char *, char *, 

-					char *);

-static int fixup_dlg_bye(void** param, int param_no);

-static int fixup_dlg_refer(void** param, int param_no);

-static int fixup_dlg_bridge(void** param, int param_no);

-static int w_dlg_get(struct sip_msg*, char*, char*, char*);

-static int w_is_known_dlg(struct sip_msg *);

-

-static int w_dlg_remote_profile(sip_msg_t *msg, char *cmd, char *pname,

-		char *pval, char *puid, char *expires);

-static int fixup_dlg_remote_profile(void** param, int param_no);

-

-static cmd_export_t cmds[]={

-	{"dlg_manage", (cmd_function)w_dlg_manage,            0,0,

-			0, REQUEST_ROUTE },

-	{"set_dlg_profile", (cmd_function)w_set_dlg_profile,  1,fixup_profile,

-			0, ANY_ROUTE },

-	{"set_dlg_profile", (cmd_function)w_set_dlg_profile,  2,fixup_profile,

-			0, ANY_ROUTE },

-	{"unset_dlg_profile", (cmd_function)w_unset_dlg_profile,  1,fixup_profile,

-			0, REQUEST_ROUTE| FAILURE_ROUTE | ONREPLY_ROUTE | BRANCH_ROUTE },

-	{"unset_dlg_profile", (cmd_function)w_unset_dlg_profile,  2,fixup_profile,

-			0, REQUEST_ROUTE| FAILURE_ROUTE | ONREPLY_ROUTE | BRANCH_ROUTE },

-	{"is_in_profile", (cmd_function)w_is_in_profile,      1,fixup_profile,

-			0, ANY_ROUTE },

-	{"is_in_profile", (cmd_function)w_is_in_profile,      2,fixup_profile,

-			0, ANY_ROUTE },

-	{"get_profile_size",(cmd_function)w_get_profile_size2, 2,fixup_get_profile2,

-			0, ANY_ROUTE },

-	{"get_profile_size",(cmd_function)w_get_profile_size3, 3,fixup_get_profile3,

-			0, ANY_ROUTE },

-	{"dlg_setflag", (cmd_function)w_dlg_setflag,          1,fixup_igp_null,

-			0, ANY_ROUTE },

-	{"dlg_resetflag", (cmd_function)w_dlg_resetflag,      1,fixup_igp_null,

-			0, ANY_ROUTE },

-	{"dlg_isflagset", (cmd_function)w_dlg_isflagset,      1,fixup_igp_null,

-			0, ANY_ROUTE },

-	{"dlg_bye",(cmd_function)w_dlg_bye,                   1,fixup_dlg_bye,

-			0, ANY_ROUTE },

-	{"dlg_refer",(cmd_function)w_dlg_refer,               2,fixup_dlg_refer,

-			0, ANY_ROUTE },

-	{"dlg_bridge",(cmd_function)w_dlg_bridge,             3,fixup_dlg_bridge,

-			0, ANY_ROUTE },

-	{"dlg_get",(cmd_function)w_dlg_get,                   3,fixup_dlg_bridge,

-			0, ANY_ROUTE },

-	{"is_known_dlg", (cmd_function)w_is_known_dlg,        0, NULL,

-			0, ANY_ROUTE },

-	{"dlg_set_timeout", (cmd_function)w_dlg_set_timeout,  1,fixup_igp_null,

-			0, ANY_ROUTE },

-	{"dlg_set_timeout", (cmd_function)w_dlg_set_timeout,  3,fixup_igp_all,

-			0, ANY_ROUTE },

-	{"dlg_set_timeout_by_profile",

-		(cmd_function) w_dlg_set_timeout_by_profile2, 2, fixup_profile,

-			0, ANY_ROUTE },

-	{"dlg_set_timeout_by_profile",

-		(cmd_function) w_dlg_set_timeout_by_profile3, 3, fixup_profile,

-			0, ANY_ROUTE },

-	{"dlg_set_property", (cmd_function)w_dlg_set_property,1,fixup_spve_null,

-			0, ANY_ROUTE },

-	{"dlg_remote_profile", (cmd_function)w_dlg_remote_profile, 5, fixup_dlg_remote_profile,

-			0, ANY_ROUTE },

-	{"load_dlg",  (cmd_function)load_dlg,   0, 0, 0, 0},

-	{0,0,0,0,0,0}

-};

-

-static param_export_t mod_params[]={

-	{ "enable_stats",          INT_PARAM, &dlg_enable_stats         },

-	{ "hash_size",             INT_PARAM, &dlg_hash_size            },

-	{ "rr_param",              PARAM_STRING, &rr_param                 },

-	{ "dlg_flag",              INT_PARAM, &dlg_flag                 },

-	{ "timeout_avp",           PARAM_STR, &timeout_spec           },

-	{ "default_timeout",       INT_PARAM, &default_timeout          },

-	{ "dlg_extra_hdrs",        PARAM_STR, &dlg_extra_hdrs         },

-	{ "dlg_match_mode",        INT_PARAM, &seq_match_mode           },

-	{ "detect_spirals",        INT_PARAM, &detect_spirals,          },

-	{ "db_url",                PARAM_STR, &db_url                 },

-	{ "db_mode",               INT_PARAM, &dlg_db_mode_param        },

-	{ "table_name",            PARAM_STR, &dialog_table_name        },

-	{ "call_id_column",        PARAM_STR, &call_id_column         },

-	{ "from_uri_column",       PARAM_STR, &from_uri_column        },

-	{ "from_tag_column",       PARAM_STR, &from_tag_column        },

-	{ "to_uri_column",         PARAM_STR, &to_uri_column          },

-	{ "to_tag_column",         PARAM_STR, &to_tag_column          },

-	{ "h_id_column",           PARAM_STR, &h_id_column            },

-	{ "h_entry_column",        PARAM_STR, &h_entry_column         },

-	{ "state_column",          PARAM_STR, &state_column           },

-	{ "start_time_column",     PARAM_STR, &start_time_column      },

-	{ "timeout_column",        PARAM_STR, &timeout_column         },

-	{ "to_cseq_column",        PARAM_STR, &to_cseq_column         },

-	{ "from_cseq_column",      PARAM_STR, &from_cseq_column       },

-	{ "to_route_column",       PARAM_STR, &to_route_column        },

-	{ "from_route_column",     PARAM_STR, &from_route_column      },

-	{ "to_contact_column",     PARAM_STR, &to_contact_column      },

-	{ "from_contact_column",   PARAM_STR, &from_contact_column    },

-	{ "to_sock_column",        PARAM_STR, &to_sock_column         },

-	{ "from_sock_column",      PARAM_STR, &from_sock_column       },

-	{ "sflags_column",         PARAM_STR, &sflags_column          },

-	{ "toroute_name_column",   PARAM_STR, &toroute_name_column    },

-

-	{ "vars_table_name",       PARAM_STR, &dialog_vars_table_name   },

-	{ "vars_h_id_column",      PARAM_STR, &vars_h_id_column       },

-	{ "vars_h_entry_column",   PARAM_STR, &vars_h_entry_column    },

-	{ "vars_key_column",       PARAM_STR, &vars_key_column        },

-	{ "vars_value_column",     PARAM_STR, &vars_value_column      },

-

-	{ "db_update_period",      INT_PARAM, &db_update_period         },

-	{ "db_fetch_rows",         INT_PARAM, &db_fetch_rows            },

-	{ "profiles_with_value",   PARAM_STRING, &profiles_wv_s            },

-	{ "profiles_no_value",     PARAM_STRING, &profiles_nv_s            },

-	{ "bridge_controller",     PARAM_STR, &dlg_bridge_controller  },

-	{ "bridge_contact",        PARAM_STR, &dlg_bridge_contact       },

-	{ "ruri_pvar",             PARAM_STR, &ruri_pvar_param        },

-	{ "initial_cbs_inscript",  INT_PARAM, &initial_cbs_inscript     },

-	{ "send_bye",              INT_PARAM, &dlg_send_bye             },

-	{ "wait_ack",              INT_PARAM, &dlg_wait_ack             },

-	{ "xavp_cfg",              PARAM_STR, &dlg_xavp_cfg           },

-	{ "ka_timer",              INT_PARAM, &dlg_ka_timer             },

-	{ "ka_interval",           INT_PARAM, &dlg_ka_interval          },

-	{ "timeout_noreset",       INT_PARAM, &dlg_timeout_noreset      },

-	{ "timer_procs",           PARAM_INT, &dlg_timer_procs          },

-	{ "track_cseq_updates",    PARAM_INT, &_dlg_track_cseq_updates  },

-	{ "lreq_callee_headers",   PARAM_STR, &dlg_lreq_callee_headers  },

-	{ "db_skip_load",          INT_PARAM, &db_skip_load             },

-	{ "ka_failed_limit",       INT_PARAM, &dlg_ka_failed_limit      },

-	{ "enable_dmq",            INT_PARAM, &dlg_enable_dmq           },

-	{ 0,0,0 }

-};

-

-

-static stat_export_t mod_stats[] = {

-	{"active_dialogs" ,     STAT_NO_RESET,  &active_dlgs       },

-	{"early_dialogs",       STAT_NO_RESET,  &early_dlgs        },

-	{"processed_dialogs" ,  0,              &processed_dlgs    },

-	{"expired_dialogs" ,    0,              &expired_dlgs      },

-	{"failed_dialogs",      0,              &failed_dlgs       },

-	{0,0,0}

-};

-

-struct mi_root * mi_dlg_bridge(struct mi_root *cmd_tree, void *param);

-

-static mi_export_t mi_cmds[] = {

-	{ "dlg_list",           mi_print_dlgs,       0,  0,  0},

-	{ "dlg_list_ctx",       mi_print_dlgs_ctx,   0,  0,  0},

-	{ "dlg_end_dlg",        mi_terminate_dlg,    0,  0,  0},

-	{ "dlg_terminate_dlg",  mi_terminate_dlgs,   0,  0,  0},

-	{ "profile_get_size",   mi_get_profile,      0,  0,  0},

-	{ "profile_list_dlgs",  mi_profile_list,     0,  0,  0},

-	{ "dlg_bridge",         mi_dlg_bridge,       0,  0,  0},

-	{ 0, 0, 0, 0, 0}

-};

-

-static rpc_export_t rpc_methods[];

-

-static pv_export_t mod_items[] = {

-	{ {"DLG_count",  sizeof("DLG_count")-1}, PVT_OTHER,  pv_get_dlg_count,    0,

-		0, 0, 0, 0 },

-	{ {"DLG_lifetime",sizeof("DLG_lifetime")-1}, PVT_OTHER, pv_get_dlg_lifetime, 0,

-		0, 0, 0, 0 },

-	{ {"DLG_status",  sizeof("DLG_status")-1}, PVT_OTHER, pv_get_dlg_status, 0,

-		0, 0, 0, 0 },

-	{ {"dlg_ctx",  sizeof("dlg_ctx")-1}, PVT_OTHER, pv_get_dlg_ctx,

-		pv_set_dlg_ctx, pv_parse_dlg_ctx_name, 0, 0, 0 },

-	{ {"dlg",  sizeof("dlg")-1}, PVT_OTHER, pv_get_dlg,

-		0, pv_parse_dlg_name, 0, 0, 0 },

-	{ {"dlg_var", sizeof("dlg_var")-1}, PVT_OTHER, pv_get_dlg_variable,

-		pv_set_dlg_variable,    pv_parse_dialog_var_name, 0, 0, 0},

-	{ {0, 0}, 0, 0, 0, 0, 0, 0, 0 }

-};

-

-struct module_exports exports= {

-	"dialog",        /* module's name */

-	DEFAULT_DLFLAGS, /* dlopen flags */

-	cmds,            /* exported functions */

-	mod_params,      /* param exports */

-	mod_stats,       /* exported statistics */

-	mi_cmds,         /* exported MI functions */

-	mod_items,       /* exported pseudo-variables */

-	0,               /* extra processes */

-	mod_init,        /* module initialization function */

-	0,               /* reply processing function */

-	mod_destroy,

-	child_init       /* per-child init function */

-};

-

-

-static int fixup_profile(void** param, int param_no)

-{

-	struct dlg_profile_table *profile;

-	pv_elem_t *model=NULL;

-	str s;

-

-	s.s = (char*)(*param);

-	s.len = strlen(s.s);

-	if(s.len==0) {

-		LM_ERR("param %d is empty string!\n", param_no);

-		return E_CFG;

-	}

-

-	if (param_no==1) {

-		profile = search_dlg_profile( &s );

-		if (profile==NULL) {

-			LM_CRIT("profile <%s> not defined\n",s.s);

-			return E_CFG;

-		}

-		pkg_free(*param);

-		*param = (void*)profile;

-		return 0;

-	} else if (param_no==2) {

-		if(pv_parse_format(&s ,&model) || model==NULL) {

-			LM_ERR("wrong format [%s] for value param!\n", s.s);

-			return E_CFG;

-		}

-		*param = (void*)model;

-	}

-	return 0;

-}

-

-

-static int fixup_get_profile2(void** param, int param_no)

-{

-	pv_spec_t *sp;

-	int ret;

-

-	if (param_no==1) {

-		return fixup_profile(param, 1);

-	} else if (param_no==2) {

-		ret = fixup_pvar_null(param, 1);

-		if (ret<0) return ret;

-		sp = (pv_spec_t*)(*param);

-		if (sp->type!=PVT_AVP && sp->type!=PVT_SCRIPTVAR) {

-			LM_ERR("return must be an AVP or SCRIPT VAR!\n");

-			return E_SCRIPT;

-		}

-	}

-	return 0;

-}

-

-

-static int fixup_get_profile3(void** param, int param_no)

-{

-	if (param_no==1) {

-		return fixup_profile(param, 1);

-	} else if (param_no==2) {

-		return fixup_profile(param, 2);

-	} else if (param_no==3) {

-		return fixup_get_profile2( param, 2);

-	}

-	return 0;

-}

-

-

-

-int load_dlg( struct dlg_binds *dlgb )

-{

-	dlgb->register_dlgcb = register_dlgcb;

-	dlgb->terminate_dlg = dlg_bye_all;

-	dlgb->set_dlg_var = set_dlg_variable;

-	dlgb->get_dlg_var = get_dlg_variable;

-	dlgb->get_dlg = dlg_get_msg_dialog;

-	dlgb->release_dlg = dlg_release;

-	return 1;

-}

-

-

-static int pv_get_dlg_count(struct sip_msg *msg, pv_param_t *param,

-		pv_value_t *res)

-{

-	int n;

-	int l;

-	char *ch;

-

-	if(msg==NULL || res==NULL)

-		return -1;

-

-	n = active_dlgs ? get_stat_val(active_dlgs) : 0;

-	l = 0;

-	ch = int2str( n, &l);

-

-	res->rs.s = ch;

-	res->rs.len = l;

-

-	res->ri = n;

-	res->flags = PV_VAL_STR|PV_VAL_INT|PV_TYPE_INT;

-

-	return 0;

-}

-

-

-static int mod_init(void)

-{

-	unsigned int n;

-	sr_cfgenv_t *cenv = NULL;

-

-	if(dlg_ka_interval!=0 && dlg_ka_interval<30) {

-		LM_ERR("ka interval too low (%d), has to be at least 30\n",

-				dlg_ka_interval);

-		return -1;

-	}

-

-	dlg_event_rt[DLG_EVENTRT_START] = route_lookup(&event_rt, "dialog:start");

-	dlg_event_rt[DLG_EVENTRT_END] = route_lookup(&event_rt, "dialog:end");

-	dlg_event_rt[DLG_EVENTRT_FAILED] = route_lookup(&event_rt, "dialog:failed");

-

-#ifdef STATISTICS

-	/* register statistics */

-	if (register_module_stats( exports.name, mod_stats)!=0 ) {

-		LM_ERR("failed to register %s statistics\n", exports.name);

-		return -1;

-	}

-#endif

-

-	if(register_mi_mod(exports.name, mi_cmds)!=0)

-	{

-		LM_ERR("failed to register MI commands\n");

-		return -1;

-	}

-

-	if (rpc_register_array(rpc_methods)!=0) {

-		LM_ERR("failed to register RPC commands\n");

-		return -1;

-	}

-

-	if(faked_msg_init()<0)

-		return -1;

-

-	if(dlg_bridge_init_hdrs()<0)

-		return -1;

-

-	/* param checkings */

-	if (dlg_flag>MAX_FLAG) {

-		LM_ERR("invalid dlg flag %d!!\n",dlg_flag);

-		return -1;

-	}

-

-	if (rr_param==0 || rr_param[0]==0) {

-		LM_ERR("empty rr_param!!\n");

-		return -1;

-	} else if (strlen(rr_param)>MAX_DLG_RR_PARAM_NAME) {

-		LM_ERR("rr_param too long (max=%d)!!\n", MAX_DLG_RR_PARAM_NAME);

-		return -1;

-	}

-

-	if (timeout_spec.s) {

-		if ( pv_parse_spec(&timeout_spec, &timeout_avp)==0

-				&& (timeout_avp.type!=PVT_AVP)){

-			LM_ERR("malformed or non AVP timeout "

-				"AVP definition in '%.*s'\n", timeout_spec.len,timeout_spec.s);

-			return -1;

-		}

-	}

-

-	if (default_timeout<=0) {

-		LM_ERR("0 default_timeout not accepted!!\n");

-		return -1;

-	}

-

-	if (ruri_pvar_param.s==NULL || ruri_pvar_param.len<=0) {

-		LM_ERR("invalid r-uri PV string\n");

-		return -1;

-	}

-

-	if(pv_parse_format(&ruri_pvar_param, &ruri_param_model) < 0

-				|| ruri_param_model==NULL) {

-		LM_ERR("malformed r-uri PV string: %s\n", ruri_pvar_param.s);

-		return -1;

-	}

-

-	if (initial_cbs_inscript != 0 && initial_cbs_inscript != 1) {

-		LM_ERR("invalid parameter for running initial callbacks in-script"

-				" (must be either 0 or 1)\n");

-		return -1;

-	}

-

-	if (seq_match_mode!=SEQ_MATCH_NO_ID &&

-	seq_match_mode!=SEQ_MATCH_FALLBACK &&

-	seq_match_mode!=SEQ_MATCH_STRICT_ID ) {

-		LM_ERR("invalid value %d for seq_match_mode param!!\n",seq_match_mode);

-		return -1;

-	}

-

-	if (detect_spirals != 0 && detect_spirals != 1) {

-		LM_ERR("invalid value %d for detect_spirals param!!\n",detect_spirals);

-		return -1;

-	}

-

-	if (dlg_timeout_noreset != 0 && dlg_timeout_noreset != 1) {

-		LM_ERR("invalid value %d for timeout_noreset param!!\n",

-				dlg_timeout_noreset);

-		return -1;

-	}

-

-	/* if statistics are disabled, prevent their registration to core */

-	if (dlg_enable_stats==0)

-		exports.stats = 0;

-

-	/* create profile hashes */

-	if (add_profile_definitions( profiles_nv_s, 0)!=0 ) {

-		LM_ERR("failed to add profiles without value\n");

-		return -1;

-	}

-	if (add_profile_definitions( profiles_wv_s, 1)!=0 ) {

-		LM_ERR("failed to add profiles with value\n");

-		return -1;

-	}

-

-	/* load the TM API */

-	if (load_tm_api(&d_tmb)!=0) {

-		LM_ERR("can't load TM API\n");

-		return -1;

-	}

-

-	/* load RR API also */

-	if (load_rr_api(&d_rrb)!=0) {

-		LM_ERR("can't load RR API\n");

-		return -1;

-	}

-

-	/* register callbacks*/

-	/* listen for all incoming requests  */

-	if ( d_tmb.register_tmcb( 0, 0, TMCB_REQUEST_IN, dlg_onreq, 0, 0 ) <=0 ) {

-		LM_ERR("cannot register TMCB_REQUEST_IN callback\n");

-		return -1;

-	}

-

-	/* listen for all routed requests  */

-	if ( d_rrb.register_rrcb( dlg_onroute, 0 ) <0 ) {

-		LM_ERR("cannot register RR callback\n");

-		return -1;

-	}

-

-	if (register_script_cb( profile_cleanup, POST_SCRIPT_CB|REQUEST_CB,0)<0) {

-		LM_ERR("cannot register script callback");

-		return -1;

-	}

-	if (register_script_cb(dlg_cfg_cb,

-				PRE_SCRIPT_CB|REQUEST_CB,0)<0)

-	{

-		LM_ERR("cannot register pre-script ctx callback\n");

-		return -1;

-	}

-	if (register_script_cb(dlg_cfg_cb,

-				POST_SCRIPT_CB|REQUEST_CB,0)<0)

-	{

-		LM_ERR("cannot register post-script ctx callback\n");

-		return -1;

-	}

-

-	if (register_script_cb(spiral_detect_reset,POST_SCRIPT_CB|REQUEST_CB,0)<0) {

-		LM_ERR("cannot register req pre-script spiral detection reset callback\n");

-		return -1;

-	}

-

-	if (register_script_cb(cb_dlg_locals_reset,POST_SCRIPT_CB|ONREPLY_CB,0)<0) {

-		LM_ERR("cannot register reply post-script dlg locals reset callback\n");

-		return -1;

-	}

-

-	if (register_script_cb(cb_dlg_locals_reset,POST_SCRIPT_CB|FAILURE_CB,0)<0) {

-		LM_ERR("cannot register failure post-script dlg locals reset callback\n");

-		return -1;

-	}

-

-	if(dlg_timer_procs<=0) {

-		if ( register_timer( dlg_timer_routine, 0, 1)<0 ) {

-			LM_ERR("failed to register timer \n");

-			return -1;

-		}

-	} else {

-		register_sync_timers(1);

-	}

-

-	/* init handlers */

-	init_dlg_handlers( rr_param, dlg_flag,

-		timeout_spec.s?&timeout_avp:0, default_timeout, seq_match_mode);

-

-	/* init timer */

-	if (init_dlg_timer(dlg_ontimeout)!=0) {

-		LM_ERR("cannot init timer list\n");

-		return -1;

-	}

-

-	/* sanitize dlg_hash_zie */

-	if (dlg_hash_size < 1){

-		LM_WARN("hash_size is smaller "

-				"then 1  -> rounding from %d to 1\n",

-				dlg_hash_size);

-		dlg_hash_size = 1;

-	}

-	/* initialized the hash table */

-	for( n=0 ; n<(8*sizeof(n)) ; n++) {

-		if (dlg_hash_size==(1<<n))

-			break;

-		if (n && dlg_hash_size<(1<<n)) {

-			LM_WARN("hash_size is not a power "

-				"of 2 as it should be -> rounding from %d to %d\n",

-				dlg_hash_size, 1<<(n-1));

-			dlg_hash_size = 1<<(n-1);

-		}

-	}

-

-	if ( init_dlg_table(dlg_hash_size)<0 ) {

-		LM_ERR("failed to create hash table\n");

-		return -1;

-	}

-

-	/* if a database should be used to store the dialogs' information */

-	dlg_db_mode = dlg_db_mode_param;

-	if (dlg_db_mode==DB_MODE_NONE) {

-		db_url.s = 0; db_url.len = 0;

-	} else {

-		if (dlg_db_mode!=DB_MODE_REALTIME &&

-		dlg_db_mode!=DB_MODE_DELAYED && dlg_db_mode!=DB_MODE_SHUTDOWN ) {

-			LM_ERR("unsupported db_mode %d\n", dlg_db_mode);

-			return -1;

-		}

-		if ( !db_url.s || db_url.len==0 ) {

-			LM_ERR("db_url not configured for db_mode %d\n", dlg_db_mode);

-			return -1;

-		}

-		if (init_dlg_db(&db_url, dlg_hash_size, db_update_period, db_fetch_rows, db_skip_load)!=0) {

-			LM_ERR("failed to initialize the DB support\n");

-			return -1;

-		}

-		run_load_callbacks();

-	}

-

-	destroy_dlg_callbacks( DLGCB_LOADED );

-

-	/* timer process to send keep alive requests */

-	if(dlg_ka_timer>0 && dlg_ka_interval>0)

-		register_sync_timers(1);

-

-	/* timer process to clean old unconfirmed dialogs */

-	register_sync_timers(1);

-

-	if(_dlg_track_cseq_updates!=0) {

-		cenv = sr_cfgenv_get();

-		cenv->cb_cseq_update = dlg_cseq_update;

-		dlg_register_cseq_callbacks();

-	}

-

-	if (dlg_enable_dmq>0 && dlg_dmq_initialize()!=0) {

-		LM_ERR("failed to initialize dmq integration\n");

-		return -1;

-	}

-

-	return 0;

-}

-

-

-static int child_init(int rank)

-{

-	dlg_db_mode = dlg_db_mode_param;

-

-	if(rank==PROC_MAIN) {

-		if(dlg_timer_procs>0) {

-			if(fork_sync_timer(PROC_TIMER, "Dialog Main Timer", 1 /*socks flag*/,

-					dlg_timer_routine, NULL, 1 /*every sec*/)<0) {

-				LM_ERR("failed to start main timer routine as process\n");

-				return -1; /* error */

-			}

-		}

-

-		if(dlg_ka_timer>0 && dlg_ka_interval>0) {

-			if(fork_sync_timer(PROC_TIMER, "Dialog KA Timer", 1 /*socks flag*/,

-					dlg_ka_timer_exec, NULL, dlg_ka_timer /*sec*/)<0) {

-				LM_ERR("failed to start ka timer routine as process\n");

-				return -1; /* error */

-			}

-		}

-

-		if(fork_sync_timer(PROC_TIMER, "Dialog Clean Timer", 1 /*socks flag*/,

-					dlg_clean_timer_exec, NULL, dlg_clean_timer /*sec*/)<0) {

-			LM_ERR("failed to start clean timer routine as process\n");

-			return -1; /* error */

-		}

-	}

-

-	if (rank==1) {

-		if_update_stat(dlg_enable_stats, active_dlgs, active_dlgs_cnt);

-		if_update_stat(dlg_enable_stats, early_dlgs, early_dlgs_cnt);

-	}

-

-	if ( ((dlg_db_mode==DB_MODE_REALTIME || dlg_db_mode==DB_MODE_DELAYED) &&

-	(rank>0 || rank==PROC_TIMER || rank==PROC_RPC)) ||

-	(dlg_db_mode==DB_MODE_SHUTDOWN && (rank==PROC_MAIN)) ) {

-		if ( dlg_connect_db(&db_url) ) {

-			LM_ERR("failed to connect to database (rank=%d)\n",rank);

-			return -1;

-		}

-	}

-

-	/* in DB_MODE_SHUTDOWN only PROC_MAIN will do a DB dump at the end, so

-	 * for the rest of the processes will be the same as DB_MODE_NONE */

-	if (dlg_db_mode==DB_MODE_SHUTDOWN && rank!=PROC_MAIN)

-		dlg_db_mode = DB_MODE_NONE;

-	/* in DB_MODE_REALTIME and DB_MODE_DELAYED the PROC_MAIN have no DB handle */

-	if ( (dlg_db_mode==DB_MODE_REALTIME || dlg_db_mode==DB_MODE_DELAYED) &&

-			rank==PROC_MAIN)

-		dlg_db_mode = DB_MODE_NONE;

-

-	return 0;

-}

-

-

-static void mod_destroy(void)

-{

-	if(dlg_db_mode == DB_MODE_DELAYED || dlg_db_mode == DB_MODE_SHUTDOWN) {

-		dialog_update_db(0, 0);

-		destroy_dlg_db();

-	}

-	dlg_bridge_destroy_hdrs();

-	/* no DB interaction from now on */

-	dlg_db_mode = DB_MODE_NONE;

-	destroy_dlg_table();

-	destroy_dlg_timer();

-	destroy_dlg_callbacks( DLGCB_CREATED|DLGCB_LOADED );

-	destroy_dlg_handlers();

-	destroy_dlg_profiles();

-}

-

-

-

-static int w_set_dlg_profile(struct sip_msg *msg, char *profile, char *value)

-{

-	pv_elem_t *pve;

-	str val_s;

-

-	pve = (pv_elem_t *)value;

-

-	if (((struct dlg_profile_table*)profile)->has_value) {

-		if ( pve==NULL || pv_printf_s(msg, pve, &val_s)!=0 || 

-		val_s.len == 0 || val_s.s == NULL) {

-			LM_WARN("cannot get string for value\n");

-			return -1;

-		}

-		if ( set_dlg_profile( msg, &val_s,

-		(struct dlg_profile_table*)profile) < 0 ) {

-			LM_ERR("failed to set profile");

-			return -1;

-		}

-	} else {

-		if ( set_dlg_profile( msg, NULL,

-		(struct dlg_profile_table*)profile) < 0 ) {

-			LM_ERR("failed to set profile");

-			return -1;

-		}

-	}

-	return 1;

-}

-

-

-

-static int w_unset_dlg_profile(struct sip_msg *msg, char *profile, char *value)

-{

-	pv_elem_t *pve;

-	str val_s;

-

-	pve = (pv_elem_t *)value;

-

-	if (((struct dlg_profile_table*)profile)->has_value) {

-		if ( pve==NULL || pv_printf_s(msg, pve, &val_s)!=0 || 

-		val_s.len == 0 || val_s.s == NULL) {

-			LM_WARN("cannot get string for value\n");

-			return -1;

-		}

-		if ( unset_dlg_profile( msg, &val_s,

-		(struct dlg_profile_table*)profile) < 0 ) {

-			LM_ERR("failed to unset profile");

-			return -1;

-		}

-	} else {

-		if ( unset_dlg_profile( msg, NULL,

-		(struct dlg_profile_table*)profile) < 0 ) {

-			LM_ERR("failed to unset profile");

-			return -1;

-		}

-	}

-	return 1;

-}

-

-

-

-static int w_is_in_profile(struct sip_msg *msg, char *profile, char *value)

-{

-	pv_elem_t *pve;

-	str val_s;

-

-	pve = (pv_elem_t *)value;

-

-	if ( pve!=NULL && ((struct dlg_profile_table*)profile)->has_value) {

-		if ( pv_printf_s(msg, pve, &val_s)!=0 || 

-		val_s.len == 0 || val_s.s == NULL) {

-			LM_WARN("cannot get string for value\n");

-			return -1;

-		}

-		return is_dlg_in_profile( msg, (struct dlg_profile_table*)profile,

-			&val_s);

-	} else {

-		return is_dlg_in_profile( msg, (struct dlg_profile_table*)profile,

-			NULL);