Ports of GNU products to 3B2's

Eric J. Nihill eric at sactoh0.SAC.CA.US
Mon Oct 22 23:53:05 AEST 1990


In article <2405.271A3B15 at onebdos.UUCP> Robb.Thomas at f1.n684.z89.onebdos.UUCP (Robb Thomas) writes:
>
> > > Please post any other software that has been ported, as I am interested in
> > > what is out there.
>
>OK, heres a list of what I have fully running here on my 3B2/400 (unless 
>otherwise stated)...
>
>cosmos - Multi User Full Screen Space Game  EXCELLENT AWSOME PRG!!!

Where did you get this? Sounds good.
>
C-News spacefor. AT&T 3B2/310-400 


#! /bin/sh
# spacefor - determine available disk space
# About how many things of $1 bytes will fit in the available space for
# stuff of type $2 ("incoming", "articles", "control", "outbound $3",
# or "archive") without cramping things too badly?
#
# You'll have to change this -- your blocksize, minimum-free-desired amounts,
# and df output format will probably differ, and you may need to name
# your filesystems explicitly.

# =()<. ${NEWSCONFIG-@<NEWSCONFIG>@}>()=
. ${NEWSCONFIG-/usr/lib/news/bin/config}

PATH=$NEWSCTL/bin:$NEWSBIN:$NEWSPATH ; export PATH
umask $NEWSUMASK

# punt to server if necessary
if test -r $NEWSCTL/server
then
	server="`cat $NEWSCTL/server`"
	me="`hostname`"
	if test " $server" != " $me"
	then
		exec rsh $server "PATH=$PATH `basename $0` $*"
		# does not return
	fi
fi

# head off special case
case "$1" in
0)	echo 10000 ; exit 0 ;;
esac

# argument to df, df units, and free space desired (in df units)
dfunit=512			# default unit (bytes)
case "$2" in
incoming)	arg="/usr/spool/news" ; desire=5000 ;;
articles)	arg="/usr/spool/news" ; desire=5000 ;;
control)	arg="/usr" ; desire=2000 ;;
outbound)	arg="/usr/spool/news" ; desire=10000 ;;	# ignore $3
archive)	arg="/usr/spool/news" ; desire=1 ;;	# system-specific
*)		echo "$0: bad type argument \`$2'!!" >&2
		exit 2 ;;
esac

# this is set up for the stupid System V df
df $arg | sed "s/.*:/: :/" | awk "BEGIN { nf = 3 ; nr = 1 }
	NR == nr && NF >= nf {
		nb = (\$nf - $desire) * $dfunit / $1
		if (nb > 10000)
			nb = 10000	# ensure representable as integer
		nb = int(nb)
		if (nb <= 0)
			print 0
		else
			print nb
		exit
	}
	NR == nr && NF < nf {		# idiotic Berkeley continuation
		nr += 1
		nf -= 1
	}"
>Cheers.....
>                                  ------- Sir HackAlot -------
>                                  ---- oneb!hakatac!rthomas ---
>
>P.S. - You can count me in on the 3B2 users group..

Ditto!


-- 
     Some do, some don't.           |       eric at sactoh0.SAC.CA.US
    Some will, some won't.          |      ames!pacbell!sactoh0!eric
          I might!                  |      ucbvax!csusac!sactoh0!eric
                                    |         U.S. Mail 95611-0785



More information about the Comp.sys.att mailing list