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

⟦faa31a9ee⟧ TextFile

    Length: 515 (0x203)
    Types: TextFile
    Notes: UNIX file
    Names: »writeb«

Derivation

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

TextFile

#! /bin/csh -f

while (1)
	set boot = `ask whichb "Which boot do you want?"`
	switch ($boot)
	case quit:
		exit(1)
	case ls:
		echo ""
		ls /sys/stand
		continue
	endsw
	if (! -f /sys/stand/$boot) then
		echo "Sorry, /sys/stand/$boot does not exist"
		continue
	endif
	file /sys/stand/$boot | grep executable >& /dev/null
	if ($status) then
		echo "Sorry, /sys/stand/$boot is not a program"
		continue
	endif
	echo ""
	echo "Executing: wrboot /sys/stand/$boot"
	wrboot /sys/stand/$boot
	if ($status == 0) break
end