]> sjero.net Git - linphone/blob - coreapi/callbacks.c
Merge branch 'master' of git.linphone.org:linphone
[linphone] / coreapi / callbacks.c
1 /*
2 linphone
3 Copyright (C) 2010  Simon MORLAT (simon.morlat@free.fr)
4
5 This program is free software; you can redistribute it and/or
6 modify it under the terms of the GNU General Public License
7 as published by the Free Software Foundation; either version 2
8 of the License, or (at your option) any later version.
9
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13 GNU General Public License for more details.
14
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software
17 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
18 */
19
20
21 #include "sal.h"
22
23 #include "linphonecore.h"
24 #include "private.h"
25 #include "mediastreamer2/mediastream.h"
26 #include "lpconfig.h"
27
28 static void register_failure(SalOp *op, SalError error, SalReason reason, const char *details);
29
30 static bool_t media_parameters_changed(LinphoneCall *call, SalMediaDescription *oldmd, SalMediaDescription *newmd){
31         if (call->params.in_conference!=call->current_params.in_conference) return TRUE;
32         return !sal_media_description_equals(oldmd,newmd)  || call->up_bw!=linphone_core_get_upload_bandwidth(call->core);
33 }
34
35 void linphone_core_update_streams(LinphoneCore *lc, LinphoneCall *call, SalMediaDescription *new_md){
36         SalMediaDescription *oldmd=call->resultdesc;
37         
38         if (lc->ringstream!=NULL){
39                 ring_stop(lc->ringstream);
40                 lc->ringstream=NULL;
41         }
42         if (new_md!=NULL){
43                 sal_media_description_ref(new_md);
44                 call->media_pending=FALSE;
45         }else{
46                 call->media_pending=TRUE;
47         }
48         call->resultdesc=new_md;
49         if (call->audiostream && call->audiostream->ticker){
50                 /* we already started media: check if we really need to restart it*/
51                 if (oldmd){
52                         if (!media_parameters_changed(call,oldmd,new_md) && !call->playing_ringbacktone){
53                                 /*as nothing has changed, keep the oldmd */
54                                 call->resultdesc=oldmd;
55                                 sal_media_description_unref(new_md);
56                                 if (call->all_muted){
57                                         ms_message("Early media finished, unmuting inputs...");
58                                         /*we were in early media, now we want to enable real media */
59                                         linphone_call_enable_camera (call,linphone_call_camera_enabled (call));
60                                         if (call->audiostream)
61                                                 linphone_core_mute_mic (lc, linphone_core_is_mic_muted(lc));
62 #ifdef VIDEO_ENABLED
63                                         if (call->videostream && call->camera_active)
64                                                 video_stream_change_camera(call->videostream,lc->video_conf.device );
65 #endif
66                                 }
67                                 ms_message("No need to restart streams, SDP is unchanged.");
68                                 return;
69                         }else{
70                                 ms_message("Media descriptions are different, need to restart the streams.");
71                         }
72                 }
73                 linphone_call_stop_media_streams (call);
74                 linphone_call_init_media_streams (call);
75         }
76         if (oldmd) 
77                 sal_media_description_unref(oldmd);
78         
79         if (new_md) {
80                 bool_t all_muted=FALSE;
81                 bool_t send_ringbacktone=FALSE;
82                 
83                 if (call->audiostream==NULL){
84                         /*this happens after pausing the call locally. The streams is destroyed and then we wait the 200Ok to recreate it*/
85                         linphone_call_init_media_streams (call);
86                 }
87                 if (call->state==LinphoneCallIncomingEarlyMedia && linphone_core_get_remote_ringback_tone (lc)!=NULL){
88                         send_ringbacktone=TRUE;
89                 }
90                 if (call->state==LinphoneCallIncomingEarlyMedia ||
91                     (call->state==LinphoneCallOutgoingEarlyMedia && !call->params.real_early_media)){
92                         all_muted=TRUE;
93                 }
94                 linphone_call_start_media_streams(call,all_muted,send_ringbacktone);
95         }
96 }
97 #if 0
98 static bool_t is_duplicate_call(LinphoneCore *lc, const LinphoneAddress *from, const LinphoneAddress *to){
99         MSList *elem;
100         for(elem=lc->calls;elem!=NULL;elem=elem->next){
101                 LinphoneCall *call=(LinphoneCall*)elem->data;
102                 if (linphone_address_weak_equal(call->log->from,from) &&
103                     linphone_address_weak_equal(call->log->to, to)){
104                         return TRUE;
105                 }
106         }
107         return FALSE;
108 }
109 #endif
110
111 static bool_t already_a_call_with_remote_address(const LinphoneCore *lc, const LinphoneAddress *remote) {
112         ms_warning(" searching for already_a_call_with_remote_address.");
113
114         MSList *elem;
115         for(elem=lc->calls;elem!=NULL;elem=elem->next){
116                 const LinphoneCall *call=(LinphoneCall*)elem->data;
117                 const LinphoneAddress *cRemote=linphone_call_get_remote_address(call);
118                 if (linphone_address_weak_equal(cRemote,remote)) {
119                         ms_warning("already_a_call_with_remote_address found.");
120                         return TRUE;
121                 }
122         }
123         return FALSE;
124 }
125
126 static bool_t already_a_call_pending(LinphoneCore *lc){
127         MSList *elem;
128         for(elem=lc->calls;elem!=NULL;elem=elem->next){
129                 LinphoneCall *call=(LinphoneCall*)elem->data;
130                 if (call->state==LinphoneCallIncomingReceived
131                     || call->state==LinphoneCallOutgoingInit
132                     || call->state==LinphoneCallOutgoingProgress
133                     || call->state==LinphoneCallOutgoingEarlyMedia
134                     || call->state==LinphoneCallOutgoingRinging){
135                         return TRUE;
136                 }
137         }
138         return FALSE;
139 }
140
141 static void call_received(SalOp *h){
142         LinphoneCore *lc=(LinphoneCore *)sal_get_user_pointer(sal_op_get_sal(h));
143         char *barmesg;
144         LinphoneCall *call;
145         const char *from,*to;
146         char *tmp;
147         LinphoneAddress *from_parsed;
148         LinphoneAddress *from_addr, *to_addr;
149         SalMediaDescription *md;
150         bool_t propose_early_media=lp_config_get_int(lc->config,"sip","incoming_calls_early_media",FALSE);
151         bool_t prevent_colliding_calls=lp_config_get_int(lc->config,"sip","prevent_colliding_calls",TRUE);
152         const char *ringback_tone=linphone_core_get_remote_ringback_tone (lc);
153         
154         /* first check if we can answer successfully to this invite */
155         if (lc->presence_mode==LinphoneStatusBusy ||
156             lc->presence_mode==LinphoneStatusOffline ||
157             lc->presence_mode==LinphoneStatusDoNotDisturb ||
158             lc->presence_mode==LinphoneStatusMoved){
159                 if (lc->presence_mode==LinphoneStatusBusy )
160                         sal_call_decline(h,SalReasonBusy,NULL);
161                 else if (lc->presence_mode==LinphoneStatusOffline)
162                         sal_call_decline(h,SalReasonTemporarilyUnavailable,NULL);
163                 else if (lc->presence_mode==LinphoneStatusDoNotDisturb)
164                         sal_call_decline(h,SalReasonTemporarilyUnavailable,NULL);
165                 else if (lc->alt_contact!=NULL && lc->presence_mode==LinphoneStatusMoved)
166                         sal_call_decline(h,SalReasonRedirect,lc->alt_contact);
167                 sal_op_release(h);
168                 return;
169         }
170         if (!linphone_core_can_we_add_call(lc)){/*busy*/
171                 sal_call_decline(h,SalReasonBusy,NULL);
172                 sal_op_release(h);
173                 return;
174         }
175         from=sal_op_get_from(h);
176         to=sal_op_get_to(h);
177         from_addr=linphone_address_new(from);
178         to_addr=linphone_address_new(to);
179
180         if ((already_a_call_with_remote_address(lc,from_addr) && prevent_colliding_calls) || already_a_call_pending(lc)){
181                 ms_warning("Receiving another call while one is ringing or initiated, refusing this one with busy message.");
182                 sal_call_decline(h,SalReasonBusy,NULL);
183                 sal_op_release(h);
184                 linphone_address_destroy(from_addr);
185                 linphone_address_destroy(to_addr);
186                 return;
187         }
188         
189         call=linphone_call_new_incoming(lc,from_addr,to_addr,h);
190         sal_call_set_local_media_description(h,call->localdesc);
191         md=sal_call_get_final_media_description(h);
192
193         if (md && sal_media_description_empty(md)){
194                 sal_call_decline(h,SalReasonMedia,NULL);
195                 linphone_call_unref(call);
196                 return;
197         }
198         
199         /* the call is acceptable so we can now add it to our list */
200         linphone_core_add_call(lc,call);
201         
202         from_parsed=linphone_address_new(sal_op_get_from(h));
203         linphone_address_clean(from_parsed);
204         tmp=linphone_address_as_string(from_parsed);
205         linphone_address_destroy(from_parsed);
206         barmesg=ortp_strdup_printf("%s %s%s",tmp,_("is contacting you"),
207             (sal_call_autoanswer_asked(h)) ?_(" and asked autoanswer."):_("."));
208         if (lc->vtable.show) lc->vtable.show(lc);
209         if (lc->vtable.display_status) 
210             lc->vtable.display_status(lc,barmesg);
211
212         /* play the ring if this is the only call*/
213         if (ms_list_size(lc->calls)==1){
214                 lc->current_call=call;
215                 if (lc->ringstream && lc->dmfs_playing_start_time!=0){
216                         ring_stop(lc->ringstream);
217                         lc->ringstream=NULL;
218                         lc->dmfs_playing_start_time=0;
219                 }
220                 if (lc->sound_conf.ring_sndcard!=NULL){
221                         if(lc->ringstream==NULL && lc->sound_conf.local_ring){
222                                 MSSndCard *ringcard=lc->sound_conf.lsd_card ?lc->sound_conf.lsd_card : lc->sound_conf.ring_sndcard;
223                                 ms_message("Starting local ring...");
224                                 lc->ringstream=ring_start(lc->sound_conf.local_ring,2000,ringcard);
225                         }
226                         else
227                         {
228                                 ms_message("the local ring is already started");
229                         }
230                 }
231         }else{
232                 /* else play a tone within the context of the current call */
233                 call->ringing_beep=TRUE;
234                 linphone_core_play_tone(lc);
235         }
236
237         
238         linphone_call_ref(call); /*prevent the call from being destroyed while we are notifying, if the user declines within the state callback */
239         linphone_call_set_state(call,LinphoneCallIncomingReceived,"Incoming call");
240         
241         if (call->state==LinphoneCallIncomingReceived){
242                 sal_call_notify_ringing(h,propose_early_media || ringback_tone!=NULL);
243
244                 if (propose_early_media || ringback_tone!=NULL){
245                         linphone_call_set_state(call,LinphoneCallIncomingEarlyMedia,"Incoming call early media");
246                         md=sal_call_get_final_media_description(h);
247                         linphone_core_update_streams(lc,call,md);
248                 }
249                 if (sal_call_get_replaces(call->op)!=NULL && lp_config_get_int(lc->config,"sip","auto_answer_replacing_calls",1)){
250                         linphone_core_accept_call(lc,call);
251                 }
252         }
253         linphone_call_unref(call);
254
255         ms_free(barmesg);
256         ms_free(tmp);
257 }
258
259 static void call_ringing(SalOp *h){
260         LinphoneCore *lc=(LinphoneCore *)sal_get_user_pointer(sal_op_get_sal(h));
261         LinphoneCall *call=(LinphoneCall*)sal_op_get_user_pointer(h);
262         SalMediaDescription *md;
263         
264         if (call==NULL) return;
265         
266         if (lc->vtable.display_status)
267                 lc->vtable.display_status(lc,_("Remote ringing."));
268         
269         md=sal_call_get_final_media_description(h);
270         if (md==NULL){
271                 if (lc->ringstream && lc->dmfs_playing_start_time!=0){
272                         ring_stop(lc->ringstream);
273                         lc->ringstream=NULL;
274                         lc->dmfs_playing_start_time=0;
275                 }
276                 if (lc->ringstream!=NULL) return;       /*already ringing !*/
277                 if (lc->sound_conf.play_sndcard!=NULL){
278                         MSSndCard *ringcard=lc->sound_conf.lsd_card ? lc->sound_conf.lsd_card : lc->sound_conf.play_sndcard;
279                         if (call->localdesc->streams[0].max_rate>0) ms_snd_card_set_preferred_sample_rate(ringcard, call->localdesc->streams[0].max_rate);
280                         /*we release sound before playing ringback tone*/
281                         if (call->audiostream)
282                                 audio_stream_unprepare_sound(call->audiostream);
283                         lc->ringstream=ring_start(lc->sound_conf.remote_ring,2000,ringcard);
284                 }
285                 ms_message("Remote ringing...");
286                 if (lc->vtable.display_status) 
287                         lc->vtable.display_status(lc,_("Remote ringing..."));
288                 linphone_call_set_state(call,LinphoneCallOutgoingRinging,"Remote ringing");
289         }else{
290                 /*accept early media */
291                 if (call->audiostream && audio_stream_started(call->audiostream)){
292                         /*streams already started */
293                         ms_message("Early media already started.");
294                         return;
295                 }
296                 if (lc->vtable.show) lc->vtable.show(lc);
297                 if (lc->vtable.display_status) 
298                         lc->vtable.display_status(lc,_("Early media."));
299                 linphone_call_set_state(call,LinphoneCallOutgoingEarlyMedia,"Early media");
300                 if (lc->ringstream!=NULL){
301                         ring_stop(lc->ringstream);
302                         lc->ringstream=NULL;
303                 }
304                 ms_message("Doing early media...");
305                 linphone_core_update_streams(lc,call,md);
306         }
307 }
308
309 /*
310  * could be reach :
311  *  - when the call is accepted
312  *  - when a request is accepted (pause, resume)
313  */
314 static void call_accepted(SalOp *op){
315         LinphoneCore *lc=(LinphoneCore *)sal_get_user_pointer(sal_op_get_sal(op));
316         LinphoneCall *call=(LinphoneCall*)sal_op_get_user_pointer(op);
317         SalMediaDescription *md;
318         
319         if (call==NULL){
320                 ms_warning("No call to accept.");
321                 return ;
322         }
323         
324         md=sal_call_get_final_media_description(op);
325         
326         if (call->state==LinphoneCallOutgoingProgress ||
327             call->state==LinphoneCallOutgoingRinging ||
328             call->state==LinphoneCallOutgoingEarlyMedia){
329                 linphone_call_set_state(call,LinphoneCallConnected,"Connected");
330                 if (call->referer) linphone_core_notify_refer_state(lc,call->referer,call);
331         }
332         if (md && !sal_media_description_empty(md)){
333                 if (sal_media_description_has_dir(md,SalStreamSendOnly) ||
334                     sal_media_description_has_dir(md,SalStreamInactive)){
335                         if (lc->vtable.display_status){
336                                 char *tmp=linphone_call_get_remote_address_as_string (call);
337                                 char *msg=ms_strdup_printf(_("Call with %s is paused."),tmp);
338                                 lc->vtable.display_status(lc,msg);
339                                 ms_free(tmp);
340                                 ms_free(msg);
341                         }
342                         linphone_core_update_streams (lc,call,md);
343                         linphone_call_set_state(call,LinphoneCallPaused,"Call paused");
344                         if (call->refer_pending)
345                                 linphone_core_start_refered_call(lc,call);
346                 }else if (sal_media_description_has_dir(md,SalStreamRecvOnly)){
347                         /*we are put on hold when the call is initially accepted */
348                         if (lc->vtable.display_status){
349                                 char *tmp=linphone_call_get_remote_address_as_string (call);
350                                 char *msg=ms_strdup_printf(_("Call answered by %s - on hold."),tmp);
351                                 lc->vtable.display_status(lc,msg);
352                                 ms_free(tmp);
353                                 ms_free(msg);
354                         }
355                         linphone_core_update_streams (lc,call,md);
356                         linphone_call_set_state(call,LinphoneCallPausedByRemote,"Call paused by remote");
357                 }else{
358                         if (call->state==LinphoneCallStreamsRunning){
359                                 /*media was running before, the remote as acceted a call modification (that is
360                                         a reinvite made by us. We must notify the application this reinvite was accepted*/
361                                 linphone_call_set_state(call, LinphoneCallUpdated, "Call updated");
362                         }else{
363                                 if (call->state==LinphoneCallResuming){
364                                         if (lc->vtable.display_status){
365                                                 lc->vtable.display_status(lc,_("Call resumed."));
366                                         }
367                                 }else{
368                                         if (lc->vtable.display_status){
369                                                 char *tmp=linphone_call_get_remote_address_as_string (call);
370                                                 char *msg=ms_strdup_printf(_("Call answered by %s."),tmp);
371                                                 lc->vtable.display_status(lc,msg);
372                                                 ms_free(tmp);
373                                                 ms_free(msg);
374                                         }
375                                 }
376                         }
377                         linphone_core_update_streams (lc,call,md);
378                         if (!call->current_params.in_conference)
379                                 lc->current_call=call;
380                         linphone_call_set_state(call, LinphoneCallStreamsRunning, "Streams running");
381                 }
382         }else{
383                 /*send a bye*/
384                 ms_error("Incompatible SDP offer received in 200Ok, need to abort the call");
385                 linphone_core_abort_call(lc,call,_("Incompatible, check codecs..."));
386         }
387 }
388
389 static void call_ack(SalOp *op){
390         LinphoneCore *lc=(LinphoneCore *)sal_get_user_pointer(sal_op_get_sal(op));
391         LinphoneCall *call=(LinphoneCall*)sal_op_get_user_pointer(op);
392         if (call==NULL){
393                 ms_warning("No call to be ACK'd");
394                 return ;
395         }
396         if (call->media_pending){
397                 SalMediaDescription *md=sal_call_get_final_media_description(op);
398                 if (md && !sal_media_description_empty(md)){
399                         if (call->state==LinphoneCallStreamsRunning){
400                                 /*media was running before, the remote as acceted a call modification (that is
401                                         a reinvite made by us. We must notify the application this reinvite was accepted*/
402                                 linphone_call_set_state(call, LinphoneCallUpdated, "Call updated");
403                         }
404                         linphone_core_update_streams (lc,call,md);
405                         linphone_call_set_state (call,LinphoneCallStreamsRunning,"Connected (streams running)");
406                 }else{
407                         /*send a bye*/
408                         ms_error("Incompatible SDP response received in ACK, need to abort the call");
409                         linphone_core_abort_call(lc,call,"No codec intersection");
410                         return;
411                 }
412         }
413 }
414
415 static void call_accept_update(LinphoneCore *lc, LinphoneCall *call){
416         SalMediaDescription *md;
417         sal_call_accept(call->op);
418         md=sal_call_get_final_media_description(call->op);
419         if (md && !sal_media_description_empty(md))
420                 linphone_core_update_streams(lc,call,md);
421 }
422
423 static void call_resumed(LinphoneCore *lc, LinphoneCall *call){
424         call_accept_update(lc,call);
425         if(lc->vtable.display_status)
426                 lc->vtable.display_status(lc,_("We have been resumed."));
427         linphone_call_set_state(call,LinphoneCallStreamsRunning,"Connected (streams running)");
428         linphone_call_set_transfer_state(call, LinphoneCallIdle);
429 }
430
431 static void call_paused_by_remote(LinphoneCore *lc, LinphoneCall *call){
432         call_accept_update(lc,call);
433         /* we are being paused */
434         if(lc->vtable.display_status)
435                 lc->vtable.display_status(lc,_("We are paused by other party."));
436         linphone_call_set_state (call,LinphoneCallPausedByRemote,"Call paused by remote");
437 }
438
439 static void call_updated_by_remote(LinphoneCore *lc, LinphoneCall *call){
440         if(lc->vtable.display_status)
441                 lc->vtable.display_status(lc,_("Call is updated by remote."));
442         call->defer_update=FALSE;
443         linphone_call_set_state(call, LinphoneCallUpdatedByRemote,"Call updated by remote");
444         if (call->defer_update==FALSE){
445                 linphone_core_accept_call_update(lc,call,NULL);
446         }
447 }
448
449 /* this callback is called when an incoming re-INVITE modifies the session*/
450 static void call_updating(SalOp *op){
451         LinphoneCore *lc=(LinphoneCore *)sal_get_user_pointer(sal_op_get_sal(op));
452         LinphoneCall *call=(LinphoneCall*)sal_op_get_user_pointer(op);
453         SalMediaDescription *rmd=sal_call_get_remote_media_description(op);
454
455         if (rmd==NULL){
456                 /* case of a reINVITE without SDP */
457                 call_accept_update(lc,call);
458                 call->media_pending=TRUE;
459                 return;
460         }
461
462         switch(call->state){
463                 case LinphoneCallPausedByRemote:
464                         if (sal_media_description_has_dir(rmd,SalStreamSendRecv) || sal_media_description_has_dir(rmd,SalStreamRecvOnly)){
465                                 call_resumed(lc,call);
466                         }
467                 break;
468                 case LinphoneCallStreamsRunning:
469                 case LinphoneCallConnected:
470                         if (sal_media_description_has_dir(rmd,SalStreamSendOnly) || sal_media_description_has_dir(rmd,SalStreamInactive)){
471                                 call_paused_by_remote(lc,call);
472                         }else{
473                                 call_updated_by_remote(lc,call);
474                         }
475                 break;
476                 default:
477                         call_accept_update(lc,call);
478         }
479 }
480
481 static void call_terminated(SalOp *op, const char *from){
482         LinphoneCore *lc=(LinphoneCore *)sal_get_user_pointer(sal_op_get_sal(op));
483         LinphoneCall *call=(LinphoneCall*)sal_op_get_user_pointer(op);
484
485         if (call==NULL) return;
486         
487         if (linphone_call_get_state(call)==LinphoneCallEnd || linphone_call_get_state(call)==LinphoneCallError){
488                 ms_warning("call_terminated: ignoring.");
489                 return;
490         }
491         ms_message("Current call terminated...");
492         //we stop the call only if we have this current call or if we are in call
493         if (lc->ringstream!=NULL && ( (ms_list_size(lc->calls)  == 1) || linphone_core_in_call(lc) )) {
494                 ring_stop(lc->ringstream);
495                 lc->ringstream=NULL;
496         }
497         linphone_call_stop_media_streams(call);
498         if (lc->vtable.show!=NULL)
499                 lc->vtable.show(lc);
500         if (lc->vtable.display_status!=NULL)
501                 lc->vtable.display_status(lc,_("Call terminated."));
502
503         linphone_call_set_state(call, LinphoneCallEnd,"Call ended");
504 }
505
506 static void call_failure(SalOp *op, SalError error, SalReason sr, const char *details, int code){
507         LinphoneCore *lc=(LinphoneCore *)sal_get_user_pointer(sal_op_get_sal(op));
508         char *msg486=_("User is busy.");
509         char *msg480=_("User is temporarily unavailable.");
510         /*char *retrymsg=_("%s. Retry after %i minute(s).");*/
511         char *msg600=_("User does not want to be disturbed.");
512         char *msg603=_("Call declined.");
513         const char *msg=details;
514         LinphoneCall *call=(LinphoneCall*)sal_op_get_user_pointer(op);
515
516         if (call==NULL){
517                 ms_warning("Call faillure reported on already cleaned call ?");
518                 return ;
519         }
520         
521         if (lc->vtable.show) lc->vtable.show(lc);
522
523         if (error==SalErrorNoResponse){
524                 msg=_("No response.");
525                 if (lc->vtable.display_status)
526                         lc->vtable.display_status(lc,msg);
527         }else if (error==SalErrorProtocol){
528                 msg=details ? details : _("Protocol error.");
529                 if (lc->vtable.display_status)
530                         lc->vtable.display_status(lc, msg);
531         }else if (error==SalErrorFailure){
532                 switch(sr){
533                         case SalReasonDeclined:
534                                 msg=msg603;
535                                 if (lc->vtable.display_status)
536                                         lc->vtable.display_status(lc,msg603);
537                         break;
538                         case SalReasonBusy:
539                                 msg=msg486;
540                                 if (lc->vtable.display_status)
541                                         lc->vtable.display_status(lc,msg486);
542                         break;
543                         case SalReasonRedirect:
544                                 msg=_("Redirected");
545                                 if (lc->vtable.display_status)
546                                         lc->vtable.display_status(lc,msg);
547                         break;
548                         case SalReasonTemporarilyUnavailable:
549                                 msg=msg480;
550                                 if (lc->vtable.display_status)
551                                         lc->vtable.display_status(lc,msg480);
552                         break;
553                         case SalReasonNotFound:
554                                 if (lc->vtable.display_status)
555                                         lc->vtable.display_status(lc,msg);
556                         break;
557                         case SalReasonDoNotDisturb:
558                                 msg=msg600;
559                                 if (lc->vtable.display_status)
560                                         lc->vtable.display_status(lc,msg600);
561                         break;
562                         case SalReasonMedia:
563                         //media_encryption_mandatory
564                                 if (call->params.media_encryption == LinphoneMediaEncryptionSRTP && 
565                                         !linphone_core_is_media_encryption_mandatory(lc)) {
566                                         int i;
567                                         ms_message("Outgoing call failed with SRTP (SAVP) enabled - retrying with AVP");
568                                         linphone_call_stop_media_streams(call);
569                                         if (call->state==LinphoneCallOutgoingInit || call->state==LinphoneCallOutgoingProgress){
570                                                 /* clear SRTP local params */
571                                                 call->params.media_encryption = LinphoneMediaEncryptionNone;
572                                                 for(i=0; i<call->localdesc->nstreams; i++) {
573                                                         call->localdesc->streams[i].proto = SalProtoRtpAvp;
574                                                         memset(call->localdesc->streams[i].crypto, 0, sizeof(call->localdesc->streams[i].crypto));
575                                                 }
576                                                 linphone_core_start_invite(lc, call, NULL);
577                                         }
578                                         return;
579                                 }
580                                 msg=_("Incompatible media parameters.");
581                                 if (lc->vtable.display_status)
582                                         lc->vtable.display_status(lc,msg);
583                         break;
584                         default:
585                                 if (lc->vtable.display_status)
586                                         lc->vtable.display_status(lc,_("Call failed."));
587                 }
588         }
589
590         if (lc->ringstream!=NULL) {
591                 ring_stop(lc->ringstream);
592                 lc->ringstream=NULL;
593         }
594         linphone_call_stop_media_streams (call);
595         if (call->referer && linphone_call_get_state(call->referer)==LinphoneCallPaused && call->referer->was_automatically_paused){
596                 /*resume to the call that send us the refer automatically*/
597                 linphone_core_resume_call(lc,call->referer);
598         }
599         if (sr == SalReasonDeclined) {
600                 call->reason=LinphoneReasonDeclined;
601                 linphone_call_set_state(call,LinphoneCallEnd,"Call declined.");
602         } else if (sr == SalReasonNotFound) {
603                 call->reason=LinphoneReasonNotFound;
604                 linphone_call_set_state(call,LinphoneCallError,"User not found.");
605         } else {
606                 linphone_call_set_state(call,LinphoneCallError,msg);
607         }
608 }
609
610 static void call_released(SalOp *op){
611         LinphoneCall *call=(LinphoneCall*)sal_op_get_user_pointer(op);
612         if (call!=NULL){
613                 linphone_call_set_state(call,LinphoneCallReleased,"Call released");
614         }else ms_error("call_released() for already destroyed call ?");
615 }
616
617 static void auth_requested(SalOp *h, const char *realm, const char *username){
618         LinphoneCore *lc=(LinphoneCore *)sal_get_user_pointer(sal_op_get_sal(h));
619         LinphoneAuthInfo *ai=(LinphoneAuthInfo*)linphone_core_find_auth_info(lc,realm,username);
620         LinphoneCall *call=is_a_linphone_call(sal_op_get_user_pointer(h));
621
622         if (call && call->ping_op==h){
623                 /*don't request authentication for ping requests. Their purpose is just to get any
624                  * answer to get the Via's received and rport parameters.
625                  */
626                 ms_message("auth_requested(): ignored for ping request.");
627                 return;
628         }
629         
630         ms_message("auth_requested() for realm=%s, username=%s",realm,username);
631
632         if (ai && ai->works==FALSE && ai->usecount>=3){
633                 /*case we tried 3 times to authenticate, without success */
634                 /*Better is to stop (implemeted below in else statement), and retry later*/
635                 if (ms_time(NULL)-ai->last_use_time>30){
636                         ai->usecount=0; /*so that we can allow to retry */
637                 }
638         }
639         
640         if (ai && (ai->works || ai->usecount<3)){
641                 SalAuthInfo sai;
642                 sai.username=ai->username;
643                 sai.userid=ai->userid;
644                 sai.realm=ai->realm;
645                 sai.password=ai->passwd;
646                 ms_message("auth_requested(): authenticating realm=%s, username=%s",realm,username);
647                 sal_op_authenticate(h,&sai);
648                 ai->usecount++;
649                 ai->last_use_time=ms_time(NULL);
650         }else{
651                 if (ai && ai->works==FALSE) {
652                         sal_op_cancel_authentication(h);
653                 } 
654                 if (lc->vtable.auth_info_requested)
655                         lc->vtable.auth_info_requested(lc,realm,username);
656         }
657 }
658
659 static void auth_success(SalOp *h, const char *realm, const char *username){
660         LinphoneCore *lc=(LinphoneCore *)sal_get_user_pointer(sal_op_get_sal(h));
661         LinphoneAuthInfo *ai=(LinphoneAuthInfo*)linphone_core_find_auth_info(lc,realm,username);
662         if (ai){
663                 ms_message("%s/%s authentication works.",realm,username);
664                 ai->works=TRUE;
665         }
666 }
667
668 static void register_success(SalOp *op, bool_t registered){
669         LinphoneCore *lc=(LinphoneCore *)sal_get_user_pointer(sal_op_get_sal(op));
670         LinphoneProxyConfig *cfg=(LinphoneProxyConfig*)sal_op_get_user_pointer(op);
671         char *msg;
672         
673         if (cfg->deletion_date!=0){
674                 ms_message("Registration success for removed proxy config, ignored");
675                 return;
676         }
677         linphone_proxy_config_set_error(cfg,LinphoneReasonNone);
678         linphone_proxy_config_set_state(cfg, registered ? LinphoneRegistrationOk : LinphoneRegistrationCleared ,
679                                         registered ? "Registration sucessful" : "Unregistration done");
680         if (lc->vtable.display_status){
681                 if (registered) msg=ms_strdup_printf(_("Registration on %s successful."),sal_op_get_proxy(op));
682                 else msg=ms_strdup_printf(_("Unregistration on %s done."),sal_op_get_proxy(op));
683                 lc->vtable.display_status(lc,msg);
684                 ms_free(msg);
685         }
686         
687 }
688
689 static void register_failure(SalOp *op, SalError error, SalReason reason, const char *details){
690         LinphoneCore *lc=(LinphoneCore *)sal_get_user_pointer(sal_op_get_sal(op));
691         LinphoneProxyConfig *cfg=(LinphoneProxyConfig*)sal_op_get_user_pointer(op);
692
693         if (cfg==NULL){
694                 ms_warning("Registration failed for unknown proxy config.");
695                 return ;
696         }
697         if (cfg->deletion_date!=0){
698                 ms_message("Registration failed for removed proxy config, ignored");
699                 return;
700         }
701         if (details==NULL)
702                 details=_("no response timeout");
703         
704         if (lc->vtable.display_status) {
705                 char *msg=ortp_strdup_printf(_("Registration on %s failed: %s"),sal_op_get_proxy(op),details  );
706                 lc->vtable.display_status(lc,msg);
707                 ms_free(msg);
708         }
709         if (error== SalErrorFailure && reason == SalReasonForbidden) {
710                 linphone_proxy_config_set_error(cfg, LinphoneReasonBadCredentials);
711         } else if (error == SalErrorNoResponse) {
712                 linphone_proxy_config_set_error(cfg, LinphoneReasonNoResponse);
713         }
714         linphone_proxy_config_set_state(cfg,LinphoneRegistrationFailed,details);
715         if (error== SalErrorFailure && reason == SalReasonForbidden) {
716                 const char *realm=NULL,*username=NULL;
717                 if (sal_op_get_auth_requested(op,&realm,&username)==0){
718                         if (lc->vtable.auth_info_requested)
719                                 lc->vtable.auth_info_requested(lc,realm,username);
720                 }
721         }
722 }
723
724 static void vfu_request(SalOp *op){
725 #ifdef VIDEO_ENABLED
726         LinphoneCall *call=(LinphoneCall*)sal_op_get_user_pointer (op);
727         if (call==NULL){
728                 ms_warning("VFU request but no call !");
729                 return ;
730         }
731         if (call->videostream)
732                 video_stream_send_vfu(call->videostream);
733 #endif
734 }
735
736 static void dtmf_received(SalOp *op, char dtmf){
737         LinphoneCore *lc=(LinphoneCore *)sal_get_user_pointer(sal_op_get_sal(op));
738         LinphoneCall *call=(LinphoneCall*)sal_op_get_user_pointer(op);
739         if (lc->vtable.dtmf_received != NULL)
740                 lc->vtable.dtmf_received(lc, call, dtmf);
741 }
742
743 static void refer_received(Sal *sal, SalOp *op, const char *referto){
744         LinphoneCore *lc=(LinphoneCore *)sal_get_user_pointer(sal);
745         LinphoneCall *call=(LinphoneCall*)sal_op_get_user_pointer(op);
746         if (call){
747                 if (call->refer_to!=NULL){
748                         ms_free(call->refer_to);
749                 }
750                 call->refer_to=ms_strdup(referto);
751                 call->refer_pending=TRUE;
752                 linphone_call_set_state(call,LinphoneCallRefered,"Refered");
753                 if (lc->vtable.display_status){
754                         char *msg=ms_strdup_printf(_("We are transferred to %s"),referto);
755                         lc->vtable.display_status(lc,msg);
756                         ms_free(msg);
757                 }
758                 if (call->state!=LinphoneCallPaused){
759                         ms_message("Automatically pausing current call to accept transfer.");
760                         linphone_core_pause_call(lc,call);
761                         call->was_automatically_paused=TRUE;
762                         /*then we will start the refered when the pause is accepted, in order to serialize transactions within the dialog.
763                          * Indeed we need to avoid to send a NOTIFY to inform about of state of the refered call while the pause isn't completed.
764                         **/
765                 }else linphone_core_start_refered_call(lc,call);
766         }else if (lc->vtable.refer_received){
767                 lc->vtable.refer_received(lc,referto);
768         }
769 }
770
771 static void text_received(Sal *sal, const char *from, const char *msg){
772         LinphoneCore *lc=(LinphoneCore *)sal_get_user_pointer(sal);
773         linphone_core_text_received(lc,from,msg);
774 }
775
776 static void notify(SalOp *op, const char *from, const char *msg){
777         LinphoneCore *lc=(LinphoneCore *)sal_get_user_pointer(sal_op_get_sal(op));
778         LinphoneCall *call=(LinphoneCall*)sal_op_get_user_pointer (op);
779         ms_message("get a %s notify from %s",msg,from);
780         if(lc->vtable.notify_recv)
781                 lc->vtable.notify_recv(lc,call,from,msg);
782 }
783
784 static void notify_presence(SalOp *op, SalSubscribeStatus ss, SalPresenceStatus status, const char *msg){
785         LinphoneCore *lc=(LinphoneCore *)sal_get_user_pointer(sal_op_get_sal(op));
786         linphone_notify_recv(lc,op,ss,status);
787 }
788
789 static void subscribe_received(SalOp *op, const char *from){
790         LinphoneCore *lc=(LinphoneCore *)sal_get_user_pointer(sal_op_get_sal(op));
791         linphone_subscription_new(lc,op,from);
792 }
793
794 static void subscribe_closed(SalOp *op, const char *from){
795         LinphoneCore *lc=(LinphoneCore *)sal_get_user_pointer(sal_op_get_sal(op));
796         linphone_subscription_closed(lc,op);
797 }
798
799 static void ping_reply(SalOp *op){
800         LinphoneCall *call=(LinphoneCall*) sal_op_get_user_pointer(op);
801         ms_message("ping reply !");
802         if (call){
803                 if (call->state==LinphoneCallOutgoingInit){
804                         linphone_core_start_invite(call->core,call,NULL);
805                 }
806         }
807         else
808         {
809                 ms_warning("ping reply without call attached...");
810         }
811 }
812
813 static void notify_refer(SalOp *op, SalReferStatus status){
814         LinphoneCore *lc=(LinphoneCore *)sal_get_user_pointer(sal_op_get_sal(op));
815         LinphoneCall *call=(LinphoneCall*) sal_op_get_user_pointer(op);
816         LinphoneCallState cstate;
817         if (call==NULL) {
818                 ms_warning("Receiving notify_refer for unknown call.");
819                 return ;
820         }
821         switch(status){
822                 case SalReferTrying:
823                         cstate=LinphoneCallOutgoingProgress;
824                 break;
825                 case SalReferSuccess:
826                         cstate=LinphoneCallConnected;
827                 break;
828                 case SalReferFailed:
829                         cstate=LinphoneCallError;
830                 break;
831                 default:
832                         cstate=LinphoneCallError;
833         }
834         linphone_call_set_transfer_state(call, cstate);
835         if (cstate==LinphoneCallConnected){
836                 /*automatically terminate the call as the transfer is complete.*/
837                 linphone_core_terminate_call(lc,call);
838         }
839 }
840
841 SalCallbacks linphone_sal_callbacks={
842         call_received,
843         call_ringing,
844         call_accepted,
845         call_ack,
846         call_updating,
847         call_terminated,
848         call_failure,
849         call_released,
850         auth_requested,
851         auth_success,
852         register_success,
853         register_failure,
854         vfu_request,
855         dtmf_received,
856         refer_received,
857         text_received,
858         notify,
859         notify_presence,
860         notify_refer,
861         subscribe_received,
862         subscribe_closed,
863         ping_reply
864 };
865
866