|
DataMuseum.dkPresents historical artifacts from the history of: ICL Comet 32 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about ICL Comet 32 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 535 (0x217)
Types: TextFile
Notes: UNIX file
Names: »fixit«
└─⟦26887b7e0⟧ Bits:30009717 Comet 32 harddisk image
└─⟦28c352965⟧ »/a« UNIX Filesystem
└─⟦this⟧ »sys/build/fixit«
#! /bin/csh -f
set nonomatch
set type = $argv[1]
shift
set rflag = ""
set pwd = $cwd
if ("$pwd" == '/') set pwd = ""
switch ($type)
case -r:
set rflag = "-r"
case -d:
if (! -d "$argv[4]") then
echo "Creating directory $pwd/$argv[4]" | tee -a $build/fixmsgs
mkdir $argv[4]
endif
if ($fixverb != none) echo Fixing $rflag $pwd/$argv[4]
case -f:
if ($fixverb == all) echo Setting $rflag $argv[*]
smog $rflag $argv[*] >& /tmp/fixerrs
if ($status) then
sed -e "s#^smog#$pwd#" /tmp/fixerrs | tee -a $build/fixmsgs
endif
endsw