setup-disk.in 8.64 KB
Newer Older
Natanael Copa's avatar
Natanael Copa committed
1
2
3
4
5
#!/bin/sh

PREFIX=
. "$PREFIX/lib/libalpine.sh"

6
MBR=${MBR:-"/usr/share/syslinux/mbr.bin"}
Natanael Copa's avatar
Natanael Copa committed
7
8
9
10
11
12
13
14
15
16
17

in_list() {
	local i="$1"
	shift
	while [ $# -gt 0 ]; do
		[ "$i" = "$1" ] && return 0
		shift
	done
	return 1
}

18
19
20
21
22
23
24
25
# wrapper to only show given device
_blkid() {
	blkid | grep "^$1:"
}

# if given device have an UUID display it, otherwise return the device
uuid_or_device() {
	local i=
26
27
28
	case "$1" in
		/dev/md*) echo "$1" && return 0;;
	esac
29
30
31
32
33
34
35
36
37
38
39
40
41
	for i in $(_blkid "$1"); do
		case "$i" in
			UUID=*) eval $i;;
		esac
	done
	if [ -n "$UUID" ]; then
		echo "UUID=$UUID"
	else
		echo "$1"
	fi
}

# generate an fstab from a given mountpoint. Convert to UUID if possible
42
enumerate_fstab() {
43
	local mnt="$1"
44
	local fs_spec= fs_file= fs_vfstype= fs_mntops= fs_freq= fs_passno=
45
	[ -z "$mnt" ] && return
46
47
	local escaped_mnt=$(echo $mnt | sed 's:/:\\/:g')
	awk "\$2 ~ /^$escaped_mnt/ {print \$0}" /proc/mounts | \
48
49
50
51
		sed "s:$mnt:/:g; s: :\t:g" | sed 's:/\+:/:g' | \
		while read fs_spec fs_file fs_vfstype fs_mntops fs_freq fs_passno; do
			echo -e "$(uuid_or_device $fs_spec)\t${fs_file}\t${fs_vfstype}\t${fs_mntops} ${fs_freq} ${fs_passno}"
		done
52
53
}

54
55
56
57
58
is_vmware() {
	grep -q VMware /proc/scsi/scsi 2>/dev/null \
		|| grep -q VMware /proc/ide/hd*/model 2>/dev/null
}

59
60
# Find the disk device from given partition
disk_from_part() {
61
62
	# we need convert cciss/c0d0* cciss!c0d0*...
	local i= part=$(echo ${1#/dev/} | sed 's:/:!:g')
63
64
	for i in /sys/block/*/$part; do
		i=${i%/*}
65
66
		# ...and back from cciss!c0d0 to cciss/c0d0
		echo "/dev/${i##*/}" | sed 's:!:/:g'
67
68
69
70
71
		return 0
	done
	return 1
}

72
73
install_mounted_root() {
	local mnt="$1"
74
	local features="ata base bootchart cdrom ext2 ext3 ide scsi usb"
75

76
	rootdev=$(awk "\$2 == \"$mnt\" { print \$1 }" /proc/mounts)
77
78
79
80
81
	if [ -z "$rootdev" ]; then
		echo "$mnt does not seem to be a mount point" >&2
		return 1
	fi

82
83
84
85
86
87
	local fs=$(awk "\$1 == \"$rootdev\" {print \$3}" /proc/mounts)
	if [ "$fs" != "ext2" ] && [ "$fs" != "ext3" ]; then
		echo "$fs is not supported. Only ext2 and ext3 are supported" >&2
		return 1
	fi
		
88
	rootdisk=$(disk_from_part $rootdev)
89
90
91

	echon "Installing system on $rootdev: "
	lbu package - | tar -C "$mnt" -zx
92
93
94
95
	# apk reads config from target root so we need to copy the config
	mkdir -p "$mnt"/etc/apk/keys/
	cp /etc/apk/keys/* "$mnt"/etc/apk/keys/

96
97
	apk add -q --progress --update-cache --root "$mnt" \
		$(cat "$mnt"/var/lib/apk/world) \
98
		acct linux-grsec alpine-base >/dev/null || return 1
99
100
	echo ""
	# make things bootable
101
	if [ -e "/sys/block/${rootdev#/dev/}/md" ]; then
102
103
104
105
106
107
108
109
		local md=${rootdev#/dev/}
		features="$features raid"
		raidmod=$(cat /sys/block/$md/md/level)
		raidmod=",$raidmod"
		raidopt="-r"
		# get a list of slaves
		rootdisk=
		for i in /sys/block/$md/slaves/*; do
110
111
112
			j=${i##*/}
			i=${j%[0-9]*}
			rootdisk="$rootdisk /dev/${i}"
113
114
		done
	fi
115

116
117
118
119
120
121
	if is_vmware; then
		pax_nouderef="pax_nouderef "
	else
		pax_nouderef=
	fi

122
123
124
125
126
127
	# create an extlinux.conf
	cat >"$mnt"/boot/extlinux.conf <<EOF
timeout 20
prompt 1
default grsec
label grsec
128
129
	kernel /boot/vmlinuz-grsec
	append initrd=/boot/initramfs-grsec root=$(uuid_or_device $rootdev) modules=sd-mod,usb-storage,ext3$raidmod ${pax_nouderef}quiet
130
EOF
131
132
133
134
135
	# fix the fstab
	enumerate_fstab "$mnt" >> "$mnt"/etc/fstab

	# install extlinux
	apk add -q syslinux
136
137
138
139
	extlinux -i $raidopt "$mnt"/boot/

	# unmount the partitions
	umount $(awk '{print $2}' /proc/mounts | grep ^"$mnt" | sort -r)
140

141
142
	# fix mbr for all disk devices
	for i in $rootdisk; do
143
144
145
146
		local errmsg
		echo "Writing MBR to $i"
		errmsg=$(dd if="$MBR" of=$i 2>&1) \
			|| echo "$errmsg"
147
	done
148
149
150
151
152
	echo ""
	echo "Installation is done. Please reboot."
	apk del -q syslinux
}

153
154
155
156
157
158
159
160
161
# figure out decent default swap size in mega bytes
find_swap_size() {
	local memtotal_kb=$(awk '$1 == "MemTotal:" {print $2}' /proc/meminfo)
	# use 2 * avaiable ram
	echo $(( $memtotal_kb * 2 / 1024 ))
}

has_mounted_part() {
	local p
Natanael Copa's avatar
Natanael Copa committed
162
	# parse /proc/mounts for mounted devices
163
164
	for p in $(awk '$1 ~ /^\/dev\// {gsub("/dev/", "", $1); print $1}' \
			/proc/mounts); do
165
		[ "$p" = "$1" ] && return 0
Natanael Copa's avatar
Natanael Copa committed
166
		[ -e /sys/block/$1/$p ] && return 0
167
168
169
170
	done
	return 1
}

Natanael Copa's avatar
Natanael Copa committed
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
has_holders() {
	local i
	# check if device is used by any md devices
	for i in $1/holders/* $1/*/holders/*; do
		[ -e "$i" ] && return 0
	done
	return 1
}

is_available_disk() {
	local dev=$1
	local b=$(echo $p | sed 's:/:!:g')

	# check if its a "root" block device and not a partition
	[ -e /sys/block/$b ] || return 1
	
	# check so it does not have mounted partitions
	has_mounted_part $dev && return 1

	# check so its not part of an md setup
	has_holders /sys/block/$b && return 1

	# check so its not an md device
	[ -e /sys/block/$b/md ] && return 1

	return 0
}

199
find_disks() {
Natanael Copa's avatar
Natanael Copa committed
200
	local p=
201
	for p in $(awk '$1 ~ /[0-9]+/ {print $4}' /proc/partitions); do
Natanael Copa's avatar
Natanael Copa committed
202
		is_available_disk $p && echo -n " $p"
203
204
205
	done
}

Natanael Copa's avatar
Natanael Copa committed
206
useall() {
207
208

	local rootdisk_dev="$1"
Natanael Copa's avatar
Natanael Copa committed
209
	local i size
210
211
212
213
214
215
216
217
218
219
220
221
222
	local boot_size=100 boot_part_type="83" 
	local swap_size=$(find_swap_size) swap_part_type="82"
	local root_part_type="83"
	local raidpkg= partitions=
	local minimum_root_size=$(($boot_size * 2));

	if [ -n "$USE_RAID" ]; then
		boot_part_type="fd"
		swap_part_type="fd"
		root_part_type="fd"
		raidpkg="mdadm"
	fi

223
224
	dmesg -n1
	apk_add -q sfdisk e2fsprogs $raidpkg || return 1
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
	local root_size=$(( $(sfdisk -s $rootdisk_dev) / 1024 - $swap_size - $boot_size))
	if [ "$root_size" -lt "$minimum_root_size" ]; then
		echo "The $rootdisk_dev is too small. At least $(( $boot_size + $swap_size + $minimum_root_size)) is needed." >&2
		return 1
	fi

	echo ""
	echo "Creating the following partitions on $rootdisk_dev:"
	echo " /boot	${boot_size}MB"
	echo " swap	${swap_size}MB"
	echo " /	${root_size}MB"
	echo ""
	echo -n "WARNING: All contents of $rootdisk_dev will be erased. Continue? [y/N]: "
	read i
	case "$i" in
		y*|Y*);;
		*) return 1;;
	esac
243
244
	
	echo "Initializing partitions..."
245
246
247
248
249
250
251
	if [ -n "$USE_RAID" ]; then
		local rd
		for rd in md0 md1 md2; do
			[ -b /dev/$rd ] && mdadm --stop /dev/$rd
		done
	fi

252
253
254
255
256
257
	# new disks does not have an DOS signature in sector 0
	# this makes sfdisk complain. We can workaround this by letting
	# fdisk create that DOS signature, by just do a "w", a write.
	# http://bugs.alpinelinux.org/issues/show/145
	echo "w" | fdisk $rootdisk_dev >/dev/null

258
259
260
261
262
263
	# create new partitions
	(cat <<EOF
0,$boot_size,$boot_part_type,*
,$swap_size,$swap_part_type
,,$root_part_type
EOF
264
	) | sfdisk -q -L -uM $rootdisk_dev >>/tmp/sfdisk.out || return 1
265
266

	# create device nodes if not exist
Natanael Copa's avatar
Natanael Copa committed
267
268
	mdev -s

269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
	if [ -n "$USE_RAID" ]; then
		local p= rd=
		for p in $(sfdisk -l $rootdisk_dev 2>/dev/null \
				| awk '/Linux raid/ {print $1}'); do
			case "$p" in
				*1) rd=/dev/md0; boot_dev=/dev/md0;;
				*2) rd=/dev/md1; swap_dev=/dev/md1;;
				*3) rd=/dev/md2; root_dev=/dev/md2;;
			esac
			mdadm --create $rd --level=1 --raid-devices=2 \
				--quiet --run $p missing
		done
	else
		local p=
		for p in $(sfdisk -l $rootdisk_dev 2>/dev/null \
				| awk '$1 ~ /^\/dev/ {print $1}'); do
			case "$p" in
				*1) boot_dev=$p;;
				*2) swap_dev=$p;;
				*3) root_dev=$p;;
			esac
		done
	fi
	mkfs.ext3 -q $boot_dev >/dev/null \
		&& mkswap $swap_dev >/dev/null \
		&& mkfs.ext3 -q >/dev/null $root_dev \
		|| return 1

	mkdir -p /mnt
	mount -t ext3 $root_dev /mnt || return 1
	mkdir -p /mnt/boot
	mount -t ext3 $boot_dev /mnt/boot || return 1
	if [ -n "$USE_RAID" ]; then
		mdadm --detail --scan > /etc/mdadm.conf
		rc-update --quiet add mdadm-raid boot
	fi
	rc-update --quiet add swap boot
	# the func to generate fstab does not detect swap. add it manually
	sed -i -e '/swap/d' /etc/fstab
308
	echo -e "$(uuid_or_device $swap_dev)\tswap\t\tswap\tdefaults 0 0" >> /etc/fstab
309
	install_mounted_root /mnt
Natanael Copa's avatar
Natanael Copa committed
310
311
}

312
313
314
315
316
317
318
319
# Parse args
while getopts "r" opt; do
	case $opt in
		r) USE_RAID=1;;
	esac
done
shift $(( OPTIND - 1))

320
321
if [ -d "$1" ]; then
	# install to given mounted root
322
	install_mounted_root "${1%/}"
323
324
325
	exit $?
fi

326
disks=$(find_disks)
Natanael Copa's avatar
Natanael Copa committed
327
328
329
330

# no disks so lets exit quietly.
[ -z "$disks" ] && exit 0

331
332
333
334
335
if [ $# -gt 0 ]; then
	# check that they are 
	for i in "$@"; do
		j=$(readlink -f "$i" | sed 's:^/dev/::; s:/:!:g')
		if ! [ -e "/sys/block/$j/device" ]; then
Natanael Copa's avatar
Natanael Copa committed
336
			echo "$i is not a suitable for partitioning"
337
338
339
340
341
			exit 1
		fi
	done

else
342
	set -- $disks
343
344
345
	rootdisk=
	while ! in_list "$rootdisk" $disks "none" "abort"; do
		echo "Available disks are: $disks"
346
347
		echon "Which one is the root disk? (or none) [$1] "
		default_read rootdisk $1
348
349
350
351
352
	done
	case "$rootdisk" in
		none|abort) exit 0;;
	esac
fi
Natanael Copa's avatar
Natanael Copa committed
353

354
355
356
357
358
359
360
361
362
363
#echon "Do you want use *all* of $rootdisk for Alpine? (y/n) [n] "
#default_read useall "n"
#case "$useall" in
#	[Yy]*) useall="yes";;
#esac
#
#if [ "x$useall" != "xyes" ]; then
#	echo "Only 'use all' option is available at the moment. Sorry"
#	exit 1
#fi
Natanael Copa's avatar
Natanael Copa committed
364

365
rootdisk_dev=${rootdisk_dev:-"/dev/$rootdisk"}
Natanael Copa's avatar
Natanael Copa committed
366

367
368
if ! [ -b "$rootdisk_dev" ]; then
	echo "$rootdisk_dev is not a block device" >&2
Natanael Copa's avatar
Natanael Copa committed
369
370
371
	exit 1
fi

372
useall $rootdisk_dev