5 * Copyright (C) 2010,2013-2014 BMW Car IT GmbH.
6 * Copyright (C) 2012-2013 Intel Corporation. All rights reserved.
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.
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.
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
33 #include <dbus/dbus.h>
36 #define CONNMAN_API_SUBJECT_TO_CHANGE
37 #include <connman/plugin.h>
38 #include <connman/provider.h>
39 #include <connman/log.h>
40 #include <connman/task.h>
41 #include <connman/dbus.h>
42 #include <connman/inet.h>
43 #include <connman/agent.h>
44 #include <connman/setting.h>
45 #include <connman/vpn-dbus.h>
47 #include "../vpn-provider.h"
48 #include "../vpn-agent.h"
52 #define ARRAY_SIZE(a) (sizeof(a)/sizeof(a[0]))
63 const char *pptp_default;
66 { "PPTP.User", "user", NULL, OPT_STRING },
67 { "PPTP.IdleWait", "--idle-wait", NULL, OPT_PPTP_ONLY},
68 { "PPTP.MaxEchoWait", "--max-echo-wait", NULL, OPT_PPTP_ONLY},
69 { "PPPD.EchoFailure", "lcp-echo-failure", "0", OPT_STRING },
70 { "PPPD.EchoInterval", "lcp-echo-interval", "0", OPT_STRING },
71 { "PPPD.Debug", "debug", NULL, OPT_STRING },
72 { "PPPD.RefuseEAP", "refuse-eap", NULL, OPT_BOOL },
73 { "PPPD.RefusePAP", "refuse-pap", NULL, OPT_BOOL },
74 { "PPPD.RefuseCHAP", "refuse-chap", NULL, OPT_BOOL },
75 { "PPPD.RefuseMSCHAP", "refuse-mschap", NULL, OPT_BOOL },
76 { "PPPD.RefuseMSCHAP2", "refuse-mschapv2", NULL, OPT_BOOL },
77 { "PPPD.NoBSDComp", "nobsdcomp", NULL, OPT_BOOL },
78 { "PPPD.NoDeflate", "nodeflate", NULL, OPT_BOOL },
79 { "PPPD.RequirMPPE", "require-mppe", NULL, OPT_BOOL },
80 { "PPPD.RequirMPPE40", "require-mppe-40", NULL, OPT_BOOL },
81 { "PPPD.RequirMPPE128", "require-mppe-128", NULL, OPT_BOOL },
82 { "PPPD.RequirMPPEStateful", "mppe-stateful", NULL, OPT_BOOL },
83 { "PPPD.NoVJ", "novj", NULL, OPT_BOOL },
86 static DBusConnection *connection;
88 struct pptp_private_data {
89 struct connman_task *task;
91 vpn_provider_connect_cb_t cb;
95 static DBusMessage *pptp_get_sec(struct connman_task *task,
96 DBusMessage *msg, void *user_data)
98 const char *user, *passwd;
99 struct vpn_provider *provider = user_data;
102 if (dbus_message_get_no_reply(msg))
105 user = vpn_provider_get_string(provider, "PPTP.User");
106 passwd = vpn_provider_get_string(provider, "PPTP.Password");
107 if (!user || strlen(user) == 0 ||
108 !passwd || strlen(passwd) == 0)
111 reply = dbus_message_new_method_return(msg);
115 dbus_message_append_args(reply, DBUS_TYPE_STRING, &user,
116 DBUS_TYPE_STRING, &passwd,
121 static int pptp_notify(DBusMessage *msg, struct vpn_provider *provider)
123 DBusMessageIter iter, dict;
124 const char *reason, *key, *value;
125 char *addressv4 = NULL, *netmask = NULL, *gateway = NULL;
126 char *ifname = NULL, *nameservers = NULL;
127 struct connman_ipaddress *ipaddress = NULL;
129 dbus_message_iter_init(msg, &iter);
131 dbus_message_iter_get_basic(&iter, &reason);
132 dbus_message_iter_next(&iter);
135 connman_error("No provider found");
136 return VPN_STATE_FAILURE;
139 if (strcmp(reason, "auth failed") == 0) {
140 DBG("authentication failure");
142 vpn_provider_set_string(provider, "PPTP.User", NULL);
143 vpn_provider_set_string_hide_value(provider, "PPTP.Password",
146 return VPN_STATE_AUTH_FAILURE;
149 if (strcmp(reason, "connect"))
150 return VPN_STATE_DISCONNECT;
152 dbus_message_iter_recurse(&iter, &dict);
154 while (dbus_message_iter_get_arg_type(&dict) == DBUS_TYPE_DICT_ENTRY) {
155 DBusMessageIter entry;
157 dbus_message_iter_recurse(&dict, &entry);
158 dbus_message_iter_get_basic(&entry, &key);
159 dbus_message_iter_next(&entry);
160 dbus_message_iter_get_basic(&entry, &value);
162 DBG("%s = %s", key, value);
164 if (!strcmp(key, "INTERNAL_IP4_ADDRESS"))
165 addressv4 = g_strdup(value);
167 if (!strcmp(key, "INTERNAL_IP4_NETMASK"))
168 netmask = g_strdup(value);
170 if (!strcmp(key, "INTERNAL_IP4_DNS"))
171 nameservers = g_strdup(value);
173 if (!strcmp(key, "INTERNAL_IFNAME"))
174 ifname = g_strdup(value);
176 dbus_message_iter_next(&dict);
179 if (vpn_set_ifname(provider, ifname) < 0) {
184 return VPN_STATE_FAILURE;
188 ipaddress = connman_ipaddress_alloc(AF_INET);
193 connman_error("No IP address for provider");
197 return VPN_STATE_FAILURE;
200 value = vpn_provider_get_string(provider, "HostIP");
202 vpn_provider_set_string(provider, "Gateway", value);
203 gateway = g_strdup(value);
207 connman_ipaddress_set_ipv4(ipaddress, addressv4, netmask,
210 connman_ipaddress_set_p2p(ipaddress, true);
211 vpn_provider_set_ipaddress(provider, ipaddress);
212 vpn_provider_set_nameservers(provider, nameservers);
218 connman_ipaddress_free(ipaddress);
220 return VPN_STATE_CONNECT;
223 static int pptp_save(struct vpn_provider *provider, GKeyFile *keyfile)
226 bool pptp_option, pppd_option;
229 for (i = 0; i < (int)ARRAY_SIZE(pptp_options); i++) {
230 pptp_option = pppd_option = false;
232 if (strncmp(pptp_options[i].cm_opt, "PPTP.", 5) == 0)
235 if (strncmp(pptp_options[i].cm_opt, "PPPD.", 5) == 0)
238 if (pptp_option || pppd_option) {
239 option = vpn_provider_get_string(provider,
240 pptp_options[i].cm_opt);
243 * Check if the option prefix is PPTP as the
244 * PPPD options were using PPTP prefix earlier.
251 pptp_str = g_strdup_printf("PPTP.%s",
252 &pptp_options[i].cm_opt[5]);
253 option = vpn_provider_get_string(provider,
261 g_key_file_set_string(keyfile,
262 vpn_provider_get_save_group(provider),
263 pptp_options[i].cm_opt, option);
270 static void pptp_write_bool_option(struct connman_task *task,
271 const char *key, const char *value)
274 if (strcasecmp(value, "yes") == 0 ||
275 strcasecmp(value, "true") == 0 ||
276 strcmp(value, "1") == 0)
277 connman_task_add_argument(task, key, NULL);
281 struct request_input_reply {
282 struct vpn_provider *provider;
283 vpn_provider_password_cb_t callback;
287 static void request_input_reply(DBusMessage *reply, void *user_data)
289 struct request_input_reply *pptp_reply = user_data;
290 struct pptp_private_data *data;
291 const char *error = NULL;
292 char *username = NULL, *password = NULL;
294 DBusMessageIter iter, dict;
297 DBG("provider %p", pptp_reply->provider);
302 data = pptp_reply->user_data;
304 err = vpn_agent_check_and_process_reply_error(reply,
305 pptp_reply->provider, data->task, data->cb,
308 /* Ensure cb is called only once */
310 data->user_data = NULL;
311 error = dbus_message_get_error_name(reply);
315 if (!vpn_agent_check_reply_has_dict(reply))
318 dbus_message_iter_init(reply, &iter);
319 dbus_message_iter_recurse(&iter, &dict);
320 while (dbus_message_iter_get_arg_type(&dict) == DBUS_TYPE_DICT_ENTRY) {
321 DBusMessageIter entry, value;
324 dbus_message_iter_recurse(&dict, &entry);
325 if (dbus_message_iter_get_arg_type(&entry) != DBUS_TYPE_STRING)
328 dbus_message_iter_get_basic(&entry, &key);
330 if (g_str_equal(key, "Username")) {
331 dbus_message_iter_next(&entry);
332 if (dbus_message_iter_get_arg_type(&entry)
333 != DBUS_TYPE_VARIANT)
335 dbus_message_iter_recurse(&entry, &value);
336 if (dbus_message_iter_get_arg_type(&value)
339 dbus_message_iter_get_basic(&value, &str);
340 username = g_strdup(str);
343 if (g_str_equal(key, "Password")) {
344 dbus_message_iter_next(&entry);
345 if (dbus_message_iter_get_arg_type(&entry)
346 != DBUS_TYPE_VARIANT)
348 dbus_message_iter_recurse(&entry, &value);
349 if (dbus_message_iter_get_arg_type(&value)
352 dbus_message_iter_get_basic(&value, &str);
353 password = g_strdup(str);
356 dbus_message_iter_next(&dict);
360 pptp_reply->callback(pptp_reply->provider, username, password, error,
361 pptp_reply->user_data);
369 typedef void (* request_cb_t)(struct vpn_provider *provider,
370 const char *username, const char *password,
371 const char *error, void *user_data);
373 static int request_input(struct vpn_provider *provider,
374 request_cb_t callback, const char *dbus_sender,
377 DBusMessage *message;
378 const char *path, *agent_sender, *agent_path;
379 DBusMessageIter iter;
380 DBusMessageIter dict;
381 struct request_input_reply *pptp_reply;
385 agent = connman_agent_get_info(dbus_sender, &agent_sender,
387 if (!provider || !agent || !agent_path || !callback)
390 message = dbus_message_new_method_call(agent_sender, agent_path,
396 dbus_message_iter_init_append(message, &iter);
398 path = vpn_provider_get_path(provider);
399 dbus_message_iter_append_basic(&iter,
400 DBUS_TYPE_OBJECT_PATH, &path);
402 connman_dbus_dict_open(&iter, &dict);
404 if (vpn_provider_get_authentication_errors(provider))
405 vpn_agent_append_auth_failure(&dict, provider, NULL);
407 vpn_agent_append_user_info(&dict, provider, "PPTP.User");
409 vpn_agent_append_host_and_name(&dict, provider);
411 connman_dbus_dict_close(&iter, &dict);
413 pptp_reply = g_try_new0(struct request_input_reply, 1);
415 dbus_message_unref(message);
419 pptp_reply->provider = provider;
420 pptp_reply->callback = callback;
421 pptp_reply->user_data = user_data;
423 err = connman_agent_queue_message(provider, message,
424 connman_timeout_input_request(),
425 request_input_reply, pptp_reply, agent);
426 if (err < 0 && err != -EBUSY) {
427 DBG("error %d sending agent request", err);
428 dbus_message_unref(message);
433 dbus_message_unref(message);
438 static int run_connect(struct vpn_provider *provider,
439 struct connman_task *task, const char *if_name,
440 vpn_provider_connect_cb_t cb, void *user_data,
441 const char *username, const char *password)
449 if (!username || !password) {
450 DBG("Cannot connect username %s password %p",
456 DBG("username %s password %p", username, password);
458 host = vpn_provider_get_string(provider, "Host");
460 /* Create PPTP options for pppd "pty" */
461 pptp_opt_s = g_string_new(NULL);
462 g_string_append_printf(pptp_opt_s, "%s %s --nolaunchpppd --loglevel 2",
465 connman_task_add_argument(task, "nodetach", NULL);
466 connman_task_add_argument(task, "lock", NULL);
467 connman_task_add_argument(task, "logfd", "2");
468 connman_task_add_argument(task, "usepeerdns", NULL);
469 connman_task_add_argument(task, "noipdefault", NULL);
470 connman_task_add_argument(task, "noauth", NULL);
471 connman_task_add_argument(task, "nodefaultroute", NULL);
472 connman_task_add_argument(task, "ipparam", "pptp_plugin");
474 for (i = 0; i < (int)ARRAY_SIZE(pptp_options); i++) {
475 opt_s = vpn_provider_get_string(provider,
476 pptp_options[i].cm_opt);
478 opt_s = pptp_options[i].pptp_default;
483 if (pptp_options[i].type == OPT_STRING)
484 connman_task_add_argument(task,
485 pptp_options[i].pptp_opt, opt_s);
486 else if (pptp_options[i].type == OPT_BOOL)
487 pptp_write_bool_option(task,
488 pptp_options[i].pptp_opt, opt_s);
489 else if (pptp_options[i].type == OPT_PPTP_ONLY)
490 g_string_append_printf(pptp_opt_s, " %s %s",
491 pptp_options[i].pptp_opt, opt_s);
494 str = g_string_free(pptp_opt_s, FALSE);
495 connman_task_add_argument(task, "pty", str);
498 connman_task_add_argument(task, "plugin",
499 SCRIPTDIR "/libppp-plugin.so");
501 err = connman_task_run(task, vpn_died, provider,
504 connman_error("pptp failed to start");
511 cb(provider, user_data, err);
516 static void free_private_data(struct pptp_private_data *data)
518 g_free(data->if_name);
522 static void request_input_cb(struct vpn_provider *provider,
523 const char *username,
524 const char *password,
525 const char *error, void *user_data)
527 struct pptp_private_data *data = user_data;
529 if (!username || !password)
530 DBG("Requesting username %s or password failed, error %s",
533 DBG("error %s", error);
535 vpn_provider_set_string(provider, "PPTP.User", username);
536 vpn_provider_set_string_hide_value(provider, "PPTP.Password",
539 run_connect(provider, data->task, data->if_name, data->cb,
540 data->user_data, username, password);
542 free_private_data(data);
545 static int pptp_connect(struct vpn_provider *provider,
546 struct connman_task *task, const char *if_name,
547 vpn_provider_connect_cb_t cb, const char *dbus_sender,
550 const char *username, *password;
553 DBG("iface %s provider %p user %p", if_name, provider, user_data);
555 if (connman_task_set_notify(task, "getsec",
556 pptp_get_sec, provider)) {
561 username = vpn_provider_get_string(provider, "PPTP.User");
562 password = vpn_provider_get_string(provider, "PPTP.Password");
564 DBG("user %s password %p", username, password);
566 if (!username || !password) {
567 struct pptp_private_data *data;
569 data = g_try_new0(struct pptp_private_data, 1);
574 data->if_name = g_strdup(if_name);
576 data->user_data = user_data;
578 err = request_input(provider, request_input_cb, dbus_sender,
580 if (err != -EINPROGRESS) {
581 free_private_data(data);
588 return run_connect(provider, task, if_name, cb, user_data,
593 cb(provider, user_data, err);
598 static int pptp_error_code(struct vpn_provider *provider, int exit_code)
603 return CONNMAN_PROVIDER_ERROR_CONNECT_FAILED;
605 return CONNMAN_PROVIDER_ERROR_LOGIN_FAILED;
607 return CONNMAN_PROVIDER_ERROR_AUTH_FAILED;
609 return CONNMAN_PROVIDER_ERROR_UNKNOWN;
613 static void pptp_disconnect(struct vpn_provider *provider)
618 vpn_provider_set_string_hide_value(provider, "PPTP.Password", NULL);
620 connman_agent_cancel(provider);
623 static struct vpn_driver vpn_driver = {
624 .flags = VPN_FLAG_NO_TUN,
625 .notify = pptp_notify,
626 .connect = pptp_connect,
627 .error_code = pptp_error_code,
629 .disconnect = pptp_disconnect,
632 static int pptp_init(void)
634 connection = connman_dbus_get_connection();
636 return vpn_register("pptp", &vpn_driver, PPPD);
639 static void pptp_exit(void)
641 vpn_unregister("pptp");
643 dbus_connection_unref(connection);
646 CONNMAN_PLUGIN_DEFINE(pptp, "pptp plugin", VERSION,
647 CONNMAN_PLUGIN_PRIORITY_DEFAULT, pptp_init, pptp_exit)