92e8b4cd7ffb882779f8069411fc0dd5d00d29c1
[framework/connectivity/connman.git] / src / session.c
1 /*
2  *
3  *  Connection Manager
4  *
5  *  Copyright (C) 2007-2010  Intel Corporation. All rights reserved.
6  *  Copyright (C) 2011  BWM CarIT GmbH. All rights reserved.
7  *
8  *  This program is free software; you can redistribute it and/or modify
9  *  it under the terms of the GNU General Public License version 2 as
10  *  published by the Free Software Foundation.
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., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
20  *
21  */
22
23 #ifdef HAVE_CONFIG_H
24 #include <config.h>
25 #endif
26
27 #include <gdbus.h>
28
29 #include "connman.h"
30
31 static DBusConnection *connection;
32 static GHashTable *session_hash;
33 static connman_bool_t sessionmode;
34
35 enum connman_session_roaming_policy {
36         CONNMAN_SESSION_ROAMING_POLICY_UNKNOWN          = 0,
37         CONNMAN_SESSION_ROAMING_POLICY_DEFAULT          = 1,
38         CONNMAN_SESSION_ROAMING_POLICY_ALWAYS           = 2,
39         CONNMAN_SESSION_ROAMING_POLICY_FORBIDDEN        = 3,
40         CONNMAN_SESSION_ROAMING_POLICY_NATIONAL         = 4,
41         CONNMAN_SESSION_ROAMING_POLICY_INTERNATIONAL    = 5,
42 };
43
44 struct session_info {
45         char *bearer;
46         const char *name;
47         char *ifname;
48         connman_bool_t connect;
49         connman_bool_t online;
50         connman_bool_t priority;
51         GSList *allowed_bearers;
52         connman_bool_t avoid_handover;
53         connman_bool_t stay_connected;
54         unsigned int periodic_connect;
55         unsigned int idle_timeout;
56         connman_bool_t ecall;
57         enum connman_session_roaming_policy roaming_policy;
58         unsigned int marker;
59
60         struct connman_service *service;
61 };
62
63 struct connman_session {
64         char *owner;
65         char *session_path;
66         char *notify_path;
67         guint notify_watch;
68
69         connman_bool_t append_all;
70         connman_bool_t info_dirty;
71         struct session_info info;
72         struct session_info info_last;
73
74         GSequence *service_list;
75 };
76
77 struct bearer_info {
78         char *name;
79         connman_bool_t match_all;
80         enum connman_service_type service_type;
81 };
82
83 static const char *roamingpolicy2string(enum connman_session_roaming_policy policy)
84 {
85         switch (policy) {
86         case CONNMAN_SESSION_ROAMING_POLICY_UNKNOWN:
87                 break;
88         case CONNMAN_SESSION_ROAMING_POLICY_DEFAULT:
89                 return "default";
90         case CONNMAN_SESSION_ROAMING_POLICY_ALWAYS:
91                 return "always";
92         case CONNMAN_SESSION_ROAMING_POLICY_FORBIDDEN:
93                 return "forbidden";
94         case CONNMAN_SESSION_ROAMING_POLICY_NATIONAL:
95                 return "national";
96         case CONNMAN_SESSION_ROAMING_POLICY_INTERNATIONAL:
97                 return "international";
98         }
99
100         return NULL;
101 }
102
103 static enum connman_session_roaming_policy string2roamingpolicy(const char *policy)
104 {
105         if (g_strcmp0(policy, "default") == 0)
106                 return CONNMAN_SESSION_ROAMING_POLICY_DEFAULT;
107         else if (g_strcmp0(policy, "always") == 0)
108                 return CONNMAN_SESSION_ROAMING_POLICY_ALWAYS;
109         else if (g_strcmp0(policy, "forbidden") == 0)
110                 return CONNMAN_SESSION_ROAMING_POLICY_FORBIDDEN;
111         else if (g_strcmp0(policy, "national") == 0)
112                 return CONNMAN_SESSION_ROAMING_POLICY_NATIONAL;
113         else if (g_strcmp0(policy, "international") == 0)
114                 return CONNMAN_SESSION_ROAMING_POLICY_INTERNATIONAL;
115         else
116                 return CONNMAN_SESSION_ROAMING_POLICY_UNKNOWN;
117 }
118
119 static enum connman_service_type bearer2service(const char *bearer)
120 {
121         if (bearer == NULL)
122                 return CONNMAN_SERVICE_TYPE_UNKNOWN;
123
124         if (g_strcmp0(bearer, "ethernet") == 0)
125                 return CONNMAN_SERVICE_TYPE_ETHERNET;
126         else if (g_strcmp0(bearer, "wifi") == 0)
127                 return CONNMAN_SERVICE_TYPE_WIFI;
128         else if (g_strcmp0(bearer, "wimax") == 0)
129                 return CONNMAN_SERVICE_TYPE_WIMAX;
130         else if (g_strcmp0(bearer, "bluetooth") == 0)
131                 return CONNMAN_SERVICE_TYPE_BLUETOOTH;
132         else if (g_strcmp0(bearer, "3g") == 0)
133                 return CONNMAN_SERVICE_TYPE_CELLULAR;
134         else
135                 return CONNMAN_SERVICE_TYPE_UNKNOWN;
136 }
137
138 static char *service2bearer(enum connman_service_type type)
139 {
140         switch (type) {
141         case CONNMAN_SERVICE_TYPE_ETHERNET:
142                 return "ethernet";
143         case CONNMAN_SERVICE_TYPE_WIFI:
144                 return "wifi";
145         case CONNMAN_SERVICE_TYPE_WIMAX:
146                 return "wimax";
147         case CONNMAN_SERVICE_TYPE_BLUETOOTH:
148                 return "bluetooth";
149         case CONNMAN_SERVICE_TYPE_CELLULAR:
150                 return "3g";
151         case CONNMAN_SERVICE_TYPE_UNKNOWN:
152         case CONNMAN_SERVICE_TYPE_SYSTEM:
153         case CONNMAN_SERVICE_TYPE_GPS:
154         case CONNMAN_SERVICE_TYPE_VPN:
155         case CONNMAN_SERVICE_TYPE_GADGET:
156                 return "";
157         }
158
159         return "";
160 }
161
162 static char *session2bearer(struct connman_session *session)
163 {
164         struct session_info *info = &session->info;
165         GSList *list;
166         struct bearer_info *bearer_info;
167         enum connman_service_type type;
168
169         if (info->service == NULL)
170                 return "";
171
172         type = connman_service_get_type(info->service);
173
174         for (list = info->allowed_bearers;
175                         list != NULL; list = list->next) {
176                 bearer_info = list->data;
177
178                 if (bearer_info->match_all)
179                         return service2bearer(type);
180
181                 if (bearer_info->service_type == CONNMAN_SERVICE_TYPE_UNKNOWN)
182                         return bearer_info->name;
183
184                 if (bearer_info->service_type == type)
185                         return service2bearer(type);
186         }
187
188         return "";
189
190 }
191
192 static void cleanup_bearer_info(gpointer data, gpointer user_data)
193 {
194         struct bearer_info *info = data;
195
196         g_free(info->name);
197         g_free(info);
198 }
199
200 static GSList *session_parse_allowed_bearers(DBusMessageIter *iter)
201 {
202         struct bearer_info *info;
203         DBusMessageIter array;
204         GSList *list = NULL;
205
206         dbus_message_iter_recurse(iter, &array);
207
208         while (dbus_message_iter_get_arg_type(&array) == DBUS_TYPE_STRING) {
209                 char *bearer = NULL;
210
211                 dbus_message_iter_get_basic(&array, &bearer);
212
213                 info = g_try_new0(struct bearer_info, 1);
214                 if (info == NULL) {
215                         g_slist_foreach(list, cleanup_bearer_info, NULL);
216                         g_slist_free(list);
217
218                         return NULL;
219                 }
220
221                 info->name = g_strdup(bearer);
222                 info->service_type = bearer2service(info->name);
223
224                 if (info->service_type == CONNMAN_SERVICE_TYPE_UNKNOWN &&
225                                 g_strcmp0(info->name, "*") == 0) {
226                         info->match_all = TRUE;
227                 } else {
228                         info->match_all = FALSE;
229                 }
230
231                 list = g_slist_append(list, info);
232
233                 dbus_message_iter_next(&array);
234         }
235
236         return list;
237 }
238
239 static GSList *session_allowed_bearers_any(void)
240 {
241         struct bearer_info *info;
242         GSList *list = NULL;
243
244         info = g_try_new0(struct bearer_info, 1);
245         if (info == NULL) {
246                 g_slist_free(list);
247
248                 return NULL;
249         }
250
251         info->name = g_strdup("");
252         info->match_all = TRUE;
253         info->service_type = CONNMAN_SERVICE_TYPE_UNKNOWN;
254
255         list = g_slist_append(list, info);
256
257         return list;
258 }
259
260 static void append_allowed_bearers(DBusMessageIter *iter, void *user_data)
261 {
262         struct session_info *info = user_data;
263         GSList *list;
264
265         for (list = info->allowed_bearers;
266                         list != NULL; list = list->next) {
267                 struct bearer_info *info = list->data;
268
269                 dbus_message_iter_append_basic(iter, DBUS_TYPE_STRING,
270                                                 &info->name);
271         }
272 }
273
274 static void append_ipconfig_ipv4(DBusMessageIter *iter, void *user_data)
275 {
276         struct connman_service *service = user_data;
277         struct connman_ipconfig *ipconfig_ipv4;
278
279         if (service == NULL)
280                 return;
281
282         ipconfig_ipv4 = __connman_service_get_ip4config(service);
283         if (ipconfig_ipv4 == NULL)
284                 return;
285
286         __connman_ipconfig_append_ipv4(ipconfig_ipv4, iter);
287 }
288
289 static void append_ipconfig_ipv6(DBusMessageIter *iter, void *user_data)
290 {
291         struct connman_service *service = user_data;
292         struct connman_ipconfig *ipconfig_ipv4, *ipconfig_ipv6;
293
294         if (service == NULL)
295                 return;
296
297         ipconfig_ipv4 = __connman_service_get_ip4config(service);
298         ipconfig_ipv6 = __connman_service_get_ip6config(service);
299         if (ipconfig_ipv6 == NULL)
300                 return;
301
302         __connman_ipconfig_append_ipv6(ipconfig_ipv6, iter, ipconfig_ipv4);
303 }
304
305 static void append_notify(DBusMessageIter *dict,
306                                         struct connman_session *session)
307 {
308         struct session_info *info = &session->info;
309         struct session_info *info_last = &session->info_last;
310         const char *policy;
311
312         if (session->append_all == TRUE ||
313                         info->bearer != info_last->bearer) {
314                 connman_dbus_dict_append_basic(dict, "Bearer",
315                                                 DBUS_TYPE_STRING,
316                                                 &info->bearer);
317                 info_last->bearer = info->bearer;
318         }
319
320         if (session->append_all == TRUE ||
321                         info->online != info_last->online) {
322                 connman_dbus_dict_append_basic(dict, "Online",
323                                                 DBUS_TYPE_BOOLEAN,
324                                                 &info->online);
325                 info_last->online = info->online;
326         }
327
328         if (session->append_all == TRUE ||
329                         info->name != info_last->name) {
330                 connman_dbus_dict_append_basic(dict, "Name",
331                                                 DBUS_TYPE_STRING,
332                                                 &info->name);
333                 info_last->name = info->name;
334         }
335
336         if (session->append_all == TRUE ||
337                         info->service != info_last->service) {
338                 connman_dbus_dict_append_dict(dict, "IPv4",
339                                                 append_ipconfig_ipv4,
340                                                 info->service);
341
342                 connman_dbus_dict_append_dict(dict, "IPv6",
343                                                 append_ipconfig_ipv6,
344                                                 info->service);
345
346                 connman_dbus_dict_append_basic(dict, "Interface",
347                                                 DBUS_TYPE_STRING,
348                                                 &info->ifname);
349
350                 info_last->service = info->service;
351         }
352
353
354         if (session->append_all == TRUE ||
355                         info->priority != info_last->priority) {
356                 connman_dbus_dict_append_basic(dict, "Priority",
357                                                 DBUS_TYPE_BOOLEAN,
358                                                 &info->priority);
359                 info_last->priority = info->priority;
360         }
361
362         if (session->append_all == TRUE ||
363                         info->allowed_bearers != info_last->allowed_bearers) {
364                 connman_dbus_dict_append_array(dict, "AllowedBearers",
365                                                 DBUS_TYPE_STRING,
366                                                 append_allowed_bearers,
367                                                 info);
368                 info_last->allowed_bearers = info->allowed_bearers;
369         }
370
371         if (session->append_all == TRUE ||
372                         info->avoid_handover != info_last->avoid_handover) {
373                 connman_dbus_dict_append_basic(dict, "AvoidHandover",
374                                                 DBUS_TYPE_BOOLEAN,
375                                                 &info->avoid_handover);
376                 info_last->avoid_handover = info->avoid_handover;
377         }
378
379         if (session->append_all == TRUE ||
380                         info->stay_connected != info_last->stay_connected) {
381                 connman_dbus_dict_append_basic(dict, "StayConnected",
382                                                 DBUS_TYPE_BOOLEAN,
383                                                 &info->stay_connected);
384                 info_last->stay_connected = info->stay_connected;
385         }
386
387         if (session->append_all == TRUE ||
388                         info->periodic_connect != info_last->periodic_connect) {
389                 connman_dbus_dict_append_basic(dict, "PeriodicConnect",
390                                                 DBUS_TYPE_UINT32,
391                                                 &info->periodic_connect);
392                 info_last->periodic_connect = info->periodic_connect;
393         }
394
395         if (session->append_all == TRUE ||
396                         info->idle_timeout != info_last->idle_timeout) {
397                 connman_dbus_dict_append_basic(dict, "IdleTimeout",
398                                                 DBUS_TYPE_UINT32,
399                                                 &info->idle_timeout);
400                 info_last->idle_timeout = info->idle_timeout;
401         }
402
403         if (session->append_all == TRUE ||
404                         info->ecall != info_last->ecall) {
405                 connman_dbus_dict_append_basic(dict, "EmergencyCall",
406                                                 DBUS_TYPE_BOOLEAN,
407                                                 &info->ecall);
408                 info_last->ecall = info->ecall;
409         }
410
411         if (session->append_all == TRUE ||
412                         info->roaming_policy != info_last->roaming_policy) {
413                 policy = roamingpolicy2string(info->roaming_policy);
414                 connman_dbus_dict_append_basic(dict, "RoamingPolicy",
415                                                 DBUS_TYPE_STRING,
416                                                 &policy);
417                 info_last->roaming_policy = info->roaming_policy;
418         }
419
420         if (session->append_all == TRUE ||
421                         info->marker != info_last->marker) {
422                 connman_dbus_dict_append_basic(dict, "SessionMarker",
423                                                 DBUS_TYPE_UINT32,
424                                                 &info->marker);
425                 info_last->marker = info->marker;
426         }
427
428         session->append_all = FALSE;
429         session->info_dirty = FALSE;
430 }
431
432 static int session_notify(struct connman_session *session)
433 {
434         DBusMessage *msg;
435         DBusMessageIter array, dict;
436
437         if (session->info_dirty == FALSE)
438                 return 0;
439
440         DBG("session %p owner %s notify_path %s", session,
441                 session->owner, session->notify_path);
442
443         msg = dbus_message_new_method_call(session->owner, session->notify_path,
444                                                 CONNMAN_NOTIFICATION_INTERFACE,
445                                                 "Update");
446         if (msg == NULL)
447                 return -ENOMEM;
448
449         dbus_message_iter_init_append(msg, &array);
450         connman_dbus_dict_open(&array, &dict);
451
452         append_notify(&dict, session);
453
454         connman_dbus_dict_close(&array, &dict);
455
456         g_dbus_send_message(connection, msg);
457
458         session->info_dirty = FALSE;
459
460         return 0;
461 }
462
463 static void ipconfig_ipv4_changed(struct connman_session *session)
464 {
465         struct session_info *info = &session->info;
466
467         connman_dbus_setting_changed_dict(session->owner, session->notify_path,
468                                                 "IPv4", append_ipconfig_ipv4,
469                                                 info->service);
470 }
471
472 static void ipconfig_ipv6_changed(struct connman_session *session)
473 {
474         struct session_info *info = &session->info;
475
476         connman_dbus_setting_changed_dict(session->owner, session->notify_path,
477                                                 "IPv6", append_ipconfig_ipv6,
478                                                 info->service);
479 }
480
481 static connman_bool_t service_type_match(struct connman_session *session,
482                                         struct connman_service *service)
483 {
484         struct session_info *info = &session->info;
485         GSList *list;
486
487         for (list = info->allowed_bearers;
488                         list != NULL; list = list->next) {
489                 struct bearer_info *info = list->data;
490                 enum connman_service_type service_type;
491
492                 if (info->match_all == TRUE)
493                         return TRUE;
494
495                 service_type = connman_service_get_type(service);
496                 if (info->service_type == service_type)
497                         return TRUE;
498         }
499
500         return FALSE;
501 }
502
503 static connman_bool_t service_match(struct connman_session *session,
504                                         struct connman_service *service)
505 {
506         if (service_type_match(session, service) == FALSE)
507                 return FALSE;
508
509         return TRUE;
510 }
511
512 static int service_type_weight(enum connman_service_type type)
513 {
514         /*
515          * The session doesn't care which service
516          * to use. Nevertheless we have to sort them
517          * according their type. The ordering is
518          *
519          * 1. Ethernet
520          * 2. Bluetooth
521          * 3. WiFi/WiMAX
522          * 4. GSM/UTMS/3G
523          */
524
525         switch (type) {
526         case CONNMAN_SERVICE_TYPE_ETHERNET:
527                 return 4;
528         case CONNMAN_SERVICE_TYPE_BLUETOOTH:
529                 return 3;
530         case CONNMAN_SERVICE_TYPE_WIFI:
531         case CONNMAN_SERVICE_TYPE_WIMAX:
532                 return 2;
533         case CONNMAN_SERVICE_TYPE_CELLULAR:
534                 return 1;
535         case CONNMAN_SERVICE_TYPE_UNKNOWN:
536         case CONNMAN_SERVICE_TYPE_SYSTEM:
537         case CONNMAN_SERVICE_TYPE_GPS:
538         case CONNMAN_SERVICE_TYPE_VPN:
539         case CONNMAN_SERVICE_TYPE_GADGET:
540                 break;
541         }
542
543         return 0;
544 }
545
546 static gint sort_allowed_bearers(struct connman_service *service_a,
547                                         struct connman_service *service_b,
548                                         struct connman_session *session)
549 {
550         struct session_info *info = &session->info;
551         GSList *list;
552         enum connman_service_type type_a, type_b;
553         int weight_a, weight_b;
554
555         type_a = connman_service_get_type(service_a);
556         type_b = connman_service_get_type(service_b);
557
558         for (list = info->allowed_bearers;
559                         list != NULL; list = list->next) {
560                 struct bearer_info *info = list->data;
561
562                 if (info->match_all == TRUE) {
563                         if (type_a != type_b) {
564                                 weight_a = service_type_weight(type_a);
565                                 weight_b = service_type_weight(type_b);
566
567                                 if (weight_a > weight_b)
568                                         return -1;
569
570                                 if (weight_a < weight_b)
571                                         return 1;
572
573                                 return 0;
574                         }
575                 }
576
577                 if (type_a == info->service_type &&
578                                 type_b == info->service_type) {
579                         return 0;
580                 }
581
582                 if (type_a == info->service_type &&
583                                 type_b != info->service_type) {
584                         return -1;
585                 }
586
587                 if (type_a != info->service_type &&
588                                 type_b == info->service_type) {
589                         return 1;
590                 }
591         }
592
593         return 0;
594 }
595
596 static gint sort_services(gconstpointer a, gconstpointer b, gpointer user_data)
597 {
598         struct connman_service *service_a = (void *)a;
599         struct connman_service *service_b = (void *)b;
600         struct connman_session *session = user_data;
601
602         return sort_allowed_bearers(service_a, service_b, session);
603 }
604
605 static void cleanup_session(gpointer user_data)
606 {
607         struct connman_session *session = user_data;
608         struct session_info *info = &session->info;
609
610         DBG("remove %s", session->session_path);
611
612         g_sequence_free(session->service_list);
613
614         g_slist_foreach(info->allowed_bearers, cleanup_bearer_info, NULL);
615         g_slist_free(info->allowed_bearers);
616
617         g_free(session->owner);
618         g_free(session->session_path);
619         g_free(session->notify_path);
620
621         g_free(session);
622 }
623
624 static void release_session(gpointer key, gpointer value, gpointer user_data)
625 {
626         struct connman_session *session = value;
627         DBusMessage *message;
628
629         DBG("owner %s path %s", session->owner, session->notify_path);
630
631         if (session->notify_watch > 0)
632                 g_dbus_remove_watch(connection, session->notify_watch);
633
634         g_dbus_unregister_interface(connection, session->session_path,
635                                                 CONNMAN_SESSION_INTERFACE);
636
637         message = dbus_message_new_method_call(session->owner,
638                                                 session->notify_path,
639                                                 CONNMAN_NOTIFICATION_INTERFACE,
640                                                 "Release");
641         if (message == NULL)
642                 return;
643
644         dbus_message_set_no_reply(message, TRUE);
645
646         g_dbus_send_message(connection, message);
647 }
648
649 static int session_disconnect(struct connman_session *session)
650 {
651         DBG("session %p, %s", session, session->owner);
652
653         if (session->notify_watch > 0)
654                 g_dbus_remove_watch(connection, session->notify_watch);
655
656         g_dbus_unregister_interface(connection, session->session_path,
657                                                 CONNMAN_SESSION_INTERFACE);
658
659         g_hash_table_remove(session_hash, session->session_path);
660
661         return 0;
662 }
663
664 static void owner_disconnect(DBusConnection *conn, void *user_data)
665 {
666         struct connman_session *session = user_data;
667
668         DBG("session %p, %s died", session, session->owner);
669
670         session_disconnect(session);
671 }
672
673 static DBusMessage *destroy_session(DBusConnection *conn,
674                                         DBusMessage *msg, void *user_data)
675 {
676         struct connman_session *session = user_data;
677
678         DBG("session %p", session);
679
680         return g_dbus_create_reply(msg, DBUS_TYPE_INVALID);
681 }
682
683 static gboolean session_changed_connect(gpointer user_data)
684 {
685         struct connman_session *session = user_data;
686         struct session_info *info = &session->info;
687
688         __connman_service_connect(info->service);
689
690         return FALSE;
691 }
692
693 static void update_service(struct connman_session *session)
694 {
695         struct session_info *info = &session->info;
696         int idx;
697
698         if (info->service != NULL) {
699                 info->bearer = session2bearer(session);
700                 info->online = __connman_service_is_connected(info->service);
701                 info->name = __connman_service_get_name(info->service);
702                 idx = __connman_service_get_index(info->service);
703                 info->ifname = connman_inet_ifname(idx);
704
705         } else {
706                 info->bearer = "";
707                 info->online = FALSE;
708                 info->name = "";
709                 info->ifname = "";
710         }
711 }
712
713 static void session_changed(struct connman_session *session)
714 {
715         struct session_info *info = &session->info;
716         struct session_info *info_last = &session->info_last;
717         struct connman_service *service = NULL;
718         GSourceFunc callback = NULL;
719         GSequenceIter *iter;
720
721         /*
722          * TODO: This only a placeholder for the 'real' algorithm to
723          * play a bit around. So we are going to improve it step by step.
724          */
725
726         if (info->connect == FALSE) {
727                 if (info->service != NULL)
728                         __connman_service_disconnect(info->service);
729                 info->service = NULL;
730                 goto out;
731         }
732
733         iter = g_sequence_get_begin_iter(session->service_list);
734
735         while (g_sequence_iter_is_end(iter) == FALSE) {
736                 service = g_sequence_get(iter);
737
738                 if (__connman_service_is_connecting(service) == TRUE ||
739                                 __connman_service_is_connected(service) == TRUE) {
740                         break;
741                 }
742
743                 if (__connman_service_is_idle(service) == TRUE &&
744                                 info->connect == TRUE) {
745                         callback = session_changed_connect;
746                         break;
747                 }
748
749                 service = NULL;
750
751                 iter = g_sequence_iter_next(iter);
752         }
753
754         if (info->service != NULL && info->service != service) {
755                 __connman_service_disconnect(info->service);
756                 info->service = NULL;
757         }
758
759         if (service != NULL) {
760                 info->service = service;
761
762                 if (callback != NULL)
763                         callback(session);
764         }
765
766 out:
767         if (info->service != info_last->service)
768                 update_service(session);
769 }
770
771 static gboolean session_cb(gpointer user_data)
772 {
773         struct connman_session *session = user_data;
774
775         session_changed(session);
776         session_notify(session);
777
778         return FALSE;
779 }
780
781 static DBusMessage *connect_session(DBusConnection *conn,
782                                         DBusMessage *msg, void *user_data)
783 {
784         struct connman_session *session = user_data;
785         struct session_info *info = &session->info;
786
787         DBG("session %p", session);
788
789         info->connect = TRUE;
790
791         g_timeout_add_seconds(0, session_cb, session);
792
793         return g_dbus_create_reply(msg, DBUS_TYPE_INVALID);
794 }
795
796 static DBusMessage *disconnect_session(DBusConnection *conn,
797                                         DBusMessage *msg, void *user_data)
798 {
799         struct connman_session *session = user_data;
800         struct session_info *info = &session->info;
801
802         DBG("session %p", session);
803
804         info->connect = FALSE;
805
806         g_timeout_add_seconds(0, session_cb, session);
807
808         return g_dbus_create_reply(msg, DBUS_TYPE_INVALID);
809 }
810
811 static void print_name(gpointer data, gpointer user_data)
812 {
813         struct connman_service *service = data;
814
815         DBG("service %p type %s name %s", service,
816                 service2bearer(connman_service_get_type(service)),
817                 __connman_service_get_name(service));
818 }
819
820 static void update_allowed_bearers(struct connman_session *session)
821 {
822         if (session->service_list != NULL)
823                 g_sequence_free(session->service_list);
824
825         session->service_list = __connman_service_get_list(session,
826                                                                 service_match);
827         g_sequence_sort(session->service_list, sort_services, session);
828         g_sequence_foreach(session->service_list, print_name, NULL);
829 }
830
831 static DBusMessage *change_session(DBusConnection *conn,
832                                         DBusMessage *msg, void *user_data)
833 {
834         struct connman_session *session = user_data;
835         struct session_info *info = &session->info;
836         struct session_info *info_last = &session->info_last;
837         DBusMessageIter iter, value;
838         const char *name;
839         GSList *allowed_bearers;
840         int err;
841
842         DBG("session %p", session);
843         if (dbus_message_iter_init(msg, &iter) == FALSE)
844                 return __connman_error_invalid_arguments(msg);
845
846         dbus_message_iter_get_basic(&iter, &name);
847         dbus_message_iter_next(&iter);
848         dbus_message_iter_recurse(&iter, &value);
849
850         switch (dbus_message_iter_get_arg_type(&value)) {
851         case DBUS_TYPE_ARRAY:
852                 if (g_str_equal(name, "AllowedBearers") == TRUE) {
853                         allowed_bearers = session_parse_allowed_bearers(&value);
854
855                         g_slist_foreach(info->allowed_bearers,
856                                         cleanup_bearer_info, NULL);
857                         g_slist_free(info->allowed_bearers);
858
859                         if (allowed_bearers == NULL) {
860                                 allowed_bearers = session_allowed_bearers_any();
861
862                                 if (allowed_bearers == NULL)
863                                         return __connman_error_failed(msg, ENOMEM);
864                         }
865
866                         info->allowed_bearers = allowed_bearers;
867
868                         update_allowed_bearers(session);
869                         session->info_dirty = TRUE;
870                 } else {
871                         goto err;
872                 }
873                 break;
874         case DBUS_TYPE_BOOLEAN:
875                 if (g_str_equal(name, "Priority") == TRUE) {
876                         dbus_message_iter_get_basic(&value,
877                                         &info->priority);
878
879                         if (info_last->priority != info->priority)
880                                 session->info_dirty = TRUE;
881                 } else if (g_str_equal(name, "AvoidHandover") == TRUE) {
882                         dbus_message_iter_get_basic(&value,
883                                         &info->avoid_handover);
884
885                         if (info_last->avoid_handover != info->avoid_handover)
886                                 session->info_dirty = TRUE;
887                         } else if (g_str_equal(name, "StayConnected") == TRUE) {
888                         dbus_message_iter_get_basic(&value,
889                                         &info->stay_connected);
890
891                         if (info_last->stay_connected != info->stay_connected)
892                                 session->info_dirty = TRUE;
893                 } else if (g_str_equal(name, "EmergencyCall") == TRUE) {
894                         dbus_message_iter_get_basic(&value,
895                                         &info->ecall);
896
897                         if (info_last->ecall != info->ecall)
898                                 session->info_dirty = TRUE;
899                 } else {
900                         goto err;
901                 }
902                 break;
903         case DBUS_TYPE_UINT32:
904                 if (g_str_equal(name, "PeriodicConnect") == TRUE) {
905                         dbus_message_iter_get_basic(&value,
906                                         &info->periodic_connect);
907
908                         if (info_last->periodic_connect != info->periodic_connect)
909                                 session->info_dirty = TRUE;
910                 } else if (g_str_equal(name, "IdleTimeout") == TRUE) {
911                         dbus_message_iter_get_basic(&value,
912                                         &info->idle_timeout);
913
914                         if (info_last->idle_timeout != info->idle_timeout)
915                                 session->info_dirty = TRUE;
916                 } else {
917                         goto err;
918                 }
919                 break;
920         case DBUS_TYPE_STRING:
921                 if (g_str_equal(name, "RoamingPolicy") == TRUE) {
922                         const char *val;
923                         dbus_message_iter_get_basic(&value, &val);
924                         info->roaming_policy =
925                                         string2roamingpolicy(val);
926
927                         if (info_last->roaming_policy != info->roaming_policy)
928                                 session->info_dirty = TRUE;
929                 } else {
930                         goto err;
931                 }
932                 break;
933         default:
934                 goto err;
935         }
936
937         err = session_notify(session);
938         if (err < 0)
939                 __connman_error_failed(msg, -err);
940
941         return g_dbus_create_reply(msg, DBUS_TYPE_INVALID);
942
943 err:
944         return __connman_error_invalid_arguments(msg);
945 }
946
947 static GDBusMethodTable session_methods[] = {
948         { "Destroy",    "",   "", destroy_session    },
949         { "Connect",    "",   "", connect_session    },
950         { "Disconnect", "",   "", disconnect_session },
951         { "Change",     "sv", "", change_session     },
952         { },
953 };
954
955 int __connman_session_create(DBusMessage *msg)
956 {
957         const char *owner, *notify_path;
958         char *session_path;
959         DBusMessageIter iter, array;
960         struct connman_session *session;
961         struct session_info *info, *info_last;
962
963         connman_bool_t priority = FALSE, avoid_handover = FALSE;
964         connman_bool_t stay_connected = FALSE, ecall = FALSE;
965         enum connman_session_roaming_policy roaming_policy =
966                                 CONNMAN_SESSION_ROAMING_POLICY_FORBIDDEN;
967         GSList *allowed_bearers = NULL;
968         unsigned int periodic_connect = 0;
969         unsigned int idle_timeout = 0;
970
971         int err;
972
973         owner = dbus_message_get_sender(msg);
974
975         DBG("owner %s", owner);
976
977         dbus_message_iter_init(msg, &iter);
978         dbus_message_iter_recurse(&iter, &array);
979
980         while (dbus_message_iter_get_arg_type(&array) == DBUS_TYPE_DICT_ENTRY) {
981                 DBusMessageIter entry, value;
982                 const char *key, *val;
983
984                 dbus_message_iter_recurse(&array, &entry);
985                 dbus_message_iter_get_basic(&entry, &key);
986
987                 dbus_message_iter_next(&entry);
988                 dbus_message_iter_recurse(&entry, &value);
989
990                 switch (dbus_message_iter_get_arg_type(&value)) {
991                 case DBUS_TYPE_ARRAY:
992                         if (g_str_equal(key, "AllowedBearers") == TRUE) {
993                                 allowed_bearers =
994                                         session_parse_allowed_bearers(&value);
995                         } else {
996                                 return -EINVAL;
997                         }
998                         break;
999                 case DBUS_TYPE_BOOLEAN:
1000                         if (g_str_equal(key, "Priority") == TRUE) {
1001                                 dbus_message_iter_get_basic(&value,
1002                                                         &priority);
1003                         } else if (g_str_equal(key, "AvoidHandover") == TRUE) {
1004                                 dbus_message_iter_get_basic(&value,
1005                                                         &avoid_handover);
1006                         } else if (g_str_equal(key, "StayConnected") == TRUE) {
1007                                 dbus_message_iter_get_basic(&value,
1008                                                         &stay_connected);
1009                         } else if (g_str_equal(key, "EmergencyCall") == TRUE) {
1010                                 dbus_message_iter_get_basic(&value,
1011                                                         &ecall);
1012                         } else {
1013                                 return -EINVAL;
1014                         }
1015                         break;
1016                 case DBUS_TYPE_UINT32:
1017                         if (g_str_equal(key, "PeriodicConnect") == TRUE) {
1018                                 dbus_message_iter_get_basic(&value,
1019                                                         &periodic_connect);
1020                         } else if (g_str_equal(key, "IdleTimeout") == TRUE) {
1021                                 dbus_message_iter_get_basic(&value,
1022                                                         &idle_timeout);
1023                         } else {
1024                                 return -EINVAL;
1025                         }
1026                         break;
1027                 case DBUS_TYPE_STRING:
1028                         if (g_str_equal(key, "RoamingPolicy") == TRUE) {
1029                                 dbus_message_iter_get_basic(&value, &val);
1030                                 roaming_policy = string2roamingpolicy(val);
1031                         } else {
1032                                 return -EINVAL;
1033                         }
1034                 }
1035                 dbus_message_iter_next(&array);
1036         }
1037
1038         dbus_message_iter_next(&iter);
1039         dbus_message_iter_get_basic(&iter, &notify_path);
1040
1041         if (notify_path == NULL) {
1042                 session_path = NULL;
1043                 err = -EINVAL;
1044                 goto err;
1045         }
1046
1047         session_path = g_strdup_printf("/sessions%s", notify_path);
1048         if (session_path == NULL) {
1049                 err = -ENOMEM;
1050                 goto err;
1051         }
1052
1053         session = g_hash_table_lookup(session_hash, session_path);
1054         if (session != NULL) {
1055                 err = -EEXIST;
1056                 goto err;
1057         }
1058
1059         session = g_try_new0(struct connman_session, 1);
1060         if (session == NULL) {
1061                 err = -ENOMEM;
1062                 goto err;
1063         }
1064
1065         info = &session->info;
1066         info_last = &session->info_last;
1067
1068         session->owner = g_strdup(owner);
1069         session->session_path = session_path;
1070         session->notify_path = g_strdup(notify_path);
1071         session->notify_watch =
1072                 g_dbus_add_disconnect_watch(connection, session->owner,
1073                                         owner_disconnect, session, NULL);
1074
1075         info->bearer = "";
1076         info->online = FALSE;
1077         info->priority = priority;
1078         info->avoid_handover = avoid_handover;
1079         info->stay_connected = stay_connected;
1080         info->periodic_connect = periodic_connect;
1081         info->idle_timeout = idle_timeout;
1082         info->ecall = ecall;
1083         info->roaming_policy = roaming_policy;
1084         info->service = NULL;
1085         info->marker = 0;
1086
1087         if (allowed_bearers == NULL) {
1088                 info->allowed_bearers =
1089                                 session_allowed_bearers_any();
1090
1091                 if (info->allowed_bearers == NULL) {
1092                         err = -ENOMEM;
1093                         goto err;
1094                 }
1095         } else {
1096                 info->allowed_bearers = allowed_bearers;
1097         }
1098
1099         update_allowed_bearers(session);
1100         update_service(session);
1101
1102         info_last->bearer = info->bearer;
1103         info_last->online = info->priority;
1104         info_last->avoid_handover = info->avoid_handover;
1105         info_last->stay_connected = info->stay_connected;
1106         info_last->periodic_connect = info->periodic_connect;
1107         info_last->idle_timeout = info->idle_timeout;
1108         info_last->ecall = info->ecall;
1109         info_last->roaming_policy = info->roaming_policy;
1110         info_last->service = info->service;
1111         info_last->marker = info->marker;
1112         info_last->allowed_bearers = info->allowed_bearers;
1113
1114         session->info_dirty = TRUE;
1115         session->append_all = TRUE;
1116
1117         g_hash_table_replace(session_hash, session->session_path, session);
1118
1119         DBG("add %s", session->session_path);
1120
1121         if (g_dbus_register_interface(connection, session->session_path,
1122                                         CONNMAN_SESSION_INTERFACE,
1123                                         session_methods, NULL,
1124                                         NULL, session, NULL) == FALSE) {
1125                 connman_error("Failed to register %s", session->session_path);
1126                 g_hash_table_remove(session_hash, session->session_path);
1127                 session = NULL;
1128
1129                 err = -EINVAL;
1130                 goto err;
1131         }
1132
1133         g_dbus_send_reply(connection, msg,
1134                                 DBUS_TYPE_OBJECT_PATH, &session->session_path,
1135                                 DBUS_TYPE_INVALID);
1136
1137         g_timeout_add_seconds(0, session_cb, session);
1138
1139         return 0;
1140
1141 err:
1142         connman_error("Failed to create session");
1143         g_free(session_path);
1144
1145         g_slist_foreach(allowed_bearers, cleanup_bearer_info, NULL);
1146         g_slist_free(allowed_bearers);
1147
1148         return err;
1149 }
1150
1151 int __connman_session_destroy(DBusMessage *msg)
1152 {
1153         const char *owner, *session_path;
1154         struct connman_session *session;
1155
1156         owner = dbus_message_get_sender(msg);
1157
1158         DBG("owner %s", owner);
1159
1160         dbus_message_get_args(msg, NULL, DBUS_TYPE_OBJECT_PATH, &session_path,
1161                                                         DBUS_TYPE_INVALID);
1162         if (session_path == NULL)
1163                 return -EINVAL;
1164
1165         session = g_hash_table_lookup(session_hash, session_path);
1166         if (session == NULL)
1167                 return -EINVAL;
1168
1169         if (g_strcmp0(owner, session->owner) != 0)
1170                 return -EACCES;
1171
1172         session_disconnect(session);
1173
1174         return 0;
1175 }
1176
1177 connman_bool_t __connman_session_mode()
1178 {
1179         return sessionmode;
1180 }
1181
1182 void __connman_session_set_mode(connman_bool_t enable)
1183 {
1184         DBG("enable %d", enable);
1185
1186         if (sessionmode == enable)
1187                 return;
1188
1189         sessionmode = enable;
1190
1191         if (sessionmode == TRUE)
1192                 __connman_service_disconnect_all();
1193 }
1194
1195 static void service_add(struct connman_service *service)
1196 {
1197         GHashTableIter iter;
1198         gpointer key, value;
1199         struct connman_session *session;
1200
1201         DBG("service %p", service);
1202
1203         g_hash_table_iter_init(&iter, session_hash);
1204
1205         while (g_hash_table_iter_next(&iter, &key, &value) == TRUE) {
1206                 session = value;
1207
1208                 if (service_match(session, service) == FALSE)
1209                         continue;
1210
1211                 g_sequence_insert_sorted(session->service_list, service,
1212                                                 sort_services, session);
1213
1214                 session_cb(session);
1215         }
1216 }
1217
1218 static gint service_in_session(gconstpointer a, gconstpointer b,
1219                                 gpointer user_data)
1220 {
1221         if (a == b)
1222                 return 0;
1223
1224         return -1;
1225 }
1226
1227 static void service_remove(struct connman_service *service)
1228 {
1229
1230         GHashTableIter iter;
1231         gpointer key, value;
1232         GSequenceIter *seq_iter;
1233         struct connman_session *session;
1234         struct session_info *info;
1235         struct connman_service *found_service;
1236
1237         DBG("service %p", service);
1238
1239         g_hash_table_iter_init(&iter, session_hash);
1240
1241         while (g_hash_table_iter_next(&iter, &key, &value) == TRUE) {
1242                 session = value;
1243                 info = &session->info;
1244
1245                 if (session->service_list == NULL)
1246                         continue;
1247
1248                 seq_iter = g_sequence_search(session->service_list, service,
1249                                                 service_in_session, NULL);
1250                 if (g_sequence_iter_is_end(seq_iter) == TRUE)
1251                         continue;
1252
1253                 g_sequence_remove(seq_iter);
1254
1255                 found_service = g_sequence_get(seq_iter);
1256                 if (found_service != info->service)
1257                         continue;
1258
1259                 info->service = NULL;
1260                 session_cb(session);
1261         }
1262 }
1263
1264 static void service_state_changed(struct connman_service *service,
1265                                         enum connman_service_state state)
1266 {
1267         GHashTableIter iter;
1268         gpointer key, value;
1269         struct connman_session *session;
1270         struct session_info *info;
1271         connman_bool_t online;
1272
1273         DBG("service %p state %d", service, state);
1274
1275         g_hash_table_iter_init(&iter, session_hash);
1276
1277         while (g_hash_table_iter_next(&iter, &key, &value) == TRUE) {
1278                 session = value;
1279                 info = &session->info;
1280
1281                 if (info->service == service) {
1282                         online = __connman_service_is_connected(service);
1283                         if (info->online == online)
1284                                 continue;
1285
1286                         info->online = online;
1287                         session_cb(session);
1288                 }
1289         }
1290 }
1291
1292 static void ipconfig_changed(struct connman_service *service,
1293                                 struct connman_ipconfig *ipconfig)
1294 {
1295         GHashTableIter iter;
1296         gpointer key, value;
1297         struct connman_session *session;
1298         struct session_info *info;
1299         enum connman_ipconfig_type type;
1300
1301         DBG("service %p ipconfig %p", service, ipconfig);
1302
1303         type = __connman_ipconfig_get_config_type(ipconfig);
1304
1305         g_hash_table_iter_init(&iter, session_hash);
1306
1307         while (g_hash_table_iter_next(&iter, &key, &value) == TRUE) {
1308                 session = value;
1309                 info = &session->info;
1310
1311                 if (info->service == service) {
1312                         if (type == CONNMAN_IPCONFIG_TYPE_IPV4)
1313                                 ipconfig_ipv4_changed(session);
1314                         else if (type == CONNMAN_IPCONFIG_TYPE_IPV6)
1315                                 ipconfig_ipv6_changed(session);
1316                 }
1317         }
1318 }
1319
1320 static struct connman_notifier session_notifier = {
1321         .name                   = "session",
1322         .service_add            = service_add,
1323         .service_remove         = service_remove,
1324         .service_state_changed  = service_state_changed,
1325         .ipconfig_changed       = ipconfig_changed,
1326 };
1327
1328 int __connman_session_init(void)
1329 {
1330         int err;
1331
1332         DBG("");
1333
1334         connection = connman_dbus_get_connection();
1335         if (connection == NULL)
1336                 return -1;
1337
1338         err = connman_notifier_register(&session_notifier);
1339         if (err < 0) {
1340                 dbus_connection_unref(connection);
1341                 return err;
1342         }
1343
1344         session_hash = g_hash_table_new_full(g_str_hash, g_str_equal,
1345                                                 NULL, cleanup_session);
1346
1347         sessionmode = FALSE;
1348         return 0;
1349 }
1350
1351 void __connman_session_cleanup(void)
1352 {
1353         DBG("");
1354
1355         if (connection == NULL)
1356                 return;
1357
1358         connman_notifier_unregister(&session_notifier);
1359
1360         g_hash_table_foreach(session_hash, release_session, NULL);
1361         g_hash_table_destroy(session_hash);
1362
1363         dbus_connection_unref(connection);
1364 }