Return to pa_vresponse.C CVS log

Up to [parser3project] / parser3 / src / types

Annotation of parser3/src/types/pa_vresponse.C, revision 1.46

1.1       paf         1: /** @file
                      2:        Parser: @b response class.
                      3: 
1.44      moko        4:        Copyright (c) 2001-2026 Art. Lebedev Studio (https://www.artlebedev.com)
1.41      moko        5:        Authors: Konstantin Morshnev <moko@design.ru>, Alexandr Petrosian <paf@design.ru>
1.6       paf         6: */
1.1       paf         7: 
                      8: #include "pa_vresponse.h"
1.18      paf         9: #include "pa_request_charsets.h"
1.1       paf        10: #include "pa_charsets.h"
                     11: #include "pa_charset.h"
                     12: #include "pa_vstring.h"
1.11      paf        13: #include "pa_vdate.h"
1.26      paf        14: #include "pa_vhash.h"
                     15: 
1.46    ! moko       16: volatile const char * IDENT_PA_VRESPONSE_C="$Id: pa_vresponse.C,v 1.45 2026/10/13 14:07:26 moko Exp $" IDENT_PA_VRESPONSE_H;
1.30      moko       17: 
1.26      paf        18: // defines
                     19: 
                     20: #define REQUEST_HEADERS_ELEMENT_NAME "headers"
1.46    ! moko       21: #define UNTAINT_ELEMENT_NAME "untaint"
1.1       paf        22: 
1.29      misha      23: Value* VResponse::get_element(const String& aname) {
1.1       paf        24:        // $charset
1.8       paf        25:        if(aname==CHARSET_NAME)
1.43      moko       26:                return new VString(fcharsets.client().NAME());
1.8       paf        27: 
1.28      misha      28:        // $headers
                     29:        if(aname==REQUEST_HEADERS_ELEMENT_NAME)
                     30:                return new VHash(ffields);
1.46    ! moko       31: 
        !            32:        // $untaint
        !            33:        if(aname==UNTAINT_ELEMENT_NAME)
        !            34:                return new VString(*new String(String::lang2name(lang)));
        !            35: 
1.45      moko       36:        MAYBE_GET_SPECIAL_OR_METHOD(VStateless_class::get_element(aname));
1.26      paf        37: 
1.8       paf        38:        // $field
1.33      moko       39:        return ffields.get(aname.change_case(fcharsets.source(), String::CC_UPPER));
1.1       paf        40: }
                     41: 
1.31      moko       42: const VJunction* VResponse::put_element(const String& aname, Value* avalue) { 
1.1       paf        43:        // guard charset change
1.8       paf        44:        if(aname==CHARSET_NAME)
1.37      moko       45:                fcharsets.set_client(pa_charsets.get(avalue->as_string()));
1.46    ! moko       46:        else if(aname==UNTAINT_ELEMENT_NAME)
        !            47:                lang=String::name2lang(avalue->as_string());
1.2       paf        48:        else
1.36      moko       49:                ffields.put(aname.change_case(fcharsets.source(), String::CC_UPPER), !avalue || (avalue->is_string() && !avalue->is_defined()) ? 0: avalue);
1.8       paf        50: 
1.39      moko       51:        return 0;
1.11      paf        52: }