perl-install/live_install


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45

#!/bin/sh

if [ "$UID" -ne 0 ]; then
    echo >&2 "you need to be root to start live install"
    exit 3
fi

if [ -x ./Mandrake/mdkinst/usr/bin/perl-install/live_install2 ]; then
    dir=`pwd`/Mandrake/mdkinst
elif [ -x ../../../../../Mandrake/mdkinst/usr/bin/perl-install/live_install2 ]; then
    dir=`pwd`/../../..
else
    echo >&2 "unable to get a working live system to start, check your working directory"
    exit 2
fi

/bin/rm -rf /tmp/image
/bin/mkdir -m 0700 /tmp/image || exit 1
/bin/rm -rf /tmp/drakx
/bin/mkdir -m 0700 /tmp/drakx || exit 2

for i in Mandrake RPMS misc boot images VERSION
do
    /bin/ln -sf "$dir/../../$i" "/tmp/image/$i" 
done

/bin/cp -a "$dir/../../Mandrake/mdkinst" "/tmp/drakx"

if [ -x "/tmp/drakx/mdkinst/usr/bin/perl-install/live_install2" ]; then
    # get correct fonts for DrakX.
    if [ -n "$DISPLAY" ]; then
	xset +fp /tmp/drakx/mdkinst/usr/X11R6/lib/X11/fonts/
	xset fp rehash
    fi

    # avoid pollution for environment
    unset LC_MONETARY LC_CTYPE LC_NUMERIC LC_MESSAGES LC_TIME LC_COLLATE LANGUAGE LANG RPM_INSTALL_LANG

    # start DrakX, do not keep shell script in background else the CD is locked by it!!!
    cd /tmp/drakx/mdkinst/usr/bin/perl-install
    exec /usr/bin/perl ./live_install2
fi

echo >&2 "unable to get a working live system to start, check your working directory"
exit 2