1 |
kusanagi |
1.1 |
#!/bin/sh |
2 |
kusanagi |
1.2 |
# |
3 |
kusanagi |
1.1 |
# install - install a program, script, or datafile |
4 |
|
|
# |
5 |
kusanagi |
2.1 |
# This originates from X11R5 (mit/util/scripts/install.sh), which was |
6 |
|
|
# later released in X11R6 (xc/config/util/install.sh) with the |
7 |
|
|
# following copyright and license. |
8 |
kusanagi |
1.1 |
# |
9 |
kusanagi |
2.1 |
# Copyright (C) 1994 X Consortium |
10 |
|
|
# |
11 |
|
|
# Permission is hereby granted, free of charge, to any person obtaining a copy |
12 |
|
|
# of this software and associated documentation files (the "Software"), to |
13 |
|
|
# deal in the Software without restriction, including without limitation the |
14 |
|
|
# rights to use, copy, modify, merge, publish, distribute, sublicense, and/or |
15 |
|
|
# sell copies of the Software, and to permit persons to whom the Software is |
16 |
|
|
# furnished to do so, subject to the following conditions: |
17 |
|
|
# |
18 |
|
|
# The above copyright notice and this permission notice shall be included in |
19 |
|
|
# all copies or substantial portions of the Software. |
20 |
|
|
# |
21 |
|
|
# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR |
22 |
|
|
# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, |
23 |
|
|
# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE |
24 |
|
|
# X CONSORTIUM BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN |
25 |
|
|
# AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNEC- |
26 |
|
|
# TION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. |
27 |
|
|
# |
28 |
|
|
# Except as contained in this notice, the name of the X Consortium shall not |
29 |
|
|
# be used in advertising or otherwise to promote the sale, use or other deal- |
30 |
|
|
# ings in this Software without prior written authorization from the X Consor- |
31 |
|
|
# tium. |
32 |
|
|
# |
33 |
|
|
# |
34 |
|
|
# FSF changes to this file are in the public domain. |
35 |
kusanagi |
1.1 |
# |
36 |
|
|
# Calling this script install-sh is preferred over install.sh, to prevent |
37 |
|
|
# `make' implicit rules from creating a file called install from it |
38 |
|
|
# when there is no Makefile. |
39 |
|
|
# |
40 |
|
|
# This script is compatible with the BSD install script, but was written |
41 |
|
|
# from scratch. It can only install one file at a time, a restriction |
42 |
|
|
# shared with many OS's install programs. |
43 |
|
|
|
44 |
kusanagi |
1.2 |
|
45 |
kusanagi |
1.1 |
# set DOITPROG to echo to test this script |
46 |
|
|
|
47 |
|
|
# Don't use :- since 4.3BSD and earlier shells don't like it. |
48 |
|
|
doit="${DOITPROG-}" |
49 |
|
|
|
50 |
kusanagi |
1.2 |
|
51 |
kusanagi |
1.1 |
# put in absolute paths if you don't have them in your path; or use env. vars. |
52 |
|
|
|
53 |
|
|
mvprog="${MVPROG-mv}" |
54 |
|
|
cpprog="${CPPROG-cp}" |
55 |
|
|
chmodprog="${CHMODPROG-chmod}" |
56 |
|
|
chownprog="${CHOWNPROG-chown}" |
57 |
|
|
chgrpprog="${CHGRPPROG-chgrp}" |
58 |
|
|
stripprog="${STRIPPROG-strip}" |
59 |
|
|
rmprog="${RMPROG-rm}" |
60 |
|
|
mkdirprog="${MKDIRPROG-mkdir}" |
61 |
|
|
|
62 |
kusanagi |
1.2 |
transformbasename="" |
63 |
|
|
transform_arg="" |
64 |
kusanagi |
1.1 |
instcmd="$mvprog" |
65 |
|
|
chmodcmd="$chmodprog 0755" |
66 |
kusanagi |
1.2 |
chowncmd="" |
67 |
|
|
chgrpcmd="" |
68 |
|
|
stripcmd="" |
69 |
kusanagi |
1.1 |
rmcmd="$rmprog -f" |
70 |
|
|
mvcmd="$mvprog" |
71 |
kusanagi |
1.2 |
src="" |
72 |
|
|
dst="" |
73 |
|
|
dir_arg="" |
74 |
|
|
|
75 |
|
|
while [ x"$1" != x ]; do |
76 |
|
|
case $1 in |
77 |
kusanagi |
2.1 |
-c) instcmd=$cpprog |
78 |
kusanagi |
1.2 |
shift |
79 |
|
|
continue;; |
80 |
|
|
|
81 |
|
|
-d) dir_arg=true |
82 |
|
|
shift |
83 |
|
|
continue;; |
84 |
|
|
|
85 |
|
|
-m) chmodcmd="$chmodprog $2" |
86 |
|
|
shift |
87 |
|
|
shift |
88 |
|
|
continue;; |
89 |
|
|
|
90 |
|
|
-o) chowncmd="$chownprog $2" |
91 |
|
|
shift |
92 |
|
|
shift |
93 |
|
|
continue;; |
94 |
|
|
|
95 |
|
|
-g) chgrpcmd="$chgrpprog $2" |
96 |
|
|
shift |
97 |
|
|
shift |
98 |
|
|
continue;; |
99 |
|
|
|
100 |
kusanagi |
2.1 |
-s) stripcmd=$stripprog |
101 |
kusanagi |
1.2 |
shift |
102 |
|
|
continue;; |
103 |
|
|
|
104 |
|
|
-t=*) transformarg=`echo $1 | sed 's/-t=//'` |
105 |
|
|
shift |
106 |
|
|
continue;; |
107 |
|
|
|
108 |
|
|
-b=*) transformbasename=`echo $1 | sed 's/-b=//'` |
109 |
|
|
shift |
110 |
|
|
continue;; |
111 |
|
|
|
112 |
|
|
*) if [ x"$src" = x ] |
113 |
|
|
then |
114 |
|
|
src=$1 |
115 |
|
|
else |
116 |
|
|
# this colon is to work around a 386BSD /bin/sh bug |
117 |
|
|
: |
118 |
|
|
dst=$1 |
119 |
|
|
fi |
120 |
|
|
shift |
121 |
|
|
continue;; |
122 |
|
|
esac |
123 |
kusanagi |
1.1 |
done |
124 |
|
|
|
125 |
kusanagi |
1.2 |
if [ x"$src" = x ] |
126 |
|
|
then |
127 |
kusanagi |
2.1 |
echo "$0: no input file specified" >&2 |
128 |
kusanagi |
1.2 |
exit 1 |
129 |
|
|
else |
130 |
kusanagi |
2.1 |
: |
131 |
kusanagi |
1.1 |
fi |
132 |
|
|
|
133 |
kusanagi |
1.2 |
if [ x"$dir_arg" != x ]; then |
134 |
|
|
dst=$src |
135 |
|
|
src="" |
136 |
kusanagi |
2.1 |
|
137 |
|
|
if [ -d "$dst" ]; then |
138 |
kusanagi |
1.2 |
instcmd=: |
139 |
|
|
chmodcmd="" |
140 |
|
|
else |
141 |
kusanagi |
2.1 |
instcmd=$mkdirprog |
142 |
kusanagi |
1.2 |
fi |
143 |
|
|
else |
144 |
|
|
|
145 |
|
|
# Waiting for this to be detected by the "$instcmd $src $dsttmp" command |
146 |
kusanagi |
2.1 |
# might cause directories to be created, which would be especially bad |
147 |
kusanagi |
1.2 |
# if $src (and thus $dsttmp) contains '*'. |
148 |
|
|
|
149 |
kusanagi |
2.1 |
if [ -f "$src" ] || [ -d "$src" ] |
150 |
kusanagi |
1.2 |
then |
151 |
kusanagi |
2.1 |
: |
152 |
kusanagi |
1.2 |
else |
153 |
kusanagi |
2.1 |
echo "$0: $src does not exist" >&2 |
154 |
kusanagi |
1.2 |
exit 1 |
155 |
|
|
fi |
156 |
kusanagi |
2.1 |
|
157 |
kusanagi |
1.2 |
if [ x"$dst" = x ] |
158 |
|
|
then |
159 |
kusanagi |
2.1 |
echo "$0: no destination specified" >&2 |
160 |
kusanagi |
1.2 |
exit 1 |
161 |
|
|
else |
162 |
kusanagi |
2.1 |
: |
163 |
kusanagi |
1.2 |
fi |
164 |
|
|
|
165 |
|
|
# If destination is a directory, append the input filename; if your system |
166 |
|
|
# does not like double slashes in filenames, you may need to add some logic |
167 |
|
|
|
168 |
kusanagi |
2.1 |
if [ -d "$dst" ] |
169 |
kusanagi |
1.2 |
then |
170 |
kusanagi |
2.1 |
dst=$dst/`basename "$src"` |
171 |
kusanagi |
1.2 |
else |
172 |
kusanagi |
2.1 |
: |
173 |
kusanagi |
1.2 |
fi |
174 |
|
|
fi |
175 |
|
|
|
176 |
|
|
## this sed command emulates the dirname command |
177 |
kusanagi |
2.1 |
dstdir=`echo "$dst" | sed -e 's,[^/]*$,,;s,/$,,;s,^$,.,'` |
178 |
kusanagi |
1.2 |
|
179 |
|
|
# Make sure that the destination directory exists. |
180 |
|
|
# this part is taken from Noah Friedman's mkinstalldirs script |
181 |
|
|
|
182 |
|
|
# Skip lots of stat calls in the usual case. |
183 |
|
|
if [ ! -d "$dstdir" ]; then |
184 |
kusanagi |
2.1 |
defaultIFS=' |
185 |
|
|
' |
186 |
|
|
IFS="${IFS-$defaultIFS}" |
187 |
kusanagi |
1.2 |
|
188 |
kusanagi |
2.1 |
oIFS=$IFS |
189 |
kusanagi |
1.2 |
# Some sh's can't handle IFS=/ for some reason. |
190 |
|
|
IFS='%' |
191 |
kusanagi |
2.1 |
set - `echo "$dstdir" | sed -e 's@/@%@g' -e 's@^%@/@'` |
192 |
|
|
IFS=$oIFS |
193 |
kusanagi |
1.2 |
|
194 |
|
|
pathcomp='' |
195 |
|
|
|
196 |
|
|
while [ $# -ne 0 ] ; do |
197 |
kusanagi |
2.1 |
pathcomp=$pathcomp$1 |
198 |
kusanagi |
1.2 |
shift |
199 |
|
|
|
200 |
kusanagi |
2.1 |
if [ ! -d "$pathcomp" ] ; |
201 |
kusanagi |
1.2 |
then |
202 |
kusanagi |
2.1 |
$mkdirprog "$pathcomp" |
203 |
kusanagi |
1.2 |
else |
204 |
kusanagi |
2.1 |
: |
205 |
kusanagi |
1.2 |
fi |
206 |
kusanagi |
1.1 |
|
207 |
kusanagi |
2.1 |
pathcomp=$pathcomp/ |
208 |
kusanagi |
1.1 |
done |
209 |
kusanagi |
1.2 |
fi |
210 |
|
|
|
211 |
|
|
if [ x"$dir_arg" != x ] |
212 |
|
|
then |
213 |
kusanagi |
2.1 |
$doit $instcmd "$dst" && |
214 |
kusanagi |
1.2 |
|
215 |
kusanagi |
2.1 |
if [ x"$chowncmd" != x ]; then $doit $chowncmd "$dst"; else : ; fi && |
216 |
|
|
if [ x"$chgrpcmd" != x ]; then $doit $chgrpcmd "$dst"; else : ; fi && |
217 |
|
|
if [ x"$stripcmd" != x ]; then $doit $stripcmd "$dst"; else : ; fi && |
218 |
|
|
if [ x"$chmodcmd" != x ]; then $doit $chmodcmd "$dst"; else : ; fi |
219 |
kusanagi |
1.2 |
else |
220 |
|
|
|
221 |
|
|
# If we're going to rename the final executable, determine the name now. |
222 |
|
|
|
223 |
kusanagi |
2.1 |
if [ x"$transformarg" = x ] |
224 |
kusanagi |
1.2 |
then |
225 |
kusanagi |
2.1 |
dstfile=`basename "$dst"` |
226 |
kusanagi |
1.2 |
else |
227 |
kusanagi |
2.1 |
dstfile=`basename "$dst" $transformbasename | |
228 |
kusanagi |
1.2 |
sed $transformarg`$transformbasename |
229 |
|
|
fi |
230 |
|
|
|
231 |
|
|
# don't allow the sed command to completely eliminate the filename |
232 |
|
|
|
233 |
kusanagi |
2.1 |
if [ x"$dstfile" = x ] |
234 |
kusanagi |
1.2 |
then |
235 |
kusanagi |
2.1 |
dstfile=`basename "$dst"` |
236 |
kusanagi |
1.2 |
else |
237 |
kusanagi |
2.1 |
: |
238 |
kusanagi |
1.2 |
fi |
239 |
|
|
|
240 |
kusanagi |
2.1 |
# Make a couple of temp file names in the proper directory. |
241 |
|
|
|
242 |
|
|
dsttmp=$dstdir/_inst.$$_ |
243 |
|
|
rmtmp=$dstdir/_rm.$$_ |
244 |
kusanagi |
1.2 |
|
245 |
kusanagi |
2.1 |
# Trap to clean up temp files at exit. |
246 |
|
|
|
247 |
|
|
trap 'status=$?; rm -f "$dsttmp" "$rmtmp" && exit $status' 0 |
248 |
|
|
trap '(exit $?); exit' 1 2 13 15 |
249 |
kusanagi |
1.2 |
|
250 |
|
|
# Move or copy the file name to the temp name |
251 |
|
|
|
252 |
kusanagi |
2.1 |
$doit $instcmd "$src" "$dsttmp" && |
253 |
kusanagi |
1.2 |
|
254 |
|
|
# and set any options; do chmod last to preserve setuid bits |
255 |
|
|
|
256 |
|
|
# If any of these fail, we abort the whole thing. If we want to |
257 |
|
|
# ignore errors from any of these, just make sure not to ignore |
258 |
|
|
# errors from the above "$doit $instcmd $src $dsttmp" command. |
259 |
|
|
|
260 |
kusanagi |
2.1 |
if [ x"$chowncmd" != x ]; then $doit $chowncmd "$dsttmp"; else :;fi && |
261 |
|
|
if [ x"$chgrpcmd" != x ]; then $doit $chgrpcmd "$dsttmp"; else :;fi && |
262 |
|
|
if [ x"$stripcmd" != x ]; then $doit $stripcmd "$dsttmp"; else :;fi && |
263 |
|
|
if [ x"$chmodcmd" != x ]; then $doit $chmodcmd "$dsttmp"; else :;fi && |
264 |
|
|
|
265 |
|
|
# Now remove or move aside any old file at destination location. We try this |
266 |
|
|
# two ways since rm can't unlink itself on some systems and the destination |
267 |
|
|
# file might be busy for other reasons. In this case, the final cleanup |
268 |
|
|
# might fail but the new file should still install successfully. |
269 |
|
|
|
270 |
|
|
{ |
271 |
|
|
if [ -f "$dstdir/$dstfile" ] |
272 |
|
|
then |
273 |
|
|
$doit $rmcmd -f "$dstdir/$dstfile" 2>/dev/null || |
274 |
|
|
$doit $mvcmd -f "$dstdir/$dstfile" "$rmtmp" 2>/dev/null || |
275 |
|
|
{ |
276 |
|
|
echo "$0: cannot unlink or rename $dstdir/$dstfile" >&2 |
277 |
|
|
(exit 1); exit |
278 |
|
|
} |
279 |
|
|
else |
280 |
|
|
: |
281 |
|
|
fi |
282 |
|
|
} && |
283 |
kusanagi |
1.2 |
|
284 |
|
|
# Now rename the file to the real destination. |
285 |
|
|
|
286 |
kusanagi |
2.1 |
$doit $mvcmd "$dsttmp" "$dstdir/$dstfile" |
287 |
kusanagi |
1.2 |
|
288 |
|
|
fi && |
289 |
|
|
|
290 |
kusanagi |
2.1 |
# The final little trick to "correctly" pass the exit status to the exit trap. |
291 |
kusanagi |
1.1 |
|
292 |
kusanagi |
2.1 |
{ |
293 |
|
|
(exit 0); exit |
294 |
|
|
} |