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