You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
1324 lines
60 KiB
1324 lines
60 KiB
/*----------------------------------------------------------------------------
|
|
%%File: validate.c
|
|
%%Unit: fechmap
|
|
%%Contact: jpick
|
|
|
|
"Rolling" state machines that allow interactive verification of
|
|
DBCS and EUC files. Currently, separate tables are stored for
|
|
each encoding so that the state machines can be run in parallel
|
|
(i.e., multiple parse streams).
|
|
|
|
These routines are used by auto-detection and if caller wants
|
|
conversion routines to return errors on invalid characters.
|
|
|
|
Following is a description of the structure of the DBCS and EUC
|
|
encodings handled by this module. This information is taken from
|
|
CJK.INF (maintained by Ken Lunde, author of _Understanding Japanese
|
|
Information Processing_). This information governs the structure
|
|
of the class and validation state tables used in this module.
|
|
|
|
Big5
|
|
Two-byte Standard Characters Encoding Ranges
|
|
first byte range 0xA1-0xFE
|
|
second byte ranges 0x40-0x7E, 0xA1-0xFE
|
|
One-byte Characters Encoding Range
|
|
ASCII 0x21-0x7E
|
|
|
|
GBK
|
|
Two-byte Standard Characters Encoding Ranges
|
|
first byte range 0x81-0xFE
|
|
second byte ranges 0x40-0x7E and 0x80-0xFE
|
|
One-byte Characters Encoding Range
|
|
ASCII 0x21-0x7E
|
|
|
|
HZ (information from HZ spec Fung F. Lee ([email protected]))
|
|
One-byte characters Encoding Ranges
|
|
first GB byte range 0x21-0x77
|
|
second GB byte range 0x21-0x7E
|
|
ASCII 0x21-0x7E
|
|
Mode switching Encoding sequence
|
|
escape sequence from GB to ASCII 0x7E followed by 0x7B ("~{")
|
|
escape sequence from ASCII to GB 0x7E followed by 0x7D ("~}")
|
|
line continuation marker 0x7E followed by 0x0A
|
|
(Note: ASCII mode is the default mode)
|
|
|
|
Shift-Jis
|
|
Two-byte Standard Characters Encoding Ranges
|
|
first byte ranges 0x81-0x9F, 0xE0-0xEF
|
|
second byte ranges 0x40-0x7E, 0x80-0xFC
|
|
Two-byte User-defined Dharacters Encoding Ranges
|
|
first byte range 0xF0-0xFC
|
|
second byte ranges 0x40-0x7E, 0x80-0xFC
|
|
One-byte Characters Encoding Range
|
|
Half-width katakana 0xA1-0xDF
|
|
ASCII/JIS-Roman 0x21-0x7E
|
|
|
|
Wansung
|
|
Two-byte Standard Characters Encoding Ranges
|
|
first byte range 0x81-0xFE
|
|
second byte ranges 0x40-0x7E and 0x80-0xFE
|
|
One-byte Characters Encoding Range
|
|
ASCII 0x21-0x7E
|
|
|
|
EUC-Cn
|
|
Code set 0 (ASCII or GB 1988-89): 0x21-0x7E
|
|
Code set 1 (GB 2312-80): 0xA1A1-0xFEFE
|
|
Code set 2: unused
|
|
Code set 3: unused
|
|
|
|
EUC-Jp
|
|
Code set 0 (ASCII or JIS X 0201-1976 Roman): 0x21-0x7E
|
|
Code set 1 (JIS X 0208): 0xA1A1-0xFEFE
|
|
Code set 2 (half-width katakana): 0x8EA1-0x8EDF
|
|
Code set 3 (JIS X 0212-1990): 0x8FA1A1-0x8FFEFE
|
|
|
|
EUC-Kr
|
|
Code set 0 (ASCII or KS C 5636-1993): 0x21-0x7E
|
|
Code set 1 (KS C 5601-1992): 0xA1A1-0xFEFE
|
|
Code set 2: unused
|
|
Code set 3: unused
|
|
|
|
EUC-Tw
|
|
Code set 0 (ASCII): 0x21-0x7E
|
|
Code set 1 (CNS 11643-1992 Plane 1): 0xA1A1-0xFEFE
|
|
Code set 2 (CNS 11643-1992 Planes 1-16): 0x8EA1A1A1-0x8EB0FEFE
|
|
Code set 3: unused
|
|
|
|
UTF-7 (information from the RFC2152 by D.Goldsmith)
|
|
One-byte characters Encoding Ranges
|
|
Direct and Optionally direct 0x21-0x2A, 0x2C-0x5B,
|
|
0x5D-0x60, 0x7B-0x7D
|
|
0x09, 0x0A, 0x0D, 0x20
|
|
Modified Base64 0x2B, 0x2F-39, 0x41-0x5A, 0x61-0x7A
|
|
Mode switching
|
|
escape sequence from D/O to M. Base64 0x2B
|
|
escape sequence from M. Base64 to D/O 0x2D (or any control character)
|
|
|
|
----------------------------------------------------------------------------*/
|
|
|
|
#include <stdio.h>
|
|
#include <stddef.h>
|
|
|
|
#include "private.h"
|
|
#include "fechmap_.h"
|
|
#include "lexint_.h"
|
|
|
|
|
|
/*----------------------------------------------------------------------------
|
|
Common Defs for all Sequence Validation
|
|
----------------------------------------------------------------------------*/
|
|
|
|
// Characters are broken down into ranges -- the smallest ranges that
|
|
// are treated as important by either EUC or DBCS (all flavors). In
|
|
// some cases, the smallest range is a single character. It saves
|
|
// some space to avoid having two class tables (even though more states
|
|
// are added to the state machines), so both encodings share these
|
|
// tokens.
|
|
|
|
// Common Tokens
|
|
//
|
|
#define ollow 0 // "other" legal low ascii character
|
|
#define x000a 1 // 0x0a ("\n")
|
|
#define x212a 2 // characters in range 0x21-0x2a
|
|
#define x002b 3 // 0x2b ("+")
|
|
#define x002c 4 // 0x2c (",")
|
|
#define x002d 5 // 0x2d ("-")
|
|
#define x002e 6 // 0x2e ("\")
|
|
#define x2f39 7 // characters in range 0x2f-0x39
|
|
#define x3a3f 8 // characters in range 0x3a-0x3f
|
|
#define x0040 9 // 0x40
|
|
#define x415a 10 // characters in range 0x41-0x5a
|
|
#define x005b 11 // 0x5b ("[")
|
|
#define x005c 12 // 0x5c ("\")
|
|
#define x5d60 13 // characters in range 0x5d-0x60
|
|
#define x6177 14 // characters in range 0x61-0x77
|
|
#define x787a 15 // characters in range 0x78-0x7a
|
|
#define x007b 16 // 0x7b ("{")
|
|
#define x007c 17 // 0x7c ("|")
|
|
#define x007d 18 // 0x7d ("}")
|
|
#define x007e 19 // 0x7e ("~")
|
|
#define x007f 20 // 0x7f (DEL)
|
|
#define x0080 21 // 0x80
|
|
#define x818d 22 // characters in range 0x81-0x8d
|
|
#define x008e 23 // 0x8e
|
|
#define x008f 24 // 0x8f
|
|
#define x909f 25 // characters in range 0x90-0x9f
|
|
#define x00a0 26 // 0xa0
|
|
#define xa1b0 27 // characters in range 0xa1-0xb0
|
|
#define xb1df 28 // characters in range 0xb1-0xdf
|
|
#define xe0ef 29 // characters in range 0xe0-0xef
|
|
#define xf0fc 30 // characters in range 0xf0-0xfc
|
|
#define xfdfe 31 // characters in range 0xfd-0xfe
|
|
|
|
#define ateof 32 // end-of-file
|
|
#define other 33 // character not covered by above tokens
|
|
|
|
#define nTokens 34 //
|
|
|
|
// Class table
|
|
//
|
|
static char _rgchCharClass[256] =
|
|
// 0 1 2 3 4 5 6 7 8 9 a b c d e f
|
|
{
|
|
// 0 nul soh stx etx eot enq ack bel bs tab lf vt np cr so si 0
|
|
other, other, other, other, other, other, other, other, other, ollow, x000a, other, other, ollow, other, other,
|
|
|
|
// 1 dle dc1 dc2 dc3 dc4 nak syn etb can em eof esc fs gs rs us 1
|
|
other, other, other, other, other, other, other, other, other, other, ollow, other, other, other, other, other,
|
|
|
|
// 2 sp ! " # $ % & ' ( ) * + , - . / 2
|
|
ollow, x212a, x212a, x212a, x212a, x212a, x212a, x212a, x212a, x212a, x212a, x002b, x002c, x002d, x002e, x2f39,
|
|
|
|
// 3 0 1 2 3 4 5 6 7 8 9 : ; < = > ? 3
|
|
x2f39, x2f39, x2f39, x2f39, x2f39, x2f39, x2f39, x2f39, x2f39, x2f39, x3a3f, x3a3f, x3a3f, x3a3f, x3a3f, x3a3f,
|
|
|
|
// 4 @ A B C D E F G H I J K L M N O 4
|
|
x0040, x415a, x415a, x415a, x415a, x415a, x415a, x415a, x415a, x415a, x415a, x415a, x415a, x415a, x415a, x415a,
|
|
|
|
// 5 P Q R S T U V W X Y Z [ \ ] ^ _ 5
|
|
x415a, x415a, x415a, x415a, x415a, x415a, x415a, x415a, x415a, x415a, x415a, x005b, x005c, x5d60, x5d60, x5d60,
|
|
|
|
// 6 ` a b c d e f g h i j k l m n o 6
|
|
x5d60, x6177, x6177, x6177, x6177, x6177, x6177, x6177, x6177, x6177, x6177, x6177, x6177, x6177, x6177, x6177,
|
|
|
|
// 7 p q r s t u v w x y z { | } ~ del 7
|
|
x6177, x6177, x6177, x6177, x6177, x6177, x6177, x6177, x787a, x787a, x787a, x007b, x007c, x007d, x007e, x007f,
|
|
|
|
// 8 8
|
|
x0080, x818d, x818d, x818d, x818d, x818d, x818d, x818d, x818d, x818d, x818d, x818d, x818d, x818d, x008e, x008f,
|
|
|
|
// 9 9
|
|
x909f, x909f, x909f, x909f, x909f, x909f, x909f, x909f, x909f, x909f, x909f, x909f, x909f, x909f, x909f, x909f,
|
|
|
|
// a a
|
|
x00a0, xa1b0, xa1b0, xa1b0, xa1b0, xa1b0, xa1b0, xa1b0, xa1b0, xa1b0, xa1b0, xa1b0, xa1b0, xa1b0, xa1b0, xa1b0,
|
|
|
|
// b b
|
|
xa1b0, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df,
|
|
|
|
// c c
|
|
xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df,
|
|
|
|
// d d
|
|
xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df, xb1df,
|
|
|
|
// e e
|
|
xe0ef, xe0ef, xe0ef, xe0ef, xe0ef, xe0ef, xe0ef, xe0ef, xe0ef, xe0ef, xe0ef, xe0ef, xe0ef, xe0ef, xe0ef, xe0ef,
|
|
|
|
// f f
|
|
xf0fc, xf0fc, xf0fc, xf0fc, xf0fc, xf0fc, xf0fc, xf0fc, xf0fc, xf0fc, xf0fc, xf0fc, xf0fc, xfdfe, xfdfe, other,
|
|
|
|
// 0 1 2 3 4 5 6 7 8 9 a b c d e f
|
|
};
|
|
|
|
|
|
// Common States -- All SM's use these
|
|
//
|
|
#define ACC 0x4e
|
|
#define ERR 0x7f
|
|
|
|
// Other States -- All SM's use some of these, not all use all
|
|
//
|
|
#define ST0 0x00
|
|
#define ST0c 0x40
|
|
#define ST1 0x01
|
|
#define ST1c 0x41
|
|
#define ST2 0x02
|
|
#define ST2c 0x42
|
|
#define ST3 0x03
|
|
#define ST3c 0x43
|
|
#define ST4 0x04
|
|
#define ST4c 0x44
|
|
|
|
// Each state can have a corresponding counting stata i.e. stata with
|
|
// with the same transitions but during which we look for special sequences.
|
|
//
|
|
#define FTstCounting(tst) (((tst) & 0x40) != 0) // If the state is counting (including ACC)
|
|
#define TstNotCountingFromTst(tst) ((tst) & 0x3f) // Obtain the real state from the counting
|
|
|
|
/*----------------------------------------------------------------------------
|
|
DBCS character sequence validation
|
|
----------------------------------------------------------------------------*/
|
|
|
|
#define nSJisStates 2
|
|
static signed char _rgchSJisNextState[nSJisStates][nTokens] =
|
|
{
|
|
// o x x x x x x x x x x x x x x x x x x x x x x x x x x x x x x x a o
|
|
// l 0 2 0 0 0 0 2 3 0 4 0 0 5 6 7 0 0 0 0 0 0 8 0 0 9 0 a b e f f t t
|
|
// l 0 1 0 0 0 0 e a 0 1 0 0 d 1 8 0 0 0 0 0 0 1 0 0 0 0 1 1 0 0 d e h
|
|
// o 0 2 2 2 2 2 3 3 4 5 5 5 6 7 7 7 7 7 7 7 8 8 8 8 9 a b d e f f o e
|
|
// w a a b c d e 9 f 0 a b c 0 7 a b c d e f 0 d e f f 0 0 f f c e f r
|
|
//------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
|
|
//
|
|
|
|
|
|
// DBCS State 0 -- start (look for legal single byte or lead byte)
|
|
ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ERR, ERR, ST1, ST1, ST1, ST1, ERR, ACC, ACC, ST1, ST1, ERR, ACC, ERR,
|
|
|
|
// DBCS State 1 -- saw lead byte, need legal trail byte
|
|
ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ERR, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ERR, ERR, ERR,
|
|
|
|
};
|
|
|
|
#define nBig5States 2
|
|
static signed char _rgchBig5NextState[nBig5States][nTokens] =
|
|
{
|
|
//
|
|
// o x x x x x x x x x x x x x x x x x x x x x x x x x x x x x x x a o
|
|
// l 0 2 0 0 0 0 2 3 0 4 0 0 5 6 7 0 0 0 0 0 0 8 0 0 9 0 a b e f f t t
|
|
// l 0 1 0 0 0 0 f a 0 1 0 0 d 1 8 0 0 0 0 0 0 1 0 0 0 0 1 1 0 0 d e h
|
|
// o 0 2 2 2 2 2 3 3 4 5 5 5 6 7 7 7 7 7 7 7 8 8 8 8 9 a b d e f f o e
|
|
// w a a b c d e 9 f 0 a b c 0 7 a b c d e f 0 d e f f 0 0 f f c e f r
|
|
//------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
|
|
//
|
|
|
|
// DBCS State 0 -- start (look for legal single byte or lead byte)
|
|
ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ERR, ERR, ST1, ST1, ST1, ST1, ST1, ST1, ST1, ST1, ST1, ST1, ACC, ERR,
|
|
|
|
// DBCS State 1 -- saw lead byte, need legal trail byte
|
|
ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ACC, ACC, ACC, ACC, ACC, ERR, ERR,
|
|
|
|
};
|
|
|
|
#define nGbkWanStates 2
|
|
static signed char _rgchGbkWanNextState[nGbkWanStates][nTokens] =
|
|
{
|
|
//
|
|
// o x x x x x x x x x x x x x x x x x x x x x x x x x x x x x x x a o
|
|
// l 0 2 0 0 0 0 2 3 0 4 0 0 5 6 7 0 0 0 0 0 0 8 0 0 9 0 a b e f f t t
|
|
// l 0 1 0 0 0 0 f a 0 1 0 0 d 1 8 0 0 0 0 0 0 1 0 0 0 0 1 1 0 0 d e h
|
|
// o 0 2 2 2 2 2 3 3 4 5 5 5 6 7 7 7 7 7 7 7 8 8 8 8 9 a b d e f f o e
|
|
// w a a b c d e 9 f 0 a b c 0 7 a b c d e f 0 d e f f 0 0 f f c e f r
|
|
//-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
|
|
//
|
|
|
|
// DBCS State 0 -- start (look for legal single byte or lead byte)
|
|
ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ERR, ERR, ST1, ST1, ST1, ST1, ST1, ST1, ST1, ST1, ST1, ST1, ACC, ERR,
|
|
|
|
// DBCS State 1 -- saw lead byte, need legal trail byte
|
|
ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ERR, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ERR, ERR,
|
|
|
|
|
|
};
|
|
|
|
|
|
/*----------------------------------------------------------------------------
|
|
EUC character sequence validation
|
|
----------------------------------------------------------------------------*/
|
|
|
|
#define nEucJpStates 4
|
|
static signed char _rgchEucJpNextState[nEucJpStates][nTokens] =
|
|
{
|
|
//
|
|
// o x x x x x x x x x x x x x x x x x x x x x x x x x x x x x x x a o
|
|
// l 0 2 0 0 0 0 2 3 0 4 0 0 5 6 7 0 0 0 0 0 0 8 0 0 9 0 a b e f f t t
|
|
// l 0 1 0 0 0 0 f a 0 1 0 0 d 1 8 0 0 0 0 0 0 1 0 0 0 0 1 1 0 0 d e h
|
|
// o 0 2 2 2 2 2 3 3 4 5 5 5 6 7 7 7 7 7 7 7 8 8 8 8 9 a b d e f f o e
|
|
// w a a b c d e 9 f 0 a b c 0 7 a b c d e f 0 d e f f 0 0 f f c e f r
|
|
//-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
|
|
//
|
|
|
|
// EUC State 0 -- start
|
|
ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ERR, ERR, ERR, ST2, ST3, ERR, ERR, ST1, ST1, ST1, ST1, ST1, ACC, ERR,
|
|
|
|
// EUC State 1 -- saw a1fe, need one more a1fe
|
|
ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ACC, ACC, ACC, ACC, ACC, ERR, ERR,
|
|
|
|
// EUC State 2 -- saw 8e, need a1df
|
|
ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ACC, ACC, ERR, ERR, ERR, ERR, ERR,
|
|
|
|
// EUC State 3 -- saw 8f, need 2 a1fe
|
|
ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ST1, ST1, ST1, ST1, ST1, ERR, ERR,
|
|
|
|
};
|
|
|
|
#define nEucKrCnStates 2
|
|
static signed char _rgchEucKrCnNextState[nEucKrCnStates][nTokens] =
|
|
{
|
|
//
|
|
// o x x x x x x x x x x x x x x x x x x x x x x x x x x x x x x x a o
|
|
// l 0 2 0 0 0 0 2 3 0 4 0 0 5 6 7 0 0 0 0 0 0 8 0 0 9 0 a b e f f t t
|
|
// l 0 1 0 0 0 0 f a 0 1 0 0 d 1 8 0 0 0 0 0 0 1 0 0 0 0 1 1 0 0 d e h
|
|
// o 0 2 2 2 2 2 3 3 4 5 5 5 6 7 7 7 7 7 7 7 8 8 8 8 9 a b d e f f o e
|
|
// w a a b c d e 9 f 0 a b c 0 7 a b c d e f 0 d e f f 0 0 f f c e f r
|
|
//-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
|
|
//
|
|
|
|
// EUC State 0 -- start
|
|
ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ST1, ST1, ST1, ST1, ST1, ACC, ERR,
|
|
|
|
// EUC State 1 -- saw a1fe, need one more a1fe
|
|
ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ACC, ACC, ACC, ACC, ACC, ERR, ERR,
|
|
|
|
};
|
|
|
|
#define nEucTwStates 4
|
|
static signed char _rgchEucTwNextState[nEucTwStates][nTokens] =
|
|
{
|
|
//
|
|
// o x x x x x x x x x x x x x x x x x x x x x x x x x x x x x x x a o
|
|
// l 0 2 0 0 0 0 2 3 0 4 0 0 5 6 7 0 0 0 0 0 0 8 0 0 9 0 a b e f f t t
|
|
// l 0 1 0 0 0 0 f a 0 1 0 0 d 1 8 0 0 0 0 0 0 1 0 0 0 0 1 1 0 0 d e h
|
|
// o 0 2 2 2 2 2 3 3 4 5 5 5 6 7 7 7 7 7 7 7 8 8 8 8 9 a b d e f f o e
|
|
// w a a b c d e 9 f 0 a b c 0 7 a b c d e f 0 d e f f 0 0 f f c e f r
|
|
//-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
|
|
//
|
|
|
|
// EUC State 0 -- start
|
|
ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ERR, ERR, ERR, ST2, ERR, ERR, ERR, ST1, ST1, ST1, ST1, ST1, ACC, ERR,
|
|
|
|
// EUC State 1 -- saw a1fe, need one more a1fe
|
|
ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ACC, ACC, ACC, ACC, ACC, ERR, ERR,
|
|
|
|
// EUC State 2 -- saw 8e, need a1b0
|
|
ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ST3, ERR, ERR, ERR, ERR, ERR, ERR,
|
|
|
|
// EUC State 3 -- saw 8e, a1b0; need 2 a1fe
|
|
ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ST1, ST1, ST1, ST1, ST1, ERR, ERR,
|
|
|
|
};
|
|
|
|
/*-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
|
|
HZ character sequence validation
|
|
------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------*/
|
|
// Currently some of the rules for HZ encoding outlined above are a bit loosened up.
|
|
// (e.g. the range for the first GB byte is expanded) The rules were adjusted based on real data.
|
|
|
|
#define nHzStates 5
|
|
static signed char _rgchHzNextState[nHzStates][nTokens] =
|
|
{
|
|
//
|
|
// o x x x x x x x x x x x x x x x x x x x x x x x x x x x x x x x a o
|
|
// l 0 2 0 0 0 0 2 3 0 4 0 0 5 6 7 0 0 0 0 0 0 8 0 0 9 0 a b e f f t t
|
|
// l 0 1 0 0 0 0 f a 0 1 0 0 d 1 8 0 0 0 0 0 0 1 0 0 0 0 1 1 0 0 d e h
|
|
// o 0 2 2 2 2 2 3 3 4 5 5 5 6 7 7 7 7 7 7 7 8 8 8 8 9 a b d e f f o e
|
|
// w a a b c d e 9 f 0 a b c 0 7 a b c d e f 0 d e f f 0 0 f f c e f r
|
|
//-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
|
|
//
|
|
|
|
// HZ State 0 -- ASCII
|
|
ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ST1c, ACC, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ACC, ERR,
|
|
|
|
// HZ State 1 -- saw "~," looking for "{" to make transition to GB mode
|
|
ERR, ACC, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ST2c, ERR, ERR, ACC, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR,
|
|
|
|
// HZ State 2 -- just saw "{," expecting GB byte
|
|
ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ERR, ERR, ERR, ST4c, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR,
|
|
|
|
// HZ State 3 -- expecting GB byte
|
|
ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST4c, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR,
|
|
|
|
// HZ State 4 -- saw "~," looking for "}" to make transition to ASCII mode
|
|
ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ST3, ACC, ST3, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR,
|
|
|
|
};
|
|
|
|
/*-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
|
|
UTF-7 character sequence validation
|
|
------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------*/
|
|
|
|
#define nUtf7States 3
|
|
static signed char _rgchUtf7NextState[nUtf7States][nTokens] =
|
|
{
|
|
//
|
|
// o x x x x x x x x x x x x x x x x x x x x x x x x x x x x x x x a o
|
|
// l 0 2 0 0 0 0 2 3 0 4 0 0 5 6 7 0 0 0 0 0 0 8 0 0 9 0 a b e f f t t
|
|
// l 0 1 0 0 0 0 f a 0 1 0 0 d 1 8 0 0 0 0 0 0 1 0 0 0 0 1 1 0 0 d e h
|
|
// o 0 2 2 2 2 2 3 3 4 5 5 5 6 7 7 7 7 7 7 7 8 8 8 8 9 a b d e f f o e
|
|
// w a a b c d e 9 f 0 a b c 0 7 a b c d e f 0 d e f f 0 0 f f c e f r
|
|
//-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
|
|
//
|
|
|
|
// UTF7 State 0 -- Direct/optionally direct ACSII mode, state transition can happen on "+"
|
|
ACC, ACC, ACC, ST1c, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ACC, ERR, ACC, ACC, ACC, ACC, ACC, ACC, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ACC, ERR,
|
|
|
|
// UTF7 State 1 -- Expecting first character from Modified Base64 alphabet
|
|
ERR, ERR, ERR, ST2, ERR, ACC, ERR, ST2, ERR, ERR, ST2, ERR, ERR, ERR, ST2, ST2, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR,
|
|
|
|
// UTF7 State 2 -- Modified Base64 alphabet mode, can be exited with "-" or any control character.
|
|
ACC, ACC, ERR, ST2, ERR, ACC, ERR, ST2, ERR, ERR, ST2, ERR, ERR, ERR, ST2, ST2, ERR, ERR, ERR, ERR, ACC, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ERR, ACC, ERR,
|
|
};
|
|
|
|
/*----------------------------------------------------------------------------
|
|
UTF-8 character sequence validation
|
|
----------------------------------------------------------------------------*/
|
|
|
|
static int _nUtf8Tb = 0;
|
|
|
|
#define BIT7(a) ((a) & 0x80)
|
|
#define BIT6(a) ((a) & 0x40)
|
|
|
|
/* N U T F 8 */
|
|
/*----------------------------------------------------------------------------
|
|
%%Function: _NUtf8
|
|
%%Contact: jpick
|
|
|
|
UTF-8 doesn't require a state table for validation, just a count
|
|
of the number of expected trail bytes. See utf8lex.c for an
|
|
explanation of this code.
|
|
----------------------------------------------------------------------------*/
|
|
static int __inline NUtf8(UCHAR uch, BOOL fEoi)
|
|
{
|
|
// BIT7(uch) == 0 implies single ASCII byte.
|
|
// BIT6(uch) == 0 implies one of n trail bytes.
|
|
// Otherwise, lead byte, with number of bits set
|
|
// up to first 0 equal to the total number bytes
|
|
// in the sequence.
|
|
//
|
|
// REVIEW: _nUtf8Tb *is* really the state of this
|
|
// validator -- use nState in structure?
|
|
//
|
|
if (fEoi && (_nUtf8Tb != 0))
|
|
{
|
|
return 0; // unexpected end-of-input
|
|
}
|
|
else if (BIT7(uch) == 0)
|
|
{
|
|
if (_nUtf8Tb != 0) // unexpected single byte
|
|
return 0;
|
|
return 1;
|
|
}
|
|
else if (BIT6(uch) == 0)
|
|
{
|
|
if (_nUtf8Tb == 0) // unexpected trail byte
|
|
return 0;
|
|
if ((--_nUtf8Tb) == 0)
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
if (_nUtf8Tb != 0) // unexpected lead byte
|
|
return 0;
|
|
while (BIT7(uch) != 0)
|
|
{
|
|
uch <<= 1;
|
|
_nUtf8Tb++;
|
|
}
|
|
_nUtf8Tb--; // don't count lead byte
|
|
}
|
|
return -1;
|
|
}
|
|
|
|
|
|
/*----------------------------------------------------------------------------
|
|
Character Mapping Defs
|
|
----------------------------------------------------------------------------*/
|
|
|
|
// If caller wants us to check characters as part of validation
|
|
//
|
|
typedef BOOL (*PFNCHECKCHAR)(ICET icetIn);
|
|
|
|
#define cchMaxBuff 5
|
|
typedef struct _cc
|
|
{
|
|
int nCp; // code page
|
|
int cchBuff; // fill count of character buffer
|
|
PFNCHECKCHAR pfnCheckChar; // character check routine
|
|
char rgchBuff[cchMaxBuff]; // character buffer
|
|
} CC;
|
|
|
|
// Character validation prototypes
|
|
//
|
|
static BOOL _FDbcsCheckChar(ICET icetIn);
|
|
|
|
|
|
// DBCS character checker structures
|
|
//
|
|
|
|
// Big5
|
|
static CC _ccBig5 =
|
|
{
|
|
nCpTaiwan,
|
|
0,
|
|
_FDbcsCheckChar,
|
|
};
|
|
|
|
// Gbk
|
|
static CC _ccGbk =
|
|
{
|
|
nCpChina,
|
|
0,
|
|
_FDbcsCheckChar,
|
|
};
|
|
|
|
// ShiftJis
|
|
static CC _ccSJis =
|
|
{
|
|
nCpJapan,
|
|
0,
|
|
_FDbcsCheckChar,
|
|
};
|
|
|
|
// Wansung
|
|
static CC _ccWan =
|
|
{
|
|
nCpKorea,
|
|
0,
|
|
_FDbcsCheckChar,
|
|
};
|
|
|
|
|
|
// Character checker structures just used as buffers.
|
|
//
|
|
|
|
// Euc-Jp
|
|
static CC _ccEucJp =
|
|
{
|
|
0,
|
|
0,
|
|
0,
|
|
};
|
|
|
|
// Hz
|
|
static CC _ccHz =
|
|
{
|
|
0,
|
|
0,
|
|
0,
|
|
};
|
|
|
|
// Utf7
|
|
static CC _ccUtf7 =
|
|
{
|
|
0,
|
|
0,
|
|
0,
|
|
};
|
|
|
|
/*----------------------------------------------------------------------------
|
|
Character Occurrence Counters
|
|
----------------------------------------------------------------------------*/
|
|
|
|
// If calling app wants us to track occurrences of common character
|
|
// sequences during validation (used only by auto-detection, so far).
|
|
//
|
|
|
|
typedef struct _coce
|
|
{
|
|
int cHits;
|
|
short cwch;
|
|
WCHAR rgwch[2];
|
|
} COCE;
|
|
|
|
typedef struct _coc
|
|
{
|
|
BOOL fMatching;
|
|
short nCoceCurr;
|
|
short nCoceIndex;
|
|
int ccoce;
|
|
COCE *rgcoce;
|
|
} COC;
|
|
|
|
// Big5
|
|
//
|
|
static COCE _rgcoceBig5[] =
|
|
{
|
|
{0, 2, {(WCHAR)0xa7da, (WCHAR)0xadcc},}, // "wo men"
|
|
{0, 2, {(WCHAR)0xa8e4, (WCHAR)0xb9ea},}, // "qi shi"
|
|
{0, 2, {(WCHAR)0xa65d, (WCHAR)0xacb0},}, // "yin wei"
|
|
{0, 2, {(WCHAR)0xb8ea, (WCHAR)0xb054},}, // "zi xun"
|
|
{0, 2, {(WCHAR)0xb971, (WCHAR)0xb8a3},}, // "diam nao"
|
|
{0, 2, {(WCHAR)0xbaf4, (WCHAR)0xb8f4},}, // "wang lu"
|
|
{0, 2, {(WCHAR)0xbd75, (WCHAR)0xa457},}, // "xian shang"
|
|
{0, 2, {(WCHAR)0xc577, (WCHAR)0xaaef},}, // "huan ying"
|
|
{0, 2, {(WCHAR)0xa477, (WCHAR)0xb867},}, // "yi jing"
|
|
};
|
|
|
|
static COC _cocBig5 =
|
|
{
|
|
fFalse, // fMatching
|
|
0, // nCoceCurr
|
|
0, // nCoceIndex
|
|
sizeof(_rgcoceBig5) / sizeof(_rgcoceBig5[0]), // ccoce
|
|
_rgcoceBig5, // rgcoce
|
|
};
|
|
|
|
// Euc-Cn
|
|
//
|
|
static COCE _rgcoceEucCn[] =
|
|
{
|
|
{0, 2, {(WCHAR)0xcbfb, (WCHAR)0xc3c7},}, // "ta men"
|
|
{0, 2, {(WCHAR)0xced2, (WCHAR)0xc3c7},}, // "wo men"
|
|
{0, 2, {(WCHAR)0xd2f2, (WCHAR)0xb4cb},}, // "yin ci"
|
|
{0, 2, {(WCHAR)0xcab2, (WCHAR)0xc3b4},}, // "shen mo"
|
|
{0, 2, {(WCHAR)0xc8e7, (WCHAR)0xb9fb},}, // "ru guo"
|
|
{0, 2, {(WCHAR)0xd2f2, (WCHAR)0xceaa},}, // "yin wei"
|
|
{0, 2, {(WCHAR)0xcbf9, (WCHAR)0xd2d4},}, // "suo yi"
|
|
{0, 2, {(WCHAR)0xbbb6, (WCHAR)0xd3ad},}, // "huan ying"
|
|
{0, 2, {(WCHAR)0xcdf8, (WCHAR)0xc2e7},}, // "wang luo"
|
|
{0, 2, {(WCHAR)0xd0c5, (WCHAR)0xcfa2},}, // "xin xi"
|
|
{0, 2, {(WCHAR)0xbcc6, (WCHAR)0xcbe3},}, // "ji guan"
|
|
};
|
|
|
|
static COC _cocEucCn =
|
|
{
|
|
fFalse, // fMatching
|
|
0, // nCoceCurr
|
|
0, // nCoceIndex
|
|
sizeof(_rgcoceEucCn) / sizeof(_rgcoceEucCn[0]), // ccoce
|
|
_rgcoceEucCn, // rgcoce
|
|
};
|
|
|
|
// Euc-Kr
|
|
//
|
|
static COCE _rgcoceEucKr[] =
|
|
{
|
|
{0, 2, {(WCHAR)0xb0a1, (WCHAR)0x0020},},
|
|
{0, 2, {(WCHAR)0xb0a1, (WCHAR)0xa1a1},},
|
|
{0, 2, {(WCHAR)0xb4c2, (WCHAR)0x0020},},
|
|
{0, 2, {(WCHAR)0xb4c2, (WCHAR)0xa1a1},},
|
|
{0, 2, {(WCHAR)0xb4d9, (WCHAR)0x002e},},
|
|
{0, 2, {(WCHAR)0xb4d9, (WCHAR)0xa3ae},},
|
|
{0, 2, {(WCHAR)0xb8a6, (WCHAR)0x0020},},
|
|
{0, 2, {(WCHAR)0xb8a6, (WCHAR)0xa1a1},},
|
|
{0, 2, {(WCHAR)0xc0ba, (WCHAR)0x0020},},
|
|
{0, 2, {(WCHAR)0xc0ba, (WCHAR)0xa1a1},},
|
|
{0, 2, {(WCHAR)0xc0bb, (WCHAR)0x0020},},
|
|
{0, 2, {(WCHAR)0xc0bb, (WCHAR)0xa1a1},},
|
|
{0, 2, {(WCHAR)0xc0cc, (WCHAR)0x0020},},
|
|
{0, 2, {(WCHAR)0xc0cc, (WCHAR)0xa1a1},},
|
|
};
|
|
|
|
static COC _cocEucKr =
|
|
{
|
|
fFalse, // fMatching
|
|
0, // nCoceCurr
|
|
0, // nCoceIndex
|
|
sizeof(_rgcoceEucKr) / sizeof(_rgcoceEucKr[0]), // ccoce
|
|
_rgcoceEucKr, // rgcoce
|
|
};
|
|
|
|
// EUC-Jp
|
|
//
|
|
static COCE _rgcoceEucJp[] =
|
|
{
|
|
{0, 2, {(WCHAR)0xa4c7, (WCHAR)0xa4b9},}, // "de su"
|
|
{0, 2, {(WCHAR)0xa4c0, (WCHAR)0xa1a3},}, // "da ."
|
|
{0, 2, {(WCHAR)0xa4a4, (WCHAR)0xa4eb},}, // "i ru"
|
|
{0, 2, {(WCHAR)0xa4de, (WCHAR)0xa4b9},}, // "ma su"
|
|
{0, 2, {(WCHAR)0xa4b7, (WCHAR)0xa4bf},}, // "shi ta"
|
|
{0, 2, {(WCHAR)0xa4b9, (WCHAR)0xa4eb},}, // "su ru"
|
|
{0, 2, {(WCHAR)0xa4bf, (WCHAR)0xa1a3},}, // "ta ."
|
|
{0, 2, {(WCHAR)0xa4eb, (WCHAR)0xa1a3},}, // "ru ."
|
|
};
|
|
|
|
static COC _cocEucJp =
|
|
{
|
|
fFalse, // fMatching
|
|
0, // nCoceCurr
|
|
0, // nCoceIndex
|
|
sizeof(_rgcoceEucJp) / sizeof(_rgcoceEucJp[0]), // ccoce
|
|
_rgcoceEucJp, // rgcoce
|
|
};
|
|
|
|
// GBK
|
|
//
|
|
static COCE _rgcoceGbk[] =
|
|
{
|
|
{0, 2, {(WCHAR)0xcbfb, (WCHAR)0xc3c7},}, // "ta men"
|
|
{0, 2, {(WCHAR)0xced2, (WCHAR)0xc3c7},}, // "wo men"
|
|
{0, 2, {(WCHAR)0xd2f2, (WCHAR)0xb4cb},}, // "yin ci"
|
|
{0, 2, {(WCHAR)0xcab2, (WCHAR)0xc3b4},}, // "shen mo"
|
|
{0, 2, {(WCHAR)0xc8e7, (WCHAR)0xb9fb},}, // "ru guo"
|
|
{0, 2, {(WCHAR)0xd2f2, (WCHAR)0xceaa},}, // "yin wei"
|
|
{0, 2, {(WCHAR)0xcbf9, (WCHAR)0xd2d4},}, // "suo yi"
|
|
{0, 2, {(WCHAR)0xbbb6, (WCHAR)0xd3ad},}, // "huan ying"
|
|
{0, 2, {(WCHAR)0xcdf8, (WCHAR)0xc2e7},}, // "wang luo"
|
|
{0, 2, {(WCHAR)0xd0c5, (WCHAR)0xcfa2},}, // "xin xi"
|
|
{0, 2, {(WCHAR)0xbcc6, (WCHAR)0xcbe3},}, // "ji guan"
|
|
};
|
|
|
|
static COC _cocGbk =
|
|
{
|
|
fFalse, // fMatching
|
|
0, // nCoceCurr
|
|
0, // nCoceIndex
|
|
sizeof(_rgcoceGbk) / sizeof(_rgcoceGbk[0]), // ccoce
|
|
_rgcoceGbk, // rgcoce
|
|
};
|
|
|
|
// Shift-JIS
|
|
//
|
|
static COCE _rgcoceSJis[] =
|
|
{
|
|
{0, 2, {(WCHAR)0x82c5, (WCHAR)0x82b7},}, // "de su"
|
|
{0, 2, {(WCHAR)0x82be, (WCHAR)0x8142},}, // "da ."
|
|
{0, 2, {(WCHAR)0x82a2, (WCHAR)0x82e9},}, // "i ru"
|
|
{0, 2, {(WCHAR)0x82dc, (WCHAR)0x82b7},}, // "ma su"
|
|
{0, 2, {(WCHAR)0x82b5, (WCHAR)0x82bd},}, // "shi ta"
|
|
{0, 2, {(WCHAR)0x82b7, (WCHAR)0x82e9},}, // "su ru"
|
|
{0, 2, {(WCHAR)0x82bd, (WCHAR)0x8142},}, // "ta ."
|
|
{0, 2, {(WCHAR)0x82e9, (WCHAR)0x8142},}, // "ru ."
|
|
};
|
|
|
|
static COC _cocSJis =
|
|
{
|
|
fFalse, // fMatching
|
|
0, // nCoceCurr
|
|
0, // nCoceIndex
|
|
sizeof(_rgcoceSJis) / sizeof(_rgcoceSJis[0]), // ccoce
|
|
_rgcoceSJis, // rgcoce
|
|
};
|
|
|
|
// Wansung
|
|
//
|
|
// REVIEW: bug (1/2 this table is being ignored)
|
|
//
|
|
static COCE _rgcoceWan[] =
|
|
{
|
|
{0, 2, {(WCHAR)0xb0a1, (WCHAR)0x0020},},
|
|
{0, 2, {(WCHAR)0xb0a1, (WCHAR)0xa1a1},},
|
|
{0, 2, {(WCHAR)0xb4c2, (WCHAR)0x0020},},
|
|
{0, 2, {(WCHAR)0xb4c2, (WCHAR)0xa1a1},},
|
|
{0, 2, {(WCHAR)0xb4d9, (WCHAR)0x002e},},
|
|
{0, 2, {(WCHAR)0xb4d9, (WCHAR)0xa3ae},},
|
|
{0, 2, {(WCHAR)0xb8a6, (WCHAR)0x0020},},
|
|
{0, 2, {(WCHAR)0xb8a6, (WCHAR)0xa1a1},},
|
|
{0, 2, {(WCHAR)0xc0ba, (WCHAR)0x0020},},
|
|
{0, 2, {(WCHAR)0xc0ba, (WCHAR)0xa1a1},},
|
|
{0, 2, {(WCHAR)0xc0bb, (WCHAR)0x0020},},
|
|
{0, 2, {(WCHAR)0xc0bb, (WCHAR)0xa1a1},},
|
|
{0, 2, {(WCHAR)0xc0cc, (WCHAR)0x0020},},
|
|
{0, 2, {(WCHAR)0xc0cc, (WCHAR)0xa1a1},},
|
|
};
|
|
|
|
static COC _cocWan =
|
|
{
|
|
fFalse, // fMatching
|
|
0, // nCoceCurr
|
|
0, // nCoceIndex
|
|
sizeof(_rgcoceWan) / sizeof(_rgcoceWan[0]), // ccoce
|
|
_rgcoceWan, // rgcoce
|
|
};
|
|
|
|
// Hz
|
|
//
|
|
static COCE _rgcoceHz[] =
|
|
{
|
|
{0, 2, {(WCHAR)0x007e, (WCHAR)0x007b},}, // ~{
|
|
{0, 2, {(WCHAR)0x007e, (WCHAR)0x007d},}, // ~}
|
|
};
|
|
|
|
static COC _cocHz =
|
|
{
|
|
fFalse, // fMatching
|
|
0, // nCoceCurr
|
|
0, // nCoceIndex
|
|
sizeof(_rgcoceHz) / sizeof(_rgcoceHz[0]), // ccoce
|
|
_rgcoceHz, // rgcoce
|
|
};
|
|
|
|
// Utf7
|
|
//
|
|
static COCE _rgcoceUtf7[] =
|
|
{
|
|
{0, 2, {(WCHAR)0x002b, (WCHAR)0x002d},}, // +-
|
|
};
|
|
|
|
static COC _cocUtf7 =
|
|
{
|
|
fFalse, // fMatching
|
|
0, // nCoceCurr
|
|
0, // nCoceIndex
|
|
sizeof(_rgcoceUtf7) / sizeof(_rgcoceUtf7[0]), // ccoce
|
|
_rgcoceUtf7, // rgcoce
|
|
};
|
|
|
|
// Character counter prototype.
|
|
//
|
|
static void _CountChars(ICET icetIn);
|
|
|
|
|
|
/*----------------------------------------------------------------------------
|
|
Main Definitions
|
|
----------------------------------------------------------------------------*/
|
|
|
|
// Structure to keep state, state machine and other associated
|
|
// information for a given character set "parse stream."
|
|
//
|
|
typedef struct _vr
|
|
{
|
|
BOOL fInUse;
|
|
DWORD dwFlags;
|
|
int nState;
|
|
CC *ccCheck;
|
|
signed char (*rgchNextState)[nTokens];
|
|
} VR;
|
|
|
|
// Array of validation records. We allow multiple, active parse
|
|
// streams for auto-detect -- this way, it can concurrently keep
|
|
// a parse stream for each encoding type, without needing to read
|
|
// its input multiple times.
|
|
//
|
|
static VR _mpicetvr[icetCount] =
|
|
{
|
|
{fTrue, 0, ST0, 0, _rgchEucKrCnNextState,}, // icetEucCn
|
|
{fTrue, 0, ST0, &_ccEucJp, _rgchEucJpNextState,}, // icetEucJp
|
|
{fTrue, 0, ST0, 0, _rgchEucKrCnNextState,}, // icetEucKr
|
|
{fTrue, 0, ST0, 0, _rgchEucTwNextState,}, // icetEucTw
|
|
{fFalse, 0, ST0, 0, 0,}, // icetIso2022Cn
|
|
{fFalse, 0, ST0, 0, 0,}, // icetIso2022Jp
|
|
{fFalse, 0, ST0, 0, 0,}, // icetIso2022Kr
|
|
{fFalse, 0, ST0, 0, 0,}, // icetIso2022Tw
|
|
{fTrue, 0, ST0, &_ccBig5, _rgchBig5NextState,}, // icetBig5
|
|
{fTrue, 0, ST0, &_ccGbk, _rgchGbkWanNextState,}, // icetGbk
|
|
{fTrue, 0, ST0, &_ccHz, _rgchHzNextState,}, // icetHz
|
|
{fTrue, 0, ST0, &_ccSJis, _rgchSJisNextState,}, // icetShiftJis
|
|
{fTrue, 0, ST0, &_ccWan, _rgchGbkWanNextState,}, // icetWansung
|
|
{fTrue, 0, ST0, &_ccUtf7, _rgchUtf7NextState,}, // icetUtf7
|
|
{fTrue, 0, ST0, 0, 0,}, // icetUtf8
|
|
};
|
|
|
|
// Array of character sequence counters, one per encoding type.
|
|
//
|
|
static COC *_mpicetlpcoc[icetCount] =
|
|
{
|
|
&_cocEucCn, // icetEucCn
|
|
&_cocEucJp, // icetEucJp
|
|
&_cocEucKr, // icetEucKr
|
|
0, // icetEucTw
|
|
0, // icetIso2022Cn
|
|
0, // icetIso2022Jp
|
|
0, // icetIso2022Kr
|
|
0, // icetIso2022Tw
|
|
&_cocBig5, // icetBig5
|
|
&_cocGbk, // icetGbk
|
|
&_cocHz, // icetHz
|
|
&_cocSJis, // icetShiftJis
|
|
&_cocWan, // icetWansung
|
|
&_cocUtf7, // icetUtf7
|
|
0, // icetUtf8
|
|
};
|
|
|
|
|
|
/* V A L I D A T E I N I T */
|
|
/*----------------------------------------------------------------------------
|
|
%%Function: ValidateInit
|
|
%%Contact: jpick
|
|
|
|
Initialize the state machine for the given character set (set its
|
|
state to ST0 (the start state) and store its parsing options).
|
|
----------------------------------------------------------------------------*/
|
|
void ValidateInit(ICET icetIn, DWORD dwFlags)
|
|
{
|
|
// Initialize the character occurrence counter, if caller wants
|
|
// us to count common character sequences (auto-detect, only,
|
|
// for now). Turn off the count-common-chars flag if we're not
|
|
// set up to count sequences (meaning we don't have a set of
|
|
// common characters for this encoding type or have no place
|
|
// to buffer them).
|
|
//
|
|
if (dwFlags & grfCountCommonChars)
|
|
{
|
|
if ((_mpicetlpcoc[icetIn]) && (_mpicetvr[icetIn].ccCheck))
|
|
{
|
|
int i;
|
|
for (i = 0; i < _mpicetlpcoc[icetIn]->ccoce; i++)
|
|
_mpicetlpcoc[icetIn]->rgcoce[i].cHits = 0;
|
|
_mpicetlpcoc[icetIn]->fMatching = fFalse;
|
|
}
|
|
else
|
|
{
|
|
dwFlags &= ~grfCountCommonChars;
|
|
}
|
|
}
|
|
|
|
// If validation not supported for the encoding type, there's
|
|
// nothing else for us to do here.
|
|
//
|
|
if (!_mpicetvr[icetIn].fInUse)
|
|
return;
|
|
|
|
_mpicetvr[icetIn].nState = ST0;
|
|
|
|
// Can't do character mapping validation without character
|
|
// checker information. (If we do have the character checker,
|
|
// initialize its buffer length to 0).
|
|
//
|
|
if (_mpicetvr[icetIn].ccCheck)
|
|
_mpicetvr[icetIn].ccCheck->cchBuff = 0;
|
|
else
|
|
dwFlags &= ~grfValidateCharMapping;
|
|
|
|
// It's also impossible without a valid code page.
|
|
//
|
|
if ((dwFlags & grfValidateCharMapping) && !IsValidCodePage(_mpicetvr[icetIn].ccCheck->nCp))
|
|
dwFlags &= ~grfValidateCharMapping;
|
|
|
|
_mpicetvr[icetIn].dwFlags = dwFlags;
|
|
|
|
if (icetIn == icetUtf8)
|
|
_nUtf8Tb = 0;
|
|
}
|
|
|
|
|
|
/* V A L I D A T E R E S E T A L L*/
|
|
/*----------------------------------------------------------------------------
|
|
%%Function: ValidateInitAll
|
|
%%Contact: jpick
|
|
|
|
Initialize the state machines for all character sets (set their
|
|
states to ST0 (the start state) and store their parsing options).
|
|
----------------------------------------------------------------------------*/
|
|
void ValidateInitAll(DWORD dwFlags)
|
|
{
|
|
int i;
|
|
for (i = 0 ; i < icetCount; i++)
|
|
{
|
|
if (!_mpicetvr[i].fInUse)
|
|
continue;
|
|
ValidateInit((ICET)i, dwFlags);
|
|
}
|
|
}
|
|
|
|
|
|
/* V A L I D A T E R E S E T */
|
|
/*----------------------------------------------------------------------------
|
|
%%Function: ValidateReset
|
|
%%Contact: jpick
|
|
|
|
Reset the state machine for the given character set (set its state
|
|
to ST0 (the start state)).
|
|
----------------------------------------------------------------------------*/
|
|
void ValidateReset(ICET icetIn)
|
|
{
|
|
// Initialize the character occurrence counter, if caller wants
|
|
// us to count common character sequences (auto-detect, only,
|
|
// for now). We're guaranteed to have the structures if the
|
|
// flag is set by ValidateInit(), above.
|
|
//
|
|
if (_mpicetvr[icetIn].dwFlags & grfCountCommonChars)
|
|
{
|
|
int i;
|
|
for (i = 0; i < _mpicetlpcoc[icetIn]->ccoce; i++)
|
|
_mpicetlpcoc[icetIn]->rgcoce[i].cHits = 0;
|
|
_mpicetlpcoc[icetIn]->fMatching = fFalse;
|
|
}
|
|
|
|
// If validation not supported for the encoding type, there's
|
|
// nothing else for us to do here.
|
|
//
|
|
if (!_mpicetvr[icetIn].fInUse)
|
|
return;
|
|
|
|
_mpicetvr[icetIn].nState = ST0;
|
|
|
|
if (_mpicetvr[icetIn].ccCheck)
|
|
_mpicetvr[icetIn].ccCheck->cchBuff = 0;
|
|
|
|
if (icetIn == icetUtf8)
|
|
_nUtf8Tb = 0;
|
|
}
|
|
|
|
|
|
/* V A L I D A T E R E S E T A L L */
|
|
/*----------------------------------------------------------------------------
|
|
%%Function: ValidateResetAll
|
|
%%Contact: jpick
|
|
|
|
Reset the state machines for all character sets (set their states to
|
|
ST0 (the start state)).
|
|
----------------------------------------------------------------------------*/
|
|
void ValidateResetAll(void)
|
|
{
|
|
int i;
|
|
|
|
for (i=0 ; i < icetCount; i++)
|
|
{
|
|
if (!_mpicetvr[i].fInUse)
|
|
continue;
|
|
ValidateReset((ICET)i);
|
|
}
|
|
}
|
|
|
|
|
|
/* N V A L I D A T E U C H */
|
|
/*----------------------------------------------------------------------------
|
|
%%Function: NValidateUch
|
|
%%Contact: jpick
|
|
|
|
Single step parser, takes one transition through the state table
|
|
for the given character set. Current state is kept for each
|
|
character set's parse stream.
|
|
|
|
Routine returns -1 if it does not reach a final state on this
|
|
transition; 0 if transitioned to ERR(or) and 1 if transtioned
|
|
to ACC(ept).
|
|
|
|
If final state is ACC(ept), machine reset to ST0 (start state).
|
|
(i.e., there's no need to manually reset on ACC(ept)).
|
|
|
|
Routine is also a convenient collection point for certain
|
|
statistics (currently only the counting of occurrences of common
|
|
character sequences (defined for character sets, above)).
|
|
----------------------------------------------------------------------------*/
|
|
int NValidateUch(ICET icetIn, UCHAR uch, BOOL fEoi)
|
|
{
|
|
int nToken;
|
|
int nPrevState;
|
|
int rc = -1;
|
|
|
|
// If not validating this icet, nothing to do (so say
|
|
// we accept the character).
|
|
//
|
|
if (!_mpicetvr[icetIn].fInUse)
|
|
return 1;
|
|
if (_mpicetvr[icetIn].nState == ERR)
|
|
return 0;
|
|
|
|
// Ignore all zeros in the detection file.
|
|
if (!uch && !fEoi)
|
|
{
|
|
goto _LRet;
|
|
}
|
|
|
|
// Hack -- want to validate UTF-8, but don't need a state
|
|
// table to do so. Treat as special case here and return.
|
|
//
|
|
if (icetIn == icetUtf8)
|
|
{
|
|
if ((rc = NUtf8(uch, fEoi)) == 0)
|
|
_mpicetvr[icetIn].nState = ERR;
|
|
return rc;
|
|
}
|
|
|
|
// Classify the character...
|
|
//
|
|
nPrevState = _mpicetvr[icetIn].nState;
|
|
nToken = fEoi ? ateof : _rgchCharClass[uch];
|
|
|
|
// First obtain a real number for a state based on the counting state...
|
|
// Then do the transition...
|
|
//
|
|
_mpicetvr[icetIn].nState = (_mpicetvr[icetIn].rgchNextState)[TstNotCountingFromTst(_mpicetvr[icetIn].nState)][nToken];
|
|
|
|
#if 0
|
|
if (_mpicetvr[icetIn].nState == ERR)
|
|
printf("Character 0x%.2x; Going from state %.2x to state %.2x\n", uch, nPrevState, _mpicetvr[icetIn].nState);
|
|
#endif
|
|
|
|
// If we're in an error state or have seen end-of-input, return.
|
|
//
|
|
if ((_mpicetvr[icetIn].nState == ERR) || (nToken == ateof))
|
|
goto _LRet;
|
|
|
|
// Are we to do character mapping validation? (If this flag
|
|
// is set, we're guaranteed to have a character checker
|
|
// structure). How about character occurrence counting?
|
|
// (This also guarantees us a character checker structure).
|
|
//
|
|
if (!(_mpicetvr[icetIn].dwFlags & grfValidateCharMapping) &&
|
|
!(_mpicetvr[icetIn].dwFlags & grfCountCommonChars))
|
|
{
|
|
goto _LRet;
|
|
}
|
|
|
|
// Buffer the current character (trusting that we'll never get
|
|
// more than the max amount -- present tables enforce this)
|
|
// (if it's Utf7 or Hz, buffer only if we are in the counting state
|
|
//
|
|
if (FTstCounting(_mpicetvr[icetIn].nState) || (icetIn != icetHz && icetIn != icetUtf7))
|
|
_mpicetvr[icetIn].ccCheck->rgchBuff[_mpicetvr[icetIn].ccCheck->cchBuff++] = uch;
|
|
|
|
// Return if we are not in the counting state
|
|
//
|
|
if (!(FTstCounting(_mpicetvr[icetIn].nState)))
|
|
goto _LRet;
|
|
|
|
// Call the character checker, if we have one.
|
|
//
|
|
if (_mpicetvr[icetIn].dwFlags & grfValidateCharMapping)
|
|
{
|
|
if (_mpicetvr[icetIn].ccCheck->pfnCheckChar && !(_mpicetvr[icetIn].ccCheck->pfnCheckChar)(icetIn))
|
|
{
|
|
_mpicetvr[icetIn].nState = ERR;
|
|
goto _LRet;
|
|
}
|
|
}
|
|
|
|
// If we're counting common characters, do so now.
|
|
//
|
|
if (_mpicetvr[icetIn].dwFlags & grfCountCommonChars)
|
|
_CountChars(icetIn);
|
|
|
|
// Reset the character checker/counter buffer.
|
|
//
|
|
_mpicetvr[icetIn].ccCheck->cchBuff = 0;
|
|
|
|
_LRet:
|
|
|
|
// Return the appropriate code.
|
|
//
|
|
switch (_mpicetvr[icetIn].nState)
|
|
{
|
|
case ERR:
|
|
return 0;
|
|
case ACC:
|
|
_mpicetvr[icetIn].nState = ST0; // Reset
|
|
return 1;
|
|
default:
|
|
return -1; // need more data
|
|
}
|
|
}
|
|
|
|
|
|
/* F V A L I D A T E C H A R C O U N T */
|
|
/*----------------------------------------------------------------------------
|
|
%%Function: FValidateCharCount
|
|
%%Contact: jpick
|
|
|
|
Return the number of matched special character sequences for the
|
|
given character set. If we're not keeping track of these sequences
|
|
for the character set, either because we don't have the necessary
|
|
static data or because the flag wasn't set by the calling routine,
|
|
return fFalse. Otherwise, return the count in *lpcMatch and return
|
|
fTrue;
|
|
|
|
(We track the counts separately for each sequence, just in case
|
|
we want to weight them differently in the future. Return the
|
|
total, here).
|
|
----------------------------------------------------------------------------*/
|
|
BOOL FValidateCharCount(ICET icetIn, int *lpcMatch)
|
|
{
|
|
int i;
|
|
COC *lpcoc = _mpicetlpcoc[icetIn];
|
|
VR *lpvr = &_mpicetvr[icetIn];
|
|
|
|
if (!lpcoc || !lpvr->fInUse || !(lpvr->dwFlags & grfCountCommonChars))
|
|
return fFalse;
|
|
|
|
for (i = 0, *lpcMatch = 0; i < lpcoc->ccoce; i++)
|
|
*lpcMatch += lpcoc->rgcoce[i].cHits;
|
|
|
|
return fTrue;
|
|
}
|
|
|
|
|
|
/* _ C O U N T C H A R S */
|
|
/*----------------------------------------------------------------------------
|
|
%%Function: _CountChars
|
|
%%Contact: jpick
|
|
|
|
We've just completed a legal character for the given character
|
|
set. Match it against the set of special character sequences for
|
|
the character set, if we have them. Update match counts and
|
|
current match indices (since sequences can span multiple legal
|
|
characters) as needed.
|
|
----------------------------------------------------------------------------*/
|
|
static void _CountChars(ICET icetIn)
|
|
{
|
|
WCHAR wch;
|
|
int i;
|
|
BOOL fFound;
|
|
|
|
// Anything to do?
|
|
//
|
|
if (!_mpicetlpcoc[icetIn] || !_mpicetvr[icetIn].ccCheck)
|
|
return;
|
|
|
|
// Build the WCHAR.
|
|
//
|
|
switch (_mpicetvr[icetIn].ccCheck->cchBuff)
|
|
{
|
|
case 1:
|
|
wch = WchFromUchUch(0, _mpicetvr[icetIn].ccCheck->rgchBuff[0]);
|
|
break;
|
|
case 2:
|
|
wch = WchFromUchUch(_mpicetvr[icetIn].ccCheck->rgchBuff[0],
|
|
_mpicetvr[icetIn].ccCheck->rgchBuff[1]);
|
|
break;
|
|
case 3:
|
|
wch = WchFromUchUch(_mpicetvr[icetIn].ccCheck->rgchBuff[1],
|
|
_mpicetvr[icetIn].ccCheck->rgchBuff[2]);
|
|
break;
|
|
case 4:
|
|
wch = WchFromUchUch(_mpicetvr[icetIn].ccCheck->rgchBuff[2],
|
|
_mpicetvr[icetIn].ccCheck->rgchBuff[3]);
|
|
break;
|
|
default:
|
|
return;
|
|
}
|
|
|
|
// Are we currently working on matching a sequence?
|
|
//
|
|
if ((_mpicetlpcoc[icetIn]->fMatching) &&
|
|
(wch == _mpicetlpcoc[icetIn]->rgcoce[_mpicetlpcoc[icetIn]->nCoceCurr].rgwch[_mpicetlpcoc[icetIn]->nCoceIndex]))
|
|
{
|
|
// Did we just match the entire sequence? If so, increment the
|
|
// hit count and reset.
|
|
//
|
|
if (++_mpicetlpcoc[icetIn]->nCoceIndex >= _mpicetlpcoc[icetIn]->rgcoce[_mpicetlpcoc[icetIn]->nCoceCurr].cwch)
|
|
{
|
|
++_mpicetlpcoc[icetIn]->rgcoce[_mpicetlpcoc[icetIn]->nCoceCurr].cHits;
|
|
_mpicetlpcoc[icetIn]->fMatching = fFalse;
|
|
}
|
|
|
|
// All done.
|
|
//
|
|
return;
|
|
}
|
|
|
|
// If we need to start matching again (either because we're not
|
|
// currently in a sequence or because a 2nd or later character
|
|
// didn't match), try the current character as a lead character.
|
|
//
|
|
// REVIEW: wrong for sequences longer than 2 wchars.
|
|
//
|
|
for (i = 0, fFound = fFalse; (!fFound && (i < _mpicetlpcoc[icetIn]->ccoce)); i++)
|
|
{
|
|
if (wch == _mpicetlpcoc[icetIn]->rgcoce[i].rgwch[0])
|
|
fFound = fTrue;
|
|
}
|
|
|
|
// Any luck?
|
|
//
|
|
if (!fFound)
|
|
{
|
|
_mpicetlpcoc[icetIn]->fMatching = fFalse;
|
|
return;
|
|
}
|
|
|
|
// Store the matching state.
|
|
//
|
|
_mpicetlpcoc[icetIn]->fMatching = fTrue;
|
|
_mpicetlpcoc[icetIn]->nCoceCurr = i - 1;
|
|
_mpicetlpcoc[icetIn]->nCoceIndex = 1; // where to look next
|
|
}
|
|
|
|
|
|
/* _ D B C S C H E C K C H A R */
|
|
/*----------------------------------------------------------------------------
|
|
%%Function: _DbcsCheckChar
|
|
%%Contact: jpick
|
|
|
|
Character validator for DBCS formats. Attempts to round-trip a
|
|
legal multi-byte sequence to ensure that its valid for the given
|
|
character set.
|
|
|
|
REVIEW: Slow, slow, slow -- do we really gain anything from the
|
|
round-trip check, or is conversion *to* Unicode a sufficient test?
|
|
----------------------------------------------------------------------------*/
|
|
static WCHAR _rgwBuff[10];
|
|
static UCHAR _rgchBuff[30];
|
|
|
|
static BOOL _FDbcsCheckChar(ICET icetIn)
|
|
{
|
|
int cCvt;
|
|
|
|
// skip 1 byte characters, mostly uninteresting (Shift-Jis ??).
|
|
//
|
|
if (_mpicetvr[icetIn].ccCheck->cchBuff == 1)
|
|
return fTrue;
|
|
|
|
if (!(cCvt = MultiByteToWideChar(_mpicetvr[icetIn].ccCheck->nCp,
|
|
MB_ERR_INVALID_CHARS,
|
|
_mpicetvr[icetIn].ccCheck->rgchBuff,
|
|
_mpicetvr[icetIn].ccCheck->cchBuff,
|
|
_rgwBuff, 10)))
|
|
{
|
|
if (GetLastError() == ERROR_NO_UNICODE_TRANSLATION)
|
|
return fFalse;
|
|
}
|
|
|
|
return fTrue; // probably not always right
|
|
}
|