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