aboutsummaryrefslogtreecommitdiffstats
path: root/testing/nethack/nethack.bin
blob: 272e23f0851a184dc74a0e7dc71f941ca23675f7 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
#!/bin/sh

set -e
set -u

die () { echo "nethack:" "$@" >&2 ; exit 1 ; }

[ "x${HOME:-}" = x ] && die "\$HOME not set"
cd "$HOME"
[ -d .nethack ] || mkdir -p .nethack
cd .nethack
[ -f nhdat ] || ln -s /usr/share/nethack/nhdat nhdat
[ -d save ] || mkdir -p save
[ -f logfile ] || : > logfile
[ -f perm ] || : > perm
[ -f record ] || : > record

HACKDIR="$HOME/.nethack"
export HACKDIR
HACK=/usr/lib/nethack/nethack
MAXNROFPLAYERS=4

# Since Nethack.ad is installed in HACKDIR, add it to XUSERFILESEARCHPATH
case "x${XUSERFILESEARCHPATH:-}" in
x)	XUSERFILESEARCHPATH="$HACKDIR/%N.ad"
	;;
*)	XUSERFILESEARCHPATH="$XUSERFILESEARCHPATH:$HACKDIR/%N.ad"
	;;
esac
export XUSERFILESEARCHPATH

# see if we can find the full path name of PAGER, so help files work properly
# assume that if someone sets up a special variable (HACKPAGER) for NetHack,
# it will already be in a form acceptable to NetHack
# ideas from brian@radio.astro.utoronto.ca
if test \( "xxx${PAGER:-}" != xxx \) -a \( "xxx${HACKPAGER:-}" = xxx \)
then
	HACKPAGER="$PAGER"
#	use only the first word of the pager variable
#	this prevents problems when looking for file names with trailing
#	options, but also makes the options unavailable for later use from
#	NetHack
	for i in $HACKPAGER
	do
		HACKPAGER="$i"
		break
	done

	if test ! -f "$HACKPAGER"
	then
		IFS=:
		for i in $PATH
		do
			if test -f "$i/$HACKPAGER"
			then
				HACKPAGER="$i/$HACKPAGER"
				export HACKPAGER
				break
			fi
		done
		IFS=' 	'
	fi
	if test ! -f "$HACKPAGER"
	then
		echo "Cannot find $PAGER -- unsetting PAGER." >&2
		unset HACKPAGER
		unset PAGER
	fi
fi

case "x${1:-}" in
	x-s*) exec "$HACK" "$@" ;;
	x*)   exec "$HACK" "$@" "$MAXNROFPLAYERS" ;;
esac