listeningpoint.c 7.62 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18
/*
	belle-sip - SIP (RFC3261) library.
    Copyright (C) 2010  Belledonne Communications SARL

    This program 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 3 of the License, or
    (at your option) any later version.

    This program 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, see <http://www.gnu.org/licenses/>.
*/

Simon Morlat's avatar
Simon Morlat committed
19
#include "belle_sip_internal.h"
20 21


jehan's avatar
jehan committed
22
void belle_sip_listening_point_init(belle_sip_listening_point_t *lp, belle_sip_stack_t *s, const char *address, int port){
Simon Morlat's avatar
Simon Morlat committed
23
	belle_sip_init_sockets();
24
	lp->stack=s;
jehan's avatar
jehan committed
25
	lp->listening_uri=belle_sip_uri_create(NULL,address);
26
	belle_sip_object_ref(lp->listening_uri);
jehan's avatar
jehan committed
27 28
	belle_sip_uri_set_port(lp->listening_uri,port);
	belle_sip_uri_set_transport_param(lp->listening_uri,BELLE_SIP_OBJECT_VPTR(lp,belle_sip_listening_point_t)->transport);
29 30 31
}

static void belle_sip_listening_point_uninit(belle_sip_listening_point_t *lp){
32
	char *tmp=belle_sip_object_to_string((belle_sip_object_t*)BELLE_SIP_LISTENING_POINT(lp)->listening_uri);
33
	belle_sip_listening_point_clean_channels(lp);
34
	belle_sip_message("Listening point [%p] on [%s] destroyed",lp, tmp);
jehan's avatar
jehan committed
35
	belle_sip_object_unref(lp->listening_uri);
36
	belle_sip_free(tmp);
37
	lp->channel_listener=NULL; /*does not unref provider*/
Simon Morlat's avatar
Simon Morlat committed
38
	belle_sip_uninit_sockets();
jehan's avatar
jehan committed
39
	belle_sip_listening_point_set_keep_alive(lp,-1);
40 41
}

42

jehan's avatar
jehan committed
43
void belle_sip_listening_point_add_channel(belle_sip_listening_point_t *lp, belle_sip_channel_t *chan){
44
	belle_sip_channel_add_listener(chan,lp->channel_listener); /*add channel listener*/
jehan's avatar
jehan committed
45
	lp->channels=belle_sip_list_append(lp->channels,chan);/*channel is already owned*/
46 47 48 49 50
}

belle_sip_channel_t *belle_sip_listening_point_create_channel(belle_sip_listening_point_t *obj, const char *dest, int port){
	belle_sip_channel_t *chan=BELLE_SIP_OBJECT_VPTR(obj,belle_sip_listening_point_t)->create_channel(obj,dest,port);
	if (chan){
Simon Morlat's avatar
wip  
Simon Morlat committed
51
		chan->lp=obj;
52 53 54
		belle_sip_listening_point_add_channel(obj,chan);
	}
	return chan;
55 56
}

Simon Morlat's avatar
wip  
Simon Morlat committed
57 58

void belle_sip_listening_point_remove_channel(belle_sip_listening_point_t *lp, belle_sip_channel_t *chan){
59
	belle_sip_channel_remove_listener(chan,lp->channel_listener);
60
	lp->channels=belle_sip_list_remove(lp->channels,chan);
61
	belle_sip_object_unref(chan);
62
}
Simon Morlat's avatar
wip  
Simon Morlat committed
63

64

65 66
void belle_sip_listening_point_clean_channels(belle_sip_listening_point_t *lp){
	int existing_channels;
67
	belle_sip_list_t* iterator;
Simon Morlat's avatar
Simon Morlat committed
68
	
69
	if ((existing_channels=belle_sip_list_size(lp->channels)) > 0) {
70
		belle_sip_message("Listening point destroying [%i] channels",existing_channels);
71
	}
Simon Morlat's avatar
Simon Morlat committed
72 73 74
	for (iterator=lp->channels;iterator!=NULL;iterator=iterator->next) {
		belle_sip_channel_t *chan=(belle_sip_channel_t*)iterator->data;
		belle_sip_channel_force_close(chan);
75 76
	}
	lp->channels=belle_sip_list_free_with_data(lp->channels,(void (*)(void*))belle_sip_object_unref);
77 78
}

79 80 81
int belle_sip_listening_point_get_channel_count(const belle_sip_listening_point_t *lp){
	return belle_sip_list_size(lp->channels);
}
82

83
BELLE_SIP_DECLARE_NO_IMPLEMENTED_INTERFACES(belle_sip_listening_point_t);
84 85
BELLE_SIP_INSTANCIATE_CUSTOM_VPTR(belle_sip_listening_point_t)={
	{ 
Simon Morlat's avatar
Simon Morlat committed
86
		BELLE_SIP_VPTR_INIT(belle_sip_listening_point_t, belle_sip_object_t,FALSE),
87 88 89 90 91 92 93
		(belle_sip_object_destroy_t)belle_sip_listening_point_uninit,
		NULL,
		NULL
	},
	NULL,
	NULL
};
Simon Morlat's avatar
Simon Morlat committed
94

95
const char *belle_sip_listening_point_get_ip_address(const belle_sip_listening_point_t *lp){
jehan's avatar
jehan committed
96
	return belle_sip_uri_get_host(lp->listening_uri);
97 98 99
}

int belle_sip_listening_point_get_port(const belle_sip_listening_point_t *lp){
jehan's avatar
jehan committed
100
	return belle_sip_uri_get_listening_port(lp->listening_uri);
101 102 103
}

const char *belle_sip_listening_point_get_transport(const belle_sip_listening_point_t *lp){
jehan's avatar
jehan committed
104
	return belle_sip_uri_get_transport_param(lp->listening_uri);
105 106
}

jehan's avatar
jehan committed
107 108 109
const belle_sip_uri_t* belle_sip_listening_point_get_uri(const  belle_sip_listening_point_t *lp) {
	return lp->listening_uri;
}
110 111 112 113 114 115 116
int belle_sip_listening_point_get_well_known_port(const char *transport){
	if (strcasecmp(transport,"UDP")==0 || strcasecmp(transport,"TCP")==0 ) return 5060;
	if (strcasecmp(transport,"DTLS")==0 || strcasecmp(transport,"TLS")==0 ) return 5061;
	belle_sip_error("No well known port for transport %s", transport);
	return -1;
}

jehan's avatar
jehan committed
117
belle_sip_channel_t *_belle_sip_listening_point_get_channel(belle_sip_listening_point_t *lp,const char *peer_name, int peer_port, const struct addrinfo *addr){
118
	belle_sip_list_t *elem;
119
	belle_sip_channel_t *chan;
Simon Morlat's avatar
Simon Morlat committed
120 121 122 123 124 125 126 127 128 129 130
	
	for(elem=lp->channels;elem!=NULL;elem=elem->next){
		chan=(belle_sip_channel_t*)elem->data;
		if (belle_sip_channel_matches(chan,peer_name,peer_port,addr)){
			return chan;
		}
	}
	return NULL;
}

belle_sip_channel_t *belle_sip_listening_point_get_channel(belle_sip_listening_point_t *lp,const char *peer_name, int peer_port){
131 132 133
	struct addrinfo *res=NULL;
	struct addrinfo hints={0};
	char portstr[20];
Simon Morlat's avatar
Simon Morlat committed
134
	belle_sip_channel_t *chan;
135 136 137 138

	hints.ai_flags=AI_NUMERICHOST|AI_NUMERICSERV;
	snprintf(portstr,sizeof(portstr),"%i",peer_port);
	getaddrinfo(peer_name,portstr,&hints,&res);
Simon Morlat's avatar
Simon Morlat committed
139
	chan=_belle_sip_listening_point_get_channel(lp,peer_name,peer_port,res);
140
	if (res) freeaddrinfo(res);
Simon Morlat's avatar
Simon Morlat committed
141
	return chan;
142 143
}

jehan's avatar
jehan committed
144 145
static int send_keep_alive(belle_sip_channel_t* obj) {
	/*keep alive*/
Simon Morlat's avatar
Simon Morlat committed
146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165
	const char* crlfcrlf = "\r\n\r\n";
	int size=strlen(crlfcrlf);
	if (belle_sip_channel_send(obj,crlfcrlf,size)<0){
		belle_sip_error("channel [%p]: could not send [%i] bytes of keep alive from [%s://%s:%i]  to [%s:%i]"	,obj
			,size
			,belle_sip_channel_get_transport_name(obj)
			,obj->local_ip
			,obj->local_port
			,obj->peer_name
			,obj->peer_port);

		return -1;
	}else{
		belle_sip_message("channel [%p]: keep alive sent to [%s://%s:%i]"
							,obj
							,belle_sip_channel_get_transport_name(obj)
							,obj->peer_name
							,obj->peer_port);
		return 0;
	}
jehan's avatar
jehan committed
166 167 168 169 170
}
static int keep_alive_timer_func(void *user_data, unsigned int events) {
	belle_sip_listening_point_t* lp=(belle_sip_listening_point_t*)user_data;
	belle_sip_list_t* iterator;
	belle_sip_channel_t* channel;
171 172 173
	belle_sip_list_t *to_be_closed=NULL;

	for (iterator=lp->channels;iterator!=NULL;iterator=iterator->next) {
174
		channel=(belle_sip_channel_t*)iterator->data;
175 176
		if (channel->state == BELLE_SIP_CHANNEL_READY && send_keep_alive(channel)==-1) { /*only send keep alive if ready*/
			to_be_closed=belle_sip_list_append(to_be_closed,channel);
177
		}
jehan's avatar
jehan committed
178
	}
179 180 181 182 183 184
	for (iterator=to_be_closed;iterator!=NULL;iterator=iterator->next){
		channel=(belle_sip_channel_t*)iterator->data;
		channel_set_state(channel,BELLE_SIP_CHANNEL_ERROR);
		belle_sip_channel_close(channel);
	}
	belle_sip_list_free(to_be_closed);
jehan's avatar
jehan committed
185 186 187
	return BELLE_SIP_CONTINUE;
}

Simon Morlat's avatar
Simon Morlat committed
188
void belle_sip_listening_point_set_keep_alive(belle_sip_listening_point_t *lp,int ms) {
jehan's avatar
jehan committed
189
	if (ms <=0) {
190
		if (lp->keep_alive_timer) {
jehan's avatar
jehan committed
191 192 193 194 195 196 197 198 199
			belle_sip_main_loop_remove_source(lp->stack->ml,lp->keep_alive_timer);
			belle_sip_object_unref(lp->keep_alive_timer);
			lp->keep_alive_timer=NULL;
		}
		return;
	}

	if (!lp->keep_alive_timer) {
		lp->keep_alive_timer = belle_sip_main_loop_create_timeout(lp->stack->ml
Simon Morlat's avatar
Simon Morlat committed
200 201 202 203
			, keep_alive_timer_func
			, lp
			, ms
			,"keep alive") ;
jehan's avatar
jehan committed
204 205 206 207 208 209 210 211 212
	} else {
		belle_sip_source_set_timeout(lp->keep_alive_timer,ms);
	}
	return;
}

int belle_sip_listening_point_get_keep_alive(const belle_sip_listening_point_t *lp) {
	return lp->keep_alive_timer?belle_sip_source_get_timeout(lp->keep_alive_timer):-1;
}
213

214 215 216
void belle_sip_listener_set_channel_listener(belle_sip_listening_point_t *lp,belle_sip_channel_listener_t* channel_listener) {
	lp->channel_listener=channel_listener;
}