| #! /bin/sh | 
 | # mkinstalldirs --- make directory hierarchy | 
 | # Author: Noah Friedman <friedman@prep.ai.mit.edu> | 
 | # Created: 1993-05-16 | 
 | # Public domain | 
 |  | 
 | # $Id: mkinstalldirs,v 1.2 2003/11/21 12:48:55 djm Exp $ | 
 |  | 
 | errstatus=0 | 
 |  | 
 | 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 |