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