Annotation of parser3/src/classes/xdoc.C, revision 1.61

1.1       parser      1: /** @file
1.2       parser      2:        Parser: @b xdoc parser class.
1.1       parser      3: 
                      4:        Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com)
1.43      paf         5:        Author: Alexander Petrosyan <paf@design.ru> (http://paf.design.ru)
1.1       parser      6: 
1.61    ! paf         7:        $Id: xdoc.C,v 1.60 2002/01/14 18:26:56 paf Exp $
1.1       parser      8: */
1.30      parser      9: #include "pa_types.h"
1.1       parser     10: #ifdef XML
                     11: 
1.59      paf        12: #include "pa_stylesheet_connection.h"
                     13: #include "classes.h"
1.1       parser     14: #include "pa_request.h"
                     15: #include "pa_vxdoc.h"
1.53      paf        16: #include "pa_charset.h"
1.1       parser     17: #include "pa_vfile.h"
                     18: #include "xnode.h"
                     19: 
1.59      paf        20: extern "C" {
                     21: #include "gdomecore/gdome-xml-node.h"
                     22: #include "gdomecore/gdome-xml-document.h"
                     23: };
                     24: #include "libxslt/transform.h"
1.61    ! paf        25: #include "libxslt/xsltutils.h"
1.59      paf        26: 
1.1       parser     27: // defines
                     28: 
                     29: #define XDOC_CLASS_NAME "xdoc"
                     30: 
                     31: #define XDOC_OUTPUT_METHOD_OPTION_NAME "method"
                     32: #define XDOC_OUTPUT_METHOD_OPTION_VALUE_XML "xml"
                     33: #define XDOC_OUTPUT_METHOD_OPTION_VALUE_HTML "html"
                     34: #define XDOC_OUTPUT_METHOD_OPTION_VALUE_TEXT "text"
                     35: #define XDOC_OUTPUT_DEFAULT_INDENT 4
                     36: 
                     37: // class
                     38: 
                     39: class MXdoc : public MXnode {
                     40: public: // VStateless_class
1.54      paf        41:        Value *create_new_value(Pool& pool) { return new(pool) VXdoc(pool, 0); }
1.1       parser     42: 
                     43: public:
                     44:        MXdoc(Pool& pool);
                     45: 
                     46: public: // Methoded
                     47:        bool used_directly() { return true; }
1.5       parser     48:        void configure_admin(Request& r);
1.1       parser     49: };
                     50: 
1.61    ! paf        51: // helper classes
        !            52: 
        !            53: class xmlOutputBuffer_auto_ptr {
        !            54: public:
        !            55:        explicit xmlOutputBuffer_auto_ptr(xmlOutputBuffer *_P = 0) 
        !            56:                : _Owns(_P != 0), _Ptr(_P) {}
        !            57:        xmlOutputBuffer_auto_ptr(const xmlOutputBuffer_auto_ptr& _Y) 
        !            58:                : _Owns(_Y._Owns), _Ptr(_Y.release()) {}
        !            59:        xmlOutputBuffer_auto_ptr& operator=(const xmlOutputBuffer_auto_ptr& _Y) 
        !            60:                {if (this != &_Y)
        !            61:                        {if (_Ptr != _Y.get())
        !            62:                                {if (_Owns && _Ptr)
        !            63:                                        xmlOutputBufferClose(_Ptr);
        !            64:                                _Owns = _Y._Owns; }
        !            65:                        else if (_Y._Owns)
        !            66:                                _Owns = true;
        !            67:                        _Ptr = _Y.release(); }
        !            68:                return (*this); }
        !            69:        ~xmlOutputBuffer_auto_ptr()
        !            70:                {if (_Owns && _Ptr)
        !            71:                        xmlOutputBufferClose(_Ptr); }
        !            72:        xmlOutputBuffer& operator*() const 
        !            73:                {return (*get()); }
        !            74:        xmlOutputBuffer *operator->() const 
        !            75:                {return (get()); }
        !            76:        xmlOutputBuffer *get() const 
        !            77:                {return (_Ptr); }
        !            78:        xmlOutputBuffer *release() const 
        !            79:                {((xmlOutputBuffer_auto_ptr *)this)->_Owns = false;
        !            80:                return (_Ptr); }
        !            81: private:
        !            82:        bool _Owns;
        !            83:        xmlOutputBuffer *_Ptr;
        !            84: };
        !            85: 
        !            86: 
        !            87: 
1.1       parser     88: // methods
                     89: 
1.54      paf        90: static void writeNode(Request& r,  const String& method_name, GdomeNode *node, 
                     91:                                          GdomeException exc) {
                     92:        if(!node || exc)
                     93:                throw Exception(0, 0, 
                     94:                        &method_name, 
                     95:                        exc);
                     96: 
                     97:        Pool& pool=r.pool();
                     98: 
                     99:        // write out result
                    100:        VXnode& result=*new(pool) VXnode(pool, node);
                    101:        r.write_no_lang(result);
                    102: }
                    103: 
1.16      parser    104: // Element createElement(in DOMString tagName) raises(DOMException);
                    105: static void _createElement(Request& r, const String& method_name, MethodParams *params) {
                    106:        Pool& pool=r.pool();
                    107:        VXdoc& vdoc=*static_cast<VXdoc *>(r.self);
                    108: 
1.39      paf       109:        const String& tagName=params->as_string(0, "tagName must be string");
1.16      parser    110: 
1.54      paf       111:        GdomeException exc;
                    112:        GdomeNode *node=
                    113:                (GdomeNode *)gdome_doc_createElement(vdoc.get_document(&method_name), 
1.57      paf       114:                pool.transcode(tagName).get(),
1.54      paf       115:                &exc);
                    116:        writeNode(r, method_name, node, exc);
1.16      parser    117: }
                    118: 
                    119: // DocumentFragment createDocumentFragment()
1.26      parser    120: static void _createDocumentFragment(Request& r, const String& method_name, MethodParams *) {
1.16      parser    121:        Pool& pool=r.pool();
                    122:        VXdoc& vdoc=*static_cast<VXdoc *>(r.self);
                    123: 
1.54      paf       124:        GdomeException exc;
                    125:        GdomeNode *node=
                    126:                (GdomeNode *)gdome_doc_createDocumentFragment(
                    127:                vdoc.get_document(&method_name),
                    128:                &exc);
                    129:        writeNode(r, method_name, node, exc);
1.16      parser    130: }
                    131: 
                    132: // Text createTextNode(in DOMString data);
                    133: static void _createTextNode(Request& r, const String& method_name, MethodParams *params) {
                    134:        Pool& pool=r.pool();
                    135:        VXdoc& vdoc=*static_cast<VXdoc *>(r.self);
                    136: 
1.40      paf       137:        const String& data=params->as_string(0, "data must be string");
1.16      parser    138: 
1.54      paf       139:        GdomeException exc;
                    140:        GdomeNode *node=(GdomeNode *)gdome_doc_createTextNode(
                    141:                vdoc.get_document(&method_name),
1.57      paf       142:                pool.transcode(data).get(),
1.54      paf       143:                &exc);
                    144:        writeNode(r, method_name, node, exc);
1.16      parser    145: }
                    146: 
                    147: // Comment createComment(in DOMString data)
                    148: static void _createComment(Request& r, const String& method_name, MethodParams *params) {
                    149:        Pool& pool=r.pool();
                    150:        VXdoc& vdoc=*static_cast<VXdoc *>(r.self);
                    151: 
1.26      parser    152:        const String& data=params->as_string(0, "data must be string");
1.16      parser    153: 
1.54      paf       154:        GdomeException exc;
                    155:        GdomeNode *node=(GdomeNode *)gdome_doc_createComment(
                    156:                vdoc.get_document(&method_name),
1.57      paf       157:                pool.transcode(data).get(),
1.54      paf       158:                &exc);
                    159:        writeNode(r, method_name, node, exc);
1.16      parser    160: }
                    161: 
                    162: // CDATASection createCDATASection(in DOMString data) raises(DOMException);
                    163: static void _createCDATASection(Request& r, const String& method_name, MethodParams *params) {
                    164:        Pool& pool=r.pool();
                    165:        VXdoc& vdoc=*static_cast<VXdoc *>(r.self);
                    166: 
1.26      parser    167:        const String& data=params->as_string(0, "data must be string");
1.16      parser    168: 
1.54      paf       169:        GdomeException exc;
                    170:        GdomeNode *node=(GdomeNode *)gdome_doc_createCDATASection(
                    171:                vdoc.get_document(&method_name),
1.57      paf       172:                pool.transcode(data).get(),
1.54      paf       173:                &exc);
                    174:        writeNode(r, method_name, node, exc);
1.16      parser    175: }
                    176: 
                    177: // ProcessingInstruction createProcessingInstruction(in DOMString target,in DOMString data) raises(DOMException);
                    178: static void _createProcessingInstruction(Request& r, const String& method_name, MethodParams *params) {
                    179:        Pool& pool=r.pool();
                    180:        VXdoc& vdoc=*static_cast<VXdoc *>(r.self);
                    181: 
1.26      parser    182:        const String& target=params->as_string(0, "data must be string");
                    183:        const String& data=params->as_string(1, "data must be string");
1.16      parser    184: 
1.54      paf       185:        GdomeException exc;
                    186:        GdomeNode *node=(GdomeNode *)gdome_doc_createProcessingInstruction(
                    187:                vdoc.get_document(&method_name),
1.57      paf       188:                pool.transcode(target).get(), 
                    189:                pool.transcode(data).get(),
1.54      paf       190:                &exc);
                    191:        writeNode(r, method_name, node, exc);
1.16      parser    192: }
                    193: 
                    194: // Attr createAttribute(in DOMString name) raises(DOMException);
                    195: static void _createAttribute(Request& r, const String& method_name, MethodParams *params) {
                    196:        Pool& pool=r.pool();
                    197:        VXdoc& vdoc=*static_cast<VXdoc *>(r.self);
                    198: 
1.26      parser    199:        const String& name=params->as_string(0, "name must be string");
1.16      parser    200: 
1.54      paf       201:        GdomeException exc;
                    202:        GdomeNode *node=(GdomeNode *)gdome_doc_createAttribute(
                    203:                vdoc.get_document(&method_name),
1.57      paf       204:                pool.transcode(name).get(),
1.54      paf       205:                &exc);
                    206:        writeNode(r, method_name, node, exc);
1.16      parser    207: }
                    208: // EntityReference createEntityReference(in DOMString name) raises(DOMException);
                    209: static void _createEntityReference(Request& r, const String& method_name, MethodParams *params) {
                    210:        Pool& pool=r.pool();
                    211:        VXdoc& vdoc=*static_cast<VXdoc *>(r.self);
                    212: 
1.26      parser    213:        const String& name=params->as_string(0, "name must be string");
1.16      parser    214: 
1.54      paf       215:        GdomeException exc;
                    216:        GdomeNode *node=(GdomeNode *)gdome_doc_createEntityReference(
                    217:                vdoc.get_document(&method_name),
1.57      paf       218:                pool.transcode(name).get(),
1.54      paf       219:                &exc);
                    220:        writeNode(r, method_name, node, exc);
1.16      parser    221: }
                    222: 
                    223: static void _getElementsByTagName(Request& r, const String& method_name, MethodParams *params) {
                    224:        Pool& pool=r.pool();
                    225:        VXdoc& vdoc=*static_cast<VXdoc *>(r.self);
                    226: 
1.54      paf       227:        const String& name=params->as_string(0, "name must be string");
1.16      parser    228: 
1.54      paf       229:        GdomeException exc;
1.16      parser    230:        VHash& result=*new(pool) VHash(pool);
1.54      paf       231:        if(GdomeNodeList *nodes=
                    232:                gdome_doc_getElementsByTagName(
                    233:                        vdoc.get_document(&method_name), 
1.57      paf       234:                        pool.transcode(name).get(),
1.54      paf       235:                        &exc)) {
                    236:                gulong length=gdome_nl_length(nodes, &exc);
                    237:                for(gulong i=0; i<length; i++) {
1.16      parser    238:                        String& skey=*new(pool) String(pool);
                    239:                        {
                    240:                                char *buf=(char *)pool.malloc(MAX_NUMBER);
                    241:                                snprintf(buf, MAX_NUMBER, "%d", i);
                    242:                                skey << buf;
                    243:                        }
                    244: 
1.54      paf       245:                        result.hash(0).put(skey, new(pool) VXnode(pool, gdome_nl_item(nodes, i, &exc)));
1.16      parser    246:                }
                    247:        }
                    248: 
                    249:        // write out result
                    250:        r.write_no_lang(result);
                    251: }
                    252: 
                    253: static void _getElementsByTagNameNS(Request& r, const String& method_name, MethodParams *params) {
                    254:        Pool& pool=r.pool();
                    255:        VXdoc& vdoc=*static_cast<VXdoc *>(r.self);
                    256: 
                    257:        // namespaceURI;localName
1.54      paf       258:        const String& namespaceURI=params->as_string(0, "namespaceURI must be string");
                    259:        const String& localName=params->as_string(0, "localName must be string");
1.16      parser    260: 
1.54      paf       261:        GdomeException exc;
1.16      parser    262:        VHash& result=*new(pool) VHash(pool);
1.54      paf       263:        if(GdomeNodeList *nodes=
                    264:                gdome_doc_getElementsByTagNameNS(
                    265:                        vdoc.get_document(&method_name), 
1.57      paf       266:                        pool.transcode(namespaceURI).get(),
                    267:                        pool.transcode(localName).get(),
1.54      paf       268:                        &exc)) {
                    269:                gulong length=gdome_nl_length(nodes, &exc);
                    270:                for(gulong i=0; i<length; i++) {
1.16      parser    271:                        String& skey=*new(pool) String(pool);
                    272:                        {
                    273:                                char *buf=(char *)pool.malloc(MAX_NUMBER);
                    274:                                snprintf(buf, MAX_NUMBER, "%d", i);
                    275:                                skey << buf;
                    276:                        }
                    277: 
1.54      paf       278:                        result.hash(0).put(skey, new(pool) VXnode(pool, gdome_nl_item(nodes, i, &exc)));
1.16      parser    279:                }
                    280:        }
                    281: 
1.54      paf       282: 
1.16      parser    283:        // write out result
                    284:        r.write_no_lang(result);
                    285: }
                    286: 
1.54      paf       287: static void _getElementById(Request& r, const String& method_name, MethodParams *params) {
                    288:        Pool& pool=r.pool();
                    289:        VXdoc& vdoc=*static_cast<VXdoc *>(r.self);
1.16      parser    290: 
1.54      paf       291:        // elementId
                    292:        const String& elementId=params->as_string(0, "elementID must be string");
1.1       parser    293: 
1.54      paf       294:        GdomeException exc;
                    295:        if(GdomeNode *node=(GdomeNode *)gdome_doc_getElementById(
                    296:                vdoc.get_document(&method_name),
1.57      paf       297:                pool.transcode(elementId).get(),
1.54      paf       298:                &exc)) {
                    299:                // write out result
                    300:                VXnode& result=*new(pool) VXnode(pool, node);
                    301:                r.write_no_lang(result);
                    302:        } else if(exc)
                    303:                throw Exception(0, 0, 
                    304:                        &method_name, 
                    305:                        exc);
                    306: }
                    307: /*
                    308: GdomeNode *gdome_doc_importNode (GdomeDocument *self, GdomeNode *importedNode, GdomeBoolean deep, GdomeException *exc);
                    309: GdomeElement *gdome_doc_createElementNS (GdomeDocument *self, GdomeDOMString *namespaceURI, GdomeDOMString *qualifiedName, GdomeException *exc);
                    310: GdomeAttr *gdome_doc_createAttributeNS (GdomeDocument *self, GdomeDOMString *namespaceURI, GdomeDOMString *qualifiedName, GdomeException *exc);
                    311: */
1.1       parser    312: 
                    313: 
1.54      paf       314: static void _create(Request& r, const String& method_name, MethodParams *params) {
                    315:        //_asm int 3;
                    316:        Pool& pool=r.pool();
                    317:        VXdoc& vdoc=*static_cast<VXdoc *>(r.self);
1.1       parser    318: 
1.54      paf       319:        const String& qualifiedName=params->as_string(0, "qualifiedName must be string");
1.1       parser    320: 
1.54      paf       321:        GdomeException exc;
                    322:        /*
                    323:        GdomeDocumentType *documentType=gdome_di_createDocumentType (
                    324:                docimpl, 
                    325:                pool.transcode(qualifiedName), 
                    326:                0/*publicId* /, 
                    327:                0/*systemId* /, 
                    328:                &exc);
                    329:        if(!documentType || exc)
                    330:                throw Exception(0, 0, 
                    331:                        &method_name, 
                    332:                        exc);
                    333:        */
                    334:        GdomeDocument *document=gdome_di_createDocument (domimpl, 
                    335:                0/*namespaceURI*/, 
1.57      paf       336:                pool.transcode(qualifiedName).get(), 
1.54      paf       337:                0/*doctype*/, 
                    338:                &exc);
                    339:        if(!document || exc)
                    340:                throw Exception(0, 0, 
                    341:                        &method_name, 
                    342:                        exc);
1.1       parser    343: 
1.57      paf       344:        /// +xalan createXMLDecl ?
1.9       parser    345: 
1.54      paf       346:        // replace any previous parsed source
                    347:        vdoc.set_document(document);
                    348: }
1.9       parser    349: 
1.56      paf       350: /// @test xmlSAXParseMemory(NULL<<error handler subst, buffer, size, 0)
1.54      paf       351: static void _set(Request& r, const String& method_name, MethodParams *params) {
                    352: //     _asm int 3;
                    353:        Pool& pool=r.pool();
                    354:        VXdoc& vdoc=*static_cast<VXdoc *>(r.self);
1.9       parser    355: 
1.54      paf       356:        Value& vxml=params->as_junction(0, "xml must be code");
                    357:        Temp_lang temp_lang(r, String::UL_XML);
                    358:        const String& xml=r.process(vxml).as_string();
1.9       parser    359: 
1.54      paf       360:        GdomeException exc;
                    361:        GdomeDocument *document=gdome_di_createDocFromMemory(domimpl,
                    362:                xml.cstr(String::UL_UNSPECIFIED, r.connection),
1.55      paf       363:                GDOME_LOAD_PARSING
1.61    ! paf       364:                /* GDOME_LOAD_VALIDATING  pending until kill warning of no-dtd*/ 
1.54      paf       365:                /*|GDOME_LOAD_SUBSTITUTE_ENTITIES */,
                    366:                &exc);
                    367:        if(!document || exc)
                    368:                throw Exception(0, 0, 
                    369:                        &method_name, 
                    370:                        exc);
1.9       parser    371: 
1.54      paf       372:        // replace any previous parsed source
                    373:        vdoc.set_document(document);
1.9       parser    374: }
                    375: 
1.54      paf       376: static void _load(Request& r, const String& method_name, MethodParams *params) {
                    377:        Pool& pool=r.pool();
                    378:        VXdoc& vdoc=*static_cast<VXdoc *>(r.self);
1.9       parser    379: 
1.54      paf       380:        // filespec
                    381:        const String& file_name=params->as_string(0, "uri must be string");
                    382:        const String& uri=r.absolute(file_name);
                    383:        
                    384:        GdomeException exc;
                    385:        GdomeDocument *document=gdome_di_createDocFromURI(domimpl,
                    386:                uri.cstr(),
1.55      paf       387:                GDOME_LOAD_PARSING
1.61    ! paf       388:                /* GDOME_LOAD_VALIDATING  pending until kill warning of no-dtd*/ 
1.54      paf       389:                /*|GDOME_LOAD_SUBSTITUTE_ENTITIES */,
                    390:                &exc);
                    391:        if(!document || exc)
                    392:                throw Exception(0, 0, 
                    393:                        &method_name, 
                    394:                        exc);
1.9       parser    395: 
1.54      paf       396:        // replace any previous parsed source
                    397:        vdoc.set_document(document);
1.9       parser    398: }
                    399: 
1.46      paf       400: static void param_option_over_output_option(Pool& pool, 
                    401:                                                                                        Hash *param_options, const char *option_name,
1.61    ! paf       402:                                                                                        const String *& output_option) {
        !           403:        if(Value *value=static_cast<Value *>(param_options->get(*new(pool) String(pool, 
        !           404:                option_name))))
        !           405:                output_option=&value->as_string();
1.46      paf       406: }
                    407: static void param_option_over_output_option(Pool& pool, 
                    408:                                                                                        Hash *param_options, const char *option_name,
                    409:                                                                                        bool& output_option) {
                    410:        if(Value *value=static_cast<Value *>(param_options->get(*new(pool) 
                    411:                String(pool, option_name)))) {
                    412:                const String& s=value->as_string();
                    413:                if(s=="yes")
                    414:                        output_option=true;
                    415:                else if(s=="no")
                    416:                        output_option=false;
                    417:                else
                    418:                        throw Exception(0, 0,
                    419:                                &s,
                    420:                                "%s must be either 'yes' or 'no'", option_name);
                    421:        }
                    422: }
                    423: 
1.61    ! paf       424: static void prepare_output_options(
        !           425:                                                                   Pool& pool, const String& method_name, MethodParams *params, int index,
        !           426:                                                                   VXdoc::Output_options& oo) {
1.46      paf       427: /*
                    428: <xsl:output
                    429:   !method = "xml" | "html" | "text" | qname-but-not-ncname 
                    430:   !version = nmtoken 
                    431:   !encoding = string 
                    432:   !omit-xml-declaration = "yes" | "no"
                    433:   !standalone = "yes" | "no"
                    434:   !doctype-public = string 
                    435:   !doctype-system = string 
                    436:   cdata-section-elements = qnames 
                    437:   !indent = "yes" | "no"
                    438:   !media-type = string /> 
1.61    ! paf       439: */
1.1       parser    440: 
1.46      paf       441:        // configuring with options from parameter...
1.1       parser    442:        if(params->size()>index) {
1.20      parser    443:                Value& voptions=params->as_no_junction(index, "options must be string");
1.1       parser    444:                if(voptions.is_defined()) {
1.34      parser    445:                        if(Hash *options=voptions.get_hash(&method_name)) {
1.1       parser    446:                                // $.method[xml|html|text]
                    447:                                if(Value *vmethod=static_cast<Value *>(options->get(*new(pool) 
                    448:                                        String(pool, XDOC_OUTPUT_METHOD_OPTION_NAME))))
1.61    ! paf       449:                                        oo.method=&vmethod->as_string();
1.1       parser    450: 
1.46      paf       451:                                // $.version[1.0]
                    452:                                param_option_over_output_option(pool, options, "version", oo.version);
1.1       parser    453:                                // $.encoding[windows-1251|...]
1.46      paf       454:                                param_option_over_output_option(pool, options, "encoding", oo.encoding);
                    455:                                // $.omit-xml-declaration[yes|no]
1.61    ! paf       456:                                param_option_over_output_option(pool, options, "omit-xml-declaration", oo.omitXmlDeclaration);
1.46      paf       457:                                // $.standalone[yes|no]
                    458:                                param_option_over_output_option(pool, options, "standalone", oo.standalone);
                    459:                                // $.doctype-public[?]
                    460:                                param_option_over_output_option(pool, options, "doctype-public", oo.doctypePublic);
                    461:                                // $.doctype-system[?]
                    462:                                param_option_over_output_option(pool, options, "doctype-system", oo.doctypeSystem);
                    463:                                // $.indent[yes|no]
1.61    ! paf       464:                                param_option_over_output_option(pool, options, "indent", oo.indent);
1.46      paf       465:                                // $.media-type[text/{html|xml|plain}]
                    466:                                param_option_over_output_option(pool, options, "media-type", oo.mediaType);                              
1.19      parser    467:                        }
1.1       parser    468:                }
                    469:        }
                    470: 
1.46      paf       471:        // default encoding from pool
1.61    ! paf       472:        if(!oo.encoding)
        !           473:                oo.encoding=&pool.get_source_charset().name();
1.46      paf       474:        // default method=xml
                    475:        if(!oo.method)
1.61    ! paf       476:                oo.method=new(pool) String(pool, XDOC_OUTPUT_METHOD_OPTION_VALUE_XML);
        !           477:        // default mediaType = depending on method
        !           478:        if(!oo.mediaType) {
        !           479:                if(*oo.method==XDOC_OUTPUT_METHOD_OPTION_VALUE_XML)
        !           480:                        oo.mediaType=new(pool) String(pool, "text/xml");
        !           481:                else if(*oo.method==XDOC_OUTPUT_METHOD_OPTION_VALUE_HTML)
        !           482:                        oo.mediaType=new(pool) String(pool, "text/html");
        !           483:                else // XDOC_OUTPUT_METHOD_OPTION_VALUE_TEXT & all others
        !           484:                        oo.mediaType=new(pool) String(pool, "text/plain");
        !           485:        }
        !           486: }
1.46      paf       487: 
1.1       parser    488: 
                    489: static void _save(Request& r, const String& method_name, MethodParams *params) {
                    490:        Pool& pool=r.pool();
1.46      paf       491:        VXdoc& vdoc=*static_cast<VXdoc *>(r.self);
1.1       parser    492: 
1.20      parser    493:        const String& file_name=params->as_string(0, "file name must be string");
1.54      paf       494:        const String& filespec=r.absolute(file_name);
1.1       parser    495:        
1.54      paf       496:        GdomeException exc;
                    497:        if(!gdome_di_saveDocToFile(domimpl,
                    498:                vdoc.get_document(&method_name),
                    499:                filespec.cstr(String::UL_FILE_SPEC),
                    500:                GDOME_SAVE_LIBXML_INDENT /*GDOME_SAVE_STANDARD */,
                    501:                &exc))
                    502:                throw Exception(0, 0, 
                    503:                        &method_name, 
                    504:                        exc);
1.1       parser    505: }
                    506: 
1.61    ! paf       507: int xmlOutputWriteToParserString(void *context, const char *buffer, int len) {
        !           508:        String& string=*static_cast<String *>(context);
        !           509:        char *copy=(char *)string.malloc((size_t)len);
        !           510:        memcpy(copy, buffer, (size_t)len);
        !           511:        string.APPEND_CLEAN(copy, (size_t)len, "xdoc", 0);
        !           512:        return len;
        !           513: }
        !           514: 
1.1       parser    515: static void _string(Request& r, const String& method_name, MethodParams *params) {
                    516:        Pool& pool=r.pool();
1.21      parser    517:        VXdoc& vdoc=*static_cast<VXdoc *>(r.self);
1.1       parser    518: 
1.61    ! paf       519:        VXdoc::Output_options oo(vdoc.output_options);
        !           520:        prepare_output_options(pool, method_name, params, 0,
        !           521:                oo);
        !           522: 
        !           523:        xmlCharEncodingHandler *encoder=0;
        !           524:        if(oo.encoding) {
        !           525:                const char *encoding_cstr=oo.encoding->cstr();
        !           526:                encoder=xmlFindCharEncodingHandler(encoding_cstr);
        !           527:                if(!encoder)
        !           528:                        throw Exception(0, 0,
        !           529:                                &method_name,
        !           530:                                "encoding '%s' not supported", encoding_cstr);
        !           531:        }
        !           532:        // UTF-8 encoder contains empty input/output converters, 
        !           533:        // which is wrong for xmlOutputBufferCreateIO
        !           534:        // while zero encoder goes perfectly 
        !           535:        if(encoder && strcmp(encoder->name, "UTF-8")==0)
        !           536:                encoder=0;
        !           537: 
        !           538:        String& result=*new(pool) String(pool);
        !           539:        xmlOutputBuffer_auto_ptr outputBuffer(xmlOutputBufferCreateIO(
        !           540:                xmlOutputWriteToParserString,
        !           541:                0/*xmlOutputCloseCallback*/,
        !           542:                &result,
        !           543:                encoder));
        !           544: 
        !           545:        xsltStylesheet *stylesheet=xsltNewStylesheet();
        !           546:        if(!stylesheet)
        !           547:                throw Exception(0, 0,
        !           548:                        &method_name,
        !           549:                        "xsltNewStylesheet failed");
        !           550: 
        !           551:        #define OO2STYLE(name) \
        !           552:                stylesheet->name=oo.name?BAD_CAST g_strdup(pool.transcode(*oo.name)->str):0
        !           553: 
        !           554:        OO2STYLE(method);
        !           555:        OO2STYLE(encoding);
        !           556:        OO2STYLE(mediaType);
        !           557:        OO2STYLE(doctypeSystem);
        !           558:        OO2STYLE(doctypePublic);
        !           559:        stylesheet->indent=oo.indent;
        !           560:        OO2STYLE(version);
        !           561:        stylesheet->standalone=oo.standalone;
        !           562:        stylesheet->omitXmlDeclaration=oo.omitXmlDeclaration;
        !           563: 
        !           564:        xmlDoc *document=((Gdome_xml_Document*)vdoc.get_document(&method_name))->n;
        !           565:        xsltSaveResultTo(outputBuffer.get(), document, stylesheet);
        !           566:        xsltFreeStylesheet(stylesheet);
        !           567: /*
1.54      paf       568:        char *mem;
                    569:        GdomeException exc;
                    570:        if(!gdome_di_saveDocToMemory(domimpl,
                    571:                vdoc.get_document(&method_name),
                    572:                &mem,
1.61    ! paf       573:                vdoc.output_options.indent?GDOME_SAVE_LIBXML_INDENT:GDOME_SAVE_STANDARD,
1.54      paf       574:                &exc))
                    575:                throw Exception(0, 0, 
                    576:                        &method_name, 
                    577:                        exc);
                    578: 
                    579:        // move to pool memory
1.58      paf       580:        size_t buf_size=strlen(mem);
                    581:        char *buf=(char *)pool.malloc(buf_size);
                    582:        memcpy(buf, mem, buf_size);
1.61    ! paf       583:        g_free(mem);*/
        !           584: 
1.54      paf       585:        // write out result
1.61    ! paf       586:        r.write_no_lang(result);
1.1       parser    587: }
                    588: 
1.58      paf       589: /// @test remove text/xml const. <output method+mediatype / ^file[method+mediatype
1.1       parser    590: static void _file(Request& r, const String& method_name, MethodParams *params) {
                    591:        Pool& pool=r.pool();
1.46      paf       592:        VXdoc& vdoc=*static_cast<VXdoc *>(r.self);
1.1       parser    593: 
1.58      paf       594:        char *mem;
                    595:        GdomeException exc;
                    596:        if(!gdome_di_saveDocToMemory(domimpl,
                    597:                vdoc.get_document(&method_name),
                    598:                &mem,
                    599:                GDOME_SAVE_LIBXML_INDENT /*GDOME_SAVE_STANDARD */,
                    600:                &exc))
                    601:                throw Exception(0, 0, 
                    602:                        &method_name, 
                    603:                        exc);
1.1       parser    604: 
1.58      paf       605:        // move to pool memory
                    606:        size_t buf_size=strlen(mem);
                    607:        char *buf=(char *)pool.malloc(buf_size);
                    608:        memcpy(buf, mem, buf_size);
                    609:        g_free(mem);
1.1       parser    610: 
1.58      paf       611:        // write out result
                    612:        VFile& vfile=*new(pool) VFile(pool);
                    613:        const String& scontent_type=*new(pool) String(pool, "text/xml");
                    614:        Value *vcontent_type=new(pool) VString(scontent_type);
                    615:        VHash *vhcontent_type=new(pool) VHash(pool);
                    616:        vhcontent_type->hash(&method_name).put(*value_name, new(pool) VString(scontent_type));
                    617:        const String& scharset=pool.get_source_charset().name();
                    618:        vhcontent_type->hash(&method_name).put(*new(pool) String(pool, "charset"), new(pool) VString(scharset));
                    619:        vcontent_type=vhcontent_type;
                    620:        
                    621:        vfile.set(false/*tainted*/, buf, buf_size, 0/*file_name*/, vcontent_type);
                    622:        r.write_no_lang(vfile);
1.1       parser    623: }
1.58      paf       624: 
1.1       parser    625: static void add_xslt_param(const Hash::Key& aattribute, Hash::Val *ameaning, 
                    626:                                                   void *info) {
1.59      paf       627:        Value *meaning=static_cast<Value *>(ameaning);
                    628:        Pool& pool=meaning->pool();
                    629:        const char **transform_params=(const char **)info;
                    630:        *transform_params++=pool.transcode(aattribute)->str;
                    631:        *transform_params++=pool.transcode(meaning->as_string())->str;
1.1       parser    632: }
1.24      parser    633: static void _transform(Request& r, const String& method_name, MethodParams *params) {
1.59      paf       634:        //_asm int 3;
1.24      parser    635:        Pool& pool=r.pool();
                    636:        VXdoc& vdoc=*static_cast<VXdoc *>(r.self);
                    637: 
                    638:        // params
1.59      paf       639:        const char **transform_params=0;
1.24      parser    640:        if(params->size()>1) {
1.59      paf       641:                Value& vparams=params->as_no_junction(1, "transform parameters must be hash");
1.24      parser    642:                if(vparams.is_defined())
1.59      paf       643:                        if(Hash *params=vparams.get_hash(&method_name)) {
                    644:                                transform_params=
                    645:                                        (const char **)pool.malloc(sizeof(const char *)*params->size()*2+1);
                    646:                                params->for_each(add_xslt_param, transform_params);
                    647:                                transform_params[params->size()*2]=0;                           
                    648:                        } else
1.29      parser    649:                                throw Exception(0, 0,
1.24      parser    650:                                        &method_name,
                    651:                                        "transform parameters parameter must be hash");
                    652:        }
                    653: 
                    654:        // stylesheet
1.59      paf       655:        const String& stylesheet_filespec=r.absolute(params->as_string(0, "file name must be string"));
1.32      parser    656:        Stylesheet_connection& connection=stylesheet_manager->get_connection(stylesheet_filespec);
1.24      parser    657: 
                    658:        // transform
1.59      paf       659:        xsltStylesheet *stylesheet=connection.stylesheet(false/*nocache*/);
                    660:        xmlDoc *document=((Gdome_xml_Document*)vdoc.get_document(&method_name))->n;
                    661:        xsltTransformContext *transformContext=xsltNewTransformContext(stylesheet, document);
                    662:        xmlDoc *transformed=xsltApplyStylesheetUser(
                    663:                stylesheet,
                    664:                document,
                    665:                transform_params,
                    666:                0/*const char *output*/,
                    667:                0/*FILE *profile*/,
                    668:                transformContext);
                    669:        if(!transformed) {
1.61    ! paf       670:                xsltFreeTransformContext(transformContext);
1.59      paf       671:                // close
1.13      parser    672:                connection.close();
1.59      paf       673:                throw Exception(0, 0,
                    674:                        &method_name, 
                    675:                        "transform failed. TODO: show errors");
1.13      parser    676:        }
1.42      paf       677: 
1.61    ! paf       678:        //gdome_xml_doc_mkref dislikes XML_HTML_DOCUMENT_NODE  type, fixing
        !           679:        transformed->type=XML_DOCUMENT_NODE;
1.59      paf       680:        // constructing result
                    681:        GdomeDocument *gdomeDocument=gdome_xml_doc_mkref(transformed);
                    682:        if(!gdomeDocument)
                    683:                throw Exception(0, 0,
                    684:                        &method_name,
                    685:                        "gdome_xml_doc_mkref failed");
                    686:        VXdoc& result=*new(pool) VXdoc(pool, gdomeDocument);
1.61    ! paf       687:        /* grabbing options
        !           688: 
        !           689:                <xsl:output
        !           690:                !method = "xml" | "html" | "text"
        !           691:                        X| qname-but-not-ncname 
        !           692:                !version = nmtoken 
        !           693:                !encoding = string 
        !           694:                !omit-xml-declaration = "yes" | "no"
        !           695:                !standalone = "yes" | "no"
        !           696:                !doctype-public = string 
        !           697:                !doctype-system = string 
        !           698:                Xcdata-section-elements = qnames 
        !           699:                !indent = "yes" | "no"
        !           700:                !media-type = string /> 
1.59      paf       701:        */
                    702:        memset(&result.output_options, 0, sizeof(result.output_options));
                    703:        VXdoc::Output_options& oo=result.output_options;
                    704: 
1.60      paf       705:        oo.method=stylesheet->method?&pool.transcode(stylesheet->method):0;
                    706:        oo.encoding=stylesheet->encoding?&pool.transcode(stylesheet->encoding):0;
                    707:        oo.mediaType=stylesheet->mediaType?&pool.transcode(stylesheet->mediaType):0;
                    708:        oo.doctypeSystem=stylesheet->doctypeSystem?&pool.transcode(stylesheet->doctypeSystem):0;
                    709:        oo.doctypePublic=stylesheet->doctypePublic?&pool.transcode(stylesheet->doctypePublic):0;
1.59      paf       710:        oo.indent=stylesheet->indent!=0;
1.60      paf       711:        oo.version=stylesheet->version?&pool.transcode(stylesheet->version):0;
1.59      paf       712:        oo.standalone=stylesheet->standalone!=0;
                    713:        oo.omitXmlDeclaration=stylesheet->omitXmlDeclaration!=0;
                    714: 
                    715:        xsltFreeTransformContext(transformContext);
1.42      paf       716:        // close
                    717:        connection.close();
1.59      paf       718: 
                    719:        // write out result
                    720:        r.write_no_lang(result);
                    721: 
1.1       parser    722: }
                    723: 
1.16      parser    724: // constructor
1.2       parser    725: 
1.16      parser    726: MXdoc::MXdoc(Pool& apool) : MXnode(apool) {
                    727:        set_name(*NEW String(pool(), XDOC_CLASS_NAME));
1.2       parser    728: 
1.16      parser    729:        /// @test how to create empty type html?
1.2       parser    730: 
1.16      parser    731:        /// DOM1
1.2       parser    732: 
1.16      parser    733:        // Element createElement(in DOMString tagName) raises(DOMException);
                    734:        add_native_method("createElement", Method::CT_DYNAMIC, _createElement, 1, 1);
                    735:        // DocumentFragment createDocumentFragment(); 
                    736:        add_native_method("createDocumentFragment", Method::CT_DYNAMIC, _createDocumentFragment, 0, 0);
                    737:        // Text createTextNode(in DOMString data);
                    738:        add_native_method("createTextNode", Method::CT_DYNAMIC, _createTextNode, 1, 1);
                    739:        // Comment createComment(in DOMString data);
                    740:        add_native_method("createComment", Method::CT_DYNAMIC, _createComment, 1, 1);
                    741:        // CDATASection createCDATASection(in DOMString data) raises(DOMException);
                    742:        add_native_method("createCDATASection", Method::CT_DYNAMIC, _createCDATASection, 1, 1);
                    743:        // ProcessingInstruction createProcessingInstruction(in DOMString target, in DOMString data) raises(DOMException);
                    744:        add_native_method("createProcessingInstruction", Method::CT_DYNAMIC, _createProcessingInstruction, 2, 2);
                    745:        // Attr createAttribute(in DOMString name) raises(DOMException);
                    746:        add_native_method("createAttribute", Method::CT_DYNAMIC, _createAttribute, 1, 1);
                    747:        // EntityReference createEntityReference(in DOMString name) raises(DOMException);
                    748:        add_native_method("createEntityReference", Method::CT_DYNAMIC, _createEntityReference, 1, 1);
                    749:        // NodeList getElementsByTagName(in DOMString tagname);
1.54      paf       750:        add_native_method("getElementsByTagName", Method::CT_DYNAMIC, _getElementsByTagName, 1, 1);
                    751:        // ^xdoc.getElementsByTagNameNS[namespaceURI;localName] = array of nodes
                    752:        add_native_method("getElementsByTagNameNS", Method::CT_DYNAMIC, _getElementsByTagNameNS, 2, 2);
1.2       parser    753: 
1.16      parser    754:        /// DOM2(?)
1.2       parser    755: 
1.16      parser    756:        // ^xdoc.getElementById[elementId]
                    757:        add_native_method("getElementById", Method::CT_DYNAMIC, _getElementById, 1, 1);
1.1       parser    758: 
1.16      parser    759:        /// parser
                    760:        
1.54      paf       761:        // ^xdoc::create{qualifiedName}
                    762:        add_native_method("create", Method::CT_DYNAMIC, _create, 1, 1); 
                    763:        // ^xdoc::set[<some>xml</some>]
                    764:        add_native_method("set", Method::CT_DYNAMIC, _set, 1, 1);
                    765: 
                    766:        // ^xdoc::load[some.xml]
                    767:        add_native_method("load", Method::CT_DYNAMIC, _load, 1, 1);
                    768: 
1.2       parser    769:        // ^xdoc.save[some.xml]
                    770:        // ^xdoc.save[some.xml;options hash]
1.1       parser    771:        add_native_method("save", Method::CT_DYNAMIC, _save, 1, 2);
                    772: 
1.2       parser    773:        // ^xdoc.string[] <doc/>
                    774:        // ^xdoc.string[options hash] <doc/>
1.1       parser    775:        add_native_method("string", Method::CT_DYNAMIC, _string, 0, 1);
                    776: 
1.2       parser    777:        // ^xdoc.file[] file with "<doc/>"
                    778:        // ^xdoc.file[options hash] file with "<doc/>"
1.58      paf       779:        add_native_method("file", Method::CT_DYNAMIC, _file, 0, 1);
1.1       parser    780: 
1.8       parser    781:        // ^xdoc.transform[stylesheet file_name]
                    782:        // ^xdoc.transform[stylesheet file_name;params hash]
1.59      paf       783:        add_native_method("transform", Method::CT_DYNAMIC, _transform, 1, 2);
1.2       parser    784: 
1.1       parser    785: }
1.5       parser    786: 
                    787: void MXdoc::configure_admin(Request& r) {
                    788: }
                    789: 
1.1       parser    790: // global variable
                    791: 
                    792: Methoded *Xdoc_class;
                    793: 
                    794: // creator
                    795: 
                    796: #endif
                    797: 
                    798: Methoded *MXdoc_create(Pool& pool) {
                    799:        return 
                    800: #ifdef XML
1.33      parser    801:                Xdoc_class=new(pool) MXdoc(pool)
1.1       parser    802: #else
                    803:                0
                    804: #endif
                    805:        ;
                    806: }

E-mail: