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