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         GSList *user_allowed_bearers;
  93
  94         connman_bool_t ecall;
  95
  96         GSequence *service_list;
  97         GHashTable *service_hash;
  98 };
  99
 100 static const char *trigger2string(enum connman_session_trigger trigger)
 101 {
 102         switch (trigger) {
 103         case CONNMAN_SESSION_TRIGGER_UNKNOWN:
 104                 break;
 105         case CONNMAN_SESSION_TRIGGER_SETTING:
 106                 return "setting";
 107         case CONNMAN_SESSION_TRIGGER_CONNECT:
 108                 return "connect";
 109         case CONNMAN_SESSION_TRIGGER_DISCONNECT:
 110                 return "disconnect";
 111         case CONNMAN_SESSION_TRIGGER_SERVICE:
 112                 return "service";
 113         case CONNMAN_SESSION_TRIGGER_ECALL:
 114                 return "ecall";
 115         }
 116
 117         return NULL;
 118 }
 119
 120 static const char *reason2string(enum connman_session_reason reason)
 121 {
 122         switch (reason) {
 123         case CONNMAN_SESSION_REASON_UNKNOWN:
 124                 return "unknown";
 125         case CONNMAN_SESSION_REASON_CONNECT:
 126                 return "connect";
 127         case CONNMAN_SESSION_REASON_FREE_RIDE:
 128                 return "free-ride";
 129         }
 130
 131         return NULL;
 132 }
 133
 134 static const char *state2string(enum connman_session_state state)
 135 {
 136         switch (state) {
 137         case CONNMAN_SESSION_STATE_DISCONNECTED:
 138                 return "disconnected";
 139         case CONNMAN_SESSION_STATE_CONNECTED:
 140                 return "connected";
 141         case CONNMAN_SESSION_STATE_ONLINE:
 142                 return "online";
 143         }
 144
 145         return NULL;
 146 }
 147
 148 static const char *type2string(enum connman_session_type type)
 149 {
 150         switch (type) {
 151         case CONNMAN_SESSION_TYPE_UNKNOWN:
 152                 return "";
 153         case CONNMAN_SESSION_TYPE_ANY:
 154                 return "any";
 155         case CONNMAN_SESSION_TYPE_LOCAL:
 156                 return "local";
 157         case CONNMAN_SESSION_TYPE_INTERNET:
 158                 return "internet";
 159         }
 160
 161         return NULL;
 162 }
 163
 164 enum connman_session_roaming_policy connman_session_parse_roaming_policy(const char *policy)
 165 {
 166         if (g_strcmp0(policy, "default") == 0)
 167                 return CONNMAN_SESSION_ROAMING_POLICY_DEFAULT;
 168         else if (g_strcmp0(policy, "always") == 0)
 169                 return CONNMAN_SESSION_ROAMING_POLICY_ALWAYS;
 170         else if (g_strcmp0(policy, "forbidden") == 0)
 171                 return CONNMAN_SESSION_ROAMING_POLICY_FORBIDDEN;
 172         else if (g_strcmp0(policy, "national") == 0)
 173                 return CONNMAN_SESSION_ROAMING_POLICY_NATIONAL;
 174         else if (g_strcmp0(policy, "international") == 0)
 175                 return CONNMAN_SESSION_ROAMING_POLICY_INTERNATIONAL;
 176         else
 177                 return CONNMAN_SESSION_ROAMING_POLICY_UNKNOWN;
 178 }
 179
 180 enum connman_session_type connman_session_parse_connection_type(const char *type)
 181 {
 182         if (g_strcmp0(type, "any") == 0)
 183                 return CONNMAN_SESSION_TYPE_ANY;
 184         if (g_strcmp0(type, "local") == 0)
 185                 return CONNMAN_SESSION_TYPE_LOCAL;
 186         else if (g_strcmp0(type, "internet") == 0)
 187                 return CONNMAN_SESSION_TYPE_INTERNET;
 188
 189         return CONNMAN_SESSION_TYPE_UNKNOWN;
 190 }
 191
 192 static int bearer2service(const char *bearer, enum connman_service_type *type)
 193 {
 194         if (g_strcmp0(bearer, "ethernet") == 0)
 195                 *type = CONNMAN_SERVICE_TYPE_ETHERNET;
 196         else if (g_strcmp0(bearer, "wifi") == 0)
 197                 *type = CONNMAN_SERVICE_TYPE_WIFI;
 198         else if (g_strcmp0(bearer, "bluetooth") == 0)
 199                 *type = CONNMAN_SERVICE_TYPE_BLUETOOTH;
 200         else if (g_strcmp0(bearer, "cellular") == 0)
 201                 *type = CONNMAN_SERVICE_TYPE_CELLULAR;
 202         else if (g_strcmp0(bearer, "vpn") == 0)
 203                 *type = CONNMAN_SERVICE_TYPE_VPN;
 204         else if (g_strcmp0(bearer, "*") == 0)
 205                 *type = CONNMAN_SERVICE_TYPE_UNKNOWN;
 206         else
 207                 return -EINVAL;
 208
 209         return 0;
 210 }
 211
 212 static char *service2bearer(enum connman_service_type type)
 213 {
 214         switch (type) {
 215         case CONNMAN_SERVICE_TYPE_ETHERNET:
 216                 return "ethernet";
 217         case CONNMAN_SERVICE_TYPE_WIFI:
 218                 return "wifi";
 219         case CONNMAN_SERVICE_TYPE_BLUETOOTH:
 220                 return "bluetooth";
 221         case CONNMAN_SERVICE_TYPE_CELLULAR:
 222                 return "cellular";
 223         case CONNMAN_SERVICE_TYPE_VPN:
 224                 return "vpn";
 225         case CONNMAN_SERVICE_TYPE_UNKNOWN:
 226                 return "*";
 227         case CONNMAN_SERVICE_TYPE_SYSTEM:
 228         case CONNMAN_SERVICE_TYPE_GPS:
 229         case CONNMAN_SERVICE_TYPE_GADGET:
 230                 return "";
 231         }
 232
 233         return "";
 234 }
 235
 236 static void destroy_policy_config(struct connman_session *session)
 237 {
 238         if (session->policy == NULL) {
 239                 g_free(session->policy_config);
 240                 return;
 241         }
 242
 243         (*session->policy->destroy)(session);
 244 }
 245
 246 static void free_session(struct connman_session *session)
 247 {
 248         if (session == NULL)
 249                 return;
 250
 251         if (session->notify_watch > 0)
 252                 g_dbus_remove_watch(connection, session->notify_watch);
 253
 254         destroy_policy_config(session);
 255         g_slist_free(session->info->config.allowed_bearers);
 256         g_free(session->owner);
 257         g_free(session->session_path);
 258         g_free(session->notify_path);
 259         g_free(session->info);
 260         g_free(session->info_last);
 261
 262         g_free(session);
 263 }
 264
 265 static void cleanup_session(gpointer user_data)
 266 {
 267         struct connman_session *session = user_data;
 268         struct session_info *info = session->info;
 269
 270         DBG("remove %s", session->session_path);
 271
 272         g_slist_free(session->user_allowed_bearers);
 273         g_hash_table_destroy(session->service_hash);
 274         g_sequence_free(session->service_list);
 275
 276         if (info->entry != NULL &&
 277                         info->entry->reason == CONNMAN_SESSION_REASON_CONNECT) {
 278                 __connman_service_disconnect(info->entry->service);
 279         }
 280
 281         free_session(session);
 282 }
 283
 284 static int assign_policy_plugin(struct connman_session *session)
 285 {
 286         if (session->policy != NULL)
 287                 return -EALREADY;
 288
 289         if (policy_list == NULL)
 290                 return 0;
 291
 292         session->policy = policy_list->data;
 293
 294         return 0;
 295 }
 296
 297 struct user_config {
 298         DBusMessage *pending;
 299
 300         enum connman_session_type type;
 301         GSList *allowed_bearers;
 302 };
 303
 304 static void cleanup_user_config(struct user_config *user_config)
 305 {
 306         if (user_config == NULL)
 307                 return;
 308
 309         if (user_config->pending != NULL)
 310                 dbus_message_unref(user_config->pending);
 311
 312         g_slist_free(user_config->allowed_bearers);
 313         g_free(user_config);
 314 }
 315
 316 static int create_policy_config(struct connman_session *session,
 317                                 connman_session_config_func_t cb,
 318                                 struct user_config *user_config)
 319 {
 320         struct connman_session_config *config;
 321
 322         if (session->policy == NULL) {
 323                 config = connman_session_create_default_config();
 324                 if (config == NULL) {
 325                         free_session(session);
 326                         cleanup_user_config(user_config);
 327                         return -ENOMEM;
 328                 }
 329
 330                 return cb(session, config, user_config, 0);
 331         }
 332
 333         return (*session->policy->create)(session, cb, user_config);
 334 }
 335
 336 static void probe_policy(struct connman_session_policy *policy)
 337 {
 338
 339         GHashTableIter iter;
 340         gpointer key, value;
 341         struct connman_session *session;
 342
 343         DBG("policy %p name %s", policy, policy->name);
 344
 345         g_hash_table_iter_init(&iter, session_hash);
 346
 347         while (g_hash_table_iter_next(&iter, &key, &value) == TRUE) {
 348                 session = value;
 349
 350                 if (session->policy != NULL)
 351                         continue;
 352
 353                 assign_policy_plugin(session);
 354         }
 355 }
 356
 357 static void remove_policy(struct connman_session_policy *policy)
 358 {
 359         GHashTableIter iter;
 360         gpointer key, value;
 361         struct connman_session *session;
 362
 363         if (session_hash == NULL)
 364                 return;
 365
 366         DBG("policy %p name %s", policy, policy->name);
 367
 368         g_hash_table_iter_init(&iter, session_hash);
 369
 370         while (g_hash_table_iter_next(&iter, &key, &value) == TRUE) {
 371                 session = value;
 372
 373                 if (session->policy != policy)
 374                         continue;
 375
 376                 session->policy = NULL;
 377                 assign_policy_plugin(session);
 378         }
 379 }
 380
 381 static gint compare_priority(gconstpointer a, gconstpointer b)
 382 {
 383         const struct connman_session_policy *policy1 = a;
 384         const struct connman_session_policy *policy2 = b;
 385
 386         return policy2->priority - policy1->priority;
 387 }
 388
 389
 390 int connman_session_policy_register(struct connman_session_policy *policy)
 391 {
 392         DBG("name %s", policy->name);
 393
 394         if (policy->create == NULL || policy->destroy == NULL)
 395                 return -EINVAL;
 396
 397         policy_list = g_slist_insert_sorted(policy_list, policy,
 398                                                 compare_priority);
 399
 400         probe_policy(policy);
 401
 402         return 0;
 403 }
 404
 405 void connman_session_policy_unregister(struct connman_session_policy *policy)
 406 {
 407         DBG("name %s", policy->name);
 408
 409         policy_list = g_slist_remove(policy_list, policy);
 410
 411         remove_policy(policy);
 412 }
 413
 414 void connman_session_set_default_config(struct connman_session_config *config)
 415 {
 416         config->priority = FALSE;
 417         config->roaming_policy = CONNMAN_SESSION_ROAMING_POLICY_DEFAULT;
 418         config->type = CONNMAN_SESSION_TYPE_ANY;
 419         config->ecall = FALSE;
 420
 421         g_slist_free(config->allowed_bearers);
 422         config->allowed_bearers = g_slist_prepend(NULL,
 423                                 GINT_TO_POINTER(CONNMAN_SERVICE_TYPE_UNKNOWN));
 424 }
 425
 426 struct connman_session_config *connman_session_create_default_config(void)
 427 {
 428         struct connman_session_config *config;
 429
 430         config = g_new0(struct connman_session_config, 1);
 431         connman_session_set_default_config(config);
 432
 433         return config;
 434 }
 435
 436 static enum connman_session_type apply_policy_on_type(
 437                         enum connman_session_type policy,
 438                         enum connman_session_type type)
 439 {
 440         if (type == CONNMAN_SESSION_TYPE_UNKNOWN)
 441                 return CONNMAN_SESSION_TYPE_UNKNOWN;
 442
 443         if (policy == CONNMAN_SESSION_TYPE_ANY)
 444                 return type;
 445
 446         if (policy == CONNMAN_SESSION_TYPE_LOCAL)
 447                 return CONNMAN_SESSION_TYPE_LOCAL;
 448
 449         return CONNMAN_SESSION_TYPE_INTERNET;
 450 }
 451
 452 int connman_session_parse_bearers(const char *token, GSList **list)
 453 {
 454         enum connman_service_type bearer;
 455         int err;
 456
 457         if (g_strcmp0(token, "") == 0)
 458                 return 0;
 459
 460         err = bearer2service(token, &bearer);
 461         if (err < 0)
 462                 return err;
 463
 464         *list = g_slist_append(*list, GINT_TO_POINTER(bearer));
 465
 466         return 0;
 467 }
 468
 469 static int parse_bearers(DBusMessageIter *iter, GSList **list)
 470 {
 471         DBusMessageIter array;
 472         int type, err;
 473
 474         dbus_message_iter_recurse(iter, &array);
 475
 476         *list = NULL;
 477
 478         while ((type = dbus_message_iter_get_arg_type(&array)) !=
 479                         DBUS_TYPE_INVALID) {
 480                 char *bearer_name = NULL;
 481
 482                 if (type != DBUS_TYPE_STRING) {
 483                         g_slist_free(*list);
 484                         *list = NULL;
 485                         return -EINVAL;
 486                 }
 487
 488                 dbus_message_iter_get_basic(&array, &bearer_name);
 489
 490                 err = connman_session_parse_bearers(bearer_name, list);
 491                 if (err < 0) {
 492                         g_slist_free(*list);
 493                         *list = NULL;
 494                         return err;
 495                 }
 496
 497                 dbus_message_iter_next(&array);
 498         }
 499
 500         return 0;
 501 }
 502
 503 static int filter_bearer(GSList *policy_bearers,
 504                                 enum connman_service_type bearer,
 505                                 GSList **list)
 506 {
 507         enum connman_service_type policy;
 508         GSList *it;
 509
 510         if (policy_bearers == NULL)
 511                 return 0;
 512
 513         for (it = policy_bearers; it != NULL; it = it->next) {
 514                 policy = GPOINTER_TO_INT(it->data);
 515
 516                 if (bearer == CONNMAN_SERVICE_TYPE_UNKNOWN) {
 517                         bearer = policy;
 518                         goto clone;
 519                 }
 520
 521                 if (policy != CONNMAN_SERVICE_TYPE_UNKNOWN && policy != bearer)
 522                         continue;
 523
 524                 goto clone;
 525         }
 526
 527         *list = NULL;
 528
 529         return 0;
 530
 531 clone:
 532         *list = g_slist_append(*list, GINT_TO_POINTER(bearer));
 533
 534         return 0;
 535 }
 536
 537 static int apply_policy_on_bearers(GSList *policy_bearers, GSList *bearers,
 538                                 GSList **list)
 539 {
 540         enum connman_service_type bearer;
 541         GSList *it;
 542         int err;
 543
 544         *list = NULL;
 545
 546         for (it = bearers; it != NULL; it = it->next) {
 547                 bearer = GPOINTER_TO_INT(it->data);
 548
 549                 err = filter_bearer(policy_bearers, bearer, list);
 550                 if (err < 0)
 551                         return err;
 552         }
 553
 554         return 0;
 555 }
 556
 557 const char *connman_session_get_owner(struct connman_session *session)
 558 {
 559         return session->owner;
 560 }
 561
 562 static void append_allowed_bearers(DBusMessageIter *iter, void *user_data)
 563 {
 564         struct session_info *info = user_data;
 565         GSList *list;
 566
 567         for (list = info->config.allowed_bearers;
 568                         list != NULL; list = list->next) {
 569                 enum connman_service_type bearer = GPOINTER_TO_INT(list->data);
 570                 const char *name = __connman_service_type2string(bearer);
 571
 572                 if (name == NULL)
 573                         name = "*";
 574
 575                 dbus_message_iter_append_basic(iter, DBUS_TYPE_STRING,
 576                                                 &name);
 577         }
 578 }
 579
 580 static void append_ipconfig_ipv4(DBusMessageIter *iter, void *user_data)
 581 {
 582         struct connman_service *service = user_data;
 583         struct connman_ipconfig *ipconfig_ipv4;
 584
 585         if (service == NULL)
 586                 return;
 587
 588         if (__connman_service_is_connected_state(service,
 589                                 CONNMAN_IPCONFIG_TYPE_IPV4) == FALSE) {
 590                 return;
 591         }
 592
 593         ipconfig_ipv4 = __connman_service_get_ip4config(service);
 594         if (ipconfig_ipv4 == NULL)
 595                 return;
 596
 597         __connman_ipconfig_append_ipv4(ipconfig_ipv4, iter);
 598 }
 599
 600 static void append_ipconfig_ipv6(DBusMessageIter *iter, void *user_data)
 601 {
 602         struct connman_service *service = user_data;
 603         struct connman_ipconfig *ipconfig_ipv4, *ipconfig_ipv6;
 604
 605         if (service == NULL)
 606                 return;
 607
 608         if (__connman_service_is_connected_state(service,
 609                                 CONNMAN_IPCONFIG_TYPE_IPV6) == FALSE) {
 610                 return;
 611         }
 612
 613         ipconfig_ipv4 = __connman_service_get_ip4config(service);
 614         ipconfig_ipv6 = __connman_service_get_ip6config(service);
 615         if (ipconfig_ipv6 == NULL)
 616                 return;
 617
 618         __connman_ipconfig_append_ipv6(ipconfig_ipv6, iter, ipconfig_ipv4);
 619 }
 620
 621 static void append_notify(DBusMessageIter *dict,
 622                                         struct connman_session *session)
 623 {
 624         struct session_info *info = session->info;
 625         struct session_info *info_last = session->info_last;
 626         struct connman_service *service;
 627         const char *name, *ifname, *bearer;
 628
 629         if (session->append_all == TRUE ||
 630                         info->state != info_last->state) {
 631                 const char *state = state2string(info->state);
 632
 633                 connman_dbus_dict_append_basic(dict, "State",
 634                                                 DBUS_TYPE_STRING,
 635                                                 &state);
 636                 info_last->state = info->state;
 637         }
 638
 639         if (session->append_all == TRUE ||
 640                         info->entry != info_last->entry) {
 641                 if (info->entry == NULL) {
 642                         name = "";
 643                         ifname = "";
 644                         service = NULL;
 645                         bearer = "";
 646                 } else {
 647                         name = info->entry->name;
 648                         ifname = info->entry->ifname;
 649                         service = info->entry->service;
 650                         bearer = info->entry->bearer;
 651                 }
 652
 653                 connman_dbus_dict_append_basic(dict, "Name",
 654                                                 DBUS_TYPE_STRING,
 655                                                 &name);
 656
 657                 connman_dbus_dict_append_dict(dict, "IPv4",
 658                                                 append_ipconfig_ipv4,
 659                                                 service);
 660
 661                 connman_dbus_dict_append_dict(dict, "IPv6",
 662                                                 append_ipconfig_ipv6,
 663                                                 service);
 664
 665                 connman_dbus_dict_append_basic(dict, "Interface",
 666                                                 DBUS_TYPE_STRING,
 667                                                 &ifname);
 668
 669                 connman_dbus_dict_append_basic(dict, "Bearer",
 670                                                 DBUS_TYPE_STRING,
 671                                                 &bearer);
 672
 673                 info_last->entry = info->entry;
 674         }
 675
 676         if (session->append_all == TRUE ||
 677                         info->config.type != info_last->config.type) {
 678                 const char *type = type2string(info->config.type);
 679
 680                 connman_dbus_dict_append_basic(dict, "ConnectionType",
 681                                                 DBUS_TYPE_STRING,
 682                                                 &type);
 683                 info_last->config.type = info->config.type;
 684         }
 685
 686         if (session->append_all == TRUE ||
 687                         info->config.allowed_bearers != info_last->config.allowed_bearers) {
 688                 connman_dbus_dict_append_array(dict, "AllowedBearers",
 689                                                 DBUS_TYPE_STRING,
 690                                                 append_allowed_bearers,
 691                                                 info);
 692                 info_last->config.allowed_bearers = info->config.allowed_bearers;
 693         }
 694
 695         session->append_all = FALSE;
 696 }
 697
 698 static connman_bool_t is_type_matching_state(enum connman_session_state *state,
 699                                                 enum connman_session_type type)
 700 {
 701         switch (type) {
 702         case CONNMAN_SESSION_TYPE_UNKNOWN:
 703                 return FALSE;
 704         case CONNMAN_SESSION_TYPE_ANY:
 705                 return TRUE;
 706         case CONNMAN_SESSION_TYPE_LOCAL:
 707                 if (*state >= CONNMAN_SESSION_STATE_CONNECTED) {
 708                         *state = CONNMAN_SESSION_STATE_CONNECTED;
 709                         return TRUE;
 710                 }
 711
 712                 break;
 713         case CONNMAN_SESSION_TYPE_INTERNET:
 714                 if (*state == CONNMAN_SESSION_STATE_ONLINE)
 715                         return TRUE;
 716                 break;
 717         }
 718
 719         return FALSE;
 720 }
 721
 722 static connman_bool_t compute_notifiable_changes(struct connman_session *session)
 723 {
 724         struct session_info *info_last = session->info_last;
 725         struct session_info *info = session->info;
 726
 727         if (session->append_all == TRUE)
 728                 return TRUE;
 729
 730         if (info->state != info_last->state)
 731                 return TRUE;
 732
 733         if (info->entry != info_last->entry &&
 734                         info->state >= CONNMAN_SESSION_STATE_CONNECTED)
 735                 return TRUE;
 736
 737         if (info->config.allowed_bearers != info_last->config.allowed_bearers ||
 738                         info->config.type != info_last->config.type)
 739                 return TRUE;
 740
 741         return FALSE;
 742 }
 743
 744 static gboolean session_notify(gpointer user_data)
 745 {
 746         struct connman_session *session = user_data;
 747         DBusMessage *msg;
 748         DBusMessageIter array, dict;
 749
 750         if (compute_notifiable_changes(session) == FALSE)
 751                 return FALSE;
 752
 753         DBG("session %p owner %s notify_path %s", session,
 754                 session->owner, session->notify_path);
 755
 756         msg = dbus_message_new_method_call(session->owner, session->notify_path,
 757                                                 CONNMAN_NOTIFICATION_INTERFACE,
 758                                                 "Update");
 759         if (msg == NULL)
 760                 return FALSE;
 761
 762         dbus_message_iter_init_append(msg, &array);
 763         connman_dbus_dict_open(&array, &dict);
 764
 765         append_notify(&dict, session);
 766
 767         connman_dbus_dict_close(&array, &dict);
 768
 769         g_dbus_send_message(connection, msg);
 770
 771         return FALSE;
 772 }
 773
 774 static void ipconfig_ipv4_changed(struct connman_session *session)
 775 {
 776         struct session_info *info = session->info;
 777
 778         connman_dbus_setting_changed_dict(session->owner, session->notify_path,
 779                                                 "IPv4", append_ipconfig_ipv4,
 780                                                 info->entry->service);
 781 }
 782
 783 static void ipconfig_ipv6_changed(struct connman_session *session)
 784 {
 785         struct session_info *info = session->info;
 786
 787         connman_dbus_setting_changed_dict(session->owner, session->notify_path,
 788                                                 "IPv6", append_ipconfig_ipv6,
 789                                                 info->entry->service);
 790 }
 791
 792 static connman_bool_t service_type_match(struct connman_session *session,
 793                                         struct connman_service *service)
 794 {
 795         struct session_info *info = session->info;
 796         GSList *list;
 797
 798         for (list = info->config.allowed_bearers;
 799                         list != NULL; list = list->next) {
 800                 enum connman_service_type bearer = GPOINTER_TO_INT(list->data);
 801                 enum connman_service_type service_type;
 802
 803                 if (bearer == CONNMAN_SERVICE_TYPE_UNKNOWN)
 804                         return TRUE;
 805
 806                 service_type = connman_service_get_type(service);
 807                 if (bearer == service_type)
 808                         return TRUE;
 809         }
 810
 811         return FALSE;
 812 }
 813
 814 static connman_bool_t service_match(struct connman_session *session,
 815                                         struct connman_service *service)
 816 {
 817         if (service_type_match(session, service) == FALSE)
 818                 return FALSE;
 819
 820         return TRUE;
 821 }
 822
 823 static int service_type_weight(enum connman_service_type type)
 824 {
 825         /*
 826          * The session doesn't care which service
 827          * to use. Nevertheless we have to sort them
 828          * according their type. The ordering is
 829          *
 830          * 1. Ethernet
 831          * 2. Bluetooth
 832          * 3. WiFi
 833          * 4. Cellular
 834          */
 835
 836         switch (type) {
 837         case CONNMAN_SERVICE_TYPE_ETHERNET:
 838                 return 4;
 839         case CONNMAN_SERVICE_TYPE_BLUETOOTH:
 840                 return 3;
 841         case CONNMAN_SERVICE_TYPE_WIFI:
 842                 return 2;
 843         case CONNMAN_SERVICE_TYPE_CELLULAR:
 844                 return 1;
 845         case CONNMAN_SERVICE_TYPE_UNKNOWN:
 846         case CONNMAN_SERVICE_TYPE_SYSTEM:
 847         case CONNMAN_SERVICE_TYPE_GPS:
 848         case CONNMAN_SERVICE_TYPE_VPN:
 849         case CONNMAN_SERVICE_TYPE_GADGET:
 850                 break;
 851         }
 852
 853         return 0;
 854 }
 855
 856 static gint sort_allowed_bearers(struct connman_service *service_a,
 857                                         struct connman_service *service_b,
 858                                         struct connman_session *session)
 859 {
 860         struct session_info *info = session->info;
 861         GSList *list;
 862         enum connman_service_type type_a, type_b;
 863         int weight_a, weight_b;
 864
 865         type_a = connman_service_get_type(service_a);
 866         type_b = connman_service_get_type(service_b);
 867
 868         for (list = info->config.allowed_bearers;
 869                         list != NULL; list = list->next) {
 870                 enum connman_service_type bearer = GPOINTER_TO_INT(list->data);
 871
 872                 if (bearer == CONNMAN_SERVICE_TYPE_UNKNOWN) {
 873                         if (type_a != type_b) {
 874                                 weight_a = service_type_weight(type_a);
 875                                 weight_b = service_type_weight(type_b);
 876
 877                                 if (weight_a > weight_b)
 878                                         return -1;
 879
 880                                 if (weight_a < weight_b)
 881                                         return 1;
 882
 883                                 return 0;
 884                         }
 885                 }
 886
 887                 if (type_a == bearer && type_b == bearer)
 888                         return 0;
 889
 890                 if (type_a == bearer && type_b != bearer)
 891                         return -1;
 892
 893                 if (type_a != bearer && type_b == bearer)
 894                         return 1;
 895         }
 896
 897         return 0;
 898 }
 899
 900 static gint sort_services(gconstpointer a, gconstpointer b, gpointer user_data)
 901 {
 902         struct service_entry *entry_a = (void *)a;
 903         struct service_entry *entry_b = (void *)b;
 904         struct connman_session *session = user_data;
 905
 906         return sort_allowed_bearers(entry_a->service, entry_b->service,
 907                                 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 int connman_session_config_update(struct connman_session *session)
1400 {
1401         struct session_info *info = session->info;
1402         GSList *allowed_bearers;
1403         int err;
1404
1405         DBG("session %p", session);
1406
1407         /*
1408          * We update all configuration even though only one entry
1409          * might have changed. We can still optimize this later.
1410          */
1411
1412         err = apply_policy_on_bearers(
1413                 session->policy_config->allowed_bearers,
1414                 session->user_allowed_bearers,
1415                 &allowed_bearers);
1416         if (err < 0)
1417                 return err;
1418
1419         g_slist_free(info->config.allowed_bearers);
1420         info->config.allowed_bearers = allowed_bearers;
1421
1422         info->config.type = apply_policy_on_type(
1423                                 session->policy_config->type,
1424                                 info->config.type);
1425
1426         info->config.roaming_policy = session->policy_config->roaming_policy;
1427
1428         info->config.ecall = session->policy_config->ecall;
1429         if (info->config.ecall == TRUE)
1430                 ecall_session = session;
1431
1432         info->config.priority = session->policy_config->priority;
1433
1434         session_changed(session, CONNMAN_SESSION_TRIGGER_SETTING);
1435
1436         return 0;
1437 }
1438
1439 static DBusMessage *connect_session(DBusConnection *conn,
1440                                         DBusMessage *msg, void *user_data)
1441 {
1442         struct connman_session *session = user_data;
1443
1444         DBG("session %p", session);
1445
1446         if (ecall_session != NULL) {
1447                 if (ecall_session->ecall == TRUE && ecall_session != session)
1448                         return __connman_error_failed(msg, EBUSY);
1449
1450                 session->ecall = TRUE;
1451                 session_changed(session, CONNMAN_SESSION_TRIGGER_ECALL);
1452         } else
1453                 session_changed(session, CONNMAN_SESSION_TRIGGER_CONNECT);
1454
1455         return g_dbus_create_reply(msg, DBUS_TYPE_INVALID);
1456 }
1457
1458 static DBusMessage *disconnect_session(DBusConnection *conn,
1459                                         DBusMessage *msg, void *user_data)
1460 {
1461         struct connman_session *session = user_data;
1462
1463         DBG("session %p", session);
1464
1465         if (ecall_session != NULL) {
1466                 if (ecall_session->ecall == TRUE && ecall_session != session)
1467                         return __connman_error_failed(msg, EBUSY);
1468
1469                 session->ecall = FALSE;
1470         }
1471
1472         session_changed(session, CONNMAN_SESSION_TRIGGER_DISCONNECT);
1473
1474         return g_dbus_create_reply(msg, DBUS_TYPE_INVALID);
1475 }
1476
1477 static DBusMessage *change_session(DBusConnection *conn,
1478                                         DBusMessage *msg, void *user_data)
1479 {
1480         struct connman_session *session = user_data;
1481         struct session_info *info = session->info;
1482         DBusMessageIter iter, value;
1483         const char *name;
1484         const char *val;
1485         GSList *allowed_bearers;
1486         int err;
1487
1488         DBG("session %p", session);
1489         if (dbus_message_iter_init(msg, &iter) == FALSE)
1490                 return __connman_error_invalid_arguments(msg);
1491
1492         if (dbus_message_iter_get_arg_type(&iter) != DBUS_TYPE_STRING)
1493                 return __connman_error_invalid_arguments(msg);
1494
1495         dbus_message_iter_get_basic(&iter, &name);
1496         dbus_message_iter_next(&iter);
1497
1498         if (dbus_message_iter_get_arg_type(&iter) != DBUS_TYPE_VARIANT)
1499                 return __connman_error_invalid_arguments(msg);
1500
1501         dbus_message_iter_recurse(&iter, &value);
1502
1503         switch (dbus_message_iter_get_arg_type(&value)) {
1504         case DBUS_TYPE_ARRAY:
1505                 if (g_str_equal(name, "AllowedBearers") == TRUE) {
1506                         err = parse_bearers(&value, &allowed_bearers);
1507                         if (err < 0)
1508                                 return __connman_error_failed(msg, err);
1509
1510                         g_slist_free(info->config.allowed_bearers);
1511                         session->user_allowed_bearers = allowed_bearers;
1512
1513                         err = apply_policy_on_bearers(
1514                                         session->policy_config->allowed_bearers,
1515                                         session->user_allowed_bearers,
1516                                         &info->config.allowed_bearers);
1517
1518                         if (err < 0)
1519                                 return __connman_error_failed(msg, err);
1520                 } else {
1521                         goto err;
1522                 }
1523                 break;
1524         case DBUS_TYPE_STRING:
1525                 if (g_str_equal(name, "ConnectionType") == TRUE) {
1526                         dbus_message_iter_get_basic(&value, &val);
1527                         info->config.type = apply_policy_on_type(
1528                                 session->policy_config->type,
1529                                 connman_session_parse_connection_type(val));
1530                 } else {
1531                         goto err;
1532                 }
1533                 break;
1534         default:
1535                 goto err;
1536         }
1537
1538         session_changed(session, CONNMAN_SESSION_TRIGGER_SETTING);
1539
1540         return g_dbus_create_reply(msg, DBUS_TYPE_INVALID);
1541
1542 err:
1543         return __connman_error_invalid_arguments(msg);
1544 }
1545
1546 static void release_session(gpointer key, gpointer value, gpointer user_data)
1547 {
1548         struct connman_session *session = value;
1549         DBusMessage *message;
1550
1551         DBG("owner %s path %s", session->owner, session->notify_path);
1552
1553         if (session->notify_watch > 0)
1554                 g_dbus_remove_watch(connection, session->notify_watch);
1555
1556         g_dbus_unregister_interface(connection, session->session_path,
1557                                                 CONNMAN_SESSION_INTERFACE);
1558
1559         message = dbus_message_new_method_call(session->owner,
1560                                                 session->notify_path,
1561                                                 CONNMAN_NOTIFICATION_INTERFACE,
1562                                                 "Release");
1563         if (message == NULL)
1564                 return;
1565
1566         dbus_message_set_no_reply(message, TRUE);
1567
1568         g_dbus_send_message(connection, message);
1569 }
1570
1571 static int session_disconnect(struct connman_session *session)
1572 {
1573         DBG("session %p, %s", session, session->owner);
1574
1575         if (session->notify_watch > 0)
1576                 g_dbus_remove_watch(connection, session->notify_watch);
1577
1578         g_dbus_unregister_interface(connection, session->session_path,
1579                                                 CONNMAN_SESSION_INTERFACE);
1580
1581         deselect_and_disconnect(session);
1582
1583         g_hash_table_remove(session_hash, session->session_path);
1584
1585         return 0;
1586 }
1587
1588 static void owner_disconnect(DBusConnection *conn, void *user_data)
1589 {
1590         struct connman_session *session = user_data;
1591
1592         DBG("session %p, %s died", session, session->owner);
1593
1594         session_disconnect(session);
1595 }
1596
1597 static DBusMessage *destroy_session(DBusConnection *conn,
1598                                         DBusMessage *msg, void *user_data)
1599 {
1600         struct connman_session *session = user_data;
1601
1602         DBG("session %p", session);
1603
1604         if (ecall_session != NULL && ecall_session != session)
1605                 return __connman_error_failed(msg, EBUSY);
1606
1607         session_disconnect(session);
1608
1609         return g_dbus_create_reply(msg, DBUS_TYPE_INVALID);
1610 }
1611
1612 static const GDBusMethodTable session_methods[] = {
1613         { GDBUS_METHOD("Destroy", NULL, NULL, destroy_session) },
1614         { GDBUS_METHOD("Connect", NULL, NULL, connect_session) },
1615         { GDBUS_METHOD("Disconnect", NULL, NULL,
1616                         disconnect_session ) },
1617         { GDBUS_METHOD("Change",
1618                         GDBUS_ARGS({ "name", "s" }, { "value", "v" }),
1619                         NULL, change_session) },
1620         { },
1621 };
1622
1623 static int session_create_cb(struct connman_session *session,
1624                                 struct connman_session_config *config,
1625                                 void *user_data, int err)
1626 {
1627         DBusMessage *reply;
1628         struct user_config *user_config = user_data;
1629         struct session_info *info, *info_last;
1630
1631         DBG("session %p config %p", session, config);
1632
1633         if (err != 0)
1634                 goto out;
1635
1636         session->policy_config = config;
1637
1638         info = session->info;
1639         info_last = session->info_last;
1640
1641         if (session->policy_config->ecall == TRUE)
1642                 ecall_session = session;
1643
1644         info->state = CONNMAN_SESSION_STATE_DISCONNECTED;
1645         info->config.type = apply_policy_on_type(
1646                                 session->policy_config->type,
1647                                 user_config->type);
1648         info->config.priority = session->policy_config->priority;
1649         info->config.roaming_policy = session->policy_config->roaming_policy;
1650         info->entry = NULL;
1651
1652         session->user_allowed_bearers = user_config->allowed_bearers;
1653         user_config->allowed_bearers = NULL;
1654
1655         err = apply_policy_on_bearers(
1656                         session->policy_config->allowed_bearers,
1657                         session->user_allowed_bearers,
1658                         &info->config.allowed_bearers);
1659         if (err < 0)
1660                 goto out;
1661
1662         g_hash_table_replace(session_hash, session->session_path, session);
1663
1664         DBG("add %s", session->session_path);
1665
1666         if (g_dbus_register_interface(connection, session->session_path,
1667                                         CONNMAN_SESSION_INTERFACE,
1668                                         session_methods, NULL,
1669                                         NULL, session, NULL) == FALSE) {
1670                 connman_error("Failed to register %s", session->session_path);
1671                 g_hash_table_remove(session_hash, session->session_path);
1672                 err = -EINVAL;
1673                 goto out;
1674         }
1675
1676         reply = g_dbus_create_reply(user_config->pending,
1677                                 DBUS_TYPE_OBJECT_PATH, &session->session_path,
1678                                 DBUS_TYPE_INVALID);
1679         g_dbus_send_message(connection, reply);
1680         user_config->pending = NULL;
1681
1682         populate_service_list(session);
1683
1684         info_last->state = info->state;
1685         info_last->config.priority = info->config.priority;
1686         info_last->config.roaming_policy = info->config.roaming_policy;
1687         info_last->entry = info->entry;
1688         info_last->config.allowed_bearers = info->config.allowed_bearers;
1689
1690         session->append_all = TRUE;
1691
1692         session_changed(session, CONNMAN_SESSION_TRIGGER_SETTING);
1693
1694 out:
1695         if (err < 0) {
1696                 reply = __connman_error_failed(user_config->pending, -err);
1697                 g_dbus_send_message(connection, reply);
1698
1699                 free_session(session);
1700         }
1701
1702         cleanup_user_config(user_config);
1703
1704         return err;
1705 }
1706
1707 int __connman_session_create(DBusMessage *msg)
1708 {
1709         const char *owner, *notify_path;
1710         char *session_path = NULL;
1711         DBusMessageIter iter, array;
1712         struct connman_session *session = NULL;
1713         struct user_config *user_config = NULL;
1714         connman_bool_t user_allowed_bearers = FALSE;
1715         connman_bool_t user_connection_type = FALSE;
1716         int err;
1717
1718         owner = dbus_message_get_sender(msg);
1719
1720         DBG("owner %s", owner);
1721
1722         if (ecall_session != NULL && ecall_session->ecall == TRUE) {
1723                 /*
1724                  * If there is an emergency call already going on,
1725                  * ignore session creation attempt
1726                  */
1727                 err = -EBUSY;
1728                 goto err;
1729         }
1730
1731         user_config = g_try_new0(struct user_config, 1);
1732         if (user_config == NULL) {
1733                 err = -ENOMEM;
1734                 goto err;
1735         }
1736
1737         user_config->pending = dbus_message_ref(msg);
1738
1739         dbus_message_iter_init(msg, &iter);
1740         dbus_message_iter_recurse(&iter, &array);
1741
1742         while (dbus_message_iter_get_arg_type(&array) == DBUS_TYPE_DICT_ENTRY) {
1743                 DBusMessageIter entry, value;
1744                 const char *key, *val;
1745
1746                 dbus_message_iter_recurse(&array, &entry);
1747                 dbus_message_iter_get_basic(&entry, &key);
1748
1749                 dbus_message_iter_next(&entry);
1750                 dbus_message_iter_recurse(&entry, &value);
1751
1752                 switch (dbus_message_iter_get_arg_type(&value)) {
1753                 case DBUS_TYPE_ARRAY:
1754                         if (g_str_equal(key, "AllowedBearers") == TRUE) {
1755                                 err = parse_bearers(&value,
1756                                                 &user_config->allowed_bearers);
1757                                 if (err < 0)
1758                                         goto err;
1759
1760                                 user_allowed_bearers = TRUE;
1761                         } else {
1762                                 err = -EINVAL;
1763                                 goto err;
1764                         }
1765                         break;
1766                 case DBUS_TYPE_STRING:
1767                         if (g_str_equal(key, "ConnectionType") == TRUE) {
1768                                 dbus_message_iter_get_basic(&value, &val);
1769                                 user_config->type =
1770                                         connman_session_parse_connection_type(val);
1771
1772                                 user_connection_type = TRUE;
1773                         } else {
1774                                 err = -EINVAL;
1775                                 goto err;
1776                         }
1777                 }
1778                 dbus_message_iter_next(&array);
1779         }
1780
1781         /*
1782          * If the user hasn't provided a configuration, we set
1783          * the default configuration.
1784          *
1785          * For AllowedBearers this is '*', ...
1786          */
1787         if (user_allowed_bearers == FALSE) {
1788                 user_config->allowed_bearers =
1789                         g_slist_append(NULL,
1790                                 GINT_TO_POINTER(CONNMAN_SERVICE_TYPE_UNKNOWN));
1791                 if (user_config->allowed_bearers == NULL) {
1792                         err = -ENOMEM;
1793                         goto err;
1794                 }
1795         }
1796
1797         /* ... and for ConnectionType it is 'any'. */
1798         if (user_connection_type == FALSE)
1799                 user_config->type = CONNMAN_SESSION_TYPE_ANY;
1800
1801         dbus_message_iter_next(&iter);
1802         dbus_message_iter_get_basic(&iter, &notify_path);
1803
1804         if (notify_path == NULL) {
1805                 err = -EINVAL;
1806                 goto err;
1807         }
1808
1809         session_path = g_strdup_printf("/sessions%s", notify_path);
1810         if (session_path == NULL) {
1811                 err = -ENOMEM;
1812                 goto err;
1813         }
1814
1815         session = g_hash_table_lookup(session_hash, session_path);
1816         if (session != NULL) {
1817                 g_free(session_path);
1818                 session = NULL;
1819                 err = -EEXIST;
1820                 goto err;
1821         }
1822
1823         session = g_try_new0(struct connman_session, 1);
1824         if (session == NULL) {
1825                 g_free(session_path);
1826                 err = -ENOMEM;
1827                 goto err;
1828         }
1829
1830         session->session_path = session_path;
1831
1832         session->info = g_try_new0(struct session_info, 1);
1833         if (session->info == NULL) {
1834                 err = -ENOMEM;
1835                 goto err;
1836         }
1837
1838         session->info_last = g_try_new0(struct session_info, 1);
1839         if (session->info_last == NULL) {
1840                 err = -ENOMEM;
1841                 goto err;
1842         }
1843
1844         session->owner = g_strdup(owner);
1845         session->notify_path = g_strdup(notify_path);
1846         session->notify_watch =
1847                 g_dbus_add_disconnect_watch(connection, session->owner,
1848                                         owner_disconnect, session, NULL);
1849
1850         err = assign_policy_plugin(session);
1851         if (err < 0)
1852                 goto err;
1853
1854         err = create_policy_config(session, session_create_cb, user_config);
1855         if (err < 0 && err != -EINPROGRESS)
1856                 return err;
1857
1858         return -EINPROGRESS;
1859
1860 err:
1861         connman_error("Failed to create session");
1862
1863         free_session(session);
1864
1865         cleanup_user_config(user_config);
1866         return err;
1867 }
1868
1869 void connman_session_destroy(struct connman_session *session)
1870 {
1871         DBG("session %p", session);
1872
1873         session_disconnect(session);
1874 }
1875
1876 int __connman_session_destroy(DBusMessage *msg)
1877 {
1878         const char *owner, *session_path;
1879         struct connman_session *session;
1880
1881         owner = dbus_message_get_sender(msg);
1882
1883         DBG("owner %s", owner);
1884
1885         dbus_message_get_args(msg, NULL, DBUS_TYPE_OBJECT_PATH, &session_path,
1886                                                         DBUS_TYPE_INVALID);
1887         if (session_path == NULL)
1888                 return -EINVAL;
1889
1890         session = g_hash_table_lookup(session_hash, session_path);
1891         if (session == NULL)
1892                 return -EINVAL;
1893
1894         if (g_strcmp0(owner, session->owner) != 0)
1895                 return -EACCES;
1896
1897         connman_session_destroy(session);
1898
1899         return 0;
1900 }
1901
1902 connman_bool_t __connman_session_mode()
1903 {
1904         return sessionmode;
1905 }
1906
1907 void __connman_session_set_mode(connman_bool_t enable)
1908 {
1909         DBG("enable %d", enable);
1910
1911         if (sessionmode != enable) {
1912                 sessionmode = enable;
1913
1914                 connman_dbus_property_changed_basic(CONNMAN_MANAGER_PATH,
1915                                 CONNMAN_MANAGER_INTERFACE, "SessionMode",
1916                                 DBUS_TYPE_BOOLEAN, &sessionmode);
1917         }
1918
1919         if (sessionmode == TRUE)
1920                 __connman_service_disconnect_all();
1921 }
1922
1923 static void service_add(struct connman_service *service,
1924                         const char *name)
1925 {
1926         GHashTableIter iter;
1927         GSequenceIter *iter_service_list;
1928         gpointer key, value;
1929         struct connman_session *session;
1930         struct service_entry *entry;
1931
1932         DBG("service %p", service);
1933
1934         g_hash_table_iter_init(&iter, session_hash);
1935
1936         while (g_hash_table_iter_next(&iter, &key, &value) == TRUE) {
1937                 session = value;
1938
1939                 if (service_match(session, service) == FALSE)
1940                         continue;
1941
1942                 entry = create_service_entry(service, name,
1943                                                 CONNMAN_SERVICE_STATE_IDLE);
1944                 if (entry == NULL)
1945                         continue;
1946
1947                 iter_service_list =
1948                         g_sequence_insert_sorted(session->service_list,
1949                                                         entry, sort_services,
1950                                                         session);
1951
1952                 g_hash_table_replace(session->service_hash, service,
1953                                         iter_service_list);
1954
1955                 session_changed(session, CONNMAN_SESSION_TRIGGER_SERVICE);
1956         }
1957 }
1958
1959 static void service_remove(struct connman_service *service)
1960 {
1961
1962         GHashTableIter iter;
1963         gpointer key, value;
1964         struct connman_session *session;
1965         struct session_info *info;
1966
1967         DBG("service %p", service);
1968
1969         g_hash_table_iter_init(&iter, session_hash);
1970
1971         while (g_hash_table_iter_next(&iter, &key, &value) == TRUE) {
1972                 GSequenceIter *seq_iter;
1973                 session = value;
1974                 info = session->info;
1975
1976                 seq_iter = g_hash_table_lookup(session->service_hash, service);
1977                 if (seq_iter == NULL)
1978                         continue;
1979
1980                 g_sequence_remove(seq_iter);
1981
1982                 if (info->entry != NULL && info->entry->service == service)
1983                         info->entry = NULL;
1984                 session_changed(session, CONNMAN_SESSION_TRIGGER_SERVICE);
1985         }
1986 }
1987
1988 static void service_state_changed(struct connman_service *service,
1989                                         enum connman_service_state state)
1990 {
1991         GHashTableIter iter;
1992         gpointer key, value;
1993
1994         DBG("service %p state %d", service, state);
1995
1996         g_hash_table_iter_init(&iter, session_hash);
1997
1998         while (g_hash_table_iter_next(&iter, &key, &value) == TRUE) {
1999                 struct connman_session *session = value;
2000                 GSequenceIter *service_iter;
2001
2002                 service_iter = g_hash_table_lookup(session->service_hash, service);
2003                 if (service_iter != NULL) {
2004                         struct service_entry *entry;
2005
2006                         entry = g_sequence_get(service_iter);
2007                         entry->state = state;
2008                 }
2009
2010                 session_changed(session,
2011                                 CONNMAN_SESSION_TRIGGER_SERVICE);
2012         }
2013 }
2014
2015 static void ipconfig_changed(struct connman_service *service,
2016                                 struct connman_ipconfig *ipconfig)
2017 {
2018         GHashTableIter iter;
2019         gpointer key, value;
2020         struct connman_session *session;
2021         struct session_info *info;
2022         enum connman_ipconfig_type type;
2023
2024         DBG("service %p ipconfig %p", service, ipconfig);
2025
2026         type = __connman_ipconfig_get_config_type(ipconfig);
2027
2028         g_hash_table_iter_init(&iter, session_hash);
2029
2030         while (g_hash_table_iter_next(&iter, &key, &value) == TRUE) {
2031                 session = value;
2032                 info = session->info;
2033
2034                 if (info->state == CONNMAN_SESSION_STATE_DISCONNECTED)
2035                         continue;
2036
2037                 if (info->entry != NULL && info->entry->service == service) {
2038                         if (type == CONNMAN_IPCONFIG_TYPE_IPV4)
2039                                 ipconfig_ipv4_changed(session);
2040                         else if (type == CONNMAN_IPCONFIG_TYPE_IPV6)
2041                                 ipconfig_ipv6_changed(session);
2042                 }
2043         }
2044 }
2045
2046 static struct connman_notifier session_notifier = {
2047         .name                   = "session",
2048         .service_add            = service_add,
2049         .service_remove         = service_remove,
2050         .service_state_changed  = service_state_changed,
2051         .ipconfig_changed       = ipconfig_changed,
2052 };
2053
2054 int __connman_session_init(void)
2055 {
2056         int err;
2057
2058         DBG("");
2059
2060         connection = connman_dbus_get_connection();
2061         if (connection == NULL)
2062                 return -1;
2063
2064         err = connman_notifier_register(&session_notifier);
2065         if (err < 0) {
2066                 dbus_connection_unref(connection);
2067                 return err;
2068         }
2069
2070         session_hash = g_hash_table_new_full(g_str_hash, g_str_equal,
2071                                                 NULL, cleanup_session);
2072
2073         sessionmode = FALSE;
2074         return 0;
2075 }
2076
2077 void __connman_session_cleanup(void)
2078 {
2079         DBG("");
2080
2081         if (connection == NULL)
2082                 return;
2083
2084         connman_notifier_unregister(&session_notifier);
2085
2086         g_hash_table_foreach(session_hash, release_session, NULL);
2087         g_hash_table_destroy(session_hash);
2088         session_hash = NULL;
2089
2090         dbus_connection_unref(connection);
2091 }