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

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

E-mail: