session: Add bearer list cleanup function
[platform/upstream/connman.git] / src / session.c
1 /*
2  *
3  *  Connection Manager
4  *
5  *  Copyright (C) 2007-2012  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 <errno.h>
28
29 #include <gdbus.h>
30
31 #include <connman/session.h>
32
33 #include "connman.h"
34
35 static DBusConnection *connection;
36 static GHashTable *session_hash;
37 static connman_bool_t sessionmode;
38 static struct connman_session *ecall_session;
39 static GSList *policy_list;
40
41 enum connman_session_trigger {
42         CONNMAN_SESSION_TRIGGER_UNKNOWN         = 0,
43         CONNMAN_SESSION_TRIGGER_SETTING         = 1,
44         CONNMAN_SESSION_TRIGGER_CONNECT         = 2,
45         CONNMAN_SESSION_TRIGGER_DISCONNECT      = 3,
46         CONNMAN_SESSION_TRIGGER_SERVICE         = 4,
47         CONNMAN_SESSION_TRIGGER_ECALL           = 5,
48 };
49
50 enum connman_session_reason {
51         CONNMAN_SESSION_REASON_UNKNOWN          = 0,
52         CONNMAN_SESSION_REASON_CONNECT          = 1,
53         CONNMAN_SESSION_REASON_FREE_RIDE        = 2,
54 };
55
56 enum connman_session_state {
57         CONNMAN_SESSION_STATE_DISCONNECTED   = 0,
58         CONNMAN_SESSION_STATE_CONNECTED      = 1,
59         CONNMAN_SESSION_STATE_ONLINE         = 2,
60 };
61
62 struct service_entry {
63         /* track why this service was selected */
64         enum connman_session_reason reason;
65         enum connman_service_state state;
66         const char *name;
67         struct connman_service *service;
68         char *ifname;
69         const char *bearer;
70         GSList *pending_timeouts;
71 };
72
73 struct session_info {
74         struct connman_session_config config;
75         enum connman_session_state state;
76         struct service_entry *entry;
77         enum connman_session_reason reason;
78 };
79
80 struct connman_session {
81         char *owner;
82         char *session_path;
83         char *notify_path;
84         guint notify_watch;
85
86         struct connman_session_policy *policy;
87
88         connman_bool_t append_all;
89         struct session_info *info;
90         struct session_info *info_last;
91         struct connman_session_config *policy_config;
92
93         connman_bool_t ecall;
94
95         GSequence *service_list;
96         GHashTable *service_hash;
97 };
98
99 static const char *trigger2string(enum connman_session_trigger trigger)
100 {
101         switch (trigger) {
102         case CONNMAN_SESSION_TRIGGER_UNKNOWN:
103                 break;
104         case CONNMAN_SESSION_TRIGGER_SETTING:
105                 return "setting";
106         case CONNMAN_SESSION_TRIGGER_CONNECT:
107                 return "connect";
108         case CONNMAN_SESSION_TRIGGER_DISCONNECT:
109                 return "disconnect";
110         case CONNMAN_SESSION_TRIGGER_SERVICE:
111                 return "service";
112         case CONNMAN_SESSION_TRIGGER_ECALL:
113                 return "ecall";
114         }
115
116         return NULL;
117 }
118
119 static const char *reason2string(enum connman_session_reason reason)
120 {
121         switch (reason) {
122         case CONNMAN_SESSION_REASON_UNKNOWN:
123                 return "unknown";
124         case CONNMAN_SESSION_REASON_CONNECT:
125                 return "connect";
126         case CONNMAN_SESSION_REASON_FREE_RIDE:
127                 return "free-ride";
128         }
129
130         return NULL;
131 }
132
133 static const char *state2string(enum connman_session_state state)
134 {
135         switch (state) {
136         case CONNMAN_SESSION_STATE_DISCONNECTED:
137                 return "disconnected";
138         case CONNMAN_SESSION_STATE_CONNECTED:
139                 return "connected";
140         case CONNMAN_SESSION_STATE_ONLINE:
141                 return "online";
142         }
143
144         return NULL;
145 }
146
147 static const char *type2string(enum connman_session_type type)
148 {
149         switch (type) {
150         case CONNMAN_SESSION_TYPE_ANY:
151                 return "";
152         case CONNMAN_SESSION_TYPE_LOCAL:
153                 return "local";
154         case CONNMAN_SESSION_TYPE_INTERNET:
155                 return "internet";
156         }
157
158         return NULL;
159 }
160
161 static enum connman_session_type string2type(const char *type)
162 {
163         if (g_strcmp0(type, "local") == 0)
164                 return CONNMAN_SESSION_TYPE_LOCAL;
165         else if (g_strcmp0(type, "internet") == 0)
166                 return CONNMAN_SESSION_TYPE_INTERNET;
167
168         return CONNMAN_SESSION_TYPE_ANY;
169 }
170
171 static enum connman_service_type bearer2service(const char *bearer)
172 {
173         if (bearer == NULL)
174                 return CONNMAN_SERVICE_TYPE_UNKNOWN;
175
176         if (g_strcmp0(bearer, "ethernet") == 0)
177                 return CONNMAN_SERVICE_TYPE_ETHERNET;
178         else if (g_strcmp0(bearer, "wifi") == 0)
179                 return CONNMAN_SERVICE_TYPE_WIFI;
180         else if (g_strcmp0(bearer, "wimax") == 0)
181                 return CONNMAN_SERVICE_TYPE_WIMAX;
182         else if (g_strcmp0(bearer, "bluetooth") == 0)
183                 return CONNMAN_SERVICE_TYPE_BLUETOOTH;
184         else if (g_strcmp0(bearer, "cellular") == 0)
185                 return CONNMAN_SERVICE_TYPE_CELLULAR;
186         else if (g_strcmp0(bearer, "vpn") == 0)
187                 return CONNMAN_SERVICE_TYPE_VPN;
188         else
189                 return CONNMAN_SERVICE_TYPE_UNKNOWN;
190 }
191
192 static char *service2bearer(enum connman_service_type type)
193 {
194         switch (type) {
195         case CONNMAN_SERVICE_TYPE_ETHERNET:
196                 return "ethernet";
197         case CONNMAN_SERVICE_TYPE_WIFI:
198                 return "wifi";
199         case CONNMAN_SERVICE_TYPE_WIMAX:
200                 return "wimax";
201         case CONNMAN_SERVICE_TYPE_BLUETOOTH:
202                 return "bluetooth";
203         case CONNMAN_SERVICE_TYPE_CELLULAR:
204                 return "cellular";
205         case CONNMAN_SERVICE_TYPE_VPN:
206                 return "vpn";
207         case CONNMAN_SERVICE_TYPE_UNKNOWN:
208         case CONNMAN_SERVICE_TYPE_SYSTEM:
209         case CONNMAN_SERVICE_TYPE_GPS:
210         case CONNMAN_SERVICE_TYPE_GADGET:
211                 return "";
212         }
213
214         return "";
215 }
216
217 static int assign_policy_plugin(struct connman_session *session)
218 {
219         GSList *list;
220         struct connman_session_policy *policy;
221
222         if (session->policy != NULL)
223                 return -EALREADY;
224
225         for (list = policy_list; list != NULL; list = list->next) {
226                 policy = list->data;
227
228                 session->policy = policy;
229                 break;
230         }
231
232         return 0;
233 }
234
235 static int create_policy_config(struct connman_session *session)
236 {
237         struct connman_session_config *config;
238
239         config = (*session->policy->create)(session);
240         if (config == NULL)
241                 return -ENOMEM;
242
243         session->policy_config = config;
244
245         return 0;
246 }
247
248 static void destroy_policy_config(struct connman_session *session)
249 {
250         (*session->policy->destroy)(session);
251 }
252
253 static void probe_policy(struct connman_session_policy *policy)
254 {
255
256         GHashTableIter iter;
257         gpointer key, value;
258         struct connman_session *session;
259
260         DBG("policy %p name %s", policy, policy->name);
261
262         g_hash_table_iter_init(&iter, session_hash);
263
264         while (g_hash_table_iter_next(&iter, &key, &value) == TRUE) {
265                 session = value;
266
267                 if (session->policy != NULL)
268                         continue;
269
270                 assign_policy_plugin(session);
271         }
272 }
273
274 static void remove_policy(struct connman_session_policy *policy)
275 {
276         GHashTableIter iter;
277         gpointer key, value;
278         struct connman_session *session;
279
280         DBG("policy %p name %s", policy, policy->name);
281
282         g_hash_table_iter_init(&iter, session_hash);
283
284         while (g_hash_table_iter_next(&iter, &key, &value) == TRUE) {
285                 session = value;
286
287                 if (session->policy != policy)
288                         continue;
289
290                 session->policy = NULL;
291                 assign_policy_plugin(session);
292         }
293 }
294
295 static gint compare_priority(gconstpointer a, gconstpointer b)
296 {
297         const struct connman_session_policy *policy1 = a;
298         const struct connman_session_policy *policy2 = b;
299
300         return policy2->priority - policy1->priority;
301 }
302
303
304 int connman_session_policy_register(struct connman_session_policy *policy)
305 {
306         DBG("name %s", policy->name);
307
308         policy_list = g_slist_insert_sorted(policy_list, policy,
309                                                 compare_priority);
310
311         probe_policy(policy);
312
313         return 0;
314 }
315
316 void connman_session_policy_unregister(struct connman_session_policy *policy)
317 {
318         DBG("name %s", policy->name);
319
320         policy_list = g_slist_remove(policy_list, policy);
321
322         remove_policy(policy);
323 }
324
325 static void cleanup_bearer(gpointer data, gpointer user_data)
326 {
327         struct connman_session_bearer *bearer = data;
328
329         g_free(bearer->name);
330         g_free(bearer);
331 }
332
333 void connman_session_free_bearers(GSList *bearers)
334 {
335         g_slist_foreach(bearers, cleanup_bearer, NULL);
336         g_slist_free(bearers);
337 }
338
339 static GSList *session_parse_allowed_bearers(DBusMessageIter *iter)
340 {
341         struct connman_session_bearer *bearer;
342         DBusMessageIter array;
343         GSList *list = NULL;
344
345         dbus_message_iter_recurse(iter, &array);
346
347         while (dbus_message_iter_get_arg_type(&array) == DBUS_TYPE_STRING) {
348                 char *bearer_name = NULL;
349
350                 dbus_message_iter_get_basic(&array, &bearer_name);
351
352                 bearer = g_try_new0(struct connman_session_bearer, 1);
353                 if (bearer == NULL) {
354                         connman_session_free_bearers(list);
355                         return NULL;
356                 }
357
358                 bearer->name = g_strdup(bearer_name);
359                 bearer->service_type = bearer2service(bearer->name);
360
361                 if (bearer->service_type == CONNMAN_SERVICE_TYPE_UNKNOWN &&
362                                 g_strcmp0(bearer->name, "*") == 0) {
363                         bearer->match_all = TRUE;
364                 } else {
365                         bearer->match_all = FALSE;
366                 }
367
368                 list = g_slist_append(list, bearer);
369
370                 dbus_message_iter_next(&array);
371         }
372
373         return list;
374 }
375
376 GSList *connman_session_allowed_bearers_any(void)
377 {
378         struct connman_session_bearer *bearer;
379         GSList *list = NULL;
380
381         bearer = g_try_new0(struct connman_session_bearer, 1);
382         if (bearer == NULL)
383                 return NULL;
384
385         bearer->name = g_strdup("");
386         bearer->match_all = TRUE;
387         bearer->service_type = CONNMAN_SERVICE_TYPE_UNKNOWN;
388
389         list = g_slist_append(list, bearer);
390
391         return list;
392 }
393
394 static void append_allowed_bearers(DBusMessageIter *iter, void *user_data)
395 {
396         struct session_info *info = user_data;
397         GSList *list;
398
399         for (list = info->config.allowed_bearers;
400                         list != NULL; list = list->next) {
401                 struct connman_session_bearer *bearer = list->data;
402
403                 dbus_message_iter_append_basic(iter, DBUS_TYPE_STRING,
404                                                 &bearer->name);
405         }
406 }
407
408 static void append_ipconfig_ipv4(DBusMessageIter *iter, void *user_data)
409 {
410         struct connman_service *service = user_data;
411         struct connman_ipconfig *ipconfig_ipv4;
412
413         if (service == NULL)
414                 return;
415
416         if (__connman_service_is_connected_state(service,
417                                 CONNMAN_IPCONFIG_TYPE_IPV4) == FALSE) {
418                 return;
419         }
420
421         ipconfig_ipv4 = __connman_service_get_ip4config(service);
422         if (ipconfig_ipv4 == NULL)
423                 return;
424
425         __connman_ipconfig_append_ipv4(ipconfig_ipv4, iter);
426 }
427
428 static void append_ipconfig_ipv6(DBusMessageIter *iter, void *user_data)
429 {
430         struct connman_service *service = user_data;
431         struct connman_ipconfig *ipconfig_ipv4, *ipconfig_ipv6;
432
433         if (service == NULL)
434                 return;
435
436         if (__connman_service_is_connected_state(service,
437                                 CONNMAN_IPCONFIG_TYPE_IPV6) == FALSE) {
438                 return;
439         }
440
441         ipconfig_ipv4 = __connman_service_get_ip4config(service);
442         ipconfig_ipv6 = __connman_service_get_ip6config(service);
443         if (ipconfig_ipv6 == NULL)
444                 return;
445
446         __connman_ipconfig_append_ipv6(ipconfig_ipv6, iter, ipconfig_ipv4);
447 }
448
449 static void append_notify(DBusMessageIter *dict,
450                                         struct connman_session *session)
451 {
452         struct session_info *info = session->info;
453         struct session_info *info_last = session->info_last;
454         struct connman_service *service;
455         const char *name, *ifname, *bearer;
456
457         if (session->append_all == TRUE ||
458                         info->state != info_last->state) {
459                 const char *state = state2string(info->state);
460
461                 connman_dbus_dict_append_basic(dict, "State",
462                                                 DBUS_TYPE_STRING,
463                                                 &state);
464                 info_last->state = info->state;
465         }
466
467         if (session->append_all == TRUE ||
468                         info->entry != info_last->entry) {
469                 if (info->entry == NULL) {
470                         name = "";
471                         ifname = "";
472                         service = NULL;
473                         bearer = "";
474                 } else {
475                         name = info->entry->name;
476                         ifname = info->entry->ifname;
477                         service = info->entry->service;
478                         bearer = info->entry->bearer;
479                 }
480
481                 connman_dbus_dict_append_basic(dict, "Name",
482                                                 DBUS_TYPE_STRING,
483                                                 &name);
484
485                 connman_dbus_dict_append_dict(dict, "IPv4",
486                                                 append_ipconfig_ipv4,
487                                                 service);
488
489                 connman_dbus_dict_append_dict(dict, "IPv6",
490                                                 append_ipconfig_ipv6,
491                                                 service);
492
493                 connman_dbus_dict_append_basic(dict, "Interface",
494                                                 DBUS_TYPE_STRING,
495                                                 &ifname);
496
497                 connman_dbus_dict_append_basic(dict, "Bearer",
498                                                 DBUS_TYPE_STRING,
499                                                 &bearer);
500
501                 info_last->entry = info->entry;
502         }
503
504         if (session->append_all == TRUE ||
505                         info->config.type != info_last->config.type) {
506                 const char *type = type2string(info->config.type);
507
508                 connman_dbus_dict_append_basic(dict, "ConnectionType",
509                                                 DBUS_TYPE_STRING,
510                                                 &type);
511                 info_last->config.type = info->config.type;
512         }
513
514         if (session->append_all == TRUE ||
515                         info->config.allowed_bearers != info_last->config.allowed_bearers) {
516                 connman_dbus_dict_append_array(dict, "AllowedBearers",
517                                                 DBUS_TYPE_STRING,
518                                                 append_allowed_bearers,
519                                                 info);
520                 info_last->config.allowed_bearers = info->config.allowed_bearers;
521         }
522
523         session->append_all = FALSE;
524 }
525
526 static connman_bool_t is_type_matching_state(enum connman_session_state *state,
527                                                 enum connman_session_type type)
528 {
529         switch (type) {
530         case CONNMAN_SESSION_TYPE_ANY:
531                 return TRUE;
532         case CONNMAN_SESSION_TYPE_LOCAL:
533                 if (*state >= CONNMAN_SESSION_STATE_CONNECTED) {
534                         *state = CONNMAN_SESSION_STATE_CONNECTED;
535                         return TRUE;
536                 }
537
538                 break;
539         case CONNMAN_SESSION_TYPE_INTERNET:
540                 if (*state == CONNMAN_SESSION_STATE_ONLINE)
541                         return TRUE;
542                 break;
543         }
544
545         return FALSE;
546 }
547
548 static connman_bool_t compute_notifiable_changes(struct connman_session *session)
549 {
550         struct session_info *info_last = session->info_last;
551         struct session_info *info = session->info;
552
553         if (session->append_all == TRUE)
554                 return TRUE;
555
556         if (info->state != info_last->state)
557                 return TRUE;
558
559         if (info->entry != info_last->entry &&
560                         info->state >= CONNMAN_SESSION_STATE_CONNECTED)
561                 return TRUE;
562
563         if (info->config.allowed_bearers != info_last->config.allowed_bearers ||
564                         info->config.type != info_last->config.type)
565                 return TRUE;
566
567         return FALSE;
568 }
569
570 static gboolean session_notify(gpointer user_data)
571 {
572         struct connman_session *session = user_data;
573         DBusMessage *msg;
574         DBusMessageIter array, dict;
575
576         if (compute_notifiable_changes(session) == FALSE)
577                 return FALSE;
578
579         DBG("session %p owner %s notify_path %s", session,
580                 session->owner, session->notify_path);
581
582         msg = dbus_message_new_method_call(session->owner, session->notify_path,
583                                                 CONNMAN_NOTIFICATION_INTERFACE,
584                                                 "Update");
585         if (msg == NULL)
586                 return FALSE;
587
588         dbus_message_iter_init_append(msg, &array);
589         connman_dbus_dict_open(&array, &dict);
590
591         append_notify(&dict, session);
592
593         connman_dbus_dict_close(&array, &dict);
594
595         g_dbus_send_message(connection, msg);
596
597         return FALSE;
598 }
599
600 static void ipconfig_ipv4_changed(struct connman_session *session)
601 {
602         struct session_info *info = session->info;
603
604         connman_dbus_setting_changed_dict(session->owner, session->notify_path,
605                                                 "IPv4", append_ipconfig_ipv4,
606                                                 info->entry->service);
607 }
608
609 static void ipconfig_ipv6_changed(struct connman_session *session)
610 {
611         struct session_info *info = session->info;
612
613         connman_dbus_setting_changed_dict(session->owner, session->notify_path,
614                                                 "IPv6", append_ipconfig_ipv6,
615                                                 info->entry->service);
616 }
617
618 static connman_bool_t service_type_match(struct connman_session *session,
619                                         struct connman_service *service)
620 {
621         struct session_info *info = session->info;
622         GSList *list;
623
624         for (list = info->config.allowed_bearers;
625                         list != NULL; list = list->next) {
626                 struct connman_session_bearer *bearer = list->data;
627                 enum connman_service_type service_type;
628
629                 if (bearer->match_all == TRUE)
630                         return TRUE;
631
632                 service_type = connman_service_get_type(service);
633                 if (bearer->service_type == service_type)
634                         return TRUE;
635         }
636
637         return FALSE;
638 }
639
640 static connman_bool_t service_match(struct connman_session *session,
641                                         struct connman_service *service)
642 {
643         if (service_type_match(session, service) == FALSE)
644                 return FALSE;
645
646         return TRUE;
647 }
648
649 static int service_type_weight(enum connman_service_type type)
650 {
651         /*
652          * The session doesn't care which service
653          * to use. Nevertheless we have to sort them
654          * according their type. The ordering is
655          *
656          * 1. Ethernet
657          * 2. Bluetooth
658          * 3. WiFi/WiMAX
659          * 4. Cellular
660          */
661
662         switch (type) {
663         case CONNMAN_SERVICE_TYPE_ETHERNET:
664                 return 4;
665         case CONNMAN_SERVICE_TYPE_BLUETOOTH:
666                 return 3;
667         case CONNMAN_SERVICE_TYPE_WIFI:
668         case CONNMAN_SERVICE_TYPE_WIMAX:
669                 return 2;
670         case CONNMAN_SERVICE_TYPE_CELLULAR:
671                 return 1;
672         case CONNMAN_SERVICE_TYPE_UNKNOWN:
673         case CONNMAN_SERVICE_TYPE_SYSTEM:
674         case CONNMAN_SERVICE_TYPE_GPS:
675         case CONNMAN_SERVICE_TYPE_VPN:
676         case CONNMAN_SERVICE_TYPE_GADGET:
677                 break;
678         }
679
680         return 0;
681 }
682
683 static gint sort_allowed_bearers(struct connman_service *service_a,
684                                         struct connman_service *service_b,
685                                         struct connman_session *session)
686 {
687         struct session_info *info = session->info;
688         GSList *list;
689         enum connman_service_type type_a, type_b;
690         int weight_a, weight_b;
691
692         type_a = connman_service_get_type(service_a);
693         type_b = connman_service_get_type(service_b);
694
695         for (list = info->config.allowed_bearers;
696                         list != NULL; list = list->next) {
697                 struct connman_session_bearer *bearer = list->data;
698
699                 if (bearer->match_all == TRUE) {
700                         if (type_a != type_b) {
701                                 weight_a = service_type_weight(type_a);
702                                 weight_b = service_type_weight(type_b);
703
704                                 if (weight_a > weight_b)
705                                         return -1;
706
707                                 if (weight_a < weight_b)
708                                         return 1;
709
710                                 return 0;
711                         }
712                 }
713
714                 if (type_a == bearer->service_type &&
715                                 type_b == bearer->service_type) {
716                         return 0;
717                 }
718
719                 if (type_a == bearer->service_type &&
720                                 type_b != bearer->service_type) {
721                         return -1;
722                 }
723
724                 if (type_a != bearer->service_type &&
725                                 type_b == bearer->service_type) {
726                         return 1;
727                 }
728         }
729
730         return 0;
731 }
732
733 static gint sort_services(gconstpointer a, gconstpointer b, gpointer user_data)
734 {
735         struct service_entry *entry_a = (void *)a;
736         struct service_entry *entry_b = (void *)b;
737         struct connman_session *session = user_data;
738
739         return sort_allowed_bearers(entry_a->service, entry_b->service,
740                                 session);
741 }
742
743 static void cleanup_session(gpointer user_data)
744 {
745         struct connman_session *session = user_data;
746         struct session_info *info = session->info;
747
748         DBG("remove %s", session->session_path);
749
750         g_hash_table_destroy(session->service_hash);
751         g_sequence_free(session->service_list);
752
753         if (info->entry != NULL &&
754                         info->entry->reason == CONNMAN_SESSION_REASON_CONNECT) {
755                 __connman_service_disconnect(info->entry->service);
756         }
757
758         destroy_policy_config(session);
759         connman_session_free_bearers(session->info->config.allowed_bearers);
760         g_free(session->owner);
761         g_free(session->session_path);
762         g_free(session->notify_path);
763         g_free(session->info);
764         g_free(session->info_last);
765
766         g_free(session);
767 }
768
769 static enum connman_session_state service_to_session_state(enum connman_service_state state)
770 {
771         switch (state) {
772         case CONNMAN_SERVICE_STATE_UNKNOWN:
773         case CONNMAN_SERVICE_STATE_IDLE:
774         case CONNMAN_SERVICE_STATE_ASSOCIATION:
775         case CONNMAN_SERVICE_STATE_CONFIGURATION:
776         case CONNMAN_SERVICE_STATE_DISCONNECT:
777         case CONNMAN_SERVICE_STATE_FAILURE:
778                 break;
779         case CONNMAN_SERVICE_STATE_READY:
780                 return CONNMAN_SESSION_STATE_CONNECTED;
781         case CONNMAN_SERVICE_STATE_ONLINE:
782                 return CONNMAN_SESSION_STATE_ONLINE;
783         }
784
785         return CONNMAN_SESSION_STATE_DISCONNECTED;
786 }
787
788 static connman_bool_t is_connected(enum connman_service_state state)
789 {
790         switch (state) {
791         case CONNMAN_SERVICE_STATE_UNKNOWN:
792         case CONNMAN_SERVICE_STATE_IDLE:
793         case CONNMAN_SERVICE_STATE_ASSOCIATION:
794         case CONNMAN_SERVICE_STATE_CONFIGURATION:
795         case CONNMAN_SERVICE_STATE_DISCONNECT:
796         case CONNMAN_SERVICE_STATE_FAILURE:
797                 break;
798         case CONNMAN_SERVICE_STATE_READY:
799         case CONNMAN_SERVICE_STATE_ONLINE:
800                 return TRUE;
801         }
802
803         return FALSE;
804 }
805
806 static connman_bool_t is_connecting(enum connman_service_state state)
807 {
808         switch (state) {
809         case CONNMAN_SERVICE_STATE_UNKNOWN:
810         case CONNMAN_SERVICE_STATE_IDLE:
811                 break;
812         case CONNMAN_SERVICE_STATE_ASSOCIATION:
813         case CONNMAN_SERVICE_STATE_CONFIGURATION:
814                 return TRUE;
815         case CONNMAN_SERVICE_STATE_DISCONNECT:
816         case CONNMAN_SERVICE_STATE_FAILURE:
817         case CONNMAN_SERVICE_STATE_READY:
818         case CONNMAN_SERVICE_STATE_ONLINE:
819                 break;
820         }
821
822         return FALSE;
823 }
824
825 static connman_bool_t explicit_connect(enum connman_session_reason reason)
826 {
827         switch (reason) {
828         case CONNMAN_SESSION_REASON_UNKNOWN:
829         case CONNMAN_SESSION_REASON_FREE_RIDE:
830                 break;
831         case CONNMAN_SESSION_REASON_CONNECT:
832                 return TRUE;
833         }
834
835         return FALSE;
836 }
837
838 static connman_bool_t explicit_disconnect(struct session_info *info)
839 {
840         if (info->entry == NULL)
841                 return FALSE;
842
843         DBG("reason %s service %p state %d",
844                 reason2string(info->entry->reason),
845                 info->entry->service, info->entry->state);
846
847         if (info->entry->reason == CONNMAN_SESSION_REASON_UNKNOWN)
848                 return FALSE;
849
850         if (explicit_connect(info->entry->reason) == FALSE)
851                 return FALSE;
852
853         if (__connman_service_session_dec(info->entry->service) == FALSE)
854                 return FALSE;
855
856         return TRUE;
857 }
858
859 struct pending_data {
860         unsigned int timeout;
861         struct service_entry *entry;
862         gboolean (*cb)(gpointer);
863 };
864
865 static void pending_timeout_free(gpointer data, gpointer user_data)
866 {
867         struct pending_data *pending = data;
868
869         DBG("pending %p timeout %d", pending, pending->timeout);
870         g_source_remove(pending->timeout);
871         g_free(pending);
872 }
873
874 static void pending_timeout_remove_all(struct service_entry *entry)
875 {
876         DBG("");
877
878         g_slist_foreach(entry->pending_timeouts, pending_timeout_free, NULL);
879         g_slist_free(entry->pending_timeouts);
880         entry->pending_timeouts = NULL;
881 }
882
883 static gboolean pending_timeout_cb(gpointer data)
884 {
885         struct pending_data *pending = data;
886         struct service_entry *entry = pending->entry;
887         gboolean ret;
888
889         DBG("pending %p timeout %d", pending, pending->timeout);
890
891         ret = pending->cb(pending->entry);
892         if (ret == FALSE) {
893                 entry->pending_timeouts =
894                         g_slist_remove(entry->pending_timeouts,
895                                         pending);
896                 g_free(pending);
897         }
898         return ret;
899 }
900
901 static connman_bool_t pending_timeout_add(unsigned int seconds,
902                                         gboolean (*cb)(gpointer),
903                                         struct service_entry *entry)
904 {
905         struct pending_data *pending = g_try_new0(struct pending_data, 1);
906
907         if (pending == NULL || cb == NULL || entry == NULL) {
908                 g_free(pending);
909                 return FALSE;
910         }
911
912         pending->cb = cb;
913         pending->entry = entry;
914         pending->timeout = g_timeout_add_seconds(seconds, pending_timeout_cb,
915                                                 pending);
916         entry->pending_timeouts = g_slist_prepend(entry->pending_timeouts,
917                                                 pending);
918
919         DBG("pending %p entry %p timeout id %d", pending, entry,
920                 pending->timeout);
921
922         return TRUE;
923 }
924
925 static gboolean call_disconnect(gpointer user_data)
926 {
927         struct service_entry *entry = user_data;
928         struct connman_service *service = entry->service;
929
930         /*
931          * TODO: We should mark this entry as pending work. In case
932          * disconnect fails we just unassign this session from the
933          * service and can't do anything later on it
934          */
935         DBG("disconnect service %p", service);
936         __connman_service_disconnect(service);
937
938         return FALSE;
939 }
940
941 static gboolean call_connect(gpointer user_data)
942 {
943         struct service_entry *entry = user_data;
944         struct connman_service *service = entry->service;
945
946         DBG("connect service %p", service);
947         __connman_service_connect(service);
948
949         return FALSE;
950 }
951
952 static void deselect_service(struct session_info *info)
953 {
954         struct service_entry *entry;
955         connman_bool_t disconnect, connected;
956
957         DBG("");
958
959         if (info->entry == NULL)
960                 return;
961
962         disconnect = explicit_disconnect(info);
963
964         connected = is_connecting(info->entry->state) == TRUE ||
965                         is_connected(info->entry->state) == TRUE;
966
967         info->state = CONNMAN_SESSION_STATE_DISCONNECTED;
968         info->entry->reason = CONNMAN_SESSION_REASON_UNKNOWN;
969
970         entry = info->entry;
971         info->entry = NULL;
972
973         DBG("disconnect %d connected %d", disconnect, connected);
974
975         if (disconnect == TRUE && connected == TRUE)
976                 pending_timeout_add(0, call_disconnect, entry);
977 }
978
979 static void deselect_and_disconnect(struct connman_session *session)
980 {
981         struct session_info *info = session->info;
982
983         deselect_service(info);
984
985         info->reason = CONNMAN_SESSION_REASON_FREE_RIDE;
986 }
987
988 static void select_connected_service(struct session_info *info,
989                                         struct service_entry *entry)
990 {
991         enum connman_session_state state;
992
993         state = service_to_session_state(entry->state);
994         if (is_type_matching_state(&state, info->config.type) == FALSE)
995                 return;
996
997         info->state = state;
998
999         info->entry = entry;
1000         info->entry->reason = info->reason;
1001
1002         if (explicit_connect(info->reason) == FALSE)
1003                 return;
1004
1005         __connman_service_session_inc(info->entry->service);
1006 }
1007
1008 static void select_offline_service(struct session_info *info,
1009                                         struct service_entry *entry)
1010 {
1011         if (explicit_connect(info->reason) == FALSE)
1012                 return;
1013
1014         info->state = service_to_session_state(entry->state);
1015
1016         info->entry = entry;
1017         info->entry->reason = info->reason;
1018
1019         __connman_service_session_inc(info->entry->service);
1020         pending_timeout_add(0, call_connect, entry);
1021 }
1022
1023 static void select_service(struct session_info *info,
1024                                 struct service_entry *entry)
1025 {
1026         DBG("service %p", entry->service);
1027
1028         if (is_connected(entry->state) == TRUE)
1029                 select_connected_service(info, entry);
1030         else
1031                 select_offline_service(info, entry);
1032 }
1033
1034 static void select_and_connect(struct connman_session *session,
1035                                 enum connman_session_reason reason)
1036 {
1037         struct session_info *info = session->info;
1038         struct service_entry *entry = NULL;
1039         GSequenceIter *iter;
1040
1041         DBG("session %p reason %s", session, reason2string(reason));
1042
1043         info->reason = reason;
1044
1045         iter = g_sequence_get_begin_iter(session->service_list);
1046
1047         while (g_sequence_iter_is_end(iter) == FALSE) {
1048                 entry = g_sequence_get(iter);
1049
1050                 switch (entry->state) {
1051                 case CONNMAN_SERVICE_STATE_ASSOCIATION:
1052                 case CONNMAN_SERVICE_STATE_CONFIGURATION:
1053                 case CONNMAN_SERVICE_STATE_READY:
1054                 case CONNMAN_SERVICE_STATE_ONLINE:
1055                 case CONNMAN_SERVICE_STATE_IDLE:
1056                 case CONNMAN_SERVICE_STATE_DISCONNECT:
1057                         select_service(info, entry);
1058                         return;
1059                 case CONNMAN_SERVICE_STATE_UNKNOWN:
1060                 case CONNMAN_SERVICE_STATE_FAILURE:
1061                         break;
1062                 }
1063
1064                 iter = g_sequence_iter_next(iter);
1065         }
1066 }
1067
1068 static struct service_entry *create_service_entry(struct connman_service *service,
1069                                         const char *name,
1070                                         enum connman_service_state state)
1071 {
1072         struct service_entry *entry;
1073         enum connman_service_type type;
1074         int idx;
1075
1076         entry = g_try_new0(struct service_entry, 1);
1077         if (entry == NULL)
1078                 return entry;
1079
1080         entry->reason = CONNMAN_SESSION_REASON_UNKNOWN;
1081         entry->state = state;
1082         if (name != NULL)
1083                 entry->name = name;
1084         else
1085                 entry->name = "";
1086         entry->service = service;
1087
1088         idx = __connman_service_get_index(entry->service);
1089         entry->ifname = connman_inet_ifname(idx);
1090         if (entry->ifname == NULL)
1091                 entry->ifname = g_strdup("");
1092
1093         type = connman_service_get_type(entry->service);
1094         entry->bearer = service2bearer(type);
1095
1096         return entry;
1097 }
1098
1099 static void destroy_service_entry(gpointer data)
1100 {
1101         struct service_entry *entry = data;
1102
1103         pending_timeout_remove_all(entry);
1104         g_free(entry->ifname);
1105
1106         g_free(entry);
1107 }
1108
1109 static void populate_service_list(struct connman_session *session)
1110 {
1111         struct service_entry *entry;
1112         GSequenceIter *iter;
1113
1114         session->service_hash =
1115                 g_hash_table_new_full(g_direct_hash, g_direct_equal,
1116                                         NULL, NULL);
1117         session->service_list = __connman_service_get_list(session,
1118                                                         service_match,
1119                                                         create_service_entry,
1120                                                         destroy_service_entry);
1121
1122         g_sequence_sort(session->service_list, sort_services, session);
1123
1124         iter = g_sequence_get_begin_iter(session->service_list);
1125
1126         while (g_sequence_iter_is_end(iter) == FALSE) {
1127                 entry = g_sequence_get(iter);
1128
1129                 DBG("service %p type %s name %s", entry->service,
1130                         service2bearer(connman_service_get_type(entry->service)),
1131                         entry->name);
1132
1133                 g_hash_table_replace(session->service_hash,
1134                                         entry->service, iter);
1135
1136                 iter = g_sequence_iter_next(iter);
1137         }
1138 }
1139
1140 static void session_changed(struct connman_session *session,
1141                                 enum connman_session_trigger trigger)
1142 {
1143         struct session_info *info = session->info;
1144         struct session_info *info_last = session->info_last;
1145         GSequenceIter *service_iter = NULL, *service_iter_last = NULL;
1146         GSequence *service_list_last;
1147         GHashTable *service_hash_last;
1148
1149         /*
1150          * TODO: This only a placeholder for the 'real' algorithm to
1151          * play a bit around. So we are going to improve it step by step.
1152          */
1153
1154         DBG("session %p trigger %s reason %s", session, trigger2string(trigger),
1155                                                 reason2string(info->reason));
1156
1157         if (info->entry != NULL) {
1158                 enum connman_session_state state;
1159
1160                 state = service_to_session_state(info->entry->state);
1161
1162                 if (is_type_matching_state(&state, info->config.type) == TRUE)
1163                         info->state = state;
1164         }
1165
1166         switch (trigger) {
1167         case CONNMAN_SESSION_TRIGGER_UNKNOWN:
1168                 DBG("ignore session changed event");
1169                 return;
1170         case CONNMAN_SESSION_TRIGGER_SETTING:
1171                 if (info->config.allowed_bearers != info_last->config.allowed_bearers) {
1172
1173                         service_hash_last = session->service_hash;
1174                         service_list_last = session->service_list;
1175
1176                         populate_service_list(session);
1177
1178                         if (info->entry != NULL) {
1179                                 service_iter_last = g_hash_table_lookup(
1180                                                         service_hash_last,
1181                                                         info->entry->service);
1182                                 service_iter = g_hash_table_lookup(
1183                                                         session->service_hash,
1184                                                         info->entry->service);
1185                         }
1186
1187                         if (service_iter == NULL && service_iter_last != NULL) {
1188                                 /*
1189                                  * The currently selected service is
1190                                  * not part of this session anymore.
1191                                  */
1192                                 deselect_and_disconnect(session);
1193                         }
1194
1195                         g_hash_table_remove_all(service_hash_last);
1196                         g_sequence_free(service_list_last);
1197                 }
1198
1199                 if (info->config.type != info_last->config.type) {
1200                         if (info->state >= CONNMAN_SESSION_STATE_CONNECTED &&
1201                                         is_type_matching_state(&info->state,
1202                                                         info->config.type) == FALSE)
1203                                 deselect_and_disconnect(session);
1204                 }
1205
1206                 if (info->state == CONNMAN_SESSION_STATE_DISCONNECTED) {
1207                         select_and_connect(session,
1208                                         CONNMAN_SESSION_REASON_FREE_RIDE);
1209                 }
1210
1211                 break;
1212         case CONNMAN_SESSION_TRIGGER_ECALL:
1213                 /*
1214                  * For the time beeing we fallback to normal connect
1215                  * strategy.
1216                  */
1217         case CONNMAN_SESSION_TRIGGER_CONNECT:
1218                 if (info->state >= CONNMAN_SESSION_STATE_CONNECTED) {
1219                         if (info->entry->reason == CONNMAN_SESSION_REASON_CONNECT)
1220                                 break;
1221                         info->entry->reason = CONNMAN_SESSION_REASON_CONNECT;
1222                         __connman_service_session_inc(info->entry->service);
1223                         break;
1224                 }
1225
1226                 if (info->entry != NULL &&
1227                                 is_connecting(info->entry->state) == TRUE) {
1228                         break;
1229                 }
1230
1231                 select_and_connect(session,
1232                                 CONNMAN_SESSION_REASON_CONNECT);
1233
1234                 break;
1235         case CONNMAN_SESSION_TRIGGER_DISCONNECT:
1236                 deselect_and_disconnect(session);
1237
1238                 break;
1239         case CONNMAN_SESSION_TRIGGER_SERVICE:
1240                 if (info->entry != NULL &&
1241                         (is_connecting(info->entry->state) == TRUE ||
1242                                 is_connected(info->entry->state) == TRUE)) {
1243                         break;
1244                 }
1245
1246                 deselect_and_disconnect(session);
1247
1248                 if (info->reason == CONNMAN_SESSION_REASON_FREE_RIDE) {
1249                         select_and_connect(session, info->reason);
1250                 }
1251
1252                 break;
1253         }
1254
1255         session_notify(session);
1256 }
1257
1258 static DBusMessage *connect_session(DBusConnection *conn,
1259                                         DBusMessage *msg, void *user_data)
1260 {
1261         struct connman_session *session = user_data;
1262
1263         DBG("session %p", session);
1264
1265         if (ecall_session != NULL) {
1266                 if (ecall_session->ecall == TRUE && ecall_session != session)
1267                         return __connman_error_failed(msg, EBUSY);
1268
1269                 session->ecall = TRUE;
1270                 session_changed(session, CONNMAN_SESSION_TRIGGER_ECALL);
1271         } else
1272                 session_changed(session, CONNMAN_SESSION_TRIGGER_CONNECT);
1273
1274         return g_dbus_create_reply(msg, DBUS_TYPE_INVALID);
1275 }
1276
1277 static DBusMessage *disconnect_session(DBusConnection *conn,
1278                                         DBusMessage *msg, void *user_data)
1279 {
1280         struct connman_session *session = user_data;
1281
1282         DBG("session %p", session);
1283
1284         if (ecall_session != NULL) {
1285                 if (ecall_session->ecall == TRUE && ecall_session != session)
1286                         return __connman_error_failed(msg, EBUSY);
1287
1288                 session->ecall = FALSE;
1289         }
1290
1291         session_changed(session, CONNMAN_SESSION_TRIGGER_DISCONNECT);
1292
1293         return g_dbus_create_reply(msg, DBUS_TYPE_INVALID);
1294 }
1295
1296 static DBusMessage *change_session(DBusConnection *conn,
1297                                         DBusMessage *msg, void *user_data)
1298 {
1299         struct connman_session *session = user_data;
1300         struct session_info *info = session->info;
1301         DBusMessageIter iter, value;
1302         const char *name;
1303         const char *val;
1304         GSList *allowed_bearers;
1305
1306         DBG("session %p", session);
1307         if (dbus_message_iter_init(msg, &iter) == FALSE)
1308                 return __connman_error_invalid_arguments(msg);
1309
1310         if (dbus_message_iter_get_arg_type(&iter) != DBUS_TYPE_STRING)
1311                 return __connman_error_invalid_arguments(msg);
1312
1313         dbus_message_iter_get_basic(&iter, &name);
1314         dbus_message_iter_next(&iter);
1315
1316         if (dbus_message_iter_get_arg_type(&iter) != DBUS_TYPE_VARIANT)
1317                 return __connman_error_invalid_arguments(msg);
1318
1319         dbus_message_iter_recurse(&iter, &value);
1320
1321         switch (dbus_message_iter_get_arg_type(&value)) {
1322         case DBUS_TYPE_ARRAY:
1323                 if (g_str_equal(name, "AllowedBearers") == TRUE) {
1324                         allowed_bearers = session_parse_allowed_bearers(&value);
1325
1326                         connman_session_free_bearers(info->config.allowed_bearers);
1327                         if (allowed_bearers == NULL) {
1328                                 allowed_bearers = connman_session_allowed_bearers_any();
1329
1330                                 if (allowed_bearers == NULL)
1331                                         return __connman_error_failed(msg, ENOMEM);
1332                         }
1333
1334                         info->config.allowed_bearers = allowed_bearers;
1335                 } else {
1336                         goto err;
1337                 }
1338                 break;
1339         case DBUS_TYPE_STRING:
1340                 if (g_str_equal(name, "ConnectionType") == TRUE) {
1341                         dbus_message_iter_get_basic(&value, &val);
1342                         info->config.type = string2type(val);
1343                 } else {
1344                         goto err;
1345                 }
1346                 break;
1347         default:
1348                 goto err;
1349         }
1350
1351         session_changed(session, CONNMAN_SESSION_TRIGGER_SETTING);
1352
1353         return g_dbus_create_reply(msg, DBUS_TYPE_INVALID);
1354
1355 err:
1356         return __connman_error_invalid_arguments(msg);
1357 }
1358
1359 static void release_session(gpointer key, gpointer value, gpointer user_data)
1360 {
1361         struct connman_session *session = value;
1362         DBusMessage *message;
1363
1364         DBG("owner %s path %s", session->owner, session->notify_path);
1365
1366         if (session->notify_watch > 0)
1367                 g_dbus_remove_watch(connection, session->notify_watch);
1368
1369         g_dbus_unregister_interface(connection, session->session_path,
1370                                                 CONNMAN_SESSION_INTERFACE);
1371
1372         message = dbus_message_new_method_call(session->owner,
1373                                                 session->notify_path,
1374                                                 CONNMAN_NOTIFICATION_INTERFACE,
1375                                                 "Release");
1376         if (message == NULL)
1377                 return;
1378
1379         dbus_message_set_no_reply(message, TRUE);
1380
1381         g_dbus_send_message(connection, message);
1382 }
1383
1384 static int session_disconnect(struct connman_session *session)
1385 {
1386         DBG("session %p, %s", session, session->owner);
1387
1388         if (session->notify_watch > 0)
1389                 g_dbus_remove_watch(connection, session->notify_watch);
1390
1391         g_dbus_unregister_interface(connection, session->session_path,
1392                                                 CONNMAN_SESSION_INTERFACE);
1393
1394         deselect_and_disconnect(session);
1395
1396         g_hash_table_remove(session_hash, session->session_path);
1397
1398         return 0;
1399 }
1400
1401 static void owner_disconnect(DBusConnection *conn, void *user_data)
1402 {
1403         struct connman_session *session = user_data;
1404
1405         DBG("session %p, %s died", session, session->owner);
1406
1407         session_disconnect(session);
1408 }
1409
1410 static DBusMessage *destroy_session(DBusConnection *conn,
1411                                         DBusMessage *msg, void *user_data)
1412 {
1413         struct connman_session *session = user_data;
1414
1415         DBG("session %p", session);
1416
1417         if (ecall_session != NULL && ecall_session != session)
1418                 return __connman_error_failed(msg, EBUSY);
1419
1420         session_disconnect(session);
1421
1422         return g_dbus_create_reply(msg, DBUS_TYPE_INVALID);
1423 }
1424
1425 static const GDBusMethodTable session_methods[] = {
1426         { GDBUS_METHOD("Destroy", NULL, NULL, destroy_session) },
1427         { GDBUS_METHOD("Connect", NULL, NULL, connect_session) },
1428         { GDBUS_METHOD("Disconnect", NULL, NULL,
1429                         disconnect_session ) },
1430         { GDBUS_METHOD("Change",
1431                         GDBUS_ARGS({ "name", "s" }, { "value", "v" }),
1432                         NULL, change_session) },
1433         { },
1434 };
1435
1436 int __connman_session_create(DBusMessage *msg)
1437 {
1438         const char *owner, *notify_path;
1439         char *session_path = NULL;
1440         DBusMessageIter iter, array;
1441         struct connman_session *session = NULL;
1442         struct session_info *info, *info_last;
1443         enum connman_session_type type = CONNMAN_SESSION_TYPE_ANY;
1444         GSList *allowed_bearers = NULL;
1445         int err;
1446
1447         owner = dbus_message_get_sender(msg);
1448
1449         DBG("owner %s", owner);
1450
1451         if (ecall_session != NULL && ecall_session->ecall == TRUE) {
1452                 /*
1453                  * If there is an emergency call already going on,
1454                  * ignore session creation attempt
1455                  */
1456                 err = -EBUSY;
1457                 goto err;
1458         }
1459
1460         dbus_message_iter_init(msg, &iter);
1461         dbus_message_iter_recurse(&iter, &array);
1462
1463         while (dbus_message_iter_get_arg_type(&array) == DBUS_TYPE_DICT_ENTRY) {
1464                 DBusMessageIter entry, value;
1465                 const char *key, *val;
1466
1467                 dbus_message_iter_recurse(&array, &entry);
1468                 dbus_message_iter_get_basic(&entry, &key);
1469
1470                 dbus_message_iter_next(&entry);
1471                 dbus_message_iter_recurse(&entry, &value);
1472
1473                 switch (dbus_message_iter_get_arg_type(&value)) {
1474                 case DBUS_TYPE_ARRAY:
1475                         if (g_str_equal(key, "AllowedBearers") == TRUE) {
1476                                 allowed_bearers =
1477                                         session_parse_allowed_bearers(&value);
1478                         } else {
1479                                 return -EINVAL;
1480                         }
1481                         break;
1482                 case DBUS_TYPE_STRING:
1483                         if (g_str_equal(key, "ConnectionType") == TRUE) {
1484                                 dbus_message_iter_get_basic(&value, &val);
1485                                 type = string2type(val);
1486                         } else {
1487                                 return -EINVAL;
1488                         }
1489                 }
1490                 dbus_message_iter_next(&array);
1491         }
1492
1493         dbus_message_iter_next(&iter);
1494         dbus_message_iter_get_basic(&iter, &notify_path);
1495
1496         if (notify_path == NULL) {
1497                 err = -EINVAL;
1498                 goto err;
1499         }
1500
1501         session_path = g_strdup_printf("/sessions%s", notify_path);
1502         if (session_path == NULL) {
1503                 err = -ENOMEM;
1504                 goto err;
1505         }
1506
1507         session = g_hash_table_lookup(session_hash, session_path);
1508         if (session != NULL) {
1509                 session = NULL;
1510                 err = -EEXIST;
1511                 goto err;
1512         }
1513
1514         session = g_try_new0(struct connman_session, 1);
1515         if (session == NULL) {
1516                 err = -ENOMEM;
1517                 goto err;
1518         }
1519
1520         session->info = g_try_new0(struct session_info, 1);
1521         if (session->info == NULL) {
1522                 err = -ENOMEM;
1523                 goto err;
1524         }
1525
1526         session->info_last = g_try_new0(struct session_info, 1);
1527         if (session->info_last == NULL) {
1528                 err = -ENOMEM;
1529                 goto err;
1530         }
1531
1532         info = session->info;
1533         info_last = session->info_last;
1534
1535         session->owner = g_strdup(owner);
1536         session->session_path = session_path;
1537         session->notify_path = g_strdup(notify_path);
1538         session->notify_watch =
1539                 g_dbus_add_disconnect_watch(connection, session->owner,
1540                                         owner_disconnect, session, NULL);
1541
1542         err = assign_policy_plugin(session);
1543         if (err < 0)
1544                 goto err;
1545         err = create_policy_config(session);
1546         if (err < 0)
1547                 goto err;
1548
1549         if (session->policy_config->ecall == TRUE)
1550                 ecall_session = session;
1551
1552         info->state = CONNMAN_SESSION_STATE_DISCONNECTED;
1553         info->config.type = type;
1554         info->config.priority = session->policy_config->priority;
1555         info->config.roaming_policy = session->policy_config->roaming_policy;
1556         info->entry = NULL;
1557
1558         if (allowed_bearers == NULL) {
1559                 info->config.allowed_bearers =
1560                                 connman_session_allowed_bearers_any();
1561
1562                 if (info->config.allowed_bearers == NULL) {
1563                         err = -ENOMEM;
1564                         goto err;
1565                 }
1566         } else {
1567                 info->config.allowed_bearers = allowed_bearers;
1568         }
1569
1570         g_hash_table_replace(session_hash, session->session_path, session);
1571
1572         DBG("add %s", session->session_path);
1573
1574         if (g_dbus_register_interface(connection, session->session_path,
1575                                         CONNMAN_SESSION_INTERFACE,
1576                                         session_methods, NULL,
1577                                         NULL, session, NULL) == FALSE) {
1578                 connman_error("Failed to register %s", session->session_path);
1579                 g_hash_table_remove(session_hash, session->session_path);
1580                 session = NULL;
1581
1582                 err = -EINVAL;
1583                 goto err;
1584         }
1585
1586         g_dbus_send_reply(connection, msg,
1587                                 DBUS_TYPE_OBJECT_PATH, &session->session_path,
1588                                 DBUS_TYPE_INVALID);
1589
1590
1591         populate_service_list(session);
1592
1593         info_last->state = info->state;
1594         info_last->config.priority = info->config.priority;
1595         info_last->config.roaming_policy = info->config.roaming_policy;
1596         info_last->entry = info->entry;
1597         info_last->config.allowed_bearers = info->config.allowed_bearers;
1598
1599         session->append_all = TRUE;
1600
1601         session_changed(session, CONNMAN_SESSION_TRIGGER_SETTING);
1602
1603         return 0;
1604
1605 err:
1606         connman_error("Failed to create session");
1607
1608         if (session != NULL) {
1609                 if (session->info_last != NULL)
1610                         g_free(session->info_last);
1611                 if (session->info != NULL)
1612                         g_free(session->info);
1613                 g_free(session);
1614         }
1615
1616         g_free(session_path);
1617
1618         connman_session_free_bearers(allowed_bearers);
1619
1620         return err;
1621 }
1622
1623 int __connman_session_destroy(DBusMessage *msg)
1624 {
1625         const char *owner, *session_path;
1626         struct connman_session *session;
1627
1628         owner = dbus_message_get_sender(msg);
1629
1630         DBG("owner %s", owner);
1631
1632         dbus_message_get_args(msg, NULL, DBUS_TYPE_OBJECT_PATH, &session_path,
1633                                                         DBUS_TYPE_INVALID);
1634         if (session_path == NULL)
1635                 return -EINVAL;
1636
1637         session = g_hash_table_lookup(session_hash, session_path);
1638         if (session == NULL)
1639                 return -EINVAL;
1640
1641         if (g_strcmp0(owner, session->owner) != 0)
1642                 return -EACCES;
1643
1644         session_disconnect(session);
1645
1646         return 0;
1647 }
1648
1649 connman_bool_t __connman_session_mode()
1650 {
1651         return sessionmode;
1652 }
1653
1654 void __connman_session_set_mode(connman_bool_t enable)
1655 {
1656         DBG("enable %d", enable);
1657
1658         if (sessionmode != enable) {
1659                 sessionmode = enable;
1660
1661                 connman_dbus_property_changed_basic(CONNMAN_MANAGER_PATH,
1662                                 CONNMAN_MANAGER_INTERFACE, "SessionMode",
1663                                 DBUS_TYPE_BOOLEAN, &sessionmode);
1664         }
1665
1666         if (sessionmode == TRUE)
1667                 __connman_service_disconnect_all();
1668 }
1669
1670 static void service_add(struct connman_service *service,
1671                         const char *name)
1672 {
1673         GHashTableIter iter;
1674         GSequenceIter *iter_service_list;
1675         gpointer key, value;
1676         struct connman_session *session;
1677         struct service_entry *entry;
1678
1679         DBG("service %p", service);
1680
1681         g_hash_table_iter_init(&iter, session_hash);
1682
1683         while (g_hash_table_iter_next(&iter, &key, &value) == TRUE) {
1684                 session = value;
1685
1686                 if (service_match(session, service) == FALSE)
1687                         continue;
1688
1689                 entry = create_service_entry(service, name,
1690                                                 CONNMAN_SERVICE_STATE_IDLE);
1691                 if (entry == NULL)
1692                         continue;
1693
1694                 iter_service_list =
1695                         g_sequence_insert_sorted(session->service_list,
1696                                                         entry, sort_services,
1697                                                         session);
1698
1699                 g_hash_table_replace(session->service_hash, service,
1700                                         iter_service_list);
1701
1702                 session_changed(session, CONNMAN_SESSION_TRIGGER_SERVICE);
1703         }
1704 }
1705
1706 static void service_remove(struct connman_service *service)
1707 {
1708
1709         GHashTableIter iter;
1710         gpointer key, value;
1711         struct connman_session *session;
1712         struct session_info *info;
1713
1714         DBG("service %p", service);
1715
1716         g_hash_table_iter_init(&iter, session_hash);
1717
1718         while (g_hash_table_iter_next(&iter, &key, &value) == TRUE) {
1719                 GSequenceIter *seq_iter;
1720                 session = value;
1721                 info = session->info;
1722
1723                 seq_iter = g_hash_table_lookup(session->service_hash, service);
1724                 if (seq_iter == NULL)
1725                         continue;
1726
1727                 g_sequence_remove(seq_iter);
1728
1729                 if (info->entry != NULL && info->entry->service == service)
1730                         info->entry = NULL;
1731                 session_changed(session, CONNMAN_SESSION_TRIGGER_SERVICE);
1732         }
1733 }
1734
1735 static void service_state_changed(struct connman_service *service,
1736                                         enum connman_service_state state)
1737 {
1738         GHashTableIter iter;
1739         gpointer key, value;
1740
1741         DBG("service %p state %d", service, state);
1742
1743         g_hash_table_iter_init(&iter, session_hash);
1744
1745         while (g_hash_table_iter_next(&iter, &key, &value) == TRUE) {
1746                 struct connman_session *session = value;
1747                 GSequenceIter *service_iter;
1748
1749                 service_iter = g_hash_table_lookup(session->service_hash, service);
1750                 if (service_iter != NULL) {
1751                         struct service_entry *entry;
1752
1753                         entry = g_sequence_get(service_iter);
1754                         entry->state = state;
1755                 }
1756
1757                 session_changed(session,
1758                                 CONNMAN_SESSION_TRIGGER_SERVICE);
1759         }
1760 }
1761
1762 static void ipconfig_changed(struct connman_service *service,
1763                                 struct connman_ipconfig *ipconfig)
1764 {
1765         GHashTableIter iter;
1766         gpointer key, value;
1767         struct connman_session *session;
1768         struct session_info *info;
1769         enum connman_ipconfig_type type;
1770
1771         DBG("service %p ipconfig %p", service, ipconfig);
1772
1773         type = __connman_ipconfig_get_config_type(ipconfig);
1774
1775         g_hash_table_iter_init(&iter, session_hash);
1776
1777         while (g_hash_table_iter_next(&iter, &key, &value) == TRUE) {
1778                 session = value;
1779                 info = session->info;
1780
1781                 if (info->state == CONNMAN_SESSION_STATE_DISCONNECTED)
1782                         continue;
1783
1784                 if (info->entry != NULL && info->entry->service == service) {
1785                         if (type == CONNMAN_IPCONFIG_TYPE_IPV4)
1786                                 ipconfig_ipv4_changed(session);
1787                         else if (type == CONNMAN_IPCONFIG_TYPE_IPV6)
1788                                 ipconfig_ipv6_changed(session);
1789                 }
1790         }
1791 }
1792
1793 static struct connman_notifier session_notifier = {
1794         .name                   = "session",
1795         .service_add            = service_add,
1796         .service_remove         = service_remove,
1797         .service_state_changed  = service_state_changed,
1798         .ipconfig_changed       = ipconfig_changed,
1799 };
1800
1801 int __connman_session_init(void)
1802 {
1803         int err;
1804
1805         DBG("");
1806
1807         connection = connman_dbus_get_connection();
1808         if (connection == NULL)
1809                 return -1;
1810
1811         err = connman_notifier_register(&session_notifier);
1812         if (err < 0) {
1813                 dbus_connection_unref(connection);
1814                 return err;
1815         }
1816
1817         session_hash = g_hash_table_new_full(g_str_hash, g_str_equal,
1818                                                 NULL, cleanup_session);
1819
1820         sessionmode = FALSE;
1821         return 0;
1822 }
1823
1824 void __connman_session_cleanup(void)
1825 {
1826         DBG("");
1827
1828         if (connection == NULL)
1829                 return;
1830
1831         connman_notifier_unregister(&session_notifier);
1832
1833         g_hash_table_foreach(session_hash, release_session, NULL);
1834         g_hash_table_destroy(session_hash);
1835         session_hash = NULL;
1836
1837         dbus_connection_unref(connection);
1838 }