Annotation of parser3/src/classes/dom.C, revision 1.23

1.2       parser      1: /** @file
                      2:        Parser: @b dom parser class.
                      3: 
                      4:        Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com)
                      5: 
                      6:        Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf)
                      7: */
1.23    ! parser      8: static const char *RCSId="$Id: dom.C,v 1.22 2001/09/15 14:22:47 parser Exp $"; 
1.2       parser      9: 
                     10: #if _MSC_VER
                     11: #      pragma warning(disable:4291)   // disable warning 
                     12: //     "no matching operator delete found; memory will not be freed if initialization throws an exception
                     13: #endif
                     14: 
                     15: #include "classes.h"
                     16: #include "pa_request.h"
                     17: #include "pa_vdom.h"
1.9       parser     18: #include "pa_vfile.h"
1.20      parser     19: #include "pa_xslt_stylesheet_manager.h"
                     20: #include "pa_stylesheet_connection.h"
1.23    ! parser     21: #include "dnode.h"
1.2       parser     22: 
1.16      parser     23: #include <strstream>
1.2       parser     24: #include <Include/PlatformDefinitions.hpp>
                     25: #include <util/PlatformUtils.hpp>
                     26: #include <XalanTransformer/XalanTransformer.hpp>
1.4       parser     27: #include <XalanTransformer/XalanParsedSource.hpp>
                     28: #include <PlatformSupport/XalanFileOutputStream.hpp>
                     29: #include <PlatformSupport/XalanOutputStreamPrintWriter.hpp>
1.6       parser     30: #include <PlatformSupport/DOMStringPrintWriter.hpp>
1.4       parser     31: #include <XMLSupport/FormatterToXML.hpp>
1.13      parser     32: #include <XMLSupport/FormatterToHTML.hpp>
                     33: #include <XMLSupport/FormatterToText.hpp>
1.4       parser     34: #include <XMLSupport/FormatterTreeWalker.hpp>
1.6       parser     35: 
1.2       parser     36: // defines
                     37: 
1.4       parser     38: #define DOM_CLASS_NAME "dom"
1.2       parser     39: 
1.13      parser     40: #define DOM_OUTPUT_METHOD_OPTION_NAME "method"
                     41: #define DOM_OUTPUT_METHOD_OPTION_VALUE_XML "xml"
                     42: #define DOM_OUTPUT_METHOD_OPTION_VALUE_HTML "html"
                     43: #define DOM_OUTPUT_METHOD_OPTION_VALUE_TEXT "text"
                     44: 
                     45: #define DOM_OUTPUT_ENCODING_OPTION_NAME "encoding"
                     46: 
                     47: #define DOM_OUTPUT_DEFAULT_INDENT 4
                     48: 
1.2       parser     49: // class
                     50: 
1.23    ! parser     51: class MDom : public MDNode {
1.2       parser     52: public: // VStateless_class
1.11      parser     53:        Value *create_new_value(Pool& pool) { return new(pool) VDom(pool); }
1.2       parser     54: 
                     55: public:
                     56:        MDom(Pool& pool);
                     57: 
                     58: public: // Methoded
                     59:        bool used_directly() { return true; }
                     60: };
                     61: 
                     62: // methods
                     63: 
1.16      parser     64: static void _set(Request& r, const String& method_name, MethodParams *params) {
                     65:        Pool& pool=r.pool();
                     66:        VDom& vDom=*static_cast<VDom *>(r.self);
                     67: 
1.17      parser     68:        Value& vxml=params->as_junction(0, "xml must be code");
                     69:        Temp_lang temp_lang(r, String::UL_XML);
                     70:        const String& xml=r.process(vxml).as_string();
                     71: 
                     72:        std::istrstream stream(xml.cstr());
1.16      parser     73:        XalanParsedSource* parsedSource;
1.22      parser     74:        int error=vDom.transformer().parseSource(&stream, parsedSource);
1.16      parser     75: 
                     76:        if(error)
                     77:                PTHROW(0, 0,
                     78:                        &method_name,
1.22      parser     79:                        vDom.transformer().getLastError());
1.16      parser     80: 
                     81:        // replace any previous parsed source
                     82:        vDom.set_parsed_source(*parsedSource);
                     83: }
                     84: 
1.2       parser     85: static void _load(Request& r, const String& method_name, MethodParams *params) {
                     86:        Pool& pool=r.pool();
1.10      parser     87:        VDom& vDom=*static_cast<VDom *>(r.self);
1.2       parser     88: 
1.10      parser     89:        // filespec
1.20      parser     90:        const String& file_name=params->as_string(0, "file name must not be code");
                     91:        const char *filespec=r.absolute(file_name).cstr(String::UL_FILE_SPEC);
1.2       parser     92:        
                     93:        XalanParsedSource* parsedSource;
1.22      parser     94:        int error=vDom.transformer().parseSource(filespec, parsedSource);
1.2       parser     95: 
                     96:        if(error)
                     97:                PTHROW(0, 0,
1.20      parser     98:                        &file_name,
1.22      parser     99:                        vDom.transformer().getLastError());
1.2       parser    100: 
1.15      parser    101:        // replace any previous parsed source
1.11      parser    102:        vDom.set_parsed_source(*parsedSource);
1.2       parser    103: }
                    104: 
1.18      parser    105: class ParserStringXalanOutputStream: public XalanOutputStream {
1.6       parser    106: public:
                    107:        
1.18      parser    108:        explicit ParserStringXalanOutputStream(String& astring) : fstring(astring) {}
1.7       parser    109: 
                    110: protected: // XalanOutputStream
                    111: 
                    112:        virtual void writeData(const char *theBuffer, unsigned long theBufferLength) {
1.6       parser    113:                char *copy=(char *)fstring.malloc((size_t)theBufferLength);
                    114:                memcpy(copy, theBuffer, (size_t)theBufferLength);
                    115:                fstring.APPEND_CLEAN(copy, (size_t)theBufferLength, "dom", -1);
                    116:        }
                    117: 
1.7       parser    118:        virtual void doFlush() {}
1.6       parser    119: 
                    120: private:
                    121: 
                    122:        String& fstring;
                    123:        
                    124: };
                    125: 
                    126: 
1.21      parser    127: static void create_optioned_listener(
                    128:                                                                         const char *& content_type, const char *& charset, FormatterListener *& listener, 
                    129:                                                                         Pool& pool, 
                    130:                                                                         const String& method_name, MethodParams *params, int index, Writer& writer) {
1.19      parser    131:        charset=0;
1.13      parser    132:        const String *method=0;
                    133:        XalanDOMString xalan_encoding;
                    134: 
                    135:        Value& voptions=params->as_no_junction(index, "options must not be code");
                    136:        if(voptions.is_defined()) {
                    137:                if(Hash *options=voptions.get_hash()) {
                    138:                        // $.method[xml|html|text]
1.15      parser    139:                        if(Value *vmethod=static_cast<Value *>(options->get(*new(pool) 
                    140:                                String(pool, DOM_OUTPUT_METHOD_OPTION_NAME))))
                    141:                                method=&vmethod->as_string();
1.13      parser    142: 
                    143:                        // $.encoding[windows-1251|...]
                    144:                        if(Value *vencoding=static_cast<Value *>(options->get(*new(pool) 
                    145:                                String(pool, DOM_OUTPUT_ENCODING_OPTION_NAME)))) {
1.19      parser    146:                                charset=vencoding->as_string().cstr();
                    147:                                xalan_encoding.append(charset, strlen(charset));
1.13      parser    148:                        }
                    149:                } else
                    150:                        PTHROW(0, 0,
                    151:                                &method_name,
1.16      parser    152:                                "options must be hash");
1.13      parser    153:        }
                    154: 
1.18      parser    155:        if(!method/*default='xml'*/ || *method == DOM_OUTPUT_METHOD_OPTION_VALUE_XML) {
                    156:                content_type="text/xml";
                    157:                listener=new FormatterToXML(writer,
1.13      parser    158:                        XalanDOMString(),  // version
                    159:                        true, // doIndent
                    160:                        DOM_OUTPUT_DEFAULT_INDENT, // indent 
                    161:                        xalan_encoding  // encoding
                    162:                );
1.18      parser    163:        } else if(*method == DOM_OUTPUT_METHOD_OPTION_VALUE_HTML) {
                    164:                content_type="text/html";
                    165:                listener=new FormatterToHTML(writer,
1.13      parser    166:                        xalan_encoding,  // encoding
                    167:                        XalanDOMString(),  // mediaType 
                    168:                        XalanDOMString(),  // doctypeSystem; String to be printed at the top of the document 
                    169:                        XalanDOMString(),  // doctypePublic  
                    170:                        true, // doIndent 
                    171:                        DOM_OUTPUT_DEFAULT_INDENT // indent 
                    172:                );
1.18      parser    173:        } else if(*method == DOM_OUTPUT_METHOD_OPTION_VALUE_TEXT) {
                    174:                content_type="text/plain";
                    175:                listener=new FormatterToText(writer,
1.13      parser    176:                        xalan_encoding  // encoding
                    177:                );
1.18      parser    178:        } else
1.13      parser    179:                PTHROW(0, 0,
                    180:                        method,
1.14      parser    181:                        DOM_OUTPUT_METHOD_OPTION_NAME " option is invalid; valid methods are: "
                    182:                                "'" DOM_OUTPUT_METHOD_OPTION_VALUE_XML "', "
                    183:                                "'" DOM_OUTPUT_METHOD_OPTION_VALUE_HTML "', "
1.13      parser    184:                                "'" DOM_OUTPUT_METHOD_OPTION_VALUE_TEXT "'");                   
                    185: 
                    186:        // never reached
                    187: }
                    188: 
1.3       parser    189: static void _save(Request& r, const String& method_name, MethodParams *params) {
                    190:        Pool& pool=r.pool();
1.10      parser    191:        VDom& vDom=*static_cast<VDom *>(r.self);
1.3       parser    192: 
                    193:        // filespec
1.20      parser    194:        const String& file_name=params->as_string(1, "file name must not be code");
                    195:        const char *filespec=r.absolute(file_name).cstr(String::UL_FILE_SPEC);
1.3       parser    196:        
1.11      parser    197:        // document
                    198:        XalanDocument& document=vDom.get_document(pool, &method_name);
1.3       parser    199: 
1.5       parser    200:        try {
1.6       parser    201:                XalanFileOutputStream stream(XalanDOMString(filespec, strlen(filespec)));
                    202:                XalanOutputStreamPrintWriter writer(stream);
1.19      parser    203:                const char *content_type, *charset;
1.18      parser    204:                FormatterListener *formatterListener;
1.19      parser    205:                create_optioned_listener(content_type, charset, formatterListener, 
1.18      parser    206:                        pool, method_name, params, 0, writer);
                    207:                FormatterTreeWalker treeWalker(*formatterListener);
1.11      parser    208:                treeWalker.traverse(&document); // Walk the document and produce the XML...
1.6       parser    209:        } catch(const XSLException& e) {
                    210:                _throw(pool, &method_name, e);
                    211:        }
                    212: }
                    213: 
                    214: static void _string(Request& r, const String& method_name, MethodParams *params) {
                    215:        Pool& pool=r.pool();
1.10      parser    216:        VDom& vDom=*static_cast<VDom *>(r.self);
1.6       parser    217: 
1.11      parser    218:        // document
                    219:        XalanDocument& document=vDom.get_document(pool, &method_name);
1.6       parser    220: 
                    221:        try {
1.9       parser    222:                String parserString=*new(pool) String(pool);
1.18      parser    223:                ParserStringXalanOutputStream stream(parserString);
1.6       parser    224:                XalanOutputStreamPrintWriter writer(stream);
1.19      parser    225:                const char *content_type, *charset;
1.18      parser    226:                FormatterListener *formatterListener;
1.19      parser    227:                create_optioned_listener(content_type, charset, formatterListener, 
1.18      parser    228:                        pool, method_name, params, 0, writer);
                    229:                FormatterTreeWalker treeWalker(*formatterListener);
1.11      parser    230:                treeWalker.traverse(&document); // Walk the document and produce the XML...
1.6       parser    231: 
                    232:                // write out result
1.9       parser    233:                r.write_no_lang(parserString);
1.5       parser    234:        } catch(const XSLException& e) {
                    235:                _throw(pool, &method_name, e);
                    236:        }
1.3       parser    237: }
                    238: 
1.9       parser    239: 
                    240: static void _file(Request& r, const String& method_name, MethodParams *params) {
                    241:        Pool& pool=r.pool();
1.10      parser    242:        VDom& vDom=*static_cast<VDom *>(r.self);
1.9       parser    243: 
1.11      parser    244:        // document
                    245:        XalanDocument& document=vDom.get_document(pool, &method_name);
1.9       parser    246: 
                    247:        try {
                    248:                String& parserString=*new(pool) String(pool);
1.18      parser    249:                ParserStringXalanOutputStream stream(parserString);
1.9       parser    250:                XalanOutputStreamPrintWriter writer(stream);
1.19      parser    251:                const char *content_type, *charset;
1.18      parser    252:                FormatterListener *formatterListener;
1.19      parser    253:                create_optioned_listener(content_type, charset, formatterListener, 
1.18      parser    254:                        pool, method_name, params, 0, writer);
                    255:                FormatterTreeWalker treeWalker(*formatterListener);
1.11      parser    256:                treeWalker.traverse(&document); // Walk the document and produce the XML...
1.9       parser    257: 
                    258:                // write out result
                    259:                VFile& vfile=*new(pool) VFile(pool);
                    260:                const char *cstr=parserString.cstr();
1.19      parser    261:                String *scontent_type=new(pool) String(pool, content_type);
                    262:                Value *vcontent_type;
                    263:                if(charset) {
                    264:                        VHash *vhcontent_type=new(pool) VHash(pool);
                    265:                        vhcontent_type->hash().put(*value_name, new(pool) VString(*scontent_type));
                    266:                        String *scharset=new(pool) String(pool, charset);
                    267:                        vhcontent_type->hash().put(*new(pool) String(pool, "charset"), new(pool) VString(*scharset));
                    268:                        vcontent_type=vhcontent_type;
                    269:                } else
                    270:                        vcontent_type=new(pool) VString(*scontent_type);
1.20      parser    271:                vfile.set(false/*tainted*/, cstr, strlen(cstr), 0/*file_name*/, vcontent_type);
1.9       parser    272:                r.write_no_lang(vfile);
                    273:        } catch(const XSLException& e) {
                    274:                _throw(pool, &method_name, e);
                    275:        }
                    276: }
                    277: 
                    278: 
1.12      parser    279: static void add_xslt_param(const Hash::Key& aattribute, Hash::Val *ameaning, 
1.20      parser    280:                                                   void *info) {
1.12      parser    281:        XalanTransformer& transformer=*static_cast<XalanTransformer *>(info);
                    282:        const char *attribute_cstr=aattribute.cstr();
                    283:        const char *meaning_cstr=static_cast<Value *>(ameaning)->as_string().cstr();
                    284: 
                    285:        transformer.setStylesheetParam(
1.23    ! parser    286:                XalanDOMString(attribute_cstr),  
        !           287:                XalanDOMString(meaning_cstr));
1.12      parser    288: }
1.10      parser    289: static void _xslt(Request& r, const String& method_name, MethodParams *params) {
                    290:        Pool& pool=r.pool();
                    291:        VDom& vDom=*static_cast<VDom *>(r.self);
                    292: 
1.12      parser    293:        // params
                    294:        if(params->size()>1) {
1.18      parser    295:                Value& vparams=params->as_no_junction(1, "transform parameters parameter must not be code");
1.12      parser    296:                if(vparams.is_defined())
                    297:                        if(Hash *params=vparams.get_hash())
1.22      parser    298:                                params->for_each(add_xslt_param, &vDom.transformer());
1.12      parser    299:                        else
                    300:                                PTHROW(0, 0,
                    301:                                        &method_name,
1.18      parser    302:                                        "transform parameters parameter must be hash");
1.12      parser    303:        }
                    304: 
1.10      parser    305:        // source
1.11      parser    306:        XalanParsedSource &parsed_source=vDom.get_parsed_source(pool, &method_name);
1.10      parser    307: 
                    308:        // stylesheet
1.20      parser    309:        const String& stylesheet_file_name=params->as_string(0, "file name must not be code");
                    310:        const String& stylesheet_filespec=r.absolute(stylesheet_file_name);
                    311:        //_asm int 3;
                    312:        Stylesheet_connection& connection=XSLT_stylesheet_manager->get_connection(stylesheet_filespec);
1.10      parser    313: 
                    314:        // target
1.22      parser    315:        XalanDocument* target=vDom.parser_liaison().createDocument();
1.10      parser    316:        XSLTResultTarget domResultTarget(target);
                    317: 
                    318:        // transform
1.22      parser    319:        int error=vDom.transformer().transform(
1.20      parser    320:                parsed_source, 
                    321:                &connection.stylesheet(), 
                    322:                domResultTarget);
                    323:        connection.close();
1.10      parser    324:        if(error)
                    325:                PTHROW(0, 0,
1.20      parser    326:                        &stylesheet_file_name,
1.22      parser    327:                        vDom.transformer().getLastError());
1.10      parser    328: 
                    329:        // write out result
1.11      parser    330:        VDom& result=*new(pool) VDom(pool);
                    331:        result.set_document(*target);
                    332:        r.write_no_lang(result);
1.10      parser    333: }
                    334: 
1.2       parser    335: // constructor
                    336: 
1.23    ! parser    337: MDom::MDom(Pool& apool) : MDNode(apool) {
1.4       parser    338:        set_name(*NEW String(pool(), DOM_CLASS_NAME));
1.16      parser    339: 
                    340:        // ^dom::set[<some>xml</some>]
                    341:        add_native_method("set", Method::CT_DYNAMIC, _set, 1, 1);
1.2       parser    342: 
1.3       parser    343:        // ^dom::load[some.xml]
1.2       parser    344:        add_native_method("load", Method::CT_DYNAMIC, _load, 1, 1);
1.3       parser    345: 
1.13      parser    346:        // ^dom.save[options hash;some.xml]
1.8       parser    347:        add_native_method("save", Method::CT_DYNAMIC, _save, 2, 2);
1.2       parser    348: 
1.13      parser    349:        // ^dom.string[options hash] <doc/>
1.7       parser    350:        add_native_method("string", Method::CT_DYNAMIC, _string, 1, 1);
1.9       parser    351: 
1.13      parser    352:        // ^dom.file[options hash] file with "<doc/>"
1.9       parser    353:        add_native_method("file", Method::CT_DYNAMIC, _file, 1, 1);
1.10      parser    354: 
1.20      parser    355:        // ^dom.xslt[stylesheet file_name]
                    356:        // ^dom.xslt[stylesheet file_name;params hash]
1.12      parser    357:        add_native_method("xslt", Method::CT_DYNAMIC, _xslt, 1, 2);
1.6       parser    358: 
1.2       parser    359: }
                    360: // global variable
                    361: 
                    362: Methoded *Dom_class;
                    363: 
                    364: // creator
                    365: 
                    366: Methoded *MDom_create(Pool& pool) {
                    367:        // Use the static initializers to initialize the Xalan-C++ and Xerces-C++ platforms. 
                    368:        // You must initialize Xerces-C++ once per process
                    369:        XMLPlatformUtils::Initialize();
                    370:        XalanTransformer::initialize();
                    371: 
                    372:        return Dom_class=new(pool) MDom(pool);
                    373: }

E-mail: