vpn/vpn-provider.c

   1 /*
   2  *
   3  *  ConnMan VPN daemon
   4  *
   5  *  Copyright (C) 2012  Intel Corporation. All rights reserved.
   6  *
   7  *  This program is free software; you can redistribute it and/or modify
   8  *  it under the terms of the GNU General Public License version 2 as
   9  *  published by the Free Software Foundation.
  10  *
  11  *  This program is distributed in the hope that it will be useful,
  12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  *  GNU General Public License for more details.
  15  *
  16  *  You should have received a copy of the GNU General Public License
  17  *  along with this program; if not, write to the Free Software
  18  *  Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
  19  *
  20  */
  21
  22 #ifdef HAVE_CONFIG_H
  23 #include <config.h>
  24 #endif
  25
  26 #include <errno.h>
  27 #include <stdio.h>
  28 #include <string.h>
  29 #include <stdlib.h>
  30 #include <gdbus.h>
  31 #include <connman/log.h>
  32 #include <gweb/gresolv.h>
  33 #include <netdb.h>
  34
  35 #include "../src/connman.h"
  36 #include "connman/vpn-dbus.h"
  37 #include "vpn-provider.h"
  38 #include "vpn.h"
  39
  40 enum {
  41         USER_ROUTES_CHANGED = 0x01,
  42         SERVER_ROUTES_CHANGED = 0x02,
  43 };
  44
  45 static DBusConnection *connection;
  46 static GHashTable *provider_hash;
  47 static GSList *driver_list;
  48 static int configuration_count;
  49 static gboolean handle_routes;
  50
  51 struct vpn_route {
  52         int family;
  53         char *network;
  54         char *netmask;
  55         char *gateway;
  56 };
  57
  58 struct vpn_provider {
  59         int refcount;
  60         int index;
  61         int fd;
  62         enum vpn_provider_state state;
  63         char *path;
  64         char *identifier;
  65         char *name;
  66         char *type;
  67         char *host;
  68         char *domain;
  69         int family;
  70         GHashTable *routes;
  71         struct vpn_provider_driver *driver;
  72         void *driver_data;
  73         GHashTable *setting_strings;
  74         GHashTable *user_routes;
  75         GSList *user_networks;
  76         GResolv *resolv;
  77         char **host_ip;
  78         struct vpn_ipconfig *ipconfig_ipv4;
  79         struct vpn_ipconfig *ipconfig_ipv6;
  80         char **nameservers;
  81         int what_changed;
  82         guint notify_id;
  83 };
  84
  85 static void free_route(gpointer data)
  86 {
  87         struct vpn_route *route = data;
  88
  89         g_free(route->network);
  90         g_free(route->netmask);
  91         g_free(route->gateway);
  92
  93         g_free(route);
  94 }
  95
  96 static void append_route(DBusMessageIter *iter, void *user_data)
  97 {
  98         struct vpn_route *route = user_data;
  99         DBusMessageIter item;
 100         int family = 0;
 101
 102         connman_dbus_dict_open(iter, &item);
 103
 104         if (route == NULL)
 105                 goto empty_dict;
 106
 107         if (route->family == AF_INET)
 108                 family = 4;
 109         else if (route->family == AF_INET6)
 110                 family = 6;
 111
 112         if (family != 0)
 113                 connman_dbus_dict_append_basic(&item, "ProtocolFamily",
 114                                         DBUS_TYPE_INT32, &family);
 115
 116         if (route->network != NULL)
 117                 connman_dbus_dict_append_basic(&item, "Network",
 118                                         DBUS_TYPE_STRING, &route->network);
 119
 120         if (route->netmask != NULL)
 121                 connman_dbus_dict_append_basic(&item, "Netmask",
 122                                         DBUS_TYPE_STRING, &route->netmask);
 123
 124         if (route->gateway != NULL)
 125                 connman_dbus_dict_append_basic(&item, "Gateway",
 126                                         DBUS_TYPE_STRING, &route->gateway);
 127
 128 empty_dict:
 129         connman_dbus_dict_close(iter, &item);
 130 }
 131
 132 static void append_routes(DBusMessageIter *iter, void *user_data)
 133 {
 134         GHashTable *routes = user_data;
 135         GHashTableIter hash;
 136         gpointer value, key;
 137
 138         if (routes == NULL) {
 139                 append_route(iter, NULL);
 140                 return;
 141         }
 142
 143         g_hash_table_iter_init(&hash, routes);
 144
 145         while (g_hash_table_iter_next(&hash, &key, &value) == TRUE) {
 146                 DBusMessageIter dict;
 147
 148                 dbus_message_iter_open_container(iter, DBUS_TYPE_STRUCT, NULL,
 149                                                 &dict);
 150                 append_route(&dict, value);
 151                 dbus_message_iter_close_container(iter, &dict);
 152         }
 153 }
 154
 155 static void send_routes(struct vpn_provider *provider, GHashTable *routes,
 156                         const char *name)
 157 {
 158         connman_dbus_property_changed_array(provider->path,
 159                                         VPN_CONNECTION_INTERFACE,
 160                                         name,
 161                                         DBUS_TYPE_DICT_ENTRY,
 162                                         append_routes,
 163                                         routes);
 164 }
 165
 166 static int provider_property_changed(struct vpn_provider *provider,
 167                                 const char *name)
 168 {
 169         DBG("provider %p name %s", provider, name);
 170
 171         if (g_str_equal(name, "UserRoutes") == TRUE)
 172                 send_routes(provider, provider->user_routes, name);
 173         else if (g_str_equal(name, "ServerRoutes") == TRUE)
 174                 send_routes(provider, provider->routes, name);
 175
 176         return 0;
 177 }
 178
 179 static GSList *read_route_dict(GSList *routes, DBusMessageIter *dicts)
 180 {
 181         DBusMessageIter dict, value, entry;
 182         const char *network, *netmask, *gateway;
 183         struct vpn_route *route;
 184         int family, type;
 185         const char *key;
 186
 187         dbus_message_iter_recurse(dicts, &entry);
 188
 189         network = netmask = gateway = NULL;
 190         family = PF_UNSPEC;
 191
 192         while (dbus_message_iter_get_arg_type(&entry) == DBUS_TYPE_DICT_ENTRY) {
 193
 194                 dbus_message_iter_recurse(&entry, &dict);
 195                 dbus_message_iter_get_basic(&dict, &key);
 196
 197                 dbus_message_iter_next(&dict);
 198                 dbus_message_iter_recurse(&dict, &value);
 199
 200                 type = dbus_message_iter_get_arg_type(&value);
 201
 202                 switch (type) {
 203                 case DBUS_TYPE_STRING:
 204                         if (g_str_equal(key, "ProtocolFamily") == TRUE)
 205                                 dbus_message_iter_get_basic(&value, &family);
 206                         else if (g_str_equal(key, "Network") == TRUE)
 207                                 dbus_message_iter_get_basic(&value, &network);
 208                         else if (g_str_equal(key, "Netmask") == TRUE)
 209                                 dbus_message_iter_get_basic(&value, &netmask);
 210                         else if (g_str_equal(key, "Gateway") == TRUE)
 211                                 dbus_message_iter_get_basic(&value, &gateway);
 212                         break;
 213                 }
 214
 215                 dbus_message_iter_next(&entry);
 216         }
 217
 218         DBG("family %d network %s netmask %s gateway %s", family,
 219                 network, netmask, gateway);
 220
 221         if (network == NULL || netmask == NULL) {
 222                 DBG("Ignoring route as network/netmask is missing");
 223                 return routes;
 224         }
 225
 226         route = g_try_new(struct vpn_route, 1);
 227         if (route == NULL) {
 228                 g_slist_free_full(routes, free_route);
 229                 return NULL;
 230         }
 231
 232         if (family == PF_UNSPEC) {
 233                 family = connman_inet_check_ipaddress(network);
 234                 if (family < 0) {
 235                         DBG("Cannot get address family of %s (%d/%s)", network,
 236                                 family, gai_strerror(family));
 237                         if (strstr(network, ":") != NULL) {
 238                                 DBG("Guessing it is IPv6");
 239                                 family = AF_INET6;
 240                         } else {
 241                                 DBG("Guessing it is IPv4");
 242                                 family = AF_INET;
 243                         }
 244                 }
 245         } else {
 246                 switch (family) {
 247                 case '4':
 248                         family = AF_INET;
 249                         break;
 250                 case '6':
 251                         family = AF_INET6;
 252                         break;
 253                 default:
 254                         family = PF_UNSPEC;
 255                         break;
 256                 }
 257         }
 258
 259         route->family = family;
 260         route->network = g_strdup(network);
 261         route->netmask = g_strdup(netmask);
 262         route->gateway = g_strdup(gateway);
 263
 264         routes = g_slist_prepend(routes, route);
 265         return routes;
 266 }
 267
 268 static GSList *get_user_networks(DBusMessageIter *array)
 269 {
 270         DBusMessageIter entry;
 271         GSList *list = NULL;
 272
 273         while (dbus_message_iter_get_arg_type(array) == DBUS_TYPE_ARRAY) {
 274
 275                 dbus_message_iter_recurse(array, &entry);
 276
 277                 while (dbus_message_iter_get_arg_type(&entry) ==
 278                                                         DBUS_TYPE_STRUCT) {
 279                         DBusMessageIter dicts;
 280
 281                         dbus_message_iter_recurse(&entry, &dicts);
 282
 283                         while (dbus_message_iter_get_arg_type(&dicts) ==
 284                                                         DBUS_TYPE_ARRAY) {
 285
 286                                 list = read_route_dict(list, &dicts);
 287                                 dbus_message_iter_next(&dicts);
 288                         }
 289
 290                         dbus_message_iter_next(&entry);
 291                 }
 292
 293                 dbus_message_iter_next(array);
 294         }
 295
 296         return list;
 297 }
 298
 299 static void set_user_networks(struct vpn_provider *provider, GSList *networks)
 300 {
 301         GSList *list;
 302
 303         for (list = networks; list != NULL; list = g_slist_next(list)) {
 304                 struct vpn_route *route= list->data;
 305
 306                 if (__vpn_provider_append_user_route(provider,
 307                                         route->family, route->network,
 308                                         route->netmask) != 0)
 309                         break;
 310         }
 311 }
 312
 313 static void del_routes(struct vpn_provider *provider)
 314 {
 315         GHashTableIter hash;
 316         gpointer value, key;
 317
 318         g_hash_table_iter_init(&hash, provider->user_routes);
 319         while (handle_routes == TRUE && g_hash_table_iter_next(&hash,
 320                                                 &key, &value) == TRUE) {
 321                 struct vpn_route *route = value;
 322                 if (route->family == AF_INET6) {
 323                         unsigned char prefixlen = atoi(route->netmask);
 324                         connman_inet_del_ipv6_network_route(provider->index,
 325                                                         route->network,
 326                                                         prefixlen);
 327                 } else
 328                         connman_inet_del_host_route(provider->index,
 329                                                 route->network);
 330         }
 331
 332         g_hash_table_remove_all(provider->user_routes);
 333         g_slist_free_full(provider->user_networks, free_route);
 334         provider->user_networks = NULL;
 335 }
 336
 337 static gboolean provider_send_changed(gpointer data)
 338 {
 339         struct vpn_provider *provider = data;
 340
 341         if (provider->what_changed & USER_ROUTES_CHANGED)
 342                 provider_property_changed(provider, "UserRoutes");
 343
 344         if (provider->what_changed & SERVER_ROUTES_CHANGED)
 345                 provider_property_changed(provider, "ServerRoutes");
 346
 347         provider->what_changed = 0;
 348         provider->notify_id = 0;
 349
 350         return FALSE;
 351 }
 352
 353 static void provider_schedule_changed(struct vpn_provider *provider, int flag)
 354 {
 355         if (provider->notify_id != 0)
 356                 g_source_remove(provider->notify_id);
 357
 358         provider->what_changed |= flag;
 359
 360         provider->notify_id = g_timeout_add(100, provider_send_changed,
 361                                                                 provider);
 362 }
 363
 364 static DBusMessage *set_property(DBusConnection *conn, DBusMessage *msg,
 365                                                                 void *data)
 366 {
 367         struct vpn_provider *provider = data;
 368         DBusMessageIter iter, value;
 369         const char *name;
 370         int type;
 371
 372         DBG("conn %p", conn);
 373
 374         if (dbus_message_iter_init(msg, &iter) == FALSE)
 375                 return __connman_error_invalid_arguments(msg);
 376
 377         if (dbus_message_iter_get_arg_type(&iter) != DBUS_TYPE_STRING)
 378                 return __connman_error_invalid_arguments(msg);
 379
 380         dbus_message_iter_get_basic(&iter, &name);
 381         dbus_message_iter_next(&iter);
 382
 383         if (dbus_message_iter_get_arg_type(&iter) != DBUS_TYPE_VARIANT)
 384                 return __connman_error_invalid_arguments(msg);
 385
 386         dbus_message_iter_recurse(&iter, &value);
 387
 388         type = dbus_message_iter_get_arg_type(&value);
 389
 390         if (g_str_equal(name, "UserRoutes") == TRUE) {
 391                 GSList *networks;
 392
 393                 if (type != DBUS_TYPE_ARRAY)
 394                         return __connman_error_invalid_arguments(msg);
 395
 396                 networks = get_user_networks(&value);
 397                 if (networks != NULL) {
 398                         del_routes(provider);
 399                         provider->user_networks = networks;
 400                         set_user_networks(provider, provider->user_networks);
 401
 402                         if (handle_routes == FALSE)
 403                                 provider_schedule_changed(provider,
 404                                                         USER_ROUTES_CHANGED);
 405                 }
 406         } else
 407                 return __connman_error_invalid_property(msg);
 408
 409         return g_dbus_create_reply(msg, DBUS_TYPE_INVALID);
 410 }
 411
 412 static DBusMessage *clear_property(DBusConnection *conn, DBusMessage *msg,
 413                                                                 void *data)
 414 {
 415         struct vpn_provider *provider = data;
 416         const char *name;
 417
 418         DBG("conn %p", conn);
 419
 420         dbus_message_get_args(msg, NULL, DBUS_TYPE_STRING, &name,
 421                                                         DBUS_TYPE_INVALID);
 422
 423         if (g_str_equal(name, "UserRoutes") == TRUE) {
 424                 del_routes(provider);
 425
 426                 if (handle_routes == FALSE)
 427                         provider_property_changed(provider, name);
 428         } else {
 429                 return __connman_error_invalid_property(msg);
 430         }
 431
 432         return g_dbus_create_reply(msg, DBUS_TYPE_INVALID);
 433 }
 434
 435 static DBusMessage *do_connect(DBusConnection *conn, DBusMessage *msg,
 436                                                                 void *data)
 437 {
 438         struct vpn_provider *provider = data;
 439         int err;
 440
 441         DBG("conn %p provider %p", conn, provider);
 442
 443         err = __vpn_provider_connect(provider);
 444         if (err < 0)
 445                 return __connman_error_failed(msg, -err);
 446
 447         return g_dbus_create_reply(msg, DBUS_TYPE_INVALID);
 448 }
 449
 450 static DBusMessage *do_disconnect(DBusConnection *conn, DBusMessage *msg,
 451                                                                 void *data)
 452 {
 453         struct vpn_provider *provider = data;
 454         int err;
 455
 456         DBG("conn %p provider %p", conn, provider);
 457
 458         err = __vpn_provider_disconnect(provider);
 459         if (err < 0)
 460                 return __connman_error_failed(msg, -err);
 461         else
 462                 return g_dbus_create_reply(msg, DBUS_TYPE_INVALID);
 463 }
 464
 465 static const GDBusMethodTable connection_methods[] = {
 466         { GDBUS_METHOD("SetProperty",
 467                         GDBUS_ARGS({ "name", "s" }, { "value", "v" }),
 468                         NULL, set_property) },
 469         { GDBUS_METHOD("ClearProperty",
 470                         GDBUS_ARGS({ "name", "s" }), NULL,
 471                         clear_property) },
 472         { GDBUS_ASYNC_METHOD("Connect", NULL, NULL, do_connect) },
 473         { GDBUS_METHOD("Disconnect", NULL, NULL, do_disconnect) },
 474         { },
 475 };
 476
 477 static const GDBusSignalTable connection_signals[] = {
 478         { GDBUS_SIGNAL("PropertyChanged",
 479                         GDBUS_ARGS({ "name", "s" }, { "value", "v" })) },
 480         { },
 481 };
 482
 483 static void resolv_result(GResolvResultStatus status,
 484                                         char **results, gpointer user_data)
 485 {
 486         struct vpn_provider *provider = user_data;
 487
 488         DBG("status %d", status);
 489
 490         if (status == G_RESOLV_RESULT_STATUS_SUCCESS && results != NULL &&
 491                                                 g_strv_length(results) > 0)
 492                 provider->host_ip = g_strdupv(results);
 493
 494         vpn_provider_unref(provider);
 495 }
 496
 497 static void provider_resolv_host_addr(struct vpn_provider *provider)
 498 {
 499         if (provider->host == NULL)
 500                 return;
 501
 502         if (connman_inet_check_ipaddress(provider->host) > 0)
 503                 return;
 504
 505         if (provider->host_ip != NULL)
 506                 return;
 507
 508         /*
 509          * If the hostname is not numeric, try to resolv it. We do not wait
 510          * the result as it might take some time. We will get the result
 511          * before VPN will feed routes to us because VPN client will need
 512          * the IP address also before VPN connection can be established.
 513          */
 514         provider->resolv = g_resolv_new(0);
 515         if (provider->resolv == NULL) {
 516                 DBG("Cannot resolv %s", provider->host);
 517                 return;
 518         }
 519
 520         DBG("Trying to resolv %s", provider->host);
 521
 522         vpn_provider_ref(provider);
 523
 524         g_resolv_lookup_hostname(provider->resolv, provider->host,
 525                                 resolv_result, provider);
 526 }
 527
 528 void __vpn_provider_append_properties(struct vpn_provider *provider,
 529                                                         DBusMessageIter *iter)
 530 {
 531         if (provider->host != NULL)
 532                 connman_dbus_dict_append_basic(iter, "Host",
 533                                         DBUS_TYPE_STRING, &provider->host);
 534
 535         if (provider->domain != NULL)
 536                 connman_dbus_dict_append_basic(iter, "Domain",
 537                                         DBUS_TYPE_STRING, &provider->domain);
 538
 539         if (provider->type != NULL)
 540                 connman_dbus_dict_append_basic(iter, "Type", DBUS_TYPE_STRING,
 541                                                  &provider->type);
 542 }
 543
 544 int __vpn_provider_append_user_route(struct vpn_provider *provider,
 545                         int family, const char *network, const char *netmask)
 546 {
 547         struct vpn_route *route;
 548         char *key = g_strdup_printf("%d/%s/%s", family, network, netmask);
 549
 550         DBG("family %d network %s netmask %s", family, network, netmask);
 551
 552         route = g_hash_table_lookup(provider->user_routes, key);
 553         if (route == NULL) {
 554                 route = g_try_new0(struct vpn_route, 1);
 555                 if (route == NULL) {
 556                         connman_error("out of memory");
 557                         return -ENOMEM;
 558                 }
 559
 560                 route->family = family;
 561                 route->network = g_strdup(network);
 562                 route->netmask = g_strdup(netmask);
 563
 564                 g_hash_table_replace(provider->user_routes, key, route);
 565         } else
 566                 g_free(key);
 567
 568         return 0;
 569 }
 570
 571 static struct vpn_route *get_route(char *route_str)
 572 {
 573         char **elems = g_strsplit(route_str, "/", 0);
 574         char *network, *netmask, *gateway, *family_str;
 575         int family = PF_UNSPEC;
 576         struct vpn_route *route = NULL;
 577
 578         if (elems == NULL)
 579                 return NULL;
 580
 581         family_str = elems[0];
 582
 583         network = elems[1];
 584         if (network == NULL || network[0] == '\0')
 585                 goto out;
 586
 587         netmask = elems[2];
 588         if (netmask == NULL || netmask[0] == '\0')
 589                 goto out;
 590
 591         gateway = elems[3];
 592
 593         route = g_try_new0(struct vpn_route, 1);
 594         if (route == NULL)
 595                 goto out;
 596
 597         if (family_str[0] == '\0' || atoi(family_str) == 0) {
 598                 family = PF_UNSPEC;
 599         } else {
 600                 switch (family_str[0]) {
 601                 case '4':
 602                         family = AF_INET;
 603                         break;
 604                 case '6':
 605                         family = AF_INET6;
 606                         break;
 607                 }
 608         }
 609
 610         if (g_strrstr(network, ":") != NULL) {
 611                 if (family != PF_UNSPEC && family != AF_INET6)
 612                         DBG("You have IPv6 address but you have non IPv6 route");
 613         } else if (g_strrstr(network, ".") != NULL) {
 614                 if (family != PF_UNSPEC && family != AF_INET)
 615                         DBG("You have IPv4 address but you have non IPv4 route");
 616
 617                 if (g_strrstr(netmask, ".") == NULL) {
 618                         /* We have netmask length */
 619                         in_addr_t addr;
 620                         struct in_addr netmask_in;
 621                         unsigned char prefix_len = 32;
 622
 623                         if (netmask != NULL) {
 624                                 char *ptr;
 625                                 long int value = strtol(netmask, &ptr, 10);
 626                                 if (ptr != netmask && *ptr == '\0' &&
 627                                                                 value <= 32)
 628                                         prefix_len = value;
 629                         }
 630
 631                         addr = 0xffffffff << (32 - prefix_len);
 632                         netmask_in.s_addr = htonl(addr);
 633                         netmask = inet_ntoa(netmask_in);
 634
 635                         DBG("network %s netmask %s", network, netmask);
 636                 }
 637         }
 638
 639         if (family == PF_UNSPEC) {
 640                 family = connman_inet_check_ipaddress(network);
 641                 if (family < 0 || family == PF_UNSPEC)
 642                         goto out;
 643         }
 644
 645         route->family = family;
 646         route->network = g_strdup(network);
 647         route->netmask = g_strdup(netmask);
 648         route->gateway = g_strdup(gateway);
 649
 650 out:
 651         g_strfreev(elems);
 652         return route;
 653 }
 654
 655 static GSList *get_routes(gchar **networks)
 656 {
 657         struct vpn_route *route;
 658         GSList *routes = NULL;
 659         int i;
 660
 661         for (i = 0; networks[i] != NULL; i++) {
 662                 route = get_route(networks[i]);
 663                 if (route != NULL)
 664                         routes = g_slist_prepend(routes, route);
 665         }
 666
 667         return routes;
 668 }
 669
 670 static int provider_load_from_keyfile(struct vpn_provider *provider,
 671                 GKeyFile *keyfile)
 672 {
 673         gsize idx = 0;
 674         gchar **settings;
 675         gchar *key, *value;
 676         gsize length, num_user_networks;
 677         gchar **networks = NULL;
 678
 679         settings = g_key_file_get_keys(keyfile, provider->identifier, &length,
 680                                 NULL);
 681         if (settings == NULL) {
 682                 g_key_file_free(keyfile);
 683                 return -ENOENT;
 684         }
 685
 686         while (idx < length) {
 687                 key = settings[idx];
 688                 if (key != NULL) {
 689                         if (g_str_equal(key, "Networks") == TRUE) {
 690                                 networks = g_key_file_get_string_list(keyfile,
 691                                                 provider->identifier,
 692                                                 key,
 693                                                 &num_user_networks,
 694                                                 NULL);
 695                                 provider->user_networks = get_routes(networks);
 696
 697                         } else {
 698                                 value = g_key_file_get_string(keyfile,
 699                                                         provider->identifier,
 700                                                         key, NULL);
 701                                 vpn_provider_set_string(provider, key,
 702                                                         value);
 703                                 g_free(value);
 704                         }
 705                 }
 706                 idx += 1;
 707         }
 708         g_strfreev(settings);
 709         g_strfreev(networks);
 710
 711         if (provider->user_networks != NULL)
 712                 set_user_networks(provider, provider->user_networks);
 713
 714         return 0;
 715 }
 716
 717
 718 static int vpn_provider_load(struct vpn_provider *provider)
 719 {
 720         GKeyFile *keyfile;
 721
 722         DBG("provider %p", provider);
 723
 724         keyfile = __connman_storage_load_provider(provider->identifier);
 725         if (keyfile == NULL)
 726                 return -ENOENT;
 727
 728         provider_load_from_keyfile(provider, keyfile);
 729
 730         g_key_file_free(keyfile);
 731         return 0;
 732 }
 733
 734 static gchar **create_network_list(GSList *networks, gsize *count)
 735 {
 736         GSList *list;
 737         gchar **result = NULL;
 738         unsigned int num_elems = 0;
 739
 740         for (list = networks; list != NULL; list = g_slist_next(list)) {
 741                 struct vpn_route *route = list->data;
 742                 int family;
 743
 744                 result = g_try_realloc(result,
 745                                 (num_elems + 1) * sizeof(gchar *));
 746                 if (result == NULL)
 747                         return NULL;
 748
 749                 switch (route->family) {
 750                 case AF_INET:
 751                         family = 4;
 752                         break;
 753                 case AF_INET6:
 754                         family = 6;
 755                         break;
 756                 default:
 757                         family = 0;
 758                         break;
 759                 }
 760
 761                 result[num_elems] = g_strdup_printf("%d/%s/%s/%s",
 762                                 family, route->network, route->netmask,
 763                                 route->gateway == NULL ? "" : route->gateway);
 764
 765                 num_elems++;
 766         }
 767
 768         result = g_try_realloc(result, (num_elems + 1) * sizeof(gchar *));
 769         if (result == NULL)
 770                 return NULL;
 771
 772         result[num_elems] = NULL;
 773         *count = num_elems;
 774         return result;
 775 }
 776
 777 static int vpn_provider_save(struct vpn_provider *provider)
 778 {
 779         GKeyFile *keyfile;
 780
 781         DBG("provider %p", provider);
 782
 783         keyfile = g_key_file_new();
 784         if (keyfile == NULL)
 785                 return -ENOMEM;
 786
 787         g_key_file_set_string(keyfile, provider->identifier,
 788                         "Name", provider->name);
 789         g_key_file_set_string(keyfile, provider->identifier,
 790                         "Type", provider->type);
 791         g_key_file_set_string(keyfile, provider->identifier,
 792                         "Host", provider->host);
 793         g_key_file_set_string(keyfile, provider->identifier,
 794                         "VPN.Domain", provider->domain);
 795         if (provider->user_networks != NULL) {
 796                 gchar **networks;
 797                 gsize network_count;
 798
 799                 networks = create_network_list(provider->user_networks,
 800                                                         &network_count);
 801                 if (networks != NULL) {
 802                         g_key_file_set_string_list(keyfile,
 803                                                 provider->identifier,
 804                                                 "Networks",
 805                                                 (const gchar ** const)networks,
 806                                                 network_count);
 807                         g_strfreev(networks);
 808                 }
 809         }
 810
 811         if (provider->driver != NULL && provider->driver->save != NULL)
 812                 provider->driver->save(provider, keyfile);
 813
 814         __connman_storage_save_provider(keyfile, provider->identifier);
 815         g_key_file_free(keyfile);
 816
 817         return 0;
 818 }
 819
 820 static struct vpn_provider *vpn_provider_lookup(const char *identifier)
 821 {
 822         struct vpn_provider *provider = NULL;
 823
 824         provider = g_hash_table_lookup(provider_hash, identifier);
 825
 826         return provider;
 827 }
 828
 829 static gboolean match_driver(struct vpn_provider *provider,
 830                                 struct vpn_provider_driver *driver)
 831 {
 832         if (g_strcmp0(driver->name, provider->type) == 0)
 833                 return TRUE;
 834
 835         return FALSE;
 836 }
 837
 838 static int provider_probe(struct vpn_provider *provider)
 839 {
 840         GSList *list;
 841
 842         DBG("provider %p name %s", provider, provider->name);
 843
 844         if (provider->driver != NULL)
 845                 return -EALREADY;
 846
 847         for (list = driver_list; list; list = list->next) {
 848                 struct vpn_provider_driver *driver = list->data;
 849
 850                 if (match_driver(provider, driver) == FALSE)
 851                         continue;
 852
 853                 DBG("driver %p name %s", driver, driver->name);
 854
 855                 if (driver->probe != NULL && driver->probe(provider) == 0) {
 856                         provider->driver = driver;
 857                         break;
 858                 }
 859         }
 860
 861         if (provider->driver == NULL)
 862                 return -ENODEV;
 863
 864         return 0;
 865 }
 866
 867 static void provider_remove(struct vpn_provider *provider)
 868 {
 869         if (provider->driver != NULL) {
 870                 provider->driver->remove(provider);
 871                 provider->driver = NULL;
 872         }
 873 }
 874
 875 static int provider_register(struct vpn_provider *provider)
 876 {
 877         return provider_probe(provider);
 878 }
 879
 880 static void provider_unregister(struct vpn_provider *provider)
 881 {
 882         provider_remove(provider);
 883 }
 884
 885 struct vpn_provider *
 886 vpn_provider_ref_debug(struct vpn_provider *provider,
 887                         const char *file, int line, const char *caller)
 888 {
 889         DBG("%p ref %d by %s:%d:%s()", provider, provider->refcount + 1,
 890                 file, line, caller);
 891
 892         __sync_fetch_and_add(&provider->refcount, 1);
 893
 894         return provider;
 895 }
 896
 897 static void provider_destruct(struct vpn_provider *provider)
 898 {
 899         DBG("provider %p", provider);
 900
 901         if (provider->notify_id != 0)
 902                 g_source_remove(provider->notify_id);
 903
 904         g_free(provider->name);
 905         g_free(provider->type);
 906         g_free(provider->host);
 907         g_free(provider->domain);
 908         g_free(provider->identifier);
 909         g_free(provider->path);
 910         g_slist_free_full(provider->user_networks, free_route);
 911         g_strfreev(provider->nameservers);
 912         g_hash_table_destroy(provider->routes);
 913         g_hash_table_destroy(provider->user_routes);
 914         g_hash_table_destroy(provider->setting_strings);
 915         if (provider->resolv != NULL) {
 916                 g_resolv_unref(provider->resolv);
 917                 provider->resolv = NULL;
 918         }
 919         __vpn_ipconfig_unref(provider->ipconfig_ipv4);
 920         __vpn_ipconfig_unref(provider->ipconfig_ipv6);
 921
 922         g_strfreev(provider->host_ip);
 923         g_free(provider);
 924 }
 925
 926 void vpn_provider_unref_debug(struct vpn_provider *provider,
 927                                 const char *file, int line, const char *caller)
 928 {
 929         DBG("%p ref %d by %s:%d:%s()", provider, provider->refcount - 1,
 930                 file, line, caller);
 931
 932         if (__sync_fetch_and_sub(&provider->refcount, 1) != 1)
 933                 return;
 934
 935         provider_remove(provider);
 936
 937         provider_destruct(provider);
 938 }
 939
 940 static void configuration_count_add(void)
 941 {
 942         DBG("count %d", configuration_count + 1);
 943
 944         __sync_fetch_and_add(&configuration_count, 1);
 945 }
 946
 947 static void configuration_count_del(void)
 948 {
 949         DBG("count %d", configuration_count - 1);
 950
 951         if (__sync_fetch_and_sub(&configuration_count, 1) != 1)
 952                 return;
 953
 954         raise(SIGTERM);
 955 }
 956
 957 int __vpn_provider_disconnect(struct vpn_provider *provider)
 958 {
 959         int err;
 960
 961         DBG("provider %p", provider);
 962
 963         if (provider->driver != NULL && provider->driver->disconnect != NULL)
 964                 err = provider->driver->disconnect(provider);
 965         else
 966                 return -EOPNOTSUPP;
 967
 968         if (err < 0) {
 969                 if (err != -EINPROGRESS)
 970                         return err;
 971
 972                 return -EINPROGRESS;
 973         }
 974
 975         return 0;
 976 }
 977
 978 static void connect_cb(struct vpn_provider *provider, void *user_data,
 979                                                                 int error)
 980 {
 981         DBG("provider %p user %p error %d", provider, user_data, error);
 982 }
 983
 984 int __vpn_provider_connect(struct vpn_provider *provider)
 985 {
 986         int err;
 987
 988         DBG("provider %p", provider);
 989
 990         if (provider->driver != NULL && provider->driver->connect != NULL)
 991                 err = provider->driver->connect(provider,
 992                                                 connect_cb, NULL);
 993         else
 994                 return -EOPNOTSUPP;
 995
 996         return err;
 997 }
 998
 999 static void connection_removed_signal(struct vpn_provider *provider)
1000 {
1001         DBusMessage *signal;
1002         DBusMessageIter iter;
1003
1004         signal = dbus_message_new_signal(VPN_MANAGER_PATH,
1005                         VPN_MANAGER_INTERFACE, "ConnectionRemoved");
1006         if (signal == NULL)
1007                 return;
1008
1009         dbus_message_iter_init_append(signal, &iter);
1010         dbus_message_iter_append_basic(&iter, DBUS_TYPE_OBJECT_PATH,
1011                                                         &provider->path);
1012         dbus_connection_send(connection, signal, NULL);
1013         dbus_message_unref(signal);
1014 }
1015
1016 static char *get_ident(const char *path)
1017 {
1018         char *pos;
1019
1020         if (*path != '/')
1021                 return NULL;
1022
1023         pos = strrchr(path, '/');
1024         if (pos == NULL)
1025                 return NULL;
1026
1027         return pos + 1;
1028 }
1029
1030 int __vpn_provider_remove(const char *path)
1031 {
1032         struct vpn_provider *provider;
1033         char *ident;
1034
1035         DBG("path %s", path);
1036
1037         ident = get_ident(path);
1038
1039         provider = vpn_provider_lookup(ident);
1040         if (provider != NULL) {
1041                 DBG("Removing VPN %s", provider->identifier);
1042
1043                 connection_removed_signal(provider);
1044
1045                 provider_unregister(provider);
1046                 g_hash_table_remove(provider_hash, provider->identifier);
1047
1048                 __connman_storage_remove_provider(ident);
1049                 return 0;
1050         }
1051
1052         return -ENXIO;
1053 }
1054
1055 static void append_ipv4(DBusMessageIter *iter, void *user_data)
1056 {
1057         struct vpn_provider *provider = user_data;
1058         const char *address, *gateway, *peer;
1059
1060         address = __vpn_ipconfig_get_local(provider->ipconfig_ipv4);
1061         if (address != NULL) {
1062                 in_addr_t addr;
1063                 struct in_addr netmask;
1064                 char *mask;
1065                 int prefixlen;
1066
1067                 prefixlen = __vpn_ipconfig_get_prefixlen(
1068                                                 provider->ipconfig_ipv4);
1069
1070                 addr = 0xffffffff << (32 - prefixlen);
1071                 netmask.s_addr = htonl(addr);
1072                 mask = inet_ntoa(netmask);
1073
1074                 connman_dbus_dict_append_basic(iter, "Address",
1075                                                 DBUS_TYPE_STRING, &address);
1076
1077                 connman_dbus_dict_append_basic(iter, "Netmask",
1078                                                 DBUS_TYPE_STRING, &mask);
1079         }
1080
1081         gateway = __vpn_ipconfig_get_gateway(provider->ipconfig_ipv4);
1082         if (gateway != NULL)
1083                 connman_dbus_dict_append_basic(iter, "Gateway",
1084                                                 DBUS_TYPE_STRING, &gateway);
1085
1086         peer = __vpn_ipconfig_get_peer(provider->ipconfig_ipv4);
1087         if (peer != NULL)
1088                 connman_dbus_dict_append_basic(iter, "Peer",
1089                                                 DBUS_TYPE_STRING, &peer);
1090 }
1091
1092 static void append_ipv6(DBusMessageIter *iter, void *user_data)
1093 {
1094         struct vpn_provider *provider = user_data;
1095         const char *address, *gateway, *peer;
1096
1097         address = __vpn_ipconfig_get_local(provider->ipconfig_ipv6);
1098         if (address != NULL) {
1099                 unsigned char prefixlen;
1100
1101                 connman_dbus_dict_append_basic(iter, "Address",
1102                                                 DBUS_TYPE_STRING, &address);
1103
1104                 prefixlen = __vpn_ipconfig_get_prefixlen(
1105                                                 provider->ipconfig_ipv6);
1106
1107                 connman_dbus_dict_append_basic(iter, "PrefixLength",
1108                                                 DBUS_TYPE_BYTE, &prefixlen);
1109         }
1110
1111         gateway = __vpn_ipconfig_get_gateway(provider->ipconfig_ipv6);
1112         if (gateway != NULL)
1113                 connman_dbus_dict_append_basic(iter, "Gateway",
1114                                                 DBUS_TYPE_STRING, &gateway);
1115
1116         peer = __vpn_ipconfig_get_peer(provider->ipconfig_ipv6);
1117         if (peer != NULL)
1118                 connman_dbus_dict_append_basic(iter, "Peer",
1119                                                 DBUS_TYPE_STRING, &peer);
1120 }
1121
1122 static const char *state2string(enum vpn_provider_state state)
1123 {
1124         switch (state) {
1125         case VPN_PROVIDER_STATE_UNKNOWN:
1126                 break;
1127         case VPN_PROVIDER_STATE_IDLE:
1128                 return "idle";
1129         case VPN_PROVIDER_STATE_CONNECT:
1130                 return "configuration";
1131         case VPN_PROVIDER_STATE_READY:
1132                 return "ready";
1133         case VPN_PROVIDER_STATE_DISCONNECT:
1134                 return "disconnect";
1135         case VPN_PROVIDER_STATE_FAILURE:
1136                 return "failure";
1137         }
1138
1139         return NULL;
1140 }
1141
1142 static int provider_indicate_state(struct vpn_provider *provider,
1143                                 enum vpn_provider_state state)
1144 {
1145         const char *str;
1146
1147         DBG("provider %p state %d", provider, state);
1148
1149         str = state2string(state);
1150         if (str == NULL)
1151                 return -EINVAL;
1152
1153         provider->state = state;
1154
1155         if (state == VPN_PROVIDER_STATE_READY) {
1156                 connman_dbus_property_changed_basic(provider->path,
1157                                         VPN_CONNECTION_INTERFACE, "Index",
1158                                         DBUS_TYPE_INT32, &provider->index);
1159
1160                 if (provider->family == AF_INET)
1161                         connman_dbus_property_changed_dict(provider->path,
1162                                         VPN_CONNECTION_INTERFACE, "IPv4",
1163                                         append_ipv4, provider);
1164                 else if (provider->family == AF_INET6)
1165                         connman_dbus_property_changed_dict(provider->path,
1166                                         VPN_CONNECTION_INTERFACE, "IPv6",
1167                                         append_ipv6, provider);
1168         }
1169
1170         connman_dbus_property_changed_basic(provider->path,
1171                                         VPN_CONNECTION_INTERFACE, "State",
1172                                         DBUS_TYPE_STRING, &str);
1173         return 0;
1174 }
1175
1176 static void append_nameservers(DBusMessageIter *iter, char **servers)
1177 {
1178         int i;
1179
1180         DBG("%p", servers);
1181
1182         for (i = 0; servers[i] != NULL; i++) {
1183                 DBG("servers[%d] %s", i, servers[i]);
1184                 dbus_message_iter_append_basic(iter,
1185                                         DBUS_TYPE_STRING, &servers[i]);
1186         }
1187 }
1188
1189 static void append_dns(DBusMessageIter *iter, void *user_data)
1190 {
1191         struct vpn_provider *provider = user_data;
1192
1193         if (provider->nameservers != NULL)
1194                 append_nameservers(iter, provider->nameservers);
1195 }
1196
1197 static void append_state(DBusMessageIter *iter,
1198                                         struct vpn_provider *provider)
1199 {
1200         char *str;
1201
1202         switch (provider->state) {
1203         case VPN_PROVIDER_STATE_UNKNOWN:
1204         case VPN_PROVIDER_STATE_IDLE:
1205                 str = "idle";
1206                 break;
1207         case VPN_PROVIDER_STATE_CONNECT:
1208                 str = "configuration";
1209                 break;
1210         case VPN_PROVIDER_STATE_READY:
1211                 str = "ready";
1212                 break;
1213         case VPN_PROVIDER_STATE_DISCONNECT:
1214                 str = "disconnect";
1215                 break;
1216         case VPN_PROVIDER_STATE_FAILURE:
1217                 str = "failure";
1218                 break;
1219         }
1220
1221         connman_dbus_dict_append_basic(iter, "State",
1222                                 DBUS_TYPE_STRING, &str);
1223 }
1224
1225 static void append_properties(DBusMessageIter *iter,
1226                                         struct vpn_provider *provider)
1227 {
1228         DBusMessageIter dict;
1229
1230         connman_dbus_dict_open(iter, &dict);
1231
1232         append_state(&dict, provider);
1233
1234         if (provider->type != NULL)
1235                 connman_dbus_dict_append_basic(&dict, "Type",
1236                                         DBUS_TYPE_STRING, &provider->type);
1237
1238         if (provider->name != NULL)
1239                 connman_dbus_dict_append_basic(&dict, "Name",
1240                                         DBUS_TYPE_STRING, &provider->name);
1241
1242         if (provider->host != NULL)
1243                 connman_dbus_dict_append_basic(&dict, "Host",
1244                                         DBUS_TYPE_STRING, &provider->host);
1245         if (provider->index >= 0)
1246                 connman_dbus_dict_append_basic(&dict, "Index",
1247                                         DBUS_TYPE_INT32, &provider->index);
1248         if (provider->domain != NULL)
1249                 connman_dbus_dict_append_basic(&dict, "Domain",
1250                                         DBUS_TYPE_STRING, &provider->domain);
1251
1252         if (provider->family == AF_INET)
1253                 connman_dbus_dict_append_dict(&dict, "IPv4", append_ipv4,
1254                                                 provider);
1255         else if (provider->family == AF_INET6)
1256                 connman_dbus_dict_append_dict(&dict, "IPv6", append_ipv6,
1257                                                 provider);
1258
1259         connman_dbus_dict_append_array(&dict, "Nameservers",
1260                                 DBUS_TYPE_STRING, append_dns, provider);
1261
1262         connman_dbus_dict_append_array(&dict, "UserRoutes",
1263                                 DBUS_TYPE_DICT_ENTRY, append_routes,
1264                                 provider->user_routes);
1265
1266         connman_dbus_dict_append_array(&dict, "ServerRoutes",
1267                                 DBUS_TYPE_DICT_ENTRY, append_routes,
1268                                 provider->routes);
1269
1270         connman_dbus_dict_close(iter, &dict);
1271 }
1272
1273 static void connection_added_signal(struct vpn_provider *provider)
1274 {
1275         DBusMessage *signal;
1276         DBusMessageIter iter;
1277
1278         signal = dbus_message_new_signal(VPN_MANAGER_PATH,
1279                         VPN_MANAGER_INTERFACE, "ConnectionAdded");
1280         if (signal == NULL)
1281                 return;
1282
1283         dbus_message_iter_init_append(signal, &iter);
1284         dbus_message_iter_append_basic(&iter, DBUS_TYPE_OBJECT_PATH,
1285                                                         &provider->path);
1286         append_properties(&iter, provider);
1287
1288         dbus_connection_send(connection, signal, NULL);
1289         dbus_message_unref(signal);
1290 }
1291
1292 static connman_bool_t check_host(char **hosts, char *host)
1293 {
1294         int i;
1295
1296         if (hosts == NULL)
1297                 return FALSE;
1298
1299         for (i = 0; hosts[i] != NULL; i++) {
1300                 if (g_strcmp0(hosts[i], host) == 0)
1301                         return TRUE;
1302         }
1303
1304         return FALSE;
1305 }
1306
1307 static void provider_append_routes(gpointer key, gpointer value,
1308                                         gpointer user_data)
1309 {
1310         struct vpn_route *route = value;
1311         struct vpn_provider *provider = user_data;
1312         int index = provider->index;
1313
1314         if (handle_routes == FALSE)
1315                 return;
1316
1317         /*
1318          * If the VPN administrator/user has given a route to
1319          * VPN server, then we must discard that because the
1320          * server cannot be contacted via VPN tunnel.
1321          */
1322         if (check_host(provider->host_ip, route->network) == TRUE) {
1323                 DBG("Discarding VPN route to %s via %s at index %d",
1324                         route->network, route->gateway, index);
1325                 return;
1326         }
1327
1328         if (route->family == AF_INET6) {
1329                 unsigned char prefix_len = atoi(route->netmask);
1330
1331                 connman_inet_add_ipv6_network_route(index, route->network,
1332                                                         route->gateway,
1333                                                         prefix_len);
1334         } else {
1335                 connman_inet_add_network_route(index, route->network,
1336                                                 route->gateway,
1337                                                 route->netmask);
1338         }
1339 }
1340
1341 static int set_connected(struct vpn_provider *provider,
1342                                         connman_bool_t connected)
1343 {
1344         struct vpn_ipconfig *ipconfig;
1345
1346         DBG("provider %p id %s connected %d", provider,
1347                                         provider->identifier, connected);
1348
1349         if (connected == TRUE) {
1350                 if (provider->family == AF_INET6)
1351                         ipconfig = provider->ipconfig_ipv6;
1352                 else
1353                         ipconfig = provider->ipconfig_ipv4;
1354
1355                 __vpn_ipconfig_address_add(ipconfig, provider->family);
1356
1357                 if (handle_routes == TRUE)
1358                         __vpn_ipconfig_gateway_add(ipconfig, provider->family);
1359
1360                 provider_indicate_state(provider,
1361                                         VPN_PROVIDER_STATE_READY);
1362
1363                 g_hash_table_foreach(provider->routes, provider_append_routes,
1364                                         provider);
1365
1366                 g_hash_table_foreach(provider->user_routes,
1367                                         provider_append_routes, provider);
1368
1369         } else {
1370                 provider_indicate_state(provider,
1371                                         VPN_PROVIDER_STATE_DISCONNECT);
1372
1373                 provider_indicate_state(provider,
1374                                         VPN_PROVIDER_STATE_IDLE);
1375         }
1376
1377         return 0;
1378 }
1379
1380 int vpn_provider_set_state(struct vpn_provider *provider,
1381                                         enum vpn_provider_state state)
1382 {
1383         if (provider == NULL)
1384                 return -EINVAL;
1385
1386         switch (state) {
1387         case VPN_PROVIDER_STATE_UNKNOWN:
1388                 return -EINVAL;
1389         case VPN_PROVIDER_STATE_IDLE:
1390                 return set_connected(provider, FALSE);
1391         case VPN_PROVIDER_STATE_CONNECT:
1392                 return provider_indicate_state(provider, state);
1393         case VPN_PROVIDER_STATE_READY:
1394                 return set_connected(provider, TRUE);
1395         case VPN_PROVIDER_STATE_DISCONNECT:
1396                 return provider_indicate_state(provider, state);
1397         case VPN_PROVIDER_STATE_FAILURE:
1398                 return provider_indicate_state(provider, state);
1399         }
1400         return -EINVAL;
1401 }
1402
1403 int vpn_provider_indicate_error(struct vpn_provider *provider,
1404                                         enum vpn_provider_error error)
1405 {
1406         DBG("provider %p id %s error %d", provider, provider->identifier,
1407                                                                         error);
1408
1409         switch (error) {
1410         case VPN_PROVIDER_ERROR_LOGIN_FAILED:
1411                 break;
1412         case VPN_PROVIDER_ERROR_AUTH_FAILED:
1413                 break;
1414         case VPN_PROVIDER_ERROR_CONNECT_FAILED:
1415                 break;
1416         default:
1417                 break;
1418         }
1419
1420         return 0;
1421 }
1422
1423 static void unregister_provider(gpointer data)
1424 {
1425         struct vpn_provider *provider = data;
1426
1427         configuration_count_del();
1428
1429         vpn_provider_unref(provider);
1430 }
1431
1432 static void provider_initialize(struct vpn_provider *provider)
1433 {
1434         DBG("provider %p", provider);
1435
1436         provider->index = 0;
1437         provider->fd = -1;
1438         provider->name = NULL;
1439         provider->type = NULL;
1440         provider->domain = NULL;
1441         provider->identifier = NULL;
1442         provider->user_networks = NULL;
1443         provider->routes = g_hash_table_new_full(g_direct_hash, g_direct_equal,
1444                                         NULL, free_route);
1445         provider->user_routes = g_hash_table_new_full(g_str_hash, g_str_equal,
1446                                         g_free, free_route);
1447         provider->setting_strings = g_hash_table_new_full(g_str_hash,
1448                                                 g_str_equal, g_free, g_free);
1449 }
1450
1451 static struct vpn_provider *vpn_provider_new(void)
1452 {
1453         struct vpn_provider *provider;
1454
1455         provider = g_try_new0(struct vpn_provider, 1);
1456         if (provider == NULL)
1457                 return NULL;
1458
1459         provider->refcount = 1;
1460
1461         DBG("provider %p", provider);
1462         provider_initialize(provider);
1463
1464         return provider;
1465 }
1466
1467 static struct vpn_provider *vpn_provider_get(const char *identifier)
1468 {
1469         struct vpn_provider *provider;
1470
1471         provider = g_hash_table_lookup(provider_hash, identifier);
1472         if (provider != NULL)
1473                 return provider;
1474
1475         provider = vpn_provider_new();
1476         if (provider == NULL)
1477                 return NULL;
1478
1479         DBG("provider %p", provider);
1480
1481         provider->identifier = g_strdup(identifier);
1482
1483         g_hash_table_insert(provider_hash, provider->identifier, provider);
1484
1485         configuration_count_add();
1486
1487         return provider;
1488 }
1489
1490 static void provider_dbus_ident(char *ident)
1491 {
1492         int i, len = strlen(ident);
1493
1494         for (i = 0; i < len; i++) {
1495                 if (ident[i] >= '0' && ident[i] <= '9')
1496                         continue;
1497                 if (ident[i] >= 'a' && ident[i] <= 'z')
1498                         continue;
1499                 if (ident[i] >= 'A' && ident[i] <= 'Z')
1500                         continue;
1501                 ident[i] = '_';
1502         }
1503 }
1504
1505 static int connection_unregister(struct vpn_provider *provider)
1506 {
1507         if (provider->path == NULL)
1508                 return -EALREADY;
1509
1510         g_dbus_unregister_interface(connection, provider->path,
1511                                 VPN_CONNECTION_INTERFACE);
1512
1513         g_free(provider->path);
1514         provider->path = NULL;
1515
1516         return 0;
1517 }
1518
1519 static int connection_register(struct vpn_provider *provider)
1520 {
1521         DBG("provider %p path %s", provider, provider->path);
1522
1523         if (provider->path != NULL)
1524                 return -EALREADY;
1525
1526         provider->path = g_strdup_printf("%s/connection/%s", VPN_PATH,
1527                                                 provider->identifier);
1528
1529         g_dbus_register_interface(connection, provider->path,
1530                                 VPN_CONNECTION_INTERFACE,
1531                                 connection_methods, connection_signals,
1532                                 NULL, provider, NULL);
1533
1534         return 0;
1535 }
1536
1537 static struct vpn_provider *provider_create_from_keyfile(GKeyFile *keyfile,
1538                 const char *ident)
1539 {
1540         struct vpn_provider *provider;
1541
1542         if (keyfile == NULL || ident == NULL)
1543                 return NULL;
1544
1545         provider = vpn_provider_lookup(ident);
1546         if (provider == NULL) {
1547                 provider = vpn_provider_get(ident);
1548                 if (provider == NULL) {
1549                         DBG("can not create provider");
1550                         return NULL;
1551                 }
1552
1553                 provider_load_from_keyfile(provider, keyfile);
1554
1555                 if (provider->name == NULL || provider->host == NULL ||
1556                                 provider->domain == NULL) {
1557                         DBG("cannot get name, host or domain");
1558                         vpn_provider_unref(provider);
1559                         return NULL;
1560                 }
1561
1562                 if (provider_register(provider) == 0)
1563                         connection_register(provider);
1564         }
1565         return provider;
1566 }
1567
1568 static void provider_create_all_from_type(const char *provider_type)
1569 {
1570         unsigned int i;
1571         char **providers;
1572         char *id, *type;
1573         GKeyFile *keyfile;
1574
1575         DBG("provider type %s", provider_type);
1576
1577         providers = __connman_storage_get_providers();
1578
1579         for (i = 0; providers[i] != NULL; i+=1) {
1580
1581                 if (strncmp(providers[i], "provider_", 9) != 0)
1582                         continue;
1583
1584                 id = providers[i] + 9;
1585                 keyfile = __connman_storage_load_provider(id);
1586
1587                 if (keyfile == NULL)
1588                         continue;
1589
1590                 type = g_key_file_get_string(keyfile, id, "Type", NULL);
1591
1592                 DBG("keyfile %p id %s type %s", keyfile, id, type);
1593
1594                 if (strcmp(provider_type, type) != 0) {
1595                         g_free(type);
1596                         g_key_file_free(keyfile);
1597                         continue;
1598                 }
1599
1600                 if (provider_create_from_keyfile(keyfile, id) == NULL)
1601                         DBG("could not create provider");
1602
1603                 g_free(type);
1604                 g_key_file_free(keyfile);
1605         }
1606         g_strfreev(providers);
1607 }
1608
1609 int __vpn_provider_create(DBusMessage *msg)
1610 {
1611         struct vpn_provider *provider;
1612         DBusMessageIter iter, array;
1613         const char *type = NULL, *name = NULL;
1614         const char *host = NULL, *domain = NULL;
1615         GSList *networks = NULL;
1616         char *ident;
1617         int err;
1618
1619         dbus_message_iter_init(msg, &iter);
1620         dbus_message_iter_recurse(&iter, &array);
1621
1622         while (dbus_message_iter_get_arg_type(&array) == DBUS_TYPE_DICT_ENTRY) {
1623                 DBusMessageIter entry, value;
1624                 const char *key;
1625
1626                 dbus_message_iter_recurse(&array, &entry);
1627                 dbus_message_iter_get_basic(&entry, &key);
1628
1629                 dbus_message_iter_next(&entry);
1630                 dbus_message_iter_recurse(&entry, &value);
1631
1632                 switch (dbus_message_iter_get_arg_type(&value)) {
1633                 case DBUS_TYPE_STRING:
1634                         if (g_str_equal(key, "Type") == TRUE)
1635                                 dbus_message_iter_get_basic(&value, &type);
1636                         else if (g_str_equal(key, "Name") == TRUE)
1637                                 dbus_message_iter_get_basic(&value, &name);
1638                         else if (g_str_equal(key, "Host") == TRUE)
1639                                 dbus_message_iter_get_basic(&value, &host);
1640                         else if (g_str_equal(key, "VPN.Domain") == TRUE)
1641                                 dbus_message_iter_get_basic(&value, &domain);
1642                         break;
1643                 case DBUS_TYPE_ARRAY:
1644                         if (g_str_equal(key, "UserRoutes") == TRUE)
1645                                 networks = get_user_networks(&value);
1646                         break;
1647                 }
1648
1649                 dbus_message_iter_next(&array);
1650         }
1651
1652         if (host == NULL || domain == NULL)
1653                 return -EINVAL;
1654
1655         DBG("Type %s name %s networks %p", type, name, networks);
1656
1657         if (type == NULL || name == NULL)
1658                 return -EOPNOTSUPP;
1659
1660         ident = g_strdup_printf("%s_%s", host, domain);
1661         provider_dbus_ident(ident);
1662
1663         DBG("ident %s", ident);
1664
1665         provider = vpn_provider_lookup(ident);
1666         if (provider == NULL) {
1667                 provider = vpn_provider_get(ident);
1668                 if (provider == NULL) {
1669                         DBG("can not create provider");
1670                         g_free(ident);
1671                         return -EOPNOTSUPP;
1672                 }
1673
1674                 provider->host = g_strdup(host);
1675                 provider->domain = g_strdup(domain);
1676                 provider->name = g_strdup(name);
1677                 provider->type = g_strdup(type);
1678
1679                 if (provider_register(provider) == 0)
1680                         vpn_provider_load(provider);
1681
1682                 provider_resolv_host_addr(provider);
1683         }
1684
1685         if (networks != NULL) {
1686                 g_slist_free_full(provider->user_networks, free_route);
1687                 provider->user_networks = networks;
1688                 set_user_networks(provider, provider->user_networks);
1689         }
1690
1691         dbus_message_iter_init(msg, &iter);
1692         dbus_message_iter_recurse(&iter, &array);
1693
1694         while (dbus_message_iter_get_arg_type(&array) == DBUS_TYPE_DICT_ENTRY) {
1695                 DBusMessageIter entry, value;
1696                 const char *key, *str;
1697
1698                 dbus_message_iter_recurse(&array, &entry);
1699                 dbus_message_iter_get_basic(&entry, &key);
1700
1701                 dbus_message_iter_next(&entry);
1702                 dbus_message_iter_recurse(&entry, &value);
1703
1704                 switch (dbus_message_iter_get_arg_type(&value)) {
1705                 case DBUS_TYPE_STRING:
1706                         dbus_message_iter_get_basic(&value, &str);
1707                         vpn_provider_set_string(provider, key, str);
1708                         break;
1709                 }
1710
1711                 dbus_message_iter_next(&array);
1712         }
1713
1714         g_free(ident);
1715
1716         vpn_provider_save(provider);
1717
1718         err = provider_register(provider);
1719         if (err != 0 && err != -EALREADY)
1720                 return err;
1721
1722         connection_register(provider);
1723
1724         DBG("provider %p index %d path %s", provider, provider->index,
1725                                                         provider->path);
1726
1727         g_dbus_send_reply(connection, msg,
1728                                 DBUS_TYPE_OBJECT_PATH, &provider->path,
1729                                 DBUS_TYPE_INVALID);
1730
1731         connection_added_signal(provider);
1732
1733         return 0;
1734 }
1735
1736 static void append_connection_structs(DBusMessageIter *iter, void *user_data)
1737 {
1738         DBusMessageIter entry;
1739         GHashTableIter hash;
1740         gpointer value, key;
1741
1742         g_hash_table_iter_init(&hash, provider_hash);
1743
1744         while (g_hash_table_iter_next(&hash, &key, &value) == TRUE) {
1745                 struct vpn_provider *provider = value;
1746
1747                 DBG("path %s", provider->path);
1748
1749                 if (provider->identifier == NULL)
1750                         continue;
1751
1752                 dbus_message_iter_open_container(iter, DBUS_TYPE_STRUCT,
1753                                 NULL, &entry);
1754                 dbus_message_iter_append_basic(&entry, DBUS_TYPE_OBJECT_PATH,
1755                                 &provider->path);
1756                 append_properties(&entry, provider);
1757                 dbus_message_iter_close_container(iter, &entry);
1758         }
1759 }
1760
1761 DBusMessage *__vpn_provider_get_connections(DBusMessage *msg)
1762 {
1763         DBusMessage *reply;
1764
1765         DBG("");
1766
1767         reply = dbus_message_new_method_return(msg);
1768         if (reply == NULL)
1769                 return NULL;
1770
1771         __connman_dbus_append_objpath_dict_array(reply,
1772                         append_connection_structs, NULL);
1773
1774         return reply;
1775 }
1776
1777 const char * __vpn_provider_get_ident(struct vpn_provider *provider)
1778 {
1779         if (provider == NULL)
1780                 return NULL;
1781
1782         return provider->identifier;
1783 }
1784
1785 int vpn_provider_set_string(struct vpn_provider *provider,
1786                                         const char *key, const char *value)
1787 {
1788         DBG("provider %p key %s value %s", provider, key, value);
1789
1790         if (g_str_equal(key, "Type") == TRUE) {
1791                 g_free(provider->type);
1792                 provider->type = g_strdup(value);
1793         } else if (g_str_equal(key, "Name") == TRUE) {
1794                 g_free(provider->name);
1795                 provider->name = g_strdup(value);
1796         } else if (g_str_equal(key, "Host") == TRUE) {
1797                 g_free(provider->host);
1798                 provider->host = g_strdup(value);
1799         } else if (g_str_equal(key, "VPN.Domain") == TRUE) {
1800                 g_free(provider->domain);
1801                 provider->domain = g_strdup(value);
1802         } else
1803                 g_hash_table_replace(provider->setting_strings,
1804                                 g_strdup(key), g_strdup(value));
1805         return 0;
1806 }
1807
1808 const char *vpn_provider_get_string(struct vpn_provider *provider,
1809                                                         const char *key)
1810 {
1811         DBG("provider %p key %s", provider, key);
1812
1813         if (g_str_equal(key, "Type") == TRUE)
1814                 return provider->type;
1815         else if (g_str_equal(key, "Name") == TRUE)
1816                 return provider->name;
1817         else if (g_str_equal(key, "Host") == TRUE)
1818                 return provider->host;
1819         else if (g_str_equal(key, "HostIP") == TRUE) {
1820                 if (provider->host_ip == NULL ||
1821                                 provider->host_ip[0] == NULL)
1822                         return provider->host;
1823                 else
1824                         return provider->host_ip[0];
1825         } else if (g_str_equal(key, "VPN.Domain") == TRUE)
1826                 return provider->domain;
1827
1828         return g_hash_table_lookup(provider->setting_strings, key);
1829 }
1830
1831 connman_bool_t __vpn_provider_check_routes(struct vpn_provider *provider)
1832 {
1833         if (provider == NULL)
1834                 return FALSE;
1835
1836         if (provider->user_routes != NULL &&
1837                         g_hash_table_size(provider->user_routes) > 0)
1838                 return TRUE;
1839
1840         if (provider->routes != NULL &&
1841                         g_hash_table_size(provider->routes) > 0)
1842                 return TRUE;
1843
1844         return FALSE;
1845 }
1846
1847 void *vpn_provider_get_data(struct vpn_provider *provider)
1848 {
1849         return provider->driver_data;
1850 }
1851
1852 void vpn_provider_set_data(struct vpn_provider *provider, void *data)
1853 {
1854         provider->driver_data = data;
1855 }
1856
1857 void vpn_provider_set_index(struct vpn_provider *provider, int index)
1858 {
1859         DBG("index %d provider %p", index, provider);
1860
1861         if (provider->ipconfig_ipv4 == NULL) {
1862                 provider->ipconfig_ipv4 = __vpn_ipconfig_create(index,
1863                                                                 AF_INET);
1864                 if (provider->ipconfig_ipv4 == NULL) {
1865                         DBG("Couldnt create ipconfig for IPv4");
1866                         goto done;
1867                 }
1868         }
1869
1870         __vpn_ipconfig_set_index(provider->ipconfig_ipv4, index);
1871
1872         if (provider->ipconfig_ipv6 == NULL) {
1873                 provider->ipconfig_ipv6 = __vpn_ipconfig_create(index,
1874                                                                 AF_INET6);
1875                 if (provider->ipconfig_ipv6 == NULL) {
1876                         DBG("Couldnt create ipconfig for IPv6");
1877                         goto done;
1878                 }
1879         }
1880
1881         __vpn_ipconfig_set_index(provider->ipconfig_ipv6, index);
1882
1883 done:
1884         provider->index = index;
1885 }
1886
1887 int vpn_provider_get_index(struct vpn_provider *provider)
1888 {
1889         return provider->index;
1890 }
1891
1892 int vpn_provider_set_ipaddress(struct vpn_provider *provider,
1893                                         struct connman_ipaddress *ipaddress)
1894 {
1895         struct vpn_ipconfig *ipconfig = NULL;
1896
1897         switch (ipaddress->family) {
1898         case AF_INET:
1899                 ipconfig = provider->ipconfig_ipv4;
1900                 break;
1901         case AF_INET6:
1902                 ipconfig = provider->ipconfig_ipv6;
1903                 break;
1904         default:
1905                 break;
1906         }
1907
1908         DBG("provider %p ipconfig %p family %d", provider, ipconfig,
1909                                                         ipaddress->family);
1910
1911         if (ipconfig == NULL)
1912                 return -EINVAL;
1913
1914         provider->family = ipaddress->family;
1915
1916         __vpn_ipconfig_set_local(ipconfig, ipaddress->local);
1917         __vpn_ipconfig_set_peer(ipconfig, ipaddress->peer);
1918         __vpn_ipconfig_set_broadcast(ipconfig, ipaddress->broadcast);
1919         __vpn_ipconfig_set_gateway(ipconfig, ipaddress->gateway);
1920         __vpn_ipconfig_set_prefixlen(ipconfig, ipaddress->prefixlen);
1921
1922         return 0;
1923 }
1924
1925 int vpn_provider_set_pac(struct vpn_provider *provider,
1926                                 const char *pac)
1927 {
1928         DBG("provider %p pac %s", provider, pac);
1929
1930         return 0;
1931 }
1932
1933
1934 int vpn_provider_set_domain(struct vpn_provider *provider,
1935                                         const char *domain)
1936 {
1937         DBG("provider %p domain %s", provider, domain);
1938
1939         g_free(provider->domain);
1940         provider->domain = g_strdup(domain);
1941
1942         return 0;
1943 }
1944
1945 int vpn_provider_set_nameservers(struct vpn_provider *provider,
1946                                         const char *nameservers)
1947 {
1948         DBG("provider %p nameservers %s", provider, nameservers);
1949
1950         g_strfreev(provider->nameservers);
1951         provider->nameservers = NULL;
1952
1953         if (nameservers == NULL)
1954                 return 0;
1955
1956         provider->nameservers = g_strsplit(nameservers, " ", 0);
1957
1958         return 0;
1959 }
1960
1961 enum provider_route_type {
1962         PROVIDER_ROUTE_TYPE_NONE = 0,
1963         PROVIDER_ROUTE_TYPE_MASK = 1,
1964         PROVIDER_ROUTE_TYPE_ADDR = 2,
1965         PROVIDER_ROUTE_TYPE_GW   = 3,
1966 };
1967
1968 static int route_env_parse(struct vpn_provider *provider, const char *key,
1969                                 int *family, unsigned long *idx,
1970                                 enum provider_route_type *type)
1971 {
1972         char *end;
1973         const char *start;
1974
1975         DBG("name %s", provider->name);
1976
1977         if (!strcmp(provider->type, "openvpn")) {
1978                 if (g_str_has_prefix(key, "route_network_") == TRUE) {
1979                         start = key + strlen("route_network_");
1980                         *type = PROVIDER_ROUTE_TYPE_ADDR;
1981                 } else if (g_str_has_prefix(key, "route_netmask_") == TRUE) {
1982                         start = key + strlen("route_netmask_");
1983                         *type = PROVIDER_ROUTE_TYPE_MASK;
1984                 } else if (g_str_has_prefix(key, "route_gateway_") == TRUE) {
1985                         start = key + strlen("route_gateway_");
1986                         *type = PROVIDER_ROUTE_TYPE_GW;
1987                 } else
1988                         return -EINVAL;
1989
1990                 *family = AF_INET;
1991                 *idx = g_ascii_strtoull(start, &end, 10);
1992
1993         } else if (!strcmp(provider->type, "openconnect")) {
1994                 if (g_str_has_prefix(key, "CISCO_SPLIT_INC_") == TRUE) {
1995                         *family = AF_INET;
1996                         start = key + strlen("CISCO_SPLIT_INC_");
1997                 } else if (g_str_has_prefix(key,
1998                                         "CISCO_IPV6_SPLIT_INC_") == TRUE) {
1999                         *family = AF_INET6;
2000                         start = key + strlen("CISCO_IPV6_SPLIT_INC_");
2001                 } else
2002                         return -EINVAL;
2003
2004                 *idx = g_ascii_strtoull(start, &end, 10);
2005
2006                 if (strncmp(end, "_ADDR", 5) == 0)
2007                         *type = PROVIDER_ROUTE_TYPE_ADDR;
2008                 else if (strncmp(end, "_MASK", 5) == 0)
2009                         *type = PROVIDER_ROUTE_TYPE_MASK;
2010                 else if (strncmp(end, "_MASKLEN", 8) == 0 &&
2011                                 *family == AF_INET6) {
2012                         *type = PROVIDER_ROUTE_TYPE_MASK;
2013                 } else
2014                         return -EINVAL;
2015         }
2016
2017         return 0;
2018 }
2019
2020 int vpn_provider_append_route(struct vpn_provider *provider,
2021                                         const char *key, const char *value)
2022 {
2023         struct vpn_route *route;
2024         int ret, family = 0;
2025         unsigned long idx = 0;
2026         enum provider_route_type type = PROVIDER_ROUTE_TYPE_NONE;
2027
2028         DBG("key %s value %s", key, value);
2029
2030         ret = route_env_parse(provider, key, &family, &idx, &type);
2031         if (ret < 0)
2032                 return ret;
2033
2034         DBG("idx %lu family %d type %d", idx, family, type);
2035
2036         route = g_hash_table_lookup(provider->routes, GINT_TO_POINTER(idx));
2037         if (route == NULL) {
2038                 route = g_try_new0(struct vpn_route, 1);
2039                 if (route == NULL) {
2040                         connman_error("out of memory");
2041                         return -ENOMEM;
2042                 }
2043
2044                 route->family = family;
2045
2046                 g_hash_table_replace(provider->routes, GINT_TO_POINTER(idx),
2047                                                 route);
2048         }
2049
2050         switch (type) {
2051         case PROVIDER_ROUTE_TYPE_NONE:
2052                 break;
2053         case PROVIDER_ROUTE_TYPE_MASK:
2054                 route->netmask = g_strdup(value);
2055                 break;
2056         case PROVIDER_ROUTE_TYPE_ADDR:
2057                 route->network = g_strdup(value);
2058                 break;
2059         case PROVIDER_ROUTE_TYPE_GW:
2060                 route->gateway = g_strdup(value);
2061                 break;
2062         }
2063
2064         if (handle_routes == FALSE) {
2065                 if (route->netmask != NULL && route->gateway != NULL &&
2066                                                         route->network != NULL)
2067                         provider_schedule_changed(provider,
2068                                                 SERVER_ROUTES_CHANGED);
2069         }
2070
2071         return 0;
2072 }
2073
2074 const char *vpn_provider_get_driver_name(struct vpn_provider *provider)
2075 {
2076         if (provider->driver == NULL)
2077                 return NULL;
2078
2079         return provider->driver->name;
2080 }
2081
2082 const char *vpn_provider_get_save_group(struct vpn_provider *provider)
2083 {
2084         return provider->identifier;
2085 }
2086
2087 static gint compare_priority(gconstpointer a, gconstpointer b)
2088 {
2089         return 0;
2090 }
2091
2092 static void clean_provider(gpointer key, gpointer value, gpointer user_data)
2093 {
2094         struct vpn_provider *provider = value;
2095
2096         if (provider->driver != NULL && provider->driver->remove)
2097                 provider->driver->remove(provider);
2098
2099         connection_unregister(provider);
2100 }
2101
2102 int vpn_provider_driver_register(struct vpn_provider_driver *driver)
2103 {
2104         DBG("driver %p name %s", driver, driver->name);
2105
2106         driver_list = g_slist_insert_sorted(driver_list, driver,
2107                                                         compare_priority);
2108         provider_create_all_from_type(driver->name);
2109         return 0;
2110 }
2111
2112 void vpn_provider_driver_unregister(struct vpn_provider_driver *driver)
2113 {
2114         GHashTableIter iter;
2115         gpointer value, key;
2116
2117         DBG("driver %p name %s", driver, driver->name);
2118
2119         driver_list = g_slist_remove(driver_list, driver);
2120
2121         g_hash_table_iter_init(&iter, provider_hash);
2122         while (g_hash_table_iter_next(&iter, &key, &value) == TRUE) {
2123                 struct vpn_provider *provider = value;
2124
2125                 if (provider != NULL && provider->driver != NULL &&
2126                                 provider->driver->type == driver->type &&
2127                                 g_strcmp0(provider->driver->name,
2128                                                         driver->name) == 0) {
2129                         provider->driver = NULL;
2130                 }
2131         }
2132 }
2133
2134 static gboolean check_vpn_count(gpointer data)
2135 {
2136         if (configuration_count == 0) {
2137                 connman_info("No VPN configurations found, quitting.");
2138                 raise(SIGTERM);
2139         }
2140
2141         return FALSE;
2142 }
2143
2144 void __vpn_provider_check_connections(void)
2145 {
2146         /*
2147          * If we were started when there is no providers configured,
2148          * then just quit. This happens when connman starts and its
2149          * vpn plugin asks connman-vpnd if it has any connections
2150          * configured. If there are none, then we can stop the vpn
2151          * daemon.
2152          */
2153         g_timeout_add(1000, check_vpn_count, NULL);
2154 }
2155
2156 int __vpn_provider_init(gboolean do_routes)
2157 {
2158         DBG("");
2159
2160         handle_routes = do_routes;
2161
2162         connection = connman_dbus_get_connection();
2163
2164         provider_hash = g_hash_table_new_full(g_str_hash, g_str_equal,
2165                                                 NULL, unregister_provider);
2166
2167         return 0;
2168 }
2169
2170 void __vpn_provider_cleanup(void)
2171 {
2172         DBG("");
2173
2174         g_hash_table_foreach(provider_hash, clean_provider, NULL);
2175
2176         g_hash_table_destroy(provider_hash);
2177         provider_hash = NULL;
2178
2179         dbus_connection_unref(connection);
2180 }