annotate kdiff3/admin/mkinstalldirs @ 2:53b8ecbce0cb

Initial revision
author joachim99
date Sun, 18 Aug 2002 16:23:32 +0000
parents
children 415083d043f3
rev   line source
joachim99@2 1 #! /bin/sh
joachim99@2 2 # mkinstalldirs --- make directory hierarchy
joachim99@2 3 # Author: Noah Friedman <friedman@prep.ai.mit.edu>
joachim99@2 4 # Created: 1993-05-16
joachim99@2 5 # Public domain
joachim99@2 6
joachim99@2 7 # $Id$
joachim99@2 8
joachim99@2 9 errstatus=0
joachim99@2 10
joachim99@2 11 for file
joachim99@2 12 do
joachim99@2 13 set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'`
joachim99@2 14 shift
joachim99@2 15
joachim99@2 16 pathcomp=
joachim99@2 17 for d
joachim99@2 18 do
joachim99@2 19 pathcomp="$pathcomp$d"
joachim99@2 20 case "$pathcomp" in
joachim99@2 21 -* ) pathcomp=./$pathcomp ;;
joachim99@2 22 esac
joachim99@2 23
joachim99@2 24 if test ! -d "$pathcomp"; then
joachim99@2 25 echo "mkdir $pathcomp"
joachim99@2 26
joachim99@2 27 mkdir "$pathcomp" || lasterr=$?
joachim99@2 28
joachim99@2 29 if test ! -d "$pathcomp"; then
joachim99@2 30 errstatus=$lasterr
joachim99@2 31 fi
joachim99@2 32 fi
joachim99@2 33
joachim99@2 34 pathcomp="$pathcomp/"
joachim99@2 35 done
joachim99@2 36 done
joachim99@2 37
joachim99@2 38 exit $errstatus
joachim99@2 39
joachim99@2 40 # mkinstalldirs ends here