From 764b680c053650985b6f4424c0cdf75b3fbd42b3 Mon Sep 17 00:00:00 2001 From: Mohamed Abbas Date: Tue, 15 Nov 2011 13:06:19 +0200 Subject: test: Add test script support for pptp/l2tp Modify connect-vpn script to handle pptp/l2tp connection. --- test/connect-vpn | 19 +++++++++++++++++++ 1 file changed, 19 insertions(+) (limited to 'test') diff --git a/test/connect-vpn b/test/connect-vpn index 4e1fc7cf..15128c85 100755 --- a/test/connect-vpn +++ b/test/connect-vpn @@ -9,6 +9,10 @@ if (len(sys.argv) < 4): print " [servercert]" print " type: openvpn" print " [ ]" + print " type: pptp" + print " " + print " type: l2tp" + print " " sys.exit(1) bus = dbus.SystemBus() @@ -47,6 +51,21 @@ elif sys.argv[1] == "openvpn": "OpenVPN.Cert": sys.argv[6], "OpenVPN.Key": sys.argv[7]})) +elif sys.argv[1] == "pptp": + path = manager.ConnectProvider(({ "Type": "pptp", + "Name": sys.argv[2], + "Host": sys.argv[3], + "VPN.Domain": sys.argv[4], + "PPTP.User": sys.argv[5], + "PPTP.Password": sys.argv[6]})) +elif sys.argv[1] == "l2tp": + path = manager.ConnectProvider(({ "Type": "l2tp", + "Name": sys.argv[2], + "Host": sys.argv[3], + "VPN.Domain": sys.argv[4], + "L2TP.User": sys.argv[5], + "L2TP.Password": sys.argv[6]})) + else: print "Unknown VPN type" sys.exit(1) -- cgit v1.2.3