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