src/session.c

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