]>
Commit | Line | Data |
---|---|---|
3eae7bed JS |
1 | #!/bin/bash |
2 | ############################################################################### | |
3 | # # | |
4 | # IPFire.org - A linux based firewall # | |
5 | # Copyright (C) 2017 IPFire Network Development Team # | |
6 | # # | |
7 | # This program is free software: you can redistribute it and/or modify # | |
8 | # it under the terms of the GNU General Public License as published by # | |
9 | # the Free Software Foundation, either version 3 of the License, or # | |
10 | # (at your option) any later version. # | |
11 | # # | |
12 | # This program is distributed in the hope that it will be useful, # | |
13 | # but WITHOUT ANY WARRANTY; without even the implied warranty of # | |
14 | # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # | |
15 | # GNU General Public License for more details. # | |
16 | # # | |
17 | # You should have received a copy of the GNU General Public License # | |
18 | # along with this program. If not, see <http://www.gnu.org/licenses/>. # | |
19 | # # | |
20 | ############################################################################### | |
21 | ||
22 | VPN_SECURITY_POLICIES_CONFIG_SETTINGS="CIPHER COMPRESSION GROUP_TYPE INTEGRITY KEY_EXCHANGE LIFETIME PFS" | |
23 | VPN_SECURITY_POLICIES_READONLY="system" | |
24 | ||
6fdbda80 MT |
25 | VPN_DEFAULT_SECURITY_POLICY="system" |
26 | ||
b116ad92 | 27 | declare -A VPN_SUPPORTED_CIPHERS=( |
b68fed1f MT |
28 | # 3DES-CBC |
29 | [3DES-CBC]="168 bit 3DES-EDE-CBC" | |
30 | ||
31 | # AES-CBC | |
b116ad92 MT |
32 | [AES256-CBC]="256 bit AES-CBC" |
33 | [AES192-CBC]="192 bit AES-CBC" | |
34 | [AES128-CBC]="128 bit AES-CBC" | |
b68fed1f MT |
35 | |
36 | # AES-CTR | |
37 | [AES256-CTR]="256 bit AES-COUNTER" | |
38 | [AES192-CTR]="192 bit AES-COUNTER" | |
39 | [AES128-CTR]="128 bit AES-COUNTER" | |
40 | ||
41 | # AES-GCM | |
42 | [AES256-GCM128]="256 bit AES-GCM with 128 bit ICV" | |
43 | [AES192-GCM128]="192 bit AES-GCM with 128 bit ICV" | |
44 | [AES128-GCM128]="128 bit AES-GCM with 128 bit ICV" | |
45 | [AES256-GCM96]="256 bit AES-GCM with 96 bit ICV" | |
46 | [AES192-GCM96]="192 bit AES-GCM with 96 bit ICV" | |
47 | [AES128-GCM96]="128 bit AES-GCM with 96 bit ICV" | |
48 | [AES256-GCM64]="256 bit AES-GCM with 64 bit ICV" | |
49 | [AES192-GCM64]="192 bit AES-GCM with 64 bit ICV" | |
50 | [AES128-GCM64]="128 bit AES-GCM with 64 bit ICV" | |
51 | ||
52 | # AES-CCM | |
53 | [AES256-CCM128]="256 bit AES-CCM with 128 bit ICV" | |
54 | [AES192-CCM128]="192 bit AES-CCM with 128 bit ICV" | |
55 | [AES128-CCM128]="128 bit AES-CCM with 128 bit ICV" | |
56 | [AES256-CCM96]="256 bit AES-CCM with 96 bit ICV" | |
57 | [AES192-CCM96]="192 bit AES-CCM with 96 bit ICV" | |
58 | [AES128-CCM96]="128 bit AES-CCM with 96 bit ICV" | |
59 | [AES256-CCM64]="256 bit AES-CCM with 64 bit ICV" | |
60 | [AES192-CCM64]="192 bit AES-CCM with 64 bit ICV" | |
61 | [AES128-CCM64]="128 bit AES-CCM with 64 bit ICV" | |
62 | ||
63 | # CAMELLIA-CBC | |
64 | [CAMELLIA256-CBC]="256 bit CAMELLIA-CBC" | |
65 | [CAMELLIA192-CBC]="192 bit CAMELLIA-CBC" | |
66 | [CAMELLIA128-CBC]="128 bit CAMELLIA-CBC" | |
67 | ||
68 | # CAMELLIA-CTR | |
69 | [CAMELLIA256-CTR]="256 bit CAMELLIA-COUNTER" | |
70 | [CAMELLIA192-CTR]="192 bit CAMELLIA-COUNTER" | |
71 | [CAMELLIA128-CTR]="128 bit CAMELLIA-COUNTER" | |
72 | ||
73 | # CAMELLIA-GCM | |
74 | [CAMELLIA256-GCM128]="256 bit CAMELLIA-GCM with 128 bit ICV" | |
75 | [CAMELLIA192-GCM128]="192 bit CAMELLIA-GCM with 128 bit ICV" | |
76 | [CAMELLIA128-GCM128]="128 bit CAMELLIA-GCM with 128 bit ICV" | |
77 | [CAMELLIA256-GCM96]="256 bit CAMELLIA-GCM with 96 bit ICV" | |
78 | [CAMELLIA192-GCM96]="192 bit CAMELLIA-GCM with 96 bit ICV" | |
79 | [CAMELLIA128-GCM96]="128 bit CAMELLIA-GCM with 96 bit ICV" | |
80 | [CAMELLIA256-GCM64]="256 bit CAMELLIA-GCM with 64 bit ICV" | |
81 | [CAMELLIA192-GCM64]="192 bit CAMELLIA-GCM with 64 bit ICV" | |
82 | [CAMELLIA128-GCM64]="128 bit CAMELLIA-GCM with 64 bit ICV" | |
83 | ||
84 | # CAMELLIA-CCM | |
85 | [CAMELLIA256-CCM128]="256 bit CAMELLIA-CCM with 128 bit ICV" | |
86 | [CAMELLIA192-CCM128]="192 bit CAMELLIA-CCM with 128 bit ICV" | |
87 | [CAMELLIA128-CCM128]="128 bit CAMELLIA-CCM with 128 bit ICV" | |
88 | [CAMELLIA256-CCM96]="256 bit CAMELLIA-CCM with 96 bit ICV" | |
89 | [CAMELLIA192-CCM96]="192 bit CAMELLIA-CCM with 96 bit ICV" | |
90 | [CAMELLIA128-CCM96]="128 bit CAMELLIA-CCM with 96 bit ICV" | |
91 | [CAMELLIA256-CCM64]="256 bit CAMELLIA-CCM with 64 bit ICV" | |
92 | [CAMELLIA192-CCM64]="192 bit CAMELLIA-CCM with 64 bit ICV" | |
93 | [CAMELLIA128-CCM64]="128 bit CAMELLIA-CCM with 64 bit ICV" | |
b116ad92 MT |
94 | ) |
95 | ||
3a0c376c MT |
96 | declare -A VPN_SUPPORTED_INTEGRITY=( |
97 | [MD5]="MD5-HMAC" | |
98 | ||
99 | # SHA | |
100 | [SHA1]="SHA1-HMAC" | |
3003747b | 101 | [SHA512]="512 bit SHA2-HMAC" |
3a0c376c MT |
102 | [SHA384]="384 bit SHA2-HMAC" |
103 | [SHA256]="256 bit SHA2-HMAC" | |
104 | ||
105 | # AES | |
106 | [AES-XCBC]="AES-XCBC" | |
107 | [AES-CMAC]="AES-CMAC" | |
108 | [AES256-GMAC]="256 bit AES-GMAC" | |
109 | [AES192-GMAC]="192 bit AES-GMAC" | |
110 | [AES128-GMAC]="128 bit AES-GMAC" | |
111 | ) | |
112 | ||
54fc6c3f MT |
113 | declare -A VPN_SUPPORTED_GROUP_TYPES=( |
114 | # Regular Groups | |
115 | [MODP768]="768 bit Modulo Prime Group" | |
116 | [MODP1024]="1024 bit Modulo Prime Group" | |
117 | [MODP1536]="1536 bit Modulo Prime Group" | |
118 | [MODP2048]="2048 bit Modulo Prime Group" | |
119 | [MODP3072]="3072 bit Modulo Prime Group" | |
120 | [MODP4096]="4096 bit Modulo Prime Group" | |
121 | [MODP6144]="6144 bit Modulo Prime Group" | |
122 | [MODP8192]="8192 bit Modulo Prime Group" | |
123 | ||
124 | # NIST Elliptic Curve Groups | |
125 | [ECP192]="192 bit NIST Elliptic Curve Group" | |
126 | [ECP224]="224 bit NIST Elliptic Curve Group" | |
127 | [ECP256]="256 bit NIST Elliptic Curve Group" | |
128 | [ECP384]="384 bit NIST Elliptic Curve Group" | |
129 | [ECP521]="521 bit NIST Elliptic Curve Group" | |
130 | ||
131 | # Brainpool Elliptic Curve Groups | |
132 | [ECP224BP]="224 bit Brainpool Elliptic Curve Group" | |
133 | [ECP256BP]="256 bit Brainpool Elliptic Curve Group" | |
134 | [ECP384BP]="384 bit Brainpool Elliptic Curve Group" | |
135 | [ECP512BP]="512 bit Brainpool Elliptic Curve Group" | |
136 | ||
137 | # Curve25519 | |
138 | [CURVE25519]="256 bit Elliptic Curve 25519" | |
139 | ) | |
3eae7bed | 140 | |
6740c9c5 MT |
141 | # This functions checks if a policy is readonly |
142 | # returns true when yes and false when no | |
3eae7bed | 143 | vpn_security_policies_check_readonly() { |
3eae7bed JS |
144 | if isoneof name ${VPN_SECURITY_POLICIES_READONLY}; then |
145 | return ${EXIT_TRUE} | |
146 | else | |
147 | return ${EXIT_FALSE} | |
148 | fi | |
149 | } | |
150 | ||
6740c9c5 | 151 | # This function writes all values to a via ${name} specificated vpn security policy configuration file |
3eae7bed | 152 | vpn_security_policies_write_config() { |
3eae7bed JS |
153 | assert [ $# -ge 1 ] |
154 | ||
155 | local name="${1}" | |
156 | ||
6740c9c5 | 157 | if ! vpn_security_policy_exists "${name}"; then |
3eae7bed JS |
158 | log ERROR "No such vpn security policy: ${name}" |
159 | return ${EXIT_ERROR} | |
160 | fi | |
161 | ||
6740c9c5 | 162 | if vpn_security_policies_check_readonly "${name}"; then |
3eae7bed JS |
163 | log ERROR "The ${name} vpn security policy cannot be changed." |
164 | return ${EXIT_ERROR} | |
165 | fi | |
166 | ||
6740c9c5 | 167 | local path="$(vpn_security_policies_path "${name}")" |
3eae7bed JS |
168 | if [ ! -w ${path} ]; then |
169 | log ERROR "${path} is not writeable" | |
170 | return ${EXIT_ERROR} | |
171 | fi | |
172 | ||
173 | if ! settings_write "${path}" ${VPN_SECURITY_POLICIES_CONFIG_SETTINGS}; then | |
174 | log ERROR "Could not write configuration settings for vpn security policy ${name}" | |
175 | return ${EXIT_ERROR} | |
176 | fi | |
177 | ||
178 | # TODO everytime we successfully write a config we should call some trigger to take the changes into effect | |
179 | } | |
180 | ||
6740c9c5 | 181 | # This funtion writes the value for one key to a via ${name} specificated vpn security policy configuration file |
3eae7bed | 182 | vpn_security_policies_write_config_key() { |
3eae7bed | 183 | assert [ $# -ge 3 ] |
6740c9c5 | 184 | |
3eae7bed JS |
185 | local name=${1} |
186 | local key=${2} | |
187 | shift 2 | |
6740c9c5 | 188 | |
3eae7bed JS |
189 | local value="$@" |
190 | ||
6740c9c5 | 191 | if ! vpn_security_policy_exists "${name}"; then |
3eae7bed JS |
192 | log ERROR "No such vpn security policy: ${name}" |
193 | return ${EXIT_ERROR} | |
194 | fi | |
195 | ||
196 | log DEBUG "Set '${key}' to new value '${value}' in vpn security policy ${name}" | |
197 | ||
198 | local ${VPN_SECURITY_POLICIES_CONFIG_SETTINGS} | |
199 | ||
200 | # Read the config settings | |
6740c9c5 | 201 | if ! vpn_security_policies_read_config "${name}"; then |
3eae7bed JS |
202 | return ${EXIT_ERROR} |
203 | fi | |
204 | ||
205 | # Set the key to a new value | |
206 | assign "${key}" "${value}" | |
207 | ||
6740c9c5 | 208 | if ! vpn_security_policies_write_config "${name}"; then |
3eae7bed JS |
209 | return ${EXIT_ERROR} |
210 | fi | |
211 | ||
212 | return ${EXIT_TRUE} | |
3eae7bed JS |
213 | } |
214 | ||
6740c9c5 | 215 | # Reads one or more keys out of a settings file or all if no key is provided. |
3eae7bed | 216 | vpn_security_policies_read_config() { |
3eae7bed JS |
217 | assert [ $# -ge 1 ] |
218 | ||
219 | local name="${1}" | |
220 | shift 1 | |
221 | ||
6740c9c5 | 222 | if ! vpn_security_policy_exists "${name}"; then |
3eae7bed JS |
223 | log ERROR "No such vpn security policy: ${name}" |
224 | return ${EXIT_ERROR} | |
225 | fi | |
226 | ||
227 | ||
228 | local args | |
229 | if [ $# -eq 0 ] && [ -n "${VPN_SECURITY_POLICIES_CONFIG_SETTINGS}" ]; then | |
230 | list_append args ${VPN_SECURITY_POLICIES_CONFIG_SETTINGS} | |
231 | else | |
232 | list_append args $@ | |
233 | fi | |
234 | ||
235 | local path="$(vpn_security_policies_path ${name})" | |
236 | ||
237 | if ! settings_read "${path}" ${args}; then | |
238 | log ERROR "Could not read settings for vpn security policy ${name}" | |
239 | return ${EXIT_ERROR} | |
240 | fi | |
241 | } | |
242 | ||
6740c9c5 | 243 | # Returns the path to a the configuration fora given name |
3eae7bed | 244 | vpn_security_policies_path() { |
3eae7bed | 245 | assert [ $# -eq 1 ] |
6740c9c5 | 246 | |
3eae7bed JS |
247 | local name=${1} |
248 | ||
6740c9c5 | 249 | if vpn_security_policies_check_readonly "${name}"; then |
3eae7bed JS |
250 | echo "${NETWORK_SHARE_DIR}/vpn/security-policies/${name}" |
251 | else | |
252 | echo "${NETWORK_CONFIG_DIR}/vpn/security-policies/${name}" | |
253 | fi | |
254 | } | |
255 | ||
6740c9c5 | 256 | # Print the content of a vpn security policy configuration file in a nice way |
3eae7bed | 257 | vpn_security_policies_show() { |
3eae7bed | 258 | assert [ $# -eq 1 ] |
6740c9c5 | 259 | |
3eae7bed JS |
260 | local name=${1} |
261 | ||
262 | local ${VPN_SECURITY_POLICIES_CONFIG_SETTINGS} | |
3eae7bed JS |
263 | if ! vpn_security_policies_read_config ${name}; then |
264 | return ${EXIT_ERROR} | |
265 | fi | |
266 | ||
267 | cli_print_fmt1 0 "Security Policy: ${name}" | |
268 | cli_space | |
269 | ||
270 | # This could be done in a loop but a loop is much more complicated | |
271 | # because we print 'Group Types' but the variable is named 'GROUP_TYPES' | |
272 | cli_print_fmt1 1 "Ciphers:" | |
d21db419 MT |
273 | local cipher |
274 | for cipher in ${CIPHER}; do | |
275 | cli_print_fmt1 2 "${VPN_SUPPORTED_CIPHERS[${cipher}]-${cipher}}" | |
276 | done | |
3eae7bed | 277 | cli_space |
6740c9c5 | 278 | |
3eae7bed | 279 | cli_print_fmt1 1 "Integrity:" |
f3098f76 MT |
280 | local integrity |
281 | for integrity in ${INTEGRITY}; do | |
282 | cli_print_fmt1 2 "${VPN_SUPPORTED_INTEGRITY[${integrity}]-${integrity}}" | |
283 | done | |
3eae7bed | 284 | cli_space |
6740c9c5 | 285 | |
3eae7bed JS |
286 | cli_print_fmt1 1 "Group Types:" |
287 | cli_print_fmt1 2 "${GROUP_TYPE}" | |
288 | cli_space | |
289 | ||
290 | cli_print_fmt1 1 "Key Exchange:" "${KEY_EXCHANGE}" | |
6740c9c5 MT |
291 | |
292 | # Key Lifetime | |
3eae7bed JS |
293 | if isinteger LIFETIME && [ ${LIFETIME} -gt 0 ]; then |
294 | cli_print_fmt1 1 "Key Lifetime:" "$(format_time ${LIFETIME})" | |
295 | else | |
296 | log ERROR "The value for Key Lifetime is not a valid integer greater zero." | |
297 | fi | |
6740c9c5 MT |
298 | |
299 | # PFS | |
3eae7bed JS |
300 | if enabled PFS; then |
301 | cli_print_fmt1 1 "Perfect Forward Secrecy:" "enabled" | |
302 | else | |
303 | cli_print_fmt1 1 "Perfect Forward Secrecy:" "disabled" | |
304 | fi | |
305 | cli_space | |
6740c9c5 MT |
306 | |
307 | # Compression | |
3eae7bed JS |
308 | if enabled COMPRESSION; then |
309 | cli_print_fmt1 1 "Compression:" "enabled" | |
310 | else | |
311 | cli_print_fmt1 1 "Compression:" "disabled" | |
312 | fi | |
313 | cli_space | |
314 | } | |
315 | ||
6740c9c5 MT |
316 | # This function checks if a vpn security policy exists |
317 | # Returns True when yes and false when not | |
3eae7bed | 318 | vpn_security_policy_exists() { |
3eae7bed | 319 | assert [ $# -eq 1 ] |
6740c9c5 | 320 | |
3eae7bed JS |
321 | local name=${1} |
322 | ||
6740c9c5 MT |
323 | local path=$(vpn_security_policies_path "${name}") |
324 | ||
325 | [ -f ${path} ] && return ${EXIT_TRUE} || return ${EXIT_FALSE} | |
3eae7bed JS |
326 | } |
327 | ||
328 | ||
6740c9c5 | 329 | # This function parses the parameters for the 'cipher' command |
3eae7bed | 330 | vpn_security_policies_cipher(){ |
3eae7bed JS |
331 | local name=${1} |
332 | shift | |
333 | ||
334 | if [ $# -eq 0 ]; then | |
335 | log ERROR "You must pass at least one value after cipher" | |
336 | return ${EXIT_ERROR} | |
337 | fi | |
338 | ||
339 | local CIPHER | |
3eae7bed JS |
340 | if ! vpn_security_policies_read_config ${name} "CIPHER"; then |
341 | return ${EXIT_ERROR} | |
342 | fi | |
343 | ||
344 | # Remove duplicated entries to proceed the list safely | |
345 | CIPHER="$(list_unique ${CIPHER})" | |
346 | ||
347 | while [ $# -gt 0 ]; do | |
348 | case "${1}" in | |
349 | -*) | |
350 | value=${1#-} | |
351 | # Check if the cipher is in the list of ciphers and | |
352 | # check if the list has after removing this cipher at least one valid value | |
353 | if list_match ${value} ${CIPHER}; then | |
354 | list_remove CIPHER ${value} | |
355 | else | |
356 | # We do not break here because this error does not break the processing of the next maybe valid values. | |
357 | log ERROR "Can not remove ${value} from the list of Ciphers because ${value} is not in the list." | |
358 | fi | |
359 | ;; | |
360 | +*) | |
361 | value=${1#+} | |
362 | # Check if the Ciphers is in the list of supported ciphers. | |
b116ad92 | 363 | if ! isoneof value ${!VPN_SUPPORTED_CIPHERS[@]}; then |
3eae7bed JS |
364 | # We do not break here because this error does not break the processing of the next maybe valid values. |
365 | log ERROR "${value} is not a supported cipher and can thats why not added to the list of ciphers." | |
366 | else | |
367 | if list_match ${value} ${CIPHER}; then | |
368 | log WARNING "${value} is already in the list of ciphers of this policy." | |
369 | else | |
370 | list_append CIPHER ${value} | |
371 | fi | |
372 | fi | |
373 | ;; | |
374 | esac | |
375 | shift | |
376 | done | |
377 | ||
378 | # Check if the list contain at least one valid cipher | |
379 | if [ $(list_length ${CIPHER}) -ge 1 ]; then | |
380 | if ! vpn_security_policies_write_config_key ${name} "CIPHER" ${CIPHER}; then | |
381 | log ERROR "The changes for the vpn security policy ${name} could not be written." | |
382 | fi | |
383 | else | |
384 | log ERROR "After proceding all ciphers the list is empty and thats why no changes are written." | |
385 | return ${EXIT_ERROR} | |
386 | fi | |
387 | } | |
388 | ||
6740c9c5 | 389 | # This function parses the parameters for the 'compression' command |
3eae7bed | 390 | vpn_security_policies_compression(){ |
3eae7bed JS |
391 | local name=${1} |
392 | local value=${2} | |
393 | ||
394 | # Check if we get only one argument after compression <name> | |
395 | if [ ! $# -eq 2 ]; then | |
396 | log ERROR "The number of arguments do not match. Only one argument after compression is allowed." | |
397 | return ${EXIT_ERROR} | |
398 | fi | |
399 | ||
400 | if ! isbool value; then | |
401 | # We suggest only two values to avoid overburding the user. | |
402 | log ERROR "Invalid Argument ${value}" | |
403 | return ${EXIT_ERROR} | |
404 | fi | |
405 | ||
406 | vpn_security_policies_write_config_key "${name}" "COMPRESSION" "${value}" | |
407 | } | |
408 | ||
6740c9c5 | 409 | # This function parses the parameters for the 'group-type' command |
3eae7bed | 410 | vpn_security_policies_group_type(){ |
3eae7bed JS |
411 | local name=${1} |
412 | shift | |
413 | ||
414 | if [ $# -eq 0 ]; then | |
415 | log ERROR "You must pass at least one value after group-type" | |
416 | return ${EXIT_ERROR} | |
417 | fi | |
418 | ||
419 | local GROUP_TYPE | |
3eae7bed JS |
420 | if ! vpn_security_policies_read_config ${name} "GROUP_TYPE"; then |
421 | return ${EXIT_ERROR} | |
422 | fi | |
423 | ||
424 | # Remove duplicated entries to proceed the list safely | |
425 | GROUP_TYPE="$(list_unique ${GROUP_TYPE})" | |
426 | ||
427 | while [ $# -gt 0 ]; do | |
428 | case "${1}" in | |
429 | -*) | |
430 | value=${1#-} | |
431 | # Check if the group type is in the list of group types and | |
432 | # check if the list has after removing this group type at leatst one valid value | |
433 | if list_match ${value} ${GROUP_TYPE}; then | |
434 | list_remove GROUP_TYPE ${value} | |
435 | else | |
436 | # We do not break here because this error does not break the processing of the next maybe valid values. | |
437 | log ERROR "Can not remove ${value} from the list of group types because ${value} is not in the list." | |
438 | fi | |
439 | ;; | |
440 | +*) | |
441 | value=${1#+} | |
442 | # Check if the group type is in the list of supported group types. | |
54fc6c3f | 443 | if ! isoneof value ${!VPN_SUPPORTED_GROUP_TYPES[@]}; then |
3eae7bed JS |
444 | # We do not break here because the processing of other maybe valid values are indepent from this error. |
445 | log ERROR "${value} is not a supported group type and can thats why not added to the list of group types." | |
446 | else | |
447 | if list_match ${value} ${GROUP_TYPE}; then | |
448 | log WARNING "${value} is already in the list of group-types of this policy." | |
449 | else | |
450 | list_append GROUP_TYPE ${value} | |
451 | fi | |
452 | fi | |
453 | ;; | |
454 | esac | |
455 | shift | |
456 | done | |
457 | ||
458 | # Check if the list contain at least one valid group-type | |
459 | if [ $(list_length ${GROUP_TYPE}) -ge 1 ]; then | |
460 | if ! vpn_security_policies_write_config_key ${name} "GROUP_TYPE" ${GROUP_TYPE}; then | |
461 | log ERROR "The changes for the vpn security policy ${name} could not be written." | |
462 | fi | |
463 | else | |
464 | log ERROR "After proceding all group types the list is empty and thats why no changes are written." | |
465 | return ${EXIT_ERROR} | |
466 | fi | |
467 | } | |
6740c9c5 MT |
468 | |
469 | # This function parses the parameters for the 'integrity' command | |
3eae7bed | 470 | vpn_security_policies_integrity(){ |
3eae7bed JS |
471 | local name=${1} |
472 | shift | |
473 | ||
474 | if [ $# -eq 0 ]; then | |
475 | log ERROR "You must pass at least one value after integrity." | |
476 | return ${EXIT_ERROR} | |
477 | fi | |
478 | ||
479 | local INTEGRITY | |
3eae7bed JS |
480 | if ! vpn_security_policies_read_config ${name} "INTEGRITY"; then |
481 | return ${EXIT_ERROR} | |
482 | fi | |
483 | ||
484 | # Remove duplicated entries to proceed the list safely | |
485 | INTEGRITY="$(list_unique ${INTEGRITY})" | |
486 | ||
487 | while [ $# -gt 0 ]; do | |
488 | case "${1}" in | |
489 | -*) | |
490 | value=${1#-} | |
491 | # Check if the integrity hash is in the list of integrity hashes and | |
492 | # check if the list has after removing this integrity hash at least one valid value | |
493 | if list_match ${value} ${INTEGRITY}; then | |
494 | list_remove INTEGRITY ${value} | |
495 | else | |
496 | # We do not break here because the processing of other maybe valid values are indepent from this error. | |
497 | log ERROR "Can not remove ${value} from the list of integrity hashes because ${value} is not in the list." | |
498 | fi | |
499 | ;; | |
500 | +*) | |
501 | value=${1#+} | |
502 | # Check if the Ciphers is in the list of supported integrity hashes. | |
3a0c376c | 503 | if ! isoneof value ${!VPN_SUPPORTED_INTEGRITY[@]}; then |
3eae7bed JS |
504 | # We do not break here because the processing of other maybe valid values are indepent from this error. |
505 | log ERROR "${value} is not a supported integrity hash and can thats why not added to the list of integrity hashes." | |
506 | else | |
507 | if list_match ${value} ${INTEGRITY}; then | |
508 | log WARNING "${value} is already in the list of integrety hashes of this policy." | |
509 | else | |
510 | list_append INTEGRITY ${value} | |
511 | fi | |
512 | fi | |
513 | ;; | |
514 | esac | |
515 | shift | |
516 | done | |
517 | ||
518 | # Check if the list contain at least one valid group-type | |
519 | if [ $(list_length ${INTEGRITY}) -ge 1 ]; then | |
520 | if ! vpn_security_policies_write_config_key ${name} "INTEGRITY" ${INTEGRITY}; then | |
521 | log ERROR "The changes for the vpn security policy ${name} could not be written." | |
522 | fi | |
523 | else | |
524 | log ERROR "After proceding all integrity hashes the list is empty and thats why no changes are written." | |
525 | return ${EXIT_ERROR} | |
526 | fi | |
3eae7bed JS |
527 | } |
528 | ||
6740c9c5 | 529 | # This function parses the parameters for the 'key-exchange' command |
3eae7bed | 530 | vpn_security_policies_key_exchange() { |
3eae7bed JS |
531 | local name=${1} |
532 | local value=${2} | |
6740c9c5 | 533 | |
3eae7bed JS |
534 | # Check if we get only one argument after key-exchange <name> |
535 | if [ ! $# -eq 2 ]; then | |
536 | log ERROR "The number of arguments do not match. Only argument after key-exchange is allowed." | |
537 | return ${EXIT_ERROR} | |
538 | fi | |
539 | ||
3eae7bed JS |
540 | if ! isoneof value "ikev1" "ikev2" "IKEV1" "IKEV2"; then |
541 | log ERROR "Invalid Argument ${value}" | |
542 | return ${EXIT_ERROR} | |
543 | fi | |
544 | ||
545 | vpn_security_policies_write_config_key "${name}" "KEY_EXCHANGE" "${value,,}" | |
546 | } | |
547 | ||
6740c9c5 | 548 | # This function parses the parameters for the 'lifetime' command. |
3eae7bed | 549 | vpn_security_policies_lifetime(){ |
3eae7bed JS |
550 | local name=${1} |
551 | shift | |
6740c9c5 | 552 | |
3eae7bed JS |
553 | local value=$@ |
554 | ||
555 | # Check if we get only one argument after lifetime <name> | |
556 | if [ ! $# -ge 1 ]; then | |
557 | log ERROR "The number of arguments do not match you must provide at least one integer value or a valid time with the format <hours>h <minutes>m <seconds>s" | |
558 | return ${EXIT_ERROR} | |
559 | fi | |
560 | ||
561 | if ! isinteger value; then | |
562 | value=$(parse_time $@) | |
563 | if [ ! $? -eq 0 ]; then | |
564 | log ERROR "Parsing the passed time was not sucessful please check the passed values." | |
565 | return ${EXIT_ERROR} | |
566 | fi | |
567 | fi | |
568 | ||
569 | if [ ${value} -le 0 ]; then | |
570 | log ERROR "The passed time value must be in the sum greater zero seconds." | |
571 | return ${EXIT_ERROR} | |
572 | fi | |
573 | ||
574 | vpn_security_policies_write_config_key "${name}" "LIFETIME" "${value}" | |
575 | } | |
576 | ||
6740c9c5 | 577 | # This function parses the parameters for the 'pfs' command |
3eae7bed | 578 | vpn_security_policies_pfs(){ |
3eae7bed JS |
579 | local name=${1} |
580 | local value=${2} | |
581 | ||
582 | # Check if we get only one argument after pfs <name> | |
583 | if [ ! $# -eq 2 ]; then | |
584 | log ERROR "The number of arguments do not match. Only argument after pfs is allowed." | |
585 | return ${EXIT_ERROR} | |
586 | fi | |
587 | ||
588 | if [ ! $# -eq 2 ] || ! isbool value; then | |
589 | # We suggest only two values to avoid overburding the user. | |
590 | log ERROR "Invalid Argument ${value}" | |
591 | return ${EXIT_ERROR} | |
592 | fi | |
593 | ||
594 | vpn_security_policies_write_config_key "${name}" "PFS" "${value}" | |
595 | } | |
596 | ||
6740c9c5 MT |
597 | # This function checks if a vpn security policy name is valid |
598 | # Allowed are only A-Za-z0-9 | |
3eae7bed | 599 | vpn_security_policies_check_name() { |
3eae7bed | 600 | assert [ $# -eq 1 ] |
6740c9c5 | 601 | |
3eae7bed | 602 | local name=${1} |
6740c9c5 | 603 | |
3eae7bed JS |
604 | [[ ${name} =~ [^[:alnum:]$] ]] |
605 | } | |
606 | ||
6740c9c5 | 607 | # Function that creates based on the paramters one ore more new vpn security policies |
3eae7bed | 608 | vpn_security_policies_new() { |
58aa0edf MT |
609 | if [ $# -gt 1 ]; then |
610 | error "Too many arguments" | |
3eae7bed JS |
611 | return ${EXIT_ERROR} |
612 | fi | |
613 | ||
58aa0edf MT |
614 | local name="${1}" |
615 | if ! isset name; then | |
616 | error "Please provide a name" | |
617 | return ${EXIT_ERROR} | |
618 | fi | |
3eae7bed | 619 | |
58aa0edf MT |
620 | # Check for duplicates |
621 | if vpn_security_policy_exists "${name}"; then | |
622 | error "The VPN security policy with name ${name} already exists" | |
623 | return ${EXIT_ERROR} | |
624 | fi | |
3eae7bed | 625 | |
58aa0edf MT |
626 | # Check if name is valid |
627 | if vpn_security_policies_check_name "${name}"; then | |
628 | error "'${name}' contains illegal characters" | |
629 | return ${EXIT_ERROR} | |
630 | fi | |
3eae7bed | 631 | |
58aa0edf MT |
632 | # Check if we have a read-only policy with the same name |
633 | if vpn_security_policies_check_readonly "${name}"; then | |
634 | error "The VPN security policy ${name} is read-only" | |
635 | return ${EXIT_ERROR} | |
636 | fi | |
637 | ||
6fdbda80 MT |
638 | # Check if our source policy exists |
639 | if ! vpn_security_policy_exists "${VPN_DEFAULT_SECURITY_POLICY}"; then | |
640 | error "Default VPN Security Policy '${VPN_DEFAULT_SECURITY_POLICY}' does not exist" | |
641 | return ${EXIT_ERROR} | |
642 | fi | |
643 | ||
58aa0edf MT |
644 | log DEBUG "Creating VPN Security Policy ${name}" |
645 | ||
aab75c48 MT |
646 | if copy "$(vpn_security_policies_path "${VPN_DEFAULT_SECURITY_POLICY}")" |
647 | "$(vpn_security_policies_path ${name})"; then | |
58aa0edf MT |
648 | log INFO "VPN Security Policy ${name} successfully created" |
649 | else | |
650 | log ERROR "Could not create VPN Security Policy ${name}" | |
651 | return ${EXIT_ERROR} | |
652 | fi | |
c787fea5 MT |
653 | |
654 | # Show the newly created policy | |
655 | vpn_security_policies_show "${name}" | |
3eae7bed JS |
656 | } |
657 | ||
6740c9c5 | 658 | # Function that deletes based on the passed parameters one ore more vpn security policies |
3eae7bed | 659 | vpn_security_policies_destroy() { |
3eae7bed JS |
660 | local name |
661 | for name in $@; do | |
662 | if ! vpn_security_policy_exists ${name}; then | |
663 | log ERROR "The vpn security policy ${name} does not exist." | |
664 | continue | |
665 | fi | |
666 | ||
667 | if vpn_security_policies_check_readonly ${name}; then | |
668 | log ERROR "The vpn security policy ${name} cannot be deleted." | |
669 | continue | |
670 | fi | |
671 | ||
672 | log DEBUG "Deleting vpn security policy ${name}" | |
673 | settings_remove $(vpn_security_policies_path ${name}) | |
674 | done | |
675 | } |