R3600/mkinstalldirs
ec68d11d4928maint-2.1

mkinstalldirs
View Options

			#! /bin/sh
			# mkinstalldirs --- make directory hierarchy
			# Author: Noah Friedman <friedman@prep.ai.mit.edu>
			# Created: 1993-05-16
			# Public domain
			# Modified by Tibor Simko to add explicitly "umask 022".

			# $Id$

			errstatus=0
			umask 022

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

			pathcomp=
			for d
			do
			pathcomp="$pathcomp$d"
			case "$pathcomp" in
			-* ) pathcomp=./$pathcomp ;;
			esac

			if test ! -d "$pathcomp"; then
			echo "mkdir $pathcomp"

			mkdir "$pathcomp" \|\| lasterr=$?

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

			pathcomp="$pathcomp/"
			done
			done

			exit $errstatus

			# mkinstalldirs ends here