From 349cfa7acb95abe865209a28e417ec74b56f9bba Mon Sep 17 00:00:00 2001 From: Alberto Gonzalez Iniesta Date: Tue, 21 Feb 2012 15:53:40 +0100 Subject: Imported Upstream version 2.2.1 --- options.c | 6020 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 6020 insertions(+) create mode 100644 options.c (limited to 'options.c') diff --git a/options.c b/options.c new file mode 100644 index 0000000..7a5e35d --- /dev/null +++ b/options.c @@ -0,0 +1,6020 @@ +/* + * OpenVPN -- An application to securely tunnel IP networks + * over a single UDP port, with support for SSL/TLS-based + * session authentication and key exchange, + * packet encryption, packet authentication, and + * packet compression. + * + * Copyright (C) 2002-2010 OpenVPN Technologies, Inc. + * + * Additions for eurephia plugin done by: + * David Sommerseth Copyright (C) 2009 + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License version 2 + * as published by the Free Software Foundation. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program (see the file COPYING included with this + * distribution); if not, write to the Free Software Foundation, Inc., + * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + +/* + * 2004-01-28: Added Socks5 proxy support + * (Christof Meerwald, http://cmeerw.org) + */ + +#include "syshead.h" + +#include "buffer.h" +#include "error.h" +#include "common.h" +#include "shaper.h" +#include "crypto.h" +#include "ssl.h" +#include "options.h" +#include "misc.h" +#include "socket.h" +#include "packet_id.h" +#include "pkcs11.h" +#include "win32.h" +#include "push.h" +#include "pool.h" +#include "helper.h" +#include "manage.h" +#include "forward.h" +#include "configure.h" +#include + +#include "memdbg.h" + +const char title_string[] = + PACKAGE_STRING + " " TARGET_ALIAS +#ifdef USE_CRYPTO +#ifdef USE_SSL + " [SSL]" +#else + " [CRYPTO]" +#endif +#endif +#ifdef USE_LZO + " [LZO" LZO_VERSION_NUM "]" +#endif +#if EPOLL + " [EPOLL]" +#endif +#ifdef PRODUCT_TAP_DEBUG + " [TAPDBG]" +#endif +#ifdef ENABLE_PKCS11 + " [PKCS11]" +#endif +#ifdef ENABLE_EUREPHIA + " [eurephia]" +#endif + " built on " __DATE__ +; + +#ifndef ENABLE_SMALL + +static const char usage_message[] = + "%s\n" + "\n" + "General Options:\n" + "--config file : Read configuration options from file.\n" + "--help : Show options.\n" + "--version : Show copyright and version information.\n" + "\n" + "Tunnel Options:\n" + "--local host : Local host name or ip address. Implies --bind.\n" + "--remote host [port] : Remote host name or ip address.\n" + "--remote-random : If multiple --remote options specified, choose one randomly.\n" + "--remote-random-hostname : Add a random string to remote DNS name.\n" + "--mode m : Major mode, m = 'p2p' (default, point-to-point) or 'server'.\n" + "--proto p : Use protocol p for communicating with peer.\n" + " p = udp (default), tcp-server, or tcp-client\n" + "--proto-force p : only consider protocol p in list of connection profiles.\n" + "--connect-retry n : For --proto tcp-client, number of seconds to wait\n" + " between connection retries (default=%d).\n" + "--connect-timeout n : For --proto tcp-client, connection timeout (in seconds).\n" + "--connect-retry-max n : Maximum connection attempt retries, default infinite.\n" +#ifdef GENERAL_PROXY_SUPPORT + "--auto-proxy : Try to sense proxy settings (or lack thereof) automatically.\n" + "--show-proxy-settings : Show sensed proxy settings.\n" +#endif +#ifdef ENABLE_HTTP_PROXY + "--http-proxy s p [up] [auth] : Connect to remote host\n" + " through an HTTP proxy at address s and port p.\n" + " If proxy authentication is required,\n" + " up is a file containing username/password on 2 lines, or\n" + " 'stdin' to prompt from console. Add auth='ntlm' if\n" + " the proxy requires NTLM authentication.\n" + "--http-proxy s p 'auto[-nct]' : Like the above directive, but automatically\n" + " determine auth method and query for username/password\n" + " if needed. auto-nct disables weak proxy auth methods.\n" + "--http-proxy-retry : Retry indefinitely on HTTP proxy errors.\n" + "--http-proxy-timeout n : Proxy timeout in seconds, default=5.\n" + "--http-proxy-option type [parm] : Set extended HTTP proxy options.\n" + " Repeat to set multiple options.\n" + " VERSION version (default=1.0)\n" + " AGENT user-agent\n" +#endif +#ifdef ENABLE_SOCKS + "--socks-proxy s [p] [up] : Connect to remote host through a Socks5 proxy at\n" + " address s and port p (default port = 1080).\n" + " If proxy authentication is required,\n" + " up is a file containing username/password on 2 lines, or\n" + " 'stdin' to prompt for console.\n" + "--socks-proxy-retry : Retry indefinitely on Socks proxy errors.\n" +#endif + "--resolv-retry n: If hostname resolve fails for --remote, retry\n" + " resolve for n seconds before failing (disabled by default).\n" + " Set n=\"infinite\" to retry indefinitely.\n" + "--float : Allow remote to change its IP address/port, such as through\n" + " DHCP (this is the default if --remote is not used).\n" + "--ipchange cmd : Execute shell command cmd on remote ip address initial\n" + " setting or change -- execute as: cmd ip-address port#\n" + "--port port : TCP/UDP port # for both local and remote.\n" + "--lport port : TCP/UDP port # for local (default=%d). Implies --bind.\n" + "--rport port : TCP/UDP port # for remote (default=%d).\n" + "--bind : Bind to local address and port. (This is the default unless\n" + " --proto tcp-client" +#ifdef ENABLE_HTTP_PROXY + " or --http-proxy" +#endif +#ifdef ENABLE_SOCKS + " or --socks-proxy" +#endif + " is used).\n" + "--nobind : Do not bind to local address and port.\n" + "--dev tunX|tapX : tun/tap device (X can be omitted for dynamic device.\n" + "--dev-type dt : Which device type are we using? (dt = tun or tap) Use\n" + " this option only if the tun/tap device used with --dev\n" + " does not begin with \"tun\" or \"tap\".\n" + "--dev-node node : Explicitly set the device node rather than using\n" + " /dev/net/tun, /dev/tun, /dev/tap, etc.\n" + "--lladdr hw : Set the link layer address of the tap device.\n" + "--topology t : Set --dev tun topology: 'net30', 'p2p', or 'subnet'.\n" + "--tun-ipv6 : Build tun link capable of forwarding IPv6 traffic.\n" +#ifdef CONFIG_FEATURE_IPROUTE + "--iproute cmd : Use this command instead of default " IPROUTE_PATH ".\n" +#endif + "--ifconfig l rn : TUN: configure device to use IP address l as a local\n" + " endpoint and rn as a remote endpoint. l & rn should be\n" + " swapped on the other peer. l & rn must be private\n" + " addresses outside of the subnets used by either peer.\n" + " TAP: configure device to use IP address l as a local\n" + " endpoint and rn as a subnet mask.\n" + "--ifconfig-noexec : Don't actually execute ifconfig/netsh command, instead\n" + " pass --ifconfig parms by environment to scripts.\n" + "--ifconfig-nowarn : Don't warn if the --ifconfig option on this side of the\n" + " connection doesn't match the remote side.\n" + "--route network [netmask] [gateway] [metric] :\n" + " Add route to routing table after connection\n" + " is established. Multiple routes can be specified.\n" + " netmask default: 255.255.255.255\n" + " gateway default: taken from --route-gateway or --ifconfig\n" + " Specify default by leaving blank or setting to \"nil\".\n" + "--max-routes n : Specify the maximum number of routes that may be defined\n" + " or pulled from a server.\n" + "--route-gateway gw|'dhcp' : Specify a default gateway for use with --route.\n" + "--route-metric m : Specify a default metric for use with --route.\n" + "--route-delay n [w] : Delay n seconds after connection initiation before\n" + " adding routes (may be 0). If not specified, routes will\n" + " be added immediately after tun/tap open. On Windows, wait\n" + " up to w seconds for TUN/TAP adapter to come up.\n" + "--route-up cmd : Execute shell cmd after routes are added.\n" + "--route-noexec : Don't add routes automatically. Instead pass routes to\n" + " --route-up script using environmental variables.\n" + "--route-nopull : When used with --client or --pull, accept options pushed\n" + " by server EXCEPT for routes.\n" + "--allow-pull-fqdn : Allow client to pull DNS names from server for\n" + " --ifconfig, --route, and --route-gateway.\n" + "--redirect-gateway [flags]: Automatically execute routing\n" + " commands to redirect all outgoing IP traffic through the\n" + " VPN. Add 'local' flag if both " PACKAGE_NAME " servers are directly\n" + " connected via a common subnet, such as with WiFi.\n" + " Add 'def1' flag to set default route using using 0.0.0.0/1\n" + " and 128.0.0.0/1 rather than 0.0.0.0/0. Add 'bypass-dhcp'\n" + " flag to add a direct route to DHCP server, bypassing tunnel.\n" + " Add 'bypass-dns' flag to similarly bypass tunnel for DNS.\n" + "--redirect-private [flags]: Like --redirect-gateway, but omit actually changing\n" + " the default gateway. Useful when pushing private subnets.\n" +#ifdef ENABLE_PUSH_PEER_INFO + "--push-peer-info : (client only) push client info to server.\n" +#endif + "--setenv name value : Set a custom environmental variable to pass to script.\n" + "--setenv FORWARD_COMPATIBLE 1 : Relax config file syntax checking to allow\n" + " directives for future OpenVPN versions to be ignored.\n" + "--script-security level mode : mode='execve' (default) or 'system', level=\n" + " 0 -- strictly no calling of external programs\n" + " 1 -- (default) only call built-ins such as ifconfig\n" + " 2 -- allow calling of built-ins and scripts\n" + " 3 -- allow password to be passed to scripts via env\n" + "--shaper n : Restrict output to peer to n bytes per second.\n" + "--keepalive n m : Helper option for setting timeouts in server mode. Send\n" + " ping once every n seconds, restart if ping not received\n" + " for m seconds.\n" + "--inactive n [bytes] : Exit after n seconds of activity on tun/tap device\n" + " produces a combined in/out byte count < bytes.\n" + "--ping-exit n : Exit if n seconds pass without reception of remote ping.\n" + "--ping-restart n: Restart if n seconds pass without reception of remote ping.\n" + "--ping-timer-rem: Run the --ping-exit/--ping-restart timer only if we have a\n" + " remote address.\n" + "--ping n : Ping remote once every n seconds over TCP/UDP port.\n" +#if ENABLE_IP_PKTINFO + "--multihome : Configure a multi-homed UDP server.\n" +#endif + "--fast-io : (experimental) Optimize TUN/TAP/UDP writes.\n" + "--remap-usr1 s : On SIGUSR1 signals, remap signal (s='SIGHUP' or 'SIGTERM').\n" + "--persist-tun : Keep tun/tap device open across SIGUSR1 or --ping-restart.\n" + "--persist-remote-ip : Keep remote IP address across SIGUSR1 or --ping-restart.\n" + "--persist-local-ip : Keep local IP address across SIGUSR1 or --ping-restart.\n" + "--persist-key : Don't re-read key files across SIGUSR1 or --ping-restart.\n" +#if PASSTOS_CAPABILITY + "--passtos : TOS passthrough (applies to IPv4 only).\n" +#endif + "--tun-mtu n : Take the tun/tap device MTU to be n and derive the\n" + " TCP/UDP MTU from it (default=%d).\n" + "--tun-mtu-extra n : Assume that tun/tap device might return as many\n" + " as n bytes more than the tun-mtu size on read\n" + " (default TUN=0 TAP=%d).\n" + "--link-mtu n : Take the TCP/UDP device MTU to be n and derive the tun MTU\n" + " from it.\n" + "--mtu-disc type : Should we do Path MTU discovery on TCP/UDP channel?\n" + " 'no' -- Never send DF (Don't Fragment) frames\n" + " 'maybe' -- Use per-route hints\n" + " 'yes' -- Always DF (Don't Fragment)\n" +#ifdef ENABLE_OCC + "--mtu-test : Empirically measure and report MTU.\n" +#endif +#ifdef ENABLE_FRAGMENT + "--fragment max : Enable internal datagram fragmentation so that no UDP\n" + " datagrams are sent which are larger than max bytes.\n" + " Adds 4 bytes of overhead per datagram.\n" +#endif + "--mssfix [n] : Set upper bound on TCP MSS, default = tun-mtu size\n" + " or --fragment max value, whichever is lower.\n" + "--sndbuf size : Set the TCP/UDP send buffer size.\n" + "--rcvbuf size : Set the TCP/UDP receive buffer size.\n" + "--txqueuelen n : Set the tun/tap TX queue length to n (Linux only).\n" + "--mlock : Disable Paging -- ensures key material and tunnel\n" + " data will never be written to disk.\n" + "--up cmd : Shell cmd to execute after successful tun device open.\n" + " Execute as: cmd tun/tap-dev tun-mtu link-mtu \\\n" + " ifconfig-local-ip ifconfig-remote-ip\n" + " (pre --user or --group UID/GID change)\n" + "--up-delay : Delay tun/tap open and possible --up script execution\n" + " until after TCP/UDP connection establishment with peer.\n" + "--down cmd : Shell cmd to run after tun device close.\n" + " (post --user/--group UID/GID change and/or --chroot)\n" + " (script parameters are same as --up option)\n" + "--down-pre : Call --down cmd/script before TUN/TAP close.\n" + "--up-restart : Run up/down scripts for all restarts including those\n" + " caused by --ping-restart or SIGUSR1\n" + "--user user : Set UID to user after initialization.\n" + "--group group : Set GID to group after initialization.\n" + "--chroot dir : Chroot to this directory after initialization.\n" +#ifdef HAVE_SETCON + "--setcon context: Apply this SELinux context after initialization.\n" +#endif + "--cd dir : Change to this directory before initialization.\n" + "--daemon [name] : Become a daemon after initialization.\n" + " The optional 'name' parameter will be passed\n" + " as the program name to the system logger.\n" + "--syslog [name] : Output to syslog, but do not become a daemon.\n" + " See --daemon above for a description of the 'name' parm.\n" + "--inetd [name] ['wait'|'nowait'] : Run as an inetd or xinetd server.\n" + " See --daemon above for a description of the 'name' parm.\n" + "--log file : Output log to file which is created/truncated on open.\n" + "--log-append file : Append log to file, or create file if nonexistent.\n" + "--suppress-timestamps : Don't log timestamps to stdout/stderr.\n" + "--writepid file : Write main process ID to file.\n" + "--nice n : Change process priority (>0 = lower, <0 = higher).\n" + "--echo [parms ...] : Echo parameters to log output.\n" + "--verb n : Set output verbosity to n (default=%d):\n" + " (Level 3 is recommended if you want a good summary\n" + " of what's happening without being swamped by output).\n" + " : 0 -- no output except fatal errors\n" + " : 1 -- startup info + connection initiated messages +\n" + " non-fatal encryption & net errors\n" + " : 2,3 -- show TLS negotiations & route info\n" + " : 4 -- show parameters\n" + " : 5 -- show 'RrWw' chars on console for each packet sent\n" + " and received from TCP/UDP (caps) or tun/tap (lc)\n" + " : 6 to 11 -- debug messages of increasing verbosity\n" + "--mute n : Log at most n consecutive messages in the same category.\n" + "--status file n : Write operational status to file every n seconds.\n" + "--status-version [n] : Choose the status file format version number.\n" + " Currently, n can be 1, 2, or 3 (default=1).\n" +#ifdef ENABLE_OCC + "--disable-occ : Disable options consistency check between peers.\n" +#endif +#ifdef ENABLE_DEBUG + "--gremlin mask : Special stress testing mode (for debugging only).\n" +#endif +#ifdef USE_LZO + "--comp-lzo : Use fast LZO compression -- may add up to 1 byte per\n" + " packet for uncompressible data.\n" + "--comp-noadapt : Don't use adaptive compression when --comp-lzo\n" + " is specified.\n" +#endif +#ifdef ENABLE_MANAGEMENT + "--management ip port [pass] : Enable a TCP server on ip:port to handle\n" + " management functions. pass is a password file\n" + " or 'stdin' to prompt from console.\n" +#if UNIX_SOCK_SUPPORT + " To listen on a unix domain socket, specific the pathname\n" + " in place of ip and use 'unix' as the port number.\n" +#endif + "--management-client : Management interface will connect as a TCP client to\n" + " ip/port rather than listen as a TCP server.\n" + "--management-query-passwords : Query management channel for private key\n" + " and auth-user-pass passwords.\n" + "--management-hold : Start " PACKAGE_NAME " in a hibernating state, until a client\n" + " of the management interface explicitly starts it.\n" + "--management-signal : Issue SIGUSR1 when management disconnect event occurs.\n" + "--management-forget-disconnect : Forget passwords when management disconnect\n" + " event occurs.\n" + "--management-log-cache n : Cache n lines of log file history for usage\n" + " by the management channel.\n" +#if UNIX_SOCK_SUPPORT + "--management-client-user u : When management interface is a unix socket, only\n" + " allow connections from user u.\n" + "--management-client-group g : When management interface is a unix socket, only\n" + " allow connections from group g.\n" +#endif +#ifdef MANAGEMENT_DEF_AUTH + "--management-client-auth : gives management interface client the responsibility\n" + " to authenticate clients after their client certificate\n" + " has been verified.\n" +#endif +#ifdef MANAGEMENT_PF + "--management-client-pf : management interface clients must specify a packet\n" + " filter file for each connecting client.\n" +#endif +#endif +#ifdef ENABLE_PLUGIN + "--plugin m [str]: Load plug-in module m passing str as an argument\n" + " to its initialization function.\n" +#endif +#if P2MP +#if P2MP_SERVER + "\n" + "Multi-Client Server options (when --mode server is used):\n" + "--server network netmask : Helper option to easily configure server mode.\n" + "--server-bridge [IP netmask pool-start-IP pool-end-IP] : Helper option to\n" + " easily configure ethernet bridging server mode.\n" + "--push \"option\" : Push a config file option back to the peer for remote\n" + " execution. Peer must specify --pull in its config file.\n" + "--push-reset : Don't inherit global push list for specific\n" + " client instance.\n" + "--ifconfig-pool start-IP end-IP [netmask] : Set aside a pool of subnets\n" + " to be dynamically allocated to connecting clients.\n" + "--ifconfig-pool-linear : Use individual addresses rather than /30 subnets\n" + " in tun mode. Not compatible with Windows clients.\n" + "--ifconfig-pool-persist file [seconds] : Persist/unpersist ifconfig-pool\n" + " data to file, at seconds intervals (default=600).\n" + " If seconds=0, file will be treated as read-only.\n" + "--ifconfig-push local remote-netmask : Push an ifconfig option to remote,\n" + " overrides --ifconfig-pool dynamic allocation.\n" + " Only valid in a client-specific config file.\n" + "--iroute network [netmask] : Route subnet to client.\n" + " Sets up internal routes only.\n" + " Only valid in a client-specific config file.\n" + "--disable : Client is disabled.\n" + " Only valid in a client-specific config file.\n" + "--client-cert-not-required : Don't require client certificate, client\n" + " will authenticate using username/password.\n" + "--username-as-common-name : For auth-user-pass authentication, use\n" + " the authenticated username as the common name,\n" + " rather than the common name from the client cert.\n" + "--auth-user-pass-verify cmd method: Query client for username/password and\n" + " run script cmd to verify. If method='via-env', pass\n" + " user/pass via environment, if method='via-file', pass\n" + " user/pass via temporary file.\n" + "--opt-verify : Clients that connect with options that are incompatible\n" + " with those of the server will be disconnected.\n" + "--auth-user-pass-optional : Allow connections by clients that don't\n" + " specify a username/password.\n" + "--no-name-remapping : Allow Common Name and X509 Subject to include\n" + " any printable character.\n" + "--client-to-client : Internally route client-to-client traffic.\n" + "--duplicate-cn : Allow multiple clients with the same common name to\n" + " concurrently connect.\n" + "--client-connect cmd : Run script cmd on client connection.\n" + "--client-disconnect cmd : Run script cmd on client disconnection.\n" + "--client-config-dir dir : Directory for custom client config files.\n" + "--ccd-exclusive : Refuse connection unless custom client config is found.\n" + "--tmp-dir dir : Temporary directory, used for --client-connect return file and plugin communication.\n" + "--hash-size r v : Set the size of the real address hash table to r and the\n" + " virtual address table to v.\n" + "--bcast-buffers n : Allocate n broadcast buffers.\n" + "--tcp-queue-limit n : Maximum number of queued TCP output packets.\n" + "--tcp-nodelay : Macro that sets TCP_NODELAY socket flag on the server\n" + " as well as pushes it to connecting clients.\n" + "--learn-address cmd : Run script cmd to validate client virtual addresses.\n" + "--connect-freq n s : Allow a maximum of n new connections per s seconds.\n" + "--max-clients n : Allow a maximum of n simultaneously connected clients.\n" + "--max-routes-per-client n : Allow a maximum of n internal routes per client.\n" +#if PORT_SHARE + "--port-share host port : When run in TCP mode, proxy incoming HTTPS sessions\n" + " to a web server at host:port.\n" +#endif +#endif + "\n" + "Client options (when connecting to a multi-client server):\n" + "--client : Helper option to easily configure client mode.\n" + "--auth-user-pass [up] : Authenticate with server using username/password.\n" + " up is a file containing username/password on 2 lines,\n" + " or omit to prompt from console.\n" + "--pull : Accept certain config file options from the peer as if they\n" + " were part of the local config file. Must be specified\n" + " when connecting to a '--mode server' remote host.\n" + "--auth-retry t : How to handle auth failures. Set t to\n" + " none (default), interact, or nointeract.\n" + "--server-poll-timeout n : when polling possible remote servers to connect to\n" + " in a round-robin fashion, spend no more than n seconds\n" + " waiting for a response before trying the next server.\n" +#endif +#ifdef ENABLE_OCC + "--explicit-exit-notify [n] : On exit/restart, send exit signal to\n" + " server/remote. n = # of retries, default=1.\n" +#endif +#ifdef USE_CRYPTO + "\n" + "Data Channel Encryption Options (must be compatible between peers):\n" + "(These options are meaningful for both Static Key & TLS-mode)\n" + "--secret f [d] : Enable Static Key encryption mode (non-TLS).\n" + " Use shared secret file f, generate with --genkey.\n" + " The optional d parameter controls key directionality.\n" + " If d is specified, use separate keys for each\n" + " direction, set d=0 on one side of the connection,\n" + " and d=1 on the other side.\n" + "--auth alg : Authenticate packets with HMAC using message\n" + " digest algorithm alg (default=%s).\n" + " (usually adds 16 or 20 bytes per packet)\n" + " Set alg=none to disable authentication.\n" + "--cipher alg : Encrypt packets with cipher algorithm alg\n" + " (default=%s).\n" + " Set alg=none to disable encryption.\n" + "--prng alg [nsl] : For PRNG, use digest algorithm alg, and\n" + " nonce_secret_len=nsl. Set alg=none to disable PRNG.\n" +#ifdef HAVE_EVP_CIPHER_CTX_SET_KEY_LENGTH + "--keysize n : Size of cipher key in bits (optional).\n" + " If unspecified, defaults to cipher-specific default.\n" +#endif + "--engine [name] : Enable OpenSSL hardware crypto engine functionality.\n" + "--no-replay : Disable replay protection.\n" + "--mute-replay-warnings : Silence the output of replay warnings to log file.\n" + "--replay-window n [t] : Use a replay protection sliding window of size n\n" + " and a time window of t seconds.\n" + " Default n=%d t=%d\n" + "--no-iv : Disable cipher IV -- only allowed with CBC mode ciphers.\n" + "--replay-persist file : Persist replay-protection state across sessions\n" + " using file.\n" + "--test-crypto : Run a self-test of crypto features enabled.\n" + " For debugging only.\n" +#ifdef USE_SSL + "\n" + "TLS Key Negotiation Options:\n" + "(These options are meaningful only for TLS-mode)\n" + "--tls-server : Enable TLS and assume server role during TLS handshake.\n" + "--tls-client : Enable TLS and assume client role during TLS handshake.\n" + "--key-method m : Data channel key exchange method. m should be a method\n" + " number, such as 1 (default), 2, etc.\n" + "--ca file : Certificate authority file in .pem format containing\n" + " root certificate.\n" + "--capath dir : A directory of trusted certificates (CAs" +#if OPENSSL_VERSION_NUMBER >= 0x00907000L + " and CRLs).\n" +#else + ").\n" + " WARNING: no support of CRL available with this version.\n" +#endif + "--dh file : File containing Diffie Hellman parameters\n" + " in .pem format (for --tls-server only).\n" + " Use \"openssl dhparam -out dh1024.pem 1024\" to generate.\n" + "--cert file : Local certificate in .pem format -- must be signed\n" + " by a Certificate Authority in --ca file.\n" + "--key file : Local private key in .pem format.\n" + "--pkcs12 file : PKCS#12 file containing local private key, local certificate\n" + " and optionally the root CA certificate.\n" +#ifdef ENABLE_X509ALTUSERNAME + "--x509-username-field : Field used in x509 certificate to be username.\n" + " Default is CN.\n" +#endif +#ifdef WIN32 + "--cryptoapicert select-string : Load the certificate and private key from the\n" + " Windows Certificate System Store.\n" +#endif + "--tls-cipher l : A list l of allowable TLS ciphers separated by : (optional).\n" + " : Use --show-tls to see a list of supported TLS ciphers.\n" + "--tls-timeout n : Packet retransmit timeout on TLS control channel\n" + " if no ACK from remote within n seconds (default=%d).\n" + "--reneg-bytes n : Renegotiate data chan. key after n bytes sent and recvd.\n" + "--reneg-pkts n : Renegotiate data chan. key after n packets sent and recvd.\n" + "--reneg-sec n : Renegotiate data chan. key after n seconds (default=%d).\n" + "--hand-window n : Data channel key exchange must finalize within n seconds\n" + " of handshake initiation by any peer (default=%d).\n" + "--tran-window n : Transition window -- old key can live this many seconds\n" + " after new key renegotiation begins (default=%d).\n" + "--single-session: Allow only one session (reset state on restart).\n" + "--tls-exit : Exit on TLS negotiation failure.\n" + "--tls-auth f [d]: Add an additional layer of authentication on top of the TLS\n" + " control channel to protect against DoS attacks.\n" + " f (required) is a shared-secret passphrase file.\n" + " The optional d parameter controls key directionality,\n" + " see --secret option for more info.\n" + "--askpass [file]: Get PEM password from controlling tty before we daemonize.\n" + "--auth-nocache : Don't cache --askpass or --auth-user-pass passwords.\n" + "--crl-verify crl: Check peer certificate against a CRL.\n" + "--tls-verify cmd: Execute shell command cmd to verify the X509 name of a\n" + " pending TLS connection that has otherwise passed all other\n" + " tests of certification. cmd should return 0 to allow\n" + " TLS handshake to proceed, or 1 to fail. (cmd is\n" + " executed as 'cmd certificate_depth X509_NAME_oneline')\n" + "--tls-export-cert [directory] : Get peer cert in PEM format and store it \n" + " in an openvpn temporary file in [directory]. Peer cert is \n" + " stored before tls-verify script execution and deleted after.\n" + "--tls-remote x509name: Accept connections only from a host with X509 name\n" + " x509name. The remote host must also pass all other tests\n" + " of verification.\n" + "--ns-cert-type t: Require that peer certificate was signed with an explicit\n" + " nsCertType designation t = 'client' | 'server'.\n" +#if OPENSSL_VERSION_NUMBER >= 0x00907000L + "--remote-cert-ku v ... : Require that the peer certificate was signed with\n" + " explicit key usage, you can specify more than one value.\n" + " value should be given in hex format.\n" + "--remote-cert-eku oid : Require that the peer certificate was signed with\n" + " explicit extended key usage. Extended key usage can be encoded\n" + " as an object identifier or OpenSSL string representation.\n" + "--remote-cert-tls t: Require that peer certificate was signed with explicit\n" + " key usage and extended key usage based on RFC3280 TLS rules.\n" + " t = 'client' | 'server'.\n" +#endif /* OPENSSL_VERSION_NUMBER */ +#endif /* USE_SSL */ +#ifdef ENABLE_PKCS11 + "\n" + "PKCS#11 Options:\n" + "--pkcs11-providers provider ... : PKCS#11 provider to load.\n" + "--pkcs11-protected-authentication [0|1] ... : Use PKCS#11 protected authentication\n" + " path. Set for each provider.\n" + "--pkcs11-private-mode hex ... : PKCS#11 private key mode mask.\n" + " 0 : Try to determind automatically (default).\n" + " 1 : Use Sign.\n" + " 2 : Use SignRecover.\n" + " 4 : Use Decrypt.\n" + " 8 : Use Unwrap.\n" + "--pkcs11-cert-private [0|1] ... : Set if login should be performed before\n" + " certificate can be accessed. Set for each provider.\n" + "--pkcs11-pin-cache seconds : Number of seconds to cache PIN. The default is -1\n" + " cache until token is removed.\n" + "--pkcs11-id-management : Acquire identity from management interface.\n" + "--pkcs11-id serialized-id 'id' : Identity to use, get using standalone --show-pkcs11-ids\n" +#endif /* ENABLE_PKCS11 */ + "\n" + "SSL Library information:\n" + "--show-ciphers : Show cipher algorithms to use with --cipher option.\n" + "--show-digests : Show message digest algorithms to use with --auth option.\n" + "--show-engines : Show hardware crypto accelerator engines (if available).\n" +#ifdef USE_SSL + "--show-tls : Show all TLS ciphers (TLS used only as a control channel).\n" +#endif +#ifdef WIN32 + "\n" + "Windows Specific:\n" + "--win-sys path|'env' : Pathname of Windows system directory, C:\\WINDOWS by default.\n" + " If specified as 'env', read the pathname from SystemRoot env var.\n" + "--ip-win32 method : When using --ifconfig on Windows, set TAP-Win32 adapter\n" + " IP address using method = manual, netsh, ipapi,\n" + " dynamic, or adaptive (default = adaptive).\n" + " Dynamic method allows two optional parameters:\n" + " offset: DHCP server address offset (> -256 and < 256).\n" + " If 0, use network address, if >0, take nth\n" + " address forward from network address, if <0,\n" + " take nth address backward from broadcast\n" + " address.\n" + " Default is 0.\n" + " lease-time: Lease time in seconds.\n" + " Default is one year.\n" + "--route-method : Which method to use for adding routes on Windows?\n" + " adaptive (default) -- Try ipapi then fall back to exe.\n" + " ipapi -- Use IP helper API.\n" + " exe -- Call the route.exe shell command.\n" + "--dhcp-option type [parm] : Set extended TAP-Win32 properties, must\n" + " be used with --ip-win32 dynamic. For options\n" + " which allow multiple addresses,\n" + " --dhcp-option must be repeated.\n" + " DOMAIN name : Set DNS suffix\n" + " DNS addr : Set domain name server address(es)\n" + " NTP : Set NTP server address(es)\n" + " NBDD : Set NBDD server address(es)\n" + " WINS addr : Set WINS server address(es)\n" + " NBT type : Set NetBIOS over TCP/IP Node type\n" + " 1: B, 2: P, 4: M, 8: H\n" + " NBS id : Set NetBIOS scope ID\n" + " DISABLE-NBT : Disable Netbios-over-TCP/IP.\n" + "--dhcp-renew : Ask Windows to renew the TAP adapter lease on startup.\n" + "--dhcp-pre-release : Ask Windows to release the previous TAP adapter lease on\n" +" startup.\n" + "--dhcp-release : Ask Windows to release the TAP adapter lease on shutdown.\n" + "--register-dns : Run net stop dnscache, net start dnscache, ipconfig /flushdns\n" + " and ipconfig /registerdns on connection initiation.\n" + "--tap-sleep n : Sleep for n seconds after TAP adapter open before\n" + " attempting to set adapter properties.\n" + "--pause-exit : When run from a console window, pause before exiting.\n" + "--service ex [0|1] : For use when " PACKAGE_NAME " is being instantiated by a\n" + " service, and should not be used directly by end-users.\n" + " ex is the name of an event object which, when\n" + " signaled, will cause " PACKAGE_NAME " to exit. A second\n" + " optional parameter controls the initial state of ex.\n" + "--show-net-up : Show " PACKAGE_NAME "'s view of routing table and net adapter list\n" + " after TAP adapter is up and routes have been added.\n" + "Windows Standalone Options:\n" + "\n" + "--show-adapters : Show all TAP-Win32 adapters.\n" + "--show-net : Show " PACKAGE_NAME "'s view of routing table and net adapter list.\n" + "--show-valid-subnets : Show valid subnets for --dev tun emulation.\n" + "--allow-nonadmin [TAP-adapter] : Allow " PACKAGE_NAME " running without admin privileges\n" + " to access TAP adapter.\n" +#endif + "\n" + "Generate a random key (only for non-TLS static key encryption mode):\n" + "--genkey : Generate a random key to be used as a shared secret,\n" + " for use with the --secret option.\n" + "--secret file : Write key to file.\n" +#endif /* USE_CRYPTO */ +#ifdef TUNSETPERSIST + "\n" + "Tun/tap config mode (available with linux 2.4+):\n" + "--mktun : Create a persistent tunnel.\n" + "--rmtun : Remove a persistent tunnel.\n" + "--dev tunX|tapX : tun/tap device\n" + "--dev-type dt : Device type. See tunnel options above for details.\n" + "--user user : User to set privilege to.\n" + "--group group : Group to set privilege to.\n" +#endif +#ifdef ENABLE_PKCS11 + "\n" + "PKCS#11 standalone options:\n" + "--show-pkcs11-ids provider [cert_private] : Show PKCS#11 available ids.\n" + " --verb option can be added *BEFORE* this.\n" +#endif /* ENABLE_PKCS11 */ + ; + +#endif /* !ENABLE_SMALL */ + +/* + * This is where the options defaults go. + * Any option not explicitly set here + * will be set to 0. + */ +void +init_options (struct options *o, const bool init_gc) +{ + CLEAR (*o); + if (init_gc) + { + gc_init (&o->gc); + o->gc_owned = true; + } + o->mode = MODE_POINT_TO_POINT; + o->topology = TOP_NET30; + o->ce.proto = PROTO_UDPv4; + o->ce.connect_retry_seconds = 5; + o->ce.connect_timeout = 10; + o->ce.connect_retry_max = 0; + o->ce.local_port = o->ce.remote_port = OPENVPN_PORT; + o->verbosity = 1; + o->status_file_update_freq = 60; + o->status_file_version = 1; + o->ce.bind_local = true; + o->tun_mtu = TUN_MTU_DEFAULT; + o->link_mtu = LINK_MTU_DEFAULT; + o->mtu_discover_type = -1; + o->mssfix = MSSFIX_DEFAULT; + o->route_delay_window = 30; + o->max_routes = MAX_ROUTES_DEFAULT; + o->resolve_retry_seconds = RESOLV_RETRY_INFINITE; + o->proto_force = -1; +#ifdef ENABLE_OCC + o->occ = true; +#endif +#ifdef ENABLE_MANAGEMENT + o->management_log_history_cache = 250; + o->management_echo_buffer_size = 100; + o->management_state_buffer_size = 100; +#endif +#ifdef TUNSETPERSIST + o->persist_mode = 1; +#endif +#ifndef WIN32 + o->rcvbuf = 65536; + o->sndbuf = 65536; +#endif +#ifdef TARGET_LINUX + o->tuntap_options.txqueuelen = 100; +#endif +#ifdef WIN32 +#if 0 + o->tuntap_options.ip_win32_type = IPW32_SET_ADAPTIVE; +#else + o->tuntap_options.ip_win32_type = IPW32_SET_DHCP_MASQ; +#endif + o->tuntap_options.dhcp_lease_time = 31536000; /* one year */ + o->tuntap_options.dhcp_masq_offset = 0; /* use network address as internal DHCP server address */ + o->route_method = ROUTE_METHOD_ADAPTIVE; +#endif +#if P2MP_SERVER + o->real_hash_size = 256; + o->virtual_hash_size = 256; + o->n_bcast_buf = 256; + o->tcp_queue_limit = 64; + o->max_clients = 1024; + o->max_routes_per_client = 256; + o->ifconfig_pool_persist_refresh_freq = 600; +#endif +#if P2MP + o->scheduled_exit_interval = 5; + o->server_poll_timeout = 0; +#endif +#ifdef USE_CRYPTO + o->ciphername = "BF-CBC"; + o->ciphername_defined = true; + o->authname = "SHA1"; + o->authname_defined = true; + o->prng_hash = "SHA1"; + o->prng_nonce_secret_len = 16; + o->replay = true; + o->replay_window = DEFAULT_SEQ_BACKTRACK; + o->replay_time = DEFAULT_TIME_BACKTRACK; + o->use_iv = true; + o->key_direction = KEY_DIRECTION_BIDIRECTIONAL; +#ifdef USE_SSL + o->key_method = 2; + o->tls_timeout = 2; + o->renegotiate_seconds = 3600; + o->handshake_window = 60; + o->transition_window = 3600; +#ifdef ENABLE_X509ALTUSERNAME + o->x509_username_field = X509_USERNAME_FIELD_DEFAULT; +#endif +#endif /* USE_SSL */ +#endif /* USE_CRYPTO */ +#ifdef ENABLE_PKCS11 + o->pkcs11_pin_cache_period = -1; +#endif /* ENABLE_PKCS11 */ + + /* Set default --tmp-dir */ +#ifdef WIN32 + /* On Windows, find temp dir via enviroment variables */ + o->tmp_dir = win_get_tempdir(); +#else + /* Non-windows platforms use $TMPDIR, and if not set, default to '/tmp' */ + o->tmp_dir = getenv("TMPDIR"); + if( !o->tmp_dir ) { + o->tmp_dir = "/tmp"; + } +#endif /* WIN32 */ +} + +void +uninit_options (struct options *o) +{ + if (o->gc_owned) + { + gc_free (&o->gc); + } +} + +#ifdef ENABLE_DEBUG + +#define SHOW_PARM(name, value, format) msg(D_SHOW_PARMS, " " #name " = " format, (value)) +#define SHOW_STR(var) SHOW_PARM(var, (o->var ? o->var : "[UNDEF]"), "'%s'") +#define SHOW_INT(var) SHOW_PARM(var, o->var, "%d") +#define SHOW_UINT(var) SHOW_PARM(var, o->var, "%u") +#define SHOW_UNSIGNED(var) SHOW_PARM(var, o->var, "0x%08x") +#define SHOW_BOOL(var) SHOW_PARM(var, (o->var ? "ENABLED" : "DISABLED"), "%s"); + +#endif + +void +setenv_connection_entry (struct env_set *es, + const struct connection_entry *e, + const int i) +{ + setenv_str_i (es, "proto", proto2ascii (e->proto, false), i); + setenv_str_i (es, "local", e->local, i); + setenv_int_i (es, "local_port", e->local_port, i); + setenv_str_i (es, "remote", e->remote, i); + setenv_int_i (es, "remote_port", e->remote_port, i); + +#ifdef ENABLE_HTTP_PROXY + if (e->http_proxy_options) + { + setenv_str_i (es, "http_proxy_server", e->http_proxy_options->server, i); + setenv_int_i (es, "http_proxy_port", e->http_proxy_options->port, i); + } +#endif +#ifdef ENABLE_SOCKS + if (e->socks_proxy_server) + { + setenv_str_i (es, "socks_proxy_server", e->socks_proxy_server, i); + setenv_int_i (es, "socks_proxy_port", e->socks_proxy_port, i); + } +#endif +} + +void +setenv_settings (struct env_set *es, const struct options *o) +{ + setenv_str (es, "config", o->config); + setenv_int (es, "verb", o->verbosity); + setenv_int (es, "daemon", o->daemon); + setenv_int (es, "daemon_log_redirect", o->log); + setenv_unsigned (es, "daemon_start_time", time(NULL)); + setenv_int (es, "daemon_pid", openvpn_getpid()); + +#ifdef ENABLE_CONNECTION + if (o->connection_list) + { + int i; + for (i = 0; i < o->connection_list->len; ++i) + setenv_connection_entry (es, o->connection_list->array[i], i+1); + } + else +#endif + setenv_connection_entry (es, &o->ce, 1); +} + +static in_addr_t +get_ip_addr (const char *ip_string, int msglevel, bool *error) +{ + unsigned int flags = GETADDR_HOST_ORDER; + bool succeeded = false; + in_addr_t ret; + + if (msglevel & M_FATAL) + flags |= GETADDR_FATAL; + + ret = getaddr (flags, ip_string, 0, &succeeded, NULL); + if (!succeeded && error) + *error = true; + return ret; +} + +static char * +string_substitute (const char *src, int from, int to, struct gc_arena *gc) +{ + char *ret = (char *) gc_malloc (strlen (src) + 1, true, gc); + char *dest = ret; + char c; + + do + { + c = *src++; + if (c == from) + c = to; + *dest++ = c; + } + while (c); + return ret; +} + +bool +is_persist_option (const struct options *o) +{ + return o->persist_tun + || o->persist_key + || o->persist_local_ip + || o->persist_remote_ip + ; +} + +bool +is_stateful_restart (const struct options *o) +{ + return is_persist_option (o) || connection_list_defined (o); +} + +#ifdef WIN32 + +#ifdef ENABLE_DEBUG + +static void +show_dhcp_option_addrs (const char *name, const in_addr_t *array, int len) +{ + struct gc_arena gc = gc_new (); + int i; + for (i = 0; i < len; ++i) + { + msg (D_SHOW_PARMS, " %s[%d] = %s", + name, + i, + print_in_addr_t (array[i], 0, &gc)); + } + gc_free (&gc); +} + +static void +show_tuntap_options (const struct tuntap_options *o) +{ + SHOW_BOOL (ip_win32_defined); + SHOW_INT (ip_win32_type); + SHOW_INT (dhcp_masq_offset); + SHOW_INT (dhcp_lease_time); + SHOW_INT (tap_sleep); + SHOW_BOOL (dhcp_options); + SHOW_BOOL (dhcp_renew); + SHOW_BOOL (dhcp_pre_release); + SHOW_BOOL (dhcp_release); + SHOW_STR (domain); + SHOW_STR (netbios_scope); + SHOW_INT (netbios_node_type); + SHOW_BOOL (disable_nbt); + + show_dhcp_option_addrs ("DNS", o->dns, o->dns_len); + show_dhcp_option_addrs ("WINS", o->wins, o->wins_len); + show_dhcp_option_addrs ("NTP", o->ntp, o->ntp_len); + show_dhcp_option_addrs ("NBDD", o->nbdd, o->nbdd_len); +} + +#endif + +static void +dhcp_option_address_parse (const char *name, const char *parm, in_addr_t *array, int *len, int msglevel) +{ + if (*len >= N_DHCP_ADDR) + { + msg (msglevel, "--dhcp-option %s: maximum of %d %s servers can be specified", + name, + N_DHCP_ADDR, + name); + } + else + { + if (ip_addr_dotted_quad_safe (parm)) /* FQDN -- IP address only */ + { + bool error = false; + const in_addr_t addr = get_ip_addr (parm, msglevel, &error); + if (!error) + array[(*len)++] = addr; + } + else + { + msg (msglevel, "dhcp-option parameter %s '%s' must be an IP address", name, parm); + } + } +} + +#endif + +#if P2MP + +#ifdef ENABLE_DEBUG + +static void +show_p2mp_parms (const struct options *o) +{ + struct gc_arena gc = gc_new (); + +#if P2MP_SERVER + msg (D_SHOW_PARMS, " server_network = %s", print_in_addr_t (o->server_network, 0, &gc)); + msg (D_SHOW_PARMS, " server_netmask = %s", print_in_addr_t (o->server_netmask, 0, &gc)); + msg (D_SHOW_PARMS, " server_bridge_ip = %s", print_in_addr_t (o->server_bridge_ip, 0, &gc)); + msg (D_SHOW_PARMS, " server_bridge_netmask = %s", print_in_addr_t (o->server_bridge_netmask, 0, &gc)); + msg (D_SHOW_PARMS, " server_bridge_pool_start = %s", print_in_addr_t (o->server_bridge_pool_start, 0, &gc)); + msg (D_SHOW_PARMS, " server_bridge_pool_end = %s", print_in_addr_t (o->server_bridge_pool_end, 0, &gc)); + if (o->push_list.head) + { + const struct push_entry *e = o->push_list.head; + while (e) + { + if (e->enable) + msg (D_SHOW_PARMS, " push_entry = '%s'", e->option); + e = e->next; + } + } + SHOW_BOOL (ifconfig_pool_defined); + msg (D_SHOW_PARMS, " ifconfig_pool_start = %s", print_in_addr_t (o->ifconfig_pool_start, 0, &gc)); + msg (D_SHOW_PARMS, " ifconfig_pool_end = %s", print_in_addr_t (o->ifconfig_pool_end, 0, &gc)); + msg (D_SHOW_PARMS, " ifconfig_pool_netmask = %s", print_in_addr_t (o->ifconfig_pool_netmask, 0, &gc)); + SHOW_STR (ifconfig_pool_persist_filename); + SHOW_INT (ifconfig_pool_persist_refresh_freq); + SHOW_INT (n_bcast_buf); + SHOW_INT (tcp_queue_limit); + SHOW_INT (real_hash_size); + SHOW_INT (virtual_hash_size); + SHOW_STR (client_connect_script); + SHOW_STR (learn_address_script); + SHOW_STR (client_disconnect_script); + SHOW_STR (client_config_dir); + SHOW_BOOL (ccd_exclusive); + SHOW_STR (tmp_dir); + SHOW_BOOL (push_ifconfig_defined); + msg (D_SHOW_PARMS, " push_ifconfig_local = %s", print_in_addr_t (o->push_ifconfig_local, 0, &gc)); + msg (D_SHOW_PARMS, " push_ifconfig_remote_netmask = %s", print_in_addr_t (o->push_ifconfig_remote_netmask, 0, &gc)); + SHOW_BOOL (enable_c2c); + SHOW_BOOL (duplicate_cn); + SHOW_INT (cf_max); + SHOW_INT (cf_per); + SHOW_INT (max_clients); + SHOW_INT (max_routes_per_client); + SHOW_STR (auth_user_pass_verify_script); + SHOW_BOOL (auth_user_pass_verify_script_via_file); + SHOW_INT (ssl_flags); +#if PORT_SHARE + SHOW_STR (port_share_host); + SHOW_INT (port_share_port); +#endif +#endif /* P2MP_SERVER */ + + SHOW_BOOL (client); + SHOW_BOOL (pull); + SHOW_STR (auth_user_pass_file); + + gc_free (&gc); +} + +#endif /* ENABLE_DEBUG */ + +#if P2MP_SERVER + +static void +option_iroute (struct options *o, + const char *network_str, + const char *netmask_str, + int msglevel) +{ + struct iroute *ir; + + ALLOC_OBJ_GC (ir, struct iroute, &o->gc); + ir->network = getaddr (GETADDR_HOST_ORDER, network_str, 0, NULL, NULL); + ir->netbits = -1; + + if (netmask_str) + { + const in_addr_t netmask = getaddr (GETADDR_HOST_ORDER, netmask_str, 0, NULL, NULL); + if (!netmask_to_netbits (ir->network, netmask, &ir->netbits)) + { + msg (msglevel, "in --iroute %s %s : Bad network/subnet specification", + network_str, + netmask_str); + return; + } + } + + ir->next = o->iroutes; + o->iroutes = ir; +} + +#endif /* P2MP_SERVER */ +#endif /* P2MP */ + +#if defined(ENABLE_HTTP_PROXY) && defined(ENABLE_DEBUG) +static void +show_http_proxy_options (const struct http_proxy_options *o) +{ + msg (D_SHOW_PARMS, "BEGIN http_proxy"); + SHOW_STR (server); + SHOW_INT (port); + SHOW_STR (auth_method_string); + SHOW_STR (auth_file); + SHOW_BOOL (retry); + SHOW_INT (timeout); + SHOW_STR (http_version); + SHOW_STR (user_agent); + msg (D_SHOW_PARMS, "END http_proxy"); +} +#endif + +void +options_detach (struct options *o) +{ + gc_detach (&o->gc); + o->routes = NULL; +#if P2MP_SERVER + clone_push_list(o); +#endif +} + +void +rol_check_alloc (struct options *options) +{ + if (!options->routes) + options->routes = new_route_option_list (options->max_routes, &options->gc); +} + +#ifdef ENABLE_DEBUG +static void +show_connection_entry (const struct connection_entry *o) +{ + msg (D_SHOW_PARMS, " proto = %s", proto2ascii (o->proto, false)); + SHOW_STR (local); + SHOW_INT (local_port); + SHOW_STR (remote); + SHOW_INT (remote_port); + SHOW_BOOL (remote_float); + SHOW_BOOL (bind_defined); + SHOW_BOOL (bind_local); + SHOW_INT (connect_retry_seconds); + SHOW_INT (connect_timeout); + SHOW_INT (connect_retry_max); + +#ifdef ENABLE_HTTP_PROXY + if (o->http_proxy_options) + show_http_proxy_options (o->http_proxy_options); +#endif +#ifdef ENABLE_SOCKS + SHOW_STR (socks_proxy_server); + SHOW_INT (socks_proxy_port); + SHOW_BOOL (socks_proxy_retry); +#endif +} + +static void +show_connection_entries (const struct options *o) +{ + msg (D_SHOW_PARMS, "Connection profiles [default]:"); + show_connection_entry (&o->ce); +#ifdef ENABLE_CONNECTION + if (o->connection_list) + { + const struct connection_list *l = o->connection_list; + int i; + for (i = 0; i < l->len; ++i) + { + msg (D_SHOW_PARMS, "Connection profiles [%d]:", i); + show_connection_entry (l->array[i]); + } + } +#endif + msg (D_SHOW_PARMS, "Connection profiles END"); +} + +#endif + +void +show_settings (const struct options *o) +{ +#ifdef ENABLE_DEBUG + msg (D_SHOW_PARMS, "Current Parameter Settings:"); + + SHOW_STR (config); + + SHOW_INT (mode); + +#ifdef TUNSETPERSIST + SHOW_BOOL (persist_config); + SHOW_INT (persist_mode); +#endif + +#ifdef USE_CRYPTO + SHOW_BOOL (show_ciphers); + SHOW_BOOL (show_digests); + SHOW_BOOL (show_engines); + SHOW_BOOL (genkey); +#ifdef USE_SSL + SHOW_STR (key_pass_file); + SHOW_BOOL (show_tls_ciphers); +#endif +#endif + + show_connection_entries (o); + + SHOW_BOOL (remote_random); + + SHOW_STR (ipchange); + SHOW_STR (dev); + SHOW_STR (dev_type); + SHOW_STR (dev_node); + SHOW_STR (lladdr); + SHOW_INT (topology); + SHOW_BOOL (tun_ipv6); + SHOW_STR (ifconfig_local); + SHOW_STR (ifconfig_remote_netmask); + SHOW_BOOL (ifconfig_noexec); + SHOW_BOOL (ifconfig_nowarn); + +#ifdef HAVE_GETTIMEOFDAY + SHOW_INT (shaper); +#endif + SHOW_INT (tun_mtu); + SHOW_BOOL (tun_mtu_defined); + SHOW_INT (link_mtu); + SHOW_BOOL (link_mtu_defined); + SHOW_INT (tun_mtu_extra); + SHOW_BOOL (tun_mtu_extra_defined); + +#ifdef ENABLE_FRAGMENT + SHOW_INT (fragment); +#endif + + SHOW_INT (mtu_discover_type); + +#ifdef ENABLE_OCC + SHOW_INT (mtu_test); +#endif + + SHOW_BOOL (mlock); + + SHOW_INT (keepalive_ping); + SHOW_INT (keepalive_timeout); + SHOW_INT (inactivity_timeout); + SHOW_INT (ping_send_timeout); + SHOW_INT (ping_rec_timeout); + SHOW_INT (ping_rec_timeout_action); + SHOW_BOOL (ping_timer_remote); + SHOW_INT (remap_sigusr1); +#ifdef ENABLE_OCC + SHOW_INT (explicit_exit_notification); +#endif + SHOW_BOOL (persist_tun); + SHOW_BOOL (persist_local_ip); + SHOW_BOOL (persist_remote_ip); + SHOW_BOOL (persist_key); + + SHOW_INT (mssfix); + +#if PASSTOS_CAPABILITY + SHOW_BOOL (passtos); +#endif + + SHOW_INT (resolve_retry_seconds); + + SHOW_STR (username); + SHOW_STR (groupname); + SHOW_STR (chroot_dir); + SHOW_STR (cd_dir); +#ifdef HAVE_SETCON + SHOW_STR (selinux_context); +#endif + SHOW_STR (writepid); + SHOW_STR (up_script); + SHOW_STR (down_script); + SHOW_BOOL (down_pre); + SHOW_BOOL (up_restart); + SHOW_BOOL (up_delay); + SHOW_BOOL (daemon); + SHOW_INT (inetd); + SHOW_BOOL (log); + SHOW_BOOL (suppress_timestamps); + SHOW_INT (nice); + SHOW_INT (verbosity); + SHOW_INT (mute); +#ifdef ENABLE_DEBUG + SHOW_INT (gremlin); +#endif + SHOW_STR (status_file); + SHOW_INT (status_file_version); + SHOW_INT (status_file_update_freq); + +#ifdef ENABLE_OCC + SHOW_BOOL (occ); +#endif + SHOW_INT (rcvbuf); + SHOW_INT (sndbuf); + SHOW_INT (sockflags); + + SHOW_BOOL (fast_io); + +#ifdef USE_LZO + SHOW_INT (lzo); +#endif + + SHOW_STR (route_script); + SHOW_STR (route_default_gateway); + SHOW_INT (route_default_metric); + SHOW_BOOL (route_noexec); + SHOW_INT (route_delay); + SHOW_INT (route_delay_window); + SHOW_BOOL (route_delay_defined); + SHOW_BOOL (route_nopull); + SHOW_BOOL (route_gateway_via_dhcp); + SHOW_INT (max_routes); + SHOW_BOOL (allow_pull_fqdn); + if (o->routes) + print_route_options (o->routes, D_SHOW_PARMS); + +#ifdef ENABLE_MANAGEMENT + SHOW_STR (management_addr); + SHOW_INT (management_port); + SHOW_STR (management_user_pass); + SHOW_INT (management_log_history_cache); + SHOW_INT (management_echo_buffer_size); + SHOW_STR (management_write_peer_info_file); + SHOW_STR (management_client_user); + SHOW_STR (management_client_group); + SHOW_INT (management_flags); +#endif +#ifdef ENABLE_PLUGIN + if (o->plugin_list) + plugin_option_list_print (o->plugin_list, D_SHOW_PARMS); +#endif + +#ifdef USE_CRYPTO + SHOW_STR (shared_secret_file); + SHOW_INT (key_direction); + SHOW_BOOL (ciphername_defined); + SHOW_STR (ciphername); + SHOW_BOOL (authname_defined); + SHOW_STR (authname); + SHOW_STR (prng_hash); + SHOW_INT (prng_nonce_secret_len); + SHOW_INT (keysize); + SHOW_BOOL (engine); + SHOW_BOOL (replay); + SHOW_BOOL (mute_replay_warnings); + SHOW_INT (replay_window); + SHOW_INT (replay_time); + SHOW_STR (packet_id_file); + SHOW_BOOL (use_iv); + SHOW_BOOL (test_crypto); + +#ifdef USE_SSL + SHOW_BOOL (tls_server); + SHOW_BOOL (tls_client); + SHOW_INT (key_method); + SHOW_STR (ca_file); + SHOW_STR (ca_path); + SHOW_STR (dh_file); + SHOW_STR (cert_file); + SHOW_STR (priv_key_file); + SHOW_STR (pkcs12_file); +#ifdef WIN32 + SHOW_STR (cryptoapi_cert); +#endif + SHOW_STR (cipher_list); + SHOW_STR (tls_verify); + SHOW_STR (tls_export_cert); + SHOW_STR (tls_remote); + SHOW_STR (crl_file); + SHOW_INT (ns_cert_type); + { + int i; + for (i=0;ipkcs11_providers[i] != NULL;i++) + SHOW_PARM (pkcs11_providers, o->pkcs11_providers[i], "%s"); + } + { + int i; + for (i=0;ipkcs11_protected_authentication[i] ? "ENABLED" : "DISABLED", "%s"); + } + { + int i; + for (i=0;ipkcs11_private_mode[i], "%08x"); + } + { + int i; + for (i=0;ipkcs11_cert_private[i] ? "ENABLED" : "DISABLED", "%s"); + } + SHOW_INT (pkcs11_pin_cache_period); + SHOW_STR (pkcs11_id); + SHOW_BOOL (pkcs11_id_management); +#endif /* ENABLE_PKCS11 */ + +#if P2MP + show_p2mp_parms (o); +#endif + +#ifdef WIN32 + SHOW_BOOL (show_net_up); + SHOW_INT (route_method); + show_tuntap_options (&o->tuntap_options); +#endif +#endif +} + +#undef SHOW_PARM +#undef SHOW_STR +#undef SHOW_INT +#undef SHOW_BOOL + +#ifdef ENABLE_HTTP_PROXY + +struct http_proxy_options * +init_http_options_if_undefined (struct options *o) +{ + if (!o->ce.http_proxy_options) + { + ALLOC_OBJ_CLEAR_GC (o->ce.http_proxy_options, struct http_proxy_options, &o->gc); + /* http proxy defaults */ + o->ce.http_proxy_options->timeout = 5; + o->ce.http_proxy_options->http_version = "1.0"; + } + return o->ce.http_proxy_options; +} + +#endif + +#if HTTP_PROXY_FALLBACK + +static struct http_proxy_options * +parse_http_proxy_override (const char *server, + const char *port, + const char *flags, + const int msglevel, + struct gc_arena *gc) +{ + if (server && port) + { + struct http_proxy_options *ho; + const int int_port = atoi(port); + + if (!legal_ipv4_port (int_port)) + { + msg (msglevel, "Bad http-proxy port number: %s", port); + return NULL; + } + + ALLOC_OBJ_CLEAR_GC (ho, struct http_proxy_options, gc); + ho->server = string_alloc(server, gc); + ho->port = int_port; + ho->retry = true; + ho->timeout = 5; + if (flags && !strcmp(flags, "nct")) + ho->auth_retry = PAR_NCT; + else + ho->auth_retry = PAR_ALL; + ho->http_version = "1.0"; + ho->user_agent = "OpenVPN-Autoproxy/1.0"; + return ho; + } + else + return NULL; +} + +struct http_proxy_options * +parse_http_proxy_fallback (struct context *c, + const char *server, + const char *port, + const char *flags, + const int msglevel) +{ + struct gc_arena gc = gc_new (); + struct http_proxy_options *ret = NULL; + struct http_proxy_options *hp = parse_http_proxy_override(server, port, flags, msglevel, &gc); + if (hp) + { + struct hpo_store *hpos = c->options.hpo_store; + if (!hpos) + { + ALLOC_OBJ_CLEAR_GC (hpos, struct hpo_store, &c->options.gc); + c->options.hpo_store = hpos; + } + hpos->hpo = *hp; + hpos->hpo.server = hpos->server; + strncpynt(hpos->server, hp->server, sizeof(hpos->server)); + ret = &hpos->hpo; + } + gc_free (&gc); + return ret; +} + +static void +http_proxy_warn(const char *name) +{ + msg (M_WARN, "Note: option %s ignored because no TCP-based connection profiles are defined", name); +} + +void +options_postprocess_http_proxy_fallback (struct options *o) +{ + struct connection_list *l = o->connection_list; + if (l) + { + int i; + for (i = 0; i < l->len; ++i) + { + struct connection_entry *ce = l->array[i]; + if (ce->proto == PROTO_TCPv4_CLIENT || ce->proto == PROTO_TCPv4) + { + if (l->len < CONNECTION_LIST_SIZE) + { + struct connection_entry *newce; + ALLOC_OBJ_GC (newce, struct connection_entry, &o->gc); + *newce = *ce; + newce->flags |= CE_HTTP_PROXY_FALLBACK; + newce->http_proxy_options = NULL; + newce->ce_http_proxy_fallback_timestamp = 0; + l->array[l->len++] = newce; + } + return; + } + } + } + http_proxy_warn("http-proxy-fallback"); +} + +void +options_postprocess_http_proxy_override (struct options *o) +{ + const struct connection_list *l = o->connection_list; + if (l) + { + int i; + bool succeed = false; + for (i = 0; i < l->len; ++i) + { + struct connection_entry *ce = l->array[i]; + if (ce->proto == PROTO_TCPv4_CLIENT || ce->proto == PROTO_TCPv4) + { + ce->http_proxy_options = o->http_proxy_override; + succeed = true; + } + } + if (succeed) + { + for (i = 0; i < l->len; ++i) + { + struct connection_entry *ce = l->array[i]; + if (ce->proto == PROTO_UDPv4) + { + ce->flags |= CE_DISABLED; + } + } + } + else + { + http_proxy_warn("http-proxy-override"); + } + } +} + +#endif + +#if ENABLE_CONNECTION + +static struct connection_list * +alloc_connection_list_if_undef (struct options *options) +{ + if (!options->connection_list) + ALLOC_OBJ_CLEAR_GC (options->connection_list, struct connection_list, &options->gc); + return options->connection_list; +} + +static struct connection_entry * +alloc_connection_entry (struct options *options, const int msglevel) +{ + struct connection_list *l = alloc_connection_list_if_undef (options); + struct connection_entry *e; + + if (l->len >= CONNECTION_LIST_SIZE) + { + msg (msglevel, "Maximum number of 'connection' options (%d) exceeded", CONNECTION_LIST_SIZE); + return NULL; + } + ALLOC_OBJ_GC (e, struct connection_entry, &options->gc); + l->array[l->len++] = e; + return e; +} + +static struct remote_list * +alloc_remote_list_if_undef (struct options *options) +{ + if (!options->remote_list) + ALLOC_OBJ_CLEAR_GC (options->remote_list, struct remote_list, &options->gc); + return options->remote_list; +} + +static struct remote_entry * +alloc_remote_entry (struct options *options, const int msglevel) +{ + struct remote_list *l = alloc_remote_list_if_undef (options); + struct remote_entry *e; + + if (l->len >= CONNECTION_LIST_SIZE) + { + msg (msglevel, "Maximum number of 'remote' options (%d) exceeded", CONNECTION_LIST_SIZE); + return NULL; + } + ALLOC_OBJ_GC (e, struct remote_entry, &options->gc); + l->array[l->len++] = e; + return e; +} + +#endif + +void +connection_entry_load_re (struct connection_entry *ce, const struct remote_entry *re) +{ + if (re->remote) + ce->remote = re->remote; + if (re->remote_port >= 0) + ce->remote_port = re->remote_port; + if (re->proto >= 0) + ce->proto = re->proto; +} + +static void +options_postprocess_verify_ce (const struct options *options, const struct connection_entry *ce) +{ + struct options defaults; + int dev = DEV_TYPE_UNDEF; + bool pull = false; + + init_options (&defaults, true); + +#ifdef USE_CRYPTO + if (options->test_crypto) + { + notnull (options->shared_secret_file, "key file (--secret)"); + } + else +#endif + notnull (options->dev, "TUN/TAP device (--dev)"); + + /* + * Get tun/tap/null device type + */ + dev = dev_type_enum (options->dev, options->dev_type); + + /* + * If "proto tcp" is specified, make sure we know whether it is + * tcp-client or tcp-server. + */ + if (ce->proto == PROTO_TCPv4) + msg (M_USAGE, "--proto tcp is ambiguous in this context. Please specify --proto tcp-server or --proto tcp-client"); + + /* + * Sanity check on daemon/inetd modes + */ + + if (options->daemon && options->inetd) + msg (M_USAGE, "only one of --daemon or --inetd may be specified"); + + if (options->inetd && (ce->local || ce->remote)) + msg (M_USAGE, "--local or --remote cannot be used with --inetd"); + + if (options->inetd && ce->proto == PROTO_TCPv4_CLIENT) + msg (M_USAGE, "--proto tcp-client cannot be used with --inetd"); + + if (options->inetd == INETD_NOWAIT && ce->proto != PROTO_TCPv4_SERVER) + msg (M_USAGE, "--inetd nowait can only be used with --proto tcp-server"); + + if (options->inetd == INETD_NOWAIT +#if defined(USE_CRYPTO) && defined(USE_SSL) + && !(options->tls_server || options->tls_client) +#endif + ) + msg (M_USAGE, "--inetd nowait can only be used in TLS mode"); + + if (options->inetd == INETD_NOWAIT && dev != DEV_TYPE_TAP) + msg (M_USAGE, "--inetd nowait only makes sense in --dev tap mode"); + + + if (options->lladdr && dev != DEV_TYPE_TAP) + msg (M_USAGE, "--lladdr can only be used in --dev tap mode"); + + /* + * Sanity check on TCP mode options + */ + + if (ce->connect_retry_defined && ce->proto != PROTO_TCPv4_CLIENT) + msg (M_USAGE, "--connect-retry doesn't make sense unless also used with --proto tcp-client"); + + if (ce->connect_timeout_defined && ce->proto != PROTO_TCPv4_CLIENT) + msg (M_USAGE, "--connect-timeout doesn't make sense unless also used with --proto tcp-client"); + + /* + * Sanity check on MTU parameters + */ + if (options->tun_mtu_defined && options->link_mtu_defined) + msg (M_USAGE, "only one of --tun-mtu or --link-mtu may be defined (note that --ifconfig implies --link-mtu %d)", LINK_MTU_DEFAULT); + +#ifdef ENABLE_OCC + if (ce->proto != PROTO_UDPv4 && options->mtu_test) + msg (M_USAGE, "--mtu-test only makes sense with --proto udp"); +#endif + + /* will we be pulling options from server? */ +#if P2MP + pull = options->pull; +#endif + + /* + * Sanity check on --local, --remote, and --ifconfig + */ + + if (string_defined_equal (ce->local, ce->remote) + && ce->local_port == ce->remote_port) + msg (M_USAGE, "--remote and --local addresses are the same"); + + if (string_defined_equal (ce->remote, options->ifconfig_local) + || string_defined_equal (ce->remote, options->ifconfig_remote_netmask)) + msg (M_USAGE, "--local and --remote addresses must be distinct from --ifconfig addresses"); + + if (string_defined_equal (ce->local, options->ifconfig_local) + || string_defined_equal (ce->local, options->ifconfig_remote_netmask)) + msg (M_USAGE, "--local addresses must be distinct from --ifconfig addresses"); + + if (string_defined_equal (options->ifconfig_local, options->ifconfig_remote_netmask)) + msg (M_USAGE, "local and remote/netmask --ifconfig addresses must be different"); + + if (ce->bind_defined && !ce->bind_local) + msg (M_USAGE, "--bind and --nobind can't be used together"); + + if (ce->local && !ce->bind_local) + msg (M_USAGE, "--local and --nobind don't make sense when used together"); + + if (ce->local_port_defined && !ce->bind_local) + msg (M_USAGE, "--lport and --nobind don't make sense when used together"); + + if (!ce->remote && !ce->bind_local) + msg (M_USAGE, "--nobind doesn't make sense unless used with --remote"); + + /* + * Check for consistency of management options + */ +#ifdef ENABLE_MANAGEMENT + if (!options->management_addr && + (options->management_flags + || options->management_write_peer_info_file + || options->management_log_history_cache != defaults.management_log_history_cache)) + msg (M_USAGE, "--management is not specified, however one or more options which modify the behavior of --management were specified"); + + if ((options->management_client_user || options->management_client_group) + && !(options->management_flags & MF_UNIX_SOCK)) + msg (M_USAGE, "--management-client-(user|group) can only be used on unix domain sockets"); +#endif + + /* + * Windows-specific options. + */ + +#ifdef WIN32 + if (dev == DEV_TYPE_TUN && !(pull || (options->ifconfig_local && options->ifconfig_remote_netmask))) + msg (M_USAGE, "On Windows, --ifconfig is required when --dev tun is used"); + + if ((options->tuntap_options.ip_win32_defined) + && !(pull || (options->ifconfig_local && options->ifconfig_remote_netmask))) + msg (M_USAGE, "On Windows, --ip-win32 doesn't make sense unless --ifconfig is also used"); + + if (options->tuntap_options.dhcp_options + && options->tuntap_options.ip_win32_type != IPW32_SET_DHCP_MASQ + && options->tuntap_options.ip_win32_type != IPW32_SET_ADAPTIVE) + msg (M_USAGE, "--dhcp-options requires --ip-win32 dynamic or adaptive"); +#endif + + /* + * Check that protocol options make sense. + */ + +#ifdef ENABLE_FRAGMENT + if (ce->proto != PROTO_UDPv4 && options->fragment) + msg (M_USAGE, "--fragment can only be used with --proto udp"); +#endif + +#ifdef ENABLE_OCC + if (ce->proto != PROTO_UDPv4 && options->explicit_exit_notification) + msg (M_USAGE, "--explicit-exit-notify can only be used with --proto udp"); +#endif + + if (!ce->remote && ce->proto == PROTO_TCPv4_CLIENT) + msg (M_USAGE, "--remote MUST be used in TCP Client mode"); + +#ifdef ENABLE_HTTP_PROXY + if ((ce->http_proxy_options || options->auto_proxy_info) && ce->proto != PROTO_TCPv4_CLIENT) + msg (M_USAGE, "--http-proxy or --auto-proxy MUST be used in TCP Client mode (i.e. --proto tcp-client)"); +#endif + +#if defined(ENABLE_HTTP_PROXY) && defined(ENABLE_SOCKS) + if (ce->http_proxy_options && ce->socks_proxy_server) + msg (M_USAGE, "--http-proxy can not be used together with --socks-proxy"); +#endif + +#ifdef ENABLE_SOCKS + if (ce->socks_proxy_server && ce->proto == PROTO_TCPv4_SERVER) + msg (M_USAGE, "--socks-proxy can not be used in TCP Server mode"); +#endif + + if (ce->proto == PROTO_TCPv4_SERVER && connection_list_defined (options)) + msg (M_USAGE, "TCP server mode allows at most one --remote address"); + +#if P2MP_SERVER + + /* + * Check consistency of --mode server options. + */ + if (options->mode == MODE_SERVER) + { + if (!(dev == DEV_TYPE_TUN || dev == DEV_TYPE_TAP)) + msg (M_USAGE, "--mode server only works with --dev tun or --dev tap"); + if (options->pull) + msg (M_USAGE, "--pull cannot be used with --mode server"); + if (!(ce->proto == PROTO_UDPv4 || ce->proto == PROTO_TCPv4_SERVER)) + msg (M_USAGE, "--mode server currently only supports --proto udp or --proto tcp-server"); +#if PORT_SHARE + if ((options->port_share_host || options->port_share_port) && ce->proto != PROTO_TCPv4_SERVER) + msg (M_USAGE, "--port-share only works in TCP server mode (--proto tcp-server)"); +#endif + if (!options->tls_server) + msg (M_USAGE, "--mode server requires --tls-server"); + if (ce->remote) + msg (M_USAGE, "--remote cannot be used with --mode server"); + if (!ce->bind_local) + msg (M_USAGE, "--nobind cannot be used with --mode server"); +#ifdef ENABLE_HTTP_PROXY + if (ce->http_proxy_options) + msg (M_USAGE, "--http-proxy cannot be used with --mode server"); +#endif +#ifdef ENABLE_SOCKS + if (ce->socks_proxy_server) + msg (M_USAGE, "--socks-proxy cannot be used with --mode server"); +#endif +#ifdef ENABLE_CONNECTION + if (options->connection_list) + msg (M_USAGE, " cannot be used with --mode server"); +#endif + if (options->tun_ipv6) + msg (M_USAGE, "--tun-ipv6 cannot be used with --mode server"); + if (options->shaper) + msg (M_USAGE, "--shaper cannot be used with --mode server"); + if (options->inetd) + msg (M_USAGE, "--inetd cannot be used with --mode server"); + if (options->ipchange) + msg (M_USAGE, "--ipchange cannot be used with --mode server (use --client-connect instead)"); + if (!(ce->proto == PROTO_UDPv4 || ce->proto == PROTO_TCPv4_SERVER)) + msg (M_USAGE, "--mode server currently only supports --proto udp or --proto tcp-server"); + if (ce->proto != PROTO_UDPv4 && (options->cf_max || options->cf_per)) + msg (M_USAGE, "--connect-freq only works with --mode server --proto udp. Try --max-clients instead."); + if (!(dev == DEV_TYPE_TAP || (dev == DEV_TYPE_TUN && options->topology == TOP_SUBNET)) && options->ifconfig_pool_netmask) + msg (M_USAGE, "The third parameter to --ifconfig-pool (netmask) is only valid in --dev tap mode"); +#ifdef ENABLE_OCC + if (options->explicit_exit_notification) + msg (M_USAGE, "--explicit-exit-notify cannot be used with --mode server"); +#endif + if (options->routes && (options->routes->flags & RG_ENABLE)) + msg (M_USAGE, "--redirect-gateway cannot be used with --mode server (however --push \"redirect-gateway\" is fine)"); + if (options->route_delay_defined) + msg (M_USAGE, "--route-delay cannot be used with --mode server"); + if (options->up_delay) + msg (M_USAGE, "--up-delay cannot be used with --mode server"); + if (!options->ifconfig_pool_defined && options->ifconfig_pool_persist_filename) + msg (M_USAGE, "--ifconfig-pool-persist must be used with --ifconfig-pool"); + if (options->auth_user_pass_file) + msg (M_USAGE, "--auth-user-pass cannot be used with --mode server (it should be used on the client side only)"); + if (options->ccd_exclusive && !options->client_config_dir) + msg (M_USAGE, "--ccd-exclusive must be used with --client-config-dir"); + if (options->key_method != 2) + msg (M_USAGE, "--mode server requires --key-method 2"); + + { + const bool ccnr = (options->auth_user_pass_verify_script + || PLUGIN_OPTION_LIST (options) + || MAN_CLIENT_AUTH_ENABLED (options)); + const char *postfix = "must be used with --management-client-auth, an --auth-user-pass-verify script, or plugin"; + if ((options->ssl_flags & SSLF_CLIENT_CERT_NOT_REQUIRED) && !ccnr) + msg (M_USAGE, "--client-cert-not-required %s", postfix); + if ((options->ssl_flags & SSLF_USERNAME_AS_COMMON_NAME) && !ccnr) + msg (M_USAGE, "--username-as-common-name %s", postfix); + if ((options->ssl_flags & SSLF_AUTH_USER_PASS_OPTIONAL) && !ccnr) + msg (M_USAGE, "--auth-user-pass-optional %s", postfix); + } + + if ((options->ssl_flags & SSLF_NO_NAME_REMAPPING) && script_method == SM_SYSTEM) + msg (M_USAGE, "--script-security method='system' cannot be combined with --no-name-remapping"); + } + else + { + /* + * When not in server mode, err if parameters are + * specified which require --mode server. + */ + if (options->ifconfig_pool_defined || options->ifconfig_pool_persist_filename) + msg (M_USAGE, "--ifconfig-pool/--ifconfig-pool-persist requires --mode server"); + if (options->real_hash_size != defaults.real_hash_size + || options->virtual_hash_size != defaults.virtual_hash_size) + msg (M_USAGE, "--hash-size requires --mode server"); + if (options->learn_address_script) + msg (M_USAGE, "--learn-address requires --mode server"); + if (options->client_connect_script) + msg (M_USAGE, "--client-connect requires --mode server"); + if (options->client_disconnect_script) + msg (M_USAGE, "--client-disconnect requires --mode server"); + if (options->client_config_dir || options->ccd_exclusive) + msg (M_USAGE, "--client-config-dir/--ccd-exclusive requires --mode server"); + if (options->enable_c2c) + msg (M_USAGE, "--client-to-client requires --mode server"); + if (options->duplicate_cn) + msg (M_USAGE, "--duplicate-cn requires --mode server"); + if (options->cf_max || options->cf_per) + msg (M_USAGE, "--connect-freq requires --mode server"); + if (options->ssl_flags & SSLF_CLIENT_CERT_NOT_REQUIRED) + msg (M_USAGE, "--client-cert-not-required requires --mode server"); + if (options->ssl_flags & SSLF_USERNAME_AS_COMMON_NAME) + msg (M_USAGE, "--username-as-common-name requires --mode server"); + if (options->ssl_flags & SSLF_AUTH_USER_PASS_OPTIONAL) + msg (M_USAGE, "--auth-user-pass-optional requires --mode server"); + if (options->ssl_flags & SSLF_NO_NAME_REMAPPING) + msg (M_USAGE, "--no-name-remapping requires --mode server"); + if (options->ssl_flags & SSLF_OPT_VERIFY) + msg (M_USAGE, "--opt-verify requires --mode server"); + if (options->server_flags & SF_TCP_NODELAY_HELPER) + msg (M_USAGE, "--tcp-nodelay requires --mode server"); + if (options->auth_user_pass_verify_script) + msg (M_USAGE, "--auth-user-pass-verify requires --mode server"); +#if PORT_SHARE + if (options->port_share_host || options->port_share_port) + msg (M_USAGE, "--port-share requires TCP server mode (--mode server --proto tcp-server)"); +#endif + + } +#endif /* P2MP_SERVER */ + +#ifdef USE_CRYPTO + + /* + * Check consistency of replay options + */ + if ((ce->proto != PROTO_UDPv4) + && (options->replay_window != defaults.replay_window + || options->replay_time != defaults.replay_time)) + msg (M_USAGE, "--replay-window only makes sense with --proto udp"); + + if (!options->replay + && (options->replay_window != defaults.replay_window + || options->replay_time != defaults.replay_time)) + msg (M_USAGE, "--replay-window doesn't make sense when replay protection is disabled with --no-replay"); + + /* + * SSL/TLS mode sanity checks. + */ + +#ifdef USE_SSL + if (options->tls_server + options->tls_client + + (options->shared_secret_file != NULL) > 1) + msg (M_USAGE, "specify only one of --tls-server, --tls-client, or --secret"); + + if (options->tls_server) + { + notnull (options->dh_file, "DH file (--dh)"); + } + if (options->tls_server || options->tls_client) + { +#ifdef ENABLE_PKCS11 + if (options->pkcs11_providers[0]) + { + notnull (options->ca_file, "CA file (--ca)"); + + if (options->pkcs11_id_management && options->pkcs11_id != NULL) + msg(M_USAGE, "Parameter --pkcs11-id cannot be used when --pkcs11-id-management is also specified."); + if (!options->pkcs11_id_management && options->pkcs11_id == NULL) + msg(M_USAGE, "Parameter --pkcs11-id or --pkcs11-id-management should be specified."); + if (options->cert_file) + msg(M_USAGE, "Parameter --cert cannot be used when --pkcs11-provider is also specified."); + if (options->priv_key_file) + msg(M_USAGE, "Parameter --key cannot be used when --pkcs11-provider is also specified."); + if (options->pkcs12_file) + msg(M_USAGE, "Parameter --pkcs12 cannot be used when --pkcs11-provider is also specified."); +#ifdef WIN32 + if (options->cryptoapi_cert) + msg(M_USAGE, "Parameter --cryptoapicert cannot be used when --pkcs11-provider is also specified."); +#endif + } + else +#endif +#ifdef WIN32 + if (options->cryptoapi_cert) + { + if ((!(options->ca_file)) && (!(options->ca_path))) + msg(M_USAGE, "You must define CA file (--ca) or CA path (--capath)"); + if (options->cert_file) + msg(M_USAGE, "Parameter --cert cannot be used when --cryptoapicert is also specified."); + if (options->priv_key_file) + msg(M_USAGE, "Parameter --key cannot be used when --cryptoapicert is also specified."); + if (options->pkcs12_file) + msg(M_USAGE, "Parameter --pkcs12 cannot be used when --cryptoapicert is also specified."); + } + else +#endif + if (options->pkcs12_file) + { + if (options->ca_path) + msg(M_USAGE, "Parameter --capath cannot be used when --pkcs12 is also specified."); + if (options->cert_file) + msg(M_USAGE, "Parameter --cert cannot be used when --pkcs12 is also specified."); + if (options->priv_key_file) + msg(M_USAGE, "Parameter --key cannot be used when --pkcs12 is also specified."); + } + else + { + if ((!(options->ca_file)) && (!(options->ca_path))) + msg(M_USAGE, "You must define CA file (--ca) or CA path (--capath)"); + if (pull) + { + const int sum = (options->cert_file != NULL) + (options->priv_key_file != NULL); + if (sum == 0) + { +#if P2MP + if (!options->auth_user_pass_file) +#endif + msg (M_USAGE, "No client-side authentication method is specified. You must use either --cert/--key, --pkcs12, or --auth-user-pass"); + } + else if (sum == 2) + ; + else + { + msg (M_USAGE, "If you use one of --cert or --key, you must use them both"); + } + } + else + { + notnull (options->cert_file, "certificate file (--cert) or PKCS#12 file (--pkcs12)"); + notnull (options->priv_key_file, "private key file (--key) or PKCS#12 file (--pkcs12)"); + } + } + } + else + { + /* + * Make sure user doesn't specify any TLS options + * when in non-TLS mode. + */ + +#define MUST_BE_UNDEF(parm) if (options->parm != defaults.parm) msg (M_USAGE, err, #parm); + + const char err[] = "Parameter %s can only be specified in TLS-mode, i.e. where --tls-server or --tls-client is also specified."; + + MUST_BE_UNDEF (ca_file); + MUST_BE_UNDEF (ca_path); + MUST_BE_UNDEF (dh_file); + MUST_BE_UNDEF (cert_file); + MUST_BE_UNDEF (priv_key_file); + MUST_BE_UNDEF (pkcs12_file); + MUST_BE_UNDEF (cipher_list); + MUST_BE_UNDEF (tls_verify); + MUST_BE_UNDEF (tls_export_cert); + MUST_BE_UNDEF (tls_remote); + MUST_BE_UNDEF (tls_timeout); + MUST_BE_UNDEF (renegotiate_bytes); + MUST_BE_UNDEF (renegotiate_packets); + MUST_BE_UNDEF (renegotiate_seconds); + MUST_BE_UNDEF (handshake_window); + MUST_BE_UNDEF (transition_window); + MUST_BE_UNDEF (tls_auth_file); + MUST_BE_UNDEF (single_session); +#ifdef ENABLE_PUSH_PEER_INFO + MUST_BE_UNDEF (push_peer_info); +#endif + MUST_BE_UNDEF (tls_exit); + MUST_BE_UNDEF (crl_file); + MUST_BE_UNDEF (key_method); + MUST_BE_UNDEF (ns_cert_type); + MUST_BE_UNDEF (remote_cert_ku[0]); + MUST_BE_UNDEF (remote_cert_eku); +#ifdef ENABLE_PKCS11 + MUST_BE_UNDEF (pkcs11_providers[0]); + MUST_BE_UNDEF (pkcs11_private_mode[0]); + MUST_BE_UNDEF (pkcs11_id); + MUST_BE_UNDEF (pkcs11_id_management); +#endif + + if (pull) + msg (M_USAGE, err, "--pull"); + } +#undef MUST_BE_UNDEF +#endif /* USE_CRYPTO */ +#endif /* USE_SSL */ + +#if P2MP + if (options->auth_user_pass_file && !options->pull) + msg (M_USAGE, "--auth-user-pass requires --pull"); +#endif + + uninit_options (&defaults); +} + +static void +options_postprocess_mutate_ce (struct options *o, struct connection_entry *ce) +{ +#if P2MP_SERVER + if (o->server_defined || o->server_bridge_defined || o->server_bridge_proxy_dhcp) + { + if (ce->proto == PROTO_TCPv4) + ce->proto = PROTO_TCPv4_SERVER; + } +#endif +#if P2MP + if (o->client) + { + if (ce->proto == PROTO_TCPv4) + ce->proto = PROTO_TCPv4_CLIENT; + } +#endif + + if (ce->proto == PROTO_TCPv4_CLIENT && !ce->local && !ce->local_port_defined && !ce->bind_defined) + ce->bind_local = false; + +#ifdef ENABLE_SOCKS + if (ce->proto == PROTO_UDPv4 && ce->socks_proxy_server && !ce->local && !ce->local_port_defined && !ce->bind_defined) + ce->bind_local = false; +#endif + + if (!ce->bind_local) + ce->local_port = 0; + + /* if protocol forcing is enabled, disable all protocols except for the forced one */ + if (o->proto_force >= 0 && is_proto_tcp(o->proto_force) != is_proto_tcp(ce->proto)) + ce->flags |= CE_DISABLED; +} + +static void +options_postprocess_mutate_invariant (struct options *options) +{ + const int dev = dev_type_enum (options->dev, options->dev_type); + + /* + * If --mssfix is supplied without a parameter, default + * it to --fragment value, if --fragment is specified. + */ + if (options->mssfix_default) + { +#ifdef ENABLE_FRAGMENT + if (options->fragment) + options->mssfix = options->fragment; +#else + msg (M_USAGE, "--mssfix must specify a parameter"); +#endif + } + + /* + * In forking TCP server mode, you don't need to ifconfig + * the tap device (the assumption is that it will be bridged). + */ + if (options->inetd == INETD_NOWAIT) + options->ifconfig_noexec = true; + + /* + * Set MTU defaults + */ + { + if (!options->tun_mtu_defined && !options->link_mtu_defined) + { + options->tun_mtu_defined = true; + } + if ((dev == DEV_TYPE_TAP) && !options->tun_mtu_extra_defined) + { + options->tun_mtu_extra_defined = true; + options->tun_mtu_extra = TAP_MTU_EXTRA_DEFAULT; + } + } + +#ifdef WIN32 + if ((dev == DEV_TYPE_TUN || dev == DEV_TYPE_TAP) && !options->route_delay_defined) + { + if (options->mode == MODE_POINT_TO_POINT) + { + options->route_delay_defined = true; + options->route_delay = 5; /* Vista sometimes has a race without this */ + } + } + + if (options->ifconfig_noexec) + { + options->tuntap_options.ip_win32_type = IPW32_SET_MANUAL; + options->ifconfig_noexec = false; + } +#endif + +#if P2MP_SERVER + /* + * Check consistency of --mode server options. + */ + if (options->mode == MODE_SERVER) + { +#ifdef WIN32 + /* + * We need to explicitly set --tap-sleep because + * we do not schedule event timers in the top-level context. + */ + options->tuntap_options.tap_sleep = 10; + if (options->route_delay_defined && options->route_delay) + options->tuntap_options.tap_sleep = options->route_delay; + options->route_delay_defined = false; +#endif + } +#endif +} + +static void +options_postprocess_verify (const struct options *o) +{ +#ifdef ENABLE_CONNECTION + if (o->connection_list) + { + int i; + for (i = 0; i < o->connection_list->len; ++i) + options_postprocess_verify_ce (o, o->connection_list->array[i]); + } + else +#endif + options_postprocess_verify_ce (o, &o->ce); +} + +static void +options_postprocess_mutate (struct options *o) +{ + /* + * Process helper-type options which map to other, more complex + * sequences of options. + */ + helper_client_server (o); + helper_keepalive (o); + helper_tcp_nodelay (o); + + options_postprocess_mutate_invariant (o); + +#ifdef ENABLE_CONNECTION + if (o->remote_list && !o->connection_list) + { + /* + * For compatibility with 2.0.x, map multiple --remote options + * into connection list (connection lists added in 2.1). + */ + if (o->remote_list->len > 1 || o->force_connection_list) + { + const struct remote_list *rl = o->remote_list; + int i; + for (i = 0; i < rl->len; ++i) + { + const struct remote_entry *re = rl->array[i]; + struct connection_entry ce = o->ce; + struct connection_entry *ace; + + ASSERT (re->remote); + connection_entry_load_re (&ce, re); + ace = alloc_connection_entry (o, M_USAGE); + ASSERT (ace); + *ace = ce; + } + } + else if (o->remote_list->len == 1) /* one --remote option specified */ + { + connection_entry_load_re (&o->ce, o->remote_list->array[0]); + } + else + { + ASSERT (0); + } + } + if (o->connection_list) + { + int i; + for (i = 0; i < o->connection_list->len; ++i) + options_postprocess_mutate_ce (o, o->connection_list->array[i]); + +#if HTTP_PROXY_FALLBACK + if (o->http_proxy_override) + options_postprocess_http_proxy_override(o); + else if (o->http_proxy_fallback) + options_postprocess_http_proxy_fallback(o); +#endif + } + else +#endif + options_postprocess_mutate_ce (o, &o->ce); + +#if P2MP + /* + * Save certain parms before modifying options via --pull + */ + pre_pull_save (o); +#endif +} + +/* + * Sanity check on options. + * Also set some options based on other + * options. + */ +void +options_postprocess (struct options *options) +{ + options_postprocess_mutate (options); + options_postprocess_verify (options); +} + +#if P2MP + +/* + * Save/Restore certain option defaults before --pull is applied. + */ + +void +pre_pull_save (struct options *o) +{ + if (o->pull) + { + ALLOC_OBJ_CLEAR_GC (o->pre_pull, struct options_pre_pull, &o->gc); + o->pre_pull->tuntap_options = o->tuntap_options; + o->pre_pull->tuntap_options_defined = true; + o->pre_pull->foreign_option_index = o->foreign_option_index; + if (o->routes) + { + o->pre_pull->routes = clone_route_option_list(o->routes, &o->gc); + o->pre_pull->routes_defined = true; + } + } +} + +void +pre_pull_restore (struct options *o) +{ + const struct options_pre_pull *pp = o->pre_pull; + if (pp) + { + CLEAR (o->tuntap_options); + if (pp->tuntap_options_defined) + o->tuntap_options = pp->tuntap_options; + + if (pp->routes_defined) + { + rol_check_alloc (o); + copy_route_option_list (o->routes, pp->routes); + } + else + o->routes = NULL; + + o->foreign_option_index = pp->foreign_option_index; + } + + o->push_continuation = 0; +} + +#endif + +#ifdef ENABLE_OCC + +/* + * Build an options string to represent data channel encryption options. + * This string must match exactly between peers. The keysize is checked + * separately by read_key(). + * + * The following options must match on both peers: + * + * Tunnel options: + * + * --dev tun|tap [unit number need not match] + * --dev-type tun|tap + * --link-mtu + * --udp-mtu + * --tun-mtu + * --proto udp + * --proto tcp-client [matched with --proto tcp-server + * on the other end of the connection] + * --proto tcp-server [matched with --proto tcp-client on + * the other end of the connection] + * --tun-ipv6 + * --ifconfig x y [matched with --ifconfig y x on + * the other end of the connection] + * + * --comp-lzo + * --fragment + * + * Crypto Options: + * + * --cipher + * --auth + * --keysize + * --secret + * --no-replay + * --no-iv + * + * SSL Options: + * + * --tls-auth + * --tls-client [matched with --tls-server on + * the other end of the connection] + * --tls-server [matched with --tls-client on + * the other end of the connection] + */ + +char * +options_string (const struct options *o, + const struct frame *frame, + struct tuntap *tt, + bool remote, + struct gc_arena *gc) +{ + struct buffer out = alloc_buf (OPTION_LINE_SIZE); + bool tt_local = false; + + buf_printf (&out, "V4"); + + /* + * Tunnel Options + */ + + buf_printf (&out, ",dev-type %s", dev_type_string (o->dev, o->dev_type)); + buf_printf (&out, ",link-mtu %d", EXPANDED_SIZE (frame)); + buf_printf (&out, ",tun-mtu %d", PAYLOAD_SIZE (frame)); + buf_printf (&out, ",proto %s", proto2ascii (proto_remote (o->ce.proto, remote), true)); + if (o->tun_ipv6) + buf_printf (&out, ",tun-ipv6"); + + /* + * Try to get ifconfig parameters into the options string. + * If tt is undefined, make a temporary instantiation. + */ + if (!tt) + { + tt = init_tun (o->dev, + o->dev_type, + o->topology, + o->ifconfig_local, + o->ifconfig_remote_netmask, + (in_addr_t)0, + (in_addr_t)0, + false, + NULL); + if (tt) + tt_local = true; + } + + if (tt && o->mode == MODE_POINT_TO_POINT && !PULL_DEFINED(o)) + { + const char *ios = ifconfig_options_string (tt, remote, o->ifconfig_nowarn, gc); + if (ios && strlen (ios)) + buf_printf (&out, ",ifconfig %s", ios); + } + if (tt_local) + { + free (tt); + tt = NULL; + } + +#ifdef USE_LZO + if (o->lzo & LZO_SELECTED) + buf_printf (&out, ",comp-lzo"); +#endif + +#ifdef ENABLE_FRAGMENT + if (o->fragment) + buf_printf (&out, ",mtu-dynamic"); +#endif + +#ifdef USE_CRYPTO + +#ifdef USE_SSL +#define TLS_CLIENT (o->tls_client) +#define TLS_SERVER (o->tls_server) +#else +#define TLS_CLIENT (false) +#define TLS_SERVER (false) +#endif + + /* + * Key direction + */ + { + const char *kd = keydirection2ascii (o->key_direction, remote); + if (kd) + buf_printf (&out, ",keydir %s", kd); + } + + /* + * Crypto Options + */ + if (o->shared_secret_file || TLS_CLIENT || TLS_SERVER) + { + struct key_type kt; + + ASSERT ((o->shared_secret_file != NULL) + + (TLS_CLIENT == true) + + (TLS_SERVER == true) + <= 1); + + init_key_type (&kt, o->ciphername, o->ciphername_defined, + o->authname, o->authname_defined, + o->keysize, true, false); + + buf_printf (&out, ",cipher %s", kt_cipher_name (&kt)); + buf_printf (&out, ",auth %s", kt_digest_name (&kt)); + buf_printf (&out, ",keysize %d", kt_key_size (&kt)); + if (o->shared_secret_file) + buf_printf (&out, ",secret"); + if (!o->replay) + buf_printf (&out, ",no-replay"); + if (!o->use_iv) + buf_printf (&out, ",no-iv"); + } + +#ifdef USE_SSL + /* + * SSL Options + */ + { + if (TLS_CLIENT || TLS_SERVER) + { + if (o->tls_auth_file) + buf_printf (&out, ",tls-auth"); + + if (o->key_method > 1) + buf_printf (&out, ",key-method %d", o->key_method); + } + + if (remote) + { + if (TLS_CLIENT) + buf_printf (&out, ",tls-server"); + else if (TLS_SERVER) + buf_printf (&out, ",tls-client"); + } + else + { + if (TLS_CLIENT) + buf_printf (&out, ",tls-client"); + else if (TLS_SERVER) + buf_printf (&out, ",tls-server"); + } + } +#endif /* USE_SSL */ + +#undef TLS_CLIENT +#undef TLS_SERVER + +#endif /* USE_CRYPTO */ + + return BSTR (&out); +} + +/* + * Compare option strings for equality. + * If the first two chars of the strings differ, it means that + * we are looking at different versions of the options string, + * therefore don't compare them and return true. + */ + +bool +options_cmp_equal (char *actual, const char *expected) +{ + return options_cmp_equal_safe (actual, expected, strlen (actual) + 1); +} + +void +options_warning (char *actual, const char *expected) +{ + options_warning_safe (actual, expected, strlen (actual) + 1); +} + +static const char * +options_warning_extract_parm1 (const char *option_string, + struct gc_arena *gc_ret) +{ + struct gc_arena gc = gc_new (); + struct buffer b = string_alloc_buf (option_string, &gc); + char *p = gc_malloc (OPTION_PARM_SIZE, false, &gc); + const char *ret; + + buf_parse (&b, ' ', p, OPTION_PARM_SIZE); + ret = string_alloc (p, gc_ret); + gc_free (&gc); + return ret; +} + +static void +options_warning_safe_scan2 (const int msglevel, + const int delim, + const bool report_inconsistent, + const char *p1, + const struct buffer *b2_src, + const char *b1_name, + const char *b2_name) +{ + if (strlen (p1) > 0) + { + struct gc_arena gc = gc_new (); + struct buffer b2 = *b2_src; + const char *p1_prefix = options_warning_extract_parm1 (p1, &gc); + char *p2 = gc_malloc (OPTION_PARM_SIZE, false, &gc); + + while (buf_parse (&b2, delim, p2, OPTION_PARM_SIZE)) + { + if (strlen (p2)) + { + const char *p2_prefix = options_warning_extract_parm1 (p2, &gc); + + if (!strcmp (p1, p2)) + goto done; + if (!strcmp (p1_prefix, p2_prefix)) + { + if (report_inconsistent) + msg (msglevel, "WARNING: '%s' is used inconsistently, %s='%s', %s='%s'", + safe_print (p1_prefix, &gc), + b1_name, + safe_print (p1, &gc), + b2_name, + safe_print (p2, &gc)); + goto done; + } + } + } + + msg (msglevel, "WARNING: '%s' is present in %s config but missing in %s config, %s='%s'", + safe_print (p1_prefix, &gc), + b1_name, + b2_name, + b1_name, + safe_print (p1, &gc)); + + done: + gc_free (&gc); + } +} + +static void +options_warning_safe_scan1 (const int msglevel, + const int delim, + const bool report_inconsistent, + const struct buffer *b1_src, + const struct buffer *b2_src, + const char *b1_name, + const char *b2_name) +{ + struct gc_arena gc = gc_new (); + struct buffer b = *b1_src; + char *p = gc_malloc (OPTION_PARM_SIZE, true, &gc); + + while (buf_parse (&b, delim, p, OPTION_PARM_SIZE)) + options_warning_safe_scan2 (msglevel, delim, report_inconsistent, p, b2_src, b1_name, b2_name); + + gc_free (&gc); +} + +static void +options_warning_safe_ml (const int msglevel, char *actual, const char *expected, size_t actual_n) +{ + struct gc_arena gc = gc_new (); + + if (actual_n > 0) + { + struct buffer local = alloc_buf_gc (OPTION_PARM_SIZE + 16, &gc); + struct buffer remote = alloc_buf_gc (OPTION_PARM_SIZE + 16, &gc); + actual[actual_n - 1] = 0; + + buf_printf (&local, "version %s", expected); + buf_printf (&remote, "version %s", actual); + + options_warning_safe_scan1 (msglevel, ',', true, + &local, &remote, + "local", "remote"); + + options_warning_safe_scan1 (msglevel, ',', false, + &remote, &local, + "remote", "local"); + } + + gc_free (&gc); +} + +bool +options_cmp_equal_safe (char *actual, const char *expected, size_t actual_n) +{ + struct gc_arena gc = gc_new (); + bool ret = true; + + if (actual_n > 0) + { + actual[actual_n - 1] = 0; +#ifndef STRICT_OPTIONS_CHECK + if (strncmp (actual, expected, 2)) + { + msg (D_SHOW_OCC, "NOTE: Options consistency check may be skewed by version differences"); + options_warning_safe_ml (D_SHOW_OCC, actual, expected, actual_n); + } + else +#endif + ret = !strcmp (actual, expected); + } + gc_free (&gc); + return ret; +} + +void +options_warning_safe (char *actual, const char *expected, size_t actual_n) +{ + options_warning_safe_ml (M_WARN, actual, expected, actual_n); +} + +const char * +options_string_version (const char* s, struct gc_arena *gc) +{ + struct buffer out = alloc_buf_gc (4, gc); + strncpynt ((char *) BPTR (&out), s, 3); + return BSTR (&out); +} + +#endif /* ENABLE_OCC */ + +static void +foreign_option (struct options *o, char *argv[], int len, struct env_set *es) +{ + if (len > 0) + { + struct gc_arena gc = gc_new(); + struct buffer name = alloc_buf_gc (OPTION_PARM_SIZE, &gc); + struct buffer value = alloc_buf_gc (OPTION_PARM_SIZE, &gc); + int i; + bool first = true; + bool good = true; + + good &= buf_printf (&name, "foreign_option_%d", o->foreign_option_index + 1); + ++o->foreign_option_index; + for (i = 0; i < len; ++i) + { + if (argv[i]) + { + if (!first) + good &= buf_printf (&value, " "); + good &= buf_printf (&value, "%s", argv[i]); + first = false; + } + } + if (good) + setenv_str (es, BSTR(&name), BSTR(&value)); + else + msg (M_WARN, "foreign_option: name/value overflow"); + gc_free (&gc); + } +} + +/* + * parse/print topology coding + */ + +int +parse_topology (const char *str, const int msglevel) +{ + if (streq (str, "net30")) + return TOP_NET30; + else if (streq (str, "p2p")) + return TOP_P2P; + else if (streq (str, "subnet")) + return TOP_SUBNET; + else + { + msg (msglevel, "--topology must be net30, p2p, or subnet"); + return TOP_UNDEF; + } +} + +const char * +print_topology (const int topology) +{ + switch (topology) + { + case TOP_UNDEF: + return "undef"; + case TOP_NET30: + return "net30"; + case TOP_P2P: + return "p2p"; + case TOP_SUBNET: + return "subnet"; + default: + return "unknown"; + } +} + +#if P2MP + +/* + * Manage auth-retry variable + */ + +static int global_auth_retry; /* GLOBAL */ + +int +auth_retry_get (void) +{ + return global_auth_retry; +} + +bool +auth_retry_set (const int msglevel, const char *option) +{ + if (streq (option, "interact")) + global_auth_retry = AR_INTERACT; + else if (streq (option, "nointeract")) + global_auth_retry = AR_NOINTERACT; + else if (streq (option, "none")) + global_auth_retry = AR_NONE; + else + { + msg (msglevel, "--auth-retry method must be 'interact', 'nointeract', or 'none'"); + return false; + } + return true; +} + +const char * +auth_retry_print (void) +{ + switch (global_auth_retry) + { + case AR_NONE: + return "none"; + case AR_NOINTERACT: + return "nointeract"; + case AR_INTERACT: + return "interact"; + default: + return "???"; + } +} + +#endif + +/* + * Print the help message. + */ +static void +usage (void) +{ + FILE *fp = msg_fp(0); + +#ifdef ENABLE_SMALL + + fprintf (fp, "Usage message not available\n"); + +#else + + struct options o; + init_options (&o, true); + +#if defined(USE_CRYPTO) && defined(USE_SSL) + fprintf (fp, usage_message, + title_string, + o.ce.connect_retry_seconds, + o.ce.local_port, o.ce.remote_port, + TUN_MTU_DEFAULT, TAP_MTU_EXTRA_DEFAULT, + o.verbosity, + o.authname, o.ciphername, + o.replay_window, o.replay_time, + o.tls_timeout, o.renegotiate_seconds, + o.handshake_window, o.transition_window); +#elif defined(USE_CRYPTO) + fprintf (fp, usage_message, + title_string, + o.ce.connect_retry_seconds, + o.ce.local_port, o.ce.remote_port, + TUN_MTU_DEFAULT, TAP_MTU_EXTRA_DEFAULT, + o.verbosity, + o.authname, o.ciphername, + o.replay_window, o.replay_time); +#else + fprintf (fp, usage_message, + title_string, + o.ce.connect_retry_seconds, + o.ce.local_port, o.ce.remote_port, + TUN_MTU_DEFAULT, TAP_MTU_EXTRA_DEFAULT, + o.verbosity); +#endif + fflush(fp); + +#endif /* ENABLE_SMALL */ + + openvpn_exit (OPENVPN_EXIT_STATUS_USAGE); /* exit point */ +} + +void +usage_small (void) +{ + msg (M_WARN|M_NOPREFIX, "Use --help for more information."); + openvpn_exit (OPENVPN_EXIT_STATUS_USAGE); /* exit point */ +} + +static void +usage_version (void) +{ + msg (M_INFO|M_NOPREFIX, "%s", title_string); + msg (M_INFO|M_NOPREFIX, "Originally developed by James Yonan"); + msg (M_INFO|M_NOPREFIX, "Copyright (C) 2002-2010 OpenVPN Technologies, Inc. "); +#ifndef ENABLE_SMALL +#ifdef CONFIGURE_CALL + msg (M_INFO|M_NOPREFIX, "\n%s\n", CONFIGURE_CALL); +#endif +#ifdef CONFIGURE_DEFINES + msg (M_INFO|M_NOPREFIX, "Compile time defines: %s", CONFIGURE_DEFINES); +#endif +#endif + openvpn_exit (OPENVPN_EXIT_STATUS_USAGE); /* exit point */ +} + +void +notnull (const char *arg, const char *description) +{ + if (!arg) + msg (M_USAGE, "You must define %s", description); +} + +bool +string_defined_equal (const char *s1, const char *s2) +{ + if (s1 && s2) + return !strcmp (s1, s2); + else + return false; +} + +#if 0 +static void +ping_rec_err (int msglevel) +{ + msg (msglevel, "only one of --ping-exit or --ping-restart options may be specified"); +} +#endif + +static int +positive_atoi (const char *str) +{ + const int i = atoi (str); + return i < 0 ? 0 : i; +} + +#ifdef WIN32 /* This function is only used when compiling on Windows */ +static unsigned int +atou (const char *str) +{ + unsigned int val = 0; + sscanf (str, "%u", &val); + return val; +} +#endif + +static inline bool +space (unsigned char c) +{ + return c == '\0' || isspace (c); +} + +int +parse_line (const char *line, + char *p[], + const int n, + const char *file, + const int line_num, + int msglevel, + struct gc_arena *gc) +{ + const int STATE_INITIAL = 0; + const int STATE_READING_QUOTED_PARM = 1; + const int STATE_READING_UNQUOTED_PARM = 2; + const int STATE_DONE = 3; + const int STATE_READING_SQUOTED_PARM = 4; + + const char *error_prefix = ""; + + int ret = 0; + const char *c = line; + int state = STATE_INITIAL; + bool backslash = false; + char in, out; + + char parm[OPTION_PARM_SIZE]; + unsigned int parm_len = 0; + + msglevel &= ~M_OPTERR; + + if (msglevel & M_MSG_VIRT_OUT) + error_prefix = "ERROR: "; + + do + { + in = *c; + out = 0; + + if (!backslash && in == '\\' && state != STATE_READING_SQUOTED_PARM) + { + backslash = true; + } + else + { + if (state == STATE_INITIAL) + { + if (!space (in)) + { + if (in == ';' || in == '#') /* comment */ + break; + if (!backslash && in == '\"') + state = STATE_READING_QUOTED_PARM; + else if (!backslash && in == '\'') + state = STATE_READING_SQUOTED_PARM; + else + { + out = in; + state = STATE_READING_UNQUOTED_PARM; + } + } + } + else if (state == STATE_READING_UNQUOTED_PARM) + { + if (!backslash && space (in)) + state = STATE_DONE; + else + out = in; + } + else if (state == STATE_READING_QUOTED_PARM) + { + if (!backslash && in == '\"') + state = STATE_DONE; + else + out = in; + } + else if (state == STATE_READING_SQUOTED_PARM) + { + if (in == '\'') + state = STATE_DONE; + else + out = in; + } + if (state == STATE_DONE) + { + /* ASSERT (parm_len > 0); */ + p[ret] = gc_malloc (parm_len + 1, true, gc); + memcpy (p[ret], parm, parm_len); + p[ret][parm_len] = '\0'; + state = STATE_INITIAL; + parm_len = 0; + ++ret; + } + + if (backslash && out) + { + if (!(out == '\\' || out == '\"' || space (out))) + { +#ifdef ENABLE_SMALL + msg (msglevel, "%sOptions warning: Bad backslash ('\\') usage in %s:%d", error_prefix, file, line_num); +#else + msg (msglevel, "%sOptions warning: Bad backslash ('\\') usage in %s:%d: remember that backslashes are treated as shell-escapes and if you need to pass backslash characters as part of a Windows filename, you should use double backslashes such as \"c:\\\\" PACKAGE "\\\\static.key\"", error_prefix, file, line_num); +#endif + return 0; + } + } + backslash = false; + } + + /* store parameter character */ + if (out) + { + if (parm_len >= SIZE (parm)) + { + parm[SIZE (parm) - 1] = 0; + msg (msglevel, "%sOptions error: Parameter at %s:%d is too long (%d chars max): %s", + error_prefix, file, line_num, (int) SIZE (parm), parm); + return 0; + } + parm[parm_len++] = out; + } + + /* avoid overflow if too many parms in one config file line */ + if (ret >= n) + break; + + } while (*c++ != '\0'); + + if (state == STATE_READING_QUOTED_PARM) + { + msg (msglevel, "%sOptions error: No closing quotation (\") in %s:%d", error_prefix, file, line_num); + return 0; + } + if (state == STATE_READING_SQUOTED_PARM) + { + msg (msglevel, "%sOptions error: No closing single quotation (\') in %s:%d", error_prefix, file, line_num); + return 0; + } + if (state != STATE_INITIAL) + { + msg (msglevel, "%sOptions error: Residual parse state (%d) in %s:%d", error_prefix, state, file, line_num); + return 0; + } +#if 0 + { + int i; + for (i = 0; i < ret; ++i) + { + msg (M_INFO|M_NOPREFIX, "%s:%d ARG[%d] '%s'", file, line_num, i, p[i]); + } + } +#endif + return ret; +} + +static void +bypass_doubledash (char **p) +{ + if (strlen (*p) >= 3 && !strncmp (*p, "--", 2)) + *p += 2; +} + +#if ENABLE_INLINE_FILES + +struct in_src { +# define IS_TYPE_FP 1 +# define IS_TYPE_BUF 2 + int type; + union { + FILE *fp; + struct buffer *multiline; + } u; +}; + +static bool +in_src_get (const struct in_src *is, char *line, const int size) +{ + if (is->type == IS_TYPE_FP) + { + return BOOL_CAST (fgets (line, size, is->u.fp)); + } + else if (is->type == IS_TYPE_BUF) + { + bool status = buf_parse (is->u.multiline, '\n', line, size); + if ((int) strlen (line) + 1 < size) + strcat (line, "\n"); + return status; + } + else + { + ASSERT (0); + return false; + } +} + +static char * +read_inline_file (struct in_src *is, const char *close_tag, struct gc_arena *gc) +{ + char line[OPTION_LINE_SIZE]; + struct buffer buf = alloc_buf (10000); + char *ret; + while (in_src_get (is, line, sizeof (line))) + { + if (!strncmp (line, close_tag, strlen (close_tag))) + break; + buf_printf (&buf, "%s", line); + } + ret = string_alloc (BSTR (&buf), gc); + buf_clear (&buf); + free_buf (&buf); + CLEAR (line); + return ret; +} + +static bool +check_inline_file (struct in_src *is, char *p[], struct gc_arena *gc) +{ + bool ret = false; + if (p[0] && !p[1]) + { + char *arg = p[0]; + if (arg[0] == '<' && arg[strlen(arg)-1] == '>') + { + struct buffer close_tag; + arg[strlen(arg)-1] = '\0'; + p[0] = string_alloc (arg+1, gc); + p[1] = string_alloc (INLINE_FILE_TAG, gc); + close_tag = alloc_buf (strlen(p[0]) + 4); + buf_printf (&close_tag, "", p[0]); + p[2] = read_inline_file (is, BSTR (&close_tag), gc); + p[3] = NULL; + free_buf (&close_tag); + ret = true; + } + } + return ret; +} + +static bool +check_inline_file_via_fp (FILE *fp, char *p[], struct gc_arena *gc) +{ + struct in_src is; + is.type = IS_TYPE_FP; + is.u.fp = fp; + return check_inline_file (&is, p, gc); +} + +static bool +check_inline_file_via_buf (struct buffer *multiline, char *p[], struct gc_arena *gc) +{ + struct in_src is; + is.type = IS_TYPE_BUF; + is.u.multiline = multiline; + return check_inline_file (&is, p, gc); +} + +#endif + +static void +add_option (struct options *options, + char *p[], + const char *file, + int line, + const int level, + const int msglevel, + const unsigned int permission_mask, + unsigned int *option_types_found, + struct env_set *es); + +static void +read_config_file (struct options *options, + const char *file, + int level, + const char *top_file, + const int top_line, + const int msglevel, + const unsigned int permission_mask, + unsigned int *option_types_found, + struct env_set *es) +{ + const int max_recursive_levels = 10; + FILE *fp; + int line_num; + char line[OPTION_LINE_SIZE]; + char *p[MAX_PARMS]; + + ++level; + if (level <= max_recursive_levels) + { + if (streq (file, "stdin")) + fp = stdin; + else + fp = fopen (file, "r"); + if (fp) + { + line_num = 0; + while (fgets(line, sizeof (line), fp)) + { + CLEAR (p); + ++line_num; + if (parse_line (line, p, SIZE (p), file, line_num, msglevel, &options->gc)) + { + bypass_doubledash (&p[0]); +#if ENABLE_INLINE_FILES + check_inline_file_via_fp (fp, p, &options->gc); +#endif + add_option (options, p, file, line_num, level, msglevel, permission_mask, option_types_found, es); + } + } + if (fp != stdin) + fclose (fp); + } + else + { + msg (msglevel, "In %s:%d: Error opening configuration file: %s", top_file, top_line, file); + } + } + else + { + msg (msglevel, "In %s:%d: Maximum recursive include levels exceeded in include attempt of file %s -- probably you have a configuration file that tries to include itself.", top_file, top_line, file); + } + CLEAR (line); + CLEAR (p); +} + +static void +read_config_string (const char *prefix, + struct options *options, + const char *config, + const int msglevel, + const unsigned int permission_mask, + unsigned int *option_types_found, + struct env_set *es) +{ + char line[OPTION_LINE_SIZE]; + struct buffer multiline; + int line_num = 0; + + buf_set_read (&multiline, (uint8_t*)config, strlen (config)); + + while (buf_parse (&multiline, '\n', line, sizeof (line))) + { + char *p[MAX_PARMS]; + CLEAR (p); + ++line_num; + if (parse_line (line, p, SIZE (p), prefix, line_num, msglevel, &options->gc)) + { + bypass_doubledash (&p[0]); +#if ENABLE_INLINE_FILES + check_inline_file_via_buf (&multiline, p, &options->gc); +#endif + add_option (options, p, NULL, line_num, 0, msglevel, permission_mask, option_types_found, es); + } + CLEAR (p); + } + CLEAR (line); +} + +void +parse_argv (struct options *options, + const int argc, + char *argv[], + const int msglevel, + const unsigned int permission_mask, + unsigned int *option_types_found, + struct env_set *es) +{ + int i, j; + + /* usage message */ + if (argc <= 1) + usage (); + + /* config filename specified only? */ + if (argc == 2 && strncmp (argv[1], "--", 2)) + { + char *p[MAX_PARMS]; + CLEAR (p); + p[0] = "config"; + p[1] = argv[1]; + add_option (options, p, NULL, 0, 0, msglevel, permission_mask, option_types_found, es); + } + else + { + /* parse command line */ + for (i = 1; i < argc; ++i) + { + char *p[MAX_PARMS]; + CLEAR (p); + p[0] = argv[i]; + if (strncmp(p[0], "--", 2)) + { + msg (msglevel, "I'm trying to parse \"%s\" as an --option parameter but I don't see a leading '--'", p[0]); + } + else + p[0] += 2; + + for (j = 1; j < MAX_PARMS; ++j) + { + if (i + j < argc) + { + char *arg = argv[i + j]; + if (strncmp (arg, "--", 2)) + p[j] = arg; + else + break; + } + } + add_option (options, p, NULL, 0, 0, msglevel, permission_mask, option_types_found, es); + i += j - 1; + } + } +} + +bool +apply_push_options (struct options *options, + struct buffer *buf, + unsigned int permission_mask, + unsigned int *option_types_found, + struct env_set *es) +{ + char line[OPTION_PARM_SIZE]; + int line_num = 0; + const char *file = "[PUSH-OPTIONS]"; + const int msglevel = D_PUSH_ERRORS|M_OPTERR; + + while (buf_parse (buf, ',', line, sizeof (line))) + { + char *p[MAX_PARMS]; + CLEAR (p); + ++line_num; + if (parse_line (line, p, SIZE (p), file, line_num, msglevel, &options->gc)) + { + add_option (options, p, file, line_num, 0, msglevel, permission_mask, option_types_found, es); + } + } + return true; +} + +void +options_server_import (struct options *o, + const char *filename, + int msglevel, + unsigned int permission_mask, + unsigned int *option_types_found, + struct env_set *es) +{ + msg (D_PUSH, "OPTIONS IMPORT: reading client specific options from: %s", filename); + read_config_file (o, + filename, + 0, + filename, + 0, + msglevel, + permission_mask, + option_types_found, + es); +} + +void options_string_import (struct options *options, + const char *config, + const int msglevel, + const unsigned int permission_mask, + unsigned int *option_types_found, + struct env_set *es) +{ + read_config_string ("[CONFIG-STRING]", options, config, msglevel, permission_mask, option_types_found, es); +} + +#if P2MP + +#define VERIFY_PERMISSION(mask) { if (!verify_permission(p[0], (mask), permission_mask, option_types_found, msglevel)) goto err; } + +static bool +verify_permission (const char *name, + const unsigned int type, + const unsigned int allowed, + unsigned int *found, + const int msglevel) +{ + if (!(type & allowed)) + { + msg (msglevel, "option '%s' cannot be used in this context", name); + return false; + } + else + { + if (found) + *found |= type; + return true; + } +} + +#else + +#define VERIFY_PERMISSION(mask) + +#endif + +/* + * Check that an option doesn't have too + * many parameters. + */ + +#define NM_QUOTE_HINT (1<<0) + +static bool +no_more_than_n_args (const int msglevel, + char *p[], + const int max, + const unsigned int flags) +{ + const int len = string_array_len ((const char **)p); + + if (!len) + return false; + + if (len > max) + { + msg (msglevel, "the --%s directive should have at most %d parameter%s.%s", + p[0], + max - 1, + max >= 3 ? "s" : "", + (flags & NM_QUOTE_HINT) ? " To pass a list of arguments as one of the parameters, try enclosing them in double quotes (\"\")." : ""); + return false; + } + else + return true; +} + +static inline int +msglevel_forward_compatible (struct options *options, const int msglevel) +{ + return options->forward_compatible ? M_WARN : msglevel; +} + +static void +warn_multiple_script (const char *script, const char *type) { + if (script) { + msg (M_WARN, "Multiple --%s scripts defined. " + "The previously configured script is overridden.", type); + } +} + + +static void +add_option (struct options *options, + char *p[], + const char *file, + int line, + const int level, + const int msglevel, + const unsigned int permission_mask, + unsigned int *option_types_found, + struct env_set *es) +{ + struct gc_arena gc = gc_new (); + const bool pull_mode = BOOL_CAST (permission_mask & OPT_P_PULL_MODE); + int msglevel_fc = msglevel_forward_compatible (options, msglevel); + + ASSERT (MAX_PARMS >= 5); + if (!file) + { + file = "[CMD-LINE]"; + line = 1; + } + if (streq (p[0], "help")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + usage (); + } + if (streq (p[0], "version")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + usage_version (); + } + else if (streq (p[0], "config") && p[1]) + { + VERIFY_PERMISSION (OPT_P_CONFIG); + + /* save first config file only in options */ + if (!options->config) + options->config = p[1]; + + read_config_file (options, p[1], level, file, line, msglevel, permission_mask, option_types_found, es); + } +#if 0 + else if (streq (p[0], "foreign-option") && p[1]) + { + VERIFY_PERMISSION (OPT_P_IPWIN32); + foreign_option (options, p, 3, es); + } +#endif + else if (streq (p[0], "echo") || streq (p[0], "parameter")) + { + struct buffer string = alloc_buf_gc (OPTION_PARM_SIZE, &gc); + int j; + bool good = true; + + VERIFY_PERMISSION (OPT_P_ECHO); + + for (j = 1; j < MAX_PARMS; ++j) + { + if (!p[j]) + break; + if (j > 1) + good &= buf_printf (&string, " "); + good &= buf_printf (&string, "%s", p[j]); + } + if (good) + { + msg (M_INFO, "%s:%s", + pull_mode ? "ECHO-PULL" : "ECHO", + BSTR (&string)); +#ifdef ENABLE_MANAGEMENT + if (management) + management_echo (management, BSTR (&string), pull_mode); +#endif + } + else + msg (M_WARN, "echo/parameter option overflow"); + } +#ifdef ENABLE_MANAGEMENT + else if (streq (p[0], "management") && p[1] && p[2]) + { + int port = 0; + + VERIFY_PERMISSION (OPT_P_GENERAL); + if (streq (p[2], "unix")) + { +#if UNIX_SOCK_SUPPORT + options->management_flags |= MF_UNIX_SOCK; +#else + msg (msglevel, "MANAGEMENT: this platform does not support unix domain sockets"); + goto err; +#endif + } + else + { + port = atoi (p[2]); + if (!legal_ipv4_port (port)) + { + msg (msglevel, "port number associated with --management directive is out of range"); + goto err; + } + } + + options->management_addr = p[1]; + options->management_port = port; + if (p[3]) + { + options->management_user_pass = p[3]; + } + } + else if (streq (p[0], "management-client-user") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->management_client_user = p[1]; + } + else if (streq (p[0], "management-client-group") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->management_client_group = p[1]; + } + else if (streq (p[0], "management-query-passwords")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->management_flags |= MF_QUERY_PASSWORDS; + } + else if (streq (p[0], "management-hold")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->management_flags |= MF_HOLD; + } + else if (streq (p[0], "management-signal")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->management_flags |= MF_SIGNAL; + } + else if (streq (p[0], "management-forget-disconnect")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->management_flags |= MF_FORGET_DISCONNECT; + } + else if (streq (p[0], "management-client")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->management_flags |= MF_CONNECT_AS_CLIENT; + options->management_write_peer_info_file = p[1]; + } +#ifdef MANAGEMENT_DEF_AUTH + else if (streq (p[0], "management-client-auth")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->management_flags |= MF_CLIENT_AUTH; + } +#endif +#ifdef MANAGEMENT_PF + else if (streq (p[0], "management-client-pf")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->management_flags |= (MF_CLIENT_PF | MF_CLIENT_AUTH); + } +#endif + else if (streq (p[0], "management-log-cache") && p[1]) + { + int cache; + + VERIFY_PERMISSION (OPT_P_GENERAL); + cache = atoi (p[1]); + if (cache < 1) + { + msg (msglevel, "--management-log-cache parameter is out of range"); + goto err; + } + options->management_log_history_cache = cache; + } +#endif +#ifdef ENABLE_PLUGIN + else if (streq (p[0], "plugin") && p[1]) + { + VERIFY_PERMISSION (OPT_P_PLUGIN); + if (!options->plugin_list) + options->plugin_list = plugin_option_list_new (&options->gc); + if (!plugin_option_list_add (options->plugin_list, &p[1], &options->gc)) + { + msg (msglevel, "plugin add failed: %s", p[1]); + goto err; + } + } +#endif + else if (streq (p[0], "mode") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + if (streq (p[1], "p2p")) + options->mode = MODE_POINT_TO_POINT; +#if P2MP_SERVER + else if (streq (p[1], "server")) + options->mode = MODE_SERVER; +#endif + else + { + msg (msglevel, "Bad --mode parameter: %s", p[1]); + goto err; + } + } + else if (streq (p[0], "dev") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->dev = p[1]; + } + else if (streq (p[0], "dev-type") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->dev_type = p[1]; + } + else if (streq (p[0], "dev-node") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->dev_node = p[1]; + } + else if (streq (p[0], "lladdr") && p[1]) + { + VERIFY_PERMISSION (OPT_P_UP); + if (mac_addr_safe (p[1])) /* MAC address only */ + options->lladdr = p[1]; + else + { + msg (msglevel, "lladdr parm '%s' must be a MAC address", p[1]); + goto err; + } + } + else if (streq (p[0], "topology") && p[1]) + { + VERIFY_PERMISSION (OPT_P_UP); + options->topology = parse_topology (p[1], msglevel); + } + else if (streq (p[0], "tun-ipv6")) + { + VERIFY_PERMISSION (OPT_P_UP); + options->tun_ipv6 = true; + } +#ifdef CONFIG_FEATURE_IPROUTE + else if (streq (p[0], "iproute") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + iproute_path = p[1]; + } +#endif + else if (streq (p[0], "ifconfig") && p[1] && p[2]) + { + VERIFY_PERMISSION (OPT_P_UP); + if (ip_or_dns_addr_safe (p[1], options->allow_pull_fqdn) && ip_or_dns_addr_safe (p[2], options->allow_pull_fqdn)) /* FQDN -- may be DNS name */ + { + options->ifconfig_local = p[1]; + options->ifconfig_remote_netmask = p[2]; + } + else + { + msg (msglevel, "ifconfig parms '%s' and '%s' must be valid addresses", p[1], p[2]); + goto err; + } + } + else if (streq (p[0], "ifconfig-noexec")) + { + VERIFY_PERMISSION (OPT_P_UP); + options->ifconfig_noexec = true; + } + else if (streq (p[0], "ifconfig-nowarn")) + { + VERIFY_PERMISSION (OPT_P_UP); + options->ifconfig_nowarn = true; + } + else if (streq (p[0], "local") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL|OPT_P_CONNECTION); + options->ce.local = p[1]; + } + else if (streq (p[0], "remote-random")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->remote_random = true; + } +#if ENABLE_CONNECTION + else if (streq (p[0], "connection") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + if (streq (p[1], INLINE_FILE_TAG) && p[2]) + { + struct options sub; + struct connection_entry *e; + + init_options (&sub, true); + sub.ce = options->ce; + read_config_string ("[CONNECTION-OPTIONS]", &sub, p[2], msglevel, OPT_P_CONNECTION, option_types_found, es); + if (!sub.ce.remote) + { + msg (msglevel, "Each 'connection' block must contain exactly one 'remote' directive"); + goto err; + } + + e = alloc_connection_entry (options, msglevel); + if (!e) + goto err; + *e = sub.ce; + gc_transfer (&options->gc, &sub.gc); + uninit_options (&sub); + } + } +#endif +#ifdef ENABLE_CONNECTION + else if (streq (p[0], "remote-ip-hint") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->remote_ip_hint = p[1]; + } +#endif +#if HTTP_PROXY_FALLBACK + else if (streq (p[0], "http-proxy-fallback")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->http_proxy_fallback = true; + options->force_connection_list = true; + } + else if (streq (p[0], "http-proxy-override") && p[1] && p[2]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->http_proxy_override = parse_http_proxy_override(p[1], p[2], p[3], msglevel, &options->gc); + if (!options->http_proxy_override) + goto err; + options->force_connection_list = true; + } +#endif + else if (streq (p[0], "remote") && p[1]) + { + struct remote_entry re; + re.remote = NULL; + re.remote_port = re.proto = -1; + + VERIFY_PERMISSION (OPT_P_GENERAL|OPT_P_CONNECTION); + re.remote = p[1]; + if (p[2]) + { + const int port = atoi (p[2]); + if (!legal_ipv4_port (port)) + { + msg (msglevel, "remote: port number associated with host %s is out of range", p[1]); + goto err; + } + re.remote_port = port; + if (p[3]) + { + const int proto = ascii2proto (p[3]); + if (proto < 0) + { + msg (msglevel, "remote: bad protocol associated with host %s: '%s'", p[1], p[3]); + goto err; + } + re.proto = proto; + } + } +#ifdef ENABLE_CONNECTION + if (permission_mask & OPT_P_GENERAL) + { + struct remote_entry *e = alloc_remote_entry (options, msglevel); + if (!e) + goto err; + *e = re; + } + else if (permission_mask & OPT_P_CONNECTION) +#endif + { + connection_entry_load_re (&options->ce, &re); + } + } + else if (streq (p[0], "resolv-retry") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + if (streq (p[1], "infinite")) + options->resolve_retry_seconds = RESOLV_RETRY_INFINITE; + else + options->resolve_retry_seconds = positive_atoi (p[1]); + } + else if (streq (p[0], "connect-retry") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL|OPT_P_CONNECTION); + options->ce.connect_retry_seconds = positive_atoi (p[1]); + options->ce.connect_retry_defined = true; + } + else if (streq (p[0], "connect-timeout") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL|OPT_P_CONNECTION); + options->ce.connect_timeout = positive_atoi (p[1]); + options->ce.connect_timeout_defined = true; + } + else if (streq (p[0], "connect-retry-max") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL|OPT_P_CONNECTION); + options->ce.connect_retry_max = positive_atoi (p[1]); + } + else if (streq (p[0], "ipchange") && p[1]) + { + VERIFY_PERMISSION (OPT_P_SCRIPT); + if (!no_more_than_n_args (msglevel, p, 2, NM_QUOTE_HINT)) + goto err; + warn_multiple_script (options->ipchange, "ipchange"); + options->ipchange = string_substitute (p[1], ',', ' ', &options->gc); + } + else if (streq (p[0], "float")) + { + VERIFY_PERMISSION (OPT_P_GENERAL|OPT_P_CONNECTION); + options->ce.remote_float = true; + } +#ifdef ENABLE_DEBUG + else if (streq (p[0], "gremlin") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->gremlin = positive_atoi (p[1]); + } +#endif + else if (streq (p[0], "chroot") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->chroot_dir = p[1]; + } + else if (streq (p[0], "cd") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + if (openvpn_chdir (p[1])) + { + msg (M_ERR, "cd to '%s' failed", p[1]); + goto err; + } + options->cd_dir = p[1]; + } +#ifdef HAVE_SETCON + else if (streq (p[0], "setcon") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->selinux_context = p[1]; + } +#endif + else if (streq (p[0], "writepid") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->writepid = p[1]; + } + else if (streq (p[0], "up") && p[1]) + { + VERIFY_PERMISSION (OPT_P_SCRIPT); + if (!no_more_than_n_args (msglevel, p, 2, NM_QUOTE_HINT)) + goto err; + warn_multiple_script (options->up_script, "up"); + options->up_script = p[1]; + } + else if (streq (p[0], "down") && p[1]) + { + VERIFY_PERMISSION (OPT_P_SCRIPT); + if (!no_more_than_n_args (msglevel, p, 2, NM_QUOTE_HINT)) + goto err; + warn_multiple_script (options->down_script, "down"); + options->down_script = p[1]; + } + else if (streq (p[0], "down-pre")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->down_pre = true; + } + else if (streq (p[0], "up-delay")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->up_delay = true; + } + else if (streq (p[0], "up-restart")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->up_restart = true; + } + else if (streq (p[0], "syslog")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + open_syslog (p[1], false); + } + else if (streq (p[0], "daemon")) + { + bool didit = false; + VERIFY_PERMISSION (OPT_P_GENERAL); + if (!options->daemon) + { + options->daemon = didit = true; + open_syslog (p[1], false); + } + if (p[1]) + { + if (!didit) + { + msg (M_WARN, "WARNING: Multiple --daemon directives specified, ignoring --daemon %s. (Note that initscripts sometimes add their own --daemon directive.)", p[1]); + goto err; + } + } + } + else if (streq (p[0], "inetd")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + if (!options->inetd) + { + int z; + const char *name = NULL; + const char *opterr = "when --inetd is used with two parameters, one of them must be 'wait' or 'nowait' and the other must be a daemon name to use for system logging"; + + options->inetd = -1; + + for (z = 1; z <= 2; ++z) + { + if (p[z]) + { + if (streq (p[z], "wait")) + { + if (options->inetd != -1) + { + msg (msglevel, "%s", opterr); + goto err; + } + else + options->inetd = INETD_WAIT; + } + else if (streq (p[z], "nowait")) + { + if (options->inetd != -1) + { + msg (msglevel, "%s", opterr); + goto err; + } + else + options->inetd = INETD_NOWAIT; + } + else + { + if (name != NULL) + { + msg (msglevel, "%s", opterr); + goto err; + } + name = p[z]; + } + } + } + + /* default */ + if (options->inetd == -1) + options->inetd = INETD_WAIT; + + save_inetd_socket_descriptor (); + open_syslog (name, true); + } + } + else if (streq (p[0], "log") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->log = true; + redirect_stdout_stderr (p[1], false); + } + else if (streq (p[0], "suppress-timestamps")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->suppress_timestamps = true; + set_suppress_timestamps(true); + } + else if (streq (p[0], "log-append") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->log = true; + redirect_stdout_stderr (p[1], true); + } + else if (streq (p[0], "mlock")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->mlock = true; + } +#if ENABLE_IP_PKTINFO + else if (streq (p[0], "multihome")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->sockflags |= SF_USE_IP_PKTINFO; + } +#endif + else if (streq (p[0], "verb") && p[1]) + { + VERIFY_PERMISSION (OPT_P_MESSAGES); + options->verbosity = positive_atoi (p[1]); + } + else if (streq (p[0], "mute") && p[1]) + { + VERIFY_PERMISSION (OPT_P_MESSAGES); + options->mute = positive_atoi (p[1]); + } + else if (streq (p[0], "errors-to-stderr")) + { + VERIFY_PERMISSION (OPT_P_MESSAGES); + errors_to_stderr(); + } + else if (streq (p[0], "status") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->status_file = p[1]; + if (p[2]) + { + options->status_file_update_freq = positive_atoi (p[2]); + } + } + else if (streq (p[0], "status-version") && p[1]) + { + int version; + + VERIFY_PERMISSION (OPT_P_GENERAL); + version = atoi (p[1]); + if (version < 1 || version > 3) + { + msg (msglevel, "--status-version must be 1 to 3"); + goto err; + } + options->status_file_version = version; + } + else if (streq (p[0], "remap-usr1") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + if (streq (p[1], "SIGHUP")) + options->remap_sigusr1 = SIGHUP; + else if (streq (p[1], "SIGTERM")) + options->remap_sigusr1 = SIGTERM; + else + { + msg (msglevel, "--remap-usr1 parm must be 'SIGHUP' or 'SIGTERM'"); + goto err; + } + } + else if ((streq (p[0], "link-mtu") || streq (p[0], "udp-mtu")) && p[1]) + { + VERIFY_PERMISSION (OPT_P_MTU); + options->link_mtu = positive_atoi (p[1]); + options->link_mtu_defined = true; + } + else if (streq (p[0], "tun-mtu") && p[1]) + { + VERIFY_PERMISSION (OPT_P_MTU); + options->tun_mtu = positive_atoi (p[1]); + options->tun_mtu_defined = true; + } + else if (streq (p[0], "tun-mtu-extra") && p[1]) + { + VERIFY_PERMISSION (OPT_P_MTU); + options->tun_mtu_extra = positive_atoi (p[1]); + options->tun_mtu_extra_defined = true; + } +#ifdef ENABLE_FRAGMENT + else if (streq (p[0], "mtu-dynamic")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + msg (msglevel, "--mtu-dynamic has been replaced by --fragment"); + goto err; + } + else if (streq (p[0], "fragment") && p[1]) + { + VERIFY_PERMISSION (OPT_P_MTU); + options->fragment = positive_atoi (p[1]); + } +#endif + else if (streq (p[0], "mtu-disc") && p[1]) + { + VERIFY_PERMISSION (OPT_P_MTU); + options->mtu_discover_type = translate_mtu_discover_type_name (p[1]); + } +#ifdef ENABLE_OCC + else if (streq (p[0], "mtu-test")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->mtu_test = true; + } +#endif + else if (streq (p[0], "nice") && p[1]) + { + VERIFY_PERMISSION (OPT_P_NICE); + options->nice = atoi (p[1]); + } + else if (streq (p[0], "rcvbuf") && p[1]) + { + VERIFY_PERMISSION (OPT_P_SOCKBUF); + options->rcvbuf = positive_atoi (p[1]); + } + else if (streq (p[0], "sndbuf") && p[1]) + { + VERIFY_PERMISSION (OPT_P_SOCKBUF); + options->sndbuf = positive_atoi (p[1]); + } + else if (streq (p[0], "socket-flags")) + { + int j; + VERIFY_PERMISSION (OPT_P_SOCKFLAGS); + for (j = 1; j < MAX_PARMS && p[j]; ++j) + { + if (streq (p[j], "TCP_NODELAY")) + options->sockflags |= SF_TCP_NODELAY; + else + msg (msglevel, "unknown socket flag: %s", p[j]); + } + } + else if (streq (p[0], "txqueuelen") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); +#ifdef TARGET_LINUX + options->tuntap_options.txqueuelen = positive_atoi (p[1]); +#else + msg (msglevel, "--txqueuelen not supported on this OS"); + goto err; +#endif + } + else if (streq (p[0], "shaper") && p[1]) + { +#ifdef HAVE_GETTIMEOFDAY + int shaper; + + VERIFY_PERMISSION (OPT_P_SHAPER); + shaper = atoi (p[1]); + if (shaper < SHAPER_MIN || shaper > SHAPER_MAX) + { + msg (msglevel, "Bad shaper value, must be between %d and %d", + SHAPER_MIN, SHAPER_MAX); + goto err; + } + options->shaper = shaper; +#else /* HAVE_GETTIMEOFDAY */ + VERIFY_PERMISSION (OPT_P_GENERAL); + msg (msglevel, "--shaper requires the gettimeofday() function which is missing"); + goto err; +#endif /* HAVE_GETTIMEOFDAY */ + } + else if (streq (p[0], "port") && p[1]) + { + int port; + + VERIFY_PERMISSION (OPT_P_GENERAL|OPT_P_CONNECTION); + port = atoi (p[1]); + if (!legal_ipv4_port (port)) + { + msg (msglevel, "Bad port number: %s", p[1]); + goto err; + } + options->ce.port_option_used = true; + options->ce.local_port = options->ce.remote_port = port; + } + else if (streq (p[0], "lport") && p[1]) + { + int port; + + VERIFY_PERMISSION (OPT_P_GENERAL|OPT_P_CONNECTION); + port = atoi (p[1]); + if ((port != 0) && !legal_ipv4_port (port)) + { + msg (msglevel, "Bad local port number: %s", p[1]); + goto err; + } + options->ce.local_port_defined = true; + options->ce.port_option_used = true; + options->ce.local_port = port; + } + else if (streq (p[0], "rport") && p[1]) + { + int port; + + VERIFY_PERMISSION (OPT_P_GENERAL|OPT_P_CONNECTION); + port = atoi (p[1]); + if (!legal_ipv4_port (port)) + { + msg (msglevel, "Bad remote port number: %s", p[1]); + goto err; + } + options->ce.port_option_used = true; + options->ce.remote_port = port; + } + else if (streq (p[0], "bind")) + { + VERIFY_PERMISSION (OPT_P_GENERAL|OPT_P_CONNECTION); + options->ce.bind_defined = true; + } + else if (streq (p[0], "nobind")) + { + VERIFY_PERMISSION (OPT_P_GENERAL|OPT_P_CONNECTION); + options->ce.bind_local = false; + } + else if (streq (p[0], "fast-io")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->fast_io = true; + } + else if (streq (p[0], "inactive") && p[1]) + { + VERIFY_PERMISSION (OPT_P_TIMER); + options->inactivity_timeout = positive_atoi (p[1]); + if (p[2]) + options->inactivity_minimum_bytes = positive_atoi (p[2]); + } + else if (streq (p[0], "proto") && p[1]) + { + int proto; + VERIFY_PERMISSION (OPT_P_GENERAL|OPT_P_CONNECTION); + proto = ascii2proto (p[1]); + if (proto < 0) + { + msg (msglevel, "Bad protocol: '%s'. Allowed protocols with --proto option: %s", + p[1], + proto2ascii_all (&gc)); + goto err; + } + options->ce.proto = proto; + } + else if (streq (p[0], "proto-force") && p[1]) + { + int proto_force; + VERIFY_PERMISSION (OPT_P_GENERAL); + proto_force = ascii2proto (p[1]); + if (proto_force < 0) + { + msg (msglevel, "Bad --proto-force protocol: '%s'", p[1]); + goto err; + } + options->proto_force = proto_force; + options->force_connection_list = true; + } +#ifdef GENERAL_PROXY_SUPPORT + else if (streq (p[0], "auto-proxy")) + { + char *error = NULL; + + VERIFY_PERMISSION (OPT_P_GENERAL); + options->auto_proxy_info = get_proxy_settings (&error, &options->gc); + if (error) + msg (M_WARN, "PROXY: %s", error); + } + else if (streq (p[0], "show-proxy-settings")) + { + struct auto_proxy_info *pi; + char *error = NULL; + + VERIFY_PERMISSION (OPT_P_GENERAL); + pi = get_proxy_settings (&error, &options->gc); + if (pi) + { + msg (M_INFO|M_NOPREFIX, "HTTP Server: %s", np(pi->http.server)); + msg (M_INFO|M_NOPREFIX, "HTTP Port: %d", pi->http.port); + msg (M_INFO|M_NOPREFIX, "SOCKS Server: %s", np(pi->socks.server)); + msg (M_INFO|M_NOPREFIX, "SOCKS Port: %d", pi->socks.port); + } + if (error) + msg (msglevel, "Proxy error: %s", error); +#ifdef WIN32 + show_win_proxy_settings (M_INFO|M_NOPREFIX); +#endif + openvpn_exit (OPENVPN_EXIT_STATUS_GOOD); /* exit point */ + } +#endif /* GENERAL_PROXY_SUPPORT */ +#ifdef ENABLE_HTTP_PROXY + else if (streq (p[0], "http-proxy") && p[1]) + { + struct http_proxy_options *ho; + + VERIFY_PERMISSION (OPT_P_GENERAL|OPT_P_CONNECTION); + + { + int port; + if (!p[2]) + { + msg (msglevel, "http-proxy port number not defined"); + goto err; + } + port = atoi (p[2]); + if (!legal_ipv4_port (port)) + { + msg (msglevel, "Bad http-proxy port number: %s", p[2]); + goto err; + } + + ho = init_http_options_if_undefined (options); + + ho->server = p[1]; + ho->port = port; + } + + if (p[3]) + { + /* auto -- try to figure out proxy addr, port, and type automatically */ + /* semiauto -- given proxy addr:port, try to figure out type automatically */ + /* (auto|semiauto)-nct -- disable proxy auth cleartext protocols (i.e. basic auth) */ + if (streq (p[3], "auto")) + ho->auth_retry = PAR_ALL; + else if (streq (p[3], "auto-nct")) + ho->auth_retry = PAR_NCT; + else + { + ho->auth_method_string = "basic"; + ho->auth_file = p[3]; + + if (p[4]) + { + ho->auth_method_string = p[4]; + } + } + } + else + { + ho->auth_method_string = "none"; + } + } + else if (streq (p[0], "http-proxy-retry")) + { + struct http_proxy_options *ho; + VERIFY_PERMISSION (OPT_P_GENERAL|OPT_P_CONNECTION); + ho = init_http_options_if_undefined (options); + ho->retry = true; + } + else if (streq (p[0], "http-proxy-timeout") && p[1]) + { + struct http_proxy_options *ho; + + VERIFY_PERMISSION (OPT_P_GENERAL|OPT_P_CONNECTION); + ho = init_http_options_if_undefined (options); + ho->timeout = positive_atoi (p[1]); + } + else if (streq (p[0], "http-proxy-option") && p[1]) + { + struct http_proxy_options *ho; + + VERIFY_PERMISSION (OPT_P_GENERAL|OPT_P_CONNECTION); + ho = init_http_options_if_undefined (options); + + if (streq (p[1], "VERSION") && p[2]) + { + ho->http_version = p[2]; + } + else if (streq (p[1], "AGENT") && p[2]) + { + ho->user_agent = p[2]; + } + else + { + msg (msglevel, "Bad http-proxy-option or missing parameter: '%s'", p[1]); + } + } +#endif +#ifdef ENABLE_SOCKS + else if (streq (p[0], "socks-proxy") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL|OPT_P_CONNECTION); + + if (p[2]) + { + int port; + port = atoi (p[2]); + if (!legal_ipv4_port (port)) + { + msg (msglevel, "Bad socks-proxy port number: %s", p[2]); + goto err; + } + options->ce.socks_proxy_port = port; + } + else + { + options->ce.socks_proxy_port = 1080; + } + options->ce.socks_proxy_server = p[1]; + options->ce.socks_proxy_authfile = p[3]; /* might be NULL */ + } + else if (streq (p[0], "socks-proxy-retry")) + { + VERIFY_PERMISSION (OPT_P_GENERAL|OPT_P_CONNECTION); + options->ce.socks_proxy_retry = true; + } +#endif + else if (streq (p[0], "keepalive") && p[1] && p[2]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->keepalive_ping = atoi (p[1]); + options->keepalive_timeout = atoi (p[2]); + } + else if (streq (p[0], "ping") && p[1]) + { + VERIFY_PERMISSION (OPT_P_TIMER); + options->ping_send_timeout = positive_atoi (p[1]); + } + else if (streq (p[0], "ping-exit") && p[1]) + { + VERIFY_PERMISSION (OPT_P_TIMER); + options->ping_rec_timeout = positive_atoi (p[1]); + options->ping_rec_timeout_action = PING_EXIT; + } + else if (streq (p[0], "ping-restart") && p[1]) + { + VERIFY_PERMISSION (OPT_P_TIMER); + options->ping_rec_timeout = positive_atoi (p[1]); + options->ping_rec_timeout_action = PING_RESTART; + } + else if (streq (p[0], "ping-timer-rem")) + { + VERIFY_PERMISSION (OPT_P_TIMER); + options->ping_timer_remote = true; + } +#ifdef ENABLE_OCC + else if (streq (p[0], "explicit-exit-notify")) + { + VERIFY_PERMISSION (OPT_P_EXPLICIT_NOTIFY); + if (p[1]) + { + options->explicit_exit_notification = positive_atoi (p[1]); + } + else + { + options->explicit_exit_notification = 1; + } + } +#endif + else if (streq (p[0], "persist-tun")) + { + VERIFY_PERMISSION (OPT_P_PERSIST); + options->persist_tun = true; + } + else if (streq (p[0], "persist-key")) + { + VERIFY_PERMISSION (OPT_P_PERSIST); + options->persist_key = true; + } + else if (streq (p[0], "persist-local-ip")) + { + VERIFY_PERMISSION (OPT_P_PERSIST_IP); + options->persist_local_ip = true; + } + else if (streq (p[0], "persist-remote-ip")) + { + VERIFY_PERMISSION (OPT_P_PERSIST_IP); + options->persist_remote_ip = true; + } + else if (streq (p[0], "route") && p[1]) + { + VERIFY_PERMISSION (OPT_P_ROUTE); + rol_check_alloc (options); + if (pull_mode) + { + if (!ip_or_dns_addr_safe (p[1], options->allow_pull_fqdn) && !is_special_addr (p[1])) /* FQDN -- may be DNS name */ + { + msg (msglevel, "route parameter network/IP '%s' must be a valid address", p[1]); + goto err; + } + if (p[2] && !ip_addr_dotted_quad_safe (p[2])) /* FQDN -- must be IP address */ + { + msg (msglevel, "route parameter netmask '%s' must be an IP address", p[2]); + goto err; + } + if (p[3] && !ip_or_dns_addr_safe (p[3], options->allow_pull_fqdn) && !is_special_addr (p[3])) /* FQDN -- may be DNS name */ + { + msg (msglevel, "route parameter gateway '%s' must be a valid address", p[3]); + goto err; + } + } + add_route_to_option_list (options->routes, p[1], p[2], p[3], p[4]); + } + else if (streq (p[0], "max-routes") && p[1]) + { + int max_routes; + + VERIFY_PERMISSION (OPT_P_GENERAL); + max_routes = atoi (p[1]); + if (max_routes < 0 || max_routes > 100000000) + { + msg (msglevel, "--max-routes parameter is out of range"); + goto err; + } + options->max_routes = max_routes; + } + else if (streq (p[0], "route-gateway") && p[1]) + { + VERIFY_PERMISSION (OPT_P_ROUTE_EXTRAS); + if (streq (p[1], "dhcp")) + { + options->route_gateway_via_dhcp = true; + } + else + { + if (ip_or_dns_addr_safe (p[1], options->allow_pull_fqdn) || is_special_addr (p[1])) /* FQDN -- may be DNS name */ + { + options->route_default_gateway = p[1]; + } + else + { + msg (msglevel, "route-gateway parm '%s' must be a valid address", p[1]); + goto err; + } + } + } + else if (streq (p[0], "route-metric") && p[1]) + { + VERIFY_PERMISSION (OPT_P_ROUTE); + options->route_default_metric = positive_atoi (p[1]); + } + else if (streq (p[0], "route-delay")) + { + VERIFY_PERMISSION (OPT_P_ROUTE_EXTRAS); + options->route_delay_defined = true; + if (p[1]) + { + options->route_delay = positive_atoi (p[1]); + if (p[2]) + { + options->route_delay_window = positive_atoi (p[2]); + } + } + else + { + options->route_delay = 0; + } + } + else if (streq (p[0], "route-up") && p[1]) + { + VERIFY_PERMISSION (OPT_P_SCRIPT); + if (!no_more_than_n_args (msglevel, p, 2, NM_QUOTE_HINT)) + goto err; + warn_multiple_script (options->route_script, "route-up"); + options->route_script = p[1]; + } + else if (streq (p[0], "route-noexec")) + { + VERIFY_PERMISSION (OPT_P_SCRIPT); + options->route_noexec = true; + } + else if (streq (p[0], "route-nopull")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->route_nopull = true; + } + else if (streq (p[0], "allow-pull-fqdn")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->allow_pull_fqdn = true; + } + else if (streq (p[0], "redirect-gateway") || streq (p[0], "redirect-private")) + { + int j; + VERIFY_PERMISSION (OPT_P_ROUTE); + rol_check_alloc (options); + if (streq (p[0], "redirect-gateway")) + options->routes->flags |= RG_REROUTE_GW; + for (j = 1; j < MAX_PARMS && p[j] != NULL; ++j) + { + if (streq (p[j], "local")) + options->routes->flags |= RG_LOCAL; + else if (streq (p[j], "autolocal")) + options->routes->flags |= RG_AUTO_LOCAL; + else if (streq (p[j], "def1")) + options->routes->flags |= RG_DEF1; + else if (streq (p[j], "bypass-dhcp")) + options->routes->flags |= RG_BYPASS_DHCP; + else if (streq (p[j], "bypass-dns")) + options->routes->flags |= RG_BYPASS_DNS; + else + { + msg (msglevel, "unknown --%s flag: %s", p[0], p[j]); + goto err; + } + } + options->routes->flags |= RG_ENABLE; + } + else if (streq (p[0], "remote-random-hostname")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->sockflags |= SF_HOST_RANDOMIZE; + } + else if (streq (p[0], "setenv") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + if (streq (p[1], "REMOTE_RANDOM_HOSTNAME")) + { + options->sockflags |= SF_HOST_RANDOMIZE; + } + else if (streq (p[1], "GENERIC_CONFIG")) + { + msg (msglevel, "this is a generic configuration and cannot directly be used"); + goto err; + } +#if P2MP + else if (streq (p[1], "SERVER_POLL_TIMEOUT") && p[2]) + { + options->server_poll_timeout = positive_atoi(p[2]); + } +#endif + else + { + if (streq (p[1], "FORWARD_COMPATIBLE") && p[2] && streq (p[2], "1")) + { + options->forward_compatible = true; + msglevel_fc = msglevel_forward_compatible (options, msglevel); + } + setenv_str (es, p[1], p[2] ? p[2] : ""); + } + } + else if (streq (p[0], "setenv-safe") && p[1]) + { + VERIFY_PERMISSION (OPT_P_SETENV); + setenv_str_safe (es, p[1], p[2] ? p[2] : ""); + } + else if (streq (p[0], "script-security") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + script_security = atoi (p[1]); + if (p[2]) + { + if (streq (p[2], "execve")) + script_method = SM_EXECVE; + else if (streq (p[2], "system")) + script_method = SM_SYSTEM; + else + { + msg (msglevel, "unknown --script-security method: %s", p[2]); + goto err; + } + } + else + script_method = SM_EXECVE; + } + else if (streq (p[0], "mssfix")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + if (p[1]) + { + options->mssfix = positive_atoi (p[1]); + } + else + options->mssfix_default = true; + + } +#ifdef ENABLE_OCC + else if (streq (p[0], "disable-occ")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->occ = false; + } +#endif +#if P2MP +#if P2MP_SERVER + else if (streq (p[0], "server") && p[1] && p[2]) + { + const int lev = M_WARN; + bool error = false; + in_addr_t network, netmask; + + VERIFY_PERMISSION (OPT_P_GENERAL); + network = get_ip_addr (p[1], lev, &error); + netmask = get_ip_addr (p[2], lev, &error); + if (error || !network || !netmask) + { + msg (msglevel, "error parsing --server parameters"); + goto err; + } + options->server_defined = true; + options->server_network = network; + options->server_netmask = netmask; + + if (p[3]) + { + if (streq (p[3], "nopool")) + options->server_flags |= SF_NOPOOL; + else + { + msg (msglevel, "error parsing --server: %s is not a recognized flag", p[3]); + goto err; + } + } + } + else if (streq (p[0], "server-bridge") && p[1] && p[2] && p[3] && p[4]) + { + const int lev = M_WARN; + bool error = false; + in_addr_t ip, netmask, pool_start, pool_end; + + VERIFY_PERMISSION (OPT_P_GENERAL); + ip = get_ip_addr (p[1], lev, &error); + netmask = get_ip_addr (p[2], lev, &error); + pool_start = get_ip_addr (p[3], lev, &error); + pool_end = get_ip_addr (p[4], lev, &error); + if (error || !ip || !netmask || !pool_start || !pool_end) + { + msg (msglevel, "error parsing --server-bridge parameters"); + goto err; + } + options->server_bridge_defined = true; + options->server_bridge_ip = ip; + options->server_bridge_netmask = netmask; + options->server_bridge_pool_start = pool_start; + options->server_bridge_pool_end = pool_end; + } + else if (streq (p[0], "server-bridge") && p[1] && streq (p[1], "nogw")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->server_bridge_proxy_dhcp = true; + options->server_flags |= SF_NO_PUSH_ROUTE_GATEWAY; + } + else if (streq (p[0], "server-bridge") && !p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->server_bridge_proxy_dhcp = true; + } + else if (streq (p[0], "push") && p[1]) + { + VERIFY_PERMISSION (OPT_P_PUSH); + push_options (options, &p[1], msglevel, &options->gc); + } + else if (streq (p[0], "push-reset")) + { + VERIFY_PERMISSION (OPT_P_INSTANCE); + push_reset (options); + } + else if (streq (p[0], "ifconfig-pool") && p[1] && p[2]) + { + const int lev = M_WARN; + bool error = false; + in_addr_t start, end, netmask=0; + + VERIFY_PERMISSION (OPT_P_GENERAL); + start = get_ip_addr (p[1], lev, &error); + end = get_ip_addr (p[2], lev, &error); + if (p[3]) + { + netmask = get_ip_addr (p[3], lev, &error); + } + if (error) + { + msg (msglevel, "error parsing --ifconfig-pool parameters"); + goto err; + } + if (!ifconfig_pool_verify_range (msglevel, start, end)) + goto err; + + options->ifconfig_pool_defined = true; + options->ifconfig_pool_start = start; + options->ifconfig_pool_end = end; + if (netmask) + options->ifconfig_pool_netmask = netmask; + } + else if (streq (p[0], "ifconfig-pool-persist") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->ifconfig_pool_persist_filename = p[1]; + if (p[2]) + { + options->ifconfig_pool_persist_refresh_freq = positive_atoi (p[2]); + } + } + else if (streq (p[0], "ifconfig-pool-linear")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->topology = TOP_P2P; + } + else if (streq (p[0], "hash-size") && p[1] && p[2]) + { + int real, virtual; + + VERIFY_PERMISSION (OPT_P_GENERAL); + real = atoi (p[1]); + virtual = atoi (p[2]); + if (real < 1 || virtual < 1) + { + msg (msglevel, "--hash-size sizes must be >= 1 (preferably a power of 2)"); + goto err; + } + options->real_hash_size = real; + options->virtual_hash_size = real; + } + else if (streq (p[0], "connect-freq") && p[1] && p[2]) + { + int cf_max, cf_per; + + VERIFY_PERMISSION (OPT_P_GENERAL); + cf_max = atoi (p[1]); + cf_per = atoi (p[2]); + if (cf_max < 0 || cf_per < 0) + { + msg (msglevel, "--connect-freq parms must be > 0"); + goto err; + } + options->cf_max = cf_max; + options->cf_per = cf_per; + } + else if (streq (p[0], "max-clients") && p[1]) + { + int max_clients; + + VERIFY_PERMISSION (OPT_P_GENERAL); + max_clients = atoi (p[1]); + if (max_clients < 0) + { + msg (msglevel, "--max-clients must be at least 1"); + goto err; + } + options->max_clients = max_clients; + } + else if (streq (p[0], "max-routes-per-client") && p[1]) + { + VERIFY_PERMISSION (OPT_P_INHERIT); + options->max_routes_per_client = max_int (atoi (p[1]), 1); + } + else if (streq (p[0], "client-cert-not-required")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->ssl_flags |= SSLF_CLIENT_CERT_NOT_REQUIRED; + } + else if (streq (p[0], "username-as-common-name")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->ssl_flags |= SSLF_USERNAME_AS_COMMON_NAME; + } + else if (streq (p[0], "auth-user-pass-optional")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->ssl_flags |= SSLF_AUTH_USER_PASS_OPTIONAL; + } + else if (streq (p[0], "no-name-remapping")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->ssl_flags |= SSLF_NO_NAME_REMAPPING; + } + else if (streq (p[0], "opt-verify")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->ssl_flags |= SSLF_OPT_VERIFY; + } + else if (streq (p[0], "auth-user-pass-verify") && p[1]) + { + VERIFY_PERMISSION (OPT_P_SCRIPT); + if (!no_more_than_n_args (msglevel, p, 3, NM_QUOTE_HINT)) + goto err; + if (p[2]) + { + if (streq (p[2], "via-env")) + options->auth_user_pass_verify_script_via_file = false; + else if (streq (p[2], "via-file")) + options->auth_user_pass_verify_script_via_file = true; + else + { + msg (msglevel, "second parm to --auth-user-pass-verify must be 'via-env' or 'via-file'"); + goto err; + } + } + else + { + msg (msglevel, "--auth-user-pass-verify requires a second parameter ('via-env' or 'via-file')"); + goto err; + } + warn_multiple_script (options->auth_user_pass_verify_script, "auth-user-pass-verify"); + options->auth_user_pass_verify_script = p[1]; + } + else if (streq (p[0], "client-connect") && p[1]) + { + VERIFY_PERMISSION (OPT_P_SCRIPT); + if (!no_more_than_n_args (msglevel, p, 2, NM_QUOTE_HINT)) + goto err; + warn_multiple_script (options->client_connect_script, "client-connect"); + options->client_connect_script = p[1]; + } + else if (streq (p[0], "client-disconnect") && p[1]) + { + VERIFY_PERMISSION (OPT_P_SCRIPT); + if (!no_more_than_n_args (msglevel, p, 2, NM_QUOTE_HINT)) + goto err; + warn_multiple_script (options->client_disconnect_script, "client-disconnect"); + options->client_disconnect_script = p[1]; + } + else if (streq (p[0], "learn-address") && p[1]) + { + VERIFY_PERMISSION (OPT_P_SCRIPT); + if (!no_more_than_n_args (msglevel, p, 2, NM_QUOTE_HINT)) + goto err; + warn_multiple_script (options->learn_address_script, "learn-address"); + options->learn_address_script = p[1]; + } + else if (streq (p[0], "tmp-dir") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->tmp_dir = p[1]; + } + else if (streq (p[0], "client-config-dir") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->client_config_dir = p[1]; + } + else if (streq (p[0], "ccd-exclusive")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->ccd_exclusive = true; + } + else if (streq (p[0], "bcast-buffers") && p[1]) + { + int n_bcast_buf; + + VERIFY_PERMISSION (OPT_P_GENERAL); + n_bcast_buf = atoi (p[1]); + if (n_bcast_buf < 1) + msg (msglevel, "--bcast-buffers parameter must be > 0"); + options->n_bcast_buf = n_bcast_buf; + } + else if (streq (p[0], "tcp-queue-limit") && p[1]) + { + int tcp_queue_limit; + + VERIFY_PERMISSION (OPT_P_GENERAL); + tcp_queue_limit = atoi (p[1]); + if (tcp_queue_limit < 1) + msg (msglevel, "--tcp-queue-limit parameter must be > 0"); + options->tcp_queue_limit = tcp_queue_limit; + } +#if PORT_SHARE + else if (streq (p[0], "port-share") && p[1] && p[2]) + { + int port; + + VERIFY_PERMISSION (OPT_P_GENERAL); + port = atoi (p[2]); + if (!legal_ipv4_port (port)) + { + msg (msglevel, "port number associated with --port-share directive is out of range"); + goto err; + } + + options->port_share_host = p[1]; + options->port_share_port = port; + } +#endif + else if (streq (p[0], "client-to-client")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->enable_c2c = true; + } + else if (streq (p[0], "duplicate-cn")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->duplicate_cn = true; + } + else if (streq (p[0], "iroute") && p[1]) + { + const char *netmask = NULL; + + VERIFY_PERMISSION (OPT_P_INSTANCE); + if (p[2]) + { + netmask = p[2]; + } + option_iroute (options, p[1], netmask, msglevel); + } + else if (streq (p[0], "ifconfig-push") && p[1] && p[2]) + { + in_addr_t local, remote_netmask; + + VERIFY_PERMISSION (OPT_P_INSTANCE); + local = getaddr (GETADDR_HOST_ORDER|GETADDR_RESOLVE, p[1], 0, NULL, NULL); + remote_netmask = getaddr (GETADDR_HOST_ORDER|GETADDR_RESOLVE, p[2], 0, NULL, NULL); + if (local && remote_netmask) + { + options->push_ifconfig_defined = true; + options->push_ifconfig_local = local; + options->push_ifconfig_remote_netmask = remote_netmask; + } + else + { + msg (msglevel, "cannot parse --ifconfig-push addresses"); + goto err; + } + } + else if (streq (p[0], "ifconfig-push-constraint") && p[1] && p[2]) + { + in_addr_t network, netmask; + + VERIFY_PERMISSION (OPT_P_GENERAL); + network = getaddr (GETADDR_HOST_ORDER|GETADDR_RESOLVE, p[1], 0, NULL, NULL); + netmask = getaddr (GETADDR_HOST_ORDER, p[2], 0, NULL, NULL); + if (network && netmask) + { + options->push_ifconfig_constraint_defined = true; + options->push_ifconfig_constraint_network = network; + options->push_ifconfig_constraint_netmask = netmask; + } + else + { + msg (msglevel, "cannot parse --ifconfig-push-constraint addresses"); + goto err; + } + } + else if (streq (p[0], "disable")) + { + VERIFY_PERMISSION (OPT_P_INSTANCE); + options->disable = true; + } + else if (streq (p[0], "tcp-nodelay")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->server_flags |= SF_TCP_NODELAY_HELPER; + } +#endif /* P2MP_SERVER */ + + else if (streq (p[0], "client")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->client = true; + } + else if (streq (p[0], "pull")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->pull = true; + } + else if (streq (p[0], "push-continuation") && p[1]) + { + VERIFY_PERMISSION (OPT_P_PULL_MODE); + options->push_continuation = atoi(p[1]); + } + else if (streq (p[0], "server-poll-timeout") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->server_poll_timeout = positive_atoi(p[1]); + } + else if (streq (p[0], "auth-user-pass")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + if (p[1]) + { + options->auth_user_pass_file = p[1]; + } + else + options->auth_user_pass_file = "stdin"; + } + else if (streq (p[0], "auth-retry") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + auth_retry_set (msglevel, p[1]); + } +#endif +#ifdef WIN32 + else if (streq (p[0], "win-sys") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + if (streq (p[1], "env")) + set_win_sys_path_via_env (es); + else + set_win_sys_path (p[1], es); + } + else if (streq (p[0], "route-method") && p[1]) + { + VERIFY_PERMISSION (OPT_P_ROUTE_EXTRAS); + if (streq (p[1], "adaptive")) + options->route_method = ROUTE_METHOD_ADAPTIVE; + else if (streq (p[1], "ipapi")) + options->route_method = ROUTE_METHOD_IPAPI; + else if (streq (p[1], "exe")) + options->route_method = ROUTE_METHOD_EXE; + else + { + msg (msglevel, "--route method must be 'adaptive', 'ipapi', or 'exe'"); + goto err; + } + } + else if (streq (p[0], "ip-win32") && p[1]) + { + const int index = ascii2ipset (p[1]); + struct tuntap_options *to = &options->tuntap_options; + + VERIFY_PERMISSION (OPT_P_IPWIN32); + + if (index < 0) + { + msg (msglevel, + "Bad --ip-win32 method: '%s'. Allowed methods: %s", + p[1], + ipset2ascii_all (&gc)); + goto err; + } + + if (index == IPW32_SET_ADAPTIVE) + options->route_delay_window = IPW32_SET_ADAPTIVE_DELAY_WINDOW; + + if (index == IPW32_SET_DHCP_MASQ) + { + if (p[2]) + { + if (!streq (p[2], "default")) + { + int offset = atoi (p[2]); + + if (!(offset > -256 && offset < 256)) + { + msg (msglevel, "--ip-win32 dynamic [offset] [lease-time]: offset (%d) must be > -256 and < 256", offset); + goto err; + } + + to->dhcp_masq_custom_offset = true; + to->dhcp_masq_offset = offset; + } + + if (p[3]) + { + const int min_lease = 30; + int lease_time; + lease_time = atoi (p[3]); + if (lease_time < min_lease) + { + msg (msglevel, "--ip-win32 dynamic [offset] [lease-time]: lease time parameter (%d) must be at least %d seconds", lease_time, min_lease); + goto err; + } + to->dhcp_lease_time = lease_time; + } + } + } + to->ip_win32_type = index; + to->ip_win32_defined = true; + } + else if (streq (p[0], "dhcp-option") && p[1]) + { + struct tuntap_options *o = &options->tuntap_options; + VERIFY_PERMISSION (OPT_P_IPWIN32); + + if (streq (p[1], "DOMAIN") && p[2]) + { + o->domain = p[2]; + } + else if (streq (p[1], "NBS") && p[2]) + { + o->netbios_scope = p[2]; + } + else if (streq (p[1], "NBT") && p[2]) + { + int t; + t = atoi (p[2]); + if (!(t == 1 || t == 2 || t == 4 || t == 8)) + { + msg (msglevel, "--dhcp-option NBT: parameter (%d) must be 1, 2, 4, or 8", t); + goto err; + } + o->netbios_node_type = t; + } + else if (streq (p[1], "DNS") && p[2]) + { + dhcp_option_address_parse ("DNS", p[2], o->dns, &o->dns_len, msglevel); + } + else if (streq (p[1], "WINS") && p[2]) + { + dhcp_option_address_parse ("WINS", p[2], o->wins, &o->wins_len, msglevel); + } + else if (streq (p[1], "NTP") && p[2]) + { + dhcp_option_address_parse ("NTP", p[2], o->ntp, &o->ntp_len, msglevel); + } + else if (streq (p[1], "NBDD") && p[2]) + { + dhcp_option_address_parse ("NBDD", p[2], o->nbdd, &o->nbdd_len, msglevel); + } + else if (streq (p[1], "DISABLE-NBT")) + { + o->disable_nbt = 1; + } + else + { + msg (msglevel, "--dhcp-option: unknown option type '%s' or missing parameter", p[1]); + goto err; + } + o->dhcp_options = true; + } + else if (streq (p[0], "show-adapters")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + show_tap_win32_adapters (M_INFO|M_NOPREFIX, M_WARN|M_NOPREFIX); + openvpn_exit (OPENVPN_EXIT_STATUS_GOOD); /* exit point */ + } + else if (streq (p[0], "show-net")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + show_routes (M_INFO|M_NOPREFIX); + show_adapters (M_INFO|M_NOPREFIX); + openvpn_exit (OPENVPN_EXIT_STATUS_GOOD); /* exit point */ + } + else if (streq (p[0], "show-net-up")) + { + VERIFY_PERMISSION (OPT_P_UP); + options->show_net_up = true; + } + else if (streq (p[0], "tap-sleep") && p[1]) + { + int s; + VERIFY_PERMISSION (OPT_P_IPWIN32); + s = atoi (p[1]); + if (s < 0 || s >= 256) + { + msg (msglevel, "--tap-sleep parameter must be between 0 and 255"); + goto err; + } + options->tuntap_options.tap_sleep = s; + } + else if (streq (p[0], "dhcp-renew")) + { + VERIFY_PERMISSION (OPT_P_IPWIN32); + options->tuntap_options.dhcp_renew = true; + } + else if (streq (p[0], "dhcp-pre-release")) + { + VERIFY_PERMISSION (OPT_P_IPWIN32); + options->tuntap_options.dhcp_pre_release = true; + } + else if (streq (p[0], "dhcp-release")) + { + VERIFY_PERMISSION (OPT_P_IPWIN32); + options->tuntap_options.dhcp_release = true; + } + else if (streq (p[0], "dhcp-internal") && p[1]) /* standalone method for internal use */ + { + unsigned int adapter_index; + VERIFY_PERMISSION (OPT_P_GENERAL); + set_debug_level (options->verbosity, SDL_CONSTRAIN); + adapter_index = atou (p[1]); + sleep (options->tuntap_options.tap_sleep); + if (options->tuntap_options.dhcp_pre_release) + dhcp_release_by_adapter_index (adapter_index); + if (options->tuntap_options.dhcp_renew) + dhcp_renew_by_adapter_index (adapter_index); + openvpn_exit (OPENVPN_EXIT_STATUS_GOOD); /* exit point */ + } + else if (streq (p[0], "register-dns")) + { + VERIFY_PERMISSION (OPT_P_IPWIN32); + options->tuntap_options.register_dns = true; + } + else if (streq (p[0], "rdns-internal")) + /* standalone method for internal use + * + * (if --register-dns is set, openvpn needs to call itself in a + * sub-process to execute the required functions in a non-blocking + * way, and uses --rdns-internal to signal that to itself) + */ + { + VERIFY_PERMISSION (OPT_P_GENERAL); + set_debug_level (options->verbosity, SDL_CONSTRAIN); + if (options->tuntap_options.register_dns) + ipconfig_register_dns (NULL); + openvpn_exit (OPENVPN_EXIT_STATUS_GOOD); /* exit point */ + } + else if (streq (p[0], "show-valid-subnets")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + show_valid_win32_tun_subnets (); + openvpn_exit (OPENVPN_EXIT_STATUS_GOOD); /* exit point */ + } + else if (streq (p[0], "pause-exit")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + set_pause_exit_win32 (); + } + else if (streq (p[0], "service") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->exit_event_name = p[1]; + if (p[2]) + { + options->exit_event_initial_state = (atoi(p[2]) != 0); + } + } + else if (streq (p[0], "allow-nonadmin")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + tap_allow_nonadmin_access (p[1]); + openvpn_exit (OPENVPN_EXIT_STATUS_GOOD); /* exit point */ + } + else if (streq (p[0], "user") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + msg (M_WARN, "NOTE: --user option is not implemented on Windows"); + } + else if (streq (p[0], "group") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + msg (M_WARN, "NOTE: --group option is not implemented on Windows"); + } +#else + else if (streq (p[0], "user") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->username = p[1]; + } + else if (streq (p[0], "group") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->groupname = p[1]; + } + else if (streq (p[0], "dhcp-option") && p[1]) + { + VERIFY_PERMISSION (OPT_P_IPWIN32); + foreign_option (options, p, 3, es); + } + else if (streq (p[0], "route-method") && p[1]) /* ignore when pushed to non-Windows OS */ + { + VERIFY_PERMISSION (OPT_P_ROUTE_EXTRAS); + } +#endif +#if PASSTOS_CAPABILITY + else if (streq (p[0], "passtos")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->passtos = true; + } +#endif +#ifdef USE_LZO + else if (streq (p[0], "comp-lzo")) + { + VERIFY_PERMISSION (OPT_P_COMP); + if (p[1]) + { + if (streq (p[1], "yes")) + options->lzo = LZO_SELECTED|LZO_ON; + else if (streq (p[1], "no")) + options->lzo = LZO_SELECTED; + else if (streq (p[1], "adaptive")) + options->lzo = LZO_SELECTED|LZO_ON|LZO_ADAPTIVE; + else + { + msg (msglevel, "bad comp-lzo option: %s -- must be 'yes', 'no', or 'adaptive'", p[1]); + goto err; + } + } + else + options->lzo = LZO_SELECTED|LZO_ON|LZO_ADAPTIVE; + } + else if (streq (p[0], "comp-noadapt")) + { + VERIFY_PERMISSION (OPT_P_COMP); + options->lzo &= ~LZO_ADAPTIVE; + } +#endif /* USE_LZO */ +#ifdef USE_CRYPTO + else if (streq (p[0], "show-ciphers")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->show_ciphers = true; + } + else if (streq (p[0], "show-digests")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->show_digests = true; + } + else if (streq (p[0], "show-engines")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->show_engines = true; + } + else if (streq (p[0], "key-direction") && p[1]) + { + int key_direction; + + key_direction = ascii2keydirection (msglevel, p[1]); + if (key_direction >= 0) + options->key_direction = key_direction; + else + goto err; + } + else if (streq (p[0], "secret") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); +#if ENABLE_INLINE_FILES + if (streq (p[1], INLINE_FILE_TAG) && p[2]) + { + options->shared_secret_file_inline = p[2]; + } + else +#endif + if (p[2]) + { + int key_direction; + + key_direction = ascii2keydirection (msglevel, p[2]); + if (key_direction >= 0) + options->key_direction = key_direction; + else + goto err; + } + options->shared_secret_file = p[1]; + } + else if (streq (p[0], "genkey")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->genkey = true; + } + else if (streq (p[0], "auth") && p[1]) + { + VERIFY_PERMISSION (OPT_P_CRYPTO); + options->authname_defined = true; + options->authname = p[1]; + if (streq (options->authname, "none")) + { + options->authname_defined = false; + options->authname = NULL; + } + } + else if (streq (p[0], "auth")) + { + VERIFY_PERMISSION (OPT_P_CRYPTO); + options->authname_defined = true; + } + else if (streq (p[0], "cipher") && p[1]) + { + VERIFY_PERMISSION (OPT_P_CRYPTO); + options->ciphername_defined = true; + options->ciphername = p[1]; + if (streq (options->ciphername, "none")) + { + options->ciphername_defined = false; + options->ciphername = NULL; + } + } + else if (streq (p[0], "cipher")) + { + VERIFY_PERMISSION (OPT_P_CRYPTO); + options->ciphername_defined = true; + } + else if (streq (p[0], "prng") && p[1]) + { + VERIFY_PERMISSION (OPT_P_CRYPTO); + if (streq (p[1], "none")) + options->prng_hash = NULL; + else + options->prng_hash = p[1]; + if (p[2]) + { + const int sl = atoi (p[2]); + if (sl >= NONCE_SECRET_LEN_MIN && sl <= NONCE_SECRET_LEN_MAX) + { + options->prng_nonce_secret_len = sl; + } + else + { + msg (msglevel, "prng parameter nonce_secret_len must be between %d and %d", + NONCE_SECRET_LEN_MIN, NONCE_SECRET_LEN_MAX); + goto err; + } + } + } + else if (streq (p[0], "no-replay")) + { + VERIFY_PERMISSION (OPT_P_CRYPTO); + options->replay = false; + } + else if (streq (p[0], "replay-window")) + { + VERIFY_PERMISSION (OPT_P_CRYPTO); + if (p[1]) + { + int replay_window; + + replay_window = atoi (p[1]); + if (!(MIN_SEQ_BACKTRACK <= replay_window && replay_window <= MAX_SEQ_BACKTRACK)) + { + msg (msglevel, "replay-window window size parameter (%d) must be between %d and %d", + replay_window, + MIN_SEQ_BACKTRACK, + MAX_SEQ_BACKTRACK); + goto err; + } + options->replay_window = replay_window; + + if (p[2]) + { + int replay_time; + + replay_time = atoi (p[2]); + if (!(MIN_TIME_BACKTRACK <= replay_time && replay_time <= MAX_TIME_BACKTRACK)) + { + msg (msglevel, "replay-window time window parameter (%d) must be between %d and %d", + replay_time, + MIN_TIME_BACKTRACK, + MAX_TIME_BACKTRACK); + goto err; + } + options->replay_time = replay_time; + } + } + else + { + msg (msglevel, "replay-window option is missing window size parameter"); + goto err; + } + } + else if (streq (p[0], "mute-replay-warnings")) + { + VERIFY_PERMISSION (OPT_P_CRYPTO); + options->mute_replay_warnings = true; + } + else if (streq (p[0], "no-iv")) + { + VERIFY_PERMISSION (OPT_P_CRYPTO); + options->use_iv = false; + } + else if (streq (p[0], "replay-persist") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->packet_id_file = p[1]; + } + else if (streq (p[0], "test-crypto")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->test_crypto = true; + } + else if (streq (p[0], "engine")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + if (p[1]) + { + options->engine = p[1]; + } + else + options->engine = "auto"; + } +#ifdef HAVE_EVP_CIPHER_CTX_SET_KEY_LENGTH + else if (streq (p[0], "keysize") && p[1]) + { + int keysize; + + VERIFY_PERMISSION (OPT_P_CRYPTO); + keysize = atoi (p[1]) / 8; + if (keysize < 0 || keysize > MAX_CIPHER_KEY_LENGTH) + { + msg (msglevel, "Bad keysize: %s", p[1]); + goto err; + } + options->keysize = keysize; + } +#endif +#ifdef USE_SSL + else if (streq (p[0], "show-tls")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->show_tls_ciphers = true; + } + else if (streq (p[0], "tls-server")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->tls_server = true; + } + else if (streq (p[0], "tls-client")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->tls_client = true; + } + else if (streq (p[0], "ca") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->ca_file = p[1]; +#if ENABLE_INLINE_FILES + if (streq (p[1], INLINE_FILE_TAG) && p[2]) + { + options->ca_file_inline = p[2]; + } +#endif + } + else if (streq (p[0], "capath") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->ca_path = p[1]; + } + else if (streq (p[0], "dh") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->dh_file = p[1]; +#if ENABLE_INLINE_FILES + if (streq (p[1], INLINE_FILE_TAG) && p[2]) + { + options->dh_file_inline = p[2]; + } +#endif + } + else if (streq (p[0], "cert") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->cert_file = p[1]; +#if ENABLE_INLINE_FILES + if (streq (p[1], INLINE_FILE_TAG) && p[2]) + { + options->cert_file_inline = p[2]; + } +#endif + } +#ifdef WIN32 + else if (streq (p[0], "cryptoapicert") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->cryptoapi_cert = p[1]; + } +#endif + else if (streq (p[0], "key") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->priv_key_file = p[1]; +#if ENABLE_INLINE_FILES + if (streq (p[1], INLINE_FILE_TAG) && p[2]) + { + options->priv_key_file_inline = p[2]; + } +#endif + } + else if (streq (p[0], "pkcs12") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->pkcs12_file = p[1]; +#if ENABLE_INLINE_FILES + if (streq (p[1], INLINE_FILE_TAG) && p[2]) + { + options->pkcs12_file_inline = p[2]; + } +#endif + } + else if (streq (p[0], "askpass")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + if (p[1]) + { + options->key_pass_file = p[1]; + } + else + options->key_pass_file = "stdin"; + } + else if (streq (p[0], "auth-nocache")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + ssl_set_auth_nocache (); + } + else if (streq (p[0], "single-session")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->single_session = true; + } +#ifdef ENABLE_PUSH_PEER_INFO + else if (streq (p[0], "push-peer-info")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->push_peer_info = true; + } +#endif + else if (streq (p[0], "tls-exit")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->tls_exit = true; + } + else if (streq (p[0], "tls-cipher") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->cipher_list = p[1]; + } + else if (streq (p[0], "crl-verify") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->crl_file = p[1]; + } + else if (streq (p[0], "tls-verify") && p[1]) + { + VERIFY_PERMISSION (OPT_P_SCRIPT); + if (!no_more_than_n_args (msglevel, p, 2, NM_QUOTE_HINT)) + goto err; + warn_multiple_script (options->tls_verify, "tls-verify"); + options->tls_verify = string_substitute (p[1], ',', ' ', &options->gc); + } + else if (streq (p[0], "tls-export-cert") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->tls_export_cert = p[1]; + } + else if (streq (p[0], "tls-remote") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->tls_remote = p[1]; + } + else if (streq (p[0], "ns-cert-type") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + if (streq (p[1], "server")) + options->ns_cert_type = NS_SSL_SERVER; + else if (streq (p[1], "client")) + options->ns_cert_type = NS_SSL_CLIENT; + else + { + msg (msglevel, "--ns-cert-type must be 'client' or 'server'"); + goto err; + } + } +#if OPENSSL_VERSION_NUMBER >= 0x00907000L + else if (streq (p[0], "remote-cert-ku")) + { + int j; + + VERIFY_PERMISSION (OPT_P_GENERAL); + + for (j = 1; j < MAX_PARMS && p[j] != NULL; ++j) + sscanf (p[j], "%x", &(options->remote_cert_ku[j-1])); + } + else if (streq (p[0], "remote-cert-eku") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->remote_cert_eku = p[1]; + } + else if (streq (p[0], "remote-cert-tls") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + + if (streq (p[1], "server")) + { + options->remote_cert_ku[0] = 0xa0; + options->remote_cert_ku[1] = 0x88; + options->remote_cert_eku = "TLS Web Server Authentication"; + } + else if (streq (p[1], "client")) + { + options->remote_cert_ku[0] = 0x80; + options->remote_cert_ku[1] = 0x08; + options->remote_cert_ku[2] = 0x88; + options->remote_cert_eku = "TLS Web Client Authentication"; + } + else + { + msg (msglevel, "--remote-cert-tls must be 'client' or 'server'"); + goto err; + } + } +#endif /* OPENSSL_VERSION_NUMBER */ + else if (streq (p[0], "tls-timeout") && p[1]) + { + VERIFY_PERMISSION (OPT_P_TLS_PARMS); + options->tls_timeout = positive_atoi (p[1]); + } + else if (streq (p[0], "reneg-bytes") && p[1]) + { + VERIFY_PERMISSION (OPT_P_TLS_PARMS); + options->renegotiate_bytes = positive_atoi (p[1]); + } + else if (streq (p[0], "reneg-pkts") && p[1]) + { + VERIFY_PERMISSION (OPT_P_TLS_PARMS); + options->renegotiate_packets = positive_atoi (p[1]); + } + else if (streq (p[0], "reneg-sec") && p[1]) + { + VERIFY_PERMISSION (OPT_P_TLS_PARMS); + options->renegotiate_seconds = positive_atoi (p[1]); + } + else if (streq (p[0], "hand-window") && p[1]) + { + VERIFY_PERMISSION (OPT_P_TLS_PARMS); + options->handshake_window = positive_atoi (p[1]); + } + else if (streq (p[0], "tran-window") && p[1]) + { + VERIFY_PERMISSION (OPT_P_TLS_PARMS); + options->transition_window = positive_atoi (p[1]); + } + else if (streq (p[0], "tls-auth") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); +#if ENABLE_INLINE_FILES + if (streq (p[1], INLINE_FILE_TAG) && p[2]) + { + options->tls_auth_file_inline = p[2]; + } + else +#endif + if (p[2]) + { + int key_direction; + + key_direction = ascii2keydirection (msglevel, p[2]); + if (key_direction >= 0) + options->key_direction = key_direction; + else + goto err; + } + options->tls_auth_file = p[1]; + } + else if (streq (p[0], "key-method") && p[1]) + { + int key_method; + + VERIFY_PERMISSION (OPT_P_GENERAL); + key_method = atoi (p[1]); + if (key_method < KEY_METHOD_MIN || key_method > KEY_METHOD_MAX) + { + msg (msglevel, "key_method parameter (%d) must be >= %d and <= %d", + key_method, + KEY_METHOD_MIN, + KEY_METHOD_MAX); + goto err; + } + options->key_method = key_method; + } +#ifdef ENABLE_X509ALTUSERNAME + else if (streq (p[0], "x509-username-field") && p[1]) + { + char *s = p[1]; + VERIFY_PERMISSION (OPT_P_GENERAL); + while ((*s = toupper(*s)) != '\0') s++; /* Uppercase if necessary */ + options->x509_username_field = p[1]; + } +#endif /* ENABLE_X509ALTUSERNAME */ +#endif /* USE_SSL */ +#endif /* USE_CRYPTO */ +#ifdef ENABLE_PKCS11 + else if (streq (p[0], "show-pkcs11-ids") && p[1]) + { + char *provider = p[1]; + bool cert_private = (p[2] == NULL ? false : ( atoi (p[2]) != 0 )); + + VERIFY_PERMISSION (OPT_P_GENERAL); + + set_debug_level (options->verbosity, SDL_CONSTRAIN); + show_pkcs11_ids (provider, cert_private); + openvpn_exit (OPENVPN_EXIT_STATUS_GOOD); /* exit point */ + } + else if (streq (p[0], "pkcs11-providers") && p[1]) + { + int j; + + VERIFY_PERMISSION (OPT_P_GENERAL); + + for (j = 1; j < MAX_PARMS && p[j] != NULL; ++j) + options->pkcs11_providers[j-1] = p[j]; + } + else if (streq (p[0], "pkcs11-protected-authentication")) + { + int j; + + VERIFY_PERMISSION (OPT_P_GENERAL); + + for (j = 1; j < MAX_PARMS && p[j] != NULL; ++j) + options->pkcs11_protected_authentication[j-1] = atoi (p[j]) != 0 ? 1 : 0; + } + else if (streq (p[0], "pkcs11-private-mode") && p[1]) + { + int j; + + VERIFY_PERMISSION (OPT_P_GENERAL); + + for (j = 1; j < MAX_PARMS && p[j] != NULL; ++j) + sscanf (p[j], "%x", &(options->pkcs11_private_mode[j-1])); + } + else if (streq (p[0], "pkcs11-cert-private")) + { + int j; + + VERIFY_PERMISSION (OPT_P_GENERAL); + + for (j = 1; j < MAX_PARMS && p[j] != NULL; ++j) + options->pkcs11_cert_private[j-1] = atoi (p[j]) != 0 ? 1 : 0; + } + else if (streq (p[0], "pkcs11-pin-cache") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->pkcs11_pin_cache_period = atoi (p[1]); + } + else if (streq (p[0], "pkcs11-id") && p[1]) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->pkcs11_id = p[1]; + } + else if (streq (p[0], "pkcs11-id-management")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->pkcs11_id_management = true; + } +#endif +#ifdef TUNSETPERSIST + else if (streq (p[0], "rmtun")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->persist_config = true; + options->persist_mode = 0; + } + else if (streq (p[0], "mktun")) + { + VERIFY_PERMISSION (OPT_P_GENERAL); + options->persist_config = true; + options->persist_mode = 1; + } +#endif + else + { + if (file) + msg (msglevel_fc, "Unrecognized option or missing parameter(s) in %s:%d: %s (%s)", file, line, p[0], PACKAGE_VERSION); + else + msg (msglevel_fc, "Unrecognized option or missing parameter(s): --%s (%s)", p[0], PACKAGE_VERSION); + } + err: + gc_free (&gc); +} -- cgit v1.2.3