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