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
|
/* $Id: charmap.c,v 1.9 2002/02/01 16:49:12 jan Exp $
Part of SWI-Prolog
Author: Jan Wielemaker
E-mail: jan@swi.psy.uva.nl
WWW: http://www.swi-prolog.org
Copyright (C): 1985-2002, University of Amsterdam
This library is free software; you can redistribute it and/or
modify it under the terms of the GNU Lesser General Public
License as published by the Free Software Foundation; either
version 2.1 of the License, or (at your option) any later version.
This library is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
Lesser General Public License for more details.
You should have received a copy of the GNU Lesser General Public
License along with this library; if not, write to the Free Software
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*/
#include <stdio.h>
#include <stdlib.h>
#include "dtd.h"
static void
char_range(dtd_charclass *map, int from, int to, int msk)
{ unsigned char *ca;
int i;
for(i=from, ca=map->class+i; i++<=to; )
*ca++ |= msk;
}
dtd_charclass *
new_charclass()
{ dtd_charclass *map = sgml_calloc(1, sizeof(*map));
unsigned char *ca = map->class;
char_range(map, 'a', 'z', CH_LCLETTER);
char_range(map, 'A', 'Z', CH_LCLETTER);
char_range(map, '0', '9', CH_DIGIT);
ca['.'] |= CH_CNM;
ca['-'] |= CH_CNM;
ca[183] |= CH_CNM; /* XML */
ca[':'] |= CH_CNMSTRT; /* HTML and XML */
ca['_'] |= CH_CNMSTRT; /* HTML and XML */
char_range(map, 192, 214, CH_CNMSTRT); /* XML ISO-LATIN-1 accented chars */
char_range(map, 216, 246, CH_CNMSTRT);
char_range(map, 248, 255, CH_CNMSTRT);
ca['\t'] |= CH_WHITE;
ca[' '] |= CH_WHITE;
ca['\r'] |= CH_RE;
ca['\n'] |= CH_RS;
return map;
}
dtd_charfunc *
new_charfunc()
{ dtd_charfunc *f = sgml_calloc(1, sizeof(*f));
ichar *cf = f->func;
cf[CF_STAGO] = '<';
cf[CF_STAGC] = '>';
cf[CF_ETAGO1] = '<';
cf[CF_ETAGO2] = '/';
cf[CF_VI] = '=';
cf[CF_NS] = ':';
cf[CF_LIT] = '"';
cf[CF_LITA] = '\'';
cf[CF_PERO] = '%';
cf[CF_ERO] = '&';
cf[CF_ERC] = ';';
cf[CF_MDO1] = '<';
cf[CF_MDO2] = '!';
cf[CF_MDC] = '>';
cf[CF_PRO1] = '<';
cf[CF_PRO2] = '?';
cf[CF_PRC] = '>';
cf[CF_GRPO] = '(';
cf[CF_GRPC] = ')';
cf[CF_SEQ] = ',';
cf[CF_AND] = '&';
cf[CF_OR] = '|';
cf[CF_OPT] = '?';
cf[CF_PLUS] = '+';
cf[CF_DSO] = '[';
cf[CF_DSC] = ']';
cf[CF_REP] = '*';
cf[CF_RS] = '\n';
cf[CF_RE] = '\r';
cf[CF_CMT] = '-';
return f;
}
dtd_charmap *
new_charmap()
{ dtd_charmap *map = sgml_malloc(sizeof(*map));
int i;
for(i=0 ; i<INPUT_CHARSET_SIZE; i++)
map->map[i] = i;
return map;
}
|
