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
|
#!/bin/bash -
if [ "$FILTERM" = out ]
then
NPOJED=
else
NPOJED=1
fi
FORMAT=
HTMLCHAR=
POPRAWKI=
for A in $ARG
do
case "$A" in
(1) NPOJED=;;
(html) FORMAT=html;;
(htmldec|htmlhex) FORMAT=html; HTMLCHAR=${A#html};;
(tex) FORMAT=tex;;
(*)
if [ -x "${0%/*}/argcharset/$A" ]
then
POPRAWKI=${POPRAWKI:+$POPRAWKI | }${0%/*}/argcharset/$A
fi
VARIANT=VARIANT_$A; APPROX="${!VARIANT} $APPROX"
VARIANT=VARIANT1_$A; APPROX1="${!VARIANT} $APPROX1"
;;
esac
done
if [ "$POPRAWKI" ]
then
"$SHELL" -c "$POPRAWKI"
else
cat
fi |
case "$FORMAT" in
(html)
"${0%/*}/fixmeta" "${MIME:-x-unknown}" |
if [ "$HTMLCHAR" ]
then
trs -e '@ @@ \}\xC0\-\xFF @' \
"$1" "$2" |
-f "${0%/*}/../filters/UTF8-html$HTMLCHAR" |
trs -e '@@ @ @ \!'
else
trs -e '\}\[@&<>\] @' \
"$1" "$2" \
${NPOJED:+-e} ${NPOJED:+"$APPROX"} \
-e "$APPROX1" \
${NPOJED:+-f} ${NPOJED:+"${0%/*}/UTF8-ascii"} \
-f "${0%/*}/UTF8-ascii1" \
-e "\300\-\377 ${REPLACE:-?} \200\-\277 \!" |
trs -e '@@ @ @& & @< < @> > & & < < > >'
fi
;;
(tex)
trs -e '\}\[@\#$%&\\^_{|}~\] @' \
"$1" "$2" \
-f "${0%/*}/UTF8-tex" \
-e "$APPROX" \
-e "$APPROX1" \
-f "${0%/*}/UTF8-ascii" \
-f "${0%/*}/UTF8-ascii1" \
-e "\300\-\377 ${REPLACE:-?} \200\-\277 \!" |
trs -e '@@ @ @\# \# @$ $ @% % @& & @\\ \\ @^ ^ @_ _ @{ { @| | @} } @~ ~
\# \\\# $ \\$ % \\% & \\& \\ $\\backslash$ ^ \\^{} _ \\_ { \\{ | $|$ } \\} ~ \\~{}'
;;
(*)
trs "$1" "$2" \
${NPOJED:+-e} ${NPOJED:+"$APPROX"} \
-e "$APPROX1" \
${NPOJED:+-f} ${NPOJED:+"${0%/*}/UTF8-ascii"} \
-f "${0%/*}/UTF8-ascii1" \
-e "\300\-\377 ${REPLACE:-?} \200\-\277 \!"
;;
esac
|
