DataMuseum.dk

top - download

    Length: 2011 (0x7db)
    Types: TextFile
    Notes: @(#)mm.sh 13.1 (Tolerant) 91/02/02
    Names: »mm«

└─⟦50656ff4a⟧ Bits:30010538 TX 3.1 Coldstart
    └─⟦bbf173f5c⟧ »0004« 
        └─⟦this⟧ »./usr/bin/mm« 

TextFile

#!	/bin/sh
#
#	@(#)mm.sh	13.1 (Tolerant) 91/02/02
#
#	MMSID (@(-)mm.sh	1.22)
if test $# = 0;		then help text3 >&2;	exit 1;	fi
trap 'trap 0; if test "$m" = 0; then mesg y; fi; exit $z' 0
trap 'trap 0; if test "$m" = 0; then mesg y; fi; exit 1' 1 2 3 15
if test -t;	then mesg >/dev/null 2>/dev/null; m=$?;	mesg n; else m=1; fi
TERM=${TERM-450};  t=0;  v=0;  y=0;  g="";  h="-h";  w="";	u="-mm"
while test -n "$1" -a ! -r "$1"
do case $1 in
	-T*)	TERM=`echo $1 | sed "s/-T//"` ;;
	-12)		y=1 ;;
	-e)		e=neqn ;;
	-t)		f=tbl ;;
	-c)		c=c ;;
	-E)		a="$a -e" ;;
	-y)		u=-mm ;;
	-)		break ;;
	*)		a="$a $1" ;;
   esac
   shift
done
if test -z "$1";	then echo "mm: no input file" >&2;		z=1;	exit;	fi
case "$TERM" in
	300|300s|450|37|300-12|300s-12|450-12|4000a|382|X)	;;
	4014|tek)	g="|4014" ;;
	1620)	TERM=450 ;;
	1620-12)	TERM=450-12 ;;
	hp|2621|2640|2645)	v=1;	c=c;	a="-u1 $a";	g="|hp";	TERM=hp ;;
	735|745|43|40/4|40/2)	v=1;	c=c ;;
	2631|2631-c|2631-e)	v=3;	c=c ;;
	*)	TERM=lp;	v=1;	c=c ;;
esac
if test \( "$y" = 1 \) -a \( "$TERM" = 300 -o "$TERM" = 300s -o "$TERM" = 450 \)
	then TERM="$TERM"-12
fi
if test "$c" = c
then
	case "$TERM" in
		300|300s|450|4014|tek)	g="|col -f|greek -T$TERM" ;;
		300-12|300s-12|450-12)	g="|col -f|greek -T$TERM";	w="-rW72" ;;
		37|4000a|382|X)	g="|col -f" ;;
		hp)	g="|col|hp" ;;
		2631-c|2631-e)	g="|col -p" ;;
		735|745)	g="|col -x" ;;
		43)	g="|col -x";	w="-rW75" ;;
		40/4|40/2)	g="|col -b" ;;
		lp|2631)	g="|col" ;;
	esac
	h=""
	if test "$v" = 0;	then v=2;	fi
fi
d="$*"
if test "$d" = "-";	then shift;		d="";	fi
if test -n "$f"
	then	if test "$v" = 1 -o "$v" = 3
			then f="tbl -TX $*|"
			else f="tbl $*|"
		fi
		d=""
fi
if test -n "$e"
	then	if test -n "$f"
			then e="neqn /usr/pub/eqnchar -|"
			else	if test -z "$*"
					then e="neqn /usr/pub/eqnchar -|"
					else e="neqn /usr/pub/eqnchar $*|"
				fi;	d=""
		fi
fi
if test "$TERM" = 4014 -o "$TERM" = hp;		then v=2;	fi
case "$v" in
	1)	TERM=lp ;;
	2)	TERM=37 ;;
esac
eval "$f $e nroff $u $w -T$TERM $h $a $d $g";	z=0;	exit