DataMuseum.dk

Presents historical artifacts from the history of:

ICL Comet 32

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about ICL Comet 32

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦71983c46f⟧ TextFile

    Length: 666 (0x29a)
    Types: TextFile
    Notes: UNIX file
    Names: »farv«

Derivation

└─⟦26887b7e0⟧ Bits:30009717 Comet 32 harddisk image
    └─⟦28c352965⟧ »/a« UNIX Filesystem
        └─⟦this⟧ »bin/farv« 

TextFile

#! /bin/sh

#  Verify directories dumped by 'far' on floppies.  Does it by
#  extracting everything in /tmp and then comparing recursively.
#  First part, 'farv -', is just 'cmp -R' (if there was such a
#  thing).

case $1 in
-)
	if test -d $2
	then
		for fil in `ls $2`
		do
			farv - $2/$fil $3/$fil
		done
	else
		echo "---  $2 $3"
		if cmp $2 $3
		then
			:
		else
			echo -n '▶07◀'
		fi
	fi
	exit
	;;
+)
	echo "Creating..."
	cd /
	far -vcs 1200 -i $2 $2
	farv $2
	exit
	;;
esac

for flp
do
	echo "Extracting $flp into /tmp..."
	cd /tmp
	far -vxi $flp

	echo "Comparing files..."
	cd /
	farv - /$flp /tmp/$flp

	echo "Cleaning up in /tmp..."
	rm -r /tmp/$flp
done