summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/eptexdir/eptriptest.test
blob: 169ae16c6be3f39cf1f6a3ebf5ea5208fa3d22a7 (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
129
130
131
132
133
134
135
136
137
138
139
140
141
142
#! /bin/sh -vx
# $Id$
# Copyright 2017-2018 Karl Berry <tex-live@tug.org>
# Copyright 2011-2014 Peter Breitenlohner <tex-live@tug.org>
# Copyright 2010 Hironori Kitagawa <tex-live@tug.org>
# You may freely use, modify and/or distribute this file.

LC_ALL=C; export LC_ALL;  LANGUAGE=C; export LANGUAGE

testdir=$abs_srcdir/triptrap
etestdir=$abs_srcdir/etexdir/etrip
eptestdir=$abs_srcdir/eptexdir/eptrip

TEXMFCNF=$eptestdir; export TEXMFCNF

rm -rf eptripdir
mkdir eptripdir
cd eptripdir

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

echo ">>> Running e-TRIP test for e-pTeX." >&2
echo ">>> See $eptestdir/eptrip.diffs for example of acceptable diffs." >&2

# pTeX outputs direction of boxes.
P_SED1='s/, yoko direction//;s/yoko direction, //'
P_SED2='s/yoko(math) direction, //'

is_OK=:

set -x

echo "*** TRIP test for e-pTeX 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 .

rm -f trip.log
../eptex --progname=epinitex --ini <$testdir/trip1.in >cptripin.fot
if test ! -s trip.fmt; then
  echo "*** trip.fmt not created by trip1.in, investigate!" >&2
  exit 1
fi
sed "$P_SED1" trip.log >  cptripin.log || exit 1
diff $testdir/tripin.log cptripin.log

# May as well test non-ini second time through.
rm -f trip.log
../eptex --progname=eptex <$testdir/trip2.in >cptrip.fot
sed "$P_SED1;$P_SED2" trip.log > cptrip.log
diff $testdir/trip.fot cptrip.fot

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

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

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

mv trip.fmt ctrip.fmt

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

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

rm -f trip.log
../eptex --progname=epinitex --ini <$etestdir/etrip1.in >xptripin.fot
if test ! -s trip.fmt; then
  echo "*** trip.fmt not created by etrip1.in, investigate!" >&2
  exit 1
fi
sed "$P_SED1" trip.log >  xptripin.log || exit 1
diff $testdir/tripin.log xptripin.log

# May as well test non-ini second time through.
rm -f trip.log
../eptex --progname=eptex <$etestdir/trip2.in >xptrip.fot
sed "$P_SED1;$P_SED2" trip.log > xptrip.log
diff $testdir/trip.fot xptrip.fot

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

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

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

mv trip.fmt xtrip.fmt

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

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

../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 $eptestdir/eptrip.tex etrip.tex

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

# May as well test non-ini second time through.
../eptex --progname=eptex <$etestdir/etrip3.in >eptrip.fot
sed "$P_SED1;$P_SED2" etrip.log > eptrip.log
diff $etestdir/etrip.fot eptrip.fot

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

mv etrip.out eptrip.out
diff $etestdir/etrip.out eptrip.out

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

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