summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/etexdir/etriptest.test
blob: 04e196d9624b3beac4a54f6ed6c3bcacf90c07fb (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
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
#! /bin/sh -vx
# $Id$
# Copyright 2017 Karl Berry <tex-live@tug.org>
# Copyright 2009-2014 Peter Breitenlohner <tex-live@tug.org>
# You may freely use, modify and/or distribute this file.

testdir=$abs_srcdir/triptrap
etestdir=$abs_srcdir/etexdir/etrip

TEXMFCNF=$etestdir; export TEXMFCNF

rm -rf etripdir
mkdir etripdir
cd etripdir

dvitype_args="-output-level=2 -dpi=72.27 -page-start='*.*.*.*.*.*.*.*.*.*'"

echo ">>> Running e-TRIP test for e-TeX." >&2
echo ">>> See $etestdir/etrip.diffs for example of acceptable diffs." >&2

is_OK=:

set -x

echo "*** TRIP test for e-TeX in compatibility mode ***."

../pltotf $testdir/trip.pl trip.tfm || exit 1

../tftopl ./trip.tfm trip.pl || exit 1

diff $testdir/trip.pl trip.pl || is_OK=false

# get same filename in log
$LN_S $testdir/trip.tex .

../etex --progname=einitex --ini <$testdir/trip1.in >ctripin.fot
if test ! -s trip.fmt; then
  echo "*** trip.fmt not created by trip1.in, investigate!" >&2
  exit 1
fi
mv trip.log ctripin.log || exit 1
diff $testdir/tripin.log ctripin.log

# May as well test non-ini second time through.
../etex --progname=etex <$testdir/trip2.in >ctrip.fot
mv trip.log ctrip.log
diff $testdir/trip.fot ctrip.fot

# We use $DIFF instead of `diff' only for those files where there
# might actually be legitimate numerical differences.
$DIFF $DIFFFLAGS $testdir/trip.log ctrip.log

mv tripos.tex ctripos.tex
diff $testdir/tripos.tex ctripos.tex

eval ../dvitype $dvitype_args trip.dvi >ctrip.typ || exit 1
$DIFF $DIFFFLAGS $testdir/trip.typ ctrip.typ

mv trip.fmt ctrip.fmt

# ==============================

echo "*** TRIP test for e-TeX in extended mode ***."

../etex --progname=einitex --ini <$etestdir/etrip1.in >xtripin.fot
if test ! -s trip.fmt; then
  echo "*** trip.fmt not created by etrip1.in, investigate!" >&2
  exit 1
fi
mv trip.log xtripin.log || exit 1
diff ctripin.log xtripin.log

# May as well test non-ini second time through.
../etex --progname=etex <$etestdir/trip2.in >xtrip.fot
mv trip.log xtrip.log
diff ctrip.fot xtrip.fot

# We use $DIFF instead of `diff' only for those files where there
# might actually be legitimate numerical differences.
$DIFF $DIFFFLAGS ctrip.log xtrip.log

mv tripos.tex xtripos.tex
diff $testdir/tripos.tex xtripos.tex

eval ../dvitype $dvitype_args trip.dvi >xtrip.typ || exit 1
$DIFF $DIFFFLAGS ctrip.typ xtrip.typ

mv trip.fmt xtrip.fmt

# ==============================

echo "*** e-TeX specific part of e-TRIP test ***."

../pltotf $etestdir/etrip.pl etrip.tfm || exit 1

../tftopl ./etrip.tfm etrip.pl || exit 1

diff $etestdir/etrip.pl etrip.pl || is_OK=false

# get same filename in log
$LN_S $etestdir/etrip.tex .

../etex --progname=einitex --ini <$etestdir/etrip2.in >etripin.fot
if test ! -s etrip.fmt; then
  echo "*** etrip.fmt not created by etrip2.in, investigate!" >&2
  exit 1
fi
mv etrip.log etripin.log || exit 1
diff $etestdir/etripin.log etripin.log

# May as well test non-ini second time through.
../etex --progname=etex <$etestdir/etrip3.in >etrip.fot
diff $etestdir/etrip.fot etrip.fot

# We use $DIFF instead of `diff' only for those files where there
# might actually be legitimate numerical differences.
$DIFF $DIFFFLAGS $etestdir/etrip.log etrip.log

diff $etestdir/etrip.out etrip.out

eval ../dvitype $dvitype_args etrip.dvi >etrip.typ || exit 1
$DIFF $DIFFFLAGS $etestdir/etrip.typ etrip.typ

$is_OK || {
  echo ">>> There were some errors." >&2
  exit 1
}