Annotation of rpl/mkinstalldirs, revision 1.1

1.1     ! bertrand    1: #! /bin/sh
        !             2: # mkinstalldirs --- make directory hierarchy
        !             3: 
        !             4: scriptversion=2009-04-28.21; # UTC
        !             5: 
        !             6: # Original author: Noah Friedman <friedman@prep.ai.mit.edu>
        !             7: # Created: 1993-05-16
        !             8: # Public domain.
        !             9: #
        !            10: # This file is maintained in Automake, please report
        !            11: # bugs to <bug-automake@gnu.org> or send patches to
        !            12: # <automake-patches@gnu.org>.
        !            13: 
        !            14: nl='
        !            15: '
        !            16: IFS=" ""   $nl"
        !            17: errstatus=0
        !            18: dirmode=
        !            19: 
        !            20: usage="\
        !            21: Usage: mkinstalldirs [-h] [--help] [--version] [-m MODE] DIR ...
        !            22: 
        !            23: Create each directory DIR (with mode MODE, if specified), including all
        !            24: leading file name components.
        !            25: 
        !            26: Report bugs to <bug-automake@gnu.org>."
        !            27: 
        !            28: # process command line arguments
        !            29: while test $# -gt 0 ; do
        !            30:   case $1 in
        !            31:     -h | --help | --h*)         # -h for help
        !            32:       echo "$usage"
        !            33:       exit $?
        !            34:       ;;
        !            35:     -m)                         # -m PERM arg
        !            36:       shift
        !            37:       test $# -eq 0 && { echo "$usage" 1>&2; exit 1; }
        !            38:       dirmode=$1
        !            39:       shift
        !            40:       ;;
        !            41:     --version)
        !            42:       echo "$0 $scriptversion"
        !            43:       exit $?
        !            44:       ;;
        !            45:     --)                         # stop option processing
        !            46:       shift
        !            47:       break
        !            48:       ;;
        !            49:     -*)                         # unknown option
        !            50:       echo "$usage" 1>&2
        !            51:       exit 1
        !            52:       ;;
        !            53:     *)                          # first non-opt arg
        !            54:       break
        !            55:       ;;
        !            56:   esac
        !            57: done
        !            58: 
        !            59: for file
        !            60: do
        !            61:   if test -d "$file"; then
        !            62:     shift
        !            63:   else
        !            64:     break
        !            65:   fi
        !            66: done
        !            67: 
        !            68: case $# in
        !            69:   0) exit 0 ;;
        !            70: esac
        !            71: 
        !            72: # Solaris 8's mkdir -p isn't thread-safe.  If you mkdir -p a/b and
        !            73: # mkdir -p a/c at the same time, both will detect that a is missing,
        !            74: # one will create a, then the other will try to create a and die with
        !            75: # a "File exists" error.  This is a problem when calling mkinstalldirs
        !            76: # from a parallel make.  We use --version in the probe to restrict
        !            77: # ourselves to GNU mkdir, which is thread-safe.
        !            78: case $dirmode in
        !            79:   '')
        !            80:     if mkdir -p --version . >/dev/null 2>&1 && test ! -d ./--version; then
        !            81:       echo "mkdir -p -- $*"
        !            82:       exec mkdir -p -- "$@"
        !            83:     else
        !            84:       # On NextStep and OpenStep, the `mkdir' command does not
        !            85:       # recognize any option.  It will interpret all options as
        !            86:       # directories to create, and then abort because `.' already
        !            87:       # exists.
        !            88:       test -d ./-p && rmdir ./-p
        !            89:       test -d ./--version && rmdir ./--version
        !            90:     fi
        !            91:     ;;
        !            92:   *)
        !            93:     if mkdir -m "$dirmode" -p --version . >/dev/null 2>&1 &&
        !            94:        test ! -d ./--version; then
        !            95:       echo "mkdir -m $dirmode -p -- $*"
        !            96:       exec mkdir -m "$dirmode" -p -- "$@"
        !            97:     else
        !            98:       # Clean up after NextStep and OpenStep mkdir.
        !            99:       for d in ./-m ./-p ./--version "./$dirmode";
        !           100:       do
        !           101:         test -d $d && rmdir $d
        !           102:       done
        !           103:     fi
        !           104:     ;;
        !           105: esac
        !           106: 
        !           107: for file
        !           108: do
        !           109:   case $file in
        !           110:     /*) pathcomp=/ ;;
        !           111:     *)  pathcomp= ;;
        !           112:   esac
        !           113:   oIFS=$IFS
        !           114:   IFS=/
        !           115:   set fnord $file
        !           116:   shift
        !           117:   IFS=$oIFS
        !           118: 
        !           119:   for d
        !           120:   do
        !           121:     test "x$d" = x && continue
        !           122: 
        !           123:     pathcomp=$pathcomp$d
        !           124:     case $pathcomp in
        !           125:       -*) pathcomp=./$pathcomp ;;
        !           126:     esac
        !           127: 
        !           128:     if test ! -d "$pathcomp"; then
        !           129:       echo "mkdir $pathcomp"
        !           130: 
        !           131:       mkdir "$pathcomp" || lasterr=$?
        !           132: 
        !           133:       if test ! -d "$pathcomp"; then
        !           134:    errstatus=$lasterr
        !           135:       else
        !           136:    if test ! -z "$dirmode"; then
        !           137:      echo "chmod $dirmode $pathcomp"
        !           138:      lasterr=
        !           139:      chmod "$dirmode" "$pathcomp" || lasterr=$?
        !           140: 
        !           141:      if test ! -z "$lasterr"; then
        !           142:        errstatus=$lasterr
        !           143:      fi
        !           144:    fi
        !           145:       fi
        !           146:     fi
        !           147: 
        !           148:     pathcomp=$pathcomp/
        !           149:   done
        !           150: done
        !           151: 
        !           152: exit $errstatus
        !           153: 
        !           154: # Local Variables:
        !           155: # mode: shell-script
        !           156: # sh-indentation: 2
        !           157: # eval: (add-hook 'write-file-hooks 'time-stamp)
        !           158: # time-stamp-start: "scriptversion="
        !           159: # time-stamp-format: "%:y-%02m-%02d.%02H"
        !           160: # time-stamp-time-zone: "UTC"
        !           161: # time-stamp-end: "; # UTC"
        !           162: # End:

CVSweb interface <joel.bertrand@systella.fr>