refresher.c 23.2 KB
Newer Older
jehan's avatar
jehan committed
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21
/*
	belle-sip - SIP (RFC3261) library.
    Copyright (C) 2012  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/>.
*/

#include "belle_sip_internal.h"
#include "belle-sip/refresher-helper.h"

jehan's avatar
jehan committed
22
#define DEFAULT_RETRY_AFTER 60000
jehan's avatar
jehan committed
23 24 25 26
typedef enum belle_sip_refresher_state {
	started,
	stopped
}belle_sip_refresher_state_t;
Simon Morlat's avatar
Simon Morlat committed
27

jehan's avatar
jehan committed
28 29 30 31 32 33
struct belle_sip_refresher {
	belle_sip_object_t obj;
	belle_sip_refresher_listener_t listener;
	belle_sip_source_t* timer;
	belle_sip_client_transaction_t* transaction;
	int expires;
jehan's avatar
jehan committed
34
	belle_sip_refresher_state_t state;
jehan's avatar
jehan committed
35
	belle_sip_listener_callbacks_t listener_callbacks;
Simon Morlat's avatar
Simon Morlat committed
36
	belle_sip_listener_t *sip_listener;
jehan's avatar
jehan committed
37
	void* user_data;
jehan's avatar
jehan committed
38
	int retry_after;
jehan's avatar
jehan committed
39 40 41
	belle_sip_list_t* auth_events;
	belle_sip_header_contact_t* nated_contact;
	int enable_nat_helper;
42
	int auth_failures;
jehan's avatar
jehan committed
43
};
jehan's avatar
jehan committed
44 45 46
static int set_expires_from_trans(belle_sip_refresher_t* refresher);

static int timer_cb(void *user_data, unsigned int events) ;
47
static int belle_sip_refresher_refresh_internal(belle_sip_refresher_t* refresher,int expires,int auth_mandatory, belle_sip_list_t** auth_infos);
jehan's avatar
jehan committed
48

jehan's avatar
jehan committed
49

jehan's avatar
jehan committed
50
static void schedule_timer_at(belle_sip_refresher_t* refresher,int delay) {
Simon Morlat's avatar
Simon Morlat committed
51 52 53 54
	belle_sip_message("Refresher: scheduling next timer in %i ms",delay);
	if (refresher->timer){
		belle_sip_main_loop_remove_source(belle_sip_stack_get_main_loop(refresher->transaction->base.provider->stack),refresher->timer);
		belle_sip_object_unref(refresher->timer);
jehan's avatar
jehan committed
55
	}
Simon Morlat's avatar
Simon Morlat committed
56 57 58
	refresher->timer=belle_sip_timeout_source_new(timer_cb,refresher,delay);
	belle_sip_object_set_name((belle_sip_object_t*)refresher->timer,"Refresher timeout");
	belle_sip_main_loop_add_source(belle_sip_stack_get_main_loop(refresher->transaction->base.provider->stack),refresher->timer);
jehan's avatar
jehan committed
59 60

}
61
static void retry_later(belle_sip_refresher_t* refresher) {
jehan's avatar
jehan committed
62 63
	schedule_timer_at(refresher,refresher->retry_after);
}
Simon Morlat's avatar
Simon Morlat committed
64

jehan's avatar
jehan committed
65 66 67 68
static void schedule_timer(belle_sip_refresher_t* refresher) {
	schedule_timer_at(refresher,refresher->expires*900);
}

jehan's avatar
jehan committed
69 70
static void process_dialog_terminated(void *user_ctx, const belle_sip_dialog_terminated_event_t *event){
	/*nop*/
jehan's avatar
jehan committed
71 72
}
static void process_io_error(void *user_ctx, const belle_sip_io_error_event_t *event){
73 74 75 76 77
	belle_sip_refresher_t* refresher=(belle_sip_refresher_t*)user_ctx;
	belle_sip_client_transaction_t*client_transaction;

	if (belle_sip_object_is_instance_of(BELLE_SIP_OBJECT(belle_sip_io_error_event_get_source(event)),BELLE_SIP_TYPE_ID(belle_sip_client_transaction_t))) {
		client_transaction=BELLE_SIP_CLIENT_TRANSACTION(belle_sip_io_error_event_get_source(event));
78 79 80 81
		if (!refresher || (refresher && ((refresher->state==stopped
											&& belle_sip_transaction_get_state(BELLE_SIP_TRANSACTION(refresher->transaction)) != BELLE_SIP_TRANSACTION_TRYING
											&& belle_sip_transaction_get_state(BELLE_SIP_TRANSACTION(refresher->transaction)) != BELLE_SIP_TRANSACTION_INIT /*to cover dns or certificate error*/)
										|| client_transaction !=refresher->transaction )))
82
				return; /*not for me or no longuer involved*/
83

Simon Morlat's avatar
Simon Morlat committed
84
		if (refresher->state==started) retry_later(refresher);
jehan's avatar
jehan committed
85
		if (refresher->listener) refresher->listener(refresher,refresher->user_data,503, "io error");
86
		return;
87 88
	} else if (belle_sip_object_is_instance_of(BELLE_SIP_OBJECT(belle_sip_io_error_event_get_source(event)),BELLE_SIP_TYPE_ID(belle_sip_provider_t))) {
		/*something went wrong on this provider, checking if my channel is still up*/
jehan's avatar
jehan committed
89
		if (refresher->state==started  /*refresher started or trying to refresh */
jehan's avatar
jehan committed
90 91
				&& belle_sip_transaction_get_state(BELLE_SIP_TRANSACTION(refresher->transaction)) == BELLE_SIP_TRANSACTION_TERMINATED /*else we are notified by transaction error*/
				&&	(belle_sip_channel_get_state(refresher->transaction->base.channel) == BELLE_SIP_CHANNEL_DISCONNECTED
92 93 94 95 96
								||belle_sip_channel_get_state(refresher->transaction->base.channel) == BELLE_SIP_CHANNEL_ERROR)) {
			belle_sip_message("refresher [%p] has channel [%p] in state [%s], reporting error"
								,refresher
								,refresher->transaction->base.channel
								,belle_sip_channel_state_to_string(belle_sip_channel_get_state(refresher->transaction->base.channel)));
Simon Morlat's avatar
Simon Morlat committed
97
			if (refresher->state==started) retry_later(refresher);
jehan's avatar
jehan committed
98
			if (refresher->listener) refresher->listener(refresher,refresher->user_data,503, "io error");
99 100 101 102
		}
		return;
	}else {
		belle_sip_error("Refresher process_io_error not implemented yet for non transaction/provider source");
103
	}
jehan's avatar
jehan committed
104 105 106 107 108 109 110
}



static void process_response_event(void *user_ctx, const belle_sip_response_event_t *event){
	belle_sip_client_transaction_t* client_transaction = belle_sip_response_event_get_client_transaction(event);
	belle_sip_response_t* response = belle_sip_response_event_get_response(event);
jehan's avatar
jehan committed
111
	belle_sip_request_t* request=belle_sip_transaction_get_request(BELLE_SIP_TRANSACTION(client_transaction));
jehan's avatar
jehan committed
112 113
	int response_code = belle_sip_response_get_status_code(response);
	belle_sip_refresher_t* refresher=(belle_sip_refresher_t*)user_ctx;
jehan's avatar
jehan committed
114 115
	belle_sip_header_contact_t* contact_header;

jehan's avatar
jehan committed
116 117 118
	if (refresher && (client_transaction !=refresher->transaction))
		return; /*not for me*/

jehan's avatar
jehan committed
119 120 121 122 123 124 125 126
	if ((contact_header=belle_sip_message_get_header_by_type(request,belle_sip_header_contact_t))) {
		if (refresher->nated_contact) belle_sip_object_unref(refresher->nated_contact);
		refresher->nated_contact=BELLE_SIP_HEADER_CONTACT(belle_sip_object_clone(BELLE_SIP_OBJECT(contact_header)));
		belle_sip_object_ref(refresher->nated_contact);
		belle_sip_response_fix_contact(response,refresher->nated_contact);
	}
	/*handle authorization*/
	switch (response_code) {
127 128
	case 200:
		refresher->auth_failures=0;
jehan's avatar
jehan committed
129
		/*great, success*/
jehan's avatar
jehan committed
130 131 132 133 134 135 136 137 138 139 140 141
		if (strcmp(belle_sip_request_get_method(request),"PUBLISH")==0) {
			/*search for etag*/
			belle_sip_header_t* etag=belle_sip_message_get_header(BELLE_SIP_MESSAGE(response),"SIP-ETag");
			if (etag) {
				belle_sip_header_t* sip_if_match = belle_sip_header_create("SIP-If-Match",belle_sip_header_extension_get_value(BELLE_SIP_HEADER_EXTENSION(etag)));
				/*update request for next refresh*/
				belle_sip_message_remove_header(BELLE_SIP_MESSAGE(request),"SIP-If-Match");
				belle_sip_message_add_header(BELLE_SIP_MESSAGE(request),sip_if_match);
			} else {
				belle_sip_warning("Refresher [%p] receive 200ok to a publish without etag");
			}
		}
jehan's avatar
jehan committed
142 143
		/*update expire if needed*/
		set_expires_from_trans(refresher);
Simon Morlat's avatar
Simon Morlat committed
144 145
		if (refresher->state==started) schedule_timer(refresher); /*re-arm timer*/
		else belle_sip_message("Refresher [%p] not scheduling next refresh, because it was stopped");
jehan's avatar
jehan committed
146 147
		break;
	case 401:
148 149 150 151 152 153 154 155
	case 407:
		refresher->auth_failures++;
		if (refresher->auth_failures>3){
			/*avoid looping with 407 or 401 */
			belle_sip_warning("Authentication is failling constantly, giving up.");
			if (refresher->expires>0) retry_later(refresher);
			break;
		}
jehan's avatar
jehan committed
156 157
		if (refresher->auth_events) {
			refresher->auth_events=belle_sip_list_free_with_data(refresher->auth_events,(void (*)(void*))belle_sip_auth_event_destroy);
jehan's avatar
jehan committed
158
		}
jehan's avatar
jehan committed
159 160 161 162
		if (belle_sip_refresher_refresh_internal(refresher,refresher->expires,TRUE,&refresher->auth_events))
			break; /*Notify user of registration failure*/
		else
			return; /*ok, keep 401 internal*/
163 164 165 166 167 168
	case 423:{
		belle_sip_header_extension_t *min_expires=BELLE_SIP_HEADER_EXTENSION(belle_sip_message_get_header((belle_sip_message_t*)response,"Min-Expires"));
		if (min_expires){
			const char *value=belle_sip_header_extension_get_value(min_expires);
			if (value){
				int new_expires=atoi(value);
Simon Morlat's avatar
Simon Morlat committed
169
				if (new_expires>0 && refresher->state==started){
170 171 172 173 174 175 176
					refresher->expires=new_expires;
					belle_sip_refresher_refresh(refresher,refresher->expires);
					return;
				}
			}
		}else belle_sip_warning("Receiving 423 but no min-expires header.");
		break;
jehan's avatar
jehan committed
177 178 179 180 181
	}
	case 408:
	case 480:
	case 503:
	case 504:
182
		if (refresher->expires>0) retry_later(refresher);
jehan's avatar
jehan committed
183 184 185 186 187
		break;
	default:
		break;
	}
	if (refresher->listener) refresher->listener(refresher,refresher->user_data,response_code, belle_sip_response_get_reason_phrase(response));
jehan's avatar
jehan committed
188 189 190

}
static void process_timeout(void *user_ctx, const belle_sip_timeout_event_t *event) {
jehan's avatar
jehan committed
191
	belle_sip_refresher_t* refresher=(belle_sip_refresher_t*)user_ctx;
jehan's avatar
jehan committed
192 193
	belle_sip_client_transaction_t*client_transaction =belle_sip_timeout_event_get_client_transaction(event);

jehan's avatar
jehan committed
194
	if (refresher && (client_transaction !=refresher->transaction))
Simon Morlat's avatar
Simon Morlat committed
195
		return; /*not for me*/
jehan's avatar
jehan committed
196

Simon Morlat's avatar
Simon Morlat committed
197
	if (refresher->state==started) {
Simon Morlat's avatar
Simon Morlat committed
198 199 200
		/*retry in 2 seconds but not immediately to let the current transaction be cleaned*/
		schedule_timer_at(refresher,2000);
	}
jehan's avatar
jehan committed
201
	if (refresher->listener) refresher->listener(refresher,refresher->user_data,408, "timeout");
jehan's avatar
jehan committed
202
}
Simon Morlat's avatar
Simon Morlat committed
203

jehan's avatar
jehan committed
204
static void process_transaction_terminated(void *user_ctx, const belle_sip_transaction_terminated_event_t *event) {
jehan's avatar
jehan committed
205
	/*belle_sip_message("process_transaction_terminated Transaction terminated [%p]",event);*/
jehan's avatar
jehan committed
206 207 208
}

static void destroy(belle_sip_refresher_t *refresher){
209
	belle_sip_refresher_stop(refresher);
210 211
	belle_sip_provider_remove_internal_sip_listener(refresher->transaction->base.provider,refresher->sip_listener);
	belle_sip_object_unref(refresher->transaction);
212
	refresher->transaction=NULL;
213
	belle_sip_object_unref(refresher->sip_listener);
214
	refresher->sip_listener=NULL;
jehan's avatar
jehan committed
215 216 217
	if (refresher->auth_events) refresher->auth_events=belle_sip_list_free_with_data(refresher->auth_events,(void (*)(void*))belle_sip_auth_event_destroy);
	if (refresher->nated_contact) belle_sip_object_unref(refresher->nated_contact);

jehan's avatar
jehan committed
218
}
219

jehan's avatar
jehan committed
220 221 222 223 224 225 226 227
BELLE_SIP_DECLARE_NO_IMPLEMENTED_INTERFACES(belle_sip_refresher_t);

BELLE_SIP_INSTANCIATE_VPTR(belle_sip_refresher_t, belle_sip_object_t,destroy, NULL, NULL,FALSE);

void belle_sip_refresher_set_listener(belle_sip_refresher_t* refresher, belle_sip_refresher_listener_t listener,void* user_pointer) {
	refresher->listener=listener;
	refresher->user_data=user_pointer;
}
Simon Morlat's avatar
Simon Morlat committed
228

229
int belle_sip_refresher_refresh(belle_sip_refresher_t* refresher,int expires) {
230 231
	return belle_sip_refresher_refresh_internal(refresher,expires,FALSE,NULL);
}
Simon Morlat's avatar
Simon Morlat committed
232

233
static int belle_sip_refresher_refresh_internal(belle_sip_refresher_t* refresher,int expires,int auth_mandatory, belle_sip_list_t** auth_infos) {
jehan's avatar
jehan committed
234
	belle_sip_request_t*old_request=belle_sip_transaction_get_request(BELLE_SIP_TRANSACTION(refresher->transaction));
jehan's avatar
jehan committed
235
	belle_sip_response_t*old_response=belle_sip_transaction_get_response(BELLE_SIP_TRANSACTION(refresher->transaction));
jehan's avatar
jehan committed
236 237 238
	belle_sip_dialog_t* dialog = belle_sip_transaction_get_dialog(BELLE_SIP_TRANSACTION(refresher->transaction));
	belle_sip_client_transaction_t* client_transaction;
	belle_sip_request_t* request;
jehan's avatar
jehan committed
239
	belle_sip_header_expires_t* expires_header;
240
	belle_sip_uri_t* preset_route=refresher->transaction->preset_route;
jehan's avatar
jehan committed
241
	belle_sip_provider_t* prov=refresher->transaction->base.provider;
242 243
	belle_sip_header_contact_t* contact;
	/*first remove timer if any*/
jehan's avatar
jehan committed
244 245 246 247 248
	if (expires >=0) {
		refresher->expires=expires;
	} else {
		/*-1 keep last value*/
	}
jehan's avatar
jehan committed
249
	if (!dialog) {
jehan's avatar
jehan committed
250
		const belle_sip_transaction_state_t state=belle_sip_transaction_get_state(BELLE_SIP_TRANSACTION(refresher->transaction));
jehan's avatar
jehan committed
251
		/*create new request*/
jehan's avatar
jehan committed
252 253 254
		if (belle_sip_transaction_state_is_transient(state)) {
			/*operation pending, cannot update authorization headers*/
			belle_sip_header_cseq_t* cseq;
jehan's avatar
jehan committed
255
			belle_sip_message("Refresher [%p] already have transaction [%p] in state [%s]"	,refresher
jehan's avatar
jehan committed
256 257
																							,refresher->transaction
																							,belle_sip_transaction_state_to_string(state));
258
			request=belle_sip_request_clone_with_body(belle_sip_transaction_get_request(BELLE_SIP_TRANSACTION(refresher->transaction)));
jehan's avatar
jehan committed
259 260 261
			cseq=belle_sip_message_get_header_by_type(request,belle_sip_header_cseq_t);
			belle_sip_header_cseq_set_seq_number(cseq,belle_sip_header_cseq_get_seq_number(cseq)+1);
		} else {
262
			request=belle_sip_client_transaction_create_authenticated_request(refresher->transaction,auth_infos);
jehan's avatar
jehan committed
263
		}
jehan's avatar
jehan committed
264
	} else if (dialog && belle_sip_dialog_get_state(dialog)==BELLE_SIP_DIALOG_CONFIRMED) {
jehan's avatar
jehan committed
265
		request=belle_sip_dialog_create_request_from(dialog,old_request);
jehan's avatar
jehan committed
266 267
		if (strcmp(belle_sip_request_get_method(request),"SUBSCRIBE")==0) {
			/*put expire header*/
jehan's avatar
jehan committed
268 269 270 271
			if (!(expires_header = belle_sip_message_get_header_by_type(request,belle_sip_header_expires_t))) {
				expires_header = belle_sip_header_expires_new();
				belle_sip_message_add_header(BELLE_SIP_MESSAGE(request),BELLE_SIP_HEADER(expires_header));
			}
jehan's avatar
jehan committed
272
		}
273
		belle_sip_provider_add_authorization(prov,request,old_response,auth_infos);
jehan's avatar
jehan committed
274 275 276 277 278 279 280
	} else {
		belle_sip_error("Unexpected dialog state [%s] for dialog [%p], cannot refresh [%s]"
				,belle_sip_dialog_state_to_string(belle_sip_dialog_get_state(dialog))
				,dialog
				,belle_sip_request_get_method(old_request));
		return -1;
	}
281 282 283 284 285 286

	if (auth_mandatory && auth_infos && (*auth_infos!=NULL || belle_sip_list_size(*auth_infos)) >0) {
		belle_sip_message("Auth info not found for this refresh operation on [%p]",refresher);
		if (request) belle_sip_object_unref(request);
		return -1;
	}
jehan's avatar
jehan committed
287 288 289 290 291
	if (refresher->enable_nat_helper && refresher->nated_contact) {
		/*update contact with fixed contact*/
		belle_sip_message_remove_header(BELLE_SIP_MESSAGE(request),BELLE_SIP_CONTACT);
		belle_sip_message_add_header(BELLE_SIP_MESSAGE(request),BELLE_SIP_HEADER(refresher->nated_contact));
	}
292 293 294
	/*update expires in any cases*/
	expires_header = belle_sip_message_get_header_by_type(request,belle_sip_header_expires_t);
	if (expires_header)
295
		belle_sip_header_expires_set_expires(expires_header,refresher->expires);
296
	contact=belle_sip_message_get_header_by_type(request,belle_sip_header_contact_t);
jehan's avatar
jehan committed
297
	if (contact && belle_sip_header_contact_get_expires(contact)>=0)
298
		belle_sip_header_contact_set_expires(contact,refresher->expires);
299

300 301 302 303 304 305 306 307 308
	/*update the Date header if it exists*/
	{
		belle_sip_header_date_t *date=belle_sip_message_get_header_by_type(request,belle_sip_header_date_t);
		if (date){
			time_t curtime=time(NULL);
			belle_sip_header_date_set_time(date,&curtime);
		}
	}
	
jehan's avatar
jehan committed
309 310 311 312 313 314
	client_transaction = belle_sip_provider_create_client_transaction(prov,request);
	client_transaction->base.is_internal=1;
	belle_sip_transaction_set_application_data(BELLE_SIP_TRANSACTION(client_transaction),refresher);
	/*update reference transaction for next refresh*/
	belle_sip_object_unref(refresher->transaction);
	refresher->transaction=client_transaction;
jehan's avatar
jehan committed
315
	belle_sip_object_ref(refresher->transaction);
jehan's avatar
jehan committed
316

317
	if (belle_sip_client_transaction_send_request_to(client_transaction,preset_route)) {
jehan's avatar
jehan committed
318
		belle_sip_error("Cannot send refresh method [%s] for refresher [%p]"
319
				,belle_sip_request_get_method(request)
jehan's avatar
jehan committed
320
				,refresher);
Simon Morlat's avatar
Simon Morlat committed
321
		return -1;
jehan's avatar
jehan committed
322 323 324 325
	}
	return 0;
}

326

jehan's avatar
jehan committed
327 328
static int timer_cb(void *user_data, unsigned int events) {
	belle_sip_refresher_t* refresher = (belle_sip_refresher_t*)user_data;
329
	refresher->auth_failures=0;/*reset the auth_failures to get a chance to authenticate again*/
330
	belle_sip_refresher_refresh(refresher,refresher->expires);
331
	return BELLE_SIP_STOP;
jehan's avatar
jehan committed
332
}
333

jehan's avatar
jehan committed
334 335 336 337
static belle_sip_header_contact_t* get_matching_contact(const belle_sip_transaction_t* transaction) {
	belle_sip_request_t*request=belle_sip_transaction_get_request(transaction);
	belle_sip_response_t*response=transaction->last_response;
	const belle_sip_list_t* contact_header_list;
jehan's avatar
jehan committed
338 339 340 341
	belle_sip_header_contact_t* unfixed_local_contact;
	belle_sip_header_contact_t* fixed_local_contact;
	char* tmp_string;
	char* tmp_string2;
342 343
	if (!response)
		return NULL;
jehan's avatar
jehan committed
344
	/*we assume, there is only one contact in request*/
jehan's avatar
jehan committed
345 346
	unfixed_local_contact= belle_sip_message_get_header_by_type(BELLE_SIP_MESSAGE(request),belle_sip_header_contact_t);
	fixed_local_contact= BELLE_SIP_HEADER_CONTACT(belle_sip_object_clone(BELLE_SIP_OBJECT(unfixed_local_contact)));
jehan's avatar
jehan committed
347 348

	/*first fix contact using received/rport*/
jehan's avatar
jehan committed
349
	belle_sip_response_fix_contact(response,fixed_local_contact);
jehan's avatar
jehan committed
350
	contact_header_list = belle_sip_message_get_headers(BELLE_SIP_MESSAGE(response),BELLE_SIP_CONTACT);
jehan's avatar
jehan committed
351

jehan's avatar
jehan committed
352
	if (contact_header_list) {
Simon Morlat's avatar
Simon Morlat committed
353 354 355 356 357 358
		contact_header_list = belle_sip_list_find_custom((belle_sip_list_t*)contact_header_list
					,(belle_sip_compare_func)belle_sip_header_contact_not_equals
					, (const void*)fixed_local_contact);
		if (!contact_header_list) {
			/*reset header list*/
			contact_header_list = belle_sip_message_get_headers(BELLE_SIP_MESSAGE(response),BELLE_SIP_CONTACT);
jehan's avatar
jehan committed
359
			contact_header_list = belle_sip_list_find_custom((belle_sip_list_t*)contact_header_list
Simon Morlat's avatar
Simon Morlat committed
360 361 362 363 364 365 366 367 368 369
															,(belle_sip_compare_func)belle_sip_header_contact_not_equals
															,unfixed_local_contact);
		}
		if (!contact_header_list) {
			tmp_string=belle_sip_object_to_string(BELLE_SIP_OBJECT(fixed_local_contact));
			tmp_string2=belle_sip_object_to_string(BELLE_SIP_OBJECT(unfixed_local_contact));
			belle_sip_message("No matching contact neither for [%s] nor [%s]", tmp_string, tmp_string2);
			belle_sip_free(tmp_string);
			belle_sip_free(tmp_string2);
			return NULL;
jehan's avatar
jehan committed
370
		} else {
Simon Morlat's avatar
Simon Morlat committed
371 372 373
			return BELLE_SIP_HEADER_CONTACT(contact_header_list->data);
		}
	} else {
jehan's avatar
jehan committed
374 375 376 377 378 379 380 381
		return NULL;
	}

}
static int set_expires_from_trans(belle_sip_refresher_t* refresher) {
	belle_sip_transaction_t* transaction = BELLE_SIP_TRANSACTION(refresher->transaction);
	belle_sip_response_t*response=transaction->last_response;
	belle_sip_request_t*request=belle_sip_transaction_get_request(transaction);
jehan's avatar
jehan committed
382
	belle_sip_header_expires_t*  expires_header=belle_sip_message_get_header_by_type(request,belle_sip_header_expires_t);
jehan's avatar
jehan committed
383
	belle_sip_header_contact_t* contact_header;
384 385 386

	refresher->expires=-1;
	
jehan's avatar
jehan committed
387
	if (strcmp("REGISTER",belle_sip_request_get_method(request))==0
jehan's avatar
jehan committed
388
			|| expires_header /*if request has an expire header, refresher can always work*/) {
jehan's avatar
jehan committed
389 390 391 392 393

		/*An "expires" parameter on the "Contact" header has no semantics for
		*   SUBSCRIBE and is explicitly not equivalent to an "Expires" header in
		*  a SUBSCRIBE request or response.
		*/
jehan's avatar
jehan committed
394
		if (strcmp("REGISTER",belle_sip_request_get_method(request))==0
395 396
				&& (contact_header=get_matching_contact(transaction))!=NULL){
			refresher->expires=belle_sip_header_contact_get_expires(BELLE_SIP_HEADER_CONTACT(contact_header));
jehan's avatar
jehan committed
397
			/*great, we have an expire param from contact header*/
398 399
		}
		if (refresher->expires==-1){
jehan's avatar
jehan committed
400
			/*no contact with expire or not relevant, looking for Expires header*/
401
			if (response && (expires_header=(belle_sip_header_expires_t*)belle_sip_message_get_header(BELLE_SIP_MESSAGE(response),BELLE_SIP_EXPIRES))) {
jehan's avatar
jehan committed
402 403 404 405
				refresher->expires = belle_sip_header_expires_get_expires(expires_header);
			}
		}
		if (refresher->expires<0) {
406 407 408 409 410 411 412 413
			belle_sip_message("Neither Expires header nor corresponding Contact header found, checking from original request");
			if ((expires_header=(belle_sip_header_expires_t*)belle_sip_message_get_header(BELLE_SIP_MESSAGE(request),BELLE_SIP_EXPIRES))) {
				refresher->expires = belle_sip_header_expires_get_expires(expires_header);
			} else {
				belle_sip_message("Not possible to guess expire value, giving up");
				refresher->expires=0;
				return 1;
			}
jehan's avatar
jehan committed
414
		}
Simon Morlat's avatar
Simon Morlat committed
415 416
	} else if (strcmp("INVITE",belle_sip_request_get_method(request))==0) {
		belle_sip_error("Refresher does not support INVITE yet");
417
		return -1;
jehan's avatar
jehan committed
418 419
	} else {
		belle_sip_error("Refresher does not support [%s] yet",belle_sip_request_get_method(request));
420
		return -1;
jehan's avatar
jehan committed
421 422 423 424 425 426
	}
	return 0;
}


int belle_sip_refresher_start(belle_sip_refresher_t* refresher) {
jehan's avatar
jehan committed
427
	if(refresher->state==started) {
Simon Morlat's avatar
Simon Morlat committed
428
		belle_sip_warning("Refresher [%p] already started",refresher);
jehan's avatar
jehan committed
429 430
	} else {
		if (refresher->expires>0) {
Simon Morlat's avatar
Simon Morlat committed
431
			refresher->state=started;
jehan's avatar
jehan committed
432 433
			schedule_timer(refresher);
			belle_sip_message("Refresher [%p] started, next refresh in [%i] s",refresher,refresher->expires);
Simon Morlat's avatar
Simon Morlat committed
434 435
		}else{
			belle_sip_message("Refresher [%p] stopped, expires=%i",refresher,refresher->expires);
jehan's avatar
jehan committed
436
			refresher->state=stopped;
Simon Morlat's avatar
Simon Morlat committed
437
		}
jehan's avatar
jehan committed
438 439 440 441 442
	}
	return 0;
}

void belle_sip_refresher_stop(belle_sip_refresher_t* refresher) {
Simon Morlat's avatar
Simon Morlat committed
443
	belle_sip_message("Refresher [%p] stopped.",refresher);
444 445 446 447 448
	if (refresher->timer){
		belle_sip_main_loop_remove_source(belle_sip_stack_get_main_loop(refresher->transaction->base.provider->stack), refresher->timer);
		belle_sip_object_unref(refresher->timer);
		refresher->timer=NULL;
	}
jehan's avatar
jehan committed
449
	refresher->state=stopped;
jehan's avatar
jehan committed
450
}
Simon Morlat's avatar
Simon Morlat committed
451

jehan's avatar
jehan committed
452
belle_sip_refresher_t* belle_sip_refresher_new(belle_sip_client_transaction_t* transaction) {
453
	belle_sip_refresher_t* refresher;
454
	belle_sip_transaction_state_t state=belle_sip_transaction_get_state(BELLE_SIP_TRANSACTION(transaction));
jehan's avatar
jehan committed
455 456
	belle_sip_request_t* request = belle_sip_transaction_get_request(BELLE_SIP_TRANSACTION(transaction));
	if ( strcmp("REGISTER",belle_sip_request_get_method(request))!=0
jehan's avatar
jehan committed
457
			&& strcmp("PUBLISH",belle_sip_request_get_method(request))!=0
458
			&& state!=BELLE_SIP_TRANSACTION_TERMINATED
jehan's avatar
jehan committed
459 460
			&& state != BELLE_SIP_TRANSACTION_COMPLETED) {
		belle_sip_error("Invalid state [%s] for %s transaction [%p], should be BELLE_SIP_TRANSACTION_COMPLETED/BELLE_SIP_TRANSACTION_TERMINATED"
jehan's avatar
jehan committed
461
					,belle_sip_transaction_state_to_string(belle_sip_transaction_get_state(BELLE_SIP_TRANSACTION(transaction)))
jehan's avatar
jehan committed
462
					,belle_sip_request_get_method(request)
jehan's avatar
jehan committed
463 464 465
					,transaction);
		return NULL;
	}
466
	refresher = (belle_sip_refresher_t*)belle_sip_object_new(belle_sip_refresher_t);
jehan's avatar
jehan committed
467
	refresher->transaction=transaction;
jehan's avatar
jehan committed
468 469
	refresher->state=stopped;
	refresher->enable_nat_helper=1;
jehan's avatar
jehan committed
470
	belle_sip_object_ref(transaction);
jehan's avatar
jehan committed
471
	refresher->retry_after=DEFAULT_RETRY_AFTER;
jehan's avatar
jehan committed
472 473 474 475
	refresher->listener_callbacks.process_response_event=process_response_event;
	refresher->listener_callbacks.process_timeout=process_timeout;
	refresher->listener_callbacks.process_io_error=process_io_error;
	refresher->listener_callbacks.process_dialog_terminated=process_dialog_terminated;
Simon Morlat's avatar
Simon Morlat committed
476 477 478
	refresher->listener_callbacks.process_transaction_terminated=process_transaction_terminated;;
	refresher->sip_listener=belle_sip_listener_create_from_callbacks(&(refresher->listener_callbacks),refresher);
	belle_sip_provider_add_internal_sip_listener(transaction->base.provider,refresher->sip_listener);
jehan's avatar
jehan committed
479 480 481
	if (set_expires_from_trans(refresher)){
		belle_sip_error("Unable to extract refresh value from transaction [%p]",transaction);
	}
482 483 484
	if (belle_sip_transaction_state_is_transient(state)) {
		belle_sip_message(" refresher [%p] takes ownership of transaction [%p]",refresher,transaction);
		transaction->base.is_internal=1;
Simon Morlat's avatar
Simon Morlat committed
485
		refresher->state=started;
486
	}
jehan's avatar
jehan committed
487 488
	return refresher;
}
Simon Morlat's avatar
Simon Morlat committed
489

490 491 492
int belle_sip_refresher_get_expires(const belle_sip_refresher_t* refresher) {
	return refresher->expires;
}
jehan's avatar
jehan committed
493 494 495 496 497 498 499 500

int belle_sip_refresher_get_retry_after(const belle_sip_refresher_t* refresher){
	return refresher->retry_after;
}

void belle_sip_refresher_set_retry_after(belle_sip_refresher_t* refresher, int delay_ms) {
	refresher->retry_after=delay_ms;
}
jehan's avatar
jehan committed
501 502 503 504 505 506 507 508 509 510 511 512 513 514 515
const belle_sip_client_transaction_t* belle_sip_refresher_get_transaction(const belle_sip_refresher_t* refresher) {
	return refresher->transaction;
}
const belle_sip_list_t* belle_sip_refresher_get_auth_events(const belle_sip_refresher_t* refresher) {
	return refresher->auth_events;
}
const belle_sip_header_contact_t* belle_sip_refresher_get_nated_contact(const belle_sip_refresher_t* refresher) {
	return refresher->nated_contact;
}
void belle_sip_refresher_enable_nat_helper(belle_sip_refresher_t* refresher,int enable) {
	refresher->enable_nat_helper=enable;
}
int belle_sip_refresher_is_nat_helper_enabled(const belle_sip_refresher_t* refresher) {
	return refresher->enable_nat_helper;
}