]> sjero.net Git - linphone/blob - coreapi/linphonecall.c
Merge branch 'master' into dev_ice
[linphone] / coreapi / linphonecall.c
1
2 /*
3 linphone
4 Copyright (C) 2010  Belledonne Communications SARL
5  (simon.morlat@linphone.org)
6
7 This program is free software; you can redistribute it and/or
8 modify it under the terms of the GNU General Public License
9 as published by the Free Software Foundation; either version 2
10 of the License, or (at your option) any later version.
11
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15 GNU General Public License for more details.
16
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
20 */
21 #ifdef WIN32
22 #include <time.h>
23 #endif
24 #include "linphonecore.h"
25 #include "sipsetup.h"
26 #include "lpconfig.h"
27 #include "private.h"
28 #include <ortp/event.h>
29 #include <ortp/b64.h>
30
31
32 #include "mediastreamer2/mediastream.h"
33 #include "mediastreamer2/msvolume.h"
34 #include "mediastreamer2/msequalizer.h"
35 #include "mediastreamer2/msfileplayer.h"
36 #include "mediastreamer2/msjpegwriter.h"
37 #include "mediastreamer2/mseventqueue.h"
38 #include "mediastreamer2/mssndcard.h"
39
40 #ifdef VIDEO_ENABLED
41 static MSWebCam *get_nowebcam_device(){
42         return ms_web_cam_manager_get_cam(ms_web_cam_manager_get(),"StaticImage: Static picture");
43 }
44 #endif
45
46 static bool_t generate_b64_crypto_key(int key_length, char* key_out) {
47         int b64_size;
48         uint8_t* tmp = (uint8_t*) malloc(key_length);                   
49         if (ortp_crypto_get_random(tmp, key_length)!=0) {
50                 ms_error("Failed to generate random key");
51                 free(tmp);
52                 return FALSE;
53         }
54         
55         b64_size = b64_encode((const char*)tmp, key_length, NULL, 0);
56         if (b64_size == 0) {
57                 ms_error("Failed to b64 encode key");
58                 free(tmp);
59                 return FALSE;
60         }
61         key_out[b64_size] = '\0';
62         b64_encode((const char*)tmp, key_length, key_out, 40);
63         free(tmp);
64         return TRUE;
65 }
66
67 LinphoneCore *linphone_call_get_core(const LinphoneCall *call){
68         return call->core;
69 }
70
71 const char* linphone_call_get_authentication_token(LinphoneCall *call){
72         return call->auth_token;
73 }
74
75 bool_t linphone_call_get_authentication_token_verified(LinphoneCall *call){
76         return call->auth_token_verified;
77 }
78
79 static bool_t linphone_call_are_all_streams_encrypted(LinphoneCall *call) {
80         // Check ZRTP encryption in audiostream
81         if (!call->audiostream_encrypted) {
82                 return FALSE;
83         }
84
85 #ifdef VIDEO_ENABLED
86         // If video enabled, check ZRTP encryption in videostream
87         const LinphoneCallParams *params=linphone_call_get_current_params(call);
88         if (params->has_video && !call->videostream_encrypted) {
89                 return FALSE;
90         }
91 #endif
92
93         return TRUE;
94 }
95
96 void propagate_encryption_changed(LinphoneCall *call){
97         LinphoneCore *lc=call->core;
98         if (!linphone_call_are_all_streams_encrypted(call)) {
99                 ms_message("Some streams are not encrypted");
100                 call->current_params.media_encryption=LinphoneMediaEncryptionNone;
101                 if (lc->vtable.call_encryption_changed)
102                         lc->vtable.call_encryption_changed(call->core, call, FALSE, call->auth_token);
103         } else {
104                 ms_message("All streams are encrypted");
105                 call->current_params.media_encryption=LinphoneMediaEncryptionZRTP;
106                 if (lc->vtable.call_encryption_changed)
107                         lc->vtable.call_encryption_changed(call->core, call, TRUE, call->auth_token);
108         }
109 }
110
111 #ifdef VIDEO_ENABLED
112 static void linphone_call_videostream_encryption_changed(void *data, bool_t encrypted){
113         ms_message("Video stream is %s", encrypted ? "encrypted" : "not encrypted");
114
115         LinphoneCall *call = (LinphoneCall *)data;
116         call->videostream_encrypted=encrypted;
117         propagate_encryption_changed(call);
118 }
119 #endif
120
121 static void linphone_call_audiostream_encryption_changed(void *data, bool_t encrypted) {
122         char status[255]={0};
123         ms_message("Audio stream is %s ", encrypted ? "encrypted" : "not encrypted");
124
125         LinphoneCall *call = (LinphoneCall *)data;
126         call->audiostream_encrypted=encrypted;
127         
128         if (encrypted && call->core->vtable.display_status != NULL) {
129                 snprintf(status,sizeof(status)-1,_("Authentication token is %s"),call->auth_token);
130                  call->core->vtable.display_status(call->core, status);
131         }
132
133         propagate_encryption_changed(call);
134
135
136 #ifdef VIDEO_ENABLED
137         // Enable video encryption
138         const LinphoneCallParams *params=linphone_call_get_current_params(call);
139         if (params->has_video) {
140                 ms_message("Trying to enable encryption on video stream");
141                 OrtpZrtpParams params;
142                 params.zid_file=NULL; //unused
143                 video_stream_enable_zrtp(call->videostream,call->audiostream,&params);
144         }
145 #endif
146 }
147
148
149 static void linphone_call_audiostream_auth_token_ready(void *data, const char* auth_token, bool_t verified) {
150         LinphoneCall *call=(LinphoneCall *)data;
151         if (call->auth_token != NULL)
152                 ms_free(call->auth_token);
153
154         call->auth_token=ms_strdup(auth_token);
155         call->auth_token_verified=verified;
156
157         ms_message("Authentication token is %s (%s)", auth_token, verified?"verified":"unverified");
158 }
159
160 void linphone_call_set_authentication_token_verified(LinphoneCall *call, bool_t verified){
161         if (call->audiostream==NULL){
162                 ms_error("linphone_call_set_authentication_token_verified(): No audio stream");
163         }
164         if (call->audiostream->ortpZrtpContext==NULL){
165                 ms_error("linphone_call_set_authentication_token_verified(): No zrtp context.");
166         }
167         if (!call->auth_token_verified && verified){
168                 ortp_zrtp_sas_verified(call->audiostream->ortpZrtpContext);
169         }else if (call->auth_token_verified && !verified){
170                 ortp_zrtp_sas_reset_verified(call->audiostream->ortpZrtpContext);
171         }
172         call->auth_token_verified=verified;
173         propagate_encryption_changed(call);
174 }
175
176 static MSList *make_codec_list(LinphoneCore *lc, const MSList *codecs, int bandwidth_limit,int* max_sample_rate){
177         MSList *l=NULL;
178         const MSList *it;
179         if (max_sample_rate) *max_sample_rate=0;
180         for(it=codecs;it!=NULL;it=it->next){
181                 PayloadType *pt=(PayloadType*)it->data;
182                 if (pt->flags & PAYLOAD_TYPE_ENABLED){
183                         if (bandwidth_limit>0 && !linphone_core_is_payload_type_usable_for_bandwidth(lc,pt,bandwidth_limit)){
184                                 ms_message("Codec %s/%i eliminated because of audio bandwidth constraint.",pt->mime_type,pt->clock_rate);
185                                 continue;
186                         }
187                         if (linphone_core_check_payload_type_usability(lc,pt)){
188                                 l=ms_list_append(l,payload_type_clone(pt));
189                                 if (max_sample_rate && payload_type_get_rate(pt)>*max_sample_rate) *max_sample_rate=payload_type_get_rate(pt);
190                         }
191                 }
192         }
193         return l;
194 }
195
196 static SalMediaDescription *_create_local_media_description(LinphoneCore *lc, LinphoneCall *call, unsigned int session_id, unsigned int session_ver){
197         MSList *l;
198         PayloadType *pt;
199         int i;
200         const char *me=linphone_core_get_identity(lc);
201         LinphoneAddress *addr=linphone_address_new(me);
202         const char *username=linphone_address_get_username (addr);
203         SalMediaDescription *md=sal_media_description_new();
204
205         md->session_id=session_id;
206         md->session_ver=session_ver;
207         md->nstreams=1;
208         strncpy(md->addr,call->localip,sizeof(md->addr));
209         strncpy(md->username,username,sizeof(md->username));
210         md->bandwidth=linphone_core_get_download_bandwidth(lc);
211
212         /*set audio capabilities */
213         strncpy(md->streams[0].rtp_addr,call->localip,sizeof(md->streams[0].rtp_addr));
214         strncpy(md->streams[0].rtcp_addr,call->localip,sizeof(md->streams[0].rtcp_addr));
215         md->streams[0].rtp_port=call->audio_port;
216         md->streams[0].rtcp_port=call->audio_port+1;
217         md->streams[0].proto=(call->params.media_encryption == LinphoneMediaEncryptionSRTP) ? 
218                 SalProtoRtpSavp : SalProtoRtpAvp;
219         md->streams[0].type=SalAudio;
220         md->streams[0].ptime=lc->net_conf.down_ptime;
221         l=make_codec_list(lc,lc->codecs_conf.audio_codecs,call->params.audio_bw,&md->streams[0].max_rate);
222         pt=payload_type_clone(rtp_profile_get_payload_from_mime(&av_profile,"telephone-event"));
223         l=ms_list_append(l,pt);
224         md->streams[0].payloads=l;
225         
226
227
228         if (call->params.has_video){
229                 md->nstreams++;
230                 md->streams[1].rtp_port=call->video_port;
231                 md->streams[1].rtcp_port=call->video_port+1;
232                 md->streams[1].proto=md->streams[0].proto;
233                 md->streams[1].type=SalVideo;
234                 l=make_codec_list(lc,lc->codecs_conf.video_codecs,0,NULL);
235                 md->streams[1].payloads=l;
236         }
237         
238         for(i=0; i<md->nstreams; i++) {
239                 if (md->streams[i].proto == SalProtoRtpSavp) {
240                         md->streams[i].crypto[0].tag = 1;
241                         md->streams[i].crypto[0].algo = AES_128_SHA1_80;
242                         if (!generate_b64_crypto_key(30, md->streams[i].crypto[0].master_key))
243                                 md->streams[i].crypto[0].algo = 0;
244                         md->streams[i].crypto[1].tag = 2;
245                         md->streams[i].crypto[1].algo = AES_128_SHA1_32;
246                         if (!generate_b64_crypto_key(30, md->streams[i].crypto[1].master_key))
247                                 md->streams[i].crypto[1].algo = 0;
248                         md->streams[i].crypto[2].algo = 0;
249                 }
250                 if ((linphone_core_get_firewall_policy(call->core) == LinphonePolicyUseIce) && (call->ice_session != NULL) && (ice_session_check_list(call->ice_session, i) == NULL)) {
251                         ice_session_add_check_list(call->ice_session, ice_check_list_new());
252                 }
253         }
254         
255         linphone_address_destroy(addr);
256         return md;
257 }
258
259 void update_local_media_description(LinphoneCore *lc, LinphoneCall *call){
260         SalMediaDescription *md=call->localdesc;
261         if (md== NULL) {
262                 call->localdesc = create_local_media_description(lc,call);
263         } else {
264                 call->localdesc = _create_local_media_description(lc,call,md->session_id,md->session_ver+1);
265                 sal_media_description_unref(md);
266         }
267 }
268
269 SalMediaDescription *create_local_media_description(LinphoneCore *lc, LinphoneCall *call){
270         unsigned int id=rand() & 0xfff;
271         return _create_local_media_description(lc,call,id,id);
272 }
273
274 static int find_port_offset(LinphoneCore *lc){
275         int offset;
276         MSList *elem;
277         int audio_port;
278         bool_t already_used=FALSE;
279         for(offset=0;offset<100;offset+=2){
280                 audio_port=linphone_core_get_audio_port (lc)+offset;
281                 already_used=FALSE;
282                 for(elem=lc->calls;elem!=NULL;elem=elem->next){
283                         LinphoneCall *call=(LinphoneCall*)elem->data;
284                         if (call->audio_port==audio_port) {
285                                 already_used=TRUE;
286                                 break;
287                         }
288                 }
289                 if (!already_used) break;
290         }
291         if (offset==100){
292                 ms_error("Could not find any free port !");
293                 return -1;
294         }
295         return offset;
296 }
297
298 static void linphone_call_init_common(LinphoneCall *call, LinphoneAddress *from, LinphoneAddress *to){
299         int port_offset;
300         call->magic=linphone_call_magic;
301         call->refcnt=1;
302         call->state=LinphoneCallIdle;
303         call->transfer_state = LinphoneCallIdle;
304         call->start_time=time(NULL);
305         call->media_start_time=0;
306         call->log=linphone_call_log_new(call, from, to);
307         call->owns_call_log=TRUE;
308         linphone_core_notify_all_friends(call->core,LinphoneStatusOnThePhone);
309         port_offset=find_port_offset (call->core);
310         if (port_offset==-1) return;
311         call->audio_port=linphone_core_get_audio_port(call->core)+port_offset;
312         call->video_port=linphone_core_get_video_port(call->core)+port_offset;
313         linphone_call_init_stats(&call->stats[LINPHONE_CALL_STATS_AUDIO], LINPHONE_CALL_STATS_AUDIO);
314         linphone_call_init_stats(&call->stats[LINPHONE_CALL_STATS_VIDEO], LINPHONE_CALL_STATS_VIDEO);
315 }
316
317 void linphone_call_init_stats(LinphoneCallStats *stats, int type) {
318         stats->type = type;
319         stats->received_rtcp = NULL;
320         stats->sent_rtcp = NULL;
321 }
322
323 static void discover_mtu(LinphoneCore *lc, const char *remote){
324         int mtu;
325         if (lc->net_conf.mtu==0 ){
326                 /*attempt to discover mtu*/
327                 mtu=ms_discover_mtu(remote);
328                 if (mtu>0){
329                         ms_set_mtu(mtu);
330                         ms_message("Discovered mtu is %i, RTP payload max size is %i",
331                                 mtu, ms_get_payload_max_size());
332                 }
333         }
334 }
335
336 LinphoneCall * linphone_call_new_outgoing(struct _LinphoneCore *lc, LinphoneAddress *from, LinphoneAddress *to, const LinphoneCallParams *params)
337 {
338         LinphoneCall *call=ms_new0(LinphoneCall,1);
339         call->dir=LinphoneCallOutgoing;
340         call->op=sal_op_new(lc->sal);
341         sal_op_set_user_pointer(call->op,call);
342         call->core=lc;
343         linphone_core_get_local_ip(lc,linphone_address_get_domain(to),call->localip);
344         linphone_call_init_common(call,from,to);
345         call->params=*params;
346         if (linphone_core_get_firewall_policy(call->core) == LinphonePolicyUseIce) {
347                 call->ice_session = ice_session_new();
348                 ice_session_set_role(call->ice_session, IR_Controlling);
349         }
350         call->localdesc=create_local_media_description (lc,call);
351         call->camera_active=params->has_video;
352         if (linphone_core_get_firewall_policy(call->core) == LinphonePolicyUseStun) {
353                 linphone_core_run_stun_tests(call->core,call);
354         }
355         discover_mtu(lc,linphone_address_get_domain (to));
356         if (params->referer){
357                 sal_call_set_referer(call->op,params->referer->op);
358                 call->referer=linphone_call_ref(params->referer);
359         }
360         return call;
361 }
362
363 LinphoneCall * linphone_call_new_incoming(LinphoneCore *lc, LinphoneAddress *from, LinphoneAddress *to, SalOp *op){
364         LinphoneCall *call=ms_new0(LinphoneCall,1);
365         char *from_str;
366
367         call->dir=LinphoneCallIncoming;
368         sal_op_set_user_pointer(op,call);
369         call->op=op;
370         call->core=lc;
371
372         if (lc->sip_conf.ping_with_options){
373                 /*the following sends an option request back to the caller so that
374                  we get a chance to discover our nat'd address before answering.*/
375                 call->ping_op=sal_op_new(lc->sal);
376                 from_str=linphone_address_as_string_uri_only(from);
377                 sal_op_set_route(call->ping_op,sal_op_get_network_origin(op));
378                 sal_op_set_user_pointer(call->ping_op,call);
379                 sal_ping(call->ping_op,linphone_core_find_best_identity(lc,from,NULL),from_str);
380                 ms_free(from_str);
381         }
382
383         linphone_address_clean(from);
384         linphone_core_get_local_ip(lc,linphone_address_get_domain(from),call->localip);
385         linphone_call_init_common(call, from, to);
386         linphone_core_init_default_params(lc, &call->params);
387         call->params.has_video &= !!lc->video_policy.automatically_accept;
388         call->localdesc=create_local_media_description (lc,call);
389         call->camera_active=call->params.has_video;
390         switch (linphone_core_get_firewall_policy(call->core)) {
391                 case LinphonePolicyUseIce:
392                         call->ice_session = ice_session_new();
393                         ice_session_set_role(call->ice_session, IR_Controlled);
394                         linphone_core_update_ice_from_remote_media_description(call, sal_call_get_remote_media_description(op));
395                         if (call->ice_session != NULL) {
396                                 linphone_call_init_media_streams(call);
397                                 linphone_call_start_media_streams_for_ice_gathering(call);
398                                 if (linphone_core_gather_ice_candidates(call->core,call)<0) {
399                                         /* Ice candidates gathering failed, proceed with the call anyway. */
400                                         linphone_call_delete_ice_session(call);
401                                         linphone_call_stop_media_streams(call);
402                                 }
403                         }
404                         break;
405                 case LinphonePolicyUseStun:
406                         linphone_core_run_stun_tests(call->core,call);
407                         /* No break to also destroy ice session in this case. */
408                 default:
409                         break;
410         }
411         discover_mtu(lc,linphone_address_get_domain(from));
412         return call;
413 }
414
415 /* this function is called internally to get rid of a call.
416  It performs the following tasks:
417  - remove the call from the internal list of calls
418  - update the call logs accordingly
419 */
420
421 static void linphone_call_set_terminated(LinphoneCall *call){
422         LinphoneCore *lc=call->core;
423
424         linphone_core_update_allocated_audio_bandwidth(lc);
425
426         call->owns_call_log=FALSE;
427         linphone_call_log_completed(call);
428
429
430         if (call == lc->current_call){
431                 ms_message("Resetting the current call");
432                 lc->current_call=NULL;
433         }
434
435         if (linphone_core_del_call(lc,call) != 0){
436                 ms_error("Could not remove the call from the list !!!");
437         }
438
439         if (ms_list_size(lc->calls)==0)
440                 linphone_core_notify_all_friends(lc,lc->presence_mode);
441
442         linphone_core_conference_check_uninit(lc);
443         if (call->ringing_beep){
444                 linphone_core_stop_dtmf(lc);
445                 call->ringing_beep=FALSE;
446         }
447         if (call->referer){
448                 linphone_call_unref(call->referer);
449                 call->referer=NULL;
450         }
451 }
452
453 void linphone_call_fix_call_parameters(LinphoneCall *call){
454         call->params.has_video=call->current_params.has_video;
455         call->params.media_encryption=call->current_params.media_encryption;
456 }
457
458 const char *linphone_call_state_to_string(LinphoneCallState cs){
459         switch (cs){
460                 case LinphoneCallIdle:
461                         return "LinphoneCallIdle";
462                 case LinphoneCallIncomingReceived:
463                         return "LinphoneCallIncomingReceived";
464                 case LinphoneCallOutgoingInit:
465                         return "LinphoneCallOutgoingInit";
466                 case LinphoneCallOutgoingProgress:
467                         return "LinphoneCallOutgoingProgress";
468                 case LinphoneCallOutgoingRinging:
469                         return "LinphoneCallOutgoingRinging";
470                 case LinphoneCallOutgoingEarlyMedia:
471                         return "LinphoneCallOutgoingEarlyMedia";
472                 case LinphoneCallConnected:
473                         return "LinphoneCallConnected";
474                 case LinphoneCallStreamsRunning:
475                         return "LinphoneCallStreamsRunning";
476                 case LinphoneCallPausing:
477                         return "LinphoneCallPausing";
478                 case LinphoneCallPaused:
479                         return "LinphoneCallPaused";
480                 case LinphoneCallResuming:
481                         return "LinphoneCallResuming";
482                 case LinphoneCallRefered:
483                         return "LinphoneCallRefered";
484                 case LinphoneCallError:
485                         return "LinphoneCallError";
486                 case LinphoneCallEnd:
487                         return "LinphoneCallEnd";
488                 case LinphoneCallPausedByRemote:
489                         return "LinphoneCallPausedByRemote";
490                 case LinphoneCallUpdatedByRemote:
491                         return "LinphoneCallUpdatedByRemote";
492                 case LinphoneCallIncomingEarlyMedia:
493                         return "LinphoneCallIncomingEarlyMedia";
494                 case LinphoneCallUpdated:
495                         return "LinphoneCallUpdated";
496                 case LinphoneCallReleased:
497                         return "LinphoneCallReleased";
498         }
499         return "undefined state";
500 }
501
502 void linphone_call_set_state(LinphoneCall *call, LinphoneCallState cstate, const char *message){
503         LinphoneCore *lc=call->core;
504
505         if (call->state!=cstate){
506                 if (call->state==LinphoneCallEnd || call->state==LinphoneCallError){
507                         if (cstate!=LinphoneCallReleased){
508                                 ms_warning("Spurious call state change from %s to %s, ignored.",linphone_call_state_to_string(call->state),
509                                    linphone_call_state_to_string(cstate));
510                                 return;
511                         }
512                 }
513                 ms_message("Call %p: moving from state %s to %s",call,linphone_call_state_to_string(call->state),
514                            linphone_call_state_to_string(cstate));
515                 if (cstate!=LinphoneCallRefered){
516                         /*LinphoneCallRefered is rather an event, not a state.
517                          Indeed it does not change the state of the call (still paused or running)*/
518                         call->state=cstate;
519                 }
520                 if (cstate==LinphoneCallEnd || cstate==LinphoneCallError){
521                         switch(call->reason){
522                                 case LinphoneReasonDeclined:
523                                         call->log->status=LinphoneCallDeclined;
524                                 break;
525                                 case LinphoneReasonNotAnswered:
526                                         call->log->status=LinphoneCallMissed;
527                                 break;
528                                 default:
529                                 break;
530                         }
531                         linphone_call_set_terminated (call);
532                 }
533                 if (cstate == LinphoneCallConnected) {
534                         call->log->status=LinphoneCallSuccess;
535                         call->media_start_time=time(NULL);
536                 }
537
538                 if (lc->vtable.call_state_changed)
539                         lc->vtable.call_state_changed(lc,call,cstate,message);
540                 if (cstate==LinphoneCallReleased){
541                         if (call->op!=NULL) {
542                                 /* so that we cannot have anymore upcalls for SAL
543                                  concerning this call*/
544                                 sal_op_release(call->op);
545                                 call->op=NULL;
546                         }
547                         linphone_call_unref(call);
548                 }
549         }
550 }
551
552 static void linphone_call_destroy(LinphoneCall *obj)
553 {
554         if (obj->op!=NULL) {
555                 sal_op_release(obj->op);
556                 obj->op=NULL;
557         }
558         if (obj->resultdesc!=NULL) {
559                 sal_media_description_unref(obj->resultdesc);
560                 obj->resultdesc=NULL;
561         }
562         if (obj->localdesc!=NULL) {
563                 sal_media_description_unref(obj->localdesc);
564                 obj->localdesc=NULL;
565         }
566         if (obj->ping_op) {
567                 sal_op_release(obj->ping_op);
568         }
569         if (obj->refer_to){
570                 ms_free(obj->refer_to);
571         }
572         if (obj->owns_call_log)
573                 linphone_call_log_destroy(obj->log);
574         if (obj->auth_token) {
575                 ms_free(obj->auth_token);
576         }
577         if (obj->ice_session) {
578                 ice_session_destroy(obj->ice_session);
579         }
580
581         ms_free(obj);
582 }
583
584 /**
585  * @addtogroup call_control
586  * @{
587 **/
588
589 /**
590  * Increments the call 's reference count.
591  * An application that wishes to retain a pointer to call object
592  * must use this function to unsure the pointer remains
593  * valid. Once the application no more needs this pointer,
594  * it must call linphone_call_unref().
595 **/
596 LinphoneCall * linphone_call_ref(LinphoneCall *obj){
597         obj->refcnt++;
598         return obj;
599 }
600
601 /**
602  * Decrements the call object reference count.
603  * See linphone_call_ref().
604 **/
605 void linphone_call_unref(LinphoneCall *obj){
606         obj->refcnt--;
607         if (obj->refcnt==0){
608                 linphone_call_destroy(obj);
609         }
610 }
611
612 /**
613  * Returns current parameters associated to the call.
614 **/
615 const LinphoneCallParams * linphone_call_get_current_params(const LinphoneCall *call){
616         return &call->current_params;
617 }
618
619 static bool_t is_video_active(const SalStreamDescription *sd){
620         return sd->rtp_port!=0 && sd->dir!=SalStreamInactive;
621 }
622
623 /**
624  * Returns call parameters proposed by remote.
625  * 
626  * This is useful when receiving an incoming call, to know whether the remote party
627  * supports video, encryption or whatever.
628 **/
629 const LinphoneCallParams * linphone_call_get_remote_params(LinphoneCall *call){
630         LinphoneCallParams *cp=&call->remote_params;
631         memset(cp,0,sizeof(*cp));
632         if (call->op){
633                 SalMediaDescription *md=sal_call_get_remote_media_description(call->op);
634                 if (md){
635                         SalStreamDescription *asd,*vsd,*secure_asd,*secure_vsd;
636
637                         asd=sal_media_description_find_stream(md,SalProtoRtpAvp,SalAudio);
638                         vsd=sal_media_description_find_stream(md,SalProtoRtpAvp,SalVideo);
639                         secure_asd=sal_media_description_find_stream(md,SalProtoRtpSavp,SalAudio);
640                         secure_vsd=sal_media_description_find_stream(md,SalProtoRtpSavp,SalVideo);
641                         if (secure_vsd){
642                                 cp->has_video=is_video_active(secure_vsd);
643                                 if (secure_asd || asd==NULL)
644                                         cp->media_encryption=LinphoneMediaEncryptionSRTP;
645                         }else if (vsd){
646                                 cp->has_video=is_video_active(vsd);
647                         }
648                         return cp;
649                 }
650         }
651         return NULL;
652 }
653
654 /**
655  * Returns the remote address associated to this call
656  *
657 **/
658 const LinphoneAddress * linphone_call_get_remote_address(const LinphoneCall *call){
659         return call->dir==LinphoneCallIncoming ? call->log->from : call->log->to;
660 }
661
662 /**
663  * Returns the remote address associated to this call as a string.
664  *
665  * The result string must be freed by user using ms_free().
666 **/
667 char *linphone_call_get_remote_address_as_string(const LinphoneCall *call){
668         return linphone_address_as_string(linphone_call_get_remote_address(call));
669 }
670
671 /**
672  * Retrieves the call's current state.
673 **/
674 LinphoneCallState linphone_call_get_state(const LinphoneCall *call){
675         return call->state;
676 }
677
678 /**
679  * Returns the reason for a call termination (either error or normal termination)
680 **/
681 LinphoneReason linphone_call_get_reason(const LinphoneCall *call){
682         return call->reason;
683 }
684
685 /**
686  * Get the user_pointer in the LinphoneCall
687  *
688  * @ingroup call_control
689  *
690  * return user_pointer an opaque user pointer that can be retrieved at any time
691 **/
692 void *linphone_call_get_user_pointer(LinphoneCall *call)
693 {
694         return call->user_pointer;
695 }
696
697 /**
698  * Set the user_pointer in the LinphoneCall
699  *
700  * @ingroup call_control
701  *
702  * the user_pointer is an opaque user pointer that can be retrieved at any time in the LinphoneCall
703 **/
704 void linphone_call_set_user_pointer(LinphoneCall *call, void *user_pointer)
705 {
706         call->user_pointer = user_pointer;
707 }
708
709 /**
710  * Returns the call log associated to this call.
711 **/
712 LinphoneCallLog *linphone_call_get_call_log(const LinphoneCall *call){
713         return call->log;
714 }
715
716 /**
717  * Returns the refer-to uri (if the call was transfered).
718 **/
719 const char *linphone_call_get_refer_to(const LinphoneCall *call){
720         return call->refer_to;
721 }
722
723 /**
724  * Returns direction of the call (incoming or outgoing).
725 **/
726 LinphoneCallDir linphone_call_get_dir(const LinphoneCall *call){
727         return call->log->dir;
728 }
729
730 /**
731  * Returns the far end's user agent description string, if available.
732 **/
733 const char *linphone_call_get_remote_user_agent(LinphoneCall *call){
734         if (call->op){
735                 return sal_op_get_remote_ua (call->op);
736         }
737         return NULL;
738 }
739
740 /**
741  * Returns true if this calls has received a transfer that has not been
742  * executed yet.
743  * Pending transfers are executed when this call is being paused or closed,
744  * locally or by remote endpoint.
745  * If the call is already paused while receiving the transfer request, the
746  * transfer immediately occurs.
747 **/
748 bool_t linphone_call_has_transfer_pending(const LinphoneCall *call){
749         return call->refer_pending;
750 }
751
752 /**
753  * Returns call's duration in seconds.
754 **/
755 int linphone_call_get_duration(const LinphoneCall *call){
756         if (call->media_start_time==0) return 0;
757         return time(NULL)-call->media_start_time;
758 }
759
760 /**
761  * Returns the call object this call is replacing, if any.
762  * Call replacement can occur during call transfers.
763  * By default, the core automatically terminates the replaced call and accept the new one.
764  * This function allows the application to know whether a new incoming call is a one that replaces another one.
765 **/
766 LinphoneCall *linphone_call_get_replaced_call(LinphoneCall *call){
767         SalOp *op=sal_call_get_replaces(call->op);
768         if (op){
769                 return (LinphoneCall*)sal_op_get_user_pointer(op);
770         }
771         return NULL;
772 }
773
774 /**
775  * Indicate whether camera input should be sent to remote end.
776 **/
777 void linphone_call_enable_camera (LinphoneCall *call, bool_t enable){
778 #ifdef VIDEO_ENABLED
779         if (call->videostream!=NULL && call->videostream->ticker!=NULL){
780                 LinphoneCore *lc=call->core;
781                 MSWebCam *nowebcam=get_nowebcam_device();
782                 if (call->camera_active!=enable && lc->video_conf.device!=nowebcam){
783                         video_stream_change_camera(call->videostream,
784                                      enable ? lc->video_conf.device : nowebcam);
785                 }
786         }
787         call->camera_active=enable;
788 #endif
789 }
790
791 /**
792  * Take a photo of currently received video and write it into a jpeg file.
793 **/
794 int linphone_call_take_video_snapshot(LinphoneCall *call, const char *file){
795 #ifdef VIDEO_ENABLED
796         if (call->videostream!=NULL && call->videostream->jpegwriter!=NULL){
797                 return ms_filter_call_method(call->videostream->jpegwriter,MS_JPEG_WRITER_TAKE_SNAPSHOT,(void*)file);
798         }
799         ms_warning("Cannot take snapshot: no currently running video stream on this call.");
800         return -1;
801 #endif
802         return -1;
803 }
804
805 /**
806  * Returns TRUE if camera pictures are sent to the remote party.
807 **/
808 bool_t linphone_call_camera_enabled (const LinphoneCall *call){
809         return call->camera_active;
810 }
811
812 /**
813  * Enable video stream.
814 **/
815 void linphone_call_params_enable_video(LinphoneCallParams *cp, bool_t enabled){
816         cp->has_video=enabled;
817 }
818
819 const PayloadType* linphone_call_params_get_used_audio_codec(const LinphoneCallParams *cp) {
820         return cp->audio_codec;
821 }
822
823 const PayloadType* linphone_call_params_get_used_video_codec(const LinphoneCallParams *cp) {
824         return cp->video_codec;
825 }
826
827 /**
828  * Returns whether video is enabled.
829 **/
830 bool_t linphone_call_params_video_enabled(const LinphoneCallParams *cp){
831         return cp->has_video;
832 }
833
834 enum LinphoneMediaEncryption linphone_call_params_get_media_encryption(const LinphoneCallParams *cp) {
835         return cp->media_encryption;
836 }
837
838 void linphone_call_params_set_media_encryption(LinphoneCallParams *cp, enum LinphoneMediaEncryption e) {
839         cp->media_encryption = e;
840 }
841
842
843 /**
844  * Enable sending of real early media (during outgoing calls).
845 **/
846 void linphone_call_params_enable_early_media_sending(LinphoneCallParams *cp, bool_t enabled){
847         cp->real_early_media=enabled;
848 }
849
850 bool_t linphone_call_params_early_media_sending_enabled(const LinphoneCallParams *cp){
851         return cp->real_early_media;
852 }
853
854 /**
855  * Returns true if the call is part of the locally managed conference.
856 **/
857 bool_t linphone_call_params_local_conference_mode(const LinphoneCallParams *cp){
858         return cp->in_conference;
859 }
860
861 /**
862  * Refine bandwidth settings for this call by setting a bandwidth limit for audio streams.
863  * As a consequence, codecs whose bitrates are not compatible with this limit won't be used.
864 **/
865 void linphone_call_params_set_audio_bandwidth_limit(LinphoneCallParams *cp, int bandwidth){
866         cp->audio_bw=bandwidth;
867 }
868
869 #ifdef VIDEO_ENABLED
870 /**
871  * Request remote side to send us a Video Fast Update.
872 **/
873 void linphone_call_send_vfu_request(LinphoneCall *call)
874 {
875         if (LinphoneCallStreamsRunning == linphone_call_get_state(call))
876                 sal_call_send_vfu_request(call->op);
877 }
878 #endif
879
880 /**
881  *
882 **/
883 LinphoneCallParams * linphone_call_params_copy(const LinphoneCallParams *cp){
884         LinphoneCallParams *ncp=ms_new0(LinphoneCallParams,1);
885         memcpy(ncp,cp,sizeof(LinphoneCallParams));
886         return ncp;
887 }
888
889 /**
890  *
891 **/
892 void linphone_call_params_destroy(LinphoneCallParams *p){
893         ms_free(p);
894 }
895
896 /**
897  * @}
898 **/
899
900
901 #ifdef TEST_EXT_RENDERER
902 static void rendercb(void *data, const MSPicture *local, const MSPicture *remote){
903         ms_message("rendercb, local buffer=%p, remote buffer=%p",
904                    local ? local->planes[0] : NULL, remote? remote->planes[0] : NULL);
905 }
906 #endif
907
908 #ifdef VIDEO_ENABLED
909 static void video_stream_event_cb(void *user_pointer, const MSFilter *f, const unsigned int event_id, const void *args){
910     LinphoneCall* call = (LinphoneCall*) user_pointer;
911         ms_warning("In linphonecall.c: video_stream_event_cb");
912         switch (event_id) {
913                 case MS_VIDEO_DECODER_DECODING_ERRORS:
914                         ms_warning("Case is MS_VIDEO_DECODER_DECODING_ERRORS");
915                         linphone_call_send_vfu_request(call);
916                         break;
917         case MS_VIDEO_DECODER_FIRST_IMAGE_DECODED:
918             ms_message("First video frame decoded successfully");
919             if (call->nextVideoFrameDecoded._func != NULL)
920                 call->nextVideoFrameDecoded._func(call, call->nextVideoFrameDecoded._user_data);
921             break;
922                 default:
923                         ms_warning("Unhandled event %i", event_id);
924                         break;
925         }
926 }
927 #endif
928
929 void linphone_call_set_next_video_frame_decoded_callback(LinphoneCall *call, LinphoneCallCbFunc cb, void* user_data) {
930     call->nextVideoFrameDecoded._func = cb;
931     call->nextVideoFrameDecoded._user_data = user_data;
932 #ifdef VIDEO_ENABLED
933     ms_filter_call_method_noarg(call->videostream->decoder, MS_VIDEO_DECODER_RESET_FIRST_IMAGE_NOTIFICATION);
934 #endif
935 }
936
937 void linphone_call_init_audio_stream(LinphoneCall *call){
938         LinphoneCore *lc=call->core;
939         SalMediaDescription *md=call->localdesc;
940         AudioStream *audiostream;
941
942         call->audiostream=audiostream=audio_stream_new(md->streams[0].rtp_port,md->streams[0].rtcp_port,linphone_core_ipv6_enabled(lc));
943         if (linphone_core_echo_limiter_enabled(lc)){
944                 const char *type=lp_config_get_string(lc->config,"sound","el_type","mic");
945                 if (strcasecmp(type,"mic")==0)
946                         audio_stream_enable_echo_limiter(audiostream,ELControlMic);
947                 else if (strcasecmp(type,"full")==0)
948                         audio_stream_enable_echo_limiter(audiostream,ELControlFull);
949         }
950         audio_stream_enable_gain_control(audiostream,TRUE);
951         if (linphone_core_echo_cancellation_enabled(lc)){
952                 int len,delay,framesize;
953                 const char *statestr=lp_config_get_string(lc->config,"sound","ec_state",NULL);
954                 len=lp_config_get_int(lc->config,"sound","ec_tail_len",0);
955                 delay=lp_config_get_int(lc->config,"sound","ec_delay",0);
956                 framesize=lp_config_get_int(lc->config,"sound","ec_framesize",0);
957                 audio_stream_set_echo_canceller_params(audiostream,len,delay,framesize);
958                 if (statestr && audiostream->ec){
959                         ms_filter_call_method(audiostream->ec,MS_ECHO_CANCELLER_SET_STATE_STRING,(void*)statestr);
960                 }
961         }
962         audio_stream_enable_automatic_gain_control(audiostream,linphone_core_agc_enabled(lc));
963         {
964                 int enabled=lp_config_get_int(lc->config,"sound","noisegate",0);
965                 audio_stream_enable_noise_gate(audiostream,enabled);
966         }
967
968         audio_stream_set_features(audiostream,linphone_core_get_audio_features(lc));
969
970         if (lc->rtptf){
971                 RtpTransport *artp=lc->rtptf->audio_rtp_func(lc->rtptf->audio_rtp_func_data, call->audio_port);
972                 RtpTransport *artcp=lc->rtptf->audio_rtcp_func(lc->rtptf->audio_rtcp_func_data, call->audio_port+1);
973                 rtp_session_set_transports(audiostream->session,artp,artcp);
974         }
975         if ((linphone_core_get_firewall_policy(lc) == LinphonePolicyUseIce) && (call->ice_session != NULL)){
976                 rtp_session_set_pktinfo(audiostream->session, TRUE);
977                 audiostream->ice_check_list = ice_session_check_list(call->ice_session, 0);
978                 ice_check_list_set_rtp_session(audiostream->ice_check_list, audiostream->session);
979         }
980
981         call->audiostream_app_evq = ortp_ev_queue_new();
982         rtp_session_register_event_queue(audiostream->session,call->audiostream_app_evq);
983 }
984
985 void linphone_call_init_video_stream(LinphoneCall *call){
986 #ifdef VIDEO_ENABLED
987         LinphoneCore *lc=call->core;
988         SalMediaDescription *md=call->localdesc;
989
990         if ((lc->video_conf.display || lc->video_conf.capture) && md->streams[1].rtp_port>0){
991                 int video_recv_buf_size=lp_config_get_int(lc->config,"video","recv_buf_size",0);
992                 call->videostream=video_stream_new(md->streams[1].rtp_port,md->streams[1].rtcp_port,linphone_core_ipv6_enabled(lc));
993                 video_stream_enable_display_filter_auto_rotate(call->videostream, lp_config_get_int(lc->config,"video","display_filter_auto_rotate",0));
994                 if (video_recv_buf_size>0) rtp_session_set_recv_buf_size(call->videostream->session,video_recv_buf_size);
995
996                 if( lc->video_conf.displaytype != NULL)
997                         video_stream_set_display_filter_name(call->videostream,lc->video_conf.displaytype);
998                 video_stream_set_event_callback(call->videostream,video_stream_event_cb, call);
999                 if (lc->rtptf){
1000                         RtpTransport *vrtp=lc->rtptf->video_rtp_func(lc->rtptf->video_rtp_func_data, call->video_port);
1001                         RtpTransport *vrtcp=lc->rtptf->video_rtcp_func(lc->rtptf->video_rtcp_func_data, call->video_port+1);
1002                         rtp_session_set_transports(call->videostream->session,vrtp,vrtcp);
1003                 }
1004                 if ((linphone_core_get_firewall_policy(lc) == LinphonePolicyUseIce) && (call->ice_session != NULL) && (ice_session_check_list(call->ice_session, 1))){
1005                         rtp_session_set_pktinfo(call->videostream->session, TRUE);
1006                         call->videostream->ice_check_list = ice_session_check_list(call->ice_session, 1);
1007                         ice_check_list_set_rtp_session(call->videostream->ice_check_list, call->videostream->session);
1008                 }
1009                 call->videostream_app_evq = ortp_ev_queue_new();
1010                 rtp_session_register_event_queue(call->videostream->session,call->videostream_app_evq);
1011 #ifdef TEST_EXT_RENDERER
1012                 video_stream_set_render_callback(call->videostream,rendercb,NULL);
1013 #endif
1014         }
1015 #else
1016         call->videostream=NULL;
1017 #endif
1018 }
1019
1020 void linphone_call_init_media_streams(LinphoneCall *call){
1021         linphone_call_init_audio_stream(call);
1022         linphone_call_init_video_stream(call);
1023 }
1024
1025
1026 static int dtmf_tab[16]={'0','1','2','3','4','5','6','7','8','9','*','#','A','B','C','D'};
1027
1028 static void linphone_core_dtmf_received(RtpSession* s, int dtmf, void* user_data){
1029         LinphoneCore* lc = (LinphoneCore*)user_data;
1030         if (dtmf<0 || dtmf>15){
1031                 ms_warning("Bad dtmf value %i",dtmf);
1032                 return;
1033         }
1034         if (lc->vtable.dtmf_received != NULL)
1035                 lc->vtable.dtmf_received(lc, linphone_core_get_current_call(lc), dtmf_tab[dtmf]);
1036 }
1037
1038 static void parametrize_equalizer(LinphoneCore *lc, AudioStream *st){
1039         if (st->equalizer){
1040                 MSFilter *f=st->equalizer;
1041                 int enabled=lp_config_get_int(lc->config,"sound","eq_active",0);
1042                 const char *gains=lp_config_get_string(lc->config,"sound","eq_gains",NULL);
1043                 ms_filter_call_method(f,MS_EQUALIZER_SET_ACTIVE,&enabled);
1044                 if (enabled){
1045                         if (gains){
1046                                 do{
1047                                         int bytes;
1048                                         MSEqualizerGain g;
1049                                         if (sscanf(gains,"%f:%f:%f %n",&g.frequency,&g.gain,&g.width,&bytes)==3){
1050                                                 ms_message("Read equalizer gains: %f(~%f) --> %f",g.frequency,g.width,g.gain);
1051                                                 ms_filter_call_method(f,MS_EQUALIZER_SET_GAIN,&g);
1052                                                 gains+=bytes;
1053                                         }else break;
1054                                 }while(1);
1055                         }
1056                 }
1057         }
1058 }
1059
1060 void _post_configure_audio_stream(AudioStream *st, LinphoneCore *lc, bool_t muted){
1061         float mic_gain=lp_config_get_float(lc->config,"sound","mic_gain",1);
1062         float thres = 0;
1063         float recv_gain;
1064         float ng_thres=lp_config_get_float(lc->config,"sound","ng_thres",0.05);
1065         float ng_floorgain=lp_config_get_float(lc->config,"sound","ng_floorgain",0);
1066         int dc_removal=lp_config_get_int(lc->config,"sound","dc_removal",0);
1067
1068         if (!muted)
1069                 audio_stream_set_mic_gain(st,mic_gain);
1070         else
1071                 audio_stream_set_mic_gain(st,0);
1072
1073         recv_gain = lc->sound_conf.soft_play_lev;
1074         if (recv_gain != 0) {
1075                 linphone_core_set_playback_gain_db (lc,recv_gain);
1076         }
1077         
1078         if (st->volsend){
1079                 ms_filter_call_method(st->volsend,MS_VOLUME_REMOVE_DC,&dc_removal);
1080                 float speed=lp_config_get_float(lc->config,"sound","el_speed",-1);
1081                 thres=lp_config_get_float(lc->config,"sound","el_thres",-1);
1082                 float force=lp_config_get_float(lc->config,"sound","el_force",-1);
1083                 int sustain=lp_config_get_int(lc->config,"sound","el_sustain",-1);
1084                 float transmit_thres=lp_config_get_float(lc->config,"sound","el_transmit_thres",-1);
1085                 MSFilter *f=NULL;
1086                 f=st->volsend;
1087                 if (speed==-1) speed=0.03;
1088                 if (force==-1) force=25;
1089                 ms_filter_call_method(f,MS_VOLUME_SET_EA_SPEED,&speed);
1090                 ms_filter_call_method(f,MS_VOLUME_SET_EA_FORCE,&force);
1091                 if (thres!=-1)
1092                         ms_filter_call_method(f,MS_VOLUME_SET_EA_THRESHOLD,&thres);
1093                 if (sustain!=-1)
1094                         ms_filter_call_method(f,MS_VOLUME_SET_EA_SUSTAIN,&sustain);
1095                 if (transmit_thres!=-1)
1096                                 ms_filter_call_method(f,MS_VOLUME_SET_EA_TRANSMIT_THRESHOLD,&transmit_thres);
1097
1098                 ms_filter_call_method(st->volsend,MS_VOLUME_SET_NOISE_GATE_THRESHOLD,&ng_thres);
1099                 ms_filter_call_method(st->volsend,MS_VOLUME_SET_NOISE_GATE_FLOORGAIN,&ng_floorgain);
1100         }
1101         if (st->volrecv){
1102                 /* parameters for a limited noise-gate effect, using echo limiter threshold */
1103                 float floorgain = 1/mic_gain;
1104                 int spk_agc=lp_config_get_int(lc->config,"sound","speaker_agc_enabled",0);
1105                 ms_filter_call_method(st->volrecv, MS_VOLUME_ENABLE_AGC, &spk_agc);
1106                 ms_filter_call_method(st->volrecv,MS_VOLUME_SET_NOISE_GATE_THRESHOLD,&ng_thres);
1107                 ms_filter_call_method(st->volrecv,MS_VOLUME_SET_NOISE_GATE_FLOORGAIN,&floorgain);
1108         }
1109         parametrize_equalizer(lc,st);
1110 }
1111
1112 static void post_configure_audio_streams(LinphoneCall*call){
1113         AudioStream *st=call->audiostream;
1114         LinphoneCore *lc=call->core;
1115         _post_configure_audio_stream(st,lc,call->audio_muted);
1116         if (lc->vtable.dtmf_received!=NULL){
1117                 /* replace by our default action*/
1118                 audio_stream_play_received_dtmfs(call->audiostream,FALSE);
1119                 rtp_session_signal_connect(call->audiostream->session,"telephone-event",(RtpCallback)linphone_core_dtmf_received,(unsigned long)lc);
1120         }
1121 }
1122
1123 static RtpProfile *make_profile(LinphoneCall *call, const SalMediaDescription *md, const SalStreamDescription *desc, int *used_pt){
1124         int bw;
1125         const MSList *elem;
1126         RtpProfile *prof=rtp_profile_new("Call profile");
1127         bool_t first=TRUE;
1128         int remote_bw=0;
1129         LinphoneCore *lc=call->core;
1130         int up_ptime=0;
1131         *used_pt=-1;
1132
1133         for(elem=desc->payloads;elem!=NULL;elem=elem->next){
1134                 PayloadType *pt=(PayloadType*)elem->data;
1135                 int number;
1136
1137                 if ((pt->flags & PAYLOAD_TYPE_FLAG_CAN_SEND) && first) {
1138                         if (desc->type==SalAudio){
1139                                 linphone_core_update_allocated_audio_bandwidth_in_call(call,pt);
1140                                 up_ptime=linphone_core_get_upload_ptime(lc);
1141                         }
1142                         *used_pt=payload_type_get_number(pt);
1143                         first=FALSE;
1144                 }
1145                 if (desc->bandwidth>0) remote_bw=desc->bandwidth;
1146                 else if (md->bandwidth>0) {
1147                         /*case where b=AS is given globally, not per stream*/
1148                         remote_bw=md->bandwidth;
1149                         if (desc->type==SalVideo){
1150                                 remote_bw=get_video_bandwidth(remote_bw,call->audio_bw);
1151                         }
1152                 }
1153
1154                 if (desc->type==SalAudio){
1155                                 bw=get_min_bandwidth(call->audio_bw,remote_bw);
1156                 }else bw=get_min_bandwidth(get_video_bandwidth(linphone_core_get_upload_bandwidth (lc),call->audio_bw),remote_bw);
1157                 if (bw>0) pt->normal_bitrate=bw*1000;
1158                 else if (desc->type==SalAudio){
1159                         pt->normal_bitrate=-1;
1160                 }
1161                 if (desc->ptime>0){
1162                         up_ptime=desc->ptime;
1163                 }
1164                 if (up_ptime>0){
1165                         char tmp[40];
1166                         snprintf(tmp,sizeof(tmp),"ptime=%i",up_ptime);
1167                         payload_type_append_send_fmtp(pt,tmp);
1168                 }
1169                 number=payload_type_get_number(pt);
1170                 if (rtp_profile_get_payload(prof,number)!=NULL){
1171                         ms_warning("A payload type with number %i already exists in profile !",number);
1172                 }else
1173                         rtp_profile_set_payload(prof,number,pt);
1174         }
1175         return prof;
1176 }
1177
1178
1179 static void setup_ring_player(LinphoneCore *lc, LinphoneCall *call){
1180         int pause_time=3000;
1181         audio_stream_play(call->audiostream,lc->sound_conf.ringback_tone);
1182         ms_filter_call_method(call->audiostream->soundread,MS_FILE_PLAYER_LOOP,&pause_time);
1183 }
1184
1185 #define LINPHONE_RTCP_SDES_TOOL "Linphone-" LINPHONE_VERSION
1186
1187 static bool_t linphone_call_sound_resources_available(LinphoneCall *call){
1188         LinphoneCore *lc=call->core;
1189         LinphoneCall *current=linphone_core_get_current_call(lc);
1190         return !linphone_core_is_in_conference(lc) && 
1191                 (current==NULL || current==call);
1192 }
1193 static int find_crypto_index_from_tag(const SalSrtpCryptoAlgo crypto[],unsigned char tag) {
1194     int i;
1195     for(i=0; i<SAL_CRYPTO_ALGO_MAX; i++) {
1196         if (crypto[i].tag == tag) {
1197             return i;
1198         }
1199     }
1200     return -1;
1201 }
1202 static void linphone_call_start_audio_stream(LinphoneCall *call, const char *cname, bool_t muted, bool_t send_ringbacktone, bool_t use_arc){
1203         LinphoneCore *lc=call->core;
1204         int jitt_comp=lc->rtp_conf.audio_jitt_comp;
1205         int used_pt=-1;
1206         /* look for savp stream first */
1207         const SalStreamDescription *stream=sal_media_description_find_stream(call->resultdesc,
1208                                                 SalProtoRtpSavp,SalAudio);
1209         /* no savp audio stream, use avp */
1210         if (!stream)
1211                 stream=sal_media_description_find_stream(call->resultdesc,
1212                                                 SalProtoRtpAvp,SalAudio);
1213
1214         if (stream && stream->dir!=SalStreamInactive && stream->rtp_port!=0){
1215                 MSSndCard *playcard=lc->sound_conf.lsd_card ?
1216                         lc->sound_conf.lsd_card : lc->sound_conf.play_sndcard;
1217                 MSSndCard *captcard=lc->sound_conf.capt_sndcard;
1218                 const char *playfile=lc->play_file;
1219                 const char *recfile=lc->rec_file;
1220                 call->audio_profile=make_profile(call,call->resultdesc,stream,&used_pt);
1221                 bool_t use_ec;
1222
1223                 if (used_pt!=-1){
1224                         call->current_params.audio_codec = rtp_profile_get_payload(call->audio_profile, used_pt);
1225                         if (playcard==NULL) {
1226                                 ms_warning("No card defined for playback !");
1227                         }
1228                         if (captcard==NULL) {
1229                                 ms_warning("No card defined for capture !");
1230                         }
1231                         /*Replace soundcard filters by inactive file players or recorders
1232                          when placed in recvonly or sendonly mode*/
1233                         if (stream->rtp_port==0 || stream->dir==SalStreamRecvOnly){
1234                                 captcard=NULL;
1235                                 playfile=NULL;
1236                         }else if (stream->dir==SalStreamSendOnly){
1237                                 playcard=NULL;
1238                                 captcard=NULL;
1239                                 recfile=NULL;
1240                                 /*And we will eventually play "playfile" if set by the user*/
1241                                 /*playfile=NULL;*/
1242                         }
1243                         if (send_ringbacktone){
1244                                 captcard=NULL;
1245                                 playfile=NULL;/* it is setup later*/
1246                         }
1247                         /*if playfile are supplied don't use soundcards*/
1248                         if (lc->use_files) {
1249                                 captcard=NULL;
1250                                 playcard=NULL;
1251                         }
1252                         if (call->params.in_conference){
1253                                 /* first create the graph without soundcard resources*/
1254                                 captcard=playcard=NULL;
1255                         }
1256                         if (!linphone_call_sound_resources_available(call)){
1257                                 ms_message("Sound resources are used by another call, not using soundcard.");
1258                                 captcard=playcard=NULL;
1259                         }
1260                         use_ec=captcard==NULL ? FALSE : linphone_core_echo_cancellation_enabled(lc);
1261                         if (playcard &&  stream->max_rate>0) ms_snd_card_set_preferred_sample_rate(playcard, stream->max_rate);
1262                         if (captcard &&  stream->max_rate>0) ms_snd_card_set_preferred_sample_rate(captcard, stream->max_rate);
1263                         audio_stream_enable_adaptive_bitrate_control(call->audiostream,use_arc);
1264                         audio_stream_start_full(
1265                                 call->audiostream,
1266                                 call->audio_profile,
1267                                 stream->rtp_addr[0]!='\0' ? stream->rtp_addr : call->resultdesc->addr,
1268                                 stream->rtp_port,
1269                                 stream->rtcp_addr[0]!='\0' ? stream->rtcp_addr : call->resultdesc->addr,
1270                                 linphone_core_rtcp_enabled(lc) ? (stream->rtcp_port) : 0,
1271                                 used_pt,
1272                                 jitt_comp,
1273                                 playfile,
1274                                 recfile,
1275                                 playcard,
1276                                 captcard,
1277                                 use_ec
1278                                 );
1279                         post_configure_audio_streams(call);
1280                         if (muted && !send_ringbacktone){
1281                                 audio_stream_set_mic_gain(call->audiostream,0);
1282                         }
1283                         if (stream->dir==SalStreamSendOnly && playfile!=NULL){
1284                                 int pause_time=500;
1285                                 ms_filter_call_method(call->audiostream->soundread,MS_FILE_PLAYER_LOOP,&pause_time);
1286                         }
1287                         if (send_ringbacktone){
1288                                 setup_ring_player(lc,call);
1289                         }
1290                         audio_stream_set_rtcp_information(call->audiostream, cname, LINPHONE_RTCP_SDES_TOOL);
1291                         
1292             /* valid local tags are > 0 */
1293                         if (stream->proto == SalProtoRtpSavp) {
1294                 const SalStreamDescription *local_st_desc=sal_media_description_find_stream(call->localdesc,
1295                                                                                             SalProtoRtpSavp,SalAudio);
1296                 int crypto_idx = find_crypto_index_from_tag(local_st_desc->crypto, stream->crypto_local_tag);
1297                 
1298                 if (crypto_idx >= 0) {
1299                     audio_stream_enable_strp(
1300                                              call->audiostream, 
1301                                              stream->crypto[0].algo,
1302                                              local_st_desc->crypto[crypto_idx].master_key,
1303                                              stream->crypto[0].master_key);
1304                     call->audiostream_encrypted=TRUE;
1305                 } else {
1306                     ms_warning("Failed to find local crypto algo with tag: %d", stream->crypto_local_tag);
1307                     call->audiostream_encrypted=FALSE;
1308                 }
1309                         }else call->audiostream_encrypted=FALSE;
1310                         if (call->params.in_conference){
1311                                 /*transform the graph to connect it to the conference filter */
1312                                 bool_t mute=stream->dir==SalStreamRecvOnly;
1313                                 linphone_call_add_to_conf(call, mute);
1314                         }
1315                         call->current_params.in_conference=call->params.in_conference;
1316                 }else ms_warning("No audio stream accepted ?");
1317         }
1318 }
1319
1320 static void linphone_call_start_video_stream(LinphoneCall *call, const char *cname,bool_t all_inputs_muted){
1321 #ifdef VIDEO_ENABLED
1322         LinphoneCore *lc=call->core;
1323         int used_pt=-1;
1324         /* look for savp stream first */
1325         const SalStreamDescription *vstream=sal_media_description_find_stream(call->resultdesc,
1326                                                 SalProtoRtpSavp,SalVideo);
1327         /* no savp audio stream, use avp */
1328         if (!vstream)
1329                 vstream=sal_media_description_find_stream(call->resultdesc,
1330                                                 SalProtoRtpAvp,SalVideo);
1331                                                 
1332         /* shutdown preview */
1333         if (lc->previewstream!=NULL) {
1334                 video_preview_stop(lc->previewstream);
1335                 lc->previewstream=NULL;
1336         }
1337         
1338         if (vstream!=NULL && vstream->dir!=SalStreamInactive && vstream->rtp_port!=0) {
1339                 const char *rtp_addr=vstream->rtp_addr[0]!='\0' ? vstream->rtp_addr : call->resultdesc->addr;
1340                 const char *rtcp_addr=vstream->rtcp_addr[0]!='\0' ? vstream->rtcp_addr : call->resultdesc->addr;
1341                 call->video_profile=make_profile(call,call->resultdesc,vstream,&used_pt);
1342                 if (used_pt!=-1){
1343                         call->current_params.video_codec = rtp_profile_get_payload(call->video_profile, used_pt);
1344                         VideoStreamDir dir=VideoStreamSendRecv;
1345                         MSWebCam *cam=lc->video_conf.device;
1346                         bool_t is_inactive=FALSE;
1347
1348                         call->current_params.has_video=TRUE;
1349
1350                         video_stream_enable_adaptive_bitrate_control(call->videostream,
1351                                                                   linphone_core_adaptive_rate_control_enabled(lc));
1352                         video_stream_set_sent_video_size(call->videostream,linphone_core_get_preferred_video_size(lc));
1353                         video_stream_enable_self_view(call->videostream,lc->video_conf.selfview);
1354                         if (lc->video_window_id!=0)
1355                                 video_stream_set_native_window_id(call->videostream,lc->video_window_id);
1356                         if (lc->preview_window_id!=0)
1357                                 video_stream_set_native_preview_window_id (call->videostream,lc->preview_window_id);
1358                         video_stream_use_preview_video_window (call->videostream,lc->use_preview_window);
1359                         
1360                         if (vstream->dir==SalStreamSendOnly && lc->video_conf.capture ){
1361                                 cam=get_nowebcam_device();
1362                                 dir=VideoStreamSendOnly;
1363                         }else if (vstream->dir==SalStreamRecvOnly && lc->video_conf.display ){
1364                                 dir=VideoStreamRecvOnly;
1365                         }else if (vstream->dir==SalStreamSendRecv){
1366                                 if (lc->video_conf.display && lc->video_conf.capture)
1367                                         dir=VideoStreamSendRecv;
1368                                 else if (lc->video_conf.display)
1369                                         dir=VideoStreamRecvOnly;
1370                                 else
1371                                         dir=VideoStreamSendOnly;
1372                         }else{
1373                                 ms_warning("video stream is inactive.");
1374                                 /*either inactive or incompatible with local capabilities*/
1375                                 is_inactive=TRUE;
1376                         }
1377                         if (call->camera_active==FALSE || all_inputs_muted){
1378                                 cam=get_nowebcam_device();
1379                         }
1380                         if (!is_inactive){
1381                 call->log->video_enabled = TRUE;
1382                                 video_stream_set_direction (call->videostream, dir);
1383                                 ms_message("%s lc rotation:%d\n", __FUNCTION__, lc->device_rotation);
1384                                 video_stream_set_device_rotation(call->videostream, lc->device_rotation);
1385                                 video_stream_start(call->videostream,
1386                                         call->video_profile, rtp_addr, vstream->rtp_port,
1387                                         rtcp_addr, linphone_core_rtcp_enabled(lc) ? (vstream->rtcp_port) : 0,
1388                                         used_pt, lc->rtp_conf.audio_jitt_comp, cam);
1389                                 video_stream_set_rtcp_information(call->videostream, cname,LINPHONE_RTCP_SDES_TOOL);
1390                         }
1391                         
1392                         if (vstream->proto == SalProtoRtpSavp) {
1393                                 const SalStreamDescription *local_st_desc=sal_media_description_find_stream(call->localdesc,
1394                                                 SalProtoRtpSavp,SalVideo);
1395                                                 
1396                                 video_stream_enable_strp(
1397                                         call->videostream, 
1398                                         vstream->crypto[0].algo,
1399                                         local_st_desc->crypto[0].master_key, 
1400                                         vstream->crypto[0].master_key
1401                                         );
1402                                 call->videostream_encrypted=TRUE;
1403                         }else{
1404                                 call->videostream_encrypted=FALSE;
1405                         }
1406                 }else ms_warning("No video stream accepted.");
1407         }else{
1408                 ms_warning("No valid video stream defined.");
1409         }
1410 #endif
1411 }
1412
1413 void linphone_call_start_media_streams(LinphoneCall *call, bool_t all_inputs_muted, bool_t send_ringbacktone){
1414         LinphoneCore *lc=call->core;
1415
1416         call->current_params.audio_codec = NULL;
1417         call->current_params.video_codec = NULL;
1418
1419         LinphoneAddress *me=linphone_core_get_primary_contact_parsed(lc);
1420         char *cname;
1421         bool_t use_arc=linphone_core_adaptive_rate_control_enabled(lc);
1422 #ifdef VIDEO_ENABLED
1423         const SalStreamDescription *vstream=sal_media_description_find_stream(call->resultdesc,
1424                                                         SalProtoRtpAvp,SalVideo);
1425 #endif
1426
1427         if(call->audiostream == NULL)
1428         {
1429                 ms_fatal("start_media_stream() called without prior init !");
1430                 return;
1431         }
1432         cname=linphone_address_as_string_uri_only(me);
1433
1434 #if defined(VIDEO_ENABLED)
1435         if (vstream!=NULL && vstream->dir!=SalStreamInactive && vstream->payloads!=NULL){
1436                 /*when video is used, do not make adaptive rate control on audio, it is stupid.*/
1437                 use_arc=FALSE;
1438         }
1439 #endif
1440         linphone_call_start_audio_stream(call,cname,all_inputs_muted,send_ringbacktone,use_arc);
1441         call->current_params.has_video=FALSE;
1442         if (call->videostream!=NULL) {
1443                 linphone_call_start_video_stream(call,cname,all_inputs_muted);
1444         }
1445
1446         call->all_muted=all_inputs_muted;
1447         call->playing_ringbacktone=send_ringbacktone;
1448         call->up_bw=linphone_core_get_upload_bandwidth(lc);
1449
1450         if (call->params.media_encryption==LinphoneMediaEncryptionZRTP) {
1451                 OrtpZrtpParams params;
1452                 /*will be set later when zrtp is activated*/
1453                 call->current_params.media_encryption=LinphoneMediaEncryptionNone;
1454                 
1455                 params.zid_file=lc->zrtp_secrets_cache;
1456                 audio_stream_enable_zrtp(call->audiostream,&params);
1457         }else if (call->params.media_encryption==LinphoneMediaEncryptionSRTP){
1458                 call->current_params.media_encryption=linphone_call_are_all_streams_encrypted(call) ?
1459                         LinphoneMediaEncryptionSRTP : LinphoneMediaEncryptionNone;
1460         }
1461
1462         /*also reflect the change if the "wished" params, in order to avoid to propose SAVP or video again
1463          * further in the call, for example during pause,resume, conferencing reINVITEs*/
1464         linphone_call_fix_call_parameters(call);
1465         if ((call->ice_session != NULL) && (ice_session_state(call->ice_session) != IS_Completed)) {
1466                 ice_session_start_connectivity_checks(call->ice_session);
1467         }
1468
1469         goto end;
1470         end:
1471                 ms_free(cname);
1472                 linphone_address_destroy(me);
1473 }
1474
1475 void linphone_call_start_media_streams_for_ice_gathering(LinphoneCall *call){
1476         audio_stream_prepare_sound(call->audiostream, NULL, NULL);
1477 #ifdef VIDEO_ENABLED
1478         if (call->videostream) {
1479                 video_stream_prepare_video(call->videostream);
1480         }
1481 #endif
1482 }
1483
1484 void linphone_call_delete_ice_session(LinphoneCall *call){
1485         if (call->ice_session != NULL) {
1486                 ice_session_destroy(call->ice_session);
1487                 call->ice_session = NULL;
1488                 if (call->audiostream != NULL) call->audiostream->ice_check_list = NULL;
1489                 if (call->videostream != NULL) call->videostream->ice_check_list = NULL;
1490         }
1491 }
1492
1493 static void linphone_call_log_fill_stats(LinphoneCallLog *log, AudioStream *st){
1494         audio_stream_get_local_rtp_stats (st,&log->local_stats);
1495         log->quality=audio_stream_get_average_quality_rating(st);
1496 }
1497
1498 void linphone_call_stop_media_streams(LinphoneCall *call){
1499         if (call->audiostream!=NULL) {
1500                 call->audiostream->ice_check_list = NULL;
1501                 rtp_session_unregister_event_queue(call->audiostream->session,call->audiostream_app_evq);
1502                 ortp_ev_queue_flush(call->audiostream_app_evq);
1503                 ortp_ev_queue_destroy(call->audiostream_app_evq);
1504                 call->audiostream_app_evq=NULL;
1505
1506                 if (call->audiostream->ec){
1507                         const char *state_str=NULL;
1508                         ms_filter_call_method(call->audiostream->ec,MS_ECHO_CANCELLER_GET_STATE_STRING,&state_str);
1509                         if (state_str){
1510                                 ms_message("Writing echo canceler state, %i bytes",(int)strlen(state_str));
1511                                 lp_config_set_string(call->core->config,"sound","ec_state",state_str);
1512                         }
1513                 }
1514                 linphone_call_log_fill_stats (call->log,call->audiostream);
1515                 if (call->endpoint){
1516                         linphone_call_remove_from_conf(call);
1517                 }
1518                 audio_stream_stop(call->audiostream);
1519                 call->audiostream=NULL;
1520         }
1521
1522
1523 #ifdef VIDEO_ENABLED
1524         if (call->videostream!=NULL){
1525                 call->videostream->ice_check_list = NULL;
1526                 rtp_session_unregister_event_queue(call->videostream->session,call->videostream_app_evq);
1527                 ortp_ev_queue_flush(call->videostream_app_evq);
1528                 ortp_ev_queue_destroy(call->videostream_app_evq);
1529                 call->videostream_app_evq=NULL;
1530                 video_stream_stop(call->videostream);
1531                 call->videostream=NULL;
1532         }
1533 #endif
1534         ms_event_queue_skip(call->core->msevq);
1535         
1536         if (call->audio_profile){
1537                 rtp_profile_clear_all(call->audio_profile);
1538                 rtp_profile_destroy(call->audio_profile);
1539                 call->audio_profile=NULL;
1540         }
1541         if (call->video_profile){
1542                 rtp_profile_clear_all(call->video_profile);
1543                 rtp_profile_destroy(call->video_profile);
1544                 call->video_profile=NULL;
1545         }
1546 }
1547
1548
1549
1550 void linphone_call_enable_echo_cancellation(LinphoneCall *call, bool_t enable) {
1551         if (call!=NULL && call->audiostream!=NULL && call->audiostream->ec){
1552                 bool_t bypass_mode = !enable;
1553                 ms_filter_call_method(call->audiostream->ec,MS_ECHO_CANCELLER_SET_BYPASS_MODE,&bypass_mode);
1554         }
1555 }
1556 bool_t linphone_call_echo_cancellation_enabled(LinphoneCall *call) {
1557         if (call!=NULL && call->audiostream!=NULL && call->audiostream->ec){
1558                 bool_t val;
1559                 ms_filter_call_method(call->audiostream->ec,MS_ECHO_CANCELLER_GET_BYPASS_MODE,&val);
1560                 return !val;
1561         } else {
1562                 return linphone_core_echo_cancellation_enabled(call->core);
1563         }
1564 }
1565
1566 void linphone_call_enable_echo_limiter(LinphoneCall *call, bool_t val){
1567         if (call!=NULL && call->audiostream!=NULL ) {
1568                 if (val) {
1569                 const char *type=lp_config_get_string(call->core->config,"sound","el_type","mic");
1570                 if (strcasecmp(type,"mic")==0)
1571                         audio_stream_enable_echo_limiter(call->audiostream,ELControlMic);
1572                 else if (strcasecmp(type,"full")==0)
1573                         audio_stream_enable_echo_limiter(call->audiostream,ELControlFull);
1574                 } else {
1575                         audio_stream_enable_echo_limiter(call->audiostream,ELInactive);
1576                 }
1577         }
1578 }
1579
1580 bool_t linphone_call_echo_limiter_enabled(const LinphoneCall *call){
1581         if (call!=NULL && call->audiostream!=NULL ){
1582                 return call->audiostream->el_type !=ELInactive ;
1583         } else {
1584                 return linphone_core_echo_limiter_enabled(call->core);
1585         }
1586 }
1587
1588 /**
1589  * @addtogroup call_misc
1590  * @{
1591 **/
1592
1593 /**
1594  * Returns the measured sound volume played locally (received from remote).
1595  * It is expressed in dbm0.
1596 **/
1597 float linphone_call_get_play_volume(LinphoneCall *call){
1598         AudioStream *st=call->audiostream;
1599         if (st && st->volrecv){
1600                 float vol=0;
1601                 ms_filter_call_method(st->volrecv,MS_VOLUME_GET,&vol);
1602                 return vol;
1603
1604         }
1605         return LINPHONE_VOLUME_DB_LOWEST;
1606 }
1607
1608 /**
1609  * Returns the measured sound volume recorded locally (sent to remote).
1610  * It is expressed in dbm0.
1611 **/
1612 float linphone_call_get_record_volume(LinphoneCall *call){
1613         AudioStream *st=call->audiostream;
1614         if (st && st->volsend && !call->audio_muted && call->state==LinphoneCallStreamsRunning){
1615                 float vol=0;
1616                 ms_filter_call_method(st->volsend,MS_VOLUME_GET,&vol);
1617                 return vol;
1618
1619         }
1620         return LINPHONE_VOLUME_DB_LOWEST;
1621 }
1622
1623 /**
1624  * Obtain real-time quality rating of the call
1625  *
1626  * Based on local RTP statistics and RTCP feedback, a quality rating is computed and updated
1627  * during all the duration of the call. This function returns its value at the time of the function call.
1628  * It is expected that the rating is updated at least every 5 seconds or so.
1629  * The rating is a floating point number comprised between 0 and 5.
1630  *
1631  * 4-5 = good quality <br>
1632  * 3-4 = average quality <br>
1633  * 2-3 = poor quality <br>
1634  * 1-2 = very poor quality <br>
1635  * 0-1 = can't be worse, mostly unusable <br>
1636  *
1637  * @returns The function returns -1 if no quality measurement is available, for example if no
1638  * active audio stream exist. Otherwise it returns the quality rating.
1639 **/
1640 float linphone_call_get_current_quality(LinphoneCall *call){
1641         if (call->audiostream){
1642                 return audio_stream_get_quality_rating(call->audiostream);
1643         }
1644         return -1;
1645 }
1646
1647 /**
1648  * Returns call quality averaged over all the duration of the call.
1649  *
1650  * See linphone_call_get_current_quality() for more details about quality measurement.
1651 **/
1652 float linphone_call_get_average_quality(LinphoneCall *call){
1653         if (call->audiostream){
1654                 return audio_stream_get_average_quality_rating(call->audiostream);
1655         }
1656         return -1;
1657 }
1658
1659 /**
1660  * Access last known statistics for audio stream, for a given call.
1661 **/
1662 const LinphoneCallStats *linphone_call_get_audio_stats(const LinphoneCall *call) {
1663         return &call->stats[LINPHONE_CALL_STATS_AUDIO];
1664 }
1665
1666 /**
1667  * Access last known statistics for video stream, for a given call.
1668 **/
1669 const LinphoneCallStats *linphone_call_get_video_stats(const LinphoneCall *call) {
1670         return &call->stats[LINPHONE_CALL_STATS_VIDEO];
1671 }
1672
1673
1674 /**
1675  * @}
1676 **/
1677
1678 static void display_bandwidth(RtpSession *as, RtpSession *vs){
1679         ms_message("bandwidth usage: audio=[d=%.1f,u=%.1f] video=[d=%.1f,u=%.1f] kbit/sec",
1680         (as!=NULL) ? (rtp_session_compute_recv_bandwidth(as)*1e-3) : 0,
1681         (as!=NULL) ? (rtp_session_compute_send_bandwidth(as)*1e-3) : 0,
1682         (vs!=NULL) ? (rtp_session_compute_recv_bandwidth(vs)*1e-3) : 0,
1683         (vs!=NULL) ? (rtp_session_compute_send_bandwidth(vs)*1e-3) : 0);
1684 }
1685
1686 static void linphone_core_disconnected(LinphoneCore *lc, LinphoneCall *call){
1687         char temp[256];
1688         char *from=NULL;
1689         if(call)
1690                 from = linphone_call_get_remote_address_as_string(call);
1691         if (from)
1692         {
1693                 snprintf(temp,sizeof(temp),"Remote end %s seems to have disconnected, the call is going to be closed.",from);
1694                 free(from);
1695         }
1696         else
1697         {
1698                 snprintf(temp,sizeof(temp),"Remote end seems to have disconnected, the call is going to be closed.");
1699         }
1700         if (lc->vtable.display_warning!=NULL)
1701                 lc->vtable.display_warning(lc,temp);
1702         linphone_core_terminate_call(lc,call);
1703 }
1704
1705 static void handle_ice_events(LinphoneCall *call, OrtpEvent *ev){
1706         OrtpEventType evt=ortp_event_get_type(ev);
1707         OrtpEventData *evd=ortp_event_get_data(ev);
1708
1709         if (evt == ORTP_EVENT_ICE_SESSION_PROCESSING_FINISHED) {
1710                 switch (ice_session_state(call->ice_session)) {
1711                         case IS_Completed:
1712                                 if (ice_session_role(call->ice_session) == IR_Controlling) {
1713                                         ice_session_select_candidates(call->ice_session);
1714                                         linphone_core_update_call(call->core, call, &call->current_params);
1715                                 }
1716                                 break;
1717                         case IS_Failed:
1718                                 linphone_call_delete_ice_session(call);
1719                                 break;
1720                         default:
1721                                 break;
1722                 }
1723         } else if (evt == ORTP_EVENT_ICE_GATHERING_FINISHED) {
1724                 if (evd->info.ice_processing_successful==TRUE) {
1725                         ice_session_compute_candidates_foundations(call->ice_session);
1726                         ice_session_eliminate_redundant_candidates(call->ice_session);
1727                         ice_session_choose_default_candidates(call->ice_session);
1728                 } else {
1729                         linphone_call_delete_ice_session(call);
1730                 }
1731                 switch (call->state) {
1732                         case LinphoneCallStreamsRunning:
1733                                 linphone_core_start_update_call(call->core, call);
1734                                 break;
1735                         case LinphoneCallUpdatedByRemote:
1736                                 linphone_core_start_accept_call_update(call->core, call);
1737                                 break;
1738                         case LinphoneCallOutgoingInit:
1739                                 linphone_call_stop_media_streams(call);
1740                                 linphone_core_proceed_with_invite_if_ready(call->core, call, NULL);
1741                                 break;
1742                         default:
1743                                 linphone_call_stop_media_streams(call);
1744                                 linphone_core_notify_incoming_call(call->core, call);
1745                                 break;
1746                 }
1747         } else if (evt == ORTP_EVENT_ICE_LOSING_PAIRS_COMPLETED) {
1748                 linphone_core_start_accept_call_update(call->core, call);
1749         } else if (evt == ORTP_EVENT_ICE_RESTART_NEEDED) {
1750                 ice_session_restart(call->ice_session);
1751                 ice_session_set_role(call->ice_session, IR_Controlling);
1752                 linphone_core_update_call(call->core, call, &call->current_params);
1753         }
1754 }
1755
1756 void linphone_call_background_tasks(LinphoneCall *call, bool_t one_second_elapsed){
1757         LinphoneCore* lc = call->core;
1758         int disconnect_timeout = linphone_core_get_nortp_timeout(call->core);
1759         bool_t disconnected=FALSE;
1760
1761         if (call->state==LinphoneCallStreamsRunning && one_second_elapsed){
1762                 RtpSession *as=NULL,*vs=NULL;
1763                 float audio_load=0, video_load=0;
1764                 if (call->audiostream!=NULL){
1765                         as=call->audiostream->session;
1766                         if (call->audiostream->ticker)
1767                                 audio_load=ms_ticker_get_average_load(call->audiostream->ticker);
1768                 }
1769                 if (call->videostream!=NULL){
1770                         if (call->videostream->ticker)
1771                                 video_load=ms_ticker_get_average_load(call->videostream->ticker);
1772                         vs=call->videostream->session;
1773                 }
1774                 display_bandwidth(as,vs);
1775                 ms_message("Thread processing load: audio=%f\tvideo=%f",audio_load,video_load);
1776         }
1777 #ifdef VIDEO_ENABLED
1778         if (call->videostream!=NULL) {
1779                 OrtpEvent *ev;
1780
1781                 /* Ensure there is no dangling ICE check list. */
1782                 if (call->ice_session == NULL) call->videostream->ice_check_list = NULL;
1783
1784                 // Beware that the application queue should not depend on treatments fron the
1785                 // mediastreamer queue.
1786                 video_stream_iterate(call->videostream);
1787
1788                 while (call->videostream_app_evq && (NULL != (ev=ortp_ev_queue_get(call->videostream_app_evq)))){
1789                         OrtpEventType evt=ortp_event_get_type(ev);
1790                         OrtpEventData *evd=ortp_event_get_data(ev);
1791                         if (evt == ORTP_EVENT_ZRTP_ENCRYPTION_CHANGED){
1792                                 linphone_call_videostream_encryption_changed(call, evd->info.zrtp_stream_encrypted);
1793                         } else if (evt == ORTP_EVENT_RTCP_PACKET_RECEIVED) {
1794                                 call->stats[LINPHONE_CALL_STATS_VIDEO].round_trip_delay = rtp_session_get_round_trip_propagation(call->videostream->session);
1795                                 if(call->stats[LINPHONE_CALL_STATS_VIDEO].received_rtcp != NULL)
1796                                         freemsg(call->stats[LINPHONE_CALL_STATS_VIDEO].received_rtcp);
1797                                 call->stats[LINPHONE_CALL_STATS_VIDEO].received_rtcp = evd->packet;
1798                                 evd->packet = NULL;
1799                                 if (lc->vtable.call_stats_updated)
1800                                         lc->vtable.call_stats_updated(lc, call, &call->stats[LINPHONE_CALL_STATS_VIDEO]);
1801                         } else if (evt == ORTP_EVENT_RTCP_PACKET_EMITTED) {
1802                                 memcpy(&call->stats[LINPHONE_CALL_STATS_VIDEO].jitter_stats, rtp_session_get_jitter_stats(call->videostream->session), sizeof(jitter_stats_t));
1803                                 if(call->stats[LINPHONE_CALL_STATS_VIDEO].sent_rtcp != NULL)
1804                                         freemsg(call->stats[LINPHONE_CALL_STATS_VIDEO].sent_rtcp);
1805                                 call->stats[LINPHONE_CALL_STATS_VIDEO].sent_rtcp = evd->packet;
1806                                 evd->packet = NULL;
1807                                 if (lc->vtable.call_stats_updated)
1808                                         lc->vtable.call_stats_updated(lc, call, &call->stats[LINPHONE_CALL_STATS_VIDEO]);
1809                         } else if ((evt == ORTP_EVENT_ICE_SESSION_PROCESSING_FINISHED) || (evt == ORTP_EVENT_ICE_GATHERING_FINISHED)
1810                                 || (evt == ORTP_EVENT_ICE_LOSING_PAIRS_COMPLETED) || (evt == ORTP_EVENT_ICE_RESTART_NEEDED)) {
1811                                 handle_ice_events(call, ev);
1812                         }
1813                         ortp_event_destroy(ev);
1814                 }
1815         }
1816 #endif
1817         if (call->audiostream!=NULL) {
1818                 OrtpEvent *ev;
1819
1820                 /* Ensure there is no dangling ICE check list. */
1821                 if (call->ice_session == NULL) call->audiostream->ice_check_list = NULL;
1822
1823                 // Beware that the application queue should not depend on treatments fron the
1824                 // mediastreamer queue.
1825                 audio_stream_iterate(call->audiostream);
1826
1827                 while (call->audiostream_app_evq && (NULL != (ev=ortp_ev_queue_get(call->audiostream_app_evq)))){
1828                         OrtpEventType evt=ortp_event_get_type(ev);
1829                         OrtpEventData *evd=ortp_event_get_data(ev);
1830                         if (evt == ORTP_EVENT_ZRTP_ENCRYPTION_CHANGED){
1831                                 linphone_call_audiostream_encryption_changed(call, evd->info.zrtp_stream_encrypted);
1832                         } else if (evt == ORTP_EVENT_ZRTP_SAS_READY) {
1833                                 linphone_call_audiostream_auth_token_ready(call, evd->info.zrtp_sas.sas, evd->info.zrtp_sas.verified);
1834                         } else if (evt == ORTP_EVENT_RTCP_PACKET_RECEIVED) {
1835                                 call->stats[LINPHONE_CALL_STATS_AUDIO].round_trip_delay = rtp_session_get_round_trip_propagation(call->audiostream->session);
1836                                 if(call->stats[LINPHONE_CALL_STATS_AUDIO].received_rtcp != NULL)
1837                                         freemsg(call->stats[LINPHONE_CALL_STATS_AUDIO].received_rtcp);
1838                                 call->stats[LINPHONE_CALL_STATS_AUDIO].received_rtcp = evd->packet;
1839                                 evd->packet = NULL;
1840                                 if (lc->vtable.call_stats_updated)
1841                                         lc->vtable.call_stats_updated(lc, call, &call->stats[LINPHONE_CALL_STATS_AUDIO]);
1842                         } else if (evt == ORTP_EVENT_RTCP_PACKET_EMITTED) {
1843                                 memcpy(&call->stats[LINPHONE_CALL_STATS_AUDIO].jitter_stats, rtp_session_get_jitter_stats(call->audiostream->session), sizeof(jitter_stats_t));
1844                                 if(call->stats[LINPHONE_CALL_STATS_AUDIO].sent_rtcp != NULL)
1845                                         freemsg(call->stats[LINPHONE_CALL_STATS_AUDIO].sent_rtcp);
1846                                 call->stats[LINPHONE_CALL_STATS_AUDIO].sent_rtcp = evd->packet;
1847                                 evd->packet = NULL;
1848                                 if (lc->vtable.call_stats_updated)
1849                                         lc->vtable.call_stats_updated(lc, call, &call->stats[LINPHONE_CALL_STATS_AUDIO]);
1850                         } else if ((evt == ORTP_EVENT_ICE_SESSION_PROCESSING_FINISHED) || (evt == ORTP_EVENT_ICE_GATHERING_FINISHED)
1851                                 || (evt == ORTP_EVENT_ICE_LOSING_PAIRS_COMPLETED) || (evt == ORTP_EVENT_ICE_RESTART_NEEDED)) {
1852                                 handle_ice_events(call, ev);
1853                         }
1854                         ortp_event_destroy(ev);
1855                 }
1856         }
1857         if (call->state==LinphoneCallStreamsRunning && one_second_elapsed && call->audiostream!=NULL && disconnect_timeout>0 )
1858                 disconnected=!audio_stream_alive(call->audiostream,disconnect_timeout);
1859         if (disconnected)
1860                 linphone_core_disconnected(call->core,call);
1861 }
1862
1863 void linphone_call_log_completed(LinphoneCall *call){
1864         LinphoneCore *lc=call->core;
1865
1866         call->log->duration=time(NULL)-call->start_time;
1867
1868         if (call->log->status==LinphoneCallMissed){
1869                 char *info;
1870                 lc->missed_calls++;
1871                 info=ortp_strdup_printf(ngettext("You have missed %i call.",
1872                                          "You have missed %i calls.", lc->missed_calls),
1873                                 lc->missed_calls);
1874         if (lc->vtable.display_status!=NULL)
1875             lc->vtable.display_status(lc,info);
1876                 ms_free(info);
1877         }
1878         lc->call_logs=ms_list_prepend(lc->call_logs,(void *)call->log);
1879         if (ms_list_size(lc->call_logs)>lc->max_call_logs){
1880                 MSList *elem,*prevelem=NULL;
1881                 /*find the last element*/
1882                 for(elem=lc->call_logs;elem!=NULL;elem=elem->next){
1883                         prevelem=elem;
1884                 }
1885                 elem=prevelem;
1886                 linphone_call_log_destroy((LinphoneCallLog*)elem->data);
1887                 lc->call_logs=ms_list_remove_link(lc->call_logs,elem);
1888         }
1889         if (lc->vtable.call_log_updated!=NULL){
1890                 lc->vtable.call_log_updated(lc,call->log);
1891         }
1892         call_logs_write_to_config_file(lc);
1893 }
1894
1895 LinphoneCallState linphone_call_get_transfer_state(LinphoneCall *call) {
1896         return call->transfer_state;
1897 }
1898
1899 void linphone_call_set_transfer_state(LinphoneCall* call, LinphoneCallState state) {
1900         if (state != call->transfer_state) {
1901                 LinphoneCore* lc = call->core;
1902                 call->transfer_state = state;
1903                 if (lc->vtable.transfer_state_changed)
1904                         lc->vtable.transfer_state_changed(lc, call, state);
1905         }
1906 }
1907