Annotation of parser3/src/types/pa_vform.C, revision 1.33.2.2
1.27 paf 1: /** @file
2: Parser: @b form class.
1.10 paf 3:
1.3 paf 4: Copyright(c) 2001 ArtLebedev Group(http://www.artlebedev.com)
1.10 paf 5:
1.3 paf 6: Author: Alexander Petrosyan <paf@design.ru>(http://design.ru/paf)
1.1 paf 7:
1.33.2.2! parser 8: $Id: pa_vform.C,v 1.33.2.1 2001/09/07 14:36:13 parser Exp $
1.1 paf 9:
1.15 paf 10:
11: based on The CGI_C library, by Thomas Boutell.
1.3 paf 12: */
13:
1.14 paf 14: #include "pa_sapi.h"
1.1 paf 15: #include "pa_vform.h"
16: #include "pa_vstring.h"
1.3 paf 17: #include "pa_globals.h"
18: #include "pa_request.h"
1.9 paf 19: #include "pa_vfile.h"
1.21 paf 20: #include "pa_common.h"
1.30 parser 21: #include "pa_vtable.h"
1.3 paf 22:
23: // parse helper funcs
24:
1.18 paf 25: static size_t getHeader(const char *data, size_t len){
1.25 paf 26: size_t i;
27: int enter=-1;
1.3 paf 28: if (data)
29: for (i=0;i<len;i++)
30: if (data[i]=='\n'){
31: if (enter>=0) enter++;
32: if (enter>1) return i;
33: } else if (data[i]!='\r') enter=0;
34: return 0;
35: }
36:
1.18 paf 37: static const char *searchAttribute(const char *data, const char *attr, size_t len){
1.16 paf 38: size_t i;
1.3 paf 39: if (data)
40: for (i=0;i<len;i++)
41: if (tolower(data[i])==*attr){
1.16 paf 42: size_t j;
1.3 paf 43: for (j=i+1;j<=len;j++)
44: if (!attr[j-i]) return &data[j];
45: else {
46: if (j==len) break;
47: if (attr[j-i]!=tolower(data[j])) break;
48: }
49: }
50: return NULL;
51: }
52:
53: // VForm
54:
1.16 paf 55: char *VForm::strpart(const char *str, size_t len) {
1.7 paf 56: char *result=(char *)malloc(len+1);
1.3 paf 57: if (!result) return NULL;
1.18 paf 58: memcpy(result, str, len);
1.3 paf 59: result[len]=0;
60: return result;
61: }
62:
1.18 paf 63: char *VForm::getAttributeValue(const char *data, char *attr, size_t len) {
64: const char *value=searchAttribute(data, attr, len);
1.3 paf 65: if (value){
1.18 paf 66: size_t i;
67: if (!(len-=value-data)) return NULL;
68: if (*value=='"') {
69: for (i=1;i<len;i++) if (value[i]=='"') break;
70: return strpart(&value[1], i-1);
71: } else {
72: for (i=0;i<len;i++) if (strchr(" ;\"\n\r", value[i])) break;
73: return strpart(value, i);
74: }
1.3 paf 75: }
76: return NULL;
77: }
78:
79: void VForm::ParseGetFormInput(const char *query_string) {
80: ParseFormInput(query_string, strlen(query_string));
81: }
82:
1.16 paf 83: void VForm::ParseFormInput(const char *data, size_t length) {
1.8 paf 84: /* Scan for pairs, unescaping and storing them as they are found. */
1.16 paf 85: size_t pos=0;
1.3 paf 86: while(pos !=length) {
1.16 paf 87: size_t foundEq=0;
88: size_t foundAmp=0;
89: size_t start=pos;
90: size_t len=0;
1.3 paf 91: while(pos !=length) {
92: if(data[pos]=='=') {
93: foundEq=1;
94: pos++;
95: break;
96: }
97: pos++;
98: len++;
99: }
100: if(!foundEq)
101: break;
1.6 paf 102: const char *attr=unescape_chars(pool(), data+start, len);
1.3 paf 103: start=pos;
104: len=0;
105: while(pos !=length) {
106: if(data[pos]=='&') {
107: foundAmp=1;
108: pos++;
109: break;
110: }
111: pos++;
112: len++;
113: }
114: /* The last pair probably won't be followed by a &, but
115: that's fine, so check for that after accepting it */
1.6 paf 116: const char *value=unescape_chars(pool(), data+start, len);
1.3 paf 117: /* OK, we have a new pair, add it to the list. */
118: AppendFormEntry(attr, value);
119: if(!foundAmp)
120: break;
121: }
122: }
123:
124: void VForm::ParseMimeInput(const char *content_type,
1.16 paf 125: const char *data, size_t length) {
1.3 paf 126: /* Scan for mime-presented pairs, storing them as they are found. */
127: const char
1.18 paf 128: *boundary=getAttributeValue(content_type, "boundary=", strlen(content_type)),
1.3 paf 129: *lastData=&data[length];
130: if(!boundary)
1.18 paf 131: THROW(0, 0,
132: 0,
1.3 paf 133: "VForm::ParseMimeInput no boundary attribute of Content-Type");
134:
135: while(true) {
136: const char
1.18 paf 137: *dataStart=searchAttribute(data, boundary, lastData-data),
138: *dataEnd=searchAttribute(dataStart, boundary, lastData-dataStart);
139: size_t headerSize=getHeader(dataStart, lastData-dataStart);
1.3 paf 140:
141: if(!dataStart|!dataEnd|!headerSize) break;
1.18 paf 142: if(searchAttribute(dataStart, "content-disposition: form-data", headerSize)){
1.16 paf 143: size_t valueSize=(dataEnd-dataStart)-headerSize-5-strlen(boundary);
1.18 paf 144: char *attr=getAttributeValue(dataStart, " name=", headerSize),
145: *fName=getAttributeValue(dataStart, " filename=", headerSize);
1.3 paf 146:
147: if(attr && valueSize){
148: /* OK, we have a new pair, add it to the list. */
149: AppendFormEntry(attr, &dataStart[headerSize+1], valueSize, fName);
150: }
151: }
152: data=(dataEnd-strlen(boundary));
153: }
154: }
155:
1.7 paf 156: void VForm::AppendFormEntry(const char *aname,
1.18 paf 157: const char *value_ptr, size_t value_size,
1.3 paf 158: const char *file_name) {
1.7 paf 159: String& sname=*NEW String(pool(), aname);
1.3 paf 160:
161: Value *value;
1.17 paf 162: if(file_name) {
163: VFile *vfile=NEW VFile(pool());
1.22 paf 164: vfile->set(true/*tainted*/, value_ptr, value_size, file_name);
1.17 paf 165: value=vfile;
166: } else {
1.3 paf 167: String& string=*NEW String(pool());
168: string.APPEND_TAINTED(value_ptr, value_size, "form", 0);
1.33.2.2! parser 169:
! 170: // tables
! 171: {
! 172: Value *valready=(Value *)tables.get(sname);
! 173: bool existed=valready!=0;
! 174: Table *table;
! 175: if(existed) {
! 176: // second+ appearence
! 177: table=valready->get_table();
! 178: } else {
! 179: // first appearence
1.30 parser 180: Array& columns=*NEW Array(pool(), 1);
181: columns+=NEW String(pool(), "element");
182: table=NEW Table(pool(), 0, &columns);
183: }
184: // this string becomes next row
185: Array& row=*NEW Array(pool(), 1);
186: row+=&string;
187: *table+=&row;
1.33.2.2! parser 188: // not existed before? add it
! 189: if(!existed)
! 190: tables.put(sname, NEW VTable(pool(), table));
! 191: }
! 192: value=NEW VString(string);
1.3 paf 193: }
194:
1.32 parser 195: fields.put_dont_replace(sname, value);
1.3 paf 196: }
1.1 paf 197:
1.26 paf 198: /// @todo parse input letter if some switch is on
1.33.2.2! parser 199: void VForm::fill_fields_and_tables(Request& request) {
1.3 paf 200: // parsing QS [GET and ?name=value from uri rewrite)]
201: if(request.info.query_string)
202: ParseGetFormInput(request.info.query_string);
203: // parsing POSTed data
1.4 paf 204: if(request.info.method) {
1.3 paf 205: if(const char *content_type=request.info.content_type)
1.18 paf 206: if(StrEqNc(request.info.method, "post", true)) {
207: if(StrEqNc(content_type, "application/x-www-form-urlencoded", true))
1.21 paf 208: ParseFormInput(request.post_data, request.post_size);
1.18 paf 209: else if(StrEqNc(content_type, "multipart/form-data", 0))
1.21 paf 210: ParseMimeInput(content_type, request.post_data, request.post_size);
1.3 paf 211: }
212: } else
1.21 paf 213: ; // letter?
1.1 paf 214: }
1.33 parser 215:
216: Value *VForm::get_element(const String& aname) {
1.33.2.1 parser 217: // $fields
218: if(aname==FORM_FIELDS_ELEMENT_NAME)
1.33.2.2! parser 219: return NEW VHash(pool(), Hash(fields));
! 220:
! 221: // $tables
! 222: if(aname==FORM_TABLES_ELEMENT_NAME)
! 223: return NEW VHash(pool(), Hash(tables));
1.33 parser 224:
225: // $CLASS,$method
226: if(Value *result=VStateless_class::get_element(aname))
227: return result;
228:
229: // $element
230: return static_cast<Value *>(fields.get(aname));
231: }
232:
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