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