19 lines
680 B
Bash
19 lines
680 B
Bash
|
#! /bin/sh
|
||
|
|
echo "static const uint32_t iso88597_to_ucs4[96] = {"
|
||
|
|
sed -e '/^[^[:space:]]*[[:space:]]*.x00/d' \
|
||
|
|
-e 's/^[^[:space:]]*[[:space:]]*.x\([A-F].\)[[:space:]]*<U\(....\)>.*/ [0x\1 - 0xA0] = 0x\2,/p' \
|
||
|
|
-e d "$@" | \
|
||
|
|
sort -u
|
||
|
|
echo "};"
|
||
|
|
echo "static const struct gap from_idx[] = {"
|
||
|
|
sed -e 's/^[^[:space:]]*[[:space:]]*.x\([A-F].\)[[:space:]]*<U\(....\)>.*/0x\2 0x\1/p' \
|
||
|
|
-e d "$@" | \
|
||
|
|
sort -u | $PERL gap.pl
|
||
|
|
echo " { start: 0xffff, end: 0xffff, idx: 0 }"
|
||
|
|
echo "};"
|
||
|
|
echo "static const char iso88597_from_ucs4[] = {"
|
||
|
|
sed -e 's/^[^[:space:]]*[[:space:]]*.x\([A-F].\)[[:space:]]*<U\(....\)>.*/0x\2 0x\1/p' \
|
||
|
|
-e d "$@" | \
|
||
|
|
sort -u | $PERL gaptab.pl
|
||
|
|
echo "};"
|