include/qs_parse_string.h

   1 /*
   2  * Copyright (C) 2005-2008 Atsushi Konno All rights reserved.
   3  * Copyright (C) 2005 QSDN,Inc. All rights reserved.
   4  *
   5  * Licensed under the Apache License, Version 2.0 (the "License");
   6  * you may not use this file except in compliance with the License.
   7  * You may obtain a copy of the License at
   8  *
   9  *     http://www.apache.org/licenses/LICENSE-2.0
  10  *
  11  * Unless required by applicable law or agreed to in writing, software
  12  * distributed under the License is distributed on an "AS IS" BASIS,
  13  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  14  * See the License for the specific language governing permissions and
  15  * limitations under the License.
  16  */
  17 #ifndef __QS_PARSE_STRING_H__
  18 #define __QS_PARSE_STRING_H__
  19
  20 #include "chxj_apache.h"
  21 #include "chxj_buffered_write.h"
  22
  23 /*
  24 #define DEBUG
  25 #define USE_LOG
  26 */
  27
  28 /**
  29  * Max of memory allocation times.
  30  */
  31 #define QX_ALLOC_MAX   (100*1024)
  32
  33 /**
  34  * It is judged whether it is the first byte of Japanese Shift_JIS
  35  * "ZENKAKU KANJI".
  36  */
  37 #define is_sjis_kanji(c)  ((0x81 <= (unsigned char)(c&0xff) && \
  38                            (unsigned char)(c&0xff) <= 0x9f)  \
  39                           || (0xe0 <= (unsigned char)(c&0xff) && \
  40                            (unsigned char)(c&0xff) <= 0xfc))
  41 /**
  42  * It is judged whether it is a byte of Japanese Shift_JIS "HANKAKU KANA".
  43  */
  44 #define is_sjis_kana(c)   ((0xa1 <= (unsigned char)(c&0xff) && (unsigned char)(c&0xff) <= 0xdf))
  45
  46 /**
  47  * It is judged whether it is a Japanese code part of EUC.
  48  */
  49 #define is_euc_kanji(c)   (0xa1 <= (unsigned char)(c&0xff) && (unsigned char)(c&0xff) <= 0xfe)
  50
  51 /**
  52  * It is judged whether it is a Japanese code part of EUC "KANA".
  53  */
  54 #define is_euc_kana(c)    (0x8e == (unsigned char)(c&0xff))
  55
  56 /**
  57  * True is returned for whitespace.
  58  */
  59 #define is_white_space(c)     (' ' == (unsigned char)(c&0xff)  \
  60                            || '\t' == (unsigned char)(c&0xff) \
  61                            || '\n' == (unsigned char)(c&0xff) \
  62                            || '\r' == (unsigned char)(c&0xff))
  63
  64 /**
  65  * True is returned for the quotation mark.
  66  */
  67 #define is_quote(c)       ('\'' == (unsigned char)(c&0xff) \
  68                          ||'"'  == (unsigned char)(c&0xff))
  69
  70 /**
  71  * It is judged whether the tag of the object has the child element.
  72  * The "<option>" tag has the child. Please write </ option >.
  73  */
  74 #define has_child(c)       ((strcasecmp(c, "base"     ) != 0) \
  75                         &&  (strcasecmp(c, "meta"     ) != 0) \
  76                         &&  (strcasecmp(c, "br"       ) != 0) \
  77                         &&  (strcasecmp(c, "dt"       ) != 0) \
  78                         &&  (strcasecmp(c, "dd"       ) != 0) \
  79                         &&  (strcasecmp(c, "hr"       ) != 0) \
  80                         &&  (strcasecmp(c, "img"      ) != 0) \
  81                         &&  (strcasecmp(c, "input"    ) != 0) \
  82                         &&  (strcasecmp(c, "?xml"     ) != 0) \
  83                         &&  (strcasecmp(c, "!doctype" ) != 0) \
  84                         &&  (strcasecmp(c, "link"     ) != 0) \
  85                         &&  (strcasecmp(c, "!--"      ) != 0) \
  86                         &&  (strncasecmp(c, "![CDATA[",8) != 0))
  87
  88 /**
  89  * It is judged whether the tag of the object has the child element.
  90  * The "<option>" tag has the child. Please write </ option >.
  91  */
  92 #define has_child_hdml(c)  ((strcasecmp(c, "center"     ) != 0) \
  93                         &&  (strcasecmp(c, "br"         ) != 0) \
  94                         &&  (strcasecmp(c, "action"     ) != 0) \
  95                         &&  (strcasecmp(c, "!--"      ) != 0))
  96
  97 /**
  98  * The structure of the attribute is defined.
  99  */
 100 typedef struct Attr Attr;
 101
 102 struct Attr {
 103   struct Attr* next;
 104   struct Node* parent;
 105   char *name;
 106   char *value;
 107 };
 108
 109 /**
 110  * The structure of the element is defined.
 111  */
 112 typedef struct Node Node;
 113
 114 struct Node {
 115   struct Node   *next;
 116   struct Node   *parent;
 117   struct Node   *child;
 118   struct Node   *child_tail;
 119   struct Attr   *attr;
 120   struct Attr   *attr_tail;
 121   char          *name;
 122   char          *value;
 123   int            size;
 124   char          *otext;
 125   int            line;
 126 };
 127
 128 typedef struct pointer_table_t {
 129   unsigned int            address;
 130   unsigned long           size;
 131   struct pointer_table_t *next;
 132   struct pointer_table_t *prev;
 133 } Pointer_Table;
 134
 135
 136 typedef enum chxj_parse_mode_t {
 137   PARSE_MODE_CHTML=0,
 138   PARSE_MODE_NO_PARSE,
 139 } ParseMode_t;
 140
 141 typedef struct _doc {
 142   Node *now_parent_node;
 143   Node *root_node;
 144
 145   int           do_init_flag;
 146   unsigned long alloc_size;
 147
 148   Pointer_Table *pointer_table;
 149   Pointer_Table *free_list_head;
 150   Pointer_Table *free_list_tail;
 151   Pointer_Table *allocated_list_head;
 152   Pointer_Table *allocated_list_tail;
 153
 154   ParseMode_t    parse_mode;
 155
 156   apr_allocator_t *allocator;
 157   apr_pool_t      *pool;
 158
 159   buf_object buf;
 160
 161 #ifndef __NON_MOD_CHXJ__
 162   request_rec *r;
 163 #endif
 164 } Doc;
 165
 166 /*
 167  * Prototype Declare
 168  */
 169 extern Node *qs_init_root_node(
 170   Doc *doc);
 171
 172 extern void qs_add_child_node(
 173   Doc* doc,
 174   Node*);
 175
 176 extern void qs_free_node(
 177   Doc* doc,
 178   Node*);
 179
 180 extern Node* qs_get_root(
 181   Doc* doc) ;
 182
 183 extern Node* qs_parse_string(
 184   Doc*        doc,
 185   const char* ss,
 186   int         len);
 187
 188 extern char* qs_get_node_value(
 189   Doc*  doc,
 190   Node* node);
 191
 192 extern char* qs_get_node_name(
 193   Doc*  doc,
 194   Node* node);
 195
 196 extern int qs_get_node_size(Doc* doc, Node* node) ;
 197
 198 extern Node *qs_get_child_node(Doc *doc, Node *node) ;
 199 extern Node *qs_get_next_node(Doc *doc, Node *node) ;
 200
 201 Attr* qs_get_attr(Doc* doc, Node* node) ;
 202 Attr* qs_get_next_attr(Doc* doc, Attr* attr) ;
 203 char* qs_get_attr_name(Doc* doc, Attr* attr) ;
 204 char* qs_get_attr_value(Doc* doc, Attr* attr) ;
 205 #endif