#!/bin/sh

. /etc/init.d/pl_functions

echo ""
echo "PlanetLab BootCD - distro @PLDISTRO@ based on @FCDISTRO@"

echo ""
echo $(date "+%H:%M:%S") "pl_sysinit: bringing system online"

echo ""
echo $(date "+%H:%M:%S") "pl_sysinit: mounting file systems"
/bin/mount -v -a

echo ""
echo $(date "+%H:%M:%S") "pl_sysinit: starting udevd"
[ -x /sbin/start_udev ] && /sbin/start_udev

echo ""
echo $(date "+%H:%M:%S") "pl_sysinit: invoking hardware initialization script"
/etc/init.d/pl_hwinit

check_initrd()
{
    _mounted=0
    if [ -f /usr/isolinux/pl_version ] ; then
        # it mounted, but we should probably make sure its our boot cd
        # this can be done by making sure the /pl_version file (on initrd)
        # matches /usr/isolinux/pl_version
	initrd_version=$(/bin/cat /pl_version)
	cd_version=$(/bin/cat /usr/isolinux/pl_version)
	if [ "$initrd_version" == "$cd_version" ]; then
	    _mounted=1 
	fi
    fi
    return $_mounted
}

check_block_devices()
{
    _mounted=0
    # so that * expands to empty string if there are no block devices
    shopt -s nullglob

    for device in /sys/block/*; do
	device=$(/bin/basename $device)

        # skipping any devices that start with md or ra (ram) or lo
	# (loop) or fd (floppy)

	start_device=${device:0:2}
	if [ "$start_device" == "ra" ] || [ "$start_device" == "md" ] ||
	    [ "$start_device" == "lo" ] || [ "$start_device" == "fd" ]; then
	    continue
	fi

        # If this is a removable (e.g., USB flash) device, then try to
        # look for an ISO image on each of its partitions.
	if [ "$(cat /sys/block/$device/removable)" = "1" ] ; then
	    partitions=$(/bin/awk "\$4 ~ /${device}[0-9]*/ { print \$4 }" /proc/partitions)
	    for partition in $partitions ; do
		echo $(date "+%H:%M:%S") "pl_sysinit: checking $partition for iso image"
		mkdir -p /tmp/$partition
		if /bin/mount -o ro -t msdos,ext2 /dev/$partition /tmp/$partition 2>&1 > /dev/null ; then
		# Look for the first ISO image
		    for iso in /tmp/$partition/*.iso ; do
			if /sbin/losetup /dev/loop0 $iso ; then
			    echo $(date "+%H:%M:%S") "pl_sysinit: using $(basename $iso) on $partition"
			    device="loop0"
			    break
			fi
		    done
		    if [ "$device" != "loop0" ] ; then
			/bin/umount /tmp/$partition 2>&1 > /dev/null
		    fi
		fi
	    done
	fi
	
	echo $(date "+%H:%M:%S") "pl_sysinit: checking $device for /usr contents"
	/bin/mount -o ro -t iso9660 /dev/$device /usr 2>&1 > /dev/null
	if [ $? -eq 0 ]; then
	# it mounted, but we should probably make sure its our boot cd
	# this can be done by making sure the /pl_version file (on initrd)
	# matches /usr/isolinux/pl_version
	    initrd_version=$(/bin/cat /pl_version)
	    cd_version=$(/bin/cat /usr/isolinux/pl_version)

	    if [ "$initrd_version" != "$cd_version" ]; then
	    # eh, wrong cd, keep trying
		/bin/umount /usr 2>&1 /dev/null
	    else
		echo $(date "+%H:%M:%S") "pl_sysinit: found cd and mounted on /usr"
		_mounted=1
		break
	    fi
	fi
    done
    return $_mounted
}

echo $(date "+%H:%M:%S") "pl_sysinit: finding cd to mount on /usr"
mounted=0
check_initrd
if [ $? -eq 1 ]; then
    mounted=1
else
    [ ! -d /usr ] && mkdir /usr
    check_block_devices
    [ $? -eq 1 ] && mounted=1
fi

if [ $mounted -eq 0 ]; then
    echo $(date "+%H:%M:%S") "pl_sysinit: unable to find boot cdrom, cannot continue."
    # todo: maybe we can put a staticly linked sshd here
    /sbin/shutdown -h now
fi


# parts of this were copied from devmap_mknod.sh from the device-mapper
# source. Since fedora decided not to include it in the rpm, it is 
# being copied here
echo $(date "+%H:%M:%S") "pl_sysinit: creating device mapper control node"

DM_DIR="mapper"
DM_NAME="device-mapper"
DIR="/dev/$DM_DIR"
CONTROL="$DIR/control"

MAJOR=$(sed -n 's/^ *\([0-9]\+\) \+misc$/\1/p' /proc/devices)
MINOR=$(sed -n "s/^ *\([0-9]\+\) \+$DM_NAME\$/\1/p" /proc/misc)

if [ -n "$MAJOR" ] && [ -n "$MINOR" ]; then
    /bin/mkdir -p --mode=755 $DIR
    /bin/rm -f $CONTROL
    /bin/mknod --mode=600 $CONTROL c $MAJOR $MINOR
else
    echo $(date "+%H:%M:%S") "pl_sysinit: unable to create device mapper control node, continuing"
fi

echo ""
echo $(date "+%H:%M:%S") "pl_sysinit: configuring kernel parameters"
/sbin/sysctl -e -p /etc/sysctl.conf

# startup rsyslog if available (we're *NOT* running the standard rc)
syslog=/etc/rc.d/init.d/rsyslog
[ -x $syslog ] && $syslog start

echo ""
echo $(date "+%H:%M:%S") "pl_sysinit: bringing network online"
/etc/init.d/pl_netinit

# just in case, sometimes we're seeing weird stuff already at this point
pl_network_sanity_checks

echo ""
echo $(date "+%H:%M:%S") "pl_sysinit: attempting to sync clock"
/usr/sbin/ntpdate -b -t 10 -u pool.ntp.org

# Handle /dev/rtc name change for newer kernels
# otherwise hwclock fails
baseMaj=`uname -r | cut -d "." -f1`
baseMin=`uname -r | cut -d "." -f2`
vers=`uname -r | cut -d "." -f3 | cut -d "-" -f1`
if [ $baseMaj -eq 2 ];then
    if [ $baseMin -eq 6 ]; then
        if [ $vers -ge 32 ];then
            if [ "$(readlink /dev/rtc)" != "/dev/rtc0" ]; then
                rm -f /dev/rtc
                ln -s /dev/rtc0 /dev/rtc
            fi
        fi
    fi
fi

# save ntp clock to hardware
/sbin/hwclock --systohc --utc