masqmail

annotate mkinstalldirs @ 214:ecd8d737d78e

removed the old manual because it is really outdated now In masqmail's 0.3 branch, so much changed that the old manual causes more harm than it improves the distribution. Most content is covered by the man pages anyway. You'll still find the old manual on masqmail's homepage.
author meillo@marmaro.de
date Mon, 19 Jul 2010 14:06:08 +0200
parents
children
rev   line source
meillo@0 1 #! /bin/sh
meillo@0 2 # mkinstalldirs --- make directory hierarchy
meillo@0 3 # Author: Noah Friedman <friedman@prep.ai.mit.edu>
meillo@0 4 # Created: 1993-05-16
meillo@0 5 # Public domain
meillo@0 6
meillo@0 7 # $Id: mkinstalldirs,v 1.1.1.1 2001/03/19 15:45:28 okurth Exp $
meillo@0 8
meillo@0 9 errstatus=0
meillo@0 10
meillo@0 11 for file
meillo@0 12 do
meillo@0 13 set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'`
meillo@0 14 shift
meillo@0 15
meillo@0 16 pathcomp=
meillo@0 17 for d
meillo@0 18 do
meillo@0 19 pathcomp="$pathcomp$d"
meillo@0 20 case "$pathcomp" in
meillo@0 21 -* ) pathcomp=./$pathcomp ;;
meillo@0 22 esac
meillo@0 23
meillo@0 24 if test ! -d "$pathcomp"; then
meillo@0 25 echo "mkdir $pathcomp"
meillo@0 26
meillo@0 27 mkdir "$pathcomp" || lasterr=$?
meillo@0 28
meillo@0 29 if test ! -d "$pathcomp"; then
meillo@0 30 errstatus=$lasterr
meillo@0 31 fi
meillo@0 32 fi
meillo@0 33
meillo@0 34 pathcomp="$pathcomp/"
meillo@0 35 done
meillo@0 36 done
meillo@0 37
meillo@0 38 exit $errstatus
meillo@0 39
meillo@0 40 # mkinstalldirs ends here