plugins/pptp.c

   1 /*
   2  *
   3  *  Connection Manager
   4  *
   5  *  Copyright (C) 2010  BMW Car IT GmbH. All rights reserved.
   6  *  Copyright (C) 2011  Intel Corporation. All rights reserved.
   7  *
   8  *  This program is free software; you can redistribute it and/or modify
   9  *  it under the terms of the GNU General Public License version 2 as
  10  *  published by the Free Software Foundation.
  11  *
  12  *  This program is distributed in the hope that it will be useful,
  13  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  *  GNU General Public License for more details.
  16  *
  17  *  You should have received a copy of the GNU General Public License
  18  *  along with this program; if not, write to the Free Software
  19  *  Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
  20  *
  21  */
  22
  23 #ifdef HAVE_CONFIG_H
  24 #include <config.h>
  25 #endif
  26
  27 #include <string.h>
  28 #include <errno.h>
  29 #include <unistd.h>
  30 #include <stdio.h>
  31 #include <net/if.h>
  32
  33 #include <glib.h>
  34
  35 #define CONNMAN_API_SUBJECT_TO_CHANGE
  36 #include <connman/plugin.h>
  37 #include <connman/provider.h>
  38 #include <connman/log.h>
  39 #include <connman/task.h>
  40 #include <connman/dbus.h>
  41 #include <connman/inet.h>
  42
  43 #include "vpn.h"
  44
  45 #define ARRAY_SIZE(a) (sizeof(a)/sizeof(a[0]))
  46
  47 enum {
  48         OPT_STRING = 1,
  49         OPT_BOOL = 2,
  50 };
  51
  52 struct {
  53         const char *cm_opt;
  54         const char *pptp_opt;
  55         const char *vpnc_default;
  56         int type;
  57 } pptp_options[] = {
  58         { "PPTP.User", "user", NULL, OPT_STRING },
  59         { "PPTP.Password", "password", NULL, OPT_STRING },
  60         { "PPTP.EchoFailure", "lcp-echo-failure", "0", OPT_STRING },
  61         { "PPTP.EchoInterval", "lcp-echo-interval", "0", OPT_STRING },
  62         { "PPTP.Debug", "debug", NULL, OPT_STRING },
  63         { "PPTP.RefuseEAP", "refuse-eap", NULL, OPT_BOOL },
  64         { "PPTP.RefusePAP", "refuse-pap", NULL, OPT_BOOL },
  65         { "PPTP.RefuseCHAP", "refuse-chap", NULL, OPT_BOOL },
  66         { "PPTP.RefuseMSCHAP", "refuse-mschap", NULL, OPT_BOOL },
  67         { "PPTP.RefuseMSCHAP2", "refuse-mschapv2", NULL, OPT_BOOL },
  68         { "PPTP.NoBSDComp", "nobsdcomp", NULL, OPT_BOOL },
  69         { "PPTP.NoDeflate", "nodeflatey", NULL, OPT_BOOL },
  70         { "PPTP.RequirMPPE", "require-mppe", NULL, OPT_BOOL },
  71         { "PPTP.RequirMPPE40", "require-mppe-40", NULL, OPT_BOOL },
  72         { "PPTP.RequirMPPE128", "require-mppe-128", NULL, OPT_BOOL },
  73         { "PPTP.RequirMPPEStateful", "mppe-stateful", NULL, OPT_BOOL },
  74         { "PPTP.NoVJ", "no-vj-comp", NULL, OPT_BOOL },
  75 };
  76
  77 static DBusConnection *connection;
  78
  79 static DBusMessage *pptp_get_sec(struct connman_task *task,
  80                                 DBusMessage *msg, void *user_data)
  81 {
  82         const char *user, *passwd;
  83         struct connman_provider *provider = user_data;
  84         DBusMessage *reply;
  85
  86         if (dbus_message_get_no_reply(msg) == TRUE)
  87                 return NULL;
  88
  89         user = connman_provider_get_string(provider, "PPTP.User");
  90         passwd = connman_provider_get_string(provider, "PPTP.Password");
  91         if (user == NULL || strlen(user) == 0 ||
  92                                 passwd == NULL || strlen(passwd) == 0)
  93                 return NULL;
  94
  95         reply = dbus_message_new_method_return(msg);
  96         if (reply == NULL)
  97                 return NULL;
  98
  99         dbus_message_append_args(reply, DBUS_TYPE_STRING, &user,
 100                                 DBUS_TYPE_STRING, &passwd,
 101                                 DBUS_TYPE_INVALID);
 102         return reply;
 103 }
 104
 105 static int pptp_notify(DBusMessage *msg, struct connman_provider *provider)
 106 {
 107         DBusMessageIter iter, dict;
 108         const char *reason, *key, *value;
 109         char *addressv4 = NULL, *netmask = NULL, *gateway = NULL;
 110         char *ifname = NULL, *nameservers = NULL;
 111         struct connman_ipaddress *ipaddress = NULL;
 112
 113         dbus_message_iter_init(msg, &iter);
 114
 115         dbus_message_iter_get_basic(&iter, &reason);
 116         dbus_message_iter_next(&iter);
 117
 118         if (provider == NULL) {
 119                 connman_error("No provider found");
 120                 return VPN_STATE_FAILURE;
 121         }
 122
 123         if (strcmp(reason, "auth failed") == 0)
 124                 return VPN_STATE_AUTH_FAILURE;
 125
 126         if (strcmp(reason, "connect"))
 127                 return VPN_STATE_DISCONNECT;
 128
 129         dbus_message_iter_recurse(&iter, &dict);
 130
 131         while (dbus_message_iter_get_arg_type(&dict) == DBUS_TYPE_DICT_ENTRY) {
 132                 DBusMessageIter entry;
 133
 134                 dbus_message_iter_recurse(&dict, &entry);
 135                 dbus_message_iter_get_basic(&entry, &key);
 136                 dbus_message_iter_next(&entry);
 137                 dbus_message_iter_get_basic(&entry, &value);
 138
 139                 DBG("%s = %s", key, value);
 140
 141                 if (!strcmp(key, "INTERNAL_IP4_ADDRESS")) {
 142                         connman_provider_set_string(provider, "Address", value);
 143                         addressv4 = g_strdup(value);
 144                 }
 145
 146                 if (!strcmp(key, "INTERNAL_IP4_NETMASK")) {
 147                         connman_provider_set_string(provider, "Netmask", value);
 148                         netmask = g_strdup(value);
 149                 }
 150
 151                 if (!strcmp(key, "INTERNAL_IP4_DNS")) {
 152                         connman_provider_set_string(provider, "DNS", value);
 153                         nameservers = g_strdup(value);
 154                 }
 155
 156                 if (!strcmp(key, "INTERNAL_IFNAME"))
 157                         ifname = g_strdup(value);
 158
 159                 dbus_message_iter_next(&dict);
 160         }
 161
 162         if (vpn_set_ifname(provider, ifname) < 0) {
 163                 g_free(ifname);
 164                 g_free(addressv4);
 165                 g_free(netmask);
 166                 g_free(nameservers);
 167                 return VPN_STATE_FAILURE;
 168         }
 169
 170         if (addressv4 != NULL)
 171                 ipaddress = connman_ipaddress_alloc(AF_INET);
 172
 173         g_free(ifname);
 174
 175         if (ipaddress == NULL) {
 176                 connman_error("No IP address for provider");
 177                 g_free(addressv4);
 178                 g_free(netmask);
 179                 g_free(nameservers);
 180                 return VPN_STATE_FAILURE;
 181         }
 182
 183         value = connman_provider_get_string(provider, "Host");
 184         if (value != NULL) {
 185                 connman_provider_set_string(provider, "Gateway", value);
 186                 gateway = g_strdup(value);
 187         }
 188
 189         if (addressv4 != NULL)
 190                 connman_ipaddress_set_ipv4(ipaddress, addressv4, netmask,
 191                                         gateway);
 192
 193         connman_provider_set_ipaddress(provider, ipaddress);
 194         connman_provider_set_nameservers(provider, nameservers);
 195
 196         g_free(addressv4);
 197         g_free(netmask);
 198         g_free(gateway);
 199         g_free(nameservers);
 200         connman_ipaddress_free(ipaddress);
 201
 202         return VPN_STATE_CONNECT;
 203 }
 204
 205 static void pptp_write_bool_option(struct connman_task *task,
 206                                 const char *key, const char *value)
 207 {
 208         if (key != NULL && value != NULL) {
 209                 if (strcmp(value, "yes") == 0)
 210                         connman_task_add_argument(task, key, NULL);
 211         }
 212 }
 213
 214 static int pptp_connect(struct connman_provider *provider,
 215                 struct connman_task *task, const char *if_name)
 216 {
 217         const char *opt_s, *host;
 218         char *str;
 219         int err, i;
 220
 221         if (connman_task_set_notify(task, "getsec",
 222                                         pptp_get_sec, provider))
 223                 return -ENOMEM;
 224
 225         host = connman_provider_get_string(provider, "Host");
 226         if (host == NULL) {
 227                 connman_error("Host not set; cannot enable VPN");
 228                 return -EINVAL;
 229         }
 230
 231         str = g_strdup_printf("%s %s --nolaunchpppd --loglevel 2",
 232                                 PPTP, host);
 233         if (str == NULL) {
 234                 connman_error("can not allocate memory");
 235                 return -ENOMEM;
 236         }
 237
 238         connman_task_add_argument(task, "pty", str);
 239         g_free(str);
 240
 241         connman_task_add_argument(task, "nodetach", NULL);
 242         connman_task_add_argument(task, "lock", NULL);
 243         connman_task_add_argument(task, "usepeerdns", NULL);
 244         connman_task_add_argument(task, "noipdefault", NULL);
 245         connman_task_add_argument(task, "noauth", NULL);
 246         connman_task_add_argument(task, "nodefaultroute", NULL);
 247         connman_task_add_argument(task, "ipparam", "pptp_plugin");
 248
 249         for (i = 0; i < (int)ARRAY_SIZE(pptp_options); i++) {
 250                 opt_s = connman_provider_get_string(provider,
 251                                         pptp_options[i].cm_opt);
 252                 if (opt_s == NULL)
 253                         opt_s = pptp_options[i].vpnc_default;
 254
 255                 if (opt_s == NULL)
 256                         continue;
 257
 258                 if (pptp_options[i].type == OPT_STRING)
 259                         connman_task_add_argument(task,
 260                                         pptp_options[i].pptp_opt, opt_s);
 261                 else if (pptp_options[i].type == OPT_BOOL)
 262                         pptp_write_bool_option(task,
 263                                         pptp_options[i].pptp_opt, opt_s);
 264         }
 265
 266         connman_task_add_argument(task, "plugin",
 267                                 SCRIPTDIR "/libppp-plugin.so");
 268
 269         err = connman_task_run(task, vpn_died, provider,
 270                                 NULL, NULL, NULL);
 271         if (err < 0) {
 272                 connman_error("pptp failed to start");
 273                 return -EIO;
 274         }
 275
 276         return 0;
 277 }
 278
 279 static int pptp_error_code(int exit_code)
 280 {
 281
 282         switch (exit_code) {
 283         case 1:
 284                 return CONNMAN_PROVIDER_ERROR_CONNECT_FAILED;
 285         case 2:
 286                 return CONNMAN_PROVIDER_ERROR_LOGIN_FAILED;
 287         case 16:
 288                 return CONNMAN_PROVIDER_ERROR_AUTH_FAILED;
 289         default:
 290                 return CONNMAN_PROVIDER_ERROR_UNKNOWN;
 291         }
 292 }
 293
 294 static struct vpn_driver vpn_driver = {
 295         .flags          = VPN_FLAG_NO_TUN,
 296         .notify         = pptp_notify,
 297         .connect        = pptp_connect,
 298         .error_code     = pptp_error_code,
 299 };
 300
 301 static int pptp_init(void)
 302 {
 303         connection = connman_dbus_get_connection();
 304
 305         return vpn_register("pptp", &vpn_driver, PPPD);
 306 }
 307
 308 static void pptp_exit(void)
 309 {
 310         vpn_unregister("pptp");
 311
 312         dbus_connection_unref(connection);
 313 }
 314
 315 CONNMAN_PLUGIN_DEFINE(pptp, "pptp plugin", VERSION,
 316         CONNMAN_PLUGIN_PRIORITY_DEFAULT, pptp_init, pptp_exit)