[gcc.git] / mkinstalldirs

#! /bin/sh
# mkinstalldirs --- make directory hierarchy
# Author: Noah Friedman <friedman@prep.ai.mit.edu>
# Created: 1993-05-16
# Last modified: 1994-03-25
# Public domain

errstatus=0

for file in ${1+"$@"} ; do 
   set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'`
   shift

   pathcomp=
   for d in ${1+"$@"} ; do
     pathcomp="$pathcomp$d"
     case "$pathcomp" in
       -* ) pathcomp=./$pathcomp ;;
     esac

     if test ! -d "$pathcomp"; then
        echo "mkdir $pathcomp" 1>&2
        mkdir "$pathcomp" > /dev/null 2>&1 || lasterr=$?
     fi

     if test ! -d "$pathcomp"; then
	errstatus=$lasterr
     fi

     pathcomp="$pathcomp/"
   done
done

exit $errstatus

# mkinstalldirs ends here
Commit	Line	Data
6599da04 JM	1	#! /bin/sh
	2	# mkinstalldirs --- make directory hierarchy
	3	# Author: Noah Friedman <friedman@prep.ai.mit.edu>
	4	# Created: 1993-05-16
	5	# Last modified: 1994-03-25
	6	# Public domain
	7
	8	errstatus=0
	9
	10	for file in ${1+"$@"} ; do
	11	set fnord `echo ":$file" \| sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'`
	12	shift
	13
	14	pathcomp=
	15	for d in ${1+"$@"} ; do
	16	pathcomp="$pathcomp$d"
	17	case "$pathcomp" in
	18	-* ) pathcomp=./$pathcomp ;;
	19	esac
	20
	21	if test ! -d "$pathcomp"; then
	22	echo "mkdir $pathcomp" 1>&2
	23	mkdir "$pathcomp" > /dev/null 2>&1 \|\| lasterr=$?
	24	fi
	25
	26	if test ! -d "$pathcomp"; then
	27	errstatus=$lasterr
	28	fi
	29
	30	pathcomp="$pathcomp/"
	31	done
	32	done
	33
	34	exit $errstatus
	35
	36	# mkinstalldirs ends here