#!/bin/sh
#
# $Id: init 1339 2007-04-24 22:23:24Z bruno $
#
# init script launched during the restore process
#------------------------------------------------------------


CaughtSoftReset() {
    trap SIGTERM
    reboot
}


ConfigureLoggingDaemons() {
    echo -en "Running klogd..."
    klogd -c 2 > /dev/null 2> /dev/null
    echo -en "Done.\nRunning syslogd..."
    syslogd > /dev/null 2> /dev/null
    echo "Done."
    LogIt "klogd and syslogd have been started."
}



CopyBootDevEntry() {
    local outfile devfile
    devfile=/dev/boot_device
    outfile=`cat /BOOTLOADER.DEVICE 2> /dev/null`
    [ ! "$outfile" ] && return 0
    echo -en "Copying boot device to $outfile..."
    if [ -e "$outfile" ] ; then
	echo "OK."
	return 0
    fi
    mkdir -p $outfile
    rmdir $outfile
    cp -pRdf $devfile $outfile
    if [ "$?" -ne "0" ] ; then
	echo "Failed."
	return 1
    else
	echo "OK."
	return 0
    fi
}



Die() {
    LogIt "Fatal error! $1" 1
    exit 1
}



ExtractDevTarballs() {
    cd /
    for fname in ataraid.tgz ida.tgz rd.tgz raw.tgz cciss.tgz nst.tgz dm.tgz vc.tgz ; do
        if [ ! -e "/$fname" ] ; then
            LogIt "/$fname not found; cannot extract to /." 1
        else
            echo -en "\rExtracting /$fname...     "
            tar -zxf /$fname || LogIt "Error occurred while extracting /$fname"
        fi
    done
    echo -en "\r"
    LogIt "Extracted additional /dev entries OK.     " 1
}



LaunchTerminals() {
    openvt 2 /bin/sh
    openvt 3 /bin/sh
    openvt 4 /bin/sh
    openvt 5 /bin/sh
    openvt 6 /bin/sh
    openvt 7 /bin/sh /sbin/wait-for-petris
}


LoadKeymap() {
    local fname
    fname=`grep keymap-lives-here /tmp/mondo-restore.cfg | cut -d'=' -f2 2> /dev/null`
    [ "$fname" = "" ] && return
    if which loadkeys > /dev/null 2> /dev/null ; then
        loadkeys $fname
# loadkmap != loadkeys
#    elif which loadkmap > /dev/null 2> /dev/null ; then
#        loadkmap < $fname
    else
        LogIt "Using default keyboard map." 1
    fi
}


UntarTapeStuff() {
    local old_pwd res
    old_pwd=`pwd`
    cd $GROOVY
    [ "$1" != "" ] && tapedev=$1
    [ ! "$tapedev" ] && tapedev=`grep media-dev /tmp/mondo-restore.cfg | tr -s ' ' ' ' | cut -d'=' -f2`
#    tar -zxf $tapedev
    dd if=$tapedev bs=32k count=1024 | tar -zx
    res=$?
    if [ "$res" -eq "0" ] ; then
	grep -v media-dev /tmp/mondo-restore.cfg > /tmp/mr.cfg
	echo "media-dev=$tapedev" >> /tmp/mr.cfg
        cp -f /tmp/mr.cfg /tmp/mondo-restore.cfg
    fi
    cd $old_pwd
    return $res
}

HandleTape() {
    local res tapedev
    tapedev="" ; # will be set by UntarTapeStuff()
    cd $GROOVY
    UntarTapeStuff $tapedev || UntarTapeStuff /dev/st0 || UntarTapeStuff /dev/osst0 || UntarTapeStuff /dev/ht0
    res=$?
    while [ "$res" -ne "0" ] ; do
        LogIt "$tapedev failed to act as extended data disk for booting." 1
        LogIt "Please specify an alternate tape device," 1
        LogIt "or hit <Enter> to boot from CD/floppies." 1
        echo -en "---> "
        read tapedev
        if [ "$tapedev" ] ; then
            LogIt "User specified $tapedev instead"
            UntarTapeStuff $tapedev
            res=$?
        else
            LogIt "User opted not to specify an alternate tapedev"
            res=1
	    break
        fi
    done

    if [ "$res" -ne "0" ] ; then
	cd /
	LogIt "Failed to use tape as extended datadisk. Reverting to floppies." 1
	HandleCDROMorFloppies
	res=$?
    else
#	clear
	LogIt "Using tape as extended datadisk. Good." 3
	echo "Using tape as extd ddisk." > /tmp/TAPEDEV-HAS-DATA-DISKS
	res=0
        CD_MOUNTED_OK=yes
    fi
    return $res
}



HandleCDROMorFloppies() {
    find-and-mount-cdrom
    res=$?
    if [ "$res" -ne "0" ] ; then
		LogIt "First call to find-and-mount-cdrom failed." 1
		LogIt "Sleeping for 3 seconds and trying again." 1
		sleep 3
		find-and-mount-cdrom
		res=$?
    fi
    if [ "$res" -eq "0" ] ; then
		LogIt "OK, I am running on a CD-ROM. Good." 3
        CD_MOUNTED_OK=yes
    elif [ "$res" -eq "1" ] ; then
		LogIt "OK, I am running on floppies. Good." 3
		CD_MOUNTED_OK=""
    else
		LogIt "OK, I am falling back to floppy mode." 3
        LogIt "That means you'll have to copy the data disk images from" 3
        LogIt "the CD/hard disk/whatever to physical 1.44MB disks and" 3
        LogIt "insert them, one after the other. Please see the manual." 3
        LogIt "The images are in /images on the CD, or /var/cache/mindi" 3
        LogIt "on your hard disk. Your archives are probably fine but" 3
        LogIt "your tape streamer and/or CD-ROM drive are eccentric. :-)" 3
		CD_MOUNTED_OK=""
    fi
    return 0
}


HowMuchFreeSpaceOnRamdisk() {
   df -m -P | grep /dev/ram | head -n1 | tr -s '\t' ' ' | cut -d' ' -f4
}



InsertEssentialModules() {
#   Load the VIA IDE module first thing if it exists (requires ide-core).
#   This is to ensure that DMA is working for VIA chipsets with 2.6 kernels.
    for module in /ide-core.ko /via82cxxx.ko; do
        [ -f "$module" ] && MyInsmod $module > /dev/null 2> /dev/null
    done
#   Then load the remaining modules in normal (i.e. arbitrary) order.
    for j in 1 2 3 4 5 ; do
        for i in `ls /*.*o* 2> /dev/null` ; do
            [ -f "$i" ] && MyInsmod $i > /dev/null 2> /dev/null
        done
    done
}



PauseForRaids() {
    if [ "`dmesg | grep -i "RAID Controller"`" != "" ] || [ "`dmesg | grep -i "Vendor: 3ware"`" != "" ] ; then
        LogIt "RAID controller(s) detected. Pausing 10 seconds to let them warm up." 1
        echo -en "Pausing..."
        for i in 1 2 3 4 5 6 7 8 9 10 ; do
            sleep 1
            echo -en "$(($i*10))%..."
        done
        echo "Done."
    fi
}


# 06/13/2002 --- DuckX's & Hugo's new routine
# 10/11/2003 --- added a simple devfsd.conf file
# 01/24/2005 --- cater for arbitrary locations of devfsd.conf by using the
#                config file path compiled into devfsd
RunDevfsd() {
    loc=`which devfsd 2> /dev/null`
    if [ "$loc" != "" ] ; then
	LogIt "Devfs found. Testing kernel support..."
	if [ ! -e "/dev/.devfsd" ] ; then
	    mount -t devfs devfs /dev 2>> $LOGFILE
            if [ "$?" -ne "0" ] ; then
		LogIt "Error while trying to mount devfs"
	    else
		LogIt "Devfs mounted OK"
	    fi
	fi
	#check if the kernel supports devfs
	if [ -e "/dev/.devfsd" ] ; then
	    [ -d "/proc/1" ] || mount -n /proc
	    LogIt "Kernel support found. Creating config file and starting devfsd"
	    conffile=`strings $loc | grep -E "devfsd.conf$"`
	    [ "$conffile" ] || conffile="/etc/devfsd.conf"
	    confpath=`echo $conffile | sed "s/\/devfsd\.conf$//"`
	    [ -d "$confpath" ] || mkdir -p $confpath
	    echo -en "REGISTER .* MKOLDCOMPAT\nUNREGISTER .* RMOLDCOMPAT\n" > $conffile
	    devfsd /dev &
	    sleep 5
	else
	    LogIt "No devfs kernel support."
	fi
    fi
}






#RunDevfsd() {
#    loc=`which devfsd 2> /dev/null`
#    if [ "$loc" != "" ] ; then
#        LogIt "Starting devfsd"
#        devfsd /dev &
#        sleep 5
#    fi
#}



SpaceTests() {
    [ -e "/tmp/filelist.full" ] && cp /tmp/filelist.full /tmp/FLF
    if [ "`HowMuchFreeSpaceOnRamdisk`" -le "3" ] ; then
        LogIt "Ramdisk is a bit smaller than I would like." 1
        LogIt "Please re-run Mondo/Mindi but edit mindi first" 1
        LogIt "and set EXTRA_SPACE to something high, e.g. 8000" 1
        Die "Aborting. Please reboot."
    fi
    rm -f /tmp/FLF
}



StartLvms() {
    if [ -e "/tmp/i-want-my-lvm" ] ; then
        LogIt "Scanning LVM's..." 1
		if which lvm ; then
	    	MyInsmod dm-mod
	    	MyInsmod dm_mod
	    	lvm vgscan --mknodes
		else
	    	vgscan
		fi
        grep -E "^#.*vgchange" /tmp/i-want-my-lvm | sed "s/^#[ ]*//" > /tmp/start-lvm
        chmod +x /tmp/start-lvm
        echo -en "Starting LVM's..."
        /tmp/start-lvm &
        for i in 1 2 3 4 5 ; do
	    echo -en "."
	    sleep 1
        done
        echo "Done."
    fi
# If necessary, cannibalize 'analyze-my-lvm'; copy some of its code here,
# pipe vgscan's output, strip it, run 'vgchange' on its output, etc.etc.
    LogIt "LVM's have been started."
}


StartRaids() {
    local raid_devices i

    raid_devices=`grep /dev/md /tmp/mountlist.txt | cut -d' ' -f1`
	if which raidstart > /dev/null 2> /dev/null ; then
    	for i in $raid_devices ; do
        	if grep `basename $i` /proc/mdstat > /dev/null 2> /dev/null ; then
            	LogIt "$i is started already; no need to run 'raidstart $i'" 1
        	else
	    		LogIt "Running 'raidstart $i'" 1
	    		raidstart $i
        	fi
    	done
	elif which mdrun > /dev/null 2> /dev/null ; then
		LogIt "Running 'mdrun'" 1
		mdrun
	elif which mdadm > /dev/null 2> /dev/null ; then
		LogIt "Running 'mdadm'" 1
		for i in $raid_devices ; do
        	if grep `basename $i` /proc/mdstat > /dev/null 2> /dev/null ; then
            	LogIt "$i is started already; no need to run 'mdadm $i'" 1
        	else
	    		LogIt "Running 'mdadm $i'" 1
	    		mdadm -Ac partitions -m dev $i
        	fi
    	done
	else
		LogIt "Warning: Neither 'raidstart' nor 'mdrun''found. RAID devices may not have started." 1
	fi

}


TryAgainToFindCD() {
    local res
    mount | grep /mnt/cdrom && return 0
    [ "`grep "backup_media_type" /tmp/mondo-restore.cfg | grep "cdstream"`" ] && return
    LogIt "Trying to mount CD-ROM a 2nd time..."
    find-and-mount-cdrom --second-try
    res=$?
    if [ "$res" -eq "0" ] ; then
        CD_MOUNTED_OK=yes
        LogIt "CD-ROM drive mounted successfully." 1
    else
        LogIt "I still cannot find or mount the CD-ROM drive, by the way."
    fi
}



UseTmpfs()
{
    local mount_cmd
    echo -en "Mounting /tmp/tmpfs..."
    mkdir -p /tmp/tmpfs
# For technical reasons, some sets are as large as 16MB.
# I am allowing 32MB because selective restore occupies a lot of space.
    for size in 64m 48m 40m 32m ; do
        mount_cmd="mount /dev/shm -t tmpfs -o size=$size" ; # was 34m until 04/2003
        LogIt "Trying '$mount_cmd'"
	$mount_cmd /tmp/tmpfs 2>> $LOGFILE
	res=$?
	[ "$res" -eq "0" ] && break
    done
    if [ "$res" -ne "0" ] ; then
        LogIt "Failed. I could not run '$mount_cmd /tmp/tmpfs'. Your kernel is BROKEN or you do not have enough RAM." 1
        umount /tmp/tmpfs > /dev/null 2> /dev/null
	rmdir /tmp/tmpfs
        ln -sf /mnt/RESTORING/tmp /tmp/tmpfs; # used by mondo-restore
	LogIt "Failed to mount /tmp/tmpfs; using ugly softlink instead"
    else
        LogIt "Great. Pivot succeeded w/ size=$size" 1
        echo -en "Pivoting /tmp..."
        umount /tmp/tmpfs
        mkdir -p /tmp.old
        mv -f /tmp/* /tmp.old/
        $mount_cmd /tmp
        mv /tmp.old/* /tmp/
        rmdir /tmp.old
        mkdir -p /tmp/tmpfs
        mkdir -p $GROOVY
	echo "Done."
	LogIt "Successfully mounted dynamic /tmp ramdisk"
#	mkdir -p /tmp/tmpfs/var
#        mv -f /var/log /tmp/tmpfs/var/log
#        ln -sf /tmp/tmpfs/var/log /var/log
    fi
}


WelcomeMessage()
{
    echo "********************************************************************"
    echo "MINDI-LINUX by Mondo Dev Team - web site: http://www.mondorescue.org"
    echo "Boot disk based on AlfaLinux & Trinux. BusyBox by Erik Andersen."
which petris > /dev/null 2> /dev/null && echo "Petris was written by Peter Seidler <p.seidler@mail1.stofanet.dk>."
    echo "Executables and source code are covered by the GNU GPL. No warranty."
    echo "running on $ARCH"
    echo "********************************************************************"
}


EnableCcissIfAppropriate() {
    local i fname
    for i in 0 1 2 3 ; do
	fname="/proc/driver/cciss/cciss$i"
	if [ -e "$fname" ] ; then
	    LogIt "Engaging $fname"
	    echo "engage scsi" > $fname
	    LogIt "...result=$?"
	fi
    done
}


ExtractDataDisksAndLoadModules() {
	echo "Installing additional tools ..."
	install-additional-tools
	echo "Inserting modules ..."
	insert-all-my-modules > $LOGFILE 2> $LOGFILE
}

# ------------------------ main -----------------------

MINDI_VER=VVV
MINDI_REV=RRR
trap CaughtSoftReset SIGTERM
LOGFILE=/tmp/mondorestore.log
PATH=/bin:/usr/bin:/sbin:/usr/sbin:/usr/local/bin:/usr/local/sbin:/mondo:/usr/games
GROOVY=/tmp/groovy-stuff
USER=root
export PATH GROOVY USER LOGFILE

echo "Welcome to init (from mindi ${MINDI_VER}-r${MINDI_REV}"

mount -o remount rw /
[ ! "$GROOVY" ] && Die "I'm not groovy!"
for i in $GROOVY /mnt/floppy /mnt/cdrom /mnt/isodir /var/local/petris /tmp/isodir; do
    mkdir -p $i
done
#/bin/update
mount /proc/ /proc -v -t proc 
mkdir /sys 2> /dev/null
mount /sys/ /sys -v -t sysfs 2>> $LOGFILE
rm -f /foozero

echo 0 > /proc/sys/kernel/exec-shield 2>> /dev/null

ExtractDevTarballs
LaunchTerminals
InsertEssentialModules
EnableCcissIfAppropriate
#-------------------------------
#WHOLIVESINAPINEAPPLEUNDERTHESEA#;# --- don't touch this :)
#-------------------------------
UseTmpfs
if [ ! -e "/tmp/mondo-restore.cfg" ] ; then
    LogIt "Warning - /tmp/mondo-restore.cfg not found"
fi

if [ "`grep -i 'tape ' /tmp/mondo-restore.cfg`" ] || [ "`grep -i udev /tmp/mondo-restore.cfg`" ] ; then
    HandleTape
	ExtractDataDisksAndLoadModules
elif [ "`grep -i pxe /proc/cmdline`" ]; then
	# We need to get here exported variables from start-nfs
    . /sbin/start-nfs

	# Simulate a local CD
	echo "/mnt/cdrom" > /tmp/CDROM-LIVES-HERE
    CD_MOUNTED_OK=yes
	ExtractDataDisksAndLoadModules
else
	HandleCDROMorFloppies
	ExtractDataDisksAndLoadModules
	# We need to get here exported variables from start-nfs
    . /sbin/start-nfs
fi
res=$?
ConfigureLoggingDaemons
if [ -e "/tmp/USE-DEVFS" ] ; then
    umount /mnt/cdrom 2> /dev/null
    mv /dev/cdrom /cdrom.lnk 2> /dev/null
    CD_MOUNTED_OK=""
    RunDevfsd
fi
echo "Starting potential Raid/LVMs ..."
PauseForRaids
StartRaids
StartLvms
CopyBootDevEntry
LoadKeymap
mkdir -p /tmp/tmpfs
sleep 2
#clear
if [ -e "/dev/md0" ] && [ ! -e "/dev/md/0" ] && [ "`grep /dev/md/ /tmp/mountlist.txt`" != "" ] ; then
    LogIt "Creating /dev/md/* softlinks just in case." 1
    mkdir -p /dev/md
    cp -af /dev/md0 /dev/md/0 2> /dev/null
    cp -af /dev/md1 /dev/md/1 2> /dev/null
    cp -af /dev/md2 /dev/md/2 2> /dev/null
fi
export ARCH=`uname -m`
WelcomeMessage
# SpaceTests; # Mandrake Linux 8.1 doesn't like this
[ -e "/tmp/mountlist.txt" ] && cp -f /tmp/mountlist.txt /tmp/mountlist.original

if ! [ "`grep -i "pxe" /proc/cmdline`" ] ; then
	res="`cat /mnt/cdrom/archives/THIS-CD-NUMBER 2> /dev/null`"
	[ "$res" != "1" ] && [ "$res" != "" ] && Die "This is CD #$res in the series. Please insert CD #1."
	[ -e "/cdrom.lnk" ] && mv -f /cdrom.lnk /dev/cdrom && mount /dev/cdrom /mnt/cdrom && CD_MOUNTED_OK=yes
	[ "$CD_MOUNTED_OK" != "yes" ] && TryAgainToFindCD
	#mount | grep cdrom > /dev/null 2> /dev/null || mount /dev/cdrom /mnt/cdrom >> $LOGFILE 2>> $LOGFILE
fi
hack-cfg-if-necessary || LogIt "Cannot find hack-cfg-if-necessary"
openvt 8 /usr/bin/tail -f $LOGFILE

#-------------------------------
#ABSORBENTANDYELLOWANDPOROUSISHE#;# --- don't touch this either :)
#-------------------------------

lsmod > /tmp/ramdisk-lsmod.txt 2> /dev/null
cut -d' ' -f1 /tmp/original-lsmod.txt /tmp/original-lsmod.txt /tmp/ramdisk-lsmod.txt | sort | uniq -d > /tmp/missing-modules.txt
echo "Warning - these modules did not make it onto the ramdisk" >> $LOGFILE
cat /tmp/missing-modules.txt >> $LOGFILE

#ctrlaltdel soft
for path in /usr.bin /usr/bin ; do
    fname=$path/nano
    [ -e "$fname" ] && ln -sf $fname /usr/bin/pico
done
res=`which nano 2> /dev/null`
[ "$res" ] && ln -sf /usr/bin/
for i in null stdout stdin stderr ; do
    cp -af /dev/$i /tmp
done
if grep "backup-media-type" /tmp/mondo-restore.cfg > /dev/null 2> /dev/null ; then
    LogIt "backup-media-type is specified in config file - great."
    LogIt "Calling post-init $mountlist"
    post-init
else
    LogIt "backup-media-type is not specified in config file."
    LogIt "I think this CD/floppy has no archives on it."
fi
echo -en "Type 'exit' to reboot the PC\n"
umount /mnt/cdrom 2> /dev/null
mount / -o rw,remount > /dev/null 2> /dev/null
sh
CaughtSoftReset
# reboot