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