Project

General

Profile

Download (65.5 KB) Statistics
| Branch: | Tag: | Revision:
1
<?php
2
/*
3
 * openvpn.inc
4
 *
5
 * part of pfSense (https://www.pfsense.org)
6
 * Copyright (c) 2006 Fernando Lemos
7
 * Copyright (c) 2006-2013 BSD Perimeter
8
 * Copyright (c) 2013-2016 Electric Sheep Fencing
9
 * Copyright (c) 2014-2021 Rubicon Communications, LLC (Netgate)
10
 * All rights reserved.
11
 *
12
 * This file was rewritten from scratch by Fernando Lemos but
13
 * *MIGHT* contain code previously written by:
14
 *
15
 * Copyright (c) 2005 Peter Allgeyer <allgeyer_AT_web.de>
16
 * Copyright (c) 2004 Peter Curran (peter@closeconsultants.com).
17
 * All rights reserved.
18
 *
19
 * Licensed under the Apache License, Version 2.0 (the "License");
20
 * you may not use this file except in compliance with the License.
21
 * You may obtain a copy of the License at
22
 *
23
 * http://www.apache.org/licenses/LICENSE-2.0
24
 *
25
 * Unless required by applicable law or agreed to in writing, software
26
 * distributed under the License is distributed on an "AS IS" BASIS,
27
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
28
 * See the License for the specific language governing permissions and
29
 * limitations under the License.
30
 */
31

    
32
require_once('config.inc');
33
require_once("certs.inc");
34
require_once('pfsense-utils.inc');
35
require_once("auth.inc");
36

    
37
global $openvpn_prots;
38
$openvpn_prots = array(
39
	"UDP4" => "UDP on IPv4 only",
40
	"UDP6" => "UDP on IPv6 only",
41
	"TCP4" => "TCP on IPv4 only",
42
	"TCP6" => "TCP on IPv6 only",
43
	"UDP" => "UDP IPv4 and IPv6 on all interfaces (multihome)",
44
	"TCP" => "TCP IPv4 and IPv6 on all interfaces (multihome)"
45
);
46

    
47
global $openvpn_dev_mode;
48
$openvpn_dev_mode = array(
49
	"tun" => "tun - Layer 3 Tunnel Mode",
50
	"tap" => "tap - Layer 2 Tap Mode"
51
);
52

    
53
global $openvpn_verbosity_level;
54
$openvpn_verbosity_level = array(
55
	0 =>	gettext("none"),
56
	1 =>	gettext("default"),
57
	2 =>	"2",
58
	3 =>	gettext("3 (recommended)"),
59
	4 =>	"4",
60
	5 => 	"5",
61
	6 => 	"6",
62
	7 => 	"7",
63
	8 => 	"8",
64
	9 => 	"9",
65
	10 => 	"10",
66
	11 => 	"11"
67
);
68

    
69
/*
70
 * The User Auth mode below is disabled because
71
 * OpenVPN erroneously requires that we provide
72
 * a CA configuration parameter. In this mode,
73
 * clients don't send a certificate so there is
74
 * no need for a CA. If we require that admins
75
 * provide one in the pfSense UI due to a bogus
76
 * requirement imposed by OpenVPN, it could be
77
 * considered very confusing ( I know I was ).
78
 *
79
 * -mgrooms
80
 */
81

    
82
global $openvpn_dh_lengths;
83
$openvpn_dh_lengths = array(
84
	1024 => "1024 bit",
85
	2048 => "2048 bit",
86
	3072 => "3072 bit",
87
	4096 => "4096 bit",
88
	6144 => "6144 bit",
89
	7680 => "7680 bit",
90
	8192 => "8192 bit",
91
	15360 => "15360 bit",
92
	16384 => "16384 bit",
93
	"none" => "ECDH Only"
94
);
95
foreach ($openvpn_dh_lengths as $idx => $dhlen) {
96
	if (is_numeric($idx) && !file_exists("/etc/dh-parameters.{$idx}")) {
97
		unset($openvpn_dh_lengths[$idx]);
98
	}
99
}
100

    
101
global $openvpn_cert_depths;
102
$openvpn_cert_depths = array(
103
	1 => gettext("One (Client+Server)"),
104
	2 => gettext("Two (Client+Intermediate+Server)"),
105
	3 => gettext("Three (Client+2xIntermediate+Server)"),
106
	4 => gettext("Four (Client+3xIntermediate+Server)"),
107
	5 => gettext("Five (Client+4xIntermediate+Server)")
108
);
109

    
110
global $openvpn_server_modes;
111
$openvpn_server_modes = array(
112
	'p2p_tls' => gettext("Peer to Peer ( SSL/TLS )"),
113
	'p2p_shared_key' => gettext("Peer to Peer ( Shared Key )"),
114
	'server_tls' => gettext("Remote Access ( SSL/TLS )"),
115
	'server_user' => gettext("Remote Access ( User Auth )"),
116
	'server_tls_user' => gettext("Remote Access ( SSL/TLS + User Auth )"));
117

    
118
global $openvpn_tls_server_modes;
119
$openvpn_tls_server_modes = array('p2p_tls', 'server_tls', 'server_user', 'server_tls_user');
120

    
121
global $openvpn_client_modes;
122
$openvpn_client_modes = array(
123
	'p2p_tls' => gettext("Peer to Peer ( SSL/TLS )"),
124
	'p2p_shared_key' => gettext("Peer to Peer ( Shared Key )"));
125

    
126
global $openvpn_allow_compression;
127
$openvpn_allow_compression = array(
128
	'asym' => gettext("Decompress incoming, do not compress outgoing (Asymmetric)"),
129
	'no'   => gettext("Refuse any non-stub compression (Most secure)"),
130
	'yes'  => gettext("Compress packets (WARNING: Potentially dangerous!)"),
131
);
132

    
133
global $openvpn_compression_modes;
134
$openvpn_compression_modes = array(
135
	'' => gettext("Disable Compression [Omit Preference]"),
136
	'none' => gettext("Disable Compression, retain compression packet framing [compress]"),
137
	'stub' => gettext("Enable Compression (stub) [compress stub]"),
138
	'stub-v2' => gettext("Enable Compression (stub v2) [compress stub-v2]"),
139
	'lz4' => gettext("LZ4 Compression [compress lz4]"),
140
	'lz4-v2' => gettext("LZ4 Compression v2 [compress lz4-v2]"),
141
	'lzo' => gettext("LZO Compression [compress lzo, equivalent to comp-lzo yes for compatibility]"),
142
	'noadapt' => gettext("Omit Preference, + Disable Adaptive LZO Compression [Legacy style, comp-noadapt]"),
143
	'adaptive' => gettext("Adaptive LZO Compression [Legacy style, comp-lzo adaptive]"),
144
	'yes' => gettext("LZO Compression [Legacy style, comp-lzo yes]"),
145
	'no' => gettext("No LZO Compression [Legacy style, comp-lzo no]"),
146
);
147

    
148
global $openvpn_topologies;
149
$openvpn_topologies = array(
150
	'subnet' => gettext("Subnet -- One IP address per client in a common subnet"),
151
	'net30' => gettext("net30 -- Isolated /30 network per client")
152
);
153

    
154
global $openvpn_tls_modes;
155
$openvpn_tls_modes = array(
156
	'auth' => gettext("TLS Authentication"),
157
	'crypt' => gettext("TLS Encryption and Authentication")
158
);
159

    
160
global $openvpn_ping_method;
161
$openvpn_ping_method = array(
162
	'keepalive' => gettext("keepalive -- Use keepalive helper to define ping configuration"),
163
	'ping' => gettext("ping -- Define ping/ping-exit/ping-restart manually")
164
);
165

    
166
global $openvpn_default_keepalive_interval;
167
$openvpn_default_keepalive_interval = 10;
168

    
169
global $openvpn_default_keepalive_timeout;
170
$openvpn_default_keepalive_timeout = 60;
171

    
172
global $openvpn_ping_action;
173
$openvpn_ping_action = array(
174
	'ping_restart' => gettext("ping-restart -- Restart OpenVPN after timeout"),
175
	'ping_exit' => gettext("ping-exit -- Exit OpenVPN after timeout")
176
);
177

    
178
global $openvpn_exit_notify_server;
179
$openvpn_exit_notify_server = array(
180
	'none' => gettext("Disabled"),
181
	'1' => gettext("Reconnect to this server / Retry once"),
182
	'2' => gettext("Reconnect to next server / Retry twice"),
183
);
184

    
185
global $openvpn_exit_notify_client;
186
$openvpn_exit_notify_client = array(
187
	'none' => gettext("Disabled"),
188
);
189
for ($i=1; $i<=5; $i++) {
190
	$openvpn_exit_notify_client[$i] = sprintf(gettext("Retry %dx"), $i);
191
}
192

    
193
function openvpn_build_mode_list() {
194
	global $openvpn_server_modes;
195

    
196
	$list = array();
197

    
198
	foreach ($openvpn_server_modes as $name => $desc) {
199
		$list[$name] = $desc;
200
	}
201

    
202
	return($list);
203
}
204

    
205
global $openvpn_interfacenames;
206
function convert_openvpn_interface_to_friendly_descr($if) {
207
	global $openvpn_interfacenames;
208
	if (!is_array($openvpn_interfacenames)) {
209
		$openvpn_interfacenames = openvpn_build_if_list();
210
	}
211
	foreach($openvpn_interfacenames as $key => $value) {
212
		list($item_if, $item_ip) = explode("|", $key);
213
		if ($if == $item_if) {
214
			echo "$value";
215
		}
216
	}
217
}
218

    
219
function openvpn_build_if_list() {
220
	$list = array();
221

    
222
	$interfaces = get_configured_interface_with_descr();
223
	$viplist = get_configured_vip_list();
224
	foreach ($viplist as $vip => $address) {
225
		$interfaces[$vip.'|'.$address] = $address;
226
		if (get_vip_descr($address)) {
227
			$interfaces[$vip.'|'.$address] .= " (";
228
			$interfaces[$vip.'|'.$address] .= get_vip_descr($address);
229
			$interfaces[$vip.'|'.$address] .= ")";
230
		}
231
	}
232

    
233
	$grouplist = return_gateway_groups_array();
234
	foreach ($grouplist as $name => $group) {
235
		if ($group[0]['vip'] != "") {
236
			$vipif = $group[0]['vip'];
237
		} else {
238
			$vipif = $group[0]['int'];
239
		}
240

    
241
		$interfaces[$name] = "GW Group {$name}";
242
	}
243

    
244
	$interfaces['lo0'] = "Localhost";
245
	$interfaces['any'] = "any";
246

    
247
	foreach ($interfaces as $iface => $ifacename) {
248
	   $list[$iface] = $ifacename;
249
	}
250

    
251
	return($list);
252
}
253

    
254
function openvpn_build_crl_list() {
255
	global $a_crl;
256

    
257
	$list = array('' => 'None');
258

    
259
	foreach ($a_crl as $crl) {
260
		$caname = "";
261
		$ca = lookup_ca($crl['caref']);
262

    
263
		if ($ca) {
264
			$caname = " (CA: {$ca['descr']})";
265
		}
266

    
267
		$list[$crl['refid']] = $crl['descr'] . $caname;
268
	}
269

    
270
	return($list);
271
}
272

    
273
function openvpn_build_cert_list($include_none = false, $prioritize_server_certs = false) {
274
	global $a_cert;
275
	$openvpn_compatible_certs = cert_build_list('cert', 'OpenVPN');
276

    
277
	if ($include_none) {
278
		$list = array('' => gettext('None (Username and/or Password required)'));
279
	} else {
280
		$list = array();
281
	}
282

    
283
	$non_server_list = array();
284

    
285
	if ($prioritize_server_certs) {
286
		$list[' '] = gettext("===== Server Certificates =====");
287
		$non_server_list['  '] = gettext("===== Non-Server Certificates =====");
288
	}
289

    
290
	foreach ($a_cert as $cert) {
291
		if (!array_key_exists($cert['refid'], $openvpn_compatible_certs)) {
292
			continue;
293
		}
294
		$properties = array();
295
		$propstr = "";
296
		$ca = lookup_ca($cert['caref']);
297
		$purpose = cert_get_purpose($cert['crt'], true);
298

    
299
		if ($purpose['server'] == "Yes") {
300
			$properties[] = gettext("Server: Yes");
301
		} elseif ($prioritize_server_certs) {
302
			$properties[] = gettext("Server: NO");
303
		}
304
		if ($ca) {
305
			$properties[] = sprintf(gettext("CA: %s"), $ca['descr']);
306
		}
307
		if (cert_in_use($cert['refid'])) {
308
			$properties[] = gettext("In Use");
309
		}
310
		if (is_cert_revoked($cert)) {
311
			$properties[] = gettext("Revoked");
312
		}
313

    
314
		if (!empty($properties)) {
315
			$propstr = " (" . implode(", ", $properties) . ")";
316
		}
317

    
318
		if ($prioritize_server_certs) {
319
			if ($purpose['server'] == "Yes") {
320
				$list[$cert['refid']] = $cert['descr'] . $propstr;
321
			} else {
322
				$non_server_list[$cert['refid']] = $cert['descr'] . $propstr;
323
			}
324
		} else {
325
			$list[$cert['refid']] = $cert['descr'] . $propstr;
326
		}
327
	}
328

    
329
	return(array('server' => $list, 'non-server' => $non_server_list));
330
}
331

    
332
function openvpn_build_bridge_list() {
333
	$list = array();
334

    
335
	$serverbridge_interface['none'] = "none";
336
	$serverbridge_interface = array_merge($serverbridge_interface, get_configured_interface_with_descr());
337
	$viplist = get_configured_vip_list();
338

    
339
	foreach ($viplist as $vip => $address) {
340
		$serverbridge_interface[$vip.'|'.$address] = $address;
341
		if (get_vip_descr($address)) {
342
			$serverbridge_interface[$vip.'|'.$address] .= " (". get_vip_descr($address) .")";
343
		}
344
	}
345

    
346
	foreach ($serverbridge_interface as $iface => $ifacename) {
347
		$list[$iface] = htmlspecialchars($ifacename);
348
	}
349

    
350
	return($list);
351
}
352

    
353
function openvpn_create_key() {
354

    
355
	$fp = popen("/usr/local/sbin/openvpn --genkey secret /dev/stdout 2>/dev/null", "r");
356
	if (!$fp) {
357
		return false;
358
	}
359

    
360
	$rslt = stream_get_contents($fp);
361
	pclose($fp);
362

    
363
	return $rslt;
364
}
365

    
366
function openvpn_create_dhparams($bits) {
367

    
368
	$fp = popen("/usr/bin/openssl dhparam {$bits} 2>/dev/null", "r");
369
	if (!$fp) {
370
		return false;
371
	}
372

    
373
	$rslt = stream_get_contents($fp);
374
	pclose($fp);
375

    
376
	return $rslt;
377
}
378

    
379
function openvpn_vpnid_used($vpnid) {
380
	global $config;
381

    
382
	if (is_array($config['openvpn']['openvpn-server'])) {
383
		foreach ($config['openvpn']['openvpn-server'] as & $settings) {
384
			if ($vpnid == $settings['vpnid']) {
385
				return true;
386
			}
387
		}
388
	}
389

    
390
	if (is_array($config['openvpn']['openvpn-client'])) {
391
		foreach ($config['openvpn']['openvpn-client'] as & $settings) {
392
			if ($vpnid == $settings['vpnid']) {
393
				return true;
394
			}
395
		}
396
	}
397

    
398
	return false;
399
}
400

    
401
function openvpn_vpnid_next() {
402

    
403
	$vpnid = 1;
404
	while (openvpn_vpnid_used($vpnid)) {
405
		$vpnid++;
406
	}
407

    
408
	return $vpnid;
409
}
410

    
411
function openvpn_port_used($prot, $interface, $port, $curvpnid = 0) {
412
	global $config;
413

    
414
	$ovpn_settings = array();
415
	if (is_array($config['openvpn']['openvpn-server'])) {
416
		$ovpn_settings = $config['openvpn']['openvpn-server'];
417
	}
418
	if (is_array($config['openvpn']['openvpn-client'])) {
419
		$ovpn_settings = array_merge($ovpn_settings,
420
		    $config['openvpn']['openvpn-client']);
421
	}
422

    
423
	foreach ($ovpn_settings as $settings) {
424
		if (isset($settings['disable'])) {
425
			continue;
426
		}
427

    
428
		if ($curvpnid != 0 && $curvpnid == $settings['vpnid']) {
429
			continue;
430
		}
431

    
432
		/* (TCP|UDP)(4|6) does not conflict unless interface is any */
433
		if (($interface != "any" && $settings['interface'] != "any") &&
434
		    (strlen($prot) == 4) &&
435
		    (strlen($settings['protocol']) == 4) &&
436
		    substr($prot,0,3) == substr($settings['protocol'],0,3) &&
437
		    substr($prot,3,1) != substr($settings['protocol'],3,1)) {
438
			continue;
439
		}
440

    
441
		if ($port == $settings['local_port'] &&
442
		    substr($prot,0,3) == substr($settings['protocol'],0,3) &&
443
		    ($interface == $settings['interface'] ||
444
		    $interface == "any" || $settings['interface'] == "any")) {
445
			return $settings['vpnid'];
446
		}
447
	}
448

    
449
	return 0;
450
}
451

    
452
function openvpn_port_next($prot, $interface = "wan") {
453

    
454
	$port = 1194;
455
	while (openvpn_port_used($prot, $interface, $port)) {
456
		$port++;
457
	}
458
	while (openvpn_port_used($prot, "any", $port)) {
459
		$port++;
460
	}
461

    
462
	return $port;
463
}
464

    
465
function openvpn_get_cipherlist() {
466

    
467
	$ciphers = array();
468
	$cipher_out = shell_exec('/usr/local/sbin/openvpn --show-ciphers | /usr/bin/grep \'(.*key\' | sed \'s/, TLS client\/server mode only//\'');
469
	$cipher_lines = explode("\n", trim($cipher_out));
470
	sort($cipher_lines);
471
	foreach ($cipher_lines as $line) {
472
		$words = explode(' ', $line, 2);
473
		$ciphers[$words[0]] = "{$words[0]} {$words[1]}";
474
	}
475
	$ciphers["none"] = gettext("None (No Encryption)");
476
	return $ciphers;
477
}
478

    
479
function openvpn_get_curvelist() {
480
	global $cert_curve_compatible;
481
	$curves = array();
482
	$curves["none"] = gettext("Use Default");
483
	foreach ($cert_curve_compatible['OpenVPN'] as $curve) {
484
		$curves[$curve] = $curve;
485
	}
486
	return $curves;
487
}
488

    
489
function openvpn_validate_curve($curve) {
490
	$curves = openvpn_get_curvelist();
491
	return array_key_exists($curve, $curves);
492
}
493

    
494
/* Obtain the list of digest algorithms supported by openssl and their alternate names */
495
function openvpn_get_openssldigestmappings() {
496
	$digests = array();
497
	$digest_out = shell_exec('/usr/bin/openssl list-message-digest-algorithms | /usr/bin/grep "=>"');
498
	$digest_lines = explode("\n", trim($digest_out));
499
	sort($digest_lines);
500
	foreach ($digest_lines as $line) {
501
		$words = explode(' => ', $line, 2);
502
		$digests[$words[0]] = $words[1];
503
	}
504
	return $digests;
505
}
506

    
507
/* Obtain the list of digest algorithms supported by openvpn */
508
function openvpn_get_digestlist() {
509
	/* Grab the list from OpenSSL to check for duplicates or aliases */
510
	$openssl_digest_mappings = openvpn_get_openssldigestmappings();
511
	$digests = array();
512
	$digest_out = shell_exec('/usr/local/sbin/openvpn --show-digests | /usr/bin/grep "digest size" | /usr/bin/awk \'{print $1, "(" $2 "-" $3 ")";}\'');
513
	$digest_lines = explode("\n", trim($digest_out));
514
	sort($digest_lines);
515
	foreach ($digest_lines as $line) {
516
		$words = explode(' ', $line);
517
		/* Only add the entry if it is NOT also listed as being an alias/mapping by OpenSSL */
518
		if (!array_key_exists($words[0], $openssl_digest_mappings)) {
519
			$digests[$words[0]] = "{$words[0]} {$words[1]}";
520
		}
521
	}
522
	$digests["none"] = gettext("None (No Authentication)");
523
	return $digests;
524
}
525

    
526
/* Check to see if a digest name is an alias and if so, find the actual digest
527
 * algorithm instead. Useful for upgrade code that has to translate aliased
528
 * algorithms to their actual names.
529
 */
530
function openvpn_remap_digest($digest) {
531
	$openssl_digest_mappings = openvpn_get_openssldigestmappings();
532
	if (array_key_exists($digest, $openssl_digest_mappings)) {
533
		/* Some mappings point to other mappings, keep going until we find the actual digest algorithm */
534
		if (array_key_exists($openssl_digest_mappings[$digest], $openssl_digest_mappings)) {
535
			return openvpn_remap_digest($openssl_digest_mappings[$digest]);
536
		} else {
537
			return $openssl_digest_mappings[$digest];
538
		}
539
	}
540
	return $digest;
541
}
542

    
543
function openvpn_get_keydirlist() {
544
	$keydirs = array(
545
		'default'  => gettext('Use default direction'),
546
		'0' => gettext('Direction 0'),
547
		'1' => gettext('Direction 1'),
548
		'2' => gettext('Both directions'),
549
	);
550
	return $keydirs;
551
}
552

    
553
function openvpn_get_engines() {
554
	$openssl_engines = array('none' => gettext('No Hardware Crypto Acceleration'));
555
	exec("/usr/bin/openssl engine -t -c", $openssl_engine_output);
556
	$openssl_engine_output = implode("\n", $openssl_engine_output);
557
	$openssl_engine_output = preg_replace("/\\n\\s+/", "|", $openssl_engine_output);
558
	$openssl_engine_output = explode("\n", $openssl_engine_output);
559

    
560
	foreach ($openssl_engine_output as $oeo) {
561
		$keep = true;
562
		$details = explode("|", $oeo);
563
		$engine = array_shift($details);
564
		$linematch = array();
565
		preg_match("/\((.*)\)\s(.*)/", $engine, $linematch);
566
		foreach ($details as $dt) {
567
			if (strpos($dt, "unavailable") !== FALSE) {
568
				$keep = false;
569
			}
570
			if (strpos($dt, "available") !== FALSE) {
571
				continue;
572
			}
573
			if (strpos($dt, "[") !== FALSE) {
574
				$ciphers = trim($dt, "[]");
575
			}
576
		}
577
		if (!empty($ciphers)) {
578
			$ciphers = " - " . $ciphers;
579
		}
580
		if (strlen($ciphers) > 60) {
581
			$ciphers = substr($ciphers, 0, 60) . " ... ";
582
		}
583
		if ($keep) {
584
			$openssl_engines[$linematch[1]] = $linematch[2] . $ciphers;
585
		}
586
	}
587
	return $openssl_engines;
588
}
589

    
590
function openvpn_get_buffer_values() {
591
	$sendbuf_max = get_single_sysctl('net.inet.tcp.sendbuf_max');
592
	$recvbuf_max = get_single_sysctl('net.inet.tcp.recvbuf_max');
593
	/* Usually these two are equal, but if they are not, take whichever one is lower. */
594
	$buffer_max = ($sendbuf_max <= $recvbuf_max) ? $sendbuf_max : $recvbuf_max;
595
	$buffer_values = array('' => gettext('Default'));
596
	for ($bs = 32; $bs >= 1; $bs /= 2) {
597
		$buffer_values[$buffer_max/$bs] = format_bytes($buffer_max/$bs);
598
	}
599
	return $buffer_values;
600
}
601

    
602
function openvpn_validate_engine($engine) {
603
	$engines = openvpn_get_engines();
604
	return array_key_exists($engine, $engines);
605
}
606

    
607
function openvpn_validate_host($value, $name) {
608
	$value = trim($value);
609
	if (empty($value) || (!is_domain($value) && !is_ipaddr($value))) {
610
		return sprintf(gettext("The field '%s' must contain a valid IP address or domain name."), $name);
611
	}
612
	return false;
613
}
614

    
615
function openvpn_validate_port($value, $name, $first_port = 0) {
616
	$value = trim($value);
617
	if (!is_numeric($first_port)) {
618
		$first_port = 0;
619
	}
620
	if (empty($value) || !is_numeric($value) || $value < $first_port || ($value > 65535)) {
621
		return sprintf(gettext("The field '%s' must contain a valid port, ranging from %s to 65535."), $name, $first_port);
622
	}
623
	return false;
624
}
625

    
626
function openvpn_validate_cidr($value, $name, $multiple = false, $ipproto = "ipv4") {
627
	$value = trim($value);
628
	$error = false;
629
	if (empty($value)) {
630
		return false;
631
	}
632
	$networks = explode(',', $value);
633

    
634
	if (!$multiple && (count($networks) > 1)) {
635
		return sprintf(gettext("The field '%1\$s' must contain a single valid %2\$s CIDR range."), $name, $ipproto);
636
	}
637

    
638
	foreach ($networks as $network) {
639
		if ($ipproto == "ipv4") {
640
			$error = !openvpn_validate_cidr_ipv4($network);
641
		} else {
642
			$error = !openvpn_validate_cidr_ipv6($network);
643
		}
644
		if ($error) {
645
			break;
646
		}
647
	}
648

    
649
	if ($error) {
650
		return sprintf(gettext("The field '%1\$s' must contain only valid %2\$s CIDR range(s) separated by commas."), $name, $ipproto);
651
	} else {
652
		return false;
653
	}
654
}
655

    
656
function openvpn_validate_cidr_ipv4($value) {
657
	$value = trim($value);
658
	if (!empty($value)) {
659
		list($ip, $mask) = explode('/', $value);
660
		if (!is_ipaddrv4($ip) or !is_numeric($mask) or ($mask > 32) or ($mask < 0)) {
661
			return false;
662
		}
663
	}
664
	return true;
665
}
666

    
667
function openvpn_validate_cidr_ipv6($value) {
668
	$value = trim($value);
669
	if (!empty($value)) {
670
		list($ipv6, $prefix) = explode('/', $value);
671
		if (empty($prefix)) {
672
			$prefix = "128";
673
		}
674
		if (!is_ipaddrv6($ipv6) or !is_numeric($prefix) or ($prefix > 128) or ($prefix < 0)) {
675
			return false;
676
		}
677
	}
678
	return true;
679
}
680

    
681
function openvpn_add_dhcpopts(& $settings, & $conf) {
682

    
683
	if (!empty($settings['dns_domain'])) {
684
		$conf .= "push \"dhcp-option DOMAIN {$settings['dns_domain']}\"\n";
685
	}
686

    
687
	if (!empty($settings['dns_server1'])) {
688
		$dnstype = (is_ipaddrv6($settings['dns_server1'])) ? "DNS6" : "DNS";
689
		$conf .= "push \"dhcp-option {$dnstype} {$settings['dns_server1']}\"\n";
690
	}
691
	if (!empty($settings['dns_server2'])) {
692
		$dnstype = (is_ipaddrv6($settings['dns_server2'])) ? "DNS6" : "DNS";
693
		$conf .= "push \"dhcp-option {$dnstype} {$settings['dns_server2']}\"\n";
694
	}
695
	if (!empty($settings['dns_server3'])) {
696
		$dnstype = (is_ipaddrv6($settings['dns_server3'])) ? "DNS6" : "DNS";
697
		$conf .= "push \"dhcp-option {$dnstype} {$settings['dns_server3']}\"\n";
698
	}
699
	if (!empty($settings['dns_server4'])) {
700
		$dnstype = (is_ipaddrv6($settings['dns_server4'])) ? "DNS6" : "DNS";
701
		$conf .= "push \"dhcp-option {$dnstype} {$settings['dns_server4']}\"\n";
702
	}
703

    
704
	if (!empty($settings['push_blockoutsidedns'])) {
705
		$conf .= "push \"block-outside-dns\"\n";
706
	}
707
	if (!empty($settings['push_register_dns'])) {
708
		$conf .= "push \"register-dns\"\n";
709
	}
710

    
711
	if (!empty($settings['ntp_server1'])) {
712
		$conf .= "push \"dhcp-option NTP {$settings['ntp_server1']}\"\n";
713
	}
714
	if (!empty($settings['ntp_server2'])) {
715
		$conf .= "push \"dhcp-option NTP {$settings['ntp_server2']}\"\n";
716
	}
717

    
718
	if ($settings['netbios_enable']) {
719

    
720
		if (!empty($settings['dhcp_nbttype']) && ($settings['dhcp_nbttype'] != 0)) {
721
			$conf .= "push \"dhcp-option NBT {$settings['dhcp_nbttype']}\"\n";
722
		}
723
		if (!empty($settings['dhcp_nbtscope'])) {
724
			$conf .= "push \"dhcp-option NBS {$settings['dhcp_nbtscope']}\"\n";
725
		}
726

    
727
		if (!empty($settings['wins_server1'])) {
728
			$conf .= "push \"dhcp-option WINS {$settings['wins_server1']}\"\n";
729
		}
730
		if (!empty($settings['wins_server2'])) {
731
			$conf .= "push \"dhcp-option WINS {$settings['wins_server2']}\"\n";
732
		}
733

    
734
		if (!empty($settings['nbdd_server1'])) {
735
			$conf .= "push \"dhcp-option NBDD {$settings['nbdd_server1']}\"\n";
736
		}
737
	}
738

    
739
	if ($settings['gwredir']) {
740
		$conf .= "push \"redirect-gateway def1\"\n";
741
	}
742
	if ($settings['gwredir6']) {
743
		$conf .= "push \"redirect-gateway ipv6\"\n";
744
	}
745
}
746

    
747
function openvpn_add_custom(& $settings, & $conf) {
748

    
749
	if ($settings['custom_options']) {
750

    
751
		$options = explode(';', $settings['custom_options']);
752

    
753
		if (is_array($options)) {
754
			foreach ($options as $option) {
755
				$conf .= "$option\n";
756
			}
757
		} else {
758
			$conf .= "{$settings['custom_options']}\n";
759
		}
760
	}
761
}
762

    
763
function openvpn_add_keyfile(& $data, & $conf, $mode_id, $directive, $opt = "") {
764
	global $g;
765

    
766
	$fpath = "{$g['openvpn_base']}/{$mode_id}/{$directive}";
767
	openvpn_create_dirs();
768
	file_put_contents($fpath, base64_decode($data));
769
	//chown($fpath, 'nobody');
770
	//chgrp($fpath, 'nobody');
771
	@chmod($fpath, 0600);
772

    
773
	$conf .= "{$directive} {$fpath} {$opt}\n";
774
}
775

    
776
function openvpn_reconfigure($mode, $settings) {
777
	global $g, $config, $openvpn_tls_server_modes, $openvpn_dh_lengths, $openvpn_default_keepalive_interval, $openvpn_default_keepalive_timeout;
778

    
779
	if (empty($settings)) {
780
		return;
781
	}
782
	if (isset($settings['disable'])) {
783
		return;
784
	}
785
	openvpn_create_dirs();
786
	/*
787
	 * NOTE: Deleting tap devices causes spontaneous reboots. Instead,
788
	 * we use a vpnid number which is allocated for a particular client
789
	 * or server configuration. ( see openvpn_vpnid_next() )
790
	 */
791

    
792
	$vpnid = $settings['vpnid'];
793
	$mode_id = $mode.$vpnid;
794

    
795
	if (isset($settings['dev_mode'])) {
796
		$tunname = "{$settings['dev_mode']}{$vpnid}";
797
	} else {
798
		/* defaults to tun */
799
		$tunname = "tun{$vpnid}";
800
		$settings['dev_mode'] = "tun";
801
	}
802

    
803
	if ($mode == "server") {
804
		$devname = "ovpns{$vpnid}";
805
	} else {
806
		$devname = "ovpnc{$vpnid}";
807
	}
808

    
809
	/* is our device already configured */
810
	if (!does_interface_exist($devname)) {
811

    
812
		/* create the tap device if required */
813
		if (!file_exists("/dev/{$tunname}")) {
814
			exec("/sbin/ifconfig " . escapeshellarg($tunname) . " create");
815
		}
816

    
817
		/* rename the device */
818
		mwexec("/sbin/ifconfig " . escapeshellarg($tunname) . " name " . escapeshellarg($devname));
819

    
820
		/* add the device to the openvpn group and make sure it's UP*/
821
		mwexec("/sbin/ifconfig " . escapeshellarg($devname) . " group openvpn up");
822

    
823
		$ifname = convert_real_interface_to_friendly_interface_name($devname);
824
		$grouptmp = link_interface_to_group($ifname);
825
		if (!empty($grouptmp)) {
826
			array_walk($grouptmp, 'interface_group_add_member');
827
		}
828
		unset($grouptmp, $ifname);
829
	}
830

    
831
	$pfile = $g['varrun_path'] . "/openvpn_{$mode_id}.pid";
832
	$proto = strtolower($settings['protocol']);
833
	if (substr($settings['protocol'], 0, 3) == "TCP") {
834
			$proto = "{$proto}-{$mode}";
835
	}
836
	$dev_mode = $settings['dev_mode'];
837
	$fbcipher = $settings['data_ciphers_fallback'];
838
	// OpenVPN defaults to SHA1, so use it when unset to maintain compatibility.
839
	$digest = !empty($settings['digest']) ? $settings['digest'] : "SHA1";
840

    
841
	$interface = get_failover_interface($settings['interface']);
842
	// The IP address in the settings can be an IPv4 or IPv6 address associated with the interface
843
	$ipaddr = $settings['ipaddr'];
844

    
845
	// If a specific ip address (VIP) is requested, use it.
846
	// Otherwise, if a specific interface is requested, use it
847
	// If "any" interface was selected, local directive will be omitted.
848
	if (is_ipaddrv4($ipaddr)) {
849
		$iface_ip = $ipaddr;
850
	} elseif (!empty($interface) && strcmp($interface, "any")) {
851
		$iface_ip=get_interface_ip($interface);
852
	}
853
	if (is_ipaddrv6($ipaddr)) {
854
		$iface_ipv6 = $ipaddr;
855
	} elseif (!empty($interface) && strcmp($interface, "any")) {
856
		$iface_ipv6=get_interface_ipv6($interface);
857
	}
858

    
859
	$conf = "dev {$devname}\n";
860
	if (isset($settings['verbosity_level'])) {
861
		$conf .= "verb {$settings['verbosity_level']}\n";
862
	}
863

    
864
	$conf .= "dev-type {$settings['dev_mode']}\n";
865
	$conf .= "dev-node /dev/{$tunname}\n";
866
	$conf .= "writepid {$pfile}\n";
867
	$conf .= "#user nobody\n";
868
	$conf .= "#group nobody\n";
869
	$conf .= "script-security 3\n";
870
	$conf .= "daemon\n";
871

    
872
	if (!empty($settings['inactive_seconds'])) {
873
		$conf .= "inactive {$settings['inactive_seconds']}\n";
874
	}
875

    
876
	if (!empty($settings['ping_method']) &&
877
	    $settings['ping_method'] == 'ping') {
878
		$conf .= "ping {$settings['ping_seconds']}\n";
879

    
880
		if (!empty($settings['ping_push'])) {
881
			$conf .= "push \"ping {$settings['ping_seconds']}\"\n";
882
		}
883

    
884
		$action = str_replace("_", "-", $settings['ping_action']);
885
		$conf .= "{$action} {$settings['ping_action_seconds']}\n";
886

    
887
		if (!empty($settings['ping_action_push'])) {
888
			$conf .= "push \"{$action} " .
889
			    "{$settings['ping_action_seconds']}\"\n";
890
		}
891
	} else {
892
		$conf .= "keepalive " .
893
		    ($settings['keepalive_interval']
894
			?: $openvpn_default_keepalive_interval) . " " .
895
		    ($settings['keepalive_timeout']
896
			?: $openvpn_default_keepalive_timeout) . "\n";
897
	}
898

    
899
	$conf .= "ping-timer-rem\n";
900
	$conf .= "persist-tun\n";
901
	$conf .= "persist-key\n";
902
	$conf .= "proto {$proto}\n";
903
	$conf .= "auth {$digest}\n";
904
	$conf .= "up /usr/local/sbin/ovpn-linkup\n";
905
	$conf .= "down /usr/local/sbin/ovpn-linkdown\n";
906
	if (file_exists("/usr/local/sbin/openvpn.attributes.sh")) {
907
		switch ($settings['mode']) {
908
			case 'server_user':
909
			case 'server_tls_user':
910
				$conf .= "client-connect /usr/local/sbin/openvpn.attributes.sh\n";
911
				$conf .= "client-disconnect /usr/local/sbin/openvpn.attributes.sh\n";
912
				break;
913
		}
914
	}
915
	if ($settings['dev_mode'] === 'tun' && isset($config['unbound']['enable']) && isset($config['unbound']['regovpnclients'])) {
916
		if (($settings['mode'] == 'server_tls') || ($settings['mode'] == 'server_tls_user') ||
917
		    (($settings['mode'] == 'server_user') && ($settings['username_as_common_name'] == 'enabled'))) {
918
			$domain = !empty($settings['dns_domain']) ? $settings['dns_domain'] : $config['system']['domain'];
919
			if (is_domain($domain)) {
920
				$conf .= "learn-address \"/usr/local/sbin/openvpn.learn-address.sh $domain\"\n";
921
			}
922
		}
923
	}
924

    
925
	/*
926
	 * When binding specific address, wait cases where interface is in
927
	 * tentative state otherwise it will fail
928
	 */
929
	$wait_tentative = false;
930

    
931
	/* Determine the local IP to use - and make sure it matches with the selected protocol. */
932
	switch ($settings['protocol']) {
933
		case 'UDP':
934
		case 'TCP':
935
			$conf .= "multihome\n";
936
			break;
937
		case 'UDP4':
938
		case 'TCP4':
939
			if (is_ipaddrv4($iface_ip)) {
940
				$conf .= "local {$iface_ip}\n";
941
			}
942
			if ($settings['interface'] == "any") {
943
				$conf .= "multihome\n";
944
			}
945
			break;
946
		case 'UDP6':
947
		case 'TCP6':
948
			if (is_ipaddrv6($iface_ipv6)) {
949
				$conf .= "local {$iface_ipv6}\n";
950
				$wait_tentative = true;
951
			}
952
			if ($settings['interface'] == "any") {
953
				$conf .= "multihome\n";
954
			}
955
			break;
956
		default:
957
	}
958

    
959
	if (openvpn_validate_engine($settings['engine']) && ($settings['engine'] != "none")) {
960
		$conf .= "engine {$settings['engine']}\n";
961
	}
962

    
963
	// server specific settings
964
	if ($mode == 'server') {
965

    
966
		list($ip, $cidr) = explode('/', trim($settings['tunnel_network']));
967
		list($ipv6, $prefix) = explode('/', trim($settings['tunnel_networkv6']));
968
		$mask = gen_subnet_mask($cidr);
969

    
970
		// configure tls modes
971
		switch ($settings['mode']) {
972
			case 'p2p_tls':
973
			case 'server_tls':
974
			case 'server_user':
975
			case 'server_tls_user':
976
				$conf .= "tls-server\n";
977
				break;
978
		}
979

    
980
		// configure p2p/server modes
981
		switch ($settings['mode']) {
982
			case 'p2p_tls':
983
				// If the CIDR is less than a /30, OpenVPN will complain if you try to
984
				//  use the server directive. It works for a single client without it.
985
				//  See ticket #1417
986
				if ((!empty($ip) && !empty($mask)) ||
987
				    (!empty($ipv6) && !empty($prefix))) {
988
					$add_ccd = false;
989
					if (is_ipaddr($ip) && ($cidr < 30)) {
990
						$add_ccd = true;
991
						$conf .= "server {$ip} {$mask}\n";
992
					}
993
					if (is_ipaddr($ipv6)) {
994
						$add_ccd = true;
995
						$conf .= "server-ipv6 {$ipv6}/{$prefix}\n";
996
					}
997
					if ($add_ccd) {
998
						$conf .= "client-config-dir {$g['openvpn_base']}/server{$vpnid}/csc\n";
999
					}
1000
				}
1001
			case 'p2p_shared_key':
1002
				if (!empty($ip) && !empty($mask)) {
1003
					list($ip1, $ip2) = openvpn_get_interface_ip($ip, $cidr);
1004
					if ($settings['dev_mode'] == 'tun') {
1005
						$conf .= "ifconfig {$ip1} {$ip2}\n";
1006
					} else {
1007
						$conf .= "ifconfig {$ip1} {$mask}\n";
1008
					}
1009
				}
1010
				if (!empty($ipv6) && !empty($prefix)) {
1011
					list($ipv6_1, $ipv6_2) = openvpn_get_interface_ipv6($ipv6, $prefix);
1012
					if ($settings['dev_mode'] == 'tun') {
1013
						$conf .= "ifconfig-ipv6 {$ipv6_1} {$ipv6_2}\n";
1014
					} else {
1015
						$conf .= "ifconfig-ipv6 {$ipv6_1} {$prefix}\n";
1016
					}
1017
				}
1018
				break;
1019
			case 'server_tls':
1020
			case 'server_user':
1021
			case 'server_tls_user':
1022
				if ((!empty($ip) && !empty($mask)) ||
1023
				    (!empty($ipv6) && !empty($prefix))) {
1024
					if (is_ipaddr($ip)) {
1025
						$conf .= "server {$ip} {$mask}\n";
1026
					}
1027
					if (is_ipaddr($ipv6)) {
1028
						$conf .= "server-ipv6 {$ipv6}/{$prefix}\n";
1029
					}
1030
					$conf .= "client-config-dir {$g['openvpn_base']}/server{$vpnid}/csc\n";
1031
				} else {
1032
					if ($settings['serverbridge_dhcp']) {
1033
						if ((!empty($settings['serverbridge_interface'])) && (strcmp($settings['serverbridge_interface'], "none"))) {
1034
							$biface_ip=get_interface_ip($settings['serverbridge_interface']);
1035
							$biface_sm=gen_subnet_mask(get_interface_subnet($settings['serverbridge_interface']));
1036
							if (is_ipaddrv4($biface_ip) && is_ipaddrv4($settings['serverbridge_dhcp_start']) && is_ipaddrv4($settings['serverbridge_dhcp_end'])) {
1037
								$conf .= "server-bridge {$biface_ip} {$biface_sm} {$settings['serverbridge_dhcp_start']} {$settings['serverbridge_dhcp_end']}\n";
1038
								$conf .= "client-config-dir {$g['openvpn_base']}/server{$vpnid}/csc\n";
1039
							} else {
1040
								$conf .= "mode server\n";
1041
							}
1042
							if (!empty($settings['serverbridge_routegateway']) && is_ipaddrv4($biface_ip)) {
1043
								$conf .= "push \"route-gateway {$biface_ip}\"\n";
1044
							}
1045
							/* OpenVPN doesn't support this yet, clients do not recognize the option fully.
1046
							$biface_ip6=get_interface_ipv6($settings['serverbridge_interface']);
1047
							if (!empty($settings['serverbridge_routegateway']) && is_ipaddrv6($biface_ip6)) {
1048
								$conf .= "push \"route-ipv6-gateway {$biface_ip6}\"\n";
1049
							}
1050
							*/
1051
						} else {
1052
							$conf .= "mode server\n";
1053
						}
1054
					}
1055
				}
1056
				break;
1057
		}
1058

    
1059
		// configure user auth modes
1060
		switch ($settings['mode']) {
1061
			case 'server_user':
1062
				$conf .= "verify-client-cert none\n";
1063
			case 'server_tls_user':
1064
				/* username-as-common-name is not compatible with server-bridge */
1065
				if ((stristr($conf, "server-bridge") === false) &&
1066
				    ($settings['username_as_common_name'] != 'disabled')) {
1067
					$conf .= "username-as-common-name\n";
1068
				}
1069
				if (!empty($settings['authmode'])) {
1070
					$strictusercn = "false";
1071
					if ($settings['strictusercn']) {
1072
						$strictusercn = "true";
1073
					}
1074
					$conf .= "plugin /usr/local/lib/openvpn/plugins/openvpn-plugin-auth-script.so /usr/local/sbin/ovpn_auth_verify_async user " . base64_encode($settings['authmode']) . " {$strictusercn} {$mode_id} {$settings['local_port']}\n";
1075
				}
1076
				break;
1077
		}
1078
		if (!isset($settings['cert_depth']) && (strstr($settings['mode'], 'tls'))) {
1079
			$settings['cert_depth'] = 1;
1080
		}
1081
		if (is_numeric($settings['cert_depth'])) {
1082
			if (($mode == 'client') && empty($settings['certref'])) {
1083
				$cert = "";
1084
			} else {
1085
				$cert = lookup_cert($settings['certref']);
1086
				/* XXX: Seems not used at all! */
1087
				$servercn = urlencode(cert_get_cn($cert['crt']));
1088
				$conf .= "tls-verify \"/usr/local/sbin/ovpn_auth_verify tls '{$servercn}' {$settings['cert_depth']}\"\n";
1089
			}
1090
		}
1091

    
1092
		// The local port to listen on
1093
		$conf .= "lport {$settings['local_port']}\n";
1094

    
1095
		// The management port to listen on
1096
		// Use unix socket to overcome the problem on any type of server
1097
		$conf .= "management {$g['openvpn_base']}/{$mode_id}/sock unix\n";
1098
		//$conf .= "management 127.0.0.1 {$settings['local_port']}\n";
1099

    
1100
		if ($settings['maxclients']) {
1101
			$conf .= "max-clients {$settings['maxclients']}\n";
1102
		}
1103

    
1104
		// Can we push routes, and should we?
1105
		if ($settings['local_network'] && !$settings['gwredir']) {
1106
			$conf .= openvpn_gen_routes($settings['local_network'], "ipv4", true);
1107
		}
1108
		if ($settings['local_networkv6'] && !$settings['gwredir6']) {
1109
			$conf .= openvpn_gen_routes($settings['local_networkv6'], "ipv6", true);
1110
		}
1111

    
1112
		switch ($settings['mode']) {
1113
			case 'server_tls':
1114
			case 'server_user':
1115
			case 'server_tls_user':
1116
				// Configure client dhcp options
1117
				openvpn_add_dhcpopts($settings, $conf);
1118
				if ($settings['client2client']) {
1119
					$conf .= "client-to-client\n";
1120
				}
1121
				break;
1122
		}
1123
		if ($settings['mode'] != 'p2p_shared_key' &&
1124
		    isset($settings['duplicate_cn'])) {
1125
			$conf .= "duplicate-cn\n";
1126
		}
1127
	}
1128

    
1129
	// client specific settings
1130

    
1131
	if ($mode == 'client') {
1132

    
1133
		// configure p2p mode
1134
		switch ($settings['mode']) {
1135
			case 'p2p_tls':
1136
				$conf .= "tls-client\n";
1137
			case 'shared_key':
1138
				$conf .= "client\n";
1139
				break;
1140
		}
1141

    
1142
		// If there is no bind option at all (ip and/or port), add "nobind" directive
1143
		//  Otherwise, use the local port if defined, failing that, use lport 0 to
1144
		//  ensure a random source port.
1145
		if ((empty($iface_ip)) && empty($iface_ipv6) && (!$settings['local_port'])) {
1146
			$conf .= "nobind\n";
1147
		} elseif ($settings['local_port']) {
1148
			$conf .= "lport {$settings['local_port']}\n";
1149
		} else {
1150
			$conf .= "lport 0\n";
1151
		}
1152

    
1153
		// Use unix socket to overcome the problem on any type of server
1154
		$conf .= "management {$g['openvpn_base']}/{$mode_id}/sock unix\n";
1155

    
1156
		// The remote server
1157
		$remoteproto = strtolower($settings['protocol']);
1158
		if (substr($remoteproto, 0, 3) == "tcp") {
1159
			$remoteproto .= "-{$mode}";
1160
		}
1161
		$conf .= "remote {$settings['server_addr']} {$settings['server_port']} {$remoteproto}\n";
1162

    
1163
		if (!empty($settings['use_shaper'])) {
1164
			$conf .= "shaper {$settings['use_shaper']}\n";
1165
		}
1166

    
1167
		if (!empty($settings['tunnel_network'])) {
1168
			list($ip, $cidr) = explode('/', trim($settings['tunnel_network']));
1169
			$mask = gen_subnet_mask($cidr);
1170
			list($ip1, $ip2) = openvpn_get_interface_ip($ip, $cidr);
1171
			if ($settings['dev_mode'] == 'tun') {
1172
				$conf .= "ifconfig {$ip2} {$ip1}\n";
1173
			} else {
1174
				$conf .= "ifconfig {$ip2} {$mask}\n";
1175
			}
1176
		}
1177

    
1178
		if (!empty($settings['tunnel_networkv6'])) {
1179
			list($ipv6, $prefix) = explode('/', trim($settings['tunnel_networkv6']));
1180
			list($ipv6_1, $ipv6_2) = openvpn_get_interface_ipv6($ipv6, $prefix);
1181
			if ($settings['dev_mode'] == 'tun') {
1182
				$conf .= "ifconfig-ipv6 {$ipv6_2} {$ipv6_1}\n";
1183
			} else {
1184
				$conf .= "ifconfig-ipv6 {$ipv6_2} {$prefix}\n";
1185
			}
1186
		}
1187

    
1188
		if (($settings['auth_user'] || $settings['auth_pass']) && $settings['mode'] == "p2p_tls") {
1189
			$up_file = "{$g['openvpn_base']}/{$mode_id}/up";
1190
			$conf .= "auth-user-pass {$up_file}\n";
1191
			if (!$settings['auth-retry-none']) {
1192
				$conf .= "auth-retry nointeract\n";
1193
			}
1194
			if ($settings['auth_user']) {
1195
				$userpass = "{$settings['auth_user']}\n";
1196
			} else {
1197
				$userpass = "";
1198
			}
1199
			if ($settings['auth_pass']) {
1200
				$userpass .= "{$settings['auth_pass']}\n";
1201
			}
1202
			// If only auth_pass is given, then it acts like a user name and we put a blank line where pass would normally go.
1203
			if (!($settings['auth_user'] && $settings['auth_pass'])) {
1204
				$userpass .= "\n";
1205
			}
1206
			file_put_contents($up_file, $userpass);
1207
		}
1208

    
1209
		if ($settings['proxy_addr']) {
1210
			$conf .= "http-proxy {$settings['proxy_addr']} {$settings['proxy_port']}";
1211
			if ($settings['proxy_authtype'] != "none") {
1212
				$conf .= " {$g['openvpn_base']}/{$mode_id}/proxy_auth {$settings['proxy_authtype']}";
1213
				$proxypas = "{$settings['proxy_user']}\n";
1214
				$proxypas .= "{$settings['proxy_passwd']}\n";
1215
				file_put_contents("{$g['openvpn_base']}/{$mode_id}/proxy_auth", $proxypas);
1216
			}
1217
			$conf .= " \n";
1218
		}
1219
	}
1220

    
1221
	// Add a remote network route if set, and only for p2p modes.
1222
	if ((substr($settings['mode'], 0, 3) == "p2p") && (openvpn_validate_cidr($settings['remote_network'], "", true, "ipv4") === FALSE)) {
1223
		$conf .= openvpn_gen_routes($settings['remote_network'], "ipv4", false);
1224
	}
1225
	// Add a remote network route if set, and only for p2p modes.
1226
	if ((substr($settings['mode'], 0, 3) == "p2p") && (openvpn_validate_cidr($settings['remote_networkv6'], "", true, "ipv6") === FALSE)) {
1227
		$conf .= openvpn_gen_routes($settings['remote_networkv6'], "ipv6", false);
1228
	}
1229

    
1230
	// Write the settings for the keys
1231
	switch ($settings['mode']) {
1232
		case 'p2p_shared_key':
1233
			openvpn_add_keyfile($settings['shared_key'], $conf, $mode_id, "secret");
1234
			break;
1235
		case 'p2p_tls':
1236
		case 'server_tls':
1237
		case 'server_tls_user':
1238
		case 'server_user':
1239
			// ca_chain_array() expects parameter to be passed by reference.
1240
			// avoid passing the whole settings array, as param names or
1241
			// types might change in future releases.
1242
			$param = array('caref' => $settings['caref']);
1243
			$cas = ca_chain_array($param);
1244
			$capath = "{$g['openvpn_base']}/{$mode_id}/ca";
1245
			/* Cleanup old CA/CRL references */
1246
			@unlink_if_exists("{$capath}.*0");
1247
			/* Find the CRL listed in the settings */
1248
			if (!empty($settings['crlref'])) {
1249
				$crl = lookup_crl($settings['crlref']);
1250
				crl_update($crl);
1251
			}
1252
			/* For each CA in the chain, setup the CApath */
1253
			foreach ($cas as $ca) {
1254
				ca_setup_capath($ca, $capath, $crl);
1255
			}
1256
			$conf .= "capath {$capath}\n";
1257
			unset($cas, $param);
1258

    
1259
			if (!empty($settings['certref'])) {
1260
				$cert = lookup_cert($settings['certref']);
1261
				openvpn_add_keyfile($cert['crt'], $conf, $mode_id, "cert");
1262
				openvpn_add_keyfile($cert['prv'], $conf, $mode_id, "key");
1263
			}
1264
			if ($mode == 'server') {
1265
				if (is_numeric($settings['dh_length'])) {
1266
					if (!in_array($settings['dh_length'], array_keys($openvpn_dh_lengths))) {
1267
						/* The user selected a DH parameter length that does not have a corresponding file. */
1268
						log_error(gettext("Failed to construct OpenVPN server configuration. The selected DH Parameter length cannot be used."));
1269
						return;
1270
					}
1271
					$dh_file = "{$g['etc_path']}/dh-parameters.{$settings['dh_length']}";
1272
				} else {
1273
					$dh_file = $settings['dh_length'];
1274
				}
1275
				$conf .= "dh {$dh_file}\n";
1276
				if (!empty($settings['ecdh_curve']) && ($settings['ecdh_curve'] != "none") && openvpn_validate_curve($settings['ecdh_curve'])) {
1277
					$conf .= "ecdh-curve {$settings['ecdh_curve']}\n";
1278
				}
1279
			}
1280
			if ($settings['tls']) {
1281
				if ($settings['tls_type'] == "crypt") {
1282
					$tls_directive = "tls-crypt";
1283
					$tlsopt = "";
1284
				} else {
1285
					$tls_directive = "tls-auth";
1286
					if ($mode == "server") {
1287
						switch($settings['tlsauth_keydir']){
1288
							case '1':
1289
								$tlsopt = 1;
1290
								break;
1291
							case '2':
1292
								$tlsopt = '';
1293
								break;
1294
							default:
1295
								$tlsopt = 0;
1296
								break;
1297
						}
1298
					} else {
1299
						switch($settings['tlsauth_keydir']){
1300
							case '0':
1301
								$tlsopt = 0;
1302
								break;
1303
							case '2':
1304
								$tlsopt = '';
1305
								break;
1306
							default:
1307
								$tlsopt = 1;
1308
								break;
1309
						}
1310
					}
1311
				}
1312
				openvpn_add_keyfile($settings['tls'], $conf, $mode_id, $tls_directive, $tlsopt);
1313
			}
1314
			break;
1315
	}
1316

    
1317
	/* Data encryption cipher support.
1318
	 * If it is not set, assume enabled since that is OpenVPN's default.
1319
	 * Note that diabling this is now deprecated and will be removed in a future version of OpenVPN */
1320
	if ($settings['ncp_enable'] == "disabled") {
1321
		$conf .= "ncp-disable\n";
1322
		$conf .= "cipher {$fbcipher}\n";
1323
	} else {
1324
		$conf .= "data-ciphers " . str_replace(',', ':', openvpn_build_data_cipher_list($settings['data_ciphers'], $fbcipher)) . "\n";
1325
		$conf .= "data-ciphers-fallback {$fbcipher}\n";
1326
	}
1327

    
1328
	if (!empty($settings['allow_compression'])) {
1329
		$conf .= "allow-compression {$settings['allow_compression']}\n";
1330
	}
1331

    
1332
	$compression = "";
1333
	switch ($settings['compression']) {
1334
		case 'none':
1335
			$settings['compression'] = '';
1336
		case 'lz4':
1337
		case 'lz4-v2':
1338
		case 'lzo':
1339
		case 'stub':
1340
		case 'stub-v2':
1341
			$compression .= "compress {$settings['compression']}";
1342
			break;
1343
		case 'noadapt':
1344
			$compression .= "comp-noadapt";
1345
			break;
1346
		case 'adaptive':
1347
		case 'yes':
1348
		case 'no':
1349
			$compression .= "comp-lzo {$settings['compression']}";
1350
			break;
1351
		default:
1352
			/* Add nothing to the configuration */
1353
			break;
1354
	}
1355

    
1356
	if (($settings['allow_compression'] != 'no') &&
1357
	    !empty($compression)) {
1358
		$conf .= "{$compression}\n";
1359
		if ($settings['compression_push']) {
1360
			$conf .= "push \"{$compression}\"\n";
1361
		}
1362
	}
1363

    
1364
	if ($settings['passtos']) {
1365
		$conf .= "passtos\n";
1366
	}
1367

    
1368
	if ($mode == 'client') {
1369
		$conf .= "resolv-retry infinite\n";
1370
	}
1371

    
1372
	if ($settings['dynamic_ip']) {
1373
		$conf .= "persist-remote-ip\n";
1374
		$conf .= "float\n";
1375
	}
1376

    
1377
	// If the server is not a TLS server or it has a tunnel network CIDR less than a /30, skip this.
1378
	if (in_array($settings['mode'], $openvpn_tls_server_modes) && (!empty($ip) && !empty($mask) && ($cidr < 30)) && $settings['dev_mode'] != "tap") {
1379
		if (empty($settings['topology'])) {
1380
			$settings['topology'] = "subnet";
1381
		}
1382
		$conf .= "topology {$settings['topology']}\n";
1383
	}
1384

    
1385
	// New client features
1386
	if ($mode == "client") {
1387
		// Dont pull routes checkbox
1388
		if ($settings['route_no_pull']) {
1389
			$conf .= "route-nopull\n";
1390
		}
1391

    
1392
		// Dont add/remove routes checkbox
1393
		if ($settings['route_no_exec']) {
1394
			$conf .= "route-noexec\n";
1395
		}
1396
	}
1397

    
1398
	/* UDP Fast I/O. Only compatible with UDP and also not compatible with OpenVPN's "shaper" directive. */
1399
	if ($settings['udp_fast_io']
1400
	    && (strtolower(substr($settings['protocol'], 0, 3)) == "udp")
1401
	    && (empty($settings['use_shaper']))) {
1402
		$conf .= "fast-io\n";
1403
	}
1404

    
1405
	/* Exit Notify. Only compatible with UDP. */
1406
	if (!empty($settings['exit_notify']) &&
1407
	    is_numericint($settings['exit_notify']) &&
1408
	    (strtolower(substr($settings['protocol'], 0, 3)) == "udp")) {
1409
		$conf .= "explicit-exit-notify {$settings['exit_notify']}\n";
1410
	}
1411

    
1412
	/* Send and Receive Buffer Settings */
1413
	if (is_numericint($settings['sndrcvbuf'])
1414
	    && ($settings['sndrcvbuf'] > 0)
1415
	    && ($settings['sndrcvbuf'] <= get_single_sysctl('net.inet.tcp.sendbuf_max'))
1416
	    && ($settings['sndrcvbuf'] <= get_single_sysctl('net.inet.tcp.recvbuf_max'))) {
1417
		$conf .= "sndbuf {$settings['sndrcvbuf']}\n";
1418
		$conf .= "rcvbuf {$settings['sndrcvbuf']}\n";
1419
	}
1420

    
1421
	openvpn_add_custom($settings, $conf);
1422

    
1423
	openvpn_create_dirs();
1424
	$fpath = "{$g['openvpn_base']}/{$mode_id}/config.ovpn";
1425
	file_put_contents($fpath, $conf);
1426
	unset($conf);
1427
	$fpath = "{$g['openvpn_base']}/{$mode_id}/interface";
1428
	file_put_contents($fpath, $interface);
1429
	//chown($fpath, 'nobody');
1430
	//chgrp($fpath, 'nobody');
1431
	@chmod("{$g['openvpn_base']}/{$mode_id}/config.ovpn", 0600);
1432
	@chmod("{$g['openvpn_base']}/{$mode_id}/interface", 0600);
1433
	@chmod("{$g['openvpn_base']}/{$mode_id}/key", 0600);
1434
	@chmod("{$g['openvpn_base']}/{$mode_id}/tls-auth", 0600);
1435
	@chmod("{$g['openvpn_base']}/{$mode_id}/conf", 0600);
1436

    
1437
	if ($wait_tentative) {
1438
		interface_wait_tentative($interface);
1439
	}
1440
}
1441

    
1442
function openvpn_restart($mode, $settings) {
1443
	global $g, $config;
1444

    
1445
	$vpnid = $settings['vpnid'];
1446
	$mode_id = $mode.$vpnid;
1447
	$lockhandle = lock("openvpnservice{$mode_id}", LOCK_EX);
1448
	openvpn_reconfigure($mode, $settings);
1449
	/* kill the process if running */
1450
	$pfile = $g['varrun_path']."/openvpn_{$mode_id}.pid";
1451
	if (file_exists($pfile)) {
1452

    
1453
		/* read the pid file */
1454
		$pid = rtrim(file_get_contents($pfile));
1455
		unlink($pfile);
1456
		syslog(LOG_INFO, "OpenVPN terminate old pid: {$pid}");
1457

    
1458
		/* send a term signal to the process */
1459
		posix_kill($pid, SIGTERM);
1460

    
1461
		/* wait until the process exits, or timeout and kill it */
1462
		$i = 0;
1463
		while (posix_kill($pid, 0)) {
1464
			usleep(250000);
1465
			if ($i > 10) {
1466
				log_error(sprintf(gettext('OpenVPN ID %1$s PID %2$s still running, killing.'), $mode_id, $pid));
1467
				posix_kill($pid, SIGKILL);
1468
				usleep(500000);
1469
			}
1470
			$i++;
1471
		}
1472
	}
1473

    
1474
	if (isset($settings['disable'])) {
1475
		unlock($lockhandle);
1476
		return;
1477
	}
1478

    
1479
	/* Do not start an instance if we are not CARP master on this vip! */
1480
	if (strstr($settings['interface'], "_vip") && !in_array(get_carp_interface_status($settings['interface']), array("MASTER", ""))) {
1481
		unlock($lockhandle);
1482
		return;
1483
	}
1484

    
1485
	/* Check if client is bound to a gateway group */
1486
	$a_groups = return_gateway_groups_array(true);
1487
	if (is_array($a_groups[$settings['interface']])) {
1488
		/* the interface is a gateway group. If a vip is defined and its a CARP backup then do not start */
1489
		if (($a_groups[$settings['interface']][0]['vip'] <> "") && (!in_array(get_carp_interface_status($a_groups[$settings['interface']][0]['vip']), array("MASTER", "")))) {
1490
			unlock($lockhandle);
1491
			return;
1492
		}
1493
	}
1494

    
1495
	/* start the new process */
1496
	$fpath = "{$g['openvpn_base']}/{$mode_id}/config.ovpn";
1497
	openvpn_clear_route($mode, $settings);
1498
	$res = mwexec("/usr/local/sbin/openvpn --config " . escapeshellarg($fpath));
1499
	if ($res == 0) {
1500
		$i = 0;
1501
		$pid = "--";
1502
		while ($i < 3000) {
1503
			if (isvalidpid($pfile)) {
1504
				$pid = rtrim(file_get_contents($pfile));
1505
				break;
1506
			}
1507
			usleep(1000);
1508
			$i++;
1509
		}
1510
		syslog(LOG_INFO, "OpenVPN PID written: {$pid}");
1511
	} else {
1512
		syslog(LOG_ERR, "OpenVPN failed to start");
1513
	}
1514
	if (!platform_booting()) {
1515
		send_event("filter reload");
1516
	}
1517
	unlock($lockhandle);
1518
}
1519

    
1520
function openvpn_delete($mode, $settings) {
1521
	global $g, $config;
1522

    
1523
	$vpnid = $settings['vpnid'];
1524
	$mode_id = $mode.$vpnid;
1525

    
1526
	if ($mode == "server") {
1527
		$devname = "ovpns{$vpnid}";
1528
	} else {
1529
		$devname = "ovpnc{$vpnid}";
1530
	}
1531

    
1532
	/* kill the process if running */
1533
	$pfile = "{$g['varrun_path']}/openvpn_{$mode_id}.pid";
1534
	if (file_exists($pfile)) {
1535

    
1536
		/* read the pid file */
1537
		$pid = trim(file_get_contents($pfile));
1538
		unlink($pfile);
1539

    
1540
		/* send a term signal to the process */
1541
		posix_kill($pid, SIGTERM);
1542
	}
1543

    
1544
	/* destroy the device */
1545
	pfSense_interface_destroy($devname);
1546

    
1547
	/* Invalidate cache */
1548
	get_interface_arr(true);
1549

    
1550
	/* remove the configuration files */
1551
	unlink_if_exists("{$g['openvpn_base']}/{$mode_id}/*/*");
1552
	unlink_if_exists("{$g['openvpn_base']}/{$mode_id}/*");
1553
}
1554

    
1555
function openvpn_resync_csc(& $settings) {
1556
	global $g, $config, $openvpn_tls_server_modes;
1557
	if (isset($settings['disable'])) {
1558
		openvpn_delete_csc($settings);
1559
		return;
1560
	}
1561
	openvpn_create_dirs();
1562

    
1563
	if (empty($settings['server_list'])) {
1564
		$csc_server_list = array();
1565
	} else {
1566
		$csc_server_list = explode(",", $settings['server_list']);
1567
	}
1568

    
1569
	$conf = '';
1570
	if ($settings['block']) {
1571
		$conf .= "disable\n";
1572
	}
1573

    
1574
	if ($settings['push_reset']) {
1575
		$conf .= "push-reset\n";
1576
	}
1577

    
1578
	if ($settings['remove_route']) {
1579
		$conf .= "push-remove route\n";
1580
	}
1581

    
1582
	if ($settings['local_network']) {
1583
		$conf .= openvpn_gen_routes($settings['local_network'], "ipv4", true);
1584
	}
1585
	if ($settings['local_networkv6']) {
1586
		$conf .= openvpn_gen_routes($settings['local_networkv6'], "ipv6", true);
1587
	}
1588

    
1589
	// Add a remote network iroute if set
1590
	if (openvpn_validate_cidr($settings['remote_network'], "", true, "ipv4") === FALSE) {
1591
		$conf .= openvpn_gen_routes($settings['remote_network'], "ipv4", false, true);
1592
	}
1593
	// Add a remote network iroute if set
1594
	if (openvpn_validate_cidr($settings['remote_networkv6'], "", true, "ipv6") === FALSE) {
1595
		$conf .= openvpn_gen_routes($settings['remote_networkv6'], "ipv6", false, true);
1596
	}
1597

    
1598
	openvpn_add_dhcpopts($settings, $conf);
1599

    
1600
	openvpn_add_custom($settings, $conf);
1601
	/* Loop through servers, find which ones can use this CSC */
1602
	if (is_array($config['openvpn']['openvpn-server'])) {
1603
		foreach ($config['openvpn']['openvpn-server'] as $serversettings) {
1604
			if (isset($serversettings['disable'])) {
1605
				continue;
1606
			}
1607
			if (in_array($serversettings['mode'], $openvpn_tls_server_modes)) {
1608
				if ($serversettings['vpnid'] && (empty($csc_server_list) || in_array($serversettings['vpnid'], $csc_server_list))) {
1609
					$csc_path = "{$g['openvpn_base']}/server{$serversettings['vpnid']}/csc/" . basename($settings['common_name']);
1610
					$csc_conf = $conf;
1611

    
1612
					if (!empty($serversettings['tunnel_network']) && !empty($settings['tunnel_network'])) {
1613
						list($ip, $mask) = explode('/', trim($settings['tunnel_network']));
1614
						if (($serversettings['dev_mode'] == 'tap') || ($serversettings['topology'] == "subnet")) {
1615
							$csc_conf .= "ifconfig-push {$ip} " . gen_subnet_mask($mask) . "\n";
1616
						} else {
1617
							/* Because this is being pushed, the order from the client's point of view. */
1618
							$baselong = gen_subnetv4($ip, $mask);
1619
							$serverip = ip_after($baselong, 1);
1620
							$clientip = ip_after($baselong, 2);
1621
							$csc_conf .= "ifconfig-push {$clientip} {$serverip}\n";
1622
						}
1623
					}
1624

    
1625
					if (!empty($serversettings['tunnel_networkv6']) && !empty($settings['tunnel_networkv6'])) {
1626
						list($ipv6, $prefix) = explode('/', trim($serversettings['tunnel_networkv6']));
1627
						list($ipv6_1, $ipv6_2) = openvpn_get_interface_ipv6($ipv6, $prefix);
1628
						$csc_conf .= "ifconfig-ipv6-push {$settings['tunnel_networkv6']} {$ipv6_1}\n";
1629
					}
1630

    
1631
					file_put_contents($csc_path, $csc_conf);
1632
					chown($csc_path, 'nobody');
1633
					chgrp($csc_path, 'nobody');
1634
				}
1635
			}
1636
		}
1637
	}
1638
}
1639

    
1640
function openvpn_resync_csc_all() {
1641
	global $config;
1642
	if (is_array($config['openvpn']['openvpn-csc'])) {
1643
		foreach ($config['openvpn']['openvpn-csc'] as & $settings) {
1644
			openvpn_resync_csc($settings);
1645
		}
1646
	}
1647
}
1648

    
1649
function openvpn_delete_csc(& $settings) {
1650
	global $g, $config, $openvpn_tls_server_modes;
1651
	if (empty($settings['server_list'])) {
1652
		$csc_server_list = array();
1653
	} else {
1654
		$csc_server_list = explode(",", $settings['server_list']);
1655
	}
1656

    
1657
	/* Loop through servers, find which ones used this CSC */
1658
	if (is_array($config['openvpn']['openvpn-server'])) {
1659
		foreach ($config['openvpn']['openvpn-server'] as $serversettings) {
1660
			if (isset($serversettings['disable'])) {
1661
				continue;
1662
			}
1663
			if (in_array($serversettings['mode'], $openvpn_tls_server_modes)) {
1664
				if ($serversettings['vpnid'] && (empty($csc_server_list) || in_array($serversettings['vpnid'], $csc_server_list))) {
1665
					$csc_path = "{$g['openvpn_base']}/server{$serversettings['vpnid']}/csc/" . basename($settings['common_name']);
1666
					unlink_if_exists($csc_path);
1667
				}
1668
			}
1669
		}
1670
	}
1671
}
1672

    
1673
// Resync the configuration and restart the VPN
1674
function openvpn_resync($mode, $settings) {
1675
	openvpn_restart($mode, $settings);
1676
}
1677

    
1678
// Resync and restart all VPNs
1679
function openvpn_resync_all($interface = "") {
1680
	global $g, $config;
1681

    
1682
	openvpn_create_dirs();
1683

    
1684
	if (!is_array($config['openvpn'])) {
1685
		$config['openvpn'] = array();
1686
	}
1687

    
1688
	if ($interface <> "") {
1689
		log_error(sprintf(gettext("Resyncing OpenVPN instances for interface %s."), convert_friendly_interface_to_friendly_descr($interface)));
1690
	} else {
1691
		log_error(gettext("Resyncing OpenVPN instances."));
1692
	}
1693

    
1694
	// Check if OpenVPN clients and servers require a resync.
1695
	foreach (array("server", "client") as $type) {
1696
		if (!is_array($config['openvpn']["openvpn-{$type}"])) {
1697
			continue;
1698
		}
1699
		foreach ($config['openvpn']["openvpn-{$type}"] as & $settings) {
1700
			$fpath = "{$g['openvpn_base']}/{$type}{$settings['vpnid']}/interface";
1701
			$gw_group_change = FALSE;
1702
			$ip_change = ($interface === "") ||
1703
			    ($interface === $settings['interface']);
1704

    
1705
			if (!$ip_change && file_exists($fpath)) {
1706
				$gw_group_change =
1707
				    (trim(file_get_contents($fpath), " \t\n") !=
1708
				    get_failover_interface(
1709
					$settings['interface']));
1710
			}
1711

    
1712
			if ($ip_change || $gw_group_change) {
1713
				openvpn_resync($type, $settings);
1714
			}
1715
		}
1716
	}
1717

    
1718
	openvpn_resync_csc_all();
1719

    
1720
}
1721

    
1722
// Resync and restart all VPNs using a gateway group.
1723
function openvpn_resync_gwgroup($gwgroupname = "") {
1724
	global $g, $config;
1725

    
1726
	if ($gwgroupname <> "") {
1727
		if (is_array($config['openvpn']['openvpn-server'])) {
1728
			foreach ($config['openvpn']['openvpn-server'] as & $settings) {
1729
				if ($gwgroupname == $settings['interface']) {
1730
					log_error(sprintf(gettext('Resyncing OpenVPN for gateway group %1$s server %2$s.'), $gwgroupname, $settings["description"]));
1731
					openvpn_resync('server', $settings);
1732
				}
1733
			}
1734
		}
1735

    
1736
		if (is_array($config['openvpn']['openvpn-client'])) {
1737
			foreach ($config['openvpn']['openvpn-client'] as & $settings) {
1738
				if ($gwgroupname == $settings['interface']) {
1739
					log_error(sprintf(gettext('Resyncing OpenVPN for gateway group %1$s client %2$s.'), $gwgroupname, $settings["description"]));
1740
					openvpn_resync('client', $settings);
1741
				}
1742
			}
1743
		}
1744

    
1745
		// Note: no need to resysnc Client Specific (csc) here, as changes to the OpenVPN real interface do not effect these.
1746

    
1747
	} else {
1748
		log_error(gettext("openvpn_resync_gwgroup called with null gwgroup parameter."));
1749
	}
1750
}
1751

    
1752
function openvpn_get_active_servers($type="multipoint") {
1753
	global $config, $g;
1754

    
1755
	$servers = array();
1756
	if (is_array($config['openvpn']['openvpn-server'])) {
1757
		foreach ($config['openvpn']['openvpn-server'] as & $settings) {
1758
			if (empty($settings) || isset($settings['disable'])) {
1759
				continue;
1760
			}
1761

    
1762
			$prot = $settings['protocol'];
1763
			$port = $settings['local_port'];
1764

    
1765
			$server = array();
1766
			$server['port'] = ($settings['local_port']) ? $settings['local_port'] : 1194;
1767
			$server['mode'] = $settings['mode'];
1768
			if ($settings['description']) {
1769
				$server['name'] = "{$settings['description']} {$prot}:{$port}";
1770
			} else {
1771
				$server['name'] = "Server {$prot}:{$port}";
1772
			}
1773
			$server['conns'] = array();
1774
			$server['vpnid'] = $settings['vpnid'];
1775
			$server['mgmt'] = "server{$server['vpnid']}";
1776
			$socket = "unix://{$g['openvpn_base']}/{$server['mgmt']}/sock";
1777
			list($tn, $sm) = explode('/', trim($settings['tunnel_network']));
1778

    
1779
			if ((($server['mode'] == "p2p_shared_key") || ($sm >= 30)) && ($type == "p2p")) {
1780
				$servers[] = openvpn_get_client_status($server, $socket);
1781
			} elseif (($server['mode'] != "p2p_shared_key") && ($type == "multipoint") && ($sm < 30)) {
1782
				$servers[] = openvpn_get_server_status($server, $socket);
1783
			}
1784
		}
1785
	}
1786
	return $servers;
1787
}
1788

    
1789
function openvpn_get_server_status($server, $socket) {
1790
	$errval = null;
1791
	$errstr = null;
1792
	$fp = @stream_socket_client($socket, $errval, $errstr, 1);
1793
	if ($fp) {
1794
		stream_set_timeout($fp, 1);
1795

    
1796
		/* send our status request */
1797
		fputs($fp, "status 2\n");
1798

    
1799
		/* recv all response lines */
1800
		while (!feof($fp)) {
1801

    
1802
			/* read the next line */
1803
			$line = fgets($fp, 1024);
1804

    
1805
			$info = stream_get_meta_data($fp);
1806
			if ($info['timed_out']) {
1807
				break;
1808
			}
1809

    
1810
			/* parse header list line */
1811
			if (strstr($line, "HEADER")) {
1812
				continue;
1813
			}
1814

    
1815
			/* parse end of output line */
1816
			if (strstr($line, "END") || strstr($line, "ERROR")) {
1817
				break;
1818
			}
1819

    
1820
			/* parse client list line */
1821
			if (strstr($line, "CLIENT_LIST")) {
1822
				$list = explode(",", $line);
1823
				$conn = array();
1824
				$conn['common_name'] = $list[1];
1825
				$conn['remote_host'] = $list[2];
1826
				$conn['virtual_addr'] = $list[3];
1827
				$conn['virtual_addr6'] = $list[4];
1828
				$conn['bytes_recv'] = $list[5];
1829
				$conn['bytes_sent'] = $list[6];
1830
				$conn['connect_time'] = $list[7];
1831
				$conn['connect_time_unix'] = $list[8];
1832
				$conn['user_name'] = $list[9];
1833
				$conn['client_id'] = $list[10];
1834
				$conn['peer_id'] = $list[11];
1835
				$conn['cipher'] = $list[12];
1836
				$server['conns'][] = $conn;
1837
			}
1838
			/* parse routing table lines */
1839
			if (strstr($line, "ROUTING_TABLE")) {
1840
				$list = explode(",", $line);
1841
				$conn = array();
1842
				$conn['virtual_addr'] = $list[1];
1843
				$conn['common_name'] = $list[2];
1844
				$conn['remote_host'] = $list[3];
1845
				$conn['last_time'] = $list[4];
1846
				$server['routes'][] = $conn;
1847
			}
1848
		}
1849

    
1850
		/* cleanup */
1851
		fclose($fp);
1852
	} else {
1853
		$conn = array();
1854
		$conn['common_name'] = "[error]";
1855
		$conn['remote_host'] = gettext("Unable to contact daemon");
1856
		$conn['virtual_addr'] = gettext("Service not running?");
1857
		$conn['bytes_recv'] = 0;
1858
		$conn['bytes_sent'] = 0;
1859
		$conn['connect_time'] = 0;
1860
		$server['conns'][] = $conn;
1861
	}
1862
	return $server;
1863
}
1864

    
1865
function openvpn_get_active_clients() {
1866
	global $config, $g;
1867

    
1868
	$clients = array();
1869
	if (is_array($config['openvpn']['openvpn-client'])) {
1870
		foreach ($config['openvpn']['openvpn-client'] as & $settings) {
1871

    
1872
			if (empty($settings) || isset($settings['disable'])) {
1873
				continue;
1874
			}
1875

    
1876
			$prot = $settings['protocol'];
1877
			$port = ($settings['local_port']) ? ":{$settings['local_port']}" : "";
1878

    
1879
			$client = array();
1880
			$client['port'] = $settings['local_port'];
1881
			if ($settings['description']) {
1882
				$client['name'] = "{$settings['description']} {$prot}{$port}";
1883
			} else {
1884
				$client['name'] = "Client {$prot}{$port}";
1885
			}
1886

    
1887
			$client['vpnid'] = $settings['vpnid'];
1888
			$client['mgmt'] = "client{$client['vpnid']}";
1889
			$socket = "unix://{$g['openvpn_base']}/{$client['mgmt']}/sock";
1890
			$client['status']="down";
1891

    
1892
			$clients[] = openvpn_get_client_status($client, $socket);
1893
		}
1894
	}
1895
	return $clients;
1896
}
1897

    
1898
function openvpn_get_client_status($client, $socket) {
1899
	$errval = null;
1900
	$errstr = null;
1901
	$fp = @stream_socket_client($socket, $errval, $errstr, 1);
1902
	if ($fp) {
1903
		stream_set_timeout($fp, 1);
1904
		/* send our status request */
1905
		fputs($fp, "state 1\n");
1906

    
1907
		/* recv all response lines */
1908
		while (!feof($fp)) {
1909
			/* read the next line */
1910
			$line = fgets($fp, 1024);
1911

    
1912
			$info = stream_get_meta_data($fp);
1913
			if ($info['timed_out']) {
1914
				break;
1915
			}
1916

    
1917
			/* Get the client state */
1918
			if (strstr($line, "CONNECTED")) {
1919
				$client['status'] = "up";
1920
				$list = explode(",", $line);
1921

    
1922
				$client['connect_time'] = date("D M j G:i:s Y", $list[0]);
1923
				$client['virtual_addr'] = $list[3];
1924
				$client['remote_host'] = $list[4];
1925
				$client['remote_port'] = $list[5];
1926
				$client['local_host'] = $list[6];
1927
				$client['local_port'] = $list[7];
1928
				$client['virtual_addr6'] = $list[8];
1929
			}
1930
			if (strstr($line, "CONNECTING")) {
1931
				$client['status'] = "connecting";
1932
			}
1933
			if (strstr($line, "ASSIGN_IP")) {
1934
				$client['status'] = "waiting";
1935
				$list = explode(",", $line);
1936

    
1937
				$client['connect_time'] = date("D M j G:i:s Y", $list[0]);
1938
				$client['virtual_addr'] = $list[3];
1939
			}
1940
			if (strstr($line, "RECONNECTING")) {
1941
				$client['status'] = "reconnecting";
1942
				$list = explode(",", $line);
1943

    
1944
				$client['connect_time'] = date("D M j G:i:s Y", $list[0]);
1945
				$client['status'] .= "; " . $list[2];
1946
			}
1947
			/* parse end of output line */
1948
			if (strstr($line, "END") || strstr($line, "ERROR")) {
1949
				break;
1950
			}
1951
		}
1952

    
1953
		/* If up, get read/write stats */
1954
		if (strcmp($client['status'], "up") == 0) {
1955
			fputs($fp, "status 2\n");
1956
			/* recv all response lines */
1957
			while (!feof($fp)) {
1958
				/* read the next line */
1959
				$line = fgets($fp, 1024);
1960

    
1961
				$info = stream_get_meta_data($fp);
1962
				if ($info['timed_out']) {
1963
					break;
1964
				}
1965

    
1966
				if (strstr($line, "TCP/UDP read bytes")) {
1967
					$list = explode(",", $line);
1968
					$client['bytes_recv'] = $list[1];
1969
				}
1970

    
1971
				if (strstr($line, "TCP/UDP write bytes")) {
1972
					$list = explode(",", $line);
1973
					$client['bytes_sent'] = $list[1];
1974
				}
1975

    
1976
				/* parse end of output line */
1977
				if (strstr($line, "END")) {
1978
					break;
1979
				}
1980
			}
1981
		}
1982

    
1983
		fclose($fp);
1984

    
1985
	} else {
1986
		$client['remote_host'] = gettext("Unable to contact daemon");
1987
		$client['virtual_addr'] = gettext("Service not running?");
1988
		$client['bytes_recv'] = 0;
1989
		$client['bytes_sent'] = 0;
1990
		$client['connect_time'] = 0;
1991
	}
1992
	return $client;
1993
}
1994

    
1995
function openvpn_kill_client($port, $remipp) {
1996
	global $g;
1997

    
1998
	//$tcpsrv = "tcp://127.0.0.1:{$port}";
1999
	$tcpsrv = "unix://{$g['openvpn_base']}/{$port}/sock";
2000
	$errval = null;
2001
	$errstr = null;
2002

    
2003
	/* open a tcp connection to the management port of each server */
2004
	$fp = @stream_socket_client($tcpsrv, $errval, $errstr, 1);
2005
	$killed = -1;
2006
	if ($fp) {
2007
		stream_set_timeout($fp, 1);
2008
		fputs($fp, "kill {$remipp}\n");
2009
		while (!feof($fp)) {
2010
			$line = fgets($fp, 1024);
2011

    
2012
			$info = stream_get_meta_data($fp);
2013
			if ($info['timed_out']) {
2014
				break;
2015
			}
2016

    
2017
			/* parse header list line */
2018
			if (strpos($line, "INFO:") !== false) {
2019
				continue;
2020
			}
2021
			if (strpos($line, "SUCCESS") !== false) {
2022
				$killed = 0;
2023
			}
2024
			break;
2025
		}
2026
		fclose($fp);
2027
	}
2028
	return $killed;
2029
}
2030

    
2031
function openvpn_refresh_crls() {
2032
	global $g, $config;
2033

    
2034
	openvpn_create_dirs();
2035

    
2036
	if (is_array($config['openvpn']['openvpn-server'])) {
2037
		foreach ($config['openvpn']['openvpn-server'] as $settings) {
2038
			if (empty($settings)) {
2039
				continue;
2040
			}
2041
			if (isset($settings['disable'])) {
2042
				continue;
2043
			}
2044
			// Write the settings for the keys
2045
			switch ($settings['mode']) {
2046
				case 'p2p_tls':
2047
				case 'server_tls':
2048
				case 'server_tls_user':
2049
				case 'server_user':
2050
					$param = array('caref' => $settings['caref']);
2051
					$cas = ca_chain_array($param);
2052
					$capath = "{$g['openvpn_base']}/server{$settings['vpnid']}/ca";
2053
					if (!empty($settings['crlref'])) {
2054
						$crl = lookup_crl($settings['crlref']);
2055
						crl_update($crl);
2056
					}
2057
					foreach ($cas as $ca) {
2058
						ca_setup_capath($ca, $capath, $crl, true);
2059
					}
2060
					unset($cas, $param, $capath, $crl);
2061
					break;
2062
			}
2063
		}
2064
	}
2065
}
2066

    
2067
function openvpn_create_dirs() {
2068
	global $g, $config, $openvpn_tls_server_modes;
2069
	if (!is_dir($g['openvpn_base'])) {
2070
		safe_mkdir($g['openvpn_base'], 0750);
2071
	}
2072

    
2073
	init_config_arr(array('openvpn', 'openvpn-server'));
2074
	init_config_arr(array('openvpn', 'openvpn-client'));
2075
	foreach(array('server', 'client') as $mode) {
2076
		foreach ($config['openvpn']["openvpn-{$mode}"] as $settings) {
2077
			$target = "{$g['openvpn_base']}/{$mode}{$settings['vpnid']}";
2078
			@unlink_if_exists($csctarget);
2079
			@safe_mkdir($target);
2080
			if (in_array($settings['mode'], $openvpn_tls_server_modes)) {
2081
				if ($settings['vpnid']) {
2082
					$csctarget = "{$target}/csc/";
2083
					@unlink_if_exists($csctarget);
2084
					@safe_mkdir($csctarget);
2085
				}
2086
			}
2087
		}
2088
	}
2089
}
2090

    
2091
function openvpn_get_interface_ip($ip, $cidr) {
2092
	$subnet = gen_subnetv4($ip, $cidr);
2093
	if ($cidr == 31) {
2094
		$ip1 = $subnet;
2095
	} else {
2096
		$ip1 = ip_after($subnet);
2097
	}
2098
	$ip2 = ip_after($ip1);
2099
	return array($ip1, $ip2);
2100
}
2101

    
2102
function openvpn_get_interface_ipv6($ipv6, $prefix) {
2103
	$basev6 = gen_subnetv6($ipv6, $prefix);
2104
	// Is there a better way to do this math?
2105
	$ipv6_arr = explode(':', $basev6);
2106
	$last = hexdec(array_pop($ipv6_arr));
2107
	if ($prefix == 127) {
2108
		$last--;
2109
	}
2110
	$ipv6_1 = text_to_compressed_ip6(implode(':', $ipv6_arr) . ':' . dechex($last + 1));
2111
	$ipv6_2 = text_to_compressed_ip6(implode(':', $ipv6_arr) . ':' . dechex($last + 2));
2112
	return array($ipv6_1, $ipv6_2);
2113
}
2114

    
2115
function openvpn_clear_route($mode, $settings) {
2116
	if (empty($settings['tunnel_network'])) {
2117
		return;
2118
	}
2119
	list($ip, $cidr) = explode('/', trim($settings['tunnel_network']));
2120
	$mask = gen_subnet_mask($cidr);
2121
	$clear_route = false;
2122

    
2123
	switch ($settings['mode']) {
2124
		case 'shared_key':
2125
			$clear_route = true;
2126
			break;
2127
		case 'p2p_tls':
2128
		case 'p2p_shared_key':
2129
			if ($cidr >= 30) {
2130
				$clear_route = true;
2131
			}
2132
			break;
2133
	}
2134

    
2135
	if ($clear_route && !empty($ip) && !empty($mask)) {
2136
		list($ip1, $ip2) = openvpn_get_interface_ip($ip, $cidr);
2137
		$ip_to_clear = ($mode == "server") ? $ip1 : $ip2;
2138
		/* XXX: Family for route? */
2139
		mwexec("/sbin/route -q delete {$ip_to_clear}");
2140
	}
2141
}
2142

    
2143
function openvpn_gen_routes($value, $ipproto = "ipv4", $push = false, $iroute = false) {
2144
	$routes = "";
2145
	if (empty($value)) {
2146
		return "";
2147
	}
2148
	$networks = explode(',', $value);
2149

    
2150
	foreach ($networks as $network) {
2151
		if ($ipproto == "ipv4") {
2152
			$route = openvpn_gen_route_ipv4($network, $iroute);
2153
		} else {
2154
			$route = openvpn_gen_route_ipv6($network, $iroute);
2155
		}
2156

    
2157
		if ($push) {
2158
			$routes .= "push \"{$route}\"\n";
2159
		} else {
2160
			$routes .= "{$route}\n";
2161
		}
2162
	}
2163
	return $routes;
2164
}
2165

    
2166
function openvpn_gen_route_ipv4($network, $iroute = false) {
2167
	$i = ($iroute) ? "i" : "";
2168
	list($ip, $mask) = explode('/', trim($network));
2169
	$mask = gen_subnet_mask($mask);
2170
	return "{$i}route $ip $mask";
2171
}
2172

    
2173
function openvpn_gen_route_ipv6($network, $iroute = false) {
2174
	$i = ($iroute) ? "i" : "";
2175
	list($ipv6, $prefix) = explode('/', trim($network));
2176
	if (empty($prefix) && !is_numeric($prefix)) {
2177
		$prefix = "128";
2178
	}
2179
	return "{$i}route-ipv6 ${ipv6}/${prefix}";
2180
}
2181

    
2182
function openvpn_get_settings($mode, $vpnid) {
2183
	global $config;
2184

    
2185
	if (is_array($config['openvpn']['openvpn-server'])) {
2186
		foreach ($config['openvpn']['openvpn-server'] as $settings) {
2187
			if (isset($settings['disable'])) {
2188
				continue;
2189
			}
2190

    
2191
			if ($vpnid != 0 && $vpnid == $settings['vpnid']) {
2192
				return $settings;
2193
			}
2194
		}
2195
	}
2196

    
2197
	if (is_array($config['openvpn']['openvpn-client'])) {
2198
		foreach ($config['openvpn']['openvpn-client'] as $settings) {
2199
			if (isset($settings['disable'])) {
2200
				continue;
2201
			}
2202

    
2203
			if ($vpnid != 0 && $vpnid == $settings['vpnid']) {
2204
				return $settings;
2205
			}
2206
		}
2207
	}
2208

    
2209
	return array();
2210
}
2211

    
2212
function openvpn_restart_by_vpnid($mode, $vpnid) {
2213
	$settings = openvpn_get_settings($mode, $vpnid);
2214
	openvpn_restart($mode, $settings);
2215
}
2216

    
2217
/****f* certs/openvpn_is_tunnel_network_in_use
2218
 * NAME
2219
 *   openvpn_is_tunnel_network_in_use
2220
 *     Check if the supplied network is in use as an OpenVPN server or client
2221
 *     tunnel network
2222
 * INPUTS
2223
 *   $net : The IPv4 or IPv6 network to check
2224
 * RESULT
2225
 *   boolean value: true if the network is in use, false otherwise.
2226
 ******/
2227

    
2228
function openvpn_is_tunnel_network_in_use($net) {
2229
	global $config;
2230
	init_config_arr(array('openvpn', 'openvpn-server'));
2231
	init_config_arr(array('openvpn', 'openvpn-client'));
2232
	/* Determine whether to check IPv4 or IPv6 tunnel networks */
2233
	$tocheck = 'tunnel_network';
2234
	if (is_v6($net)) {
2235
		$tocheck .= "v6";
2236
	}
2237
	/* Check all OpenVPN clients and servers for this tunnel network */
2238
	foreach(array('server', 'client') as $mode) {
2239
		foreach ($config['openvpn']["openvpn-{$mode}"] as $ovpn) {
2240
			if (!empty($ovpn[$tocheck]) &&
2241
			    ($ovpn[$tocheck] == $net)) {
2242
				return true;
2243
			}
2244
		}
2245
	}
2246
	return false;
2247
}
2248

    
2249
function openvpn_build_data_cipher_list($data_ciphers = 'AES-256-GCM,AES-128-GCM,CHACHA20-POLY1305', $fallback_cipher = 'AES-256-GBC', $ncp_enabled = true) {
2250
	/* If the data_ciphers list is empty, populate it with the fallback cipher. */
2251
	if (empty($data_ciphers) || !$ncp_enabled) {
2252
		$data_ciphers = $fallback_cipher;
2253
	}
2254
	/* Add the fallback cipher to the data ciphers list if it isn't already present */
2255
	if (!in_array($fallback_cipher, explode(',', $data_ciphers))) {
2256
		$data_ciphers .= ',' . $fallback_cipher;
2257
	}
2258
	return $data_ciphers;
2259
}
2260

    
2261
?>
(33-33/61)