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