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