Annotation of parser3/src/types/pa_vform.C, revision 1.91
1.27 paf 1: /** @file
2: Parser: @b form class.
1.10 paf 3:
1.84 paf 4: Copyright(c) 2001-2005 ArtLebedev Group (http://www.artlebedev.com)
1.52 paf 5: Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
1.39 parser 6:
1.38 parser 7: based on The CGI_C library, by Thomas Boutell.
1.3 paf 8: */
1.59 paf 9:
1.91 ! misha 10: static const char * const IDENT_VFORM_C="$Date: 2008-06-06 12:58:17 $";
1.3 paf 11:
1.14 paf 12: #include "pa_sapi.h"
1.1 paf 13: #include "pa_vform.h"
14: #include "pa_vstring.h"
1.3 paf 15: #include "pa_globals.h"
16: #include "pa_request.h"
1.9 paf 17: #include "pa_vfile.h"
1.21 paf 18: #include "pa_common.h"
1.30 parser 19: #include "pa_vtable.h"
1.50 paf 20: #include "pa_charset.h"
1.86 misha 21: //#include "pa_charsets.h"
1.3 paf 22:
1.62 paf 23: // defines
24:
25: //#define DEBUG_POST
26:
1.3 paf 27: // parse helper funcs
28:
1.75 paf 29: static size_t getHeader(const char* data, size_t len){
1.25 paf 30: size_t i;
31: int enter=-1;
1.3 paf 32: if (data)
1.62 paf 33: for (i=0;i<len;i++)
34: if (data[i]=='\n'){
35: if (enter>=0) enter++;
36: if (enter>1) return i;
37: } else if (data[i]!='\r') enter=0;
38: return 0;
1.3 paf 39: }
40:
1.75 paf 41: static const char* searchAttribute(const char* data,
42: const char* attr, //< expected to be lowercased
1.62 paf 43: size_t len){
1.16 paf 44: size_t i;
1.3 paf 45: if (data)
1.62 paf 46: for (i=0;i<len;i++)
1.83 paf 47: if (tolower((unsigned char)data[i])==*attr){
1.62 paf 48: size_t j;
49: for (j=i+1;j<=len;j++)
50: if (!attr[j-i]) return &data[j];
51: else {
52: if (j==len) break;
1.83 paf 53: if (attr[j-i]!=tolower((unsigned char)data[j])) break;
1.62 paf 54: }
55: }
56:
57: return NULL;
1.3 paf 58: }
59:
60: // VForm
61:
1.75 paf 62: extern Methoded* form_base_class;
1.57 paf 63:
1.77 paf 64: VForm::VForm(Request_charsets& acharsets, Request_info& arequest_info): VStateless_class(0, form_base_class),
65: fcharsets(acharsets),
66: frequest_info(arequest_info),
67: filled_source(0),
1.91 ! misha 68: filled_client(0),
! 69: filled_post(0) {
1.3 paf 70: }
71:
1.75 paf 72: char *VForm::getAttributeValue(const char* data, char *attr, size_t len) {
73: const char* value=searchAttribute(data, attr, len);
1.3 paf 74: if (value){
1.18 paf 75: size_t i;
76: if (!(len-=value-data)) return NULL;
77: if (*value=='"') {
78: for (i=1;i<len;i++) if (value[i]=='"') break;
79: return strpart(&value[1], i-1);
80: } else {
81: for (i=0;i<len;i++) if (strchr(" ;\"\n\r", value[i])) break;
82: return strpart(value, i);
83: }
1.3 paf 84: }
85: return NULL;
86: }
87:
1.75 paf 88: String::C VForm::transcode(const char* client, size_t client_size) {
89: return Charset::transcode(
90: String::C(strdup(client, client_size), client_size),
1.91 ! misha 91: filled_post?*filled_post:fcharsets.client(),
1.77 paf 92: fcharsets.source());
1.49 paf 93: }
94:
1.75 paf 95: void VForm::ParseGetFormInput(const char* query_string, size_t length) {
1.42 parser 96: ParseFormInput(query_string, length);
1.3 paf 97: }
98:
1.69 paf 99:
1.75 paf 100: static int atoi(const char* data, size_t alength) {
1.69 paf 101: char buf[MAX_STRING];
1.82 paf 102: size_t length=min(alength, sizeof(buf)-1);
103: memcpy(buf, data, length); buf[length]=0;
1.69 paf 104: return atoi(buf);
105: }
1.75 paf 106: void VForm::ParseFormInput(const char* data, size_t length) {
1.68 paf 107: // cut out ?image_map_tail
108: {
1.67 paf 109: for(size_t pos=0; pos<length; pos++) {
110: if(data[pos]=='?') {
1.69 paf 111: size_t start=pos+1;
112: size_t aftercomma=start;
113: size_t lookingcomma=start;
114: for(; lookingcomma<length; lookingcomma++) {
115: if(data[lookingcomma]==',') {
116: aftercomma=++lookingcomma;
117: break;
118: }
119: }
120:
121: if(aftercomma>start) { // ?x,y
122: int x=atoi(data+start, aftercomma-1-start);
123: int y=atoi(data+aftercomma, length-aftercomma);
1.75 paf 124: imap.put(String("x"), new VInt(x));
125: imap.put(String("y"), new VInt(y));
1.69 paf 126: } else { // ?qtail
127: AppendFormEntry("qtail", data+start, length-start);
128: }
1.67 paf 129: // cut tail
130: length=pos;
131: break;
132: }
133: }
134: }
1.68 paf 135: // Scan for pairs, unescaping and storing them as they are found
136: for(size_t pos=0; pos<length; ) {
1.16 paf 137: size_t start=pos;
1.68 paf 138: size_t finish=length;
139: for(; pos<length; pos++) {
140: if(data[pos]=='&') {
141: finish=pos++;
1.3 paf 142: break;
143: }
144: }
1.68 paf 145:
146: size_t aftereq=start;
147: size_t lookingeq=start;
148: for(; lookingeq<finish; lookingeq++) {
149: if(data[lookingeq]=='=') {
150: aftereq=++lookingeq;
1.3 paf 151: break;
152: }
153: }
1.45 paf 154:
1.91 ! misha 155: const char* attr=aftereq>start?unescape_chars(data+start, aftereq-1-start, &fcharsets.client()):"nameless";
! 156: char *value=unescape_chars(data+aftereq, finish-aftereq, &fcharsets.client());
1.68 paf 157: AppendFormEntry(attr, value, strlen(value));
1.3 paf 158: }
159: }
160:
1.49 paf 161: void VForm::ParseMimeInput(
162: char *content_type,
1.75 paf 163: const char* data, size_t length) {
1.3 paf 164: /* Scan for mime-presented pairs, storing them as they are found. */
165: const char
1.62 paf 166: *boundary=pa_tolower(getAttributeValue(content_type, "boundary=", strlen(content_type))),
1.3 paf 167: *lastData=&data[length];
168: if(!boundary)
1.54 paf 169: throw Exception(0,
1.18 paf 170: 0,
1.3 paf 171: "VForm::ParseMimeInput no boundary attribute of Content-Type");
172:
173: while(true) {
1.66 paf 174: const char
1.18 paf 175: *dataStart=searchAttribute(data, boundary, lastData-data),
176: *dataEnd=searchAttribute(dataStart, boundary, lastData-dataStart);
177: size_t headerSize=getHeader(dataStart, lastData-dataStart);
1.3 paf 178:
179: if(!dataStart|!dataEnd|!headerSize) break;
1.47 paf 180: if(searchAttribute(dataStart, "content-disposition: form-data", headerSize)) {
1.16 paf 181: size_t valueSize=(dataEnd-dataStart)-headerSize-5-strlen(boundary);
1.18 paf 182: char *attr=getAttributeValue(dataStart, " name=", headerSize),
183: *fName=getAttributeValue(dataStart, " filename=", headerSize);
1.3 paf 184:
1.78 paf 185: if(attr) {
1.3 paf 186: /* OK, we have a new pair, add it to the list. */
1.80 paf 187: // fName checks are because MSIE passes unassigned <input type=file> as filename="" and empty body
1.85 misha 188: if( fName && (strlen(fName) || valueSize) ){
189: AppendFormFileEntry(attr,
1.80 paf 190: valueSize? &dataStart[headerSize+1]: "",
191: valueSize,
1.85 misha 192: fName);
193: } else {
194: AppendFormEntry(attr,
195: valueSize? &dataStart[headerSize+1]: "",
196: valueSize);
197: }
1.3 paf 198: }
199: }
200: data=(dataEnd-strlen(boundary));
201: }
202: }
203:
1.85 misha 204: void VForm::AppendFormFileEntry(const char* cname_cstr,
1.75 paf 205: const char* raw_cvalue_ptr, const size_t raw_cvalue_size,
1.85 misha 206: const char* file_name_cstr){
207:
1.87 misha 208: const char* fname = strdup(file_name_cstr);
209: const String& sfile_name=*new String(transcode(fname, strlen(fname)));
210:
1.75 paf 211: const String& sname=*new String(transcode(cname_cstr, strlen(cname_cstr)));
1.87 misha 212: // maybe transcode text/* files?
1.89 misha 213: // NO!!! some users want to upload file 'as is' or file encoding can be unknown
1.87 misha 214:
1.85 misha 215: VFile* vfile=new VFile;
216: vfile->set(true/*tainted*/, raw_cvalue_ptr, raw_cvalue_size, sfile_name.cstr());
217:
218: fields.put_dont_replace(sname, vfile);
219:
220: // files
221: Value* vhash=files.get(sname);
222: if(!vhash){
223: // first appearence
224: vhash=new VHash;
225: files.put(sname, vhash);
226: }
227: HashStringValue& hash=*vhash->get_hash();
1.75 paf 228:
1.85 misha 229: hash.put(String::Body::Format(hash.count()), vfile);
230: }
231:
232: void VForm::AppendFormEntry(const char* cname_cstr, const char* raw_cvalue_ptr, const size_t raw_cvalue_size) {
233: const String& sname=*new String(transcode(cname_cstr, strlen(cname_cstr)));
1.75 paf 234:
1.85 misha 235: const char* premature_zero_pos=(const char* )memchr(raw_cvalue_ptr, 0, raw_cvalue_size);
236: size_t cvalue_size=premature_zero_pos?premature_zero_pos-(const char* )raw_cvalue_ptr
237: :raw_cvalue_size;
238: char *cvalue_ptr=strdup(raw_cvalue_ptr, cvalue_size);
239: fix_line_breaks(cvalue_ptr, cvalue_size);
240: String& string=*new String(transcode(cvalue_ptr, cvalue_size), true);
241:
242: // tables
243: {
244: Value* vtable=tables.get(sname);
245: if(!vtable) {
246: // first appearence
247: Table::columns_type columns(new ArrayString(1));
248: *columns+=new String("field");
1.75 paf 249:
1.85 misha 250: vtable=new VTable(new Table(columns));
251: tables.put(sname, vtable);
1.36 parser 252: }
1.85 misha 253: Table& table=*vtable->get_table();
254:
255: // this string becomes next row
256: Table::element_type row(new ArrayString(1));
257: *row+=&string;
258: table+=row;
1.3 paf 259: }
1.69 paf 260:
1.85 misha 261: fields.put_dont_replace(sname, new VString(string));
1.69 paf 262: }
263:
1.85 misha 264:
265: void VForm::refill_fields_tables_and_files() {
1.77 paf 266: fields.clear();
267: tables.clear();
1.85 misha 268: files.clear();
1.77 paf 269: imap.clear();
1.75 paf 270:
1.77 paf 271: //frequest_info.query_string="a=123";
1.3 paf 272: // parsing QS [GET and ?name=value from uri rewrite)]
1.77 paf 273: if(frequest_info.query_string) {
274: size_t length=strlen(frequest_info.query_string);
275: char *buf=strdup(frequest_info.query_string, length);
1.42 parser 276: ParseGetFormInput(buf, length);
277: }
1.62 paf 278:
279: #ifdef DEBUG_POST
1.77 paf 280: frequest_info.method="POST";
1.62 paf 281: void *data;
1.80 paf 282: file_read(*new String("test.stdin"),
1.62 paf 283: data, request.post_size,
284: false/*as_text*/);
285: request.post_data=(char*)data;
1.77 paf 286: frequest_info.content_type="multipart/form-data; boundary=----------mcqY2UDNcdEAoN1mLmne2i";
1.62 paf 287:
288: #endif
1.57 paf 289:
290: // parsing POST data
1.77 paf 291: if(frequest_info.method) {
292: if(const char* content_type=frequest_info.content_type)
1.89 misha 293: if(StrStartFromNC(frequest_info.method, "post", true)) {
1.91 ! misha 294: if(StrStartFromNC(content_type, HTTP_CONTENT_TYPE_FORM_URLENCODED, false)){
! 295: Charset* remote_charset=detect_charset(content_type);
! 296: if(remote_charset)
! 297: filled_post=remote_charset;
1.77 paf 298: ParseFormInput(frequest_info.post_data, frequest_info.post_size);
1.91 ! misha 299: } else if(StrStartFromNC(content_type, HTTP_CONTENT_TYPE_MULTIPART, false))
1.75 paf 300: ParseMimeInput(strdup(content_type),
1.77 paf 301: frequest_info.post_data, frequest_info.post_size);
1.3 paf 302: }
1.57 paf 303: }
1.56 paf 304:
1.77 paf 305: filled_source=&fcharsets.source();
306: filled_client=&fcharsets.client();
307: }
308:
1.85 misha 309: bool VForm::should_refill_fields_tables_and_files() {
1.91 ! misha 310: return !(
! 311: &fcharsets.source()==filled_source
! 312: && (filled_post || &fcharsets.client()==filled_client)
! 313: );
1.1 paf 314: }
1.33 parser 315:
1.75 paf 316: Value* VForm::get_element(const String& aname, Value& aself, bool looking_up) {
1.85 misha 317: if(should_refill_fields_tables_and_files())
318: refill_fields_tables_and_files();
1.56 paf 319:
1.36 parser 320: // $fields
321: if(aname==FORM_FIELDS_ELEMENT_NAME)
1.75 paf 322: return new VHash(fields);
1.36 parser 323:
324: // $tables
325: if(aname==FORM_TABLES_ELEMENT_NAME)
1.75 paf 326: return new VHash(tables);
1.69 paf 327:
1.85 misha 328: // $files
329: if(aname==FORM_FILES_ELEMENT_NAME)
330: return new VHash(files);
331:
1.77 paf 332: // $imap
1.69 paf 333: if(aname==FORM_IMAP_ELEMENT_NAME)
1.75 paf 334: return new VHash(imap);
1.36 parser 335:
1.63 paf 336: // $method
1.75 paf 337: if(Value* result=VStateless_class::get_element(aname, aself, looking_up))
1.33 parser 338: return result;
339:
340: // $element
1.75 paf 341: return fields.get(aname);
1.72 paf 342: }
E-mail:
![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to pa_vform.C CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [parser3project] / parser3 / src / types