167064Sobrien#! /bin/sh 267064Sobrien# mkinstalldirs --- make directory hierarchy 367064Sobrien# Author: Noah Friedman <friedman@prep.ai.mit.edu> 467064Sobrien# Created: 1993-05-16 567064Sobrien# Public domain 667064Sobrien 767064Sobrien# $Id: mkinstalldirs,v 1.13 1999/01/05 03:18:55 bje Exp $ 867064Sobrien 967064Sobrienerrstatus=0 1067064Sobrien 1167064Sobrienfor file 1267064Sobriendo 1367064Sobrien set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'` 1467064Sobrien shift 1567064Sobrien 1667064Sobrien pathcomp= 1767064Sobrien for d 1867064Sobrien do 1967064Sobrien pathcomp="$pathcomp$d" 2067064Sobrien case "$pathcomp" in 2167064Sobrien -* ) pathcomp=./$pathcomp ;; 2267064Sobrien esac 2367064Sobrien 2467064Sobrien if test ! -d "$pathcomp"; then 2567064Sobrien echo "mkdir $pathcomp" 2667064Sobrien 2767064Sobrien mkdir "$pathcomp" || lasterr=$? 2867064Sobrien 2967064Sobrien if test ! -d "$pathcomp"; then 3067064Sobrien errstatus=$lasterr 3167064Sobrien fi 3267064Sobrien fi 3367064Sobrien 3467064Sobrien pathcomp="$pathcomp/" 3567064Sobrien done 3667064Sobriendone 3767064Sobrien 3867064Sobrienexit $errstatus 3967064Sobrien 4067064Sobrien# mkinstalldirs ends here 41