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