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