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