src/session.c

   1 /*
   2  *
   3  *  Connection Manager
   4  *
   5  *  Copyright (C) 2007-2012  Intel Corporation. All rights reserved.
   6  *  Copyright (C) 2011  BWM CarIT GmbH. All rights reserved.
   7  *
   8  *  This program is free software; you can redistribute it and/or modify
   9  *  it under the terms of the GNU General Public License version 2 as
  10  *  published by the Free Software Foundation.
  11  *
  12  *  This program is distributed in the hope that it will be useful,
  13  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  *  GNU General Public License for more details.
  16  *
  17  *  You should have received a copy of the GNU General Public License
  18  *  along with this program; if not, write to the Free Software
  19  *  Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
  20  *
  21  */
  22
  23 #ifdef HAVE_CONFIG_H
  24 #include <config.h>
  25 #endif
  26
  27 #include <errno.h>
  28
  29 #include <gdbus.h>
  30
  31 #include <connman/session.h>
  32
  33 #include "connman.h"
  34
  35 static DBusConnection *connection;
  36 static GHashTable *session_hash;
  37 static connman_bool_t sessionmode;
  38 static struct connman_session *ecall_session;
  39 static GSList *policy_list;
  40
  41 enum connman_session_trigger {
  42         CONNMAN_SESSION_TRIGGER_UNKNOWN         = 0,
  43         CONNMAN_SESSION_TRIGGER_SETTING         = 1,
  44         CONNMAN_SESSION_TRIGGER_CONNECT         = 2,
  45         CONNMAN_SESSION_TRIGGER_DISCONNECT      = 3,
  46         CONNMAN_SESSION_TRIGGER_SERVICE         = 4,
  47         CONNMAN_SESSION_TRIGGER_ECALL           = 5,
  48 };
  49
  50 enum connman_session_reason {
  51         CONNMAN_SESSION_REASON_UNKNOWN          = 0,
  52         CONNMAN_SESSION_REASON_CONNECT          = 1,
  53         CONNMAN_SESSION_REASON_FREE_RIDE        = 2,
  54 };
  55
  56 enum connman_session_state {
  57         CONNMAN_SESSION_STATE_DISCONNECTED   = 0,
  58         CONNMAN_SESSION_STATE_CONNECTED      = 1,
  59         CONNMAN_SESSION_STATE_ONLINE         = 2,
  60 };
  61
  62 struct service_entry {
  63         /* track why this service was selected */
  64         enum connman_session_reason reason;
  65         enum connman_service_state state;
  66         const char *name;
  67         struct connman_service *service;
  68         char *ifname;
  69         const char *bearer;
  70         GSList *pending_timeouts;
  71 };
  72
  73 struct session_info {
  74         struct connman_session_config config;
  75         enum connman_session_state state;
  76         struct service_entry *entry;
  77         enum connman_session_reason reason;
  78 };
  79
  80 struct connman_session {
  81         char *owner;
  82         char *session_path;
  83         char *notify_path;
  84         guint notify_watch;
  85
  86         struct connman_session_policy *policy;
  87
  88         connman_bool_t append_all;
  89         struct session_info *info;
  90         struct session_info *info_last;
  91         struct connman_session_config *policy_config;
  92
  93         connman_bool_t ecall;
  94
  95         GSequence *service_list;
  96         GHashTable *service_hash;
  97 };
  98
  99 static const char *trigger2string(enum connman_session_trigger trigger)
 100 {
 101         switch (trigger) {
 102         case CONNMAN_SESSION_TRIGGER_UNKNOWN:
 103                 break;
 104         case CONNMAN_SESSION_TRIGGER_SETTING:
 105                 return "setting";
 106         case CONNMAN_SESSION_TRIGGER_CONNECT:
 107                 return "connect";
 108         case CONNMAN_SESSION_TRIGGER_DISCONNECT:
 109                 return "disconnect";
 110         case CONNMAN_SESSION_TRIGGER_SERVICE:
 111                 return "service";
 112         case CONNMAN_SESSION_TRIGGER_ECALL:
 113                 return "ecall";
 114         }
 115
 116         return NULL;
 117 }
 118
 119 static const char *reason2string(enum connman_session_reason reason)
 120 {
 121         switch (reason) {
 122         case CONNMAN_SESSION_REASON_UNKNOWN:
 123                 return "unknown";
 124         case CONNMAN_SESSION_REASON_CONNECT:
 125                 return "connect";
 126         case CONNMAN_SESSION_REASON_FREE_RIDE:
 127                 return "free-ride";
 128         }
 129
 130         return NULL;
 131 }
 132
 133 static const char *state2string(enum connman_session_state state)
 134 {
 135         switch (state) {
 136         case CONNMAN_SESSION_STATE_DISCONNECTED:
 137                 return "disconnected";
 138         case CONNMAN_SESSION_STATE_CONNECTED:
 139                 return "connected";
 140         case CONNMAN_SESSION_STATE_ONLINE:
 141                 return "online";
 142         }
 143
 144         return NULL;
 145 }
 146
 147 static const char *type2string(enum connman_session_type type)
 148 {
 149         switch (type) {
 150         case CONNMAN_SESSION_TYPE_UNKNOWN:
 151                 return "";
 152         case CONNMAN_SESSION_TYPE_ANY:
 153                 return "any";
 154         case CONNMAN_SESSION_TYPE_LOCAL:
 155                 return "local";
 156         case CONNMAN_SESSION_TYPE_INTERNET:
 157                 return "internet";
 158         }
 159
 160         return NULL;
 161 }
 162
 163 static enum connman_session_type string2type(const char *type)
 164 {
 165         if (g_strcmp0(type, "any") == 0)
 166                 return CONNMAN_SESSION_TYPE_ANY;
 167         if (g_strcmp0(type, "local") == 0)
 168                 return CONNMAN_SESSION_TYPE_LOCAL;
 169         else if (g_strcmp0(type, "internet") == 0)
 170                 return CONNMAN_SESSION_TYPE_INTERNET;
 171
 172         return CONNMAN_SESSION_TYPE_UNKNOWN;
 173 }
 174
 175 static int bearer2service(const char *bearer, enum connman_service_type *type)
 176 {
 177         if (g_strcmp0(bearer, "ethernet") == 0)
 178                 *type = CONNMAN_SERVICE_TYPE_ETHERNET;
 179         else if (g_strcmp0(bearer, "wifi") == 0)
 180                 *type = CONNMAN_SERVICE_TYPE_WIFI;
 181         else if (g_strcmp0(bearer, "wimax") == 0)
 182                 *type = CONNMAN_SERVICE_TYPE_WIMAX;
 183         else if (g_strcmp0(bearer, "bluetooth") == 0)
 184                 *type = CONNMAN_SERVICE_TYPE_BLUETOOTH;
 185         else if (g_strcmp0(bearer, "cellular") == 0)
 186                 *type = CONNMAN_SERVICE_TYPE_CELLULAR;
 187         else if (g_strcmp0(bearer, "vpn") == 0)
 188                 *type = CONNMAN_SERVICE_TYPE_VPN;
 189         else if (g_strcmp0(bearer, "*") == 0)
 190                 *type = CONNMAN_SERVICE_TYPE_UNKNOWN;
 191         else
 192                 return -EINVAL;
 193
 194         return 0;
 195 }
 196
 197 static char *service2bearer(enum connman_service_type type)
 198 {
 199         switch (type) {
 200         case CONNMAN_SERVICE_TYPE_ETHERNET:
 201                 return "ethernet";
 202         case CONNMAN_SERVICE_TYPE_WIFI:
 203                 return "wifi";
 204         case CONNMAN_SERVICE_TYPE_WIMAX:
 205                 return "wimax";
 206         case CONNMAN_SERVICE_TYPE_BLUETOOTH:
 207                 return "bluetooth";
 208         case CONNMAN_SERVICE_TYPE_CELLULAR:
 209                 return "cellular";
 210         case CONNMAN_SERVICE_TYPE_VPN:
 211                 return "vpn";
 212         case CONNMAN_SERVICE_TYPE_UNKNOWN:
 213         case CONNMAN_SERVICE_TYPE_SYSTEM:
 214         case CONNMAN_SERVICE_TYPE_GPS:
 215         case CONNMAN_SERVICE_TYPE_GADGET:
 216                 return "";
 217         }
 218
 219         return "";
 220 }
 221
 222 static int assign_policy_plugin(struct connman_session *session)
 223 {
 224         if (session->policy != NULL)
 225                 return -EALREADY;
 226
 227         if (policy_list == NULL)
 228                 return 0;
 229
 230         session->policy = policy_list->data;
 231
 232         return 0;
 233 }
 234
 235 static int create_policy_config(struct connman_session *session,
 236                                 connman_session_config_cb callback,
 237                                 void *user_data)
 238 {
 239         struct connman_session_config *config;
 240
 241         if (session->policy == NULL) {
 242                 config = connman_session_create_default_config();
 243                 if (config == NULL)
 244                         return -ENOMEM;
 245
 246                 session->policy_config = config;
 247
 248                 return 0;
 249         }
 250
 251         return (*session->policy->create)(session, callback, user_data);
 252 }
 253
 254 static void destroy_policy_config(struct connman_session *session)
 255 {
 256         if (session->policy == NULL) {
 257                 connman_session_free_bearers(
 258                         session->policy_config->allowed_bearers);
 259                 g_free(session->policy_config);
 260         } else {
 261                 (*session->policy->destroy)(session);
 262         }
 263 }
 264
 265 static void probe_policy(struct connman_session_policy *policy)
 266 {
 267
 268         GHashTableIter iter;
 269         gpointer key, value;
 270         struct connman_session *session;
 271
 272         DBG("policy %p name %s", policy, policy->name);
 273
 274         g_hash_table_iter_init(&iter, session_hash);
 275
 276         while (g_hash_table_iter_next(&iter, &key, &value) == TRUE) {
 277                 session = value;
 278
 279                 if (session->policy != NULL)
 280                         continue;
 281
 282                 assign_policy_plugin(session);
 283         }
 284 }
 285
 286 static void remove_policy(struct connman_session_policy *policy)
 287 {
 288         GHashTableIter iter;
 289         gpointer key, value;
 290         struct connman_session *session;
 291
 292         DBG("policy %p name %s", policy, policy->name);
 293
 294         g_hash_table_iter_init(&iter, session_hash);
 295
 296         while (g_hash_table_iter_next(&iter, &key, &value) == TRUE) {
 297                 session = value;
 298
 299                 if (session->policy != policy)
 300                         continue;
 301
 302                 session->policy = NULL;
 303                 assign_policy_plugin(session);
 304         }
 305 }
 306
 307 static gint compare_priority(gconstpointer a, gconstpointer b)
 308 {
 309         const struct connman_session_policy *policy1 = a;
 310         const struct connman_session_policy *policy2 = b;
 311
 312         return policy2->priority - policy1->priority;
 313 }
 314
 315
 316 int connman_session_policy_register(struct connman_session_policy *policy)
 317 {
 318         DBG("name %s", policy->name);
 319
 320         if (policy->create == NULL || policy->destroy == NULL)
 321                 return -EINVAL;
 322
 323         policy_list = g_slist_insert_sorted(policy_list, policy,
 324                                                 compare_priority);
 325
 326         probe_policy(policy);
 327
 328         return 0;
 329 }
 330
 331 void connman_session_policy_unregister(struct connman_session_policy *policy)
 332 {
 333         DBG("name %s", policy->name);
 334
 335         policy_list = g_slist_remove(policy_list, policy);
 336
 337         remove_policy(policy);
 338 }
 339
 340 struct connman_session_config *connman_session_create_default_config(void)
 341 {
 342         struct connman_session_config *config;
 343
 344         config = g_try_new0(struct connman_session_config, 1);
 345         if (config == NULL)
 346                 return NULL;
 347
 348         config->priority = FALSE;
 349         config->roaming_policy = CONNMAN_SESSION_ROAMING_POLICY_DEFAULT;
 350         config->type = CONNMAN_SESSION_TYPE_ANY;
 351         config->ecall = FALSE;
 352         config->allowed_bearers = connman_session_allowed_bearers_any();
 353         if (config->allowed_bearers == NULL) {
 354                 g_free(config);
 355                 return NULL;
 356         }
 357
 358         return config;
 359 }
 360
 361 static enum connman_session_type apply_policy_on_type(
 362                         enum connman_session_type policy,
 363                         enum connman_session_type type)
 364 {
 365         if (type == CONNMAN_SESSION_TYPE_UNKNOWN)
 366                 return CONNMAN_SESSION_TYPE_UNKNOWN;
 367
 368         if (policy == CONNMAN_SESSION_TYPE_ANY)
 369                 return type;
 370
 371         if (policy == CONNMAN_SESSION_TYPE_LOCAL)
 372                 return CONNMAN_SESSION_TYPE_LOCAL;
 373
 374         return CONNMAN_SESSION_TYPE_INTERNET;
 375 }
 376
 377 static void cleanup_bearer(gpointer data)
 378 {
 379         struct connman_session_bearer *bearer = data;
 380
 381         g_free(bearer);
 382 }
 383
 384 void connman_session_free_bearers(GSList *bearers)
 385 {
 386         g_slist_free_full(bearers, cleanup_bearer);
 387 }
 388
 389 static int parse_bearers(DBusMessageIter *iter, GSList **list)
 390 {
 391         struct connman_session_bearer *bearer;
 392         DBusMessageIter array;
 393         int type, err;
 394
 395         dbus_message_iter_recurse(iter, &array);
 396
 397         *list = NULL;
 398
 399         while ((type = dbus_message_iter_get_arg_type(&array)) !=
 400                         DBUS_TYPE_INVALID) {
 401                 char *bearer_name = NULL;
 402
 403                 if (type != DBUS_TYPE_STRING) {
 404                         connman_session_free_bearers(*list);
 405                         *list = NULL;
 406                         return -EINVAL;
 407                 }
 408
 409                 dbus_message_iter_get_basic(&array, &bearer_name);
 410
 411                 if (g_strcmp0(bearer_name, "") == 0) {
 412                         /*
 413                          * An empty string means 'no match' which
 414                          * translates to allowed_bearers == NULL
 415                          */
 416                         goto next;
 417                 }
 418
 419                 bearer = g_try_new0(struct connman_session_bearer, 1);
 420                 if (bearer == NULL) {
 421                         connman_session_free_bearers(*list);
 422                         *list = NULL;
 423                         return -ENOMEM;
 424                 }
 425
 426                 err = bearer2service(bearer_name, &bearer->service_type);
 427                 if (err < 0) {
 428                         connman_session_free_bearers(*list);
 429                         *list = NULL;
 430                         return err;
 431                 }
 432
 433                 *list = g_slist_append(*list, bearer);
 434
 435         next:
 436                 dbus_message_iter_next(&array);
 437         }
 438
 439         return 0;
 440 }
 441
 442 static struct connman_session_bearer *clone_bearer(
 443                                         struct connman_session_bearer *orig)
 444 {
 445         struct connman_session_bearer *bearer;
 446
 447         bearer = g_try_new0(struct connman_session_bearer, 1);
 448         if (bearer == NULL)
 449                 return NULL;
 450
 451         bearer->service_type = orig->service_type;
 452
 453         return bearer;
 454 }
 455
 456 static int filter_bearer(GSList *policy_bearers,
 457                                 struct connman_session_bearer *bearer,
 458                                 GSList **list)
 459 {
 460         struct connman_session_bearer *policy, *tmp;
 461         GSList *it;
 462
 463         if (policy_bearers == NULL)
 464                 goto clone;
 465
 466         for (it = policy_bearers; it != NULL; it = it->next) {
 467                 policy = it->data;
 468
 469                 if (policy->service_type != CONNMAN_SERVICE_TYPE_UNKNOWN &&
 470                                 bearer->service_type != policy->service_type)
 471                         continue;
 472
 473                 goto clone;
 474         }
 475
 476         *list = NULL;
 477
 478         return 0;
 479
 480 clone:
 481         tmp = clone_bearer(bearer);
 482         if (tmp == NULL) {
 483                 connman_session_free_bearers(*list);
 484                 *list = NULL;
 485                 return -ENOMEM;
 486         }
 487         *list = g_slist_append(*list, tmp);
 488
 489         return 0;
 490 }
 491
 492 static int apply_policy_on_bearers(GSList *policy_bearers, GSList *bearers,
 493                                 GSList **list)
 494 {
 495         struct connman_session_bearer *bearer;
 496         GSList *it;
 497         int err;
 498
 499         *list = NULL;
 500
 501         for (it = bearers; it != NULL; it = it->next) {
 502                 bearer = it->data;
 503
 504                 err = filter_bearer(policy_bearers, bearer, list);
 505                 if (err < 0)
 506                         return err;
 507         }
 508
 509         return 0;
 510 }
 511
 512 GSList *connman_session_allowed_bearers_any(void)
 513 {
 514         struct connman_session_bearer *bearer;
 515         GSList *list = NULL;
 516
 517         bearer = g_try_new0(struct connman_session_bearer, 1);
 518         if (bearer == NULL)
 519                 return NULL;
 520
 521         bearer->service_type = CONNMAN_SERVICE_TYPE_UNKNOWN;
 522
 523         list = g_slist_append(list, bearer);
 524
 525         return list;
 526 }
 527
 528 static void append_allowed_bearers(DBusMessageIter *iter, void *user_data)
 529 {
 530         struct session_info *info = user_data;
 531         GSList *list;
 532
 533         for (list = info->config.allowed_bearers;
 534                         list != NULL; list = list->next) {
 535                 struct connman_session_bearer *bearer = list->data;
 536                 const char *name =
 537                         __connman_service_type2string(bearer->service_type);
 538
 539                 if (name == NULL)
 540                         name = "*";
 541
 542                 dbus_message_iter_append_basic(iter, DBUS_TYPE_STRING,
 543                                                 &name);
 544         }
 545 }
 546
 547 static void append_ipconfig_ipv4(DBusMessageIter *iter, void *user_data)
 548 {
 549         struct connman_service *service = user_data;
 550         struct connman_ipconfig *ipconfig_ipv4;
 551
 552         if (service == NULL)
 553                 return;
 554
 555         if (__connman_service_is_connected_state(service,
 556                                 CONNMAN_IPCONFIG_TYPE_IPV4) == FALSE) {
 557                 return;
 558         }
 559
 560         ipconfig_ipv4 = __connman_service_get_ip4config(service);
 561         if (ipconfig_ipv4 == NULL)
 562                 return;
 563
 564         __connman_ipconfig_append_ipv4(ipconfig_ipv4, iter);
 565 }
 566
 567 static void append_ipconfig_ipv6(DBusMessageIter *iter, void *user_data)
 568 {
 569         struct connman_service *service = user_data;
 570         struct connman_ipconfig *ipconfig_ipv4, *ipconfig_ipv6;
 571
 572         if (service == NULL)
 573                 return;
 574
 575         if (__connman_service_is_connected_state(service,
 576                                 CONNMAN_IPCONFIG_TYPE_IPV6) == FALSE) {
 577                 return;
 578         }
 579
 580         ipconfig_ipv4 = __connman_service_get_ip4config(service);
 581         ipconfig_ipv6 = __connman_service_get_ip6config(service);
 582         if (ipconfig_ipv6 == NULL)
 583                 return;
 584
 585         __connman_ipconfig_append_ipv6(ipconfig_ipv6, iter, ipconfig_ipv4);
 586 }
 587
 588 static void append_notify(DBusMessageIter *dict,
 589                                         struct connman_session *session)
 590 {
 591         struct session_info *info = session->info;
 592         struct session_info *info_last = session->info_last;
 593         struct connman_service *service;
 594         const char *name, *ifname, *bearer;
 595
 596         if (session->append_all == TRUE ||
 597                         info->state != info_last->state) {
 598                 const char *state = state2string(info->state);
 599
 600                 connman_dbus_dict_append_basic(dict, "State",
 601                                                 DBUS_TYPE_STRING,
 602                                                 &state);
 603                 info_last->state = info->state;
 604         }
 605
 606         if (session->append_all == TRUE ||
 607                         info->entry != info_last->entry) {
 608                 if (info->entry == NULL) {
 609                         name = "";
 610                         ifname = "";
 611                         service = NULL;
 612                         bearer = "";
 613                 } else {
 614                         name = info->entry->name;
 615                         ifname = info->entry->ifname;
 616                         service = info->entry->service;
 617                         bearer = info->entry->bearer;
 618                 }
 619
 620                 connman_dbus_dict_append_basic(dict, "Name",
 621                                                 DBUS_TYPE_STRING,
 622                                                 &name);
 623
 624                 connman_dbus_dict_append_dict(dict, "IPv4",
 625                                                 append_ipconfig_ipv4,
 626                                                 service);
 627
 628                 connman_dbus_dict_append_dict(dict, "IPv6",
 629                                                 append_ipconfig_ipv6,
 630                                                 service);
 631
 632                 connman_dbus_dict_append_basic(dict, "Interface",
 633                                                 DBUS_TYPE_STRING,
 634                                                 &ifname);
 635
 636                 connman_dbus_dict_append_basic(dict, "Bearer",
 637                                                 DBUS_TYPE_STRING,
 638                                                 &bearer);
 639
 640                 info_last->entry = info->entry;
 641         }
 642
 643         if (session->append_all == TRUE ||
 644                         info->config.type != info_last->config.type) {
 645                 const char *type = type2string(info->config.type);
 646
 647                 connman_dbus_dict_append_basic(dict, "ConnectionType",
 648                                                 DBUS_TYPE_STRING,
 649                                                 &type);
 650                 info_last->config.type = info->config.type;
 651         }
 652
 653         if (session->append_all == TRUE ||
 654                         info->config.allowed_bearers != info_last->config.allowed_bearers) {
 655                 connman_dbus_dict_append_array(dict, "AllowedBearers",
 656                                                 DBUS_TYPE_STRING,
 657                                                 append_allowed_bearers,
 658                                                 info);
 659                 info_last->config.allowed_bearers = info->config.allowed_bearers;
 660         }
 661
 662         session->append_all = FALSE;
 663 }
 664
 665 static connman_bool_t is_type_matching_state(enum connman_session_state *state,
 666                                                 enum connman_session_type type)
 667 {
 668         switch (type) {
 669         case CONNMAN_SESSION_TYPE_UNKNOWN:
 670                 return FALSE;
 671         case CONNMAN_SESSION_TYPE_ANY:
 672                 return TRUE;
 673         case CONNMAN_SESSION_TYPE_LOCAL:
 674                 if (*state >= CONNMAN_SESSION_STATE_CONNECTED) {
 675                         *state = CONNMAN_SESSION_STATE_CONNECTED;
 676                         return TRUE;
 677                 }
 678
 679                 break;
 680         case CONNMAN_SESSION_TYPE_INTERNET:
 681                 if (*state == CONNMAN_SESSION_STATE_ONLINE)
 682                         return TRUE;
 683                 break;
 684         }
 685
 686         return FALSE;
 687 }
 688
 689 static connman_bool_t compute_notifiable_changes(struct connman_session *session)
 690 {
 691         struct session_info *info_last = session->info_last;
 692         struct session_info *info = session->info;
 693
 694         if (session->append_all == TRUE)
 695                 return TRUE;
 696
 697         if (info->state != info_last->state)
 698                 return TRUE;
 699
 700         if (info->entry != info_last->entry &&
 701                         info->state >= CONNMAN_SESSION_STATE_CONNECTED)
 702                 return TRUE;
 703
 704         if (info->config.allowed_bearers != info_last->config.allowed_bearers ||
 705                         info->config.type != info_last->config.type)
 706                 return TRUE;
 707
 708         return FALSE;
 709 }
 710
 711 static gboolean session_notify(gpointer user_data)
 712 {
 713         struct connman_session *session = user_data;
 714         DBusMessage *msg;
 715         DBusMessageIter array, dict;
 716
 717         if (compute_notifiable_changes(session) == FALSE)
 718                 return FALSE;
 719
 720         DBG("session %p owner %s notify_path %s", session,
 721                 session->owner, session->notify_path);
 722
 723         msg = dbus_message_new_method_call(session->owner, session->notify_path,
 724                                                 CONNMAN_NOTIFICATION_INTERFACE,
 725                                                 "Update");
 726         if (msg == NULL)
 727                 return FALSE;
 728
 729         dbus_message_iter_init_append(msg, &array);
 730         connman_dbus_dict_open(&array, &dict);
 731
 732         append_notify(&dict, session);
 733
 734         connman_dbus_dict_close(&array, &dict);
 735
 736         g_dbus_send_message(connection, msg);
 737
 738         return FALSE;
 739 }
 740
 741 static void ipconfig_ipv4_changed(struct connman_session *session)
 742 {
 743         struct session_info *info = session->info;
 744
 745         connman_dbus_setting_changed_dict(session->owner, session->notify_path,
 746                                                 "IPv4", append_ipconfig_ipv4,
 747                                                 info->entry->service);
 748 }
 749
 750 static void ipconfig_ipv6_changed(struct connman_session *session)
 751 {
 752         struct session_info *info = session->info;
 753
 754         connman_dbus_setting_changed_dict(session->owner, session->notify_path,
 755                                                 "IPv6", append_ipconfig_ipv6,
 756                                                 info->entry->service);
 757 }
 758
 759 static connman_bool_t service_type_match(struct connman_session *session,
 760                                         struct connman_service *service)
 761 {
 762         struct session_info *info = session->info;
 763         GSList *list;
 764
 765         for (list = info->config.allowed_bearers;
 766                         list != NULL; list = list->next) {
 767                 struct connman_session_bearer *bearer = list->data;
 768                 enum connman_service_type service_type;
 769
 770                 if (bearer->service_type == CONNMAN_SERVICE_TYPE_UNKNOWN)
 771                         return TRUE;
 772
 773                 service_type = connman_service_get_type(service);
 774                 if (bearer->service_type == service_type)
 775                         return TRUE;
 776         }
 777
 778         return FALSE;
 779 }
 780
 781 static connman_bool_t service_match(struct connman_session *session,
 782                                         struct connman_service *service)
 783 {
 784         if (service_type_match(session, service) == FALSE)
 785                 return FALSE;
 786
 787         return TRUE;
 788 }
 789
 790 static int service_type_weight(enum connman_service_type type)
 791 {
 792         /*
 793          * The session doesn't care which service
 794          * to use. Nevertheless we have to sort them
 795          * according their type. The ordering is
 796          *
 797          * 1. Ethernet
 798          * 2. Bluetooth
 799          * 3. WiFi/WiMAX
 800          * 4. Cellular
 801          */
 802
 803         switch (type) {
 804         case CONNMAN_SERVICE_TYPE_ETHERNET:
 805                 return 4;
 806         case CONNMAN_SERVICE_TYPE_BLUETOOTH:
 807                 return 3;
 808         case CONNMAN_SERVICE_TYPE_WIFI:
 809         case CONNMAN_SERVICE_TYPE_WIMAX:
 810                 return 2;
 811         case CONNMAN_SERVICE_TYPE_CELLULAR:
 812                 return 1;
 813         case CONNMAN_SERVICE_TYPE_UNKNOWN:
 814         case CONNMAN_SERVICE_TYPE_SYSTEM:
 815         case CONNMAN_SERVICE_TYPE_GPS:
 816         case CONNMAN_SERVICE_TYPE_VPN:
 817         case CONNMAN_SERVICE_TYPE_GADGET:
 818                 break;
 819         }
 820
 821         return 0;
 822 }
 823
 824 static gint sort_allowed_bearers(struct connman_service *service_a,
 825                                         struct connman_service *service_b,
 826                                         struct connman_session *session)
 827 {
 828         struct session_info *info = session->info;
 829         GSList *list;
 830         enum connman_service_type type_a, type_b;
 831         int weight_a, weight_b;
 832
 833         type_a = connman_service_get_type(service_a);
 834         type_b = connman_service_get_type(service_b);
 835
 836         for (list = info->config.allowed_bearers;
 837                         list != NULL; list = list->next) {
 838                 struct connman_session_bearer *bearer = list->data;
 839
 840                 if (bearer->service_type == CONNMAN_SERVICE_TYPE_UNKNOWN) {
 841                         if (type_a != type_b) {
 842                                 weight_a = service_type_weight(type_a);
 843                                 weight_b = service_type_weight(type_b);
 844
 845                                 if (weight_a > weight_b)
 846                                         return -1;
 847
 848                                 if (weight_a < weight_b)
 849                                         return 1;
 850
 851                                 return 0;
 852                         }
 853                 }
 854
 855                 if (type_a == bearer->service_type &&
 856                                 type_b == bearer->service_type) {
 857                         return 0;
 858                 }
 859
 860                 if (type_a == bearer->service_type &&
 861                                 type_b != bearer->service_type) {
 862                         return -1;
 863                 }
 864
 865                 if (type_a != bearer->service_type &&
 866                                 type_b == bearer->service_type) {
 867                         return 1;
 868                 }
 869         }
 870
 871         return 0;
 872 }
 873
 874 static gint sort_services(gconstpointer a, gconstpointer b, gpointer user_data)
 875 {
 876         struct service_entry *entry_a = (void *)a;
 877         struct service_entry *entry_b = (void *)b;
 878         struct connman_session *session = user_data;
 879
 880         return sort_allowed_bearers(entry_a->service, entry_b->service,
 881                                 session);
 882 }
 883
 884 static void free_session(struct connman_session *session)
 885 {
 886         destroy_policy_config(session);
 887         connman_session_free_bearers(session->info->config.allowed_bearers);
 888         g_free(session->owner);
 889         g_free(session->session_path);
 890         g_free(session->notify_path);
 891         g_free(session->info);
 892         g_free(session->info_last);
 893
 894         g_free(session);
 895 }
 896
 897 static void cleanup_session(gpointer user_data)
 898 {
 899         struct connman_session *session = user_data;
 900         struct session_info *info = session->info;
 901
 902         DBG("remove %s", session->session_path);
 903
 904         g_hash_table_destroy(session->service_hash);
 905         g_sequence_free(session->service_list);
 906
 907         if (info->entry != NULL &&
 908                         info->entry->reason == CONNMAN_SESSION_REASON_CONNECT) {
 909                 __connman_service_disconnect(info->entry->service);
 910         }
 911
 912         free_session(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_service *service,
1215                                         const char *name,
1216                                         enum connman_service_state state)
1217 {
1218         struct service_entry *entry;
1219         enum connman_service_type type;
1220         int idx;
1221
1222         entry = g_try_new0(struct service_entry, 1);
1223         if (entry == NULL)
1224                 return entry;
1225
1226         entry->reason = CONNMAN_SESSION_REASON_UNKNOWN;
1227         entry->state = state;
1228         if (name != NULL)
1229                 entry->name = name;
1230         else
1231                 entry->name = "";
1232         entry->service = service;
1233
1234         idx = __connman_service_get_index(entry->service);
1235         entry->ifname = connman_inet_ifname(idx);
1236         if (entry->ifname == NULL)
1237                 entry->ifname = g_strdup("");
1238
1239         type = connman_service_get_type(entry->service);
1240         entry->bearer = service2bearer(type);
1241
1242         return entry;
1243 }
1244
1245 static void destroy_service_entry(gpointer data)
1246 {
1247         struct service_entry *entry = data;
1248
1249         pending_timeout_remove_all(entry);
1250         g_free(entry->ifname);
1251
1252         g_free(entry);
1253 }
1254
1255 static void populate_service_list(struct connman_session *session)
1256 {
1257         struct service_entry *entry;
1258         GSequenceIter *iter;
1259
1260         session->service_hash =
1261                 g_hash_table_new_full(g_direct_hash, g_direct_equal,
1262                                         NULL, NULL);
1263         session->service_list = __connman_service_get_list(session,
1264                                                         service_match,
1265                                                         create_service_entry,
1266                                                         destroy_service_entry);
1267
1268         g_sequence_sort(session->service_list, sort_services, session);
1269
1270         iter = g_sequence_get_begin_iter(session->service_list);
1271
1272         while (g_sequence_iter_is_end(iter) == FALSE) {
1273                 entry = g_sequence_get(iter);
1274
1275                 DBG("service %p type %s name %s", entry->service,
1276                         service2bearer(connman_service_get_type(entry->service)),
1277                         entry->name);
1278
1279                 g_hash_table_replace(session->service_hash,
1280                                         entry->service, iter);
1281
1282                 iter = g_sequence_iter_next(iter);
1283         }
1284 }
1285
1286 static void session_changed(struct connman_session *session,
1287                                 enum connman_session_trigger trigger)
1288 {
1289         struct session_info *info = session->info;
1290         struct session_info *info_last = session->info_last;
1291         GSequenceIter *service_iter = NULL, *service_iter_last = NULL;
1292         GSequence *service_list_last;
1293         GHashTable *service_hash_last;
1294
1295         /*
1296          * TODO: This only a placeholder for the 'real' algorithm to
1297          * play a bit around. So we are going to improve it step by step.
1298          */
1299
1300         DBG("session %p trigger %s reason %s", session, trigger2string(trigger),
1301                                                 reason2string(info->reason));
1302
1303         if (info->entry != NULL) {
1304                 enum connman_session_state state;
1305
1306                 state = service_to_session_state(info->entry->state);
1307
1308                 if (is_type_matching_state(&state, info->config.type) == TRUE)
1309                         info->state = state;
1310         }
1311
1312         switch (trigger) {
1313         case CONNMAN_SESSION_TRIGGER_UNKNOWN:
1314                 DBG("ignore session changed event");
1315                 return;
1316         case CONNMAN_SESSION_TRIGGER_SETTING:
1317                 if (info->config.allowed_bearers != info_last->config.allowed_bearers) {
1318
1319                         service_hash_last = session->service_hash;
1320                         service_list_last = session->service_list;
1321
1322                         populate_service_list(session);
1323
1324                         if (info->entry != NULL) {
1325                                 service_iter_last = g_hash_table_lookup(
1326                                                         service_hash_last,
1327                                                         info->entry->service);
1328                                 service_iter = g_hash_table_lookup(
1329                                                         session->service_hash,
1330                                                         info->entry->service);
1331                         }
1332
1333                         if (service_iter == NULL && service_iter_last != NULL) {
1334                                 /*
1335                                  * The currently selected service is
1336                                  * not part of this session anymore.
1337                                  */
1338                                 deselect_and_disconnect(session);
1339                         }
1340
1341                         g_hash_table_remove_all(service_hash_last);
1342                         g_sequence_free(service_list_last);
1343                 }
1344
1345                 if (info->config.type != info_last->config.type) {
1346                         if (info->state >= CONNMAN_SESSION_STATE_CONNECTED &&
1347                                         is_type_matching_state(&info->state,
1348                                                         info->config.type) == FALSE)
1349                                 deselect_and_disconnect(session);
1350                 }
1351
1352                 if (info->state == CONNMAN_SESSION_STATE_DISCONNECTED) {
1353                         select_and_connect(session,
1354                                         CONNMAN_SESSION_REASON_FREE_RIDE);
1355                 }
1356
1357                 break;
1358         case CONNMAN_SESSION_TRIGGER_ECALL:
1359                 /*
1360                  * For the time beeing we fallback to normal connect
1361                  * strategy.
1362                  */
1363         case CONNMAN_SESSION_TRIGGER_CONNECT:
1364                 if (info->state >= CONNMAN_SESSION_STATE_CONNECTED) {
1365                         if (info->entry->reason == CONNMAN_SESSION_REASON_CONNECT)
1366                                 break;
1367                         info->entry->reason = CONNMAN_SESSION_REASON_CONNECT;
1368                         __connman_service_session_inc(info->entry->service);
1369                         break;
1370                 }
1371
1372                 if (info->entry != NULL &&
1373                                 is_connecting(info->entry->state) == TRUE) {
1374                         break;
1375                 }
1376
1377                 select_and_connect(session,
1378                                 CONNMAN_SESSION_REASON_CONNECT);
1379
1380                 break;
1381         case CONNMAN_SESSION_TRIGGER_DISCONNECT:
1382                 deselect_and_disconnect(session);
1383
1384                 break;
1385         case CONNMAN_SESSION_TRIGGER_SERVICE:
1386                 if (info->entry != NULL &&
1387                         (is_connecting(info->entry->state) == TRUE ||
1388                                 is_connected(info->entry->state) == TRUE)) {
1389                         break;
1390                 }
1391
1392                 deselect_and_disconnect(session);
1393
1394                 if (info->reason == CONNMAN_SESSION_REASON_FREE_RIDE) {
1395                         select_and_connect(session, info->reason);
1396                 }
1397
1398                 break;
1399         }
1400
1401         session_notify(session);
1402 }
1403
1404 static DBusMessage *connect_session(DBusConnection *conn,
1405                                         DBusMessage *msg, void *user_data)
1406 {
1407         struct connman_session *session = user_data;
1408
1409         DBG("session %p", session);
1410
1411         if (ecall_session != NULL) {
1412                 if (ecall_session->ecall == TRUE && ecall_session != session)
1413                         return __connman_error_failed(msg, EBUSY);
1414
1415                 session->ecall = TRUE;
1416                 session_changed(session, CONNMAN_SESSION_TRIGGER_ECALL);
1417         } else
1418                 session_changed(session, CONNMAN_SESSION_TRIGGER_CONNECT);
1419
1420         return g_dbus_create_reply(msg, DBUS_TYPE_INVALID);
1421 }
1422
1423 static DBusMessage *disconnect_session(DBusConnection *conn,
1424                                         DBusMessage *msg, void *user_data)
1425 {
1426         struct connman_session *session = user_data;
1427
1428         DBG("session %p", session);
1429
1430         if (ecall_session != NULL) {
1431                 if (ecall_session->ecall == TRUE && ecall_session != session)
1432                         return __connman_error_failed(msg, EBUSY);
1433
1434                 session->ecall = FALSE;
1435         }
1436
1437         session_changed(session, CONNMAN_SESSION_TRIGGER_DISCONNECT);
1438
1439         return g_dbus_create_reply(msg, DBUS_TYPE_INVALID);
1440 }
1441
1442 static DBusMessage *change_session(DBusConnection *conn,
1443                                         DBusMessage *msg, void *user_data)
1444 {
1445         struct connman_session *session = user_data;
1446         struct session_info *info = session->info;
1447         DBusMessageIter iter, value;
1448         const char *name;
1449         const char *val;
1450         GSList *allowed_bearers;
1451         int err;
1452
1453         DBG("session %p", session);
1454         if (dbus_message_iter_init(msg, &iter) == FALSE)
1455                 return __connman_error_invalid_arguments(msg);
1456
1457         if (dbus_message_iter_get_arg_type(&iter) != DBUS_TYPE_STRING)
1458                 return __connman_error_invalid_arguments(msg);
1459
1460         dbus_message_iter_get_basic(&iter, &name);
1461         dbus_message_iter_next(&iter);
1462
1463         if (dbus_message_iter_get_arg_type(&iter) != DBUS_TYPE_VARIANT)
1464                 return __connman_error_invalid_arguments(msg);
1465
1466         dbus_message_iter_recurse(&iter, &value);
1467
1468         switch (dbus_message_iter_get_arg_type(&value)) {
1469         case DBUS_TYPE_ARRAY:
1470                 if (g_str_equal(name, "AllowedBearers") == TRUE) {
1471                         err = parse_bearers(&value, &allowed_bearers);
1472                         if (err < 0)
1473                                 return __connman_error_failed(msg, err);
1474
1475                         connman_session_free_bearers(info->config.allowed_bearers);
1476                         err = apply_policy_on_bearers(
1477                                         session->policy_config->allowed_bearers,
1478                                         allowed_bearers,
1479                                         &info->config.allowed_bearers);
1480
1481                         connman_session_free_bearers(allowed_bearers);
1482                         if (err < 0)
1483                                 return __connman_error_failed(msg, err);
1484                 } else {
1485                         goto err;
1486                 }
1487                 break;
1488         case DBUS_TYPE_STRING:
1489                 if (g_str_equal(name, "ConnectionType") == TRUE) {
1490                         dbus_message_iter_get_basic(&value, &val);
1491                         info->config.type = apply_policy_on_type(
1492                                 session->policy_config->type,
1493                                 string2type(val));
1494                 } else {
1495                         goto err;
1496                 }
1497                 break;
1498         default:
1499                 goto err;
1500         }
1501
1502         session_changed(session, CONNMAN_SESSION_TRIGGER_SETTING);
1503
1504         return g_dbus_create_reply(msg, DBUS_TYPE_INVALID);
1505
1506 err:
1507         return __connman_error_invalid_arguments(msg);
1508 }
1509
1510 static void release_session(gpointer key, gpointer value, gpointer user_data)
1511 {
1512         struct connman_session *session = value;
1513         DBusMessage *message;
1514
1515         DBG("owner %s path %s", session->owner, session->notify_path);
1516
1517         if (session->notify_watch > 0)
1518                 g_dbus_remove_watch(connection, session->notify_watch);
1519
1520         g_dbus_unregister_interface(connection, session->session_path,
1521                                                 CONNMAN_SESSION_INTERFACE);
1522
1523         message = dbus_message_new_method_call(session->owner,
1524                                                 session->notify_path,
1525                                                 CONNMAN_NOTIFICATION_INTERFACE,
1526                                                 "Release");
1527         if (message == NULL)
1528                 return;
1529
1530         dbus_message_set_no_reply(message, TRUE);
1531
1532         g_dbus_send_message(connection, message);
1533 }
1534
1535 static int session_disconnect(struct connman_session *session)
1536 {
1537         DBG("session %p, %s", session, session->owner);
1538
1539         if (session->notify_watch > 0)
1540                 g_dbus_remove_watch(connection, session->notify_watch);
1541
1542         g_dbus_unregister_interface(connection, session->session_path,
1543                                                 CONNMAN_SESSION_INTERFACE);
1544
1545         deselect_and_disconnect(session);
1546
1547         g_hash_table_remove(session_hash, session->session_path);
1548
1549         return 0;
1550 }
1551
1552 static void owner_disconnect(DBusConnection *conn, void *user_data)
1553 {
1554         struct connman_session *session = user_data;
1555
1556         DBG("session %p, %s died", session, session->owner);
1557
1558         session_disconnect(session);
1559 }
1560
1561 static DBusMessage *destroy_session(DBusConnection *conn,
1562                                         DBusMessage *msg, void *user_data)
1563 {
1564         struct connman_session *session = user_data;
1565
1566         DBG("session %p", session);
1567
1568         if (ecall_session != NULL && ecall_session != session)
1569                 return __connman_error_failed(msg, EBUSY);
1570
1571         session_disconnect(session);
1572
1573         return g_dbus_create_reply(msg, DBUS_TYPE_INVALID);
1574 }
1575
1576 static const GDBusMethodTable session_methods[] = {
1577         { GDBUS_METHOD("Destroy", NULL, NULL, destroy_session) },
1578         { GDBUS_METHOD("Connect", NULL, NULL, connect_session) },
1579         { GDBUS_METHOD("Disconnect", NULL, NULL,
1580                         disconnect_session ) },
1581         { GDBUS_METHOD("Change",
1582                         GDBUS_ARGS({ "name", "s" }, { "value", "v" }),
1583                         NULL, change_session) },
1584         { },
1585 };
1586
1587 static void session_create_cb(struct connman_session *session,
1588                                 struct connman_session_config *config,
1589                                 void *user_data, int err)
1590 {
1591         DBG("session %p config %p", session, config);
1592
1593         if (err != 0)
1594                 return;
1595
1596         session->policy_config = config;
1597 }
1598
1599 int __connman_session_create(DBusMessage *msg)
1600 {
1601         const char *owner, *notify_path;
1602         char *session_path = NULL;
1603         DBusMessageIter iter, array;
1604         struct connman_session *session = NULL;
1605         struct session_info *info, *info_last;
1606         enum connman_session_type type = CONNMAN_SESSION_TYPE_ANY;
1607         GSList *allowed_bearers = NULL;
1608         connman_bool_t allowed_bearers_valid = FALSE;
1609         connman_bool_t type_valid = FALSE;
1610         int err;
1611
1612         owner = dbus_message_get_sender(msg);
1613
1614         DBG("owner %s", owner);
1615
1616         if (ecall_session != NULL && ecall_session->ecall == TRUE) {
1617                 /*
1618                  * If there is an emergency call already going on,
1619                  * ignore session creation attempt
1620                  */
1621                 err = -EBUSY;
1622                 goto err;
1623         }
1624
1625         dbus_message_iter_init(msg, &iter);
1626         dbus_message_iter_recurse(&iter, &array);
1627
1628         while (dbus_message_iter_get_arg_type(&array) == DBUS_TYPE_DICT_ENTRY) {
1629                 DBusMessageIter entry, value;
1630                 const char *key, *val;
1631
1632                 dbus_message_iter_recurse(&array, &entry);
1633                 dbus_message_iter_get_basic(&entry, &key);
1634
1635                 dbus_message_iter_next(&entry);
1636                 dbus_message_iter_recurse(&entry, &value);
1637
1638                 switch (dbus_message_iter_get_arg_type(&value)) {
1639                 case DBUS_TYPE_ARRAY:
1640                         if (g_str_equal(key, "AllowedBearers") == TRUE) {
1641                                 err = parse_bearers(&value, &allowed_bearers);
1642                                 if (err < 0)
1643                                         goto err;
1644
1645                                 allowed_bearers_valid = TRUE;
1646                         } else {
1647                                 return -EINVAL;
1648                         }
1649                         break;
1650                 case DBUS_TYPE_STRING:
1651                         if (g_str_equal(key, "ConnectionType") == TRUE) {
1652                                 dbus_message_iter_get_basic(&value, &val);
1653                                 type = string2type(val);
1654                                 type_valid = TRUE;
1655                         } else {
1656                                 return -EINVAL;
1657                         }
1658                 }
1659                 dbus_message_iter_next(&array);
1660         }
1661
1662         dbus_message_iter_next(&iter);
1663         dbus_message_iter_get_basic(&iter, &notify_path);
1664
1665         if (notify_path == NULL) {
1666                 err = -EINVAL;
1667                 goto err;
1668         }
1669
1670         session_path = g_strdup_printf("/sessions%s", notify_path);
1671         if (session_path == NULL) {
1672                 err = -ENOMEM;
1673                 goto err;
1674         }
1675
1676         session = g_hash_table_lookup(session_hash, session_path);
1677         if (session != NULL) {
1678                 session = NULL;
1679                 err = -EEXIST;
1680                 goto err;
1681         }
1682
1683         session = g_try_new0(struct connman_session, 1);
1684         if (session == NULL) {
1685                 err = -ENOMEM;
1686                 goto err;
1687         }
1688
1689         session->info = g_try_new0(struct session_info, 1);
1690         if (session->info == NULL) {
1691                 err = -ENOMEM;
1692                 goto err;
1693         }
1694
1695         session->info_last = g_try_new0(struct session_info, 1);
1696         if (session->info_last == NULL) {
1697                 err = -ENOMEM;
1698                 goto err;
1699         }
1700
1701         info = session->info;
1702         info_last = session->info_last;
1703
1704         session->owner = g_strdup(owner);
1705         session->session_path = session_path;
1706         session->notify_path = g_strdup(notify_path);
1707         session->notify_watch =
1708                 g_dbus_add_disconnect_watch(connection, session->owner,
1709                                         owner_disconnect, session, NULL);
1710
1711         err = assign_policy_plugin(session);
1712         if (err < 0)
1713                 goto err;
1714         err = create_policy_config(session, session_create_cb, NULL);
1715         if (err < 0)
1716                 goto err;
1717
1718         if (session->policy_config->ecall == TRUE)
1719                 ecall_session = session;
1720
1721         info->state = CONNMAN_SESSION_STATE_DISCONNECTED;
1722         if (type_valid == FALSE)
1723                 type = CONNMAN_SESSION_TYPE_ANY;
1724         info->config.type = apply_policy_on_type(
1725                                 session->policy_config->type,
1726                                 type);
1727         info->config.priority = session->policy_config->priority;
1728         info->config.roaming_policy = session->policy_config->roaming_policy;
1729         info->entry = NULL;
1730
1731         if (allowed_bearers_valid == FALSE) {
1732                 allowed_bearers = connman_session_allowed_bearers_any();
1733                 if (allowed_bearers == NULL) {
1734                         err = -ENOMEM;
1735                         goto err;
1736                 }
1737         }
1738
1739         err = apply_policy_on_bearers(
1740                         session->policy_config->allowed_bearers,
1741                         allowed_bearers,
1742                         &info->config.allowed_bearers);
1743         if (err < 0)
1744                 goto err;
1745
1746         g_hash_table_replace(session_hash, session->session_path, session);
1747
1748         DBG("add %s", session->session_path);
1749
1750         if (g_dbus_register_interface(connection, session->session_path,
1751                                         CONNMAN_SESSION_INTERFACE,
1752                                         session_methods, NULL,
1753                                         NULL, session, NULL) == FALSE) {
1754                 connman_error("Failed to register %s", session->session_path);
1755                 g_hash_table_remove(session_hash, session->session_path);
1756                 session = NULL;
1757
1758                 err = -EINVAL;
1759                 goto err;
1760         }
1761
1762         g_dbus_send_reply(connection, msg,
1763                                 DBUS_TYPE_OBJECT_PATH, &session->session_path,
1764                                 DBUS_TYPE_INVALID);
1765
1766
1767         populate_service_list(session);
1768
1769         info_last->state = info->state;
1770         info_last->config.priority = info->config.priority;
1771         info_last->config.roaming_policy = info->config.roaming_policy;
1772         info_last->entry = info->entry;
1773         info_last->config.allowed_bearers = info->config.allowed_bearers;
1774
1775         session->append_all = TRUE;
1776
1777         session_changed(session, CONNMAN_SESSION_TRIGGER_SETTING);
1778
1779         return 0;
1780
1781 err:
1782         connman_error("Failed to create session");
1783
1784         if (session != NULL) {
1785                 if (session->info_last != NULL)
1786                         g_free(session->info_last);
1787                 if (session->info != NULL)
1788                         g_free(session->info);
1789                 g_free(session);
1790         }
1791
1792         g_free(session_path);
1793
1794         connman_session_free_bearers(allowed_bearers);
1795
1796         return err;
1797 }
1798
1799 int __connman_session_destroy(DBusMessage *msg)
1800 {
1801         const char *owner, *session_path;
1802         struct connman_session *session;
1803
1804         owner = dbus_message_get_sender(msg);
1805
1806         DBG("owner %s", owner);
1807
1808         dbus_message_get_args(msg, NULL, DBUS_TYPE_OBJECT_PATH, &session_path,
1809                                                         DBUS_TYPE_INVALID);
1810         if (session_path == NULL)
1811                 return -EINVAL;
1812
1813         session = g_hash_table_lookup(session_hash, session_path);
1814         if (session == NULL)
1815                 return -EINVAL;
1816
1817         if (g_strcmp0(owner, session->owner) != 0)
1818                 return -EACCES;
1819
1820         session_disconnect(session);
1821
1822         return 0;
1823 }
1824
1825 connman_bool_t __connman_session_mode()
1826 {
1827         return sessionmode;
1828 }
1829
1830 void __connman_session_set_mode(connman_bool_t enable)
1831 {
1832         DBG("enable %d", enable);
1833
1834         if (sessionmode != enable) {
1835                 sessionmode = enable;
1836
1837                 connman_dbus_property_changed_basic(CONNMAN_MANAGER_PATH,
1838                                 CONNMAN_MANAGER_INTERFACE, "SessionMode",
1839                                 DBUS_TYPE_BOOLEAN, &sessionmode);
1840         }
1841
1842         if (sessionmode == TRUE)
1843                 __connman_service_disconnect_all();
1844 }
1845
1846 static void service_add(struct connman_service *service,
1847                         const char *name)
1848 {
1849         GHashTableIter iter;
1850         GSequenceIter *iter_service_list;
1851         gpointer key, value;
1852         struct connman_session *session;
1853         struct service_entry *entry;
1854
1855         DBG("service %p", service);
1856
1857         g_hash_table_iter_init(&iter, session_hash);
1858
1859         while (g_hash_table_iter_next(&iter, &key, &value) == TRUE) {
1860                 session = value;
1861
1862                 if (service_match(session, service) == FALSE)
1863                         continue;
1864
1865                 entry = create_service_entry(service, name,
1866                                                 CONNMAN_SERVICE_STATE_IDLE);
1867                 if (entry == NULL)
1868                         continue;
1869
1870                 iter_service_list =
1871                         g_sequence_insert_sorted(session->service_list,
1872                                                         entry, sort_services,
1873                                                         session);
1874
1875                 g_hash_table_replace(session->service_hash, service,
1876                                         iter_service_list);
1877
1878                 session_changed(session, CONNMAN_SESSION_TRIGGER_SERVICE);
1879         }
1880 }
1881
1882 static void service_remove(struct connman_service *service)
1883 {
1884
1885         GHashTableIter iter;
1886         gpointer key, value;
1887         struct connman_session *session;
1888         struct session_info *info;
1889
1890         DBG("service %p", service);
1891
1892         g_hash_table_iter_init(&iter, session_hash);
1893
1894         while (g_hash_table_iter_next(&iter, &key, &value) == TRUE) {
1895                 GSequenceIter *seq_iter;
1896                 session = value;
1897                 info = session->info;
1898
1899                 seq_iter = g_hash_table_lookup(session->service_hash, service);
1900                 if (seq_iter == NULL)
1901                         continue;
1902
1903                 g_sequence_remove(seq_iter);
1904
1905                 if (info->entry != NULL && info->entry->service == service)
1906                         info->entry = NULL;
1907                 session_changed(session, CONNMAN_SESSION_TRIGGER_SERVICE);
1908         }
1909 }
1910
1911 static void service_state_changed(struct connman_service *service,
1912                                         enum connman_service_state state)
1913 {
1914         GHashTableIter iter;
1915         gpointer key, value;
1916
1917         DBG("service %p state %d", service, state);
1918
1919         g_hash_table_iter_init(&iter, session_hash);
1920
1921         while (g_hash_table_iter_next(&iter, &key, &value) == TRUE) {
1922                 struct connman_session *session = value;
1923                 GSequenceIter *service_iter;
1924
1925                 service_iter = g_hash_table_lookup(session->service_hash, service);
1926                 if (service_iter != NULL) {
1927                         struct service_entry *entry;
1928
1929                         entry = g_sequence_get(service_iter);
1930                         entry->state = state;
1931                 }
1932
1933                 session_changed(session,
1934                                 CONNMAN_SESSION_TRIGGER_SERVICE);
1935         }
1936 }
1937
1938 static void ipconfig_changed(struct connman_service *service,
1939                                 struct connman_ipconfig *ipconfig)
1940 {
1941         GHashTableIter iter;
1942         gpointer key, value;
1943         struct connman_session *session;
1944         struct session_info *info;
1945         enum connman_ipconfig_type type;
1946
1947         DBG("service %p ipconfig %p", service, ipconfig);
1948
1949         type = __connman_ipconfig_get_config_type(ipconfig);
1950
1951         g_hash_table_iter_init(&iter, session_hash);
1952
1953         while (g_hash_table_iter_next(&iter, &key, &value) == TRUE) {
1954                 session = value;
1955                 info = session->info;
1956
1957                 if (info->state == CONNMAN_SESSION_STATE_DISCONNECTED)
1958                         continue;
1959
1960                 if (info->entry != NULL && info->entry->service == service) {
1961                         if (type == CONNMAN_IPCONFIG_TYPE_IPV4)
1962                                 ipconfig_ipv4_changed(session);
1963                         else if (type == CONNMAN_IPCONFIG_TYPE_IPV6)
1964                                 ipconfig_ipv6_changed(session);
1965                 }
1966         }
1967 }
1968
1969 static struct connman_notifier session_notifier = {
1970         .name                   = "session",
1971         .service_add            = service_add,
1972         .service_remove         = service_remove,
1973         .service_state_changed  = service_state_changed,
1974         .ipconfig_changed       = ipconfig_changed,
1975 };
1976
1977 int __connman_session_init(void)
1978 {
1979         int err;
1980
1981         DBG("");
1982
1983         connection = connman_dbus_get_connection();
1984         if (connection == NULL)
1985                 return -1;
1986
1987         err = connman_notifier_register(&session_notifier);
1988         if (err < 0) {
1989                 dbus_connection_unref(connection);
1990                 return err;
1991         }
1992
1993         session_hash = g_hash_table_new_full(g_str_hash, g_str_equal,
1994                                                 NULL, cleanup_session);
1995
1996         sessionmode = FALSE;
1997         return 0;
1998 }
1999
2000 void __connman_session_cleanup(void)
2001 {
2002         DBG("");
2003
2004         if (connection == NULL)
2005                 return;
2006
2007         connman_notifier_unregister(&session_notifier);
2008
2009         g_hash_table_foreach(session_hash, release_session, NULL);
2010         g_hash_table_destroy(session_hash);
2011         session_hash = NULL;
2012
2013         dbus_connection_unref(connection);
2014 }