Diff for /parser3/src/classes/form.C between versions 1.1 and 1.54

version 1.1, 2001/03/13 17:54:12 version 1.54, 2026/10/16 15:16:21
Line 1 Line 1
 /*  /** @file
         Parser          Parser: @b form parser class.
         Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com)  
         Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf)  
   
         $Id$          Copyright (c) 2001-2026 Art. Lebedev Studio (https://www.artlebedev.com)
           Authors: Konstantin Morshnev <moko@design.ru>, Alexandr Petrosian <paf@design.ru>
 */  */
   
   #include "classes.h"
   #include "pa_vmethod_frame.h"
   
 #include "pa_request.h"  #include "pa_request.h"
 #include "_form.h"  
 #include "pa_vform.h"  #include "pa_vform.h"
   
 // global var  volatile const char * IDENT_FORM_C="$Id$";
   
   // class
   
   class MForm : public Methoded {
   public: // Methoded
   
           bool used_directly() { return false; }
           void configure_admin(Request& r);
   
   public:
   
 VStateless_class *form_base_class;          MForm(): Methoded("form") {}
   
   };
   
   // global variable
   
   DECLARE_CLASS_VAR(form, new MForm);
   
 // methods  // methods
   
 static void _fields(Request& r, const String&, Array *params) {   // constructor & configurator
         Pool& pool=r.pool();  
         VForm *vform=static_cast<VForm *>(r.self);  
         r.write_no_lang(*new(pool) VHash(pool, &vform->fields()));   
 }  
   
 // initialize  void MForm::configure_admin(Request& r) {
   
 void initialize_form_base_class(Pool& pool, VStateless_class& vclass) {          if(r.request_info.can_have_body()){
         // ^form:fields[]                  if(r.request_info.content_length>pa_post_max_size)
         vclass.add_native_method("fields", _fields, 0, 0);                          throw Exception(PARSER_RUNTIME, 0, "posted content_length(%s) > $LIMITS.post_max_size(%s)", pa_uitoa(r.request_info.content_length), pa_uitoa(pa_post_max_size));
   
                   // read POST data
                   if(r.request_info.content_length) {
                           char *post_data=new(PointerFreeGC) char[r.request_info.content_length+1/*terminating zero*/];
                           size_t post_size=SAPI::read_post(r.sapi_info, post_data, r.request_info.content_length);
                           post_data[post_size]=0; // terminating zero
                           r.request_info.post_data=post_data;
                           r.request_info.post_size=post_size;
                   } else {
                           r.request_info.post_data=0;
                           r.request_info.post_size=0;
                   }
                   if(r.request_info.post_size!=r.request_info.content_length)
                           throw Exception(0, 0, "post_size(%s) != content_length(%s)", pa_uitoa(r.request_info.post_size), pa_uitoa(r.request_info.content_length));
           }
 }  }

Removed from v.1.1  
changed lines
  Added in v.1.54


E-mail: