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

⟦84a049029⟧ TextFile

    Length: 648 (0x288)
    Types: TextFile
    Notes: UNIX file
    Names: »readroot«

Derivation

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

TextFile

#! /bin/csh -f

switch (`ask tapeflop "Do you have the system on tape or on floppies?"`)
case quit:
	exit(1)
case tape:
	echo ""
	echo "Build doesn't know about tapes yet\!"
	exit(1)
case flop:
	switch (`ask binetc "Read in bin and etc?"`)
	case quit:
		exit(1)
	case y:
	case yes:
		readin `cat $subs/binetc`
		if ($status) exit(1)
	endsw
	switch (`ask fsckone "Check file system before proceeding?"`)
	case quit:
		exit(1)
	case y:
	case yes:
		fsckone
		if ($status) exit(1)
	endsw
	switch (`ask therest "Read in the rest of the root?"`)
	case quit:
		exit(1)
	case y:
	case yes:
		readin `cat $subs/therest`
		if ($status) exit(1)
	endsw
endsw