Annotation of rpl/install-sh, revision 1.5
1.1 bertrand 1: #!/bin/sh
2: # install - install a program, script, or datafile
3:
1.5 ! bertrand 4: scriptversion=2011-01-19.21; # UTC
1.1 bertrand 5:
6: # This originates from X11R5 (mit/util/scripts/install.sh), which was
7: # later released in X11R6 (xc/config/util/install.sh) with the
8: # following copyright and license.
9: #
10: # Copyright (C) 1994 X Consortium
11: #
12: # Permission is hereby granted, free of charge, to any person obtaining a copy
13: # of this software and associated documentation files (the "Software"), to
14: # deal in the Software without restriction, including without limitation the
15: # rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
16: # sell copies of the Software, and to permit persons to whom the Software is
17: # furnished to do so, subject to the following conditions:
18: #
19: # The above copyright notice and this permission notice shall be included in
20: # all copies or substantial portions of the Software.
21: #
22: # THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
23: # IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
24: # FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
25: # X CONSORTIUM BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
26: # AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNEC-
27: # TION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
28: #
29: # Except as contained in this notice, the name of the X Consortium shall not
30: # be used in advertising or otherwise to promote the sale, use or other deal-
31: # ings in this Software without prior written authorization from the X Consor-
32: # tium.
33: #
34: #
35: # FSF changes to this file are in the public domain.
36: #
37: # Calling this script install-sh is preferred over install.sh, to prevent
38: # `make' implicit rules from creating a file called install from it
39: # when there is no Makefile.
40: #
41: # This script is compatible with the BSD install script, but was written
42: # from scratch.
43:
44: nl='
45: '
46: IFS=" "" $nl"
47:
48: # set DOITPROG to echo to test this script
49:
50: # Don't use :- since 4.3BSD and earlier shells don't like it.
51: doit=${DOITPROG-}
52: if test -z "$doit"; then
53: doit_exec=exec
54: else
55: doit_exec=$doit
56: fi
57:
58: # Put in absolute file names if you don't have them in your path;
59: # or use environment vars.
60:
61: chgrpprog=${CHGRPPROG-chgrp}
62: chmodprog=${CHMODPROG-chmod}
63: chownprog=${CHOWNPROG-chown}
64: cmpprog=${CMPPROG-cmp}
65: cpprog=${CPPROG-cp}
66: mkdirprog=${MKDIRPROG-mkdir}
67: mvprog=${MVPROG-mv}
68: rmprog=${RMPROG-rm}
69: stripprog=${STRIPPROG-strip}
70:
71: posix_glob='?'
72: initialize_posix_glob='
73: test "$posix_glob" != "?" || {
74: if (set -f) 2>/dev/null; then
75: posix_glob=
76: else
77: posix_glob=:
78: fi
79: }
80: '
81:
82: posix_mkdir=
83:
84: # Desired mode of installed file.
85: mode=0755
86:
87: chgrpcmd=
88: chmodcmd=$chmodprog
89: chowncmd=
90: mvcmd=$mvprog
91: rmcmd="$rmprog -f"
92: stripcmd=
93:
94: src=
95: dst=
96: dir_arg=
97: dst_arg=
98:
99: copy_on_change=false
100: no_target_directory=
101:
102: usage="\
103: Usage: $0 [OPTION]... [-T] SRCFILE DSTFILE
104: or: $0 [OPTION]... SRCFILES... DIRECTORY
105: or: $0 [OPTION]... -t DIRECTORY SRCFILES...
106: or: $0 [OPTION]... -d DIRECTORIES...
107:
108: In the 1st form, copy SRCFILE to DSTFILE.
109: In the 2nd and 3rd, copy all SRCFILES to DIRECTORY.
110: In the 4th, create DIRECTORIES.
111:
112: Options:
113: --help display this help and exit.
114: --version display version info and exit.
115:
116: -c (ignored)
117: -C install only if different (preserve the last data modification time)
118: -d create directories instead of installing files.
119: -g GROUP $chgrpprog installed files to GROUP.
120: -m MODE $chmodprog installed files to MODE.
121: -o USER $chownprog installed files to USER.
122: -s $stripprog installed files.
123: -t DIRECTORY install into DIRECTORY.
124: -T report an error if DSTFILE is a directory.
125:
126: Environment variables override the default commands:
127: CHGRPPROG CHMODPROG CHOWNPROG CMPPROG CPPROG MKDIRPROG MVPROG
128: RMPROG STRIPPROG
129: "
130:
131: while test $# -ne 0; do
132: case $1 in
133: -c) ;;
134:
135: -C) copy_on_change=true;;
136:
137: -d) dir_arg=true;;
138:
139: -g) chgrpcmd="$chgrpprog $2"
140: shift;;
141:
142: --help) echo "$usage"; exit $?;;
143:
144: -m) mode=$2
145: case $mode in
146: *' '* | *' '* | *'
147: '* | *'*'* | *'?'* | *'['*)
148: echo "$0: invalid mode: $mode" >&2
149: exit 1;;
150: esac
151: shift;;
152:
153: -o) chowncmd="$chownprog $2"
154: shift;;
155:
156: -s) stripcmd=$stripprog;;
157:
158: -t) dst_arg=$2
1.5 ! bertrand 159: # Protect names problematic for `test' and other utilities.
! 160: case $dst_arg in
! 161: -* | [=\(\)!]) dst_arg=./$dst_arg;;
! 162: esac
1.1 bertrand 163: shift;;
164:
165: -T) no_target_directory=true;;
166:
167: --version) echo "$0 $scriptversion"; exit $?;;
168:
169: --) shift
170: break;;
171:
172: -*) echo "$0: invalid option: $1" >&2
173: exit 1;;
174:
175: *) break;;
176: esac
177: shift
178: done
179:
180: if test $# -ne 0 && test -z "$dir_arg$dst_arg"; then
181: # When -d is used, all remaining arguments are directories to create.
182: # When -t is used, the destination is already specified.
183: # Otherwise, the last argument is the destination. Remove it from $@.
184: for arg
185: do
186: if test -n "$dst_arg"; then
187: # $@ is not empty: it contains at least $arg.
188: set fnord "$@" "$dst_arg"
189: shift # fnord
190: fi
191: shift # arg
192: dst_arg=$arg
1.5 ! bertrand 193: # Protect names problematic for `test' and other utilities.
! 194: case $dst_arg in
! 195: -* | [=\(\)!]) dst_arg=./$dst_arg;;
! 196: esac
1.1 bertrand 197: done
198: fi
199:
200: if test $# -eq 0; then
201: if test -z "$dir_arg"; then
202: echo "$0: no input file specified." >&2
203: exit 1
204: fi
205: # It's OK to call `install-sh -d' without argument.
206: # This can happen when creating conditional directories.
207: exit 0
208: fi
209:
210: if test -z "$dir_arg"; then
1.5 ! bertrand 211: do_exit='(exit $ret); exit $ret'
! 212: trap "ret=129; $do_exit" 1
! 213: trap "ret=130; $do_exit" 2
! 214: trap "ret=141; $do_exit" 13
! 215: trap "ret=143; $do_exit" 15
1.1 bertrand 216:
217: # Set umask so as not to create temps with too-generous modes.
218: # However, 'strip' requires both read and write access to temps.
219: case $mode in
220: # Optimize common cases.
221: *644) cp_umask=133;;
222: *755) cp_umask=22;;
223:
224: *[0-7])
225: if test -z "$stripcmd"; then
226: u_plus_rw=
227: else
228: u_plus_rw='% 200'
229: fi
230: cp_umask=`expr '(' 777 - $mode % 1000 ')' $u_plus_rw`;;
231: *)
232: if test -z "$stripcmd"; then
233: u_plus_rw=
234: else
235: u_plus_rw=,u+rw
236: fi
237: cp_umask=$mode$u_plus_rw;;
238: esac
239: fi
240:
241: for src
242: do
1.5 ! bertrand 243: # Protect names problematic for `test' and other utilities.
1.1 bertrand 244: case $src in
1.5 ! bertrand 245: -* | [=\(\)!]) src=./$src;;
1.1 bertrand 246: esac
247:
248: if test -n "$dir_arg"; then
249: dst=$src
250: dstdir=$dst
251: test -d "$dstdir"
252: dstdir_status=$?
253: else
254:
255: # Waiting for this to be detected by the "$cpprog $src $dsttmp" command
256: # might cause directories to be created, which would be especially bad
257: # if $src (and thus $dsttmp) contains '*'.
258: if test ! -f "$src" && test ! -d "$src"; then
259: echo "$0: $src does not exist." >&2
260: exit 1
261: fi
262:
263: if test -z "$dst_arg"; then
264: echo "$0: no destination specified." >&2
265: exit 1
266: fi
267: dst=$dst_arg
268:
269: # If destination is a directory, append the input filename; won't work
270: # if double slashes aren't ignored.
271: if test -d "$dst"; then
272: if test -n "$no_target_directory"; then
273: echo "$0: $dst_arg: Is a directory" >&2
274: exit 1
275: fi
276: dstdir=$dst
277: dst=$dstdir/`basename "$src"`
278: dstdir_status=0
279: else
280: # Prefer dirname, but fall back on a substitute if dirname fails.
281: dstdir=`
282: (dirname "$dst") 2>/dev/null ||
283: expr X"$dst" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \
284: X"$dst" : 'X\(//\)[^/]' \| \
285: X"$dst" : 'X\(//\)$' \| \
286: X"$dst" : 'X\(/\)' \| . 2>/dev/null ||
287: echo X"$dst" |
288: sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{
289: s//\1/
290: q
291: }
292: /^X\(\/\/\)[^/].*/{
293: s//\1/
294: q
295: }
296: /^X\(\/\/\)$/{
297: s//\1/
298: q
299: }
300: /^X\(\/\).*/{
301: s//\1/
302: q
303: }
304: s/.*/./; q'
305: `
306:
307: test -d "$dstdir"
308: dstdir_status=$?
309: fi
310: fi
311:
312: obsolete_mkdir_used=false
313:
314: if test $dstdir_status != 0; then
315: case $posix_mkdir in
316: '')
317: # Create intermediate dirs using mode 755 as modified by the umask.
318: # This is like FreeBSD 'install' as of 1997-10-28.
319: umask=`umask`
320: case $stripcmd.$umask in
321: # Optimize common cases.
322: *[2367][2367]) mkdir_umask=$umask;;
323: .*0[02][02] | .[02][02] | .[02]) mkdir_umask=22;;
324:
325: *[0-7])
326: mkdir_umask=`expr $umask + 22 \
327: - $umask % 100 % 40 + $umask % 20 \
328: - $umask % 10 % 4 + $umask % 2
329: `;;
330: *) mkdir_umask=$umask,go-w;;
331: esac
332:
333: # With -d, create the new directory with the user-specified mode.
334: # Otherwise, rely on $mkdir_umask.
335: if test -n "$dir_arg"; then
336: mkdir_mode=-m$mode
337: else
338: mkdir_mode=
339: fi
340:
341: posix_mkdir=false
342: case $umask in
343: *[123567][0-7][0-7])
344: # POSIX mkdir -p sets u+wx bits regardless of umask, which
345: # is incompatible with FreeBSD 'install' when (umask & 300) != 0.
346: ;;
347: *)
348: tmpdir=${TMPDIR-/tmp}/ins$RANDOM-$$
349: trap 'ret=$?; rmdir "$tmpdir/d" "$tmpdir" 2>/dev/null; exit $ret' 0
350:
351: if (umask $mkdir_umask &&
352: exec $mkdirprog $mkdir_mode -p -- "$tmpdir/d") >/dev/null 2>&1
353: then
354: if test -z "$dir_arg" || {
355: # Check for POSIX incompatibilities with -m.
356: # HP-UX 11.23 and IRIX 6.5 mkdir -m -p sets group- or
357: # other-writeable bit of parent directory when it shouldn't.
358: # FreeBSD 6.1 mkdir -m -p sets mode of existing directory.
359: ls_ld_tmpdir=`ls -ld "$tmpdir"`
360: case $ls_ld_tmpdir in
361: d????-?r-*) different_mode=700;;
362: d????-?--*) different_mode=755;;
363: *) false;;
364: esac &&
365: $mkdirprog -m$different_mode -p -- "$tmpdir" && {
366: ls_ld_tmpdir_1=`ls -ld "$tmpdir"`
367: test "$ls_ld_tmpdir" = "$ls_ld_tmpdir_1"
368: }
369: }
370: then posix_mkdir=:
371: fi
372: rmdir "$tmpdir/d" "$tmpdir"
373: else
374: # Remove any dirs left behind by ancient mkdir implementations.
375: rmdir ./$mkdir_mode ./-p ./-- 2>/dev/null
376: fi
377: trap '' 0;;
378: esac;;
379: esac
380:
381: if
382: $posix_mkdir && (
383: umask $mkdir_umask &&
384: $doit_exec $mkdirprog $mkdir_mode -p -- "$dstdir"
385: )
386: then :
387: else
388:
389: # The umask is ridiculous, or mkdir does not conform to POSIX,
390: # or it failed possibly due to a race condition. Create the
391: # directory the slow way, step by step, checking for races as we go.
392:
393: case $dstdir in
394: /*) prefix='/';;
1.5 ! bertrand 395: [-=\(\)!]*) prefix='./';;
1.1 bertrand 396: *) prefix='';;
397: esac
398:
399: eval "$initialize_posix_glob"
400:
401: oIFS=$IFS
402: IFS=/
403: $posix_glob set -f
404: set fnord $dstdir
405: shift
406: $posix_glob set +f
407: IFS=$oIFS
408:
409: prefixes=
410:
411: for d
412: do
1.5 ! bertrand 413: test X"$d" = X && continue
1.1 bertrand 414:
415: prefix=$prefix$d
416: if test -d "$prefix"; then
417: prefixes=
418: else
419: if $posix_mkdir; then
420: (umask=$mkdir_umask &&
421: $doit_exec $mkdirprog $mkdir_mode -p -- "$dstdir") && break
422: # Don't fail if two instances are running concurrently.
423: test -d "$prefix" || exit 1
424: else
425: case $prefix in
426: *\'*) qprefix=`echo "$prefix" | sed "s/'/'\\\\\\\\''/g"`;;
427: *) qprefix=$prefix;;
428: esac
429: prefixes="$prefixes '$qprefix'"
430: fi
431: fi
432: prefix=$prefix/
433: done
434:
435: if test -n "$prefixes"; then
436: # Don't fail if two instances are running concurrently.
437: (umask $mkdir_umask &&
438: eval "\$doit_exec \$mkdirprog $prefixes") ||
439: test -d "$dstdir" || exit 1
440: obsolete_mkdir_used=true
441: fi
442: fi
443: fi
444:
445: if test -n "$dir_arg"; then
446: { test -z "$chowncmd" || $doit $chowncmd "$dst"; } &&
447: { test -z "$chgrpcmd" || $doit $chgrpcmd "$dst"; } &&
448: { test "$obsolete_mkdir_used$chowncmd$chgrpcmd" = false ||
449: test -z "$chmodcmd" || $doit $chmodcmd $mode "$dst"; } || exit 1
450: else
451:
452: # Make a couple of temp file names in the proper directory.
453: dsttmp=$dstdir/_inst.$$_
454: rmtmp=$dstdir/_rm.$$_
455:
456: # Trap to clean up those temp files at exit.
457: trap 'ret=$?; rm -f "$dsttmp" "$rmtmp" && exit $ret' 0
458:
459: # Copy the file name to the temp name.
460: (umask $cp_umask && $doit_exec $cpprog "$src" "$dsttmp") &&
461:
462: # and set any options; do chmod last to preserve setuid bits.
463: #
464: # If any of these fail, we abort the whole thing. If we want to
465: # ignore errors from any of these, just make sure not to ignore
466: # errors from the above "$doit $cpprog $src $dsttmp" command.
467: #
468: { test -z "$chowncmd" || $doit $chowncmd "$dsttmp"; } &&
469: { test -z "$chgrpcmd" || $doit $chgrpcmd "$dsttmp"; } &&
470: { test -z "$stripcmd" || $doit $stripcmd "$dsttmp"; } &&
471: { test -z "$chmodcmd" || $doit $chmodcmd $mode "$dsttmp"; } &&
472:
473: # If -C, don't bother to copy if it wouldn't change the file.
474: if $copy_on_change &&
475: old=`LC_ALL=C ls -dlL "$dst" 2>/dev/null` &&
476: new=`LC_ALL=C ls -dlL "$dsttmp" 2>/dev/null` &&
477:
478: eval "$initialize_posix_glob" &&
479: $posix_glob set -f &&
480: set X $old && old=:$2:$4:$5:$6 &&
481: set X $new && new=:$2:$4:$5:$6 &&
482: $posix_glob set +f &&
483:
484: test "$old" = "$new" &&
485: $cmpprog "$dst" "$dsttmp" >/dev/null 2>&1
486: then
487: rm -f "$dsttmp"
488: else
489: # Rename the file to the real destination.
490: $doit $mvcmd -f "$dsttmp" "$dst" 2>/dev/null ||
491:
492: # The rename failed, perhaps because mv can't rename something else
493: # to itself, or perhaps because mv is so ancient that it does not
494: # support -f.
495: {
496: # Now remove or move aside any old file at destination location.
497: # We try this two ways since rm can't unlink itself on some
498: # systems and the destination file might be busy for other
499: # reasons. In this case, the final cleanup might fail but the new
500: # file should still install successfully.
501: {
502: test ! -f "$dst" ||
503: $doit $rmcmd -f "$dst" 2>/dev/null ||
504: { $doit $mvcmd -f "$dst" "$rmtmp" 2>/dev/null &&
505: { $doit $rmcmd -f "$rmtmp" 2>/dev/null; :; }
506: } ||
507: { echo "$0: cannot unlink or rename $dst" >&2
508: (exit 1); exit 1
509: }
510: } &&
511:
512: # Now rename the file to the real destination.
513: $doit $mvcmd "$dsttmp" "$dst"
514: }
515: fi || exit 1
516:
517: trap '' 0
518: fi
519: done
520:
521: # Local variables:
522: # eval: (add-hook 'write-file-hooks 'time-stamp)
523: # time-stamp-start: "scriptversion="
524: # time-stamp-format: "%:y-%02m-%02d.%02H"
525: # time-stamp-time-zone: "UTC"
526: # time-stamp-end: "; # UTC"
527: # End:
CVSweb interface <joel.bertrand@systella.fr>
![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to install-sh CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [local] / rpl