Annotation of parser3/src/classes/form.C, revision 1.12
1.3 paf 1: /** @file
2: Parser: @b form parser class.
3:
1.1 paf 4: Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com)
1.3 paf 5:
1.1 paf 6: Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf)
7:
1.12 ! parser 8: $Id: form.C,v 1.11 2001/05/04 10:42:36 paf Exp $
1.1 paf 9: */
1.12 ! parser 10: static char *RCSId="$Id$";
1.1 paf 11:
1.10 paf 12: #include "classes.h"
1.1 paf 13: #include "pa_request.h"
14: #include "pa_vform.h"
15:
1.6 paf 16: /// $LIMITS.max_post_size default 10M
1.5 paf 17: const size_t MAX_POST_SIZE_DEFAULT=10*0x400*400;
18:
1.4 paf 19: // defines
1.1 paf 20:
1.4 paf 21: #define FORM_CLASS_NAME "form"
22:
1.8 paf 23: #define LIMITS_NAME "LIMITS"
24:
1.7 paf 25: #define MAX_POST_SIZE_NAME "post_max_size"
26:
1.4 paf 27: // class
28:
29: class MForm : public Methoded {
30: public:
31: MForm(Pool& pool);
1.11 paf 32: public: // Methoded
1.4 paf 33: bool used_directly() { return false; }
1.5 paf 34: void configure_admin(Request& r);
1.7 paf 35: private:
36: String max_post_size_name;
1.8 paf 37: String limits_name;
1.4 paf 38: };
1.1 paf 39:
40: // methods
41:
1.5 paf 42: // constructor & configurator
1.4 paf 43:
1.7 paf 44: MForm::MForm(Pool& apool) : Methoded(apool),
1.8 paf 45: max_post_size_name(apool, MAX_POST_SIZE_NAME),
46: limits_name(apool, LIMITS_NAME)
1.7 paf 47: {
1.4 paf 48: set_name(*NEW String(pool(), FORM_CLASS_NAME));
1.5 paf 49: }
50:
51: void MForm::configure_admin(Request& r) {
52: Pool& pool=r.pool();
53:
1.8 paf 54: Value *limits=r.main_class?r.main_class->get_element(limits_name):0;
1.6 paf 55: if(r.info.method && StrEqNc(r.info.method, "post", true)) {
56: // $limits.max_post_size default 10M
1.7 paf 57: Value *element=limits?limits->get_element(max_post_size_name):0;
1.5 paf 58: size_t value=element?(size_t)element->as_double():0;
1.6 paf 59: size_t max_post_size=value?value:MAX_POST_SIZE_DEFAULT;
1.5 paf 60:
1.6 paf 61: if(r.info.content_length>max_post_size)
1.5 paf 62: PTHROW(0, 0,
63: 0,
64: "posted content_length(%u) > max_post_size(%u)",
1.6 paf 65: r.post_size, max_post_size);
1.5 paf 66:
67: // read POST data
68: r.post_data=(char *)malloc(r.info.content_length);
69: r.post_size=SAPI::read_post(pool, r.post_data, r.info.content_length);
70: if(r.post_size!=r.info.content_length)
71: PTHROW(0, 0,
72: 0,
73: "post_size(%u)!=content_length(%u)",
74: r.post_size, r.info.content_length);
1.6 paf 75: }
1.4 paf 76: }
77:
78: // global variable
79:
80: Methoded *form_base_class;
81:
82: // creator
1.1 paf 83:
1.4 paf 84: Methoded *MForm_create(Pool& pool) {
85: return form_base_class=new(pool) MForm(pool);
1.1 paf 86: }
E-mail: