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