mirror of
https://framagit.org/bortzmeyer/echoping
synced 2024-11-18 15:26:17 +00:00
41 lines
671 B
Plaintext
41 lines
671 B
Plaintext
|
#! /bin/sh
|
||
|
# mkinstalldirs --- make directory hierarchy
|
||
|
# Author: Noah Friedman <friedman@prep.ai.mit.edu>
|
||
|
# Created: 1993-05-16
|
||
|
# Public domain
|
||
|
|
||
|
# $Id$
|
||
|
|
||
|
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
|