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

1.1       parser      1: /** @file
1.2       parser      2:        Parser: @b xdoc parser class.
1.1       parser      3: 
1.111   ! paf         4:        Copyright (c) 2001-2003 ArtLebedev Group (http://www.artlebedev.com)
1.85      paf         5:        Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
1.96      paf         6: */
1.1       parser      7: 
1.111   ! paf         8: #include "pa_config_includes.h"
        !             9: 
1.1       parser     10: #ifdef XML
1.96      paf        11: 
1.111   ! paf        12: static const char* IDENT_XDOC_C="$Date: 2003/04/10 16:11:01 $";
1.82      paf        13: 
1.69      paf        14: #include "gdome.h"
                     15: #include "libxml/tree.h"
                     16: #include "libxslt/xsltInternals.h"
                     17: #include "libxslt/transform.h"
                     18: #include "libxslt/xsltutils.h"
1.90      paf        19: #include "libxslt/variables.h"
1.59      paf        20: 
1.111   ! paf        21: 
        !            22: #include "pa_vmethod_frame.h"
        !            23: 
        !            24: #include "pa_stylesheet_manager.h"
        !            25: #include "pa_request.h"
        !            26: #include "pa_vxdoc.h"
        !            27: #include "pa_charset.h"
        !            28: #include "pa_vfile.h"
        !            29: #include "xnode.h"
        !            30: 
1.1       parser     31: // defines
                     32: 
                     33: #define XDOC_CLASS_NAME "xdoc"
                     34: 
                     35: #define XDOC_OUTPUT_METHOD_OPTION_NAME "method"
                     36: #define XDOC_OUTPUT_METHOD_OPTION_VALUE_XML "xml"
                     37: #define XDOC_OUTPUT_METHOD_OPTION_VALUE_HTML "html"
                     38: #define XDOC_OUTPUT_METHOD_OPTION_VALUE_TEXT "text"
                     39: 
                     40: // class
                     41: 
1.111   ! paf        42: class MXdoc: public MXnode {
1.1       parser     43: public: // VStateless_class
1.111   ! paf        44:        Value* create_new_value() { return new VXdoc(0, 0); }
1.1       parser     45: 
                     46: public:
1.111   ! paf        47:        MXdoc();
1.1       parser     48: 
                     49: public: // Methoded
1.5       parser     50:        void configure_admin(Request& r);
1.1       parser     51: };
                     52: 
1.111   ! paf        53: // global variable
        !            54: 
        !            55: DECLARE_CLASS_VAR(xdoc, new MXdoc, 0);
        !            56: 
1.61      paf        57: // helper classes
                     58: 
                     59: class xmlOutputBuffer_auto_ptr {
                     60: public:
1.67      paf        61:        explicit xmlOutputBuffer_auto_ptr(xmlOutputBuffer *_APtr = 0) 
                     62:                : _Owns(_APtr != 0), _Ptr(_APtr) {}
1.61      paf        63:        xmlOutputBuffer_auto_ptr(const xmlOutputBuffer_auto_ptr& _Y) 
                     64:                : _Owns(_Y._Owns), _Ptr(_Y.release()) {}
                     65:        xmlOutputBuffer_auto_ptr& operator=(const xmlOutputBuffer_auto_ptr& _Y) 
                     66:                {if (this != &_Y)
                     67:                        {if (_Ptr != _Y.get())
                     68:                                {if (_Owns && _Ptr)
                     69:                                        xmlOutputBufferClose(_Ptr);
                     70:                                _Owns = _Y._Owns; }
                     71:                        else if (_Y._Owns)
                     72:                                _Owns = true;
                     73:                        _Ptr = _Y.release(); }
                     74:                return (*this); }
                     75:        ~xmlOutputBuffer_auto_ptr()
                     76:                {if (_Owns && _Ptr)
                     77:                        xmlOutputBufferClose(_Ptr); }
                     78:        xmlOutputBuffer& operator*() const 
                     79:                {return (*get()); }
                     80:        xmlOutputBuffer *operator->() const 
                     81:                {return (get()); }
                     82:        xmlOutputBuffer *get() const 
                     83:                {return (_Ptr); }
                     84:        xmlOutputBuffer *release() const 
                     85:                {((xmlOutputBuffer_auto_ptr *)this)->_Owns = false;
                     86:                return (_Ptr); }
                     87: private:
                     88:        bool _Owns;
                     89:        xmlOutputBuffer *_Ptr;
                     90: };
                     91: 
1.65      paf        92: class xsltTransformContext_auto_ptr {
                     93: public:
1.67      paf        94:        explicit xsltTransformContext_auto_ptr(xsltTransformContext *_APtr = 0) 
                     95:                : _Owns(_APtr != 0), _Ptr(_APtr) {}
1.65      paf        96:        xsltTransformContext_auto_ptr(const xsltTransformContext_auto_ptr& _Y) 
                     97:                : _Owns(_Y._Owns), _Ptr(_Y.release()) {}
                     98:        xsltTransformContext_auto_ptr& operator=(const xsltTransformContext_auto_ptr& _Y) 
                     99:                {if (this != &_Y)
                    100:                        {if (_Ptr != _Y.get())
                    101:                                {if (_Owns && _Ptr)
                    102:                                        xsltFreeTransformContext(_Ptr);
                    103:                                _Owns = _Y._Owns; }
                    104:                        else if (_Y._Owns)
                    105:                                _Owns = true;
                    106:                        _Ptr = _Y.release(); }
                    107:                return (*this); }
                    108:        ~xsltTransformContext_auto_ptr()
                    109:                {if (_Owns && _Ptr)
                    110:                        xsltFreeTransformContext(_Ptr); }
                    111:        xsltTransformContext& operator*() const 
                    112:                {return (*get()); }
                    113:        xsltTransformContext *operator->() const 
                    114:                {return (get()); }
                    115:        xsltTransformContext *get() const 
                    116:                {return (_Ptr); }
                    117:        xsltTransformContext *release() const 
                    118:                {((xsltTransformContext_auto_ptr *)this)->_Owns = false;
                    119:                return (_Ptr); }
                    120: private:
                    121:        bool _Owns;
                    122:        xsltTransformContext *_Ptr;
                    123: };
1.61      paf       124: 
1.65      paf       125: class xsltStylesheet_auto_ptr {
                    126: public:
1.67      paf       127:        explicit xsltStylesheet_auto_ptr(xsltStylesheet *_APtr = 0) 
                    128:                : _Owns(_APtr != 0), _Ptr(_APtr) {}
1.65      paf       129:        xsltStylesheet_auto_ptr(const xsltStylesheet_auto_ptr& _Y) 
                    130:                : _Owns(_Y._Owns), _Ptr(_Y.release()) {}
                    131:        xsltStylesheet_auto_ptr& operator=(const xsltStylesheet_auto_ptr& _Y) 
                    132:                {if (this != &_Y)
                    133:                        {if (_Ptr != _Y.get())
                    134:                                {if (_Owns && _Ptr)
                    135:                                        xsltFreeStylesheet(_Ptr);
                    136:                                _Owns = _Y._Owns; }
                    137:                        else if (_Y._Owns)
                    138:                                _Owns = true;
                    139:                        _Ptr = _Y.release(); }
                    140:                return (*this); }
                    141:        ~xsltStylesheet_auto_ptr()
                    142:                {if (_Owns && _Ptr)
                    143:                        xsltFreeStylesheet(_Ptr); }
                    144:        xsltStylesheet& operator*() const 
                    145:                {return (*get()); }
                    146:        xsltStylesheet *operator->() const 
                    147:                {return (get()); }
                    148:        xsltStylesheet *get() const 
                    149:                {return (_Ptr); }
                    150:        xsltStylesheet *release() const 
                    151:                {((xsltStylesheet_auto_ptr *)this)->_Owns = false;
                    152:                return (_Ptr); }
                    153: private:
                    154:        bool _Owns;
                    155:        xsltStylesheet *_Ptr;
                    156: };
1.61      paf       157: 
1.1       parser    158: // methods
                    159: 
1.111   ! paf       160: static void writeNode(Request& r, GdomeNode *node, 
1.54      paf       161:                                          GdomeException exc) {
                    162:        if(!node || exc)
1.111   ! paf       163:                throw Exception(0, exc);
1.54      paf       164: 
                    165:        // write out result
1.111   ! paf       166:        r.write_no_lang(*new VXnode(&r.charsets, node));
1.54      paf       167: }
                    168: 
1.16      parser    169: // Element createElement(in DOMString tagName) raises(DOMException);
1.111   ! paf       170: static void _createElement(Request& r, MethodParams& params) {
        !           171:        VXdoc& vdoc=GET_SELF(r, VXdoc);
1.16      parser    172: 
1.111   ! paf       173:        const String& tagName=params.as_string(0, "tagName must be string");
1.16      parser    174: 
1.54      paf       175:        GdomeException exc;
                    176:        GdomeNode *node=
1.111   ! paf       177:                (GdomeNode *)gdome_doc_createElement(vdoc.get_document(), 
        !           178:                r.transcode(tagName).use(),
1.54      paf       179:                &exc);
1.111   ! paf       180:        writeNode(r, node, exc);
1.16      parser    181: }
                    182: 
                    183: // DocumentFragment createDocumentFragment()
1.111   ! paf       184: static void _createDocumentFragment(Request& r, MethodParams&) {
        !           185:        VXdoc& vdoc=GET_SELF(r, VXdoc);
1.16      parser    186: 
1.54      paf       187:        GdomeException exc;
                    188:        GdomeNode *node=
                    189:                (GdomeNode *)gdome_doc_createDocumentFragment(
1.111   ! paf       190:                vdoc.get_document(),
1.54      paf       191:                &exc);
1.111   ! paf       192:        writeNode(r, node, exc);
1.16      parser    193: }
                    194: 
                    195: // Text createTextNode(in DOMString data);
1.111   ! paf       196: static void _createTextNode(Request& r, MethodParams& params) {
        !           197:        VXdoc& vdoc=GET_SELF(r, VXdoc);
1.16      parser    198: 
1.111   ! paf       199:        const String& data=params.as_string(0, "data must be string");
1.16      parser    200: 
1.54      paf       201:        GdomeException exc;
                    202:        GdomeNode *node=(GdomeNode *)gdome_doc_createTextNode(
1.111   ! paf       203:                vdoc.get_document(),
        !           204:                r.transcode(data).use(),
1.54      paf       205:                &exc);
1.111   ! paf       206:        writeNode(r, node, exc);
1.16      parser    207: }
                    208: 
                    209: // Comment createComment(in DOMString data)
1.111   ! paf       210: static void _createComment(Request& r, MethodParams& params) {
        !           211:        VXdoc& vdoc=GET_SELF(r, VXdoc);
1.16      parser    212: 
1.111   ! paf       213:        const String& data=params.as_string(0, "data must be string");
1.16      parser    214: 
1.54      paf       215:        GdomeException exc;
                    216:        GdomeNode *node=(GdomeNode *)gdome_doc_createComment(
1.111   ! paf       217:                vdoc.get_document(),
        !           218:                r.transcode(data).use(),
1.54      paf       219:                &exc);
1.111   ! paf       220:        writeNode(r, node, exc);
1.16      parser    221: }
                    222: 
                    223: // CDATASection createCDATASection(in DOMString data) raises(DOMException);
1.111   ! paf       224: static void _createCDATASection(Request& r, MethodParams& params) {
        !           225:        VXdoc& vdoc=GET_SELF(r, VXdoc);
1.16      parser    226: 
1.111   ! paf       227:        const String& data=params.as_string(0, "data must be string");
1.16      parser    228: 
1.54      paf       229:        GdomeException exc;
                    230:        GdomeNode *node=(GdomeNode *)gdome_doc_createCDATASection(
1.111   ! paf       231:                vdoc.get_document(),
        !           232:                r.transcode(data).use(),
1.54      paf       233:                &exc);
1.111   ! paf       234:        writeNode(r, node, exc);
1.16      parser    235: }
                    236: 
                    237: // ProcessingInstruction createProcessingInstruction(in DOMString target,in DOMString data) raises(DOMException);
1.111   ! paf       238: static void _createProcessingInstruction(Request& r, MethodParams& params) {
        !           239:        VXdoc& vdoc=GET_SELF(r, VXdoc);
1.16      parser    240: 
1.111   ! paf       241:        const String& target=params.as_string(0, "data must be string");
        !           242:        const String& data=params.as_string(1, "data must be string");
1.16      parser    243: 
1.54      paf       244:        GdomeException exc;
                    245:        GdomeNode *node=(GdomeNode *)gdome_doc_createProcessingInstruction(
1.111   ! paf       246:                vdoc.get_document(),
        !           247:                r.transcode(target).use(), 
        !           248:                r.transcode(data).use(),
1.54      paf       249:                &exc);
1.111   ! paf       250:        writeNode(r, node, exc);
1.16      parser    251: }
                    252: 
                    253: // Attr createAttribute(in DOMString name) raises(DOMException);
1.111   ! paf       254: static void _createAttribute(Request& r, MethodParams& params) {
        !           255:        VXdoc& vdoc=GET_SELF(r, VXdoc);
1.16      parser    256: 
1.111   ! paf       257:        const String& name=params.as_string(0, "name must be string");
1.16      parser    258: 
1.54      paf       259:        GdomeException exc;
                    260:        GdomeNode *node=(GdomeNode *)gdome_doc_createAttribute(
1.111   ! paf       261:                vdoc.get_document(),
        !           262:                r.transcode(name).use(),
1.54      paf       263:                &exc);
1.111   ! paf       264:        writeNode(r, node, exc);
1.16      parser    265: }
                    266: // EntityReference createEntityReference(in DOMString name) raises(DOMException);
1.111   ! paf       267: static void _createEntityReference(Request& r, MethodParams& params) {
        !           268:        VXdoc& vdoc=GET_SELF(r, VXdoc);
1.16      parser    269: 
1.111   ! paf       270:        const String& name=params.as_string(0, "name must be string");
1.16      parser    271: 
1.54      paf       272:        GdomeException exc;
                    273:        GdomeNode *node=(GdomeNode *)gdome_doc_createEntityReference(
1.111   ! paf       274:                vdoc.get_document(),
        !           275:                r.transcode(name).use(),
1.54      paf       276:                &exc);
1.111   ! paf       277:        writeNode(r, node, exc);
1.16      parser    278: }
                    279: 
1.99      paf       280: // NodeList getElementsByTagName(in DOMString name);
1.111   ! paf       281: static void _getElementsByTagName(Request& r, MethodParams& params) {
        !           282:        VXdoc& vdoc=GET_SELF(r, VXdoc);
1.99      paf       283: 
1.111   ! paf       284:        const String& name=params.as_string(0, "name must be string");
1.99      paf       285: 
1.111   ! paf       286:        VHash& result=*new VHash;
1.99      paf       287:        GdomeException exc;
                    288:        if(GdomeNodeList *nodes=
                    289:                gdome_doc_getElementsByTagName(
1.111   ! paf       290:                        vdoc.get_document(), 
        !           291:                        r.transcode(name).use(), 
1.99      paf       292:                        &exc)) {
                    293:                gulong length=gdome_nl_length(nodes, &exc);
1.111   ! paf       294:                for(gulong i=0; i<length; i++)
        !           295:                        result.hash().put(
        !           296:                                StringBody::Format(i), 
        !           297:                                new VXnode(&r.charsets, gdome_nl_item(nodes, i, &exc)));
1.99      paf       298:        } else if(exc)
1.111   ! paf       299:                throw Exception(0, exc);
1.99      paf       300: 
                    301:        // write out result
                    302:        r.write_no_lang(result);
                    303: }
                    304: 
1.111   ! paf       305: static void _getElementsByTagNameNS(Request& r, MethodParams& params) {
        !           306:        VXdoc& vdoc=GET_SELF(r, VXdoc);
1.99      paf       307: 
                    308:        // namespaceURI;localName
1.111   ! paf       309:        const String& namespaceURI=params.as_string(0, "namespaceURI must be string");
        !           310:        const String& localName=params.as_string(1, "localName must be string");
1.99      paf       311: 
                    312:        GdomeException exc;
1.111   ! paf       313:        VHash& result=*new VHash;
1.99      paf       314:        if(GdomeNodeList *nodes=
                    315:                gdome_doc_getElementsByTagNameNS(
1.111   ! paf       316:                        vdoc.get_document(), 
        !           317:                        r.transcode(namespaceURI).use(),
        !           318:                        r.transcode(localName).use(),
1.99      paf       319:                        &exc)) {
                    320:                gulong length=gdome_nl_length(nodes, &exc);
1.111   ! paf       321:                for(gulong i=0; i<length; i++)
        !           322:                        result.hash().put(
        !           323:                                StringBody::Format(i), 
        !           324:                                new VXnode(&r.charsets, gdome_nl_item(nodes, i, &exc)));
1.99      paf       325:        }
                    326: 
                    327:        // write out result
                    328:        r.write_no_lang(result);
                    329: }
                    330: 
1.111   ! paf       331: static void _getElementById(Request& r, MethodParams& params) {
        !           332:        VXdoc& vdoc=GET_SELF(r, VXdoc);
1.16      parser    333: 
1.54      paf       334:        // elementId
1.111   ! paf       335:        const String& elementId=params.as_string(0, "elementID must be string");
1.1       parser    336: 
1.54      paf       337:        GdomeException exc;
                    338:        if(GdomeNode *node=(GdomeNode *)gdome_doc_getElementById(
1.111   ! paf       339:                vdoc.get_document(),
        !           340:                r.transcode(elementId).use(),
1.54      paf       341:                &exc)) {
                    342:                // write out result
1.111   ! paf       343:                r.write_no_lang(*new VXnode(&r.charsets, node));
1.66      paf       344:        } else if(exc || xmlHaveGenericErrors())
1.87      paf       345:                throw Exception(
1.111   ! paf       346:                        &elementId, 
1.54      paf       347:                        exc);
                    348: }
1.79      paf       349: 
1.111   ! paf       350: static void _importNode(Request& r, MethodParams& params) {
        !           351:        VXdoc& vdoc=GET_SELF(r, VXdoc);
1.79      paf       352: 
                    353:        GdomeNode *importedNode=
1.111   ! paf       354:                as_node(params, 0, "importedNode must be node");
1.79      paf       355:        bool deep=
1.111   ! paf       356:                params.as_bool(1, "deep must be bool", r);
1.79      paf       357: 
                    358:        GdomeException exc;
1.111   ! paf       359:        GdomeNode *outputNode=gdome_doc_importNode(vdoc.get_document(), 
1.79      paf       360:                importedNode,
                    361:                deep, &exc);
                    362:        if(exc)
1.111   ! paf       363:                throw Exception(0, exc);
1.79      paf       364: 
                    365:        // write out result
1.111   ! paf       366:        r.write_no_lang(*new VXnode(&r.charsets, outputNode));
1.79      paf       367: }
1.54      paf       368: /*
                    369: GdomeElement *gdome_doc_createElementNS (GdomeDocument *self, GdomeDOMString *namespaceURI, GdomeDOMString *qualifiedName, GdomeException *exc);
                    370: GdomeAttr *gdome_doc_createAttributeNS (GdomeDocument *self, GdomeDOMString *namespaceURI, GdomeDOMString *qualifiedName, GdomeException *exc);
                    371: */
1.1       parser    372: 
1.111   ! paf       373: static void _create(Request& r, MethodParams& params) {
        !           374:        Charset& source_charset=r.charsets.source();
        !           375:        VXdoc& vdoc=GET_SELF(r, VXdoc);
1.1       parser    376: 
1.111   ! paf       377:        Value& param=params[params.count()-1];
1.83      paf       378:        GdomeDocument *document;
1.111   ! paf       379:        bool set_encoding=false;
1.95      paf       380:        if(param.get_junction()) { // {<?xml?>...}
1.111   ! paf       381:                Temp_lang temp_lang(r, String::L_XML);
1.91      paf       382:                const String& xml=r.process_to_string(param);
1.83      paf       383: 
1.111   ! paf       384:                const char* cstr=xml.cstr(String::L_UNSPECIFIED);
1.83      paf       385:                document=(GdomeDocument *)
                    386:                        gdome_xml_n_mkref((xmlNode *)xmlParseMemory(
                    387:                                cstr, strlen(cstr)
                    388:                        ));
1.111   ! paf       389:                //printf("document=0x%p\n", document);
1.83      paf       390:                if(!document || xmlHaveGenericErrors()) {
                    391:                        GdomeException exc=0;
1.111   ! paf       392:                        throw Exception(0, exc);
1.83      paf       393:                }
1.111   ! paf       394: 
        !           395:                // must be last action in if, see after if}
1.83      paf       396:        } else { // [name]
                    397:                const String& qualifiedName=param.as_string();
1.1       parser    398: 
1.83      paf       399:                GdomeException exc;
                    400:                /*
                    401:                GdomeDocumentType *documentType=gdome_di_createDocumentType (
                    402:                        docimpl, 
1.111   ! paf       403:                        r.transcode(qualifiedName), 
1.83      paf       404:                        0/*publicId* /, 
                    405:                        0/*systemId* /, 
                    406:                        &exc);
                    407:                if(!documentType || exc || xmlHaveGenericErrors())
1.87      paf       408:                        throw Exception(
1.111   ! paf       409:                                method_name, 
1.83      paf       410:                                exc);
1.111   ! paf       411:                /// +xalan createXMLDecl ?
1.83      paf       412:                */
                    413:                document=gdome_di_createDocument (domimpl, 
                    414:                        0/*namespaceURI*/, 
1.111   ! paf       415:                        r.transcode(qualifiedName).use(), 
1.83      paf       416:                        0/*doctype*/, 
                    417:                        &exc);
                    418:                if(!document || exc || xmlHaveGenericErrors())
1.111   ! paf       419:                        throw Exception(0, exc);
1.103     paf       420: 
1.111   ! paf       421:                set_encoding=true;
        !           422:                // must be last action in if, see after if}
        !           423:        }
        !           424:        // must be first action after if}
        !           425:        // replace any previous parsed source
        !           426:        {
        !           427:                vdoc.set_document(&r.charsets, document); 
        !           428:                GdomeException exc;
        !           429:                gdome_doc_unref(document, &exc);
1.73      paf       430:        }
1.95      paf       431:        
                    432:        // URI 
1.111   ! paf       433:        const char* URI_cstr;
        !           434:        const char* URI_cstr_ptr;
        !           435:        if(params.count()>1) { // absolute(param)
        !           436:                const String& URI=params.as_string(0, "URI must be string");
        !           437:                URI_cstr=URI_cstr_ptr=r.absolute(URI).cstr();
1.95      paf       438:        } else // default = disk path to requested document
1.111   ! paf       439:                URI_cstr=r.request_info.path_translated;
1.95      paf       440:        xmlDoc *doc=gdome_xml_doc_get_xmlDoc(document);
                    441:        if(URI_cstr)
1.111   ! paf       442:                doc->URL=source_charset.transcode_buf2xchar(URI_cstr, strlen(URI_cstr));
1.95      paf       443: 
1.111   ! paf       444:        if(set_encoding) {
        !           445:                const char* source_charset_name=source_charset.NAME().cstr();
        !           446:                doc->encoding=source_charset.transcode_buf2xchar(source_charset_name, strlen(source_charset_name));
        !           447:        }
1.9       parser    448: }
                    449: 
1.111   ! paf       450: static void _load(Request& r, MethodParams& params) {
        !           451:        VXdoc& vdoc=GET_SELF(r, VXdoc);
1.9       parser    452: 
1.54      paf       453:        // filespec
1.111   ! paf       454:        const String& file_name=params.as_string(0, "uri must be string");
1.54      paf       455:        const String& uri=r.absolute(file_name);
1.105     paf       456: 
1.111   ! paf       457:        File_read_result file=file_read(r.charsets, uri, false/*not text*/,
        !           458:                params.count()>1?params.as_no_junction(1, "additional params must be hash")
        !           459:                        .get_hash()
1.105     paf       460:                        :0);
                    461: 
1.73      paf       462:        GdomeDocument *document=(GdomeDocument *)
1.111   ! paf       463:                gdome_xml_n_mkref((xmlNode *)xmlParseMemory(file.str, file.length));
1.73      paf       464:        if(!document || xmlHaveGenericErrors()) {
                    465:                GdomeException exc=0;
1.111   ! paf       466:                throw Exception(&uri, exc);
        !           467:        }
        !           468:        // must be first action after if}
        !           469:        // replace any previous parsed source
        !           470:        {
        !           471:                vdoc.set_document(&r.charsets, document); 
        !           472:                GdomeException exc;
        !           473:                gdome_doc_unref(document, &exc);
1.73      paf       474:        }
1.111   ! paf       475: 
        !           476:        const char* URI_cstr=uri.cstr();
1.107     paf       477:        xmlDoc *doc=gdome_xml_doc_get_xmlDoc(document);
                    478:        if(URI_cstr)
1.111   ! paf       479:                doc->URL=r.charsets.source().transcode_buf2xchar(URI_cstr, strlen(URI_cstr));
1.9       parser    480: 
                    481: }
                    482: 
1.111   ! paf       483: static void param_option_over_output_option(
        !           484:                                            HashStringValue& param_options, const char* option_name,
        !           485:                                            const String*& output_option) {
        !           486:        if(Value* value=param_options.get(StringBody(option_name)))
1.61      paf       487:                output_option=&value->as_string();
1.46      paf       488: }
1.111   ! paf       489: static void param_option_over_output_option(
        !           490:                                            HashStringValue& param_options, const char* option_name,
        !           491:                                            bool& output_option) {
        !           492:        if(Value* value=param_options.get(StringBody(option_name))) {
1.46      paf       493:                const String& s=value->as_string();
                    494:                if(s=="yes")
                    495:                        output_option=true;
                    496:                else if(s=="no")
                    497:                        output_option=false;
                    498:                else
1.87      paf       499:                        throw Exception("parser.runtime",
1.46      paf       500:                                &s,
                    501:                                "%s must be either 'yes' or 'no'", option_name);
                    502:        }
                    503: }
                    504: 
1.100     paf       505: /// @test valid_options check
1.111   ! paf       506: static void prepare_output_options(Request& r,
        !           507:                                   MethodParams& params, size_t index,
        !           508:                                   VXdoc::Output_options& oo) {
1.46      paf       509: /*
                    510: <xsl:output
                    511:   !method = "xml" | "html" | "text" | qname-but-not-ncname 
                    512:   !version = nmtoken 
                    513:   !encoding = string 
                    514:   !omit-xml-declaration = "yes" | "no"
                    515:   !standalone = "yes" | "no"
                    516:   !doctype-public = string 
                    517:   !doctype-system = string 
                    518:   cdata-section-elements = qnames 
                    519:   !indent = "yes" | "no"
                    520:   !media-type = string /> 
1.61      paf       521: */
1.1       parser    522: 
1.46      paf       523:        // configuring with options from parameter...
1.111   ! paf       524:        if(params.count()>index) {
        !           525:                Value& voptions=params.as_no_junction(index, "options must be string");
1.1       parser    526:                if(voptions.is_defined()) {
1.111   ! paf       527:                        if(HashStringValue *options=voptions.get_hash()) {
1.1       parser    528:                                // $.method[xml|html|text]
1.111   ! paf       529:                                if(Value* vmethod=options->get(StringBody(XDOC_OUTPUT_METHOD_OPTION_NAME)))
1.61      paf       530:                                        oo.method=&vmethod->as_string();
1.1       parser    531: 
1.46      paf       532:                                // $.version[1.0]
1.111   ! paf       533:                                param_option_over_output_option(*options, "version", oo.version);
1.1       parser    534:                                // $.encoding[windows-1251|...]
1.111   ! paf       535:                                param_option_over_output_option(*options, "encoding", oo.encoding);
1.46      paf       536:                                // $.omit-xml-declaration[yes|no]
1.111   ! paf       537:                                param_option_over_output_option(*options, "omit-xml-declaration", oo.omitXmlDeclaration);
1.46      paf       538:                                // $.standalone[yes|no]
1.111   ! paf       539:                                param_option_over_output_option(*options, "standalone", oo.standalone);
1.46      paf       540:                                // $.doctype-public[?]
1.111   ! paf       541:                                param_option_over_output_option(*options, "doctype-public", oo.doctypePublic);
1.46      paf       542:                                // $.doctype-system[?]
1.111   ! paf       543:                                param_option_over_output_option(*options, "doctype-system", oo.doctypeSystem);
1.46      paf       544:                                // $.indent[yes|no]
1.111   ! paf       545:                                param_option_over_output_option(*options, "indent", oo.indent);
1.46      paf       546:                                // $.media-type[text/{html|xml|plain}]
1.111   ! paf       547:                                param_option_over_output_option(*options, "media-type", oo.mediaType);                           
1.19      parser    548:                        }
1.1       parser    549:                }
                    550:        }
                    551: 
1.46      paf       552:        // default encoding from pool
1.61      paf       553:        if(!oo.encoding)
1.111   ! paf       554:                oo.encoding=new String(r.charsets.source().NAME(), String::L_TAINTED);
1.46      paf       555:        // default method=xml
                    556:        if(!oo.method)
1.111   ! paf       557:                oo.method=new String(XDOC_OUTPUT_METHOD_OPTION_VALUE_XML);
1.61      paf       558:        // default mediaType = depending on method
                    559:        if(!oo.mediaType) {
                    560:                if(*oo.method==XDOC_OUTPUT_METHOD_OPTION_VALUE_XML)
1.111   ! paf       561:                        oo.mediaType=new String("text/xml");
1.61      paf       562:                else if(*oo.method==XDOC_OUTPUT_METHOD_OPTION_VALUE_HTML)
1.111   ! paf       563:                        oo.mediaType=new String("text/html");
1.61      paf       564:                else // XDOC_OUTPUT_METHOD_OPTION_VALUE_TEXT & all others
1.111   ! paf       565:                        oo.mediaType=new String("text/plain");
1.61      paf       566:        }
                    567: }
1.46      paf       568: 
1.111   ! paf       569: struct Xdoc2buf_result {
        !           570:        char* str;
        !           571:        size_t length;
        !           572: };
        !           573: static Xdoc2buf_result xdoc2buf(Request& r, VXdoc& vdoc, 
        !           574:                                         MethodParams& params, int index,
1.63      paf       575:                                         VXdoc::Output_options& oo,
1.111   ! paf       576:                                         const String* file_spec) {
        !           577:        Xdoc2buf_result result;
        !           578:        prepare_output_options(r, params, index,
1.61      paf       579:                oo);
                    580: 
1.111   ! paf       581:        const char* encoding_cstr=oo.encoding->cstr();
1.63      paf       582:        xmlCharEncodingHandler *encoder=xmlFindCharEncodingHandler(encoding_cstr);
                    583:        if(!encoder)
1.87      paf       584:                throw Exception("parser.runtime",
1.111   ! paf       585:                        0,
1.63      paf       586:                        "encoding '%s' not supported", encoding_cstr);
1.61      paf       587:        // UTF-8 encoder contains empty input/output converters, 
                    588:        // which is wrong for xmlOutputBufferCreateIO
                    589:        // while zero encoder goes perfectly 
                    590:        if(encoder && strcmp(encoder->name, "UTF-8")==0)
                    591:                encoder=0;
                    592: 
1.62      paf       593:        xmlOutputBuffer_auto_ptr outputBuffer(xmlAllocOutputBuffer(encoder));
1.61      paf       594: 
1.65      paf       595:        xsltStylesheet_auto_ptr stylesheet(xsltNewStylesheet());
                    596:        if(!stylesheet.get())
1.87      paf       597:                throw Exception(0,
1.111   ! paf       598:                        0,
1.61      paf       599:                        "xsltNewStylesheet failed");
                    600: 
1.62      paf       601:        #define OOS2STYLE(name) \
1.111   ! paf       602:                stylesheet->name=oo.name?BAD_CAST xmlMemStrdup(r.transcode(*oo.name)->str):0
1.62      paf       603:        #define OOE2STYLE(name) \
                    604:                stylesheet->name=oo.name
1.61      paf       605: 
1.62      paf       606:        OOS2STYLE(method);
                    607:        OOS2STYLE(encoding);
                    608:        OOS2STYLE(mediaType);
                    609:        OOS2STYLE(doctypeSystem);
                    610:        OOS2STYLE(doctypePublic);
                    611:        OOE2STYLE(indent);
                    612:        OOS2STYLE(version);
                    613:        OOE2STYLE(standalone);
                    614:        OOE2STYLE(omitXmlDeclaration);
1.61      paf       615: 
1.111   ! paf       616:        xmlDoc *document=gdome_xml_doc_get_xmlDoc(vdoc.get_document());
1.81      paf       617:        if(xsltSaveResultTo(outputBuffer.get(), document, stylesheet.get())<0) {
1.75      paf       618:                GdomeException exc=0;
1.111   ! paf       619:                throw Exception(0, exc);
1.75      paf       620:        }
1.61      paf       621: 
1.54      paf       622:        // write out result
1.111   ! paf       623:        char *gnome_str;  size_t gnome_length;
1.63      paf       624:        if(outputBuffer->conv) {
1.111   ! paf       625:                gnome_length=outputBuffer->conv->use;
        !           626:                gnome_str=(char *)outputBuffer->conv->content;
1.63      paf       627:        } else {
1.111   ! paf       628:                gnome_length=outputBuffer->buffer->use;
        !           629:                gnome_str=(char *)outputBuffer->buffer->content;
1.63      paf       630:        }
1.111   ! paf       631: 
1.63      paf       632:        if(file_spec)
1.111   ! paf       633:                file_write(*file_spec,
        !           634:                        gnome_str, gnome_length, 
        !           635:                        true/*as_text*/);
        !           636:        else if(result.length=gnome_length) {
        !           637:                result.str=pa_strdup(gnome_str, gnome_length);
1.74      paf       638:        } else
1.111   ! paf       639:                result.str=0;
        !           640: 
        !           641:        return result;
1.1       parser    642: }
                    643: 
1.111   ! paf       644: static void _file(Request& r, MethodParams& params) {
        !           645:        VXdoc& vdoc=GET_SELF(r, VXdoc);
1.63      paf       646:        VXdoc::Output_options oo(vdoc.output_options);
1.111   ! paf       647:        Xdoc2buf_result buf=xdoc2buf(r, vdoc, params, 0, 
1.63      paf       648:                oo,
1.111   ! paf       649:                0/*not to file, to memory*/);
1.63      paf       650:        // write out result
1.111   ! paf       651:        r.write_no_lang(String(buf.str, buf.length));
1.1       parser    652: 
1.58      paf       653:        // write out result
1.111   ! paf       654:        VFile& vfile=*new VFile;
        !           655:        VHash& vhcontent_type=*new VHash;
        !           656:        vhcontent_type.hash().put(
        !           657:                value_name, 
        !           658:                new VString(*oo.mediaType));
        !           659:        vhcontent_type.hash().put(
        !           660:                StringBody("charset"), 
        !           661:                new VString(*oo.encoding));
        !           662: 
        !           663:        vfile.set(false/*tainted*/, buf.str?buf.str:""/*to distinguish from stat-ed file*/, buf.length, 
        !           664:                0/*file_name*/, &vhcontent_type);
1.58      paf       665:        r.write_no_lang(vfile);
1.63      paf       666: }
                    667: 
1.111   ! paf       668: static void _save(Request& r, MethodParams& params) {
        !           669:        VXdoc& vdoc=GET_SELF(r, VXdoc);
1.63      paf       670: 
1.111   ! paf       671:        const String& file_spec=r.absolute(params.as_string(0, "file name must be string"));
1.63      paf       672:        
                    673:        VXdoc::Output_options oo(vdoc.output_options);
1.111   ! paf       674:        xdoc2buf(r, vdoc, params, 1, 
1.63      paf       675:                oo,
1.111   ! paf       676:                &file_spec);
1.63      paf       677: }
                    678: 
1.111   ! paf       679: static void _string(Request& r, MethodParams& params) {
        !           680:        VXdoc& vdoc=GET_SELF(r, VXdoc);
1.63      paf       681:        VXdoc::Output_options oo(vdoc.output_options);
1.111   ! paf       682:        Xdoc2buf_result buf=xdoc2buf(r, vdoc, params, 0, 
1.63      paf       683:                oo,
1.111   ! paf       684:                0/*not to file, to memory*/);
1.63      paf       685:        // write out result
1.111   ! paf       686:        r.write_no_lang(String(buf.str, buf.length));
1.1       parser    687: }
1.58      paf       688: 
1.111   ! paf       689: #ifndef DOXYGEN
        !           690: struct Add_xslt_param_info {
        !           691:        Request* r;
        !           692:        Array<GdomeDOMString_auto_ptr>* strings;
        !           693:        const char** current_transform_param;
        !           694: };
        !           695: #endif
        !           696: static void add_xslt_param(
        !           697:                           HashStringValue::key_type attribute, 
        !           698:                           HashStringValue::value_type meaning, 
        !           699:                           Add_xslt_param_info* info) {
        !           700:        GdomeDOMString_auto_ptr s;
        !           701:        *info->current_transform_param++=(s=info->r->transcode(attribute))->str; *info->strings+=s;
        !           702:        *info->current_transform_param++=(s=info->r->transcode(meaning->as_string()))->str; *info->strings+=s;
        !           703: }
        !           704: static VXdoc& _transform(Request& r, const String* stylesheet_source, 
        !           705:                                                   VXdoc& vdoc, xsltStylesheetPtr stylesheet, const char** transform_params) {
        !           706:        xmlDoc *document=gdome_xml_doc_get_xmlDoc(vdoc.get_document());
1.65      paf       707:        xsltTransformContext_auto_ptr transformContext(
                    708:                xsltNewTransformContext(stylesheet, document));
1.90      paf       709:        // make params literal
1.111   ! paf       710:        if (transformContext->globalVars == NULL) // strangly not initialized by xsltNewTransformContext
1.90      paf       711:                transformContext->globalVars = xmlHashCreate(20);
                    712:        xsltQuoteUserParams(transformContext.get(), transform_params);
                    713:        // do transform
1.59      paf       714:        xmlDoc *transformed=xsltApplyStylesheetUser(
                    715:                stylesheet,
                    716:                document,
1.90      paf       717:                0/*already quoted-inserted  transform_params*/,
1.111   ! paf       718:                0/*const char* output*/,
1.59      paf       719:                0/*FILE *profile*/,
1.65      paf       720:                transformContext.get());
1.66      paf       721:        if(!transformed || xmlHaveGenericErrors()) {
                    722:                GdomeException exc=0;
1.111   ! paf       723:                throw Exception(stylesheet_source, exc);
1.66      paf       724:        }
1.42      paf       725: 
1.61      paf       726:        //gdome_xml_doc_mkref dislikes XML_HTML_DOCUMENT_NODE  type, fixing
                    727:        transformed->type=XML_DOCUMENT_NODE;
1.59      paf       728:        // constructing result
                    729:        GdomeDocument *gdomeDocument=gdome_xml_doc_mkref(transformed);
                    730:        if(!gdomeDocument)
1.87      paf       731:                throw Exception(0,
1.111   ! paf       732:                        0,
1.59      paf       733:                        "gdome_xml_doc_mkref failed");
1.111   ! paf       734:        VXdoc& result=*new VXdoc(&r.charsets, gdomeDocument);
1.61      paf       735:        /* grabbing options
                    736: 
                    737:                <xsl:output
                    738:                !method = "xml" | "html" | "text"
                    739:                        X| qname-but-not-ncname 
                    740:                !version = nmtoken 
                    741:                !encoding = string 
                    742:                !omit-xml-declaration = "yes" | "no"
                    743:                !standalone = "yes" | "no"
                    744:                !doctype-public = string 
                    745:                !doctype-system = string 
                    746:                Xcdata-section-elements = qnames 
                    747:                !indent = "yes" | "no"
                    748:                !media-type = string /> 
1.59      paf       749:        */
                    750:        VXdoc::Output_options& oo=result.output_options;
                    751: 
1.111   ! paf       752:        oo.method=stylesheet->method?&r.transcode(stylesheet->method):0;
        !           753:        oo.encoding=stylesheet->encoding?&r.transcode(stylesheet->encoding):0;
        !           754:        oo.mediaType=stylesheet->mediaType?&r.transcode(stylesheet->mediaType):0;
        !           755:        oo.doctypeSystem=stylesheet->doctypeSystem?&r.transcode(stylesheet->doctypeSystem):0;
        !           756:        oo.doctypePublic=stylesheet->doctypePublic?&r.transcode(stylesheet->doctypePublic):0;
1.59      paf       757:        oo.indent=stylesheet->indent!=0;
1.111   ! paf       758:        oo.version=stylesheet->version?&r.transcode(stylesheet->version):0;
1.59      paf       759:        oo.standalone=stylesheet->standalone!=0;
                    760:        oo.omitXmlDeclaration=stylesheet->omitXmlDeclaration!=0;
                    761: 
1.93      paf       762:        // return
                    763:        return result;
                    764: }
1.111   ! paf       765: static void _transform(Request& r, MethodParams& params) {
        !           766:        VXdoc& vdoc=GET_SELF(r, VXdoc);
1.93      paf       767: 
                    768:        // params
1.111   ! paf       769:        Array<GdomeDOMString_auto_ptr> transform_strings;
        !           770:        const char** transform_params=0;
        !           771:        if(params.count()>1) {
        !           772:                Value& vparams=params.as_no_junction(1, "transform parameters must be hash");
1.106     paf       773:                if(!vparams.is_string())
1.111   ! paf       774:                        if(HashStringValue* hash=vparams.get_hash()) {
        !           775:                                transform_params=new(UseGC) const char*[hash->count()*2+1];
        !           776:                                Add_xslt_param_info info={
        !           777:                                        &r, 
        !           778:                                        &transform_strings,
        !           779:                                        transform_params
        !           780:                                };
        !           781:                                hash->for_each(add_xslt_param, &info);
        !           782:                                transform_params[hash->count()*2]=0;                            
1.93      paf       783:                        } else
                    784:                                throw Exception("parser.runtime",
1.111   ! paf       785:                                        0,
1.93      paf       786:                                        "transform parameters parameter must be hash");
                    787:        }
                    788: 
1.111   ! paf       789:        VXdoc* result;
        !           790:        if(Value *vxdoc=params[0].as(VXDOC_TYPE, false)) { // stylesheet (xdoc)
1.93      paf       791:                xmlDoc *document=gdome_xml_doc_get_xmlDoc(
1.111   ! paf       792:                        static_cast<VXdoc *>(vxdoc)->get_document());
1.93      paf       793:                // compile xdoc stylesheet
1.94      paf       794:                xsltStylesheet_auto_ptr stylesheet_ptr(xsltParseStylesheetDoc(document)); 
                    795:                // strange thing - xsltParseStylesheetDoc records document and destroys it in stylesheet destructor
                    796:                // we don't need that
                    797:                stylesheet_ptr->doc=0;
1.93      paf       798:                if(xmlHaveGenericErrors()) {
                    799:                        GdomeException exc=0;
1.111   ! paf       800:                        throw Exception(0, exc);
1.93      paf       801:                }
                    802:                if(!stylesheet_ptr.get())
                    803:                        throw Exception("xml",
1.111   ! paf       804:                                0,
1.93      paf       805:                                "stylesheet failed to compile");
                    806: 
                    807:                // transform!
1.111   ! paf       808:                result=&_transform(r, 0,
1.93      paf       809:                        vdoc, stylesheet_ptr.get(),
                    810:                        transform_params);
                    811:        } else { // stylesheet (file name)
                    812:                // extablish stylesheet connection
                    813:                const String& stylesheet_filespec=
1.111   ! paf       814:                        r.absolute(params.as_string(0, "stylesheet must be file name (string) or DOM document (xdoc)"));
        !           815:                Stylesheet_connection_ptr connection=stylesheet_manager.get_connection(stylesheet_filespec);
1.93      paf       816: 
                    817:                // load and compile file to stylesheet [or get cached if any]
                    818:                // transform!
1.111   ! paf       819:                result=&_transform(r, &stylesheet_filespec,
1.93      paf       820:                        vdoc, connection->stylesheet(false/*nocache*/),
                    821:                        transform_params);
                    822:        }
                    823: 
1.59      paf       824:        // write out result
1.93      paf       825:        r.write_no_lang(*result);
1.1       parser    826: }
                    827: 
1.16      parser    828: // constructor
1.2       parser    829: 
1.92      paf       830: /// @test how to create empty type html?
1.111   ! paf       831: MXdoc::MXdoc(): MXnode(XDOC_CLASS_NAME, xnode_class) {
1.16      parser    832:        /// DOM1
1.2       parser    833: 
1.16      parser    834:        // Element createElement(in DOMString tagName) raises(DOMException);
                    835:        add_native_method("createElement", Method::CT_DYNAMIC, _createElement, 1, 1);
                    836:        // DocumentFragment createDocumentFragment(); 
                    837:        add_native_method("createDocumentFragment", Method::CT_DYNAMIC, _createDocumentFragment, 0, 0);
                    838:        // Text createTextNode(in DOMString data);
                    839:        add_native_method("createTextNode", Method::CT_DYNAMIC, _createTextNode, 1, 1);
                    840:        // Comment createComment(in DOMString data);
                    841:        add_native_method("createComment", Method::CT_DYNAMIC, _createComment, 1, 1);
                    842:        // CDATASection createCDATASection(in DOMString data) raises(DOMException);
                    843:        add_native_method("createCDATASection", Method::CT_DYNAMIC, _createCDATASection, 1, 1);
                    844:        // ProcessingInstruction createProcessingInstruction(in DOMString target, in DOMString data) raises(DOMException);
                    845:        add_native_method("createProcessingInstruction", Method::CT_DYNAMIC, _createProcessingInstruction, 2, 2);
                    846:        // Attr createAttribute(in DOMString name) raises(DOMException);
                    847:        add_native_method("createAttribute", Method::CT_DYNAMIC, _createAttribute, 1, 1);
                    848:        // EntityReference createEntityReference(in DOMString name) raises(DOMException);
                    849:        add_native_method("createEntityReference", Method::CT_DYNAMIC, _createEntityReference, 1, 1);
1.99      paf       850:        // NodeList getElementsByTagName(in DOMString name);
                    851:        add_native_method("getElementsByTagName", Method::CT_DYNAMIC, _getElementsByTagName, 1, 1);
1.2       parser    852: 
1.79      paf       853:        /// DOM2
1.2       parser    854: 
1.16      parser    855:        // ^xdoc.getElementById[elementId]
                    856:        add_native_method("getElementById", Method::CT_DYNAMIC, _getElementById, 1, 1);
1.79      paf       857: 
                    858:     // Node (in Node importedNode, in boolean deep) raises(DOMException)
                    859:        add_native_method("importNode", Method::CT_DYNAMIC, _importNode, 2, 2);
1.99      paf       860: 
                    861:        // NodeList getElementsByTagNameNS(in DOMString namespaceURI, in DOMString localName);
                    862:        add_native_method("getElementsByTagNameNS", Method::CT_DYNAMIC, _getElementsByTagNameNS, 2, 2);
1.1       parser    863: 
1.16      parser    864:        /// parser
                    865:        
1.54      paf       866:        // ^xdoc::create{qualifiedName}
1.95      paf       867:        // ^xdoc::create[<some>xml</some>]
                    868:        // ^xdoc::create[URI][<some>xml</some>]
                    869:        add_native_method("create", Method::CT_DYNAMIC, _create, 1, 2); 
1.83      paf       870:        // for backward compatibility with <=v 1.82 2002/01/31 11:51:46 paf
                    871:        add_native_method("set", Method::CT_DYNAMIC, _create, 1, 1);
1.54      paf       872: 
                    873:        // ^xdoc::load[some.xml]
1.105     paf       874:        add_native_method("load", Method::CT_DYNAMIC, _load, 1, 2);
1.54      paf       875: 
1.2       parser    876:        // ^xdoc.save[some.xml]
                    877:        // ^xdoc.save[some.xml;options hash]
1.1       parser    878:        add_native_method("save", Method::CT_DYNAMIC, _save, 1, 2);
                    879: 
1.2       parser    880:        // ^xdoc.string[] <doc/>
                    881:        // ^xdoc.string[options hash] <doc/>
1.1       parser    882:        add_native_method("string", Method::CT_DYNAMIC, _string, 0, 1);
                    883: 
1.2       parser    884:        // ^xdoc.file[] file with "<doc/>"
                    885:        // ^xdoc.file[options hash] file with "<doc/>"
1.58      paf       886:        add_native_method("file", Method::CT_DYNAMIC, _file, 0, 1);
1.1       parser    887: 
1.98      paf       888:        // ^xdoc.transform[stylesheet file_name/xdoc]
                    889:        // ^xdoc.transform[stylesheet file_name/xdoc;params hash]
1.59      paf       890:        add_native_method("transform", Method::CT_DYNAMIC, _transform, 1, 2);
1.2       parser    891: 
1.1       parser    892: }
1.5       parser    893: 
                    894: void MXdoc::configure_admin(Request& r) {
                    895: }
                    896: 
1.111   ! paf       897: # else
        !           898: 
        !           899: #include "classes.h"
        !           900: 
1.1       parser    901: // global variable
                    902: 
1.111   ! paf       903: DECLARE_CLASS_VAR(xdoc, 0, 0); // fictive
1.1       parser    904: 
                    905: #endif
                    906: 

E-mail: