@@ -16,6 +16,7 @@

 #include "ut.h"

 #include "sr_module.h"

 #include "mem/mem.h"

+#include "globals.h"

 #include <sys/types.h>

 #include <sys/socket.h>

@@ -48,6 +49,13 @@ int do_action(struct action* a, struct sip_msg* msg)

 	struct sip_uri uri;

 	unsigned short port;

+	/* reset the value of error to E_UNSPEC so avoid unknowledgable

+	   functions to return with errror (status<0) and not setting it

+	   leaving there previous error; cache the previous value though

+	   for functions which want to process it */

+	prev_ser_error=ser_error;

+	ser_error=E_UNSPEC;

+

 	ret=E_BUG;

 	switch (a->type){

 		case DROP_T:

@@ -63,10 +71,10 @@ int do_action(struct action* a, struct sip_msg* msg)

 						tmp=msg->first_line.u.request.uri.s;

 						len=msg->first_line.u.request.uri.len;

 				}

-				if (parse_uri(tmp, len, &uri)<0){

+				ret=parse_uri(tmp, len, &uri );

+				if (ret<0) {

 					LOG(L_ERR, "ERROR: do_action: forward: bad_uri <%s>,"

 								" dropping packet\n",tmp);

-					ret=E_UNSPEC;

 					break;

 				}

 				switch (a->p2_type){

@@ -80,7 +88,7 @@ int do_action(struct action* a, struct sip_msg* msg)

 											LOG(L_ERR, "ERROR: do_action: "

 												"forward: bad port in "

 												"uri: <%s>\n", uri.port.s);

-											ret=E_UNSPEC;

+											ret=E_BAD_URI;

 											goto error_fwd_uri;

 										}

 									}else port=SIP_PORT;

@@ -5,6 +5,8 @@

 #include "data_lump.h"

 #include "dprint.h"

 #include "mem/mem.h"

+#include "globals.h"

+#include "error.h"

 #include <stdlib.h>

 #include <string.h>

@@ -14,7 +16,6 @@

 #endif

-

 /* adds a header to the end

  * returns  pointer on success, 0 on error */

 struct lump* append_new_lump(struct lump** list, char* new_hdr,

@@ -75,6 +76,7 @@ struct lump* insert_new_lump_after( struct lump* after, char* new_hdr,

 	tmp=pkg_malloc(sizeof(struct lump));

 	if (tmp==0){

+		ser_error=E_OUT_OF_MEM;

 		LOG(L_ERR, "ERROR: insert_new_lump_after: out of memory\n");

 		return 0;

 	}

@@ -99,6 +101,7 @@ struct lump* insert_new_lump_before( struct lump* before, char* new_hdr,

 	tmp=pkg_malloc(sizeof(struct lump));

 	if (tmp==0){

+		ser_error=E_OUT_OF_MEM;

 		LOG(L_ERR,"ERROR: insert_new_lump_before: out of memory\n");

 		return 0;

 	}

@@ -152,6 +155,7 @@ struct lump* anchor_lump(struct lump** list, int offset, int len, int type)

 	tmp=pkg_malloc(sizeof(struct lump));

 	if (tmp==0){

+		ser_error=E_OUT_OF_MEM;

 		LOG(L_ERR, "ERROR: insert_new_lump_before: out of memory\n");

 		return 0;

 	}

new file mode 100644

@@ -0,0 +1,52 @@

+/*

+ * $Id$

+ *

+ */

+

+#include "error.h"

+

+/* current function's error; */

+int ser_error=-1;

+/* previous error */

+int prev_ser_error=-1;

+

+int err2reason_phrase( 

+	int ser_error,  /* current itnernal ser error */

+	int *sip_error,  /* the sip error code to which ser 	

+					    ser error will be turned */

+	char *phrase,    /* resulting error text */

+	int etl, 		/* error text buffer length */

+	char *signature ) /* extra text to be appended */

+{

+

+	char *error_txt;

+

+	switch( ser_error ) {

+		case E_OUT_OF_MEM:

+			error_txt="Excuse me I ran out of memory";

+			*sip_error=500;

+			break;

+		case E_SEND:

+			error_txt="Unfortunately error on sending to next hop occured";

+			*sip_error=-ser_error;

+			break;

+		case E_BAD_ADDRESS:

+			error_txt="Unresolveable destination";

+			*sip_error=-ser_error;

+			break;

+		case E_BAD_REQ:

+			error_txt="Bad Request";

+			*sip_error=-ser_error;

+			break;

+		case E_BAD_URI:

+			error_txt="Regretfuly, we were not able to process the URI";

+			*sip_error=-ser_error;

+			break;

+		default:

+			error_txt="I'm terribly sorry, server error occured";

+			*sip_error=500;

+			break;

+	}

+	return snprintf( phrase, etl, "%s (%d/%s)", error_txt, 

+		-ser_error, signature );

+}

@@ -8,9 +8,27 @@

 #define E_UNSPEC      -1

 #define E_OUT_OF_MEM  -2

 #define E_BAD_RE      -3

-#define E_BAD_ADDRESS -4

+/* #define E_BAD_ADDRESS -4 */

 #define E_BUG         -5

 #define E_CFG         -6

+#define E_NO_SOCKET		-7

+

+#define E_SEND		  -477

+/* unresolveable next-hop address */

+#define E_BAD_ADDRESS -478

+/* unparseable URI */

+#define E_BAD_URI 	  -479

+/* misformated request */

+#define E_BAD_REQ	  -400

+

+#define MAX_REASON_LEN	128

+

+/* processing status of the last command */

+extern int ser_error;

+extern int prev_ser_error;

+

+int err2reason_phrase( int ser_error, int *sip_error, 

+                char *phrase, int etl, char *signature );

 #endif

@@ -73,6 +73,7 @@ int forward_request( struct sip_msg* msg, struct proxy_l * p)

 	to=(union sockaddr_union*)malloc(sizeof(union sockaddr_union));

 	if (to==0){

+		ser_error=E_OUT_OF_MEM;

 		LOG(L_ERR, "ERROR: forward_request: out of memory\n");

 		goto error;

 	}

@@ -96,6 +97,7 @@ int forward_request( struct sip_msg* msg, struct proxy_l * p)

 	if (send_sock==0){

 		LOG(L_ERR, "forward_req: ERROR: cannot forward to af %d "

 				"no coresponding listening socket\n", to->s.sa_family);

+		ser_error=E_NO_SOCKET;

 		goto error;

 	}

@@ -110,6 +112,7 @@ int forward_request( struct sip_msg* msg, struct proxy_l * p)

 	if (udp_send( send_sock, buf, len,  to, 

 							sizeof(union sockaddr_union))==-1){

+			ser_error=E_SEND;

 			p->errors++;

 			p->ok=0;

 			STATS_TX_DROPS;

@@ -9,6 +9,8 @@

 #include "../../md5utils.h"

 /* bogdan test */

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

+#include "../../globals.h"

+#include "../../error.h"

@@ -75,8 +77,10 @@ struct cell*  build_cell( struct sip_msg* p_msg )

 	/* allocs a new cell */

 	new_cell = (struct cell*)sh_malloc( sizeof( struct cell ) );

-	if  ( !new_cell )

+	if  ( !new_cell ) {

+		ser_error=E_OUT_OF_MEM;

 		return NULL;

+	}

 	/* filling with 0 */

 	memset( new_cell, 0, sizeof( struct cell ) );

@@ -54,7 +54,11 @@ typedef struct retr_buf

 	char *cancel;

 	int   cancel_len;

-	struct sockaddr_in to;

+	/* v6 changes; -jiri

+	struct sockaddr_in to; */

+	union sockaddr_union to;

+	struct socket_info* send_sock;

+

 	size_t tolen;

 	/* a message can be linked just to retransmission and FR list */

@@ -144,7 +148,9 @@ typedef struct cell

 	/* this is where destination is stored for picked branch;

 	good if a need to forward ACK later on */

-	struct sockaddr_in ack_to;

+	/* v6 changes; -jiri

+	struct sockaddr_in ack_to; */

+	union sockaddr_union ack_to;

 #ifndef	USE_SYNONIM

 	/* MD5checksum */

 	char md5[MD5_LEN];

new file mode 100644

@@ -0,0 +1,95 @@

+/*

+ * $Id$

+ *

+ * forking requests

+ */

+

+#include "../../dprint.h"

+#include "../../config.h"

+#include "../../parser/parser_f.h"

+#include "../../ut.h"

+#include "hash_func.h"

+#include "t_funcs.h"

+#include "t_fork.h"

+

+

+

+unsigned int     nr_forks;

+struct fork      t_forks[ NR_OF_CLIENTS ];

+

+

+int t_add_fork( union sockaddr_union to, char* uri_s,

+			unsigned int uri_len, enum fork_type type, 

+			unsigned char free_flag)

+{

+	unsigned int pos=0;

+	char         *foo=0;

+

+	switch (type)

+	{

+		case DEFAULT:

+			if (nr_forks+1>=MAX_FORK)

+			{

+				LOG(L_ERR,"ERROR:t_add_fork: trying to add new fork ->"

+					" MAX_FORK exceded\n");

+				return -1;

+			}

+			pos = ++nr_forks;

+			break;

+		case NO_RESPONSE:

+			/* v6; -Jiri

+			if (t_forks[NO_RPL_BRANCH].ip)

+			*/

+			if (!t_forks[NO_RPL_BRANCH].inactive)

+				LOG(L_WARN,"WARNING:t_add_fork: trying to add NO_RPL fork ->"

+					" it was set before -> overriding\n");

+			if (uri_s && uri_len)

+			{

+				foo = (char*)shm_malloc(uri_len);

+				if (!foo)

+				{

+					LOG(L_ERR,"ERROR:t_add_fork: cannot get free memory\n");

+					return -1;

+				}

+				memcpy(foo,uri_s,uri_len);

+			}

+			if (free_flag && uri_s)

+				pkg_free(uri_s);

+			uri_s = foo;

+			free_flag = 0;

+			pos = NO_RPL_BRANCH;

+	}

+	/* -v6

+	t_forks[pos].ip = ip;

+	t_forks[pos].port = port;

+	*/

+	t_forks[pos].to=to;

+

+	if (uri_s && uri_len)

+	{

+		t_forks[pos].free_flag = free_flag;

+		t_forks[pos].uri.len = uri_len;

+		t_forks[pos].uri.s = uri_s;

+	}

+

+	return 1;

+}

+

+

+

+

+int t_clear_forks( )

+{

+	int i;

+

+	DBG("DEBUG: t_clear_forks: clearing tabel...\n");

+	for(i=1;i<nr_forks;i++)

+		if (t_forks[i].free_flag && t_forks[i].uri.s)

+			pkg_free(t_forks[i].uri.s);

+	memset( t_forks, 0, sizeof(t_forks));

+	nr_forks = 0;

+	return 1;

+}

+

+

+

new file mode 100644

@@ -0,0 +1,30 @@

+/*

+ * $Id$

+ */

+

+#ifndef _T_FORKS_H

+#define _T_FORKS_H

+

+#include "../../ip_addr.h"

+#include "../../str.h"

+

+

+struct fork

+{

+    union sockaddr_union to;

+    char inactive;

+    unsigned char free_flag;

+    str           uri;

+

+};

+

+extern struct fork      t_forks[ NR_OF_CLIENTS ];

+extern unsigned int     nr_forks;

+

+int t_add_fork( union sockaddr_union to, char* uri_s,

+				unsigned int uri_len, enum fork_type type,

+				unsigned char free_flag);

+int t_clear_forks();

+

+

+#endif

@@ -1,38 +1,21 @@

 /*

  * $Id$

  *

+ * transaction maintenance functions

  */

-#include "hash_func.h"

-#include "t_funcs.h"

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

 #include "../../config.h"

 #include "../../parser/parser_f.h"

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

-//#include "../../timer.h"

-

-

-

-#define  append_mem_block(_d,_s,_len) \

-		do{\

-			memcpy((_d),(_s),(_len));\

-			(_d) += (_len);\

-		}while(0);

-#define  req_line(_msg) \

-		((_msg)->first_line.u.request)

-

+#include "hash_func.h"

+#include "t_funcs.h"

+#include "t_fork.h"

 struct cell      *T;

 unsigned int     global_msg_id;

 struct s_table*  hash_table;

-unsigned int     nr_forks;

-struct fork      t_forks[ NR_OF_CLIENTS ];

-

-

-

-void timer_routine(unsigned int, void*);

-

 int tm_startup()

@@ -193,85 +176,6 @@ int t_update_timers_after_sending_reply( struct retr_buf *rb )

-/* Checks if the new reply (with new_code status) should be sent or not

- *  based on the current

- * transactin status.

- * Returns 	- branch number (0,1,...) which should be relayed

- *         -1 if nothing to be relayed

- */

-int t_should_relay_response( struct cell *Trans , int new_code,

-									int branch , int *should_store )

-{

-	//int T_code;

-	int b, lowest_b, lowest_s;

-

-	//if (Trans->uas.request->REQ_METHOD==METHOD_INVITE)

-	//	T_code = Trans->uac[branch].status;

-	//else

-	//T_code = Trans->uas.status;

-

-	/* note: this code never lets replies to CANCEL go through;

-	   we generate always a local 200 for CANCEL; 200s are

-	   not relayed because it's not an INVITE transaction;

-	   >= 300 are not relayed because 200 was already sent

-	   out

-	*/

-	DBG("->>>>>>>>> T_code=%d, new_code=%d\n",Trans->uas.status,new_code);

-	/* if final response sent out, allow only INVITE 2xx  */

-	if ( Trans->uas.status >= 200 ) {

-		if (new_code>=200 && new_code < 300  && 

-			Trans->uas.request->REQ_METHOD==METHOD_INVITE) {

-			DBG("DBG: t_should_relay: 200 INV after final sent\n");

-			*should_store=1;

-			return branch;

-		} else {

-			*should_store=0;

-			return -1;

-		}

-	} else { /* no final response sent yet */

-		/* negative replies subject to fork picking */

-		if (new_code >=300 ) {

-			*should_store=1;

-			/* if all_final return lowest */

-			lowest_b=-1; lowest_s=999;

-			for ( b=0; b<Trans->nr_of_outgoings ; b++ ) {

-				/* "fake" for the currently processed branch */

-				if (b==branch) {

-					if (new_code<lowest_s) {

-						lowest_b=b;

-						lowest_s=new_code;

-					}

-					continue;

-				}

-				/* there is still an unfinished UAC transaction; wait now! */

-				if ( Trans->uac[b].status<200 )

-					return -1;

-				if ( Trans->uac[b].status<lowest_s )

-				{

-					lowest_b =b;

-					lowest_s = T->uac[b].status;

-				}

-			}

-			return lowest_b;

-		/* 1xx except 100 and 2xx will be relayed */

-		} else if (new_code>100) {

-			*should_store=1;

-			return branch;

-		}

-		/* 100 won't be relayed */

-		else {

-			if (!T->uac[branch].rpl_received) *should_store=1;

-				else *should_store=0;

-			if (Trans->uas.status==0) return branch;

-				else return -1;

-		}

-	}

-

-	LOG(L_CRIT, "ERROR: Oh my gooosh! We don't know whether to relay\n");

-	abort();

-}

-

-

 /*

   */

 int t_put_on_wait(  struct cell  *Trans  )

@@ -325,147 +229,6 @@ int t_put_on_wait(  struct cell  *Trans  )

-/* Builds a CANCEL request based on an INVITE request. CANCEL is send

- * to same address as the INVITE */

-int t_build_and_send_CANCEL(struct cell *Trans,unsigned int branch)

-{

-	struct sip_msg      *p_msg;

-	struct hdr_field    *hdr;

-	char                *cancel_buf, *p, *via;

-	unsigned int         len, via_len;

-

-	if ( !Trans->uac[branch].rpl_received )

-	{

-		DBG("DEBUG: t_build_and_send_CANCEL: no response ever received"

-			" : dropping local cancel! \n");

-		return 1;

-	}

-

-	if (Trans->uac[branch].request.cancel!=NO_CANCEL)

-	{

-		DBG("DEBUG: t_build_and_send_CANCEL: branch (%d)was already canceled"

-			" : dropping local cancel! \n",branch);

-		return 1;

-	}

-

-	cancel_buf = 0;

-	via = 0;

-	p_msg = Trans->uas.request;

-

-	len = 0;

-	/*first line's len - CANCEL and INVITE has the same lenght */

-	len += ( req_line(p_msg).version.s+req_line(p_msg).version.len)-

-		req_line(p_msg).method.s+CRLF_LEN;

-	/*check if the REQ URI was override */

-	if (Trans->uac[branch].uri.s)

-		len += Trans->uac[branch].uri.len - req_line(p_msg).uri.len;

-	/*via*/

-	if ( add_branch_label(Trans,p_msg,branch)==-1 )

-		goto error;

-	via = via_builder( p_msg , &via_len );

-	if (!via)

-	{

-		LOG(L_ERR, "ERROR: t_build_and_send_CANCEL: "

-			"no via header got from builder\n");

-		goto error;

-	}

-	len+= via_len;

-	/*headers*/

-	for ( hdr=p_msg->headers ; hdr ; hdr=hdr->next )

-		if (hdr->type==HDR_FROM || hdr->type==HDR_CALLID || 

-			hdr->type==HDR_CSEQ || hdr->type==HDR_TO )

-			len += ((hdr->body.s+hdr->body.len ) - hdr->name.s ) + CRLF_LEN ;

-	/* User Agent header*/

-	len += USER_AGENT_LEN + CRLF_LEN;

-	/* Content Lenght heder*/

-	len += CONTENT_LEN_LEN + CRLF_LEN;

-	/* end of message */

-	len += CRLF_LEN;

-

-	cancel_buf=sh_malloc( len+1 );

-	if (!cancel_buf)

-	{

-		LOG(L_ERR, "ERROR: t_build_and_send_CANCEL: cannot allocate memory\n");

-		goto error;

-	}

-	p = cancel_buf;

-

-	/* first line -> do we have a new URI? */

-	if (Trans->uac[branch].uri.s)

-	{

-		append_mem_block(p,req_line(p_msg).method.s,

-			req_line(p_msg).uri.s-req_line(p_msg).method.s);

-		append_mem_block(p,Trans->uac[branch].uri.s,

-			Trans->uac[branch].uri.len);

-		append_mem_block(p,req_line(p_msg).uri.s+req_line(p_msg).uri.len,

-			req_line(p_msg).version.s+req_line(p_msg).version.len-

-			(req_line(p_msg).uri.s+req_line(p_msg).uri.len))

-	}else{

-		append_mem_block(p,req_line(p_msg).method.s,

-			req_line(p_msg).version.s+req_line(p_msg).version.len-

-			req_line(p_msg).method.s);

-	}

-	/* changhing method name*/

-	memcpy(cancel_buf, CANCEL , CANCEL_LEN );

-	append_mem_block(p,CRLF,CRLF_LEN);

-	/* insert our via */

-	append_mem_block(p,via,via_len);

-

-	/*other headers*/

-	for ( hdr=p_msg->headers ; hdr ; hdr=hdr->next )

-	{

-		if(hdr->type==HDR_FROM||hdr->type==HDR_CALLID||hdr->type==HDR_TO)

-		{

-			append_mem_block(p,hdr->name.s,

-				((hdr->body.s+hdr->body.len)-hdr->name.s) );

-			append_mem_block(p, CRLF, CRLF_LEN );

-		}else if ( hdr->type==HDR_CSEQ )

-		{

-			append_mem_block(p,hdr->name.s,

-				((((struct cseq_body*)hdr->parsed)->method.s)-hdr->name.s));

-			append_mem_block(p, CANCEL CRLF, CANCEL_LEN +CRLF_LEN );

-		}

-}

-

-	/* User Agent header */

-	append_mem_block(p,USER_AGENT,USER_AGENT_LEN);

-	append_mem_block(p,CRLF,CRLF_LEN);

-	/* Content Lenght header*/

-	append_mem_block(p,CONTENT_LEN,CONTENT_LEN_LEN);

-	append_mem_block(p,CRLF,CRLF_LEN);

-	/* end of message */

-	append_mem_block(p,CRLF,CRLF_LEN);

-	*p=0;

-

-	if (Trans->uac[branch].request.cancel) {

-		shm_free( cancel_buf );

-		LOG(L_WARN, "send_cancel: Warning: CANCEL already sent out\n");

-		goto error;

-	}

-

-	Trans->uac[branch].request.activ_type = TYPE_LOCAL_CANCEL;

-	Trans->uac[branch].request.cancel = cancel_buf;

-	Trans->uac[branch].request.cancel_len = len;

-

-	/*sets and starts the FINAL RESPONSE timer */

-	set_timer(hash_table,&(Trans->uac[branch].request.fr_timer),FR_TIMER_LIST);

-	/* sets and starts the RETRANS timer */

-	Trans->uac[branch].request.retr_list = RT_T1_TO_1;

-	set_timer(hash_table,&(Trans->uac[branch].request.retr_timer),RT_T1_TO_1);

-	DBG("DEBUG: T_build_and_send_CANCEL : sending cancel...\n");

-	SEND_CANCEL_BUFFER( &(Trans->uac[branch].request) );

-

-	pkg_free(via);

-	return 1;

-error:

-	if (via) pkg_free(via);

-	return -1;

-}

-

-

-

-

-

 void delete_cell( struct cell *p_cell )

 {

@@ -524,492 +287,3 @@ void delete_cell( struct cell *p_cell )

 }

-

-

-/* Returns  -1 = error

-                    0 = OK

-*/

-int get_ip_and_port_from_uri( str *uri , unsigned int *param_ip, unsigned int *param_port)

-{

-	struct hostent  *nhost;

-	unsigned int    ip, port;

-	struct sip_uri  parsed_uri;

-	int             err;

-#ifdef DNS_IP_HACK

-	int             len;

-#endif

-

-	/* parsing the request uri in order to get host and port */

-	if (parse_uri( uri->s , uri->len , &parsed_uri )<0)

-	{

-		LOG(L_ERR, "ERROR: get_ip_and_port_from_uri: "

-		   "unable to parse destination uri: %.*s\n", uri->len, uri->s );

-		goto error;

-	}

-

-	/* getting the port */

-	if ( parsed_uri.port.s==0 || parsed_uri.port.len==0 )

-		port = SIP_PORT;

-	else{

-		port = str2s( (unsigned char*) parsed_uri.port.s, parsed_uri.port.len,

-						&err );

-		if ( err<0 ){

-			LOG(L_ERR, "ERROR: get_ip_and_port_from_uri: converting port "

-				"from str to int failed; using default SIP port\n\turi:%.*s\n",

-				uri->len, uri->s );

-			port = SIP_PORT;

-		}

-	}

-	port = htons(port);

-

-	/* getting host address*/

-#ifdef DNS_IP_HACK

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

-	ip=str2ip( (unsigned char*)parsed_uri.host.s, len, &err);

-	if (err==0)

-		goto success;

-#endif

-	/* fail over to normal lookup */

-	nhost = gethostbyname( parsed_uri.host.s );

-	if ( !nhost )

-	{

-		LOG(L_ERR, "ERROR: get_ip_and_port_from_uri: "

-		  "cannot resolve host in uri: %.*s\n", uri->len, uri->s );

-		free_uri(&parsed_uri);

-		goto error;

-	}

-	memcpy(&ip, nhost->h_addr_list[0], sizeof(unsigned int));

-

-

-success:

-	free_uri(&parsed_uri);

-	*param_ip = ip;

-	*param_port = port;

-	return 0;

-

-error:

-	*param_ip = 0;

-	*param_port = 0;

-	return -1;

-}

-

-

-

-

-int t_add_fork( unsigned int ip, unsigned int port, char* uri_s,

-			unsigned int uri_len, enum fork_type type, unsigned char free_flag)

-{

-	unsigned int pos=0;

-	char         *foo=0;

-

-	switch (type)

-	{

-		case DEFAULT:

-			if (nr_forks+1>=MAX_FORK)

-			{

-				LOG(L_ERR,"ERROR:t_add_fork: trying to add new fork ->"

-					" MAX_FORK exceded\n");

-				return -1;

-			}

-			pos = ++nr_forks;

-			break;

-		case NO_RESPONSE:

-			if (t_forks[NO_RPL_BRANCH].ip)

-				LOG(L_WARN,"WARNING:t_add_fork: trying to add NO_RPL fork ->"

-					" it was set before -> overriding\n");

-			if (uri_s && uri_len)

-			{

-				foo = (char*)shm_malloc(uri_len);

-				if (!foo)

-				{

-					LOG(L_ERR,"ERROR:t_add_fork: cannot get free memory\n");

-					return -1;

-				}

-				memcpy(foo,uri_s,uri_len);

-			}

-			if (free_flag && uri_s)

-				pkg_free(uri_s);

-			uri_s = foo;

-			free_flag = 0;

-			pos = NO_RPL_BRANCH;

-	}

-	t_forks[pos].ip = ip;

-	t_forks[pos].port = port;

-	if (uri_s && uri_len)

-	{

-		t_forks[pos].free_flag = free_flag;

-		t_forks[pos].uri.len = uri_len;

-		t_forks[pos].uri.s = uri_s;

-	}

-

-	return 1;

-}

-

-

-

-

-int t_clear_forks( )

-{

-	int i;

-

-	DBG("DEBUG: t_clear_forks: clearing tabel...\n");

-	for(i=1;i<nr_forks;i++)

-		if (t_forks[i].free_flag && t_forks[i].uri.s)

-			pkg_free(t_forks[i].uri.s);

-	memset( t_forks, 0, sizeof(t_forks));

-	nr_forks = 0;

-	return 1;

-}

-

-

-

-

-

-/*---------------------------TIMERS FUNCTIONS-------------------------------*/

-

-

-

-

-

-inline void retransmission_handler( void *attr)

-{

-	struct retr_buf* r_buf ;

-	enum lists id;

-

-	r_buf = (struct retr_buf*)attr;

-#ifdef EXTRA_DEBUG

-	if (r_buf->my_T->damocles) {

-		LOG( L_ERR, "ERROR: transaction %p scheduled for deletion and"

-			" called from RETR timer\n",r_buf->my_T);

-		abort();

-	}	

-#endif

-

-	/*the transaction is already removed from RETRANSMISSION_LIST by timer*/

-	/* retransmision */

-	DBG("DEBUG: retransmission_handler : resending (t=%p)\n", r_buf->my_T);

-	switch ( r_buf->activ_type )

-	{

-		case (TYPE_REQUEST):

-			SEND_BUFFER( r_buf );

-			break;

-		case (TYPE_LOCAL_CANCEL):

-			SEND_CANCEL_BUFFER( r_buf );

-			break;

-		default:

-			T=r_buf->my_T;

-			t_retransmit_reply();

-	}

-

-	id = r_buf->retr_list;

-	r_buf->retr_list = id < RT_T2 ? id + 1 : RT_T2;

-

-	set_timer(hash_table,&(r_buf->retr_timer),id < RT_T2 ? id + 1 : RT_T2 );

-

-	DBG("DEBUG: retransmission_handler : done\n");

-}

-

-

-

-

-inline void final_response_handler( void *attr)

-{

-	struct retr_buf* r_buf = (struct retr_buf*)attr;

-

-#ifdef EXTRA_DEBUG

-	if (r_buf->my_T->damocles) 

-	{

-		LOG( L_ERR, "ERROR: transaction %p scheduled for deletion and"

-			" called from FR timer\n",r_buf->my_T);

-		abort();

-	}

-#endif

-

-	/* the transaction is already removed from FR_LIST by the timer */

-	if (r_buf->activ_type==TYPE_LOCAL_CANCEL)

-	{

-		DBG("DEBUG: FR_handler: stop retransmission for Local Cancel\n");

-		reset_timer( hash_table , &(r_buf->retr_timer) );

-		return;

-	}

-	/* send a 408 */

-	if ( r_buf->my_T->uac[r_buf->branch].status<200

-#ifdef SILENT_FR

-	&& (r_buf->my_T->nr_of_outgoings>1     /*if we have forked*/

-		|| r_buf->my_T->uas.request->first_line.u.request.method_value!=

-			METHOD_INVITE                  /*if is not an INVITE */

-		|| r_buf->my_T->uac[r_buf->my_T->nr_of_outgoings].uri.s

-		                                   /*if "no on no response" was set*/

-		|| r_buf->my_T->uac[r_buf->branch].rpl_received==0

-											/*if no reply was received*/

-	)

-#endif