3 Copyright (C) 2010 Simon MORLAT (simon.morlat@free.fr)
5 This program is free software; you can redistribute it and/or
6 modify it under the terms of the GNU General Public License
7 as published by the Free Software Foundation; either version 2
8 of the License, or (at your option) any later version.
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software
17 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
21 #include "sal_eXosip2.h"
24 SalOp * sal_find_out_subscribe(Sal *sal, int sid){
27 for(elem=sal->out_subscribes;elem!=NULL;elem=elem->next){
28 op=(SalOp*)elem->data;
29 if (op->sid==sid) return op;
34 static void sal_add_out_subscribe(Sal *sal, SalOp *op){
35 sal->out_subscribes=ms_list_append(sal->out_subscribes,op);
38 void sal_remove_out_subscribe(Sal *sal, SalOp *op){
39 sal->out_subscribes=ms_list_remove(sal->out_subscribes,op);
42 static SalOp * sal_find_in_subscribe(Sal *sal, int nid){
45 for(elem=sal->in_subscribes;elem!=NULL;elem=elem->next){
46 op=(SalOp*)elem->data;
47 if (op->nid==nid) return op;
52 static SalOp * sal_find_in_subscribe_by_call_id(Sal *sal, osip_call_id_t *call_id){
55 for(elem=sal->in_subscribes;elem!=NULL;elem=elem->next){
56 op=(SalOp*)elem->data;
57 if (op->call_id && osip_call_id_match(op->call_id,call_id)==0)
63 static void sal_add_in_subscribe(Sal *sal, SalOp *op, osip_message_t *subs){
64 osip_call_id_clone(subs->call_id,&op->call_id);
65 sal->in_subscribes=ms_list_append(sal->in_subscribes,op);
68 void sal_remove_in_subscribe(Sal *sal, SalOp *op){
69 sal->in_subscribes=ms_list_remove(sal->in_subscribes,op);
72 int sal_text_send(SalOp *op, const char *from, const char *to, const char *msg){
73 osip_message_t *sip=NULL;
77 /* we are not currently in communication with the destination */
79 sal_op_set_from(op,from);
84 eXosip_message_build_request(&sip,"MESSAGE",sal_op_get_to(op),
85 sal_op_get_from(op),sal_op_get_route(op));
87 osip_message_set_content_type(sip,"text/plain");
88 osip_message_set_body(sip,msg,strlen(msg));
89 sal_add_other(op->base.root,op,sip);
90 eXosip_message_send_request(sip);
92 ms_error("Could not build MESSAGE request !");
98 /* we are currently in communication with the destination */
100 //First we generate an INFO message to get the current call_id and a good cseq
101 eXosip_call_build_request(op->did,"MESSAGE",&sip);
104 ms_warning("could not get a build info to send MESSAGE, maybe no previous call established ?");
108 osip_message_set_content_type(sip,"text/plain");
109 osip_message_set_body(sip,msg,strlen(msg));
110 eXosip_call_send_request(op->did,sip);
116 /*presence Subscribe/notify*/
117 int sal_subscribe_presence(SalOp *op, const char *from, const char *to){
120 sal_op_set_from(op,from);
122 sal_op_set_to(op,to);
123 sal_exosip_fix_route(op);
125 eXosip_subscribe_build_initial_request(&msg,sal_op_get_to(op),sal_op_get_from(op),
126 sal_op_get_route(op),"presence",600);
127 if (op->base.contact){
128 _osip_list_set_empty(&msg->contacts,(void (*)(void*))osip_contact_free);
129 osip_message_set_contact(msg,op->base.contact);
131 op->sid=eXosip_subscribe_send_initial_request(msg);
134 osip_message_free(msg);
137 sal_add_out_subscribe(op->base.root,op);
141 int sal_unsubscribe(SalOp *op){
142 osip_message_t *msg=NULL;
144 ms_error("cannot unsubscribe, no dialog !");
148 eXosip_subscribe_build_refresh_request(op->did,&msg);
150 osip_message_set_expires(msg,"0");
151 eXosip_subscribe_send_refresh_request(op->did,msg);
152 }else ms_error("Could not build subscribe refresh request ! op->sid=%i, op->did=%i",
158 int sal_subscribe_accept(SalOp *op){
161 eXosip_insubscription_build_answer(op->tid,202,&msg);
162 if (op->base.contact){
163 _osip_list_set_empty(&msg->contacts,(void (*)(void*))osip_contact_free);
164 osip_message_set_contact(msg,op->base.contact);
166 eXosip_insubscription_send_answer(op->tid,202,msg);
171 int sal_subscribe_decline(SalOp *op){
173 eXosip_insubscription_send_answer(op->tid,401,NULL);
178 static void add_presence_body(osip_message_t *notify, SalPresenceStatus online_status)
186 osip_from_t *from=NULL;
187 from=osip_message_get_from(notify);
188 osip_uri_to_str(from->url,&contact_info);
192 if (online_status==SalPresenceOnline)
194 sprintf(buf, "<?xml version=\"1.0\"?>\n\
195 <!DOCTYPE presence\n\
196 PUBLIC \"-//IETF//DTD RFCxxxx XPIDF 1.0//EN\" \"xpidf.dtd\">\n\
198 <presentity uri=\"%s;method=SUBSCRIBE\" />\n\
200 <address uri=\"%s;user=ip\" priority=\"0.800000\">\n\
201 <status status=\"open\" />\n\
202 <msnsubstatus substatus=\"online\" />\n\
205 </presence>", contact_info, atom_id, contact_info);
208 else if (online_status==SalPresenceBusy)
210 sprintf(buf, "<?xml version=\"1.0\"?>\n\
211 <!DOCTYPE presence\n\
212 PUBLIC \"-//IETF//DTD RFCxxxx XPIDF 1.0//EN\" \"xpidf.dtd\">\n\
214 <presentity uri=\"%s;method=SUBSCRIBE\" />\n\
216 <address uri=\"%s;user=ip\" priority=\"0.800000\">\n\
217 <status status=\"inuse\" />\n\
218 <msnsubstatus substatus=\"busy\" />\n\
221 </presence>", contact_info, atom_id, contact_info);
224 else if (online_status==SalPresenceBerightback)
226 sprintf(buf, "<?xml version=\"1.0\"?>\n\
227 <!DOCTYPE presence\n\
228 PUBLIC \"-//IETF//DTD RFCxxxx XPIDF 1.0//EN\" \"xpidf.dtd\">\n\
230 <presentity uri=\"%s;method=SUBSCRIBE\" />\n\
232 <address uri=\"%s;user=ip\" priority=\"0.800000\">\n\
233 <status status=\"inactive\" />\n\
234 <msnsubstatus substatus=\"berightback\" />\n\
237 </presence>", contact_info, atom_id, contact_info);
240 else if (online_status==SalPresenceAway)
242 sprintf(buf, "<?xml version=\"1.0\"?>\n\
243 <!DOCTYPE presence\n\
244 PUBLIC \"-//IETF//DTD RFCxxxx XPIDF 1.0//EN\" \"xpidf.dtd\">\n\
246 <presentity uri=\"%s;method=SUBSCRIBE\" />\n\
248 <address uri=\"%s;user=ip\" priority=\"0.800000\">\n\
249 <status status=\"inactive\" />\n\
250 <msnsubstatus substatus=\"away\" />\n\
253 </presence>", contact_info, atom_id, contact_info);
256 else if (online_status==SalPresenceOnthephone)
258 sprintf(buf, "<?xml version=\"1.0\"?>\n\
259 <!DOCTYPE presence\n\
260 PUBLIC \"-//IETF//DTD RFCxxxx XPIDF 1.0//EN\" \"xpidf.dtd\">\n\
262 <presentity uri=\"%s;method=SUBSCRIBE\" />\n\
264 <address uri=\"%s;user=ip\" priority=\"0.800000\">\n\
265 <status status=\"inuse\" />\n\
266 <msnsubstatus substatus=\"onthephone\" />\n\
269 </presence>", contact_info, atom_id, contact_info);
272 else if (online_status==SalPresenceOuttolunch)
274 sprintf(buf, "<?xml version=\"1.0\"?>\n\
275 <!DOCTYPE presence\n\
276 PUBLIC \"-//IETF//DTD RFCxxxx XPIDF 1.0//EN\" \"xpidf.dtd\">\n\
278 <presentity uri=\"%s;method=SUBSCRIBE\" />\n\
280 <address uri=\"%s;user=ip\" priority=\"0.800000\">\n\
281 <status status=\"inactive\" />\n\
282 <msnsubstatus substatus=\"outtolunch\" />\n\
285 </presence>", contact_info, atom_id, contact_info);
290 sprintf(buf, "<?xml version=\"1.0\"?>\n\
291 <!DOCTYPE presence\n\
292 PUBLIC \"-//IETF//DTD RFCxxxx XPIDF 1.0//EN\" \"xpidf.dtd\">\n\
294 <presentity uri=\"%s;method=SUBSCRIBE\" />\n\
296 <address uri=\"%s;user=ip\" priority=\"0.800000\">\n\
297 <status status=\"inactive\" />\n\
298 <msnsubstatus substatus=\"away\" />\n\
301 </presence>", contact_info, atom_id, contact_info);
304 osip_message_set_body(notify, buf, strlen(buf));
305 osip_message_set_content_type(notify, "application/xpidf+xml");
308 if (online_status==SalPresenceOnline)
310 sprintf(buf, "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\
311 <presence xmlns=\"urn:ietf:params:xml:ns:pidf\"\n\
313 <tuple id=\"sg89ae\">\n\
315 <basic>open</basic>\n\
317 <contact priority=\"0.8\">%s</contact>\n\
318 <note>online</note>\n\
321 contact_info, contact_info);
323 else if (online_status==SalPresenceBusy)
325 sprintf(buf, "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\
326 <presence xmlns=\"urn:ietf:params:xml:ns:pidf\"\n\
327 xmlns:es=\"urn:ietf:params:xml:ns:pidf:status:rpid-status\"\n\
329 <tuple id=\"sg89ae\">\n\
331 <basic>open</basic>\n\
333 <es:activity>busy</es:activity>\n\
336 <contact priority=\"0.8\">%s</contact>\n\
340 contact_info, contact_info);
342 else if (online_status==SalPresenceBerightback)
344 sprintf(buf, "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\
345 <presence xmlns=\"urn:ietf:params:xml:ns:pidf\"\n\
346 xmlns:es=\"urn:ietf:params:xml:ns:pidf:status:rpid-status\"\n\
348 <tuple id=\"sg89ae\">\n\
350 <basic>open</basic>\n\
352 <es:activity>in-transit</es:activity>\n\
355 <contact priority=\"0.8\">%s</contact>\n\
356 <note>be right back</note>\n\
359 contact_info, contact_info);
361 else if (online_status==SalPresenceAway)
363 sprintf(buf, "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\
364 <presence xmlns=\"urn:ietf:params:xml:ns:pidf\"\n\
365 xmlns:es=\"urn:ietf:params:xml:ns:pidf:status:rpid-status\"\n\
367 <tuple id=\"sg89ae\">\n\
369 <basic>open</basic>\n\
371 <es:activity>away</es:activity>\n\
374 <contact priority=\"0.8\">%s</contact>\n\
378 contact_info, contact_info);
380 else if (online_status==SalPresenceOnthephone)
382 sprintf(buf, "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\
383 <presence xmlns=\"urn:ietf:params:xml:ns:pidf\"\n\
384 xmlns:es=\"urn:ietf:params:xml:ns:pidf:status:rpid-status\"\n\
386 <tuple id=\"sg89ae\">\n\
388 <basic>open</basic>\n\
390 <es:activity>on-the-phone</es:activity>\n\
393 <contact priority=\"0.8\">%s</contact>\n\
394 <note>on the phone</note>\n\
397 contact_info, contact_info);
399 else if (online_status==SalPresenceOuttolunch)
401 sprintf(buf, "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\
402 <presence xmlns=\"urn:ietf:params:xml:ns:pidf\"\n\
403 xmlns:es=\"urn:ietf:params:xml:ns:pidf:status:rpid-status\"\n\
405 <tuple id=\"sg89ae\">\n\
407 <basic>open</basic>\n\
409 <es:activity>meal</es:activity>\n\
412 <contact priority=\"0.8\">%s</contact>\n\
413 <note>out to lunch</note>\n\
416 contact_info, contact_info);
421 sprintf(buf, "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\
422 <presence xmlns=\"urn:ietf:params:xml:ns:pidf\"\n\
423 xmlns:es=\"urn:ietf:params:xml:ns:pidf:status:rpid-status\"\n\
426 "<tuple id=\"sg89ae\">\n\
428 <basic>closed</basic>\n\
430 <es:activity>permanent-absence</es:activity>\n\
436 osip_message_set_body(notify, buf, strlen(buf));
437 osip_message_set_content_type(notify, "application/pidf+xml");
440 osip_free(contact_info);
444 int sal_notify_presence(SalOp *op, SalPresenceStatus status, const char *status_message){
446 eXosip_ss_t ss=EXOSIP_SUBCRSTATE_ACTIVE;
448 ms_warning("Cannot notify, subscription was closed.");
453 eXosip_insubscription_build_notify(op->did,ss,DEACTIVATED,&msg);
455 const char *identity=sal_op_get_contact(op);
456 if (identity==NULL) identity=sal_op_get_to(op);
457 osip_message_set_contact(msg,identity);
458 add_presence_body(msg,status);
459 eXosip_insubscription_send_request(op->did,msg);
460 }else ms_error("could not create notify for incoming subscription.");
465 int sal_notify_close(SalOp *op){
466 osip_message_t *msg=NULL;
468 eXosip_insubscription_build_notify(op->did,EXOSIP_SUBCRSTATE_TERMINATED,DEACTIVATED,&msg);
470 const char *identity=sal_op_get_contact(op);
471 if (identity==NULL) identity=sal_op_get_to(op);
472 osip_message_set_contact(msg,identity);
473 add_presence_body(msg,SalPresenceOffline);
474 eXosip_insubscription_send_request(op->did,msg);
475 }else ms_error("sal_notify_close(): could not create notify for incoming subscription"
476 " did=%i, nid=%i",op->did,op->nid);
481 int sal_publish(SalOp *op, const char *from, const char *to, SalPresenceStatus presence_mode){
486 if (presence_mode==SalPresenceOnline)
488 snprintf(buf, sizeof(buf), "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\
489 <presence xmlns=\"urn:ietf:params:xml:ns:pidf\"\n\
491 <tuple id=\"sg89ae\">\n\
493 <basic>open</basic>\n\
495 <contact priority=\"0.8\">%s</contact>\n\
496 <note>online</note>\n\
501 else if (presence_mode==SalPresenceBusy
502 ||presence_mode==SalPresenceDonotdisturb)
504 snprintf(buf, sizeof(buf), "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\
505 <presence xmlns=\"urn:ietf:params:xml:ns:pidf\"\n\
506 xmlns:es=\"urn:ietf:params:xml:ns:pidf:status:rpid-status\"\n\
508 <tuple id=\"sg89ae\">\n\
510 <basic>open</basic>\n\
512 <es:activity>busy</es:activity>\n\
515 <contact priority=\"0.8\">%s</contact>\n\
521 else if (presence_mode==SalPresenceBerightback)
523 snprintf(buf, sizeof(buf), "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\
524 <presence xmlns=\"urn:ietf:params:xml:ns:pidf\"\n\
525 xmlns:es=\"urn:ietf:params:xml:ns:pidf:status:rpid-status\"\n\
527 <tuple id=\"sg89ae\">\n\
529 <basic>open</basic>\n\
531 <es:activity>in-transit</es:activity>\n\
534 <contact priority=\"0.8\">%s</contact>\n\
535 <note>be right back</note>\n\
540 else if (presence_mode==SalPresenceAway
541 ||presence_mode==SalPresenceMoved)
543 snprintf(buf, sizeof(buf), "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\
544 <presence xmlns=\"urn:ietf:params:xml:ns:pidf\"\n\
545 xmlns:es=\"urn:ietf:params:xml:ns:pidf:status:rpid-status\"\n\
547 <tuple id=\"sg89ae\">\n\
549 <basic>open</basic>\n\
551 <es:activity>away</es:activity>\n\
554 <contact priority=\"0.8\">%s</contact>\n\
560 else if (presence_mode==SalPresenceOnthephone)
562 snprintf(buf, sizeof(buf), "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\
563 <presence xmlns=\"urn:ietf:params:xml:ns:pidf\"\n\
564 xmlns:es=\"urn:ietf:params:xml:ns:pidf:status:rpid-status\"\n\
566 <tuple id=\"sg89ae\">\n\
568 <basic>open</basic>\n\
570 <es:activity>on-the-phone</es:activity>\n\
573 <contact priority=\"0.8\">%s</contact>\n\
574 <note>on the phone</note>\n\
579 else if (presence_mode==SalPresenceOuttolunch)
581 snprintf(buf, sizeof(buf), "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\
582 <presence xmlns=\"urn:ietf:params:xml:ns:pidf\"\n\
583 xmlns:es=\"urn:ietf:params:xml:ns:pidf:status:rpid-status\"\n\
585 <tuple id=\"sg89ae\">\n\
587 <basic>open</basic>\n\
589 <es:activity>meal</es:activity>\n\
592 <contact priority=\"0.8\">%s</contact>\n\
593 <note>out to lunch</note>\n\
600 snprintf(buf, sizeof(buf), "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n\
601 <presence xmlns=\"urn:ietf:params:xml:ns:pidf\"\n\
602 xmlns:es=\"urn:ietf:params:xml:ns:pidf:status:rpid-status\"\n\
605 "<tuple id=\"sg89ae\">\n\
607 <basic>closed</basic>\n\
609 <es:activity>permanent-absence</e:activity>\n\
616 i = eXosip_build_publish(&pub,from, to, NULL, "presence", "1800", "application/pidf+xml", buf);
618 ms_warning("Failed to build publish request.");
623 i = eXosip_publish(pub, to); /* should update the sip-if-match parameter
624 from sip-etag from last 200ok of PUBLISH */
627 ms_message("Failed to send publish request.");
633 static void _sal_exosip_subscription_recv(Sal *sal, eXosip_event_t *ev){
634 SalOp *op=sal_op_new(sal);
639 osip_from_to_str(ev->request->from,&tmp);
640 sal_op_set_from(op,tmp);
642 osip_from_to_str(ev->request->to,&tmp);
643 sal_op_set_to(op,tmp);
645 sal_add_in_subscribe(sal,op,ev->request);
646 sal->callbacks.subscribe_received(op,sal_op_get_from(op));
649 void sal_exosip_subscription_recv(Sal *sal, eXosip_event_t *ev){
650 /*workaround a bug in eXosip: incoming SUBSCRIBES within dialog with expires: 0 are
651 recognized as new incoming subscribes*/
652 SalOp *op=sal_find_in_subscribe_by_call_id(sal,ev->request->call_id);
655 osip_message_header_get_byname(ev->request,"expires",0,&h);
656 if (h && h->hvalue && atoi(h->hvalue)==0){
657 ms_warning("This susbscribe is not a new one but terminates an old one.");
660 sal_exosip_subscription_closed(sal,ev);
662 osip_message_t *msg=NULL;
663 ms_warning("Probably a refresh subscribe");
665 eXosip_insubscription_build_answer(ev->tid,202,&msg);
666 eXosip_insubscription_send_answer(ev->tid,202,msg);
669 }else _sal_exosip_subscription_recv(sal,ev);
672 void sal_exosip_notify_recv(Sal *sal, eXosip_event_t *ev){
673 SalOp *op=sal_find_out_subscribe(sal,ev->sid);
675 osip_from_t *from=NULL;
676 osip_body_t *body=NULL;
677 SalPresenceStatus estatus=SalPresenceOffline;
679 ms_message("Receiving notify with sid=%i,nid=%i",ev->sid,ev->nid);
682 ms_error("No operation related to this notify !");
685 if (ev->request==NULL) return;
687 from=ev->request->from;
688 osip_message_get_body(ev->request,0,&body);
690 ms_error("No body in NOTIFY");
693 osip_from_to_str(from,&tmp);
694 if (strstr(body->body,"pending")!=NULL){
695 estatus=SalPresenceOffline;
696 }else if (strstr(body->body,"busy")!=NULL){
697 estatus=SalPresenceBusy;
698 }else if (strstr(body->body,"berightback")!=NULL
699 || strstr(body->body,"in-transit")!=NULL ){
700 estatus=SalPresenceBerightback;
701 }else if (strstr(body->body,"away")!=NULL){
702 estatus=SalPresenceAway;
703 }else if (strstr(body->body,"onthephone")!=NULL
704 || strstr(body->body,"on-the-phone")!=NULL){
705 estatus=SalPresenceOnthephone;
706 }else if (strstr(body->body,"outtolunch")!=NULL
707 || strstr(body->body,"meal")!=NULL){
708 estatus=SalPresenceOuttolunch;
709 }else if (strstr(body->body,"closed")!=NULL){
710 estatus=SalPresenceOffline;
711 }else if ((strstr(body->body,"online")!=NULL) || (strstr(body->body,"open")!=NULL)) {
712 estatus=SalPresenceOnline;
714 estatus=SalPresenceOffline;
716 ms_message("We are notified that %s has online status %i",tmp,estatus);
717 if (ev->ss_status==EXOSIP_SUBCRSTATE_TERMINATED) {
718 sal_remove_out_subscribe(sal,op);
721 ms_message("And outgoing subscription terminated by remote.");
723 sal->callbacks.notify_presence(op,op->sid!=-1 ? SalSubscribeActive : SalSubscribeTerminated, estatus,NULL);
727 void sal_exosip_subscription_answered(Sal *sal,eXosip_event_t *ev){
728 SalOp *op=sal_find_out_subscribe(sal,ev->sid);
730 ms_error("Subscription answered but no associated op !");
736 void sal_exosip_in_subscription_closed(Sal *sal, eXosip_event_t *ev){
737 SalOp *op=sal_find_in_subscribe(sal,ev->nid);
740 ms_error("Incoming subscription closed but no associated op !");
745 sal_remove_in_subscribe(sal,op);
749 osip_from_to_str(ev->request->from,&tmp);
750 sal->callbacks.subscribe_closed(op,tmp);
755 void sal_exosip_subscription_closed(Sal *sal,eXosip_event_t *ev){
756 SalOp *op=sal_find_out_subscribe(sal,ev->sid);
758 ms_error("Subscription closed but no associated op !");
761 sal_remove_out_subscribe(sal,op);
764 sal->callbacks.notify_presence(op,SalSubscribeTerminated, SalPresenceOffline,NULL);