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