src/session.c

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