#!/usr/bin/ksh
#
# CDDL HEADER START
#
# The contents of this file are subject to the terms of the
# Common Development and Distribution License (the "License").
# You may not use this file except in compliance with the License.
#
# You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
# or http://www.opensolaris.org/os/licensing.
# See the License for the specific language governing permissions
# and limitations under the License.
#
# When distributing Covered Code, include this CDDL HEADER in each
# file and include the License file at usr/src/OPENSOLARIS.LICENSE.
# If applicable, add the following below this CDDL HEADER, with the
# fields enclosed by brackets "[]" replaced with your own identifying
# information: Portions Copyright [yyyy] [name of copyright owner]
#
# CDDL HEADER END
#
# Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T
# All Rights Reserved
# Copyright 2009 Sun Microsystems, Inc. All rights reserved.
# Use is subject to license terms.
# spell program
# B_SPELL flags, D_SPELL dictionary, F_SPELL input files, H_SPELL history,
# S_SPELL stop, V_SPELL data for -v
# L_SPELL sed script, I_SPELL -i option to deroff
PATH=/usr/lib/spell:/usr/bin:$PATH
SPELLPROG=/usr/lib/spell/spellprog
H_SPELL=${H_SPELL:-/var/adm/spellhist}
V_SPELL=/dev/null
F_SPELL=
FT_SPELL=
B_SPELL=
L_SPELL="/usr/bin/sed -e \"/^[.'].*[.'][ ]*nx[ ]*\/usr\/lib/d\" -e \"/^[.'].*[.'][ ]*so[ ]*\/usr\/lib/d\" -e \"/^[.'][ ]*so[ ]*\/usr\/lib/d\" -e \"/^[.'][ ]*nx[ ]*\/usr\/lib/d\" "
LOCAL=
# mktmpdir - Create a private (mode 0700) temporary directory inside of /tmp
# for this process's temporary files. We set up a trap to remove the
# directory on exit (trap 0), and also on SIGHUP, SIGINT, SIGQUIT, and
# SIGTERM.
#
mktmpdir() {
tmpdir=/tmp/spell.$$
trap "/usr/bin/rm -rf $tmpdir; exit" 0 1 2 13 15
/usr/bin/mkdir -m 700 $tmpdir || exit 1
}
mktmpdir
# figure out whether or not we can use deroff
if [ -x /usr/bin/deroff ]
then
DEROFF="deroff \$I_SPELL"
else
DEROFF="cat"
fi
# Filter out + arguments that are incorrectly handled by getopts
set -A args xxx "$@"
while [ x${args[$OPTIND]#+} = x${args[$OPTIND]} ] && getopts ablvxi A
do
case $A in
v) if [ -r /bin/pdp11 ] && /bin/pdp11
then gettext "spell: -v option not supported on pdp11\n" 1>&2
EXIT_SPELL="exit 1"
else B_SPELL="$B_SPELL -v"
V_SPELL=$tmpdir/spell.$$
fi ;;
b) D_SPELL=${LB_SPELL:-/usr/lib/spell/hlistb}
B_SPELL="$B_SPELL -b" ;;
x) B_SPELL="$B_SPELL -x" ;;
l) L_SPELL="cat" ;;
i) I_SPELL="-i" ;;
?) gettext "Usage: spell [-bvxli] [+local_file] [files...]\n" 1>&2
exit 1;;
esac
done
shift $(($OPTIND - 1))
for A in $*
do
case $A in
+*) if [ "$FIRSTPLUS" = "+" ]
then gettext "spell: multiple + options in spell, all but the last are ignored" 1>&2
fi;
FIRSTPLUS="$FIRSTPLUS"+
if LOCAL=`expr $A : '+\(.*\)' 2>/dev/null`;
then if test ! -r $LOCAL;
then printf "`gettext 'spell: Cannot read %s'`\n" "$LOCAL" 1>&2; EXIT_SPELL="exit 1";
fi
else gettext "spell: Cannot identify local spell file\n" 1>&2; EXIT_SPELL="exit 1";
fi ;;
*) FT_SPELL="$FT_SPELL $A"
if [ -r $A ]; then
F_SPELL="$F_SPELL $A"
else
printf "`gettext 'spell: Cannot read file %s'`\n" "$A" 1>&2
fi
esac
done
${EXIT_SPELL:-:}
if [ "x$FT_SPELL" != "x$F_SPELL" ] && [ "x$F_SPELL" = "x" ]; then
exit 1
fi
(cat $F_SPELL; printf "\n";) | eval $L_SPELL |\
eval $DEROFF |\
LC_ALL=C /usr/bin/tr -cs "[A-Z][a-z][0-9]\'\&\.\,\;\?\:" "[\012*]" |\
/usr/bin/sed '1,$s/^[^A-Za-z0-9]*//' | /usr/bin/sed '1,$s/[^A-Za-z0-9]*$//' |\
/usr/bin/sed -n "/[A-Za-z]/p" | /usr/bin/sort -u +0 |\
$SPELLPROG ${S_SPELL:-/usr/lib/spell/hstop} 1 |\
$SPELLPROG $B_SPELL ${D_SPELL:-/usr/lib/spell/hlista} $V_SPELL |\
comm -23 - ${LOCAL:-/dev/null} |\
tee -a $H_SPELL
/usr/bin/who am i >>$H_SPELL 2>/dev/null
case $V_SPELL in
/dev/null)
exit
esac
/usr/bin/sed '/^\./d' $V_SPELL | /usr/bin/sort -u +1f +0