OSDN Git Service

* change writting.
[modchxj/mod_chxj.git] / src / qs_parse_attr.c
1 /*
2  * Copyright (C) 2005 QSDN,Inc. All rights reserved.
3  * Copyright (C) 2005 Atsushi Konno 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 #include <stdio.h>
18 #include "qs_parse_string.h"
19 #include "qs_parse_attr.h"
20 #include "qs_log.h"
21 #include "qs_ignore_sp.h"
22
23
24 Attr*
25 qs_parse_attr(Doc* doc, const char*s, int len, int *pos) 
26 {
27   int   ii;
28   int   start_pos;
29   int   size;
30   int   novalue;
31   char* name;
32   char* value;
33   Attr* attr;
34   int   use_quote = 0;
35   int   backslash = 0;
36
37   QX_LOGGER_DEBUG("start qs_parse_attr()");
38
39   /* ignore space */
40   ii = start_pos = qs_ignore_sp_and_quote(doc, s, len);
41   QX_LOGGER_DEBUG_INT("len",len);
42
43   /* get attr name */
44   for (;ii<len; ii++) {
45     if (is_white_space(s[ii])) 
46       break;
47
48     if (s[ii] == '=')
49       break;
50   }
51
52   size = ii - start_pos;
53   QX_LOGGER_DEBUG_INT("size", size);
54   /* not found */
55   if (size == 0) {
56     *pos = ii;
57     return NULL;
58   }
59   name = (char*)apr_palloc(doc->pool,size+1);
60   memset(name, 0, size+1);
61   memcpy(name, &s[start_pos], size);
62   QX_LOGGER_DEBUG((char*)name);
63
64   novalue = 0;
65   /* find '=' */
66   for (;ii<len; ii++) {
67     if (is_white_space(s[ii])) 
68       /* ignore */
69       continue;
70     if (s[ii] == '=') 
71       ii++;
72     else 
73       /* novalue */
74       novalue = 1;
75     break;
76   }
77
78   if (ii == len) 
79     novalue = 1;
80
81   size = 0;
82   if (!novalue) {
83     /* 
84      * ignore space
85      */
86     ii += qs_ignore_sp(doc, &s[ii], len-ii);
87
88     backslash = 0;
89     for (;ii<len; ii++) {
90       if (s[ii] == '\\') {
91         backslash = 1;
92         break;
93       }
94       if (s[ii] == '\'' || s[ii] == '"') {
95         use_quote = 1;
96         ii++;
97         break;
98       }
99       if (!is_white_space(s[ii])) {
100         break;
101       }
102     }
103   
104     start_pos = ii;
105     if (backslash && ii + 2 < len)
106       ii+=2;
107     
108     backslash = 0;
109     /* 
110      * get attr value 
111      */
112     for (;ii<len; ii++) {
113       if (is_sjis_kanji(s[ii])) {
114         ii++;
115         continue;
116       }
117       if (is_sjis_kana(s[ii])) 
118         continue;
119       if (is_white_space(s[ii])) {
120         if (! use_quote) 
121           break;
122       }
123       if (s[ii] == '\\') 
124         continue;
125
126       if (s[ii] == '"') 
127         break;
128
129       if (s[ii] == '\'') 
130         break;
131     }
132     size = ii - start_pos;
133     QX_LOGGER_DEBUG_INT("size",size);
134   }
135
136   value = (char*)apr_palloc(doc->pool, size+1);
137   memset(value, 0, size+1);
138   if (size != 0) 
139     memcpy(value, &s[start_pos], size);
140
141   attr = qs_new_attr(doc);
142
143   attr->name  = name;
144   attr->value = value;
145
146   QX_LOGGER_DEBUG(attr->name);
147   QX_LOGGER_DEBUG(attr->value);
148
149   QX_LOGGER_DEBUG("end qs_parse_attr()");
150   *pos = ii;
151   return attr;
152 }
153
154 Attr*
155 qs_new_attr(Doc* doc) 
156 {
157   Attr* attr = (Attr*)apr_palloc(doc->pool,sizeof(Attr));
158   if (attr == NULL) {
159     QX_LOGGER_FATAL("Out Of Memory");
160   }
161   attr->next   = NULL;
162   attr->parent = NULL;
163   attr->name   = NULL;
164   attr->value  = NULL;
165   return attr;
166 }
167 /*
168  * vim:ts=2 et
169  */