minor nowipe fix
[automated-distro-installer] / fai / config / hooks / partition.DEFAULT
1 #!/bin/bash -x
2 # Copyright (C) 2016 Ian Kelling
3
4 # This program is free software; you can redistribute it and/or
5 # modify it under the terms of the GNU General Public License
6 # as published by the Free Software Foundation; either version 2
7 # of the License, or (at your option) any later version.
8
9 # This program is distributed in the hope that it will be useful,
10 # but WITHOUT ANY WARRANTY; without even the implied warranty of
11 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 # GNU General Public License for more details.
13
14 # You should have received a copy of the GNU General Public License
15 # along with this program; if not, write to the Free Software
16 # Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
17
18 PS4='+ $LINENO '
19 set -eE -o pipefail
20 trap 'echo "$0:$LINENO:error: \"$BASH_COMMAND\" returned $?" >&2' ERR
21
22 if [[ $EUID != 0 ]]; then
23 echo "$0: error: need to run as root" >&2
24 exit 1
25 fi
26
27 # for calling outside of FAI:
28 # # need to redep and set that location so that we get luks keys
29 # export FAI=/srv/fai/config
30 # fai-redep
31 # source /b/fai/fai-wrapper
32 # - set any appropriate classes with: fai-setclass OPT1... which sets CLASS_OPT1=true...
33 # or run eval-fai-classfile FILE
34 #
35 # OPTIONS:
36 #
37 # environment variables:
38 #
39 # HOSTNAME: if frodo, we exclude 2 devices from the /boot array, which
40 # the bios does not see. if demohost, we set the luks password to just
41 # 'x'.
42 #
43 # SPECIAL_DISK: For use outside of fai. A base disk name like
44 # /dev/sdk. If set, we just cryptsetup and partition this one disk then
45 # exit. This is useful for partitioning a disk in preparation to replace
46 # a failed or failing disk from a raid10 array.
47 #
48 # classes:
49 #
50 # REPARTITION: forces repartitioning even if we detect the proper amount
51 # of partitions already exist.
52 #
53 # NOWIPE: use existing subvolumes if they exist
54 #
55 # ROTATIONAL: forces to install onto hdds instead of sdds. normally sdds
56 # are chosen if they exist.
57 #
58 # PARTITION_PROMPT: command line prompt before partitioning
59 #
60 # RAID0: forces raid0 filesystem. Normally with 4+ devices, we use
61 # raid10.
62 # RAID1: forces raid1 filesystem.
63
64 if [[ $SPECIAL_DISK ]]; then
65 export CLASS_REPARTITION=true
66 fi
67
68 # # fai's setup-storage won't do btrfs on luks,
69 # # so we do it ourself :)
70 # inspiration taken from files in fai-setup-storage package
71
72 # if we are not running in fai, skiptask won't be defined, so carry on.
73 skiptask partition || ! type skiptask
74
75 if ! type -p devbyid; then
76 for d in $FAI/distro-install-common \
77 /a/bin/fai/fai/config/distro-install-common $FAI $PWD; do
78 [[ -d $d ]] || continue
79 if [[ -e $d/devbyid ]]; then
80 devbyid=$d/devbyid
81 devbyid() { $devbyid "$@"; }
82 break
83 fi
84 done
85 if [[ ! $devbyid ]]; then
86 echo "$0: error: failed to find devbyid script" >&2
87 exit 1
88 fi
89 fi
90
91
92
93 #### begin configuration
94
95 rootn=1
96 swapn=2
97 bootn=3
98 # ext partition so grub can write persistent variables,
99 # so it can do a one time boot. grub can't write to
100 # btrfs or any cow fs because it's more
101 # more complicated to do and they don't want to.
102 grub_extn=4
103 # bios boot partition,
104 # https://wiki.archlinux.org/index.php/GRUB
105 bios_grubn=5
106 lastn=$bios_grubn
107
108
109
110 ##### end configuration
111
112
113 add-part() { # add partition suffix to $dev
114 local d ret
115 if [[ $# == 1 ]]; then
116 d=$dev
117 part=$1
118 else
119 d=$1
120 part=$2
121 fi
122 if [[ $d == /dev/disk/by-id/* ]]; then
123 ret=$d-part$part
124 else
125 ret=$d$part
126 fi
127 echo $ret
128 }
129
130 bootdev() { add-part $@ $bootn; }
131 rootdev() { add-part $@ $rootn; }
132 swapdev() { add-part $@ $swapn; }
133 grub_extdev() { add-part $@ $grub_extn; }
134 bios_grubdev() { add-part $@ $bios_grubn; }
135
136 crypt-dev() { echo /dev/mapper/crypt_dev_${1##*/}; }
137 crypt-name() { echo crypt_dev_${1##*/}; }
138 root-cryptdev() { crypt-dev $(rootdev $@); }
139 swap-cryptdev() { crypt-dev $(swapdev $@); }
140 root-cryptname() { crypt-name $(rootdev $@); }
141 swap-cryptname() { crypt-name $(swapdev $@); }
142
143 ##### end function defs
144
145 if ifclass REPARTITION; then
146 partition=true # force a full wipe
147 else
148 partition=false # change to true to force a full wipe
149 fi
150 if ifclass NOWIPE; then
151 wipe=false
152 else
153 wipe=true
154 fi
155
156 ## ignore disks that are mounted, eg when running from fai-cd
157 declare -A disk_excludes
158 while read -r l; do
159 eval "$l"
160 if [[ ! $PKNAME ]]; then
161 PKNAME="$KNAME"
162 fi
163 if [[ $MOUNTPOINT ]]; then
164 disk_excludes[$PKNAME]=true
165 fi
166 done < <(lsblk -nP -o KNAME,MOUNTPOINT,PKNAME)
167
168
169 hdds=()
170 ssds=()
171 cd /sys/block
172 for disk in [sv]d[a-z]; do
173 if [[ ${disk_excludes[$disk]} ]]; then
174 continue
175 fi
176 case $(cat $disk/queue/rotational) in
177 0) ssds+=(/dev/$disk) ;;
178 1) hdds+=(/dev/$disk) ;;
179 *) echo "$0: error: unknown /sys/block/$disk/queue/rotational: \
180 $(cat $disk/queue/rotational)"; exit 1 ;;
181 esac
182 done
183
184 # install all ssds, or if there are none, all hdds.
185 # Note, usb flash disks are seen as rotational, which is
186 # very odd, but convenient for ignoring them here.
187 # TODO: find a reliable way to ignore them.
188 if ! ifclass ROTATIONAL && (( ${#ssds[@]} > 0 )); then
189 short_devs=( ${ssds[@]} )
190 else
191 short_devs=( ${hdds[@]} )
192 fi
193
194 # check if the partitions exist have the right filesystems
195 #blkid="$(blkid -s TYPE)"
196 for dev in ${short_devs[@]}; do
197 if $partition; then break; fi
198 y=$(readlink -f $dev)
199 arr=($y[0-9])
200 [[ ${#arr[@]} == "$lastn" ]] || partition=true
201 for (( i=1; i <= lastn; i++ )); do
202 [[ -e ${dev}$i ]] || partition=true
203 done
204 # On one system, blkid is missing some partitions.
205 # maybe we need a flag, like FUZZY_BLKID or something, so we
206 # can check that at least some exist.
207 # for x in "`rootdev`: TYPE=\"crypto_LUKS\"" "`bootdev`: TYPE=\"btrfs\""; do
208 # echo "$blkid" | grep -Fx "$x" &>/dev/null || partition=true
209 # done
210 done
211
212 if $partition && ifclass PARTITION_PROMPT; then
213 echo "Press any key except ctrl-c to continue and partition these drives:"
214 echo " ${short_devs[*]}"
215 read -r
216 fi
217
218 devs=()
219 shopt -s extglob
220 for short_dev in ${short_devs[@]}; do
221 devs+=($(devbyid $short_dev))
222 done
223 if [[ ! ${devs[0]} ]]; then
224 echo "$0: error: failed to detect devs" >&2
225 exit 1
226 fi
227
228 boot_space=0
229 first=false
230 boot_devs=()
231 for dev in ${devs[@]}; do
232 if ifclass frodo; then
233 # I ran into a machine where the bios doesn't know about some disks,
234 # so 1st stage of grub also doesn't know about them.
235 # Also, grub does not support mounting degraded btrfs as far as
236 # I can tell with some googling.
237 # From within an arch install env, I could detect them by noting
238 # their partitions were mixed with the next disk in /dev/disk/by-path,
239 # and I have mixed model disks, and I could see the 8 models which showed
240 # up in the bios, and thus see which 2 models were missing.
241 # hdparm -I /dev/sdh will give model info in linux.
242 # However, in fai on jessie, /dev/disk/by-path dir doesn't exist,
243 # and I don't see another way, so I'm hardcoding them.
244 # We still put grub on them and partition them the same, for uniformity
245 # and in case they get moved to a system that can recognize them,
246 # we just exclude them from the boot filesystem.
247 cd /dev/disk/by-id/
248 bad_disk=false
249 for id in ata-TOSHIBA_MD04ACA500_8539K4TQFS9A \
250 ata-TOSHIBA_MD04ACA500_Y5IFK6IJFS9A; do
251 if [[ $(readlink -f $id) == "$(readlink -f $dev)" ]]; then
252 bad_disk=true
253 break
254 fi
255 done
256 $bad_disk || boot_devs+=($(bootdev))
257 else
258 boot_space=$(( boot_space + $(parted -m $dev unit MiB print | \
259 sed -nr "s#^/dev/[^:]+:([0-9]+).*#\1#p") - 1))
260 boot_devs+=($(bootdev))
261 fi
262 if [[ $boot_devs && $first ]]; then
263 first_grub_extdev=$(grub_extdev)
264 first=false
265 fi
266 done
267
268 if ifclass RAID0 || (( ${#boot_devs[@]} == 1 )); then
269 raid_level=0
270 elif ifclass RAID1 || (( ${#boot_devs[@]} <= 3 )); then
271 raid_level=1
272 else
273 raid_level=10
274 fi
275
276 ### Begin calculate boot partition space
277 # due to raid duplication
278 case $raid_level in
279 1*) boot_space=$(( boot_space / 2 )) ;;
280 esac
281 if (( boot_space > 60000 )); then
282 # this is larger than needed for several /boot subvols,
283 # becuase I keep a minimal debian install on it for
284 # recovery needs and for doing pxe-kexec.
285 boot_mib=10000
286 elif (( boot_space > 30000 )); then
287 boot_mib=$(( 5000 + (boot_space - 30000) / 2 ))
288 else
289 # Small vms don't have room for /boot recovery. With 3 kernels
290 # installed, i'm using 132M on t8, so this seems like plenty of
291 # room. note: rhel 8 recomments 1g for /boot.
292 boot_mib=500
293 #
294 fi
295 case $raid_level in
296 1*) boot_mib=$(( boot_mib * 2 )) ;;
297 esac
298 ### end calculate boot partition space
299
300
301
302 if [[ ! $DISTRO ]]; then
303 if ifclass VOL_STRETCH_BOOTSTRAP; then
304 DISTRO=debianstretch_bootstrap
305 elif ifclass VOL_STRETCH; then
306 DISTRO=debianstretch
307 elif ifclass VOL_BUSTER; then
308 DISTRO=debianbuster
309 elif ifclass VOL_TESTING; then
310 DISTRO=debiantesting
311 elif ifclass VOL_XENIAL; then
312 DISTRO=ubuntuxenial
313 elif ifclass VOL_BIONIC; then
314 DISTRO=ubuntubionic
315 elif ifclass VOL_FOCAL; then
316 DISTRO=ubuntufocal
317 elif ifclass VOL_BELENOS; then
318 DISTRO=trisquelbelenos
319 elif ifclass VOL_FLIDAS; then
320 DISTRO=trisquelflidas
321 elif ifclass VOL_ETIONA; then
322 DISTRO=trisqueletiona
323 else
324 echo "PARTITIONER ERROR: no distro class/var set" >&2
325 exit 1
326 fi
327 fi
328 first_boot_dev=${boot_devs[0]}
329
330
331 bpart() { # btrfs a partition
332 case $raid_level in
333 0) mkfs.btrfs -f $@ ;;
334 1) mkfs.btrfs -f -m raid1 -d raid1 $@ ;;
335 10) mkfs.btrfs -f -m raid10 -d raid10 $@ ;;
336 esac
337 }
338
339
340 if [[ ! -e /a/bin/fai/fai-wrapper ]]; then
341 # see README for docs about how to create these
342 luks_dir=$FAI/distro-install-common/luks
343
344 luks_file=$luks_dir/host-$HOSTNAME
345 if [[ ! -e $luks_file ]]; then
346 hostkeys=($luks_dir/host-*)
347 # if there is only one key, we might be deploying somewhere
348 # where dhcp doesnt give us a proper hostname, so use that.
349 if [[ ${#hostkeys[@]} == 1 && -e ${hostkeys[0]} ]]; then
350 luks_file=${hostkeys[0]}
351 else
352 echo "$0: error: no key for hostname at $luks_file" >&2
353 exit 1
354 fi
355 fi
356
357 # # note, corresponding changes in /b/ds/keyscript-{on,off}
358 if ifclass demohost; then
359 lukspw=x
360 elif [[ -e $luks_dir/$HOSTNAME ]]; then
361 lukspw=$(cat $luks_dir/$HOSTNAME)
362 else
363 lukspw=$(cat $luks_dir/iank)
364 fi
365 fi
366
367
368 first_root_crypt=$(root-cryptdev ${devs[0]})
369
370 # 1.5 x based on https://access.redhat.com/documentation/en-US/Red_Hat_Enterprise_Linux/7/html/Installation_Guide/sect-disk-partitioning-setup-x86.html#sect-custom-partitioning-x86
371 swap_mib=$(( $(grep ^MemTotal: /proc/meminfo | \
372 awk '{print $2}') * 3/(${#devs[@]} * 2 ) / 1024 ))
373
374 mkdir -p /tmp/fai
375 root_devs=()
376 for dev in ${devs[@]}; do
377 root_devs+=($(rootdev))
378 done
379 shopt -s nullglob
380 if $partition; then
381
382 ### begin wipefs
383 if [[ ! $SPECIAL_DISK ]]; then
384 for dev in ${devs[@]}; do
385 # if we repartition to the same as an old partition,
386 # we don't want any old fses hanging around.
387 for (( i=1; i <= lastn; i++ )); do
388 x=$(add-part $dev $i)
389 [[ -e $x ]] || continue
390 count_down=10
391 # wipefs has failed, manual run works, google suggests timing issue
392 while ! wipefs -a $x; do
393 sleep 2
394 count_down=$((count_down - 1))
395 (( count_down > 0 )) || exit 1
396 done
397 done
398 done
399 fi
400 ### end wipefs
401
402 for dev in ${devs[@]}; do
403 if [[ $SPECIAL_DISK ]]; then
404 dev=$(devbyid $SPECIAL_DISK)
405 fi
406
407 # parted will round up the disk size. Do -1 so we can have
408 # fully 1MiB unit partitions for easy resizing of the last partition.
409 # Otherwise we would pass in -0 for the end argument for the last partition.
410 #
411 # Note: parted print error output is expected. example:
412 # Error: /dev/vda: unrecognised disk label
413 disk_mib=$(( $(parted -m $dev unit MiB print | \
414 sed -nr "s#^/dev/[^:]+:([0-9]+).*#\1#p") - 1))
415 root_end=$(( disk_mib - swap_mib - boot_mib / ${#boot_devs[@]} ))
416 swap_end=$(( root_end + swap_mib))
417
418 parted -s $dev mklabel gpt
419 # MiB because parted complains about alignment otherwise.
420 pcmd="parted -a optimal -s -- $dev"
421 $pcmd mkpart primary ext3 12MiB ${root_end}MiB
422 # without naming, systemd gives us misc errors like:
423 # dev-disk-by\x2dpartlabel-primary.device: Dev dev-disk-by\x2dpartlabel-primary.device appeared twice
424 $pcmd name $rootn root
425 # normally a swap is type "linux-swap", but this is encrypted swap. using that
426 # label will confuse systemd.
427 $pcmd mkpart primary "" ${root_end}MiB ${swap_end}MiB
428 $pcmd name $swapn swap
429 $pcmd mkpart primary "" ${swap_end}MiB ${disk_mib}MiB
430 $pcmd name $bootn boot
431 # i only need a few k, but googling min size,
432 # I found someone saying that gparted required
433 # required at least 8 because of their hard drive cylinder size.
434 # And 8 is still very tiny.
435 $pcmd mkpart primary "ext2" 4MiB 12MiB
436 $pcmd name $grub_extn grubext
437 # gpt ubuntu cloud image uses ~4 mb for this partition. fai uses 1 MiB.
438 # so, I use 3, whatever.
439 # note: parted manual saying cheap flash media
440 # should to start at 4.
441 $pcmd mkpart primary "" 1MiB 4MiB
442 $pcmd name $bios_grubn biosgrub
443 $pcmd set $bios_grubn bios_grub on
444 $pcmd set $bootn boot on # generally not needed on modern systems
445 # the mkfs failed before on a vm, which prompted me to add
446 # sleep .1
447 # then it failed again on a physical machine
448 # with:
449 # Device /dev/disk/by-id/foo doesn't exist or access denied,
450 # so I added a wait until it existed.
451 # Then I added the mkfs.ext2, which claimed to succeed,
452 # but then couldn't be found upon reboot. In that case we didn't
453 # wait at all. So I've added a 3 second minimum wait.
454 sleep 3
455 secs=0
456 while [[ ! -e $(rootdev) ]] && (( secs < 10 )); do
457 sleep 1
458 secs=$((secs +1))
459 done
460 # Holds just a single file, rarely written, so
461 # use ext2, like was often used for the /boot partition.
462 # This exists because grub can only persist data to a non-cow fs.
463 # And we use persisting a var in grub to do a one time boot.
464 # We could pass the data on the kernel command line and persist it
465 # to grubenv after booting, but that relies on the boot always succeeding.
466 # This is just a bit more robust, and it could work for booting
467 # into ipxe which can't persist data, if we ever got that working.
468 mkfs.ext2 $(grub_extdev)
469 # when we move to newer than trisquel 8, we can remove
470 # --type luks1. We can also check on cryptsetup --help | less /compil
471 # to see about the other settings. Default in debian 9 is luks2.
472 # You can convert from luks2 to luks 1 by adding a temporary key:
473 # cryptsetup luksAddKey --pbkdf pbkdf2
474 # then remove the new format keys with cryptsetup luksRemoveKey
475 # then cryptsetup convert DEV --type luks1, then readd old keys and remove temp.
476 yes YES | cryptsetup luksFormat $(rootdev) $luks_file \
477 --type luks1 -c aes-cbc-essiv:sha256 -s 256 || [[ $? == 141 ]]
478 yes "$lukspw" | \
479 cryptsetup luksAddKey --key-file $luks_file \
480 $(rootdev) || [[ $? == 141 ]]
481 # background: Keyfile and password are treated just
482 # like 2 ways to input a passphrase, so we don't actually need to have
483 # different contents of keyfile and passphrase, but it makes some
484 # security sense to a really big randomly generated passphrase
485 # as much as possible, so we have both.
486 #
487 # This would remove the keyfile.
488 # yes 'test' | cryptsetup luksRemoveKey /dev/... \
489 # /key/file || [[ $? == 141 ]]
490
491 cryptsetup luksOpen $(rootdev) $(root-cryptname) \
492 --key-file $luks_file
493
494 if [[ $SPECIAL_DISK ]]; then
495 exit 0
496 fi
497 done
498 ls -la /dev/btrfs-control # this was probably for debugging...
499 sleep 1
500 bpart $(for dev in ${devs[@]}; do root-cryptdev; done)
501 bpart ${boot_devs[@]}
502 else
503 for dev in ${devs[@]}; do
504 if [[ -e /dev/mapper/$(root-cryptname) ]]; then
505 continue
506 fi
507 cryptsetup luksOpen $(rootdev) $(root-cryptname) \
508 --key-file $luks_file
509 done
510 sleep 1
511 fi
512
513
514 if $wipe && [[ $DISTRO != debianstretch_bootstrap ]]; then
515 # bootstrap distro doesn't use separate encrypted root.
516 mount -o subvolid=0 $first_root_crypt /mnt
517 # systemd creates subvolumes we want to delete.
518 s=($(btrfs subvolume list --sort=-path /mnt |
519 sed -rn "s#^.*path\s*(root_$DISTRO/\S+)\s*\$#\1#p"))
520 for subvol in ${s[@]}; do btrfs subvolume delete /mnt/$subvol; done
521 btrfs subvolume set-default 0 /mnt
522 [[ ! -e /mnt/root_$DISTRO ]] || btrfs subvolume delete /mnt/root_$DISTRO
523
524 ## create subvols ##
525 cd /mnt
526
527 btrfs subvolume create root_$DISTRO
528
529 # could set default subvol like this, but no reason to.
530 # btrfs subvolume set-default \
531 # $(btrfs subvolume list . | grep "root_$DISTRO$" | awk '{print $2}') .
532
533 # no cow on the root filesystem. it's setup is fully scripted,
534 # if it's messed up, we will just recreated it,
535 # and we can get better perf with this.
536 # I can't remember exactly why, but this is preferable to mounting with
537 # -o nodatacow, I think because subvolumes inherit that.
538 chattr -Rf +C root_$DISTRO
539 cd /
540 umount /mnt
541 fi
542
543 mount -o subvolid=0 $first_boot_dev /mnt
544 cd /mnt
545 btrfs subvolume set-default 0 /mnt # already default, just ensuring it.
546
547 # for libreboot systems. grub2 only reads from subvolid=0
548 mkdir -p /mnt/grub2
549 cp $FAI/distro-install-common/libreboot_grub.cfg /mnt/grub2
550
551 if [[ $DISTRO == debianstretch_bootstrap ]]; then
552 # this is just convenience for the libreboot_grub config
553 # so we can glob the other ones easier.
554 boot_vol=$DISTRO
555 else
556 boot_vol=boot_$DISTRO
557 fi
558 if $wipe && [[ -e /mnt/$boot_vol ]]; then
559 btrfs subvolume delete /mnt/$boot_vol
560 fi
561 if [[ ! -e /mnt/$boot_vol ]]; then
562 btrfs subvolume create $boot_vol
563 fi
564 cd /
565 umount /mnt
566 ## end create subvols ##
567
568 dev=${boot_devs[0]}
569 mount $first_grub_extdev /mnt
570 grub-editenv /mnt/grubenv set did_fai_check=true
571 grub-editenv /mnt/grubenv set last_boot=/$boot_vol
572 umount /mnt
573
574 if [[ $DISTRO == debianstretch_bootstrap ]]; then
575 cat > /tmp/fai/fstab <<EOF
576 $first_boot_dev / btrfs noatime,subvol=$boot_vol 0 0
577 EOF
578 cat >/tmp/fai/disk_var.sh <<EOF
579 BOOT_DEVICE="${short_devs[@]}"
580 ROOT_PARTITION=$first_boot_dev
581 EOF
582 else
583 # note, fai creates the mountpoints listed here
584 cat > /tmp/fai/fstab <<EOF
585 $first_root_crypt / btrfs noatime,subvol=root_$DISTRO 0 0
586 $first_root_crypt /mnt/root btrfs nofail,noatime,subvolid=0 0 0
587 $first_boot_dev /boot btrfs nofail,noatime,subvol=$boot_vol 0 0
588 $first_boot_dev /mnt/boot btrfs nofail,noatime,subvolid=0 0 0
589 EOF
590 swaps=()
591 rm -f /tmp/fai/crypttab
592 for dev in ${devs[@]}; do
593 swaps+=($(swap-cryptname))
594 cat >>/tmp/fai/crypttab <<EOF
595 $(root-cryptname) $(rootdev) none keyscript=/root/keyscript,discard,luks,initramfs
596 $(swap-cryptname) $(swapdev) /dev/urandom swap,cipher=aes-xts-plain64,size=256,hash=ripemd160
597 EOF
598 cat >> /tmp/fai/fstab <<EOF
599 $(swap-cryptdev) none swap nofail,sw 0 0
600 EOF
601 done
602
603 # fai would do this:
604 #BOOT_DEVICE=\${BOOT_DEVICE:-"${devs[0]}"}
605
606 # note: swaplist seems to do nothing.
607 cat >/tmp/fai/disk_var.sh <<EOF
608 BOOT_DEVICE="${short_devs[@]}"
609 BOOT_PARTITION=\${BOOT_PARTITION:-$first_boot_dev}
610 # ROOT_PARTITIONS is added by me, used in arch setup.
611 ROOT_PARTITIONS="${root_devs[@]}"
612 ROOT_PARTITION=\${ROOT_PARTITION:-$first_root_crypt}
613 SWAPLIST=\${SWAPLIST:-"${swaps[@]}"}
614 EOF
615 fi