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, "connect"))
 124                 return VPN_STATE_DISCONNECT;
 125
 126         dbus_message_iter_recurse(&iter, &dict);
 127
 128         while (dbus_message_iter_get_arg_type(&dict) == DBUS_TYPE_DICT_ENTRY) {
 129                 DBusMessageIter entry;
 130
 131                 dbus_message_iter_recurse(&dict, &entry);
 132                 dbus_message_iter_get_basic(&entry, &key);
 133                 dbus_message_iter_next(&entry);
 134                 dbus_message_iter_get_basic(&entry, &value);
 135
 136                 DBG("%s = %s", key, value);
 137
 138                 if (!strcmp(key, "INTERNAL_IP4_ADDRESS")) {
 139                         connman_provider_set_string(provider, "Address", value);
 140                         addressv4 = g_strdup(value);
 141                 }
 142
 143                 if (!strcmp(key, "INTERNAL_IP4_NETMASK")) {
 144                         connman_provider_set_string(provider, "Netmask", value);
 145                         netmask = g_strdup(value);
 146                 }
 147
 148                 if (!strcmp(key, "INTERNAL_IP4_DNS")) {
 149                         connman_provider_set_string(provider, "DNS", value);
 150                         nameservers = g_strdup(value);
 151                 }
 152
 153                 if (!strcmp(key, "INTERNAL_IFNAME"))
 154                         ifname = g_strdup(value);
 155
 156                 dbus_message_iter_next(&dict);
 157         }
 158
 159         if (vpn_set_ifname(provider, ifname) < 0) {
 160                 g_free(ifname);
 161                 g_free(addressv4);
 162                 g_free(netmask);
 163                 g_free(nameservers);
 164                 return VPN_STATE_FAILURE;
 165         }
 166
 167         if (addressv4 != NULL)
 168                 ipaddress = connman_ipaddress_alloc(AF_INET);
 169
 170         g_free(ifname);
 171
 172         if (ipaddress == NULL) {
 173                 connman_error("No IP address for provider");
 174                 g_free(addressv4);
 175                 g_free(netmask);
 176                 g_free(nameservers);
 177                 return VPN_STATE_FAILURE;
 178         }
 179
 180         value = connman_provider_get_string(provider, "Host");
 181         if (value != NULL) {
 182                 connman_provider_set_string(provider, "Gateway", value);
 183                 gateway = g_strdup(value);
 184         }
 185
 186         if (addressv4 != NULL)
 187                 connman_ipaddress_set_ipv4(ipaddress, addressv4, netmask,
 188                                         gateway);
 189
 190         connman_provider_set_ipaddress(provider, ipaddress);
 191         connman_provider_set_nameservers(provider, nameservers);
 192
 193         g_free(addressv4);
 194         g_free(netmask);
 195         g_free(gateway);
 196         g_free(nameservers);
 197         connman_ipaddress_free(ipaddress);
 198
 199         return VPN_STATE_CONNECT;
 200 }
 201
 202 static void pptp_write_bool_option(struct connman_task *task,
 203                                 const char *key, const char *value)
 204 {
 205         if (key != NULL && value != NULL) {
 206                 if (strcmp(value, "yes") == 0)
 207                         connman_task_add_argument(task, key, NULL);
 208         }
 209 }
 210
 211 static int pptp_connect(struct connman_provider *provider,
 212                 struct connman_task *task, const char *if_name)
 213 {
 214         const char *opt_s, *host;
 215         char *str;
 216         int err, i;
 217
 218         if (connman_task_set_notify(task, "getsec",
 219                                         pptp_get_sec, provider))
 220                 return -ENOMEM;
 221
 222         host = connman_provider_get_string(provider, "Host");
 223         if (host == NULL) {
 224                 connman_error("Host not set; cannot enable VPN");
 225                 return -EINVAL;
 226         }
 227
 228         str = g_strdup_printf("%s %s --nolaunchpppd --loglevel 2",
 229                                 PPTP, host);
 230         if (str == NULL) {
 231                 connman_error("can not allocate memory");
 232                 return -ENOMEM;
 233         }
 234
 235         connman_task_add_argument(task, "pty", str);
 236         g_free(str);
 237
 238         connman_task_add_argument(task, "nodetach", NULL);
 239         connman_task_add_argument(task, "lock", NULL);
 240         connman_task_add_argument(task, "usepeerdns", NULL);
 241         connman_task_add_argument(task, "noipdefault", NULL);
 242         connman_task_add_argument(task, "noauth", NULL);
 243         connman_task_add_argument(task, "nodefaultroute", NULL);
 244         connman_task_add_argument(task, "ipparam", "pptp_plugin");
 245
 246         for (i = 0; i < (int)ARRAY_SIZE(pptp_options); i++) {
 247                 opt_s = connman_provider_get_string(provider,
 248                                         pptp_options[i].cm_opt);
 249                 if (opt_s == NULL)
 250                         opt_s = pptp_options[i].vpnc_default;
 251
 252                 if (opt_s == NULL)
 253                         continue;
 254
 255                 if (pptp_options[i].type == OPT_STRING)
 256                         connman_task_add_argument(task,
 257                                         pptp_options[i].pptp_opt, opt_s);
 258                 else if (pptp_options[i].type == OPT_BOOL)
 259                         pptp_write_bool_option(task,
 260                                         pptp_options[i].pptp_opt, opt_s);
 261         }
 262
 263         connman_task_add_argument(task, "plugin",
 264                                 SCRIPTDIR "/libppp-plugin.so");
 265
 266         err = connman_task_run(task, vpn_died, provider,
 267                                 NULL, NULL, NULL);
 268         if (err < 0) {
 269                 connman_error("pptp failed to start");
 270                 return -EIO;
 271         }
 272
 273         return 0;
 274 }
 275
 276 static int pptp_error_code(int exit_code)
 277 {
 278
 279         switch (exit_code) {
 280         case 1:
 281                 return CONNMAN_PROVIDER_ERROR_CONNECT_FAILED;
 282         case 2:
 283                 return CONNMAN_PROVIDER_ERROR_LOGIN_FAILED;
 284         case 16:
 285                 return CONNMAN_PROVIDER_ERROR_AUTH_FAILED;
 286         default:
 287                 return CONNMAN_PROVIDER_ERROR_UNKNOWN;
 288         }
 289 }
 290
 291 static struct vpn_driver vpn_driver = {
 292         .flags          = VPN_FLAG_NO_TUN,
 293         .notify         = pptp_notify,
 294         .connect        = pptp_connect,
 295         .error_code     = pptp_error_code,
 296 };
 297
 298 static int pptp_init(void)
 299 {
 300         connection = connman_dbus_get_connection();
 301
 302         return vpn_register("pptp", &vpn_driver, PPPD);
 303 }
 304
 305 static void pptp_exit(void)
 306 {
 307         vpn_unregister("pptp");
 308
 309         dbus_connection_unref(connection);
 310 }
 311
 312 CONNMAN_PLUGIN_DEFINE(pptp, "pptp plugin", VERSION,
 313         CONNMAN_PLUGIN_PRIORITY_DEFAULT, pptp_init, pptp_exit)