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