src/session.c

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