src/session.c

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