1 1.1 christos #! /bin/sh 2 1.1 christos # mkinstalldirs --- make directory hierarchy 3 1.1 christos # Author: Noah Friedman <friedman (at] prep.ai.mit.edu> 4 1.1 christos # Created: 1993-05-16 5 1.1 christos # Public domain 6 1.1 christos 7 1.1 christos errstatus=0 8 1.1 christos dirmode="" 9 1.1 christos 10 1.1 christos usage="\ 11 1.1 christos Usage: mkinstalldirs [-h] [--help] [-m mode] dir ..." 12 1.1 christos 13 1.1 christos # process command line arguments 14 1.1 christos while test $# -gt 0 ; do 15 1.1 christos case $1 in 16 1.1 christos -h | --help | --h*) # -h for help 17 1.1 christos echo "$usage" 1>&2 18 1.1 christos exit 0 19 1.1 christos ;; 20 1.1 christos -m) # -m PERM arg 21 1.1 christos shift 22 1.1 christos test $# -eq 0 && { echo "$usage" 1>&2; exit 1; } 23 1.1 christos dirmode=$1 24 1.1 christos shift 25 1.1 christos ;; 26 1.1 christos --) # stop option processing 27 1.1 christos shift 28 1.1 christos break 29 1.1 christos ;; 30 1.1 christos -*) # unknown option 31 1.1 christos echo "$usage" 1>&2 32 1.1 christos exit 1 33 1.1 christos ;; 34 1.1 christos *) # first non-opt arg 35 1.1 christos break 36 1.1 christos ;; 37 1.1 christos esac 38 1.1 christos done 39 1.1 christos 40 1.1 christos for file 41 1.1 christos do 42 1.1 christos if test -d "$file"; then 43 1.1 christos shift 44 1.1 christos else 45 1.1 christos break 46 1.1 christos fi 47 1.1 christos done 48 1.1 christos 49 1.1 christos case $# in 50 1.1 christos 0) exit 0 ;; 51 1.1 christos esac 52 1.1 christos 53 1.1 christos case $dirmode in 54 1.1 christos '') 55 1.1 christos if mkdir -p -- . 2>/dev/null; then 56 1.1 christos echo "mkdir -p -- $*" 57 1.1 christos exec mkdir -p -- "$@" 58 1.1 christos fi 59 1.1 christos ;; 60 1.1 christos *) 61 1.1 christos if mkdir -m "$dirmode" -p -- . 2>/dev/null; then 62 1.1 christos echo "mkdir -m $dirmode -p -- $*" 63 1.1 christos exec mkdir -m "$dirmode" -p -- "$@" 64 1.1 christos fi 65 1.1 christos ;; 66 1.1 christos esac 67 1.1 christos 68 1.1 christos for file 69 1.1 christos do 70 1.1 christos set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'` 71 1.1 christos shift 72 1.1 christos 73 1.1 christos pathcomp= 74 1.1 christos for d 75 1.1 christos do 76 1.1 christos pathcomp="$pathcomp$d" 77 1.1 christos case $pathcomp in 78 1.1 christos -*) pathcomp=./$pathcomp ;; 79 1.1 christos esac 80 1.1 christos 81 1.1 christos if test ! -d "$pathcomp"; then 82 1.1 christos echo "mkdir $pathcomp" 83 1.1 christos 84 1.1 christos mkdir "$pathcomp" || lasterr=$? 85 1.1 christos 86 1.1 christos if test ! -d "$pathcomp"; then 87 1.1 christos errstatus=$lasterr 88 1.1 christos else 89 1.1 christos if test ! -z "$dirmode"; then 90 1.1 christos echo "chmod $dirmode $pathcomp" 91 1.1 christos lasterr="" 92 1.1 christos chmod "$dirmode" "$pathcomp" || lasterr=$? 93 1.1 christos 94 1.1 christos if test ! -z "$lasterr"; then 95 1.1 christos errstatus=$lasterr 96 1.1 christos fi 97 1.1 christos fi 98 1.1 christos fi 99 1.1 christos fi 100 1.1 christos 101 1.1 christos pathcomp="$pathcomp/" 102 1.1 christos done 103 1.1 christos done 104 1.1 christos 105 1.1 christos exit $errstatus 106 1.1 christos 107 1.1 christos # Local Variables: 108 1.1 christos # mode: shell-script 109 1.1 christos # sh-indentation: 2 110 1.1 christos # End: 111 1.1 christos # mkinstalldirs ends here 112