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
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
|
#!/bin/sh
#
# Launch squeak from a menu, prompting for and/or installing an image
#
# Last edited: 2010-04-09 04:35:35 by piumarta on ubuntu
PATH=/usr/bin:/bin
if pwd -P 2>/dev/null 1>&2; then pwd="pwd -P"; else pwd="pwd"; fi
me=`basename $0`
bindir=`dirname $0`
bindir=`cd ${bindir}; ${pwd}`
prefix=`dirname ${bindir}`
libdir="${prefix}/lib/squeak"
vm="squeak"
# find a way to display dialogues
if test -n "$DISPLAY" -a -x "`which kdialog 2>/dev/null`"; then
error () { kdialog --error "${me}: $*"; exit 1; }
confirm () { if kdialog --yesno "${1} ${2}?"; then result="${2}"; else result=""; fi; }
chooseItem () { title="$1"; shift; result=`kdialog --combobox "${title}" $*`; }
findFile () { result=`kdialog --title "$1" --getopenfilename . '*.image'`; }
findDirectory () { result=`kdialog --title "$1" --getexistingdirectory .`; }
elif [ -n "$DISPLAY" -a -x "`which zenity 2>/dev/null`" ]; then
error () { zenity --error --text "${me}: $*"; exit 1; }
confirm () { if zenity --question --text="${1} ${2}?"; then result="${2}"; else result=""; fi; }
chooseItem () { title="$1"; shift; result=`zenity --title "${title}" --list --column Images $*`; }
findFile () { result=`zenity --title "$1" --file-selection --file-filter='*.image'`; }
findDirectory () { result=`zenity --title "$1" --file-selection --directory`; }
else
error () { echo "${me}: $*" >&2; exit 1; }
confirm () { error "this cannot happen"; }
chooseItem () { error "this cannot happen"; }
findFile () { error "no image name specified"; }
findDirectory () { error "this cannot happen"; }
fi
# succeed if there are two or more arguments
plural () { test -n "$2"; }
# find the VM
if test -x "${bindir}/${vm}"; then
vm="${bindir}/${vm}"
elif test -x "`which ${vm} 2>/dev/null`"; then
vm="`which ${vm} 2>/dev/null`"
else
error "Cannot find ${vm}"
fi
# if we have arguments then assume an image name was given or we came
# from a command line
if test $# -gt 0; then
exec "${vm}" "$@"
fi
findFile "Choose a saved image to resume or cancel to install a new one"
if test -z "${result}"; then
images=""
if test -d "${libdir}"; then
images=`cd "${libdir}"; ls *.image 2>/dev/null`
fi
if test -z "${images}"; then
error "no image name specified and no images found in ${libdir}"
exit 1
fi
if plural ${images}; then
chooseItem "Choose an image to install" ${images}
else
confirm "Install image" ${images}
fi
if test -z "${result}"; then
exit 0
fi
image=${result}
changes=`basename ${image} .image`.changes
findDirectory "Choose a destination directory for the image"
if test -z "${result}"; then
exit 0
fi
if test -e "${result}/${image}"; then
confirm "Overwrite existing ${image} in" "${result}"
if test -z "${result}"; then
exit 0;
fi
fi
cp -p "${libdir}/${image}" "${result}/."
cp -p "${libdir}/${changes}" "${result}/."
ln -s "${libdir}"/*.sources "${result}/."
image="${result}/${image}"
else
image="${result}"
fi
cd "`dirname ${image}`"
exec "${vm}" "`basename ${image}`"
|
