--- parser3/src/classes/xdoc.C 2001/10/26 12:21:35 1.35 +++ parser3/src/classes/xdoc.C 2001/12/28 14:06:50 1.54 @@ -2,9 +2,9 @@ Parser: @b xdoc parser class. Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com) - Author: Alexander Petrosyan (http://design.ru/paf) + Author: Alexander Petrosyan (http://paf.design.ru) - $Id: xdoc.C,v 1.35 2001/10/26 12:21:35 paf Exp $ + $Id: xdoc.C,v 1.54 2001/12/28 14:06:50 paf Exp $ */ #include "pa_types.h" #include "classes.h" @@ -12,37 +12,12 @@ #include "pa_request.h" #include "pa_vxdoc.h" -#include "pa_stylesheet_manager.h" -#include "pa_stylesheet_connection.h" +//#include "pa_stylesheet_manager.h" +//#include "pa_stylesheet_connection.h" +#include "pa_charset.h" #include "pa_vfile.h" #include "xnode.h" -#include -#include -#include -#include -#include "XalanTransformer2.hpp" -#include -# include -# include -# include -# include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include - // defines #define XDOC_CLASS_NAME "xdoc" @@ -51,16 +26,13 @@ #define XDOC_OUTPUT_METHOD_OPTION_VALUE_XML "xml" #define XDOC_OUTPUT_METHOD_OPTION_VALUE_HTML "html" #define XDOC_OUTPUT_METHOD_OPTION_VALUE_TEXT "text" - -#define XDOC_OUTPUT_ENCODING_OPTION_NAME "encoding" - #define XDOC_OUTPUT_DEFAULT_INDENT 4 // class class MXdoc : public MXnode { public: // VStateless_class - Value *create_new_value(Pool& pool) { return new(pool) VXdoc(pool, 0, false); } + Value *create_new_value(Pool& pool) { return new(pool) VXdoc(pool, 0); } public: MXdoc(Pool& pool); @@ -72,6 +44,20 @@ public: // Methoded // methods +static void writeNode(Request& r, const String& method_name, GdomeNode *node, + GdomeException exc) { + if(!node || exc) + throw Exception(0, 0, + &method_name, + exc); + + Pool& pool=r.pool(); + + // write out result + VXnode& result=*new(pool) VXnode(pool, node); + r.write_no_lang(result); +} + // Element createElement(in DOMString tagName) raises(DOMException); static void _createElement(Request& r, const String& method_name, MethodParams *params) { Pool& pool=r.pool(); @@ -79,16 +65,12 @@ static void _createElement(Request& r, c const String& tagName=params->as_string(0, "tagName must be string"); - try { - XalanNode *node= - vdoc.get_document(pool, &method_name). - createElement(*pool.transcode(tagName)); - // write out result - VXnode& result=*new(pool) VXnode(pool, node, false); - r.write_no_lang(result); - } catch(const XalanDOMException& e) { - Exception::provide_source(pool, &method_name, e); - } + GdomeException exc; + GdomeNode *node= + (GdomeNode *)gdome_doc_createElement(vdoc.get_document(&method_name), + pool.transcode(tagName), + &exc); + writeNode(r, method_name, node, exc); } // DocumentFragment createDocumentFragment() @@ -96,12 +78,12 @@ static void _createDocumentFragment(Requ Pool& pool=r.pool(); VXdoc& vdoc=*static_cast(r.self); - XalanNode *node= - vdoc.get_document(pool, &method_name). - createDocumentFragment(); - // write out result - VXnode& result=*new(pool) VXnode(pool, node, false); - r.write_no_lang(result); + GdomeException exc; + GdomeNode *node= + (GdomeNode *)gdome_doc_createDocumentFragment( + vdoc.get_document(&method_name), + &exc); + writeNode(r, method_name, node, exc); } // Text createTextNode(in DOMString data); @@ -111,12 +93,12 @@ static void _createTextNode(Request& r, const String& data=params->as_string(0, "data must be string"); - XalanNode *node= - vdoc.get_document(pool, &method_name). - createTextNode(*pool.transcode(data)); - // write out result - VXnode& result=*new(pool) VXnode(pool, node, false); - r.write_no_lang(result); + GdomeException exc; + GdomeNode *node=(GdomeNode *)gdome_doc_createTextNode( + vdoc.get_document(&method_name), + pool.transcode(data), + &exc); + writeNode(r, method_name, node, exc); } // Comment createComment(in DOMString data) @@ -126,12 +108,12 @@ static void _createComment(Request& r, c const String& data=params->as_string(0, "data must be string"); - XalanNode *node= - vdoc.get_document(pool, &method_name). - createComment(*pool.transcode(data)); - // write out result - VXnode& result=*new(pool) VXnode(pool, node, false); - r.write_no_lang(result); + GdomeException exc; + GdomeNode *node=(GdomeNode *)gdome_doc_createComment( + vdoc.get_document(&method_name), + pool.transcode(data), + &exc); + writeNode(r, method_name, node, exc); } // CDATASection createCDATASection(in DOMString data) raises(DOMException); @@ -141,16 +123,12 @@ static void _createCDATASection(Request& const String& data=params->as_string(0, "data must be string"); - try { - XalanNode *node= - vdoc.get_document(pool, &method_name). - createCDATASection(*pool.transcode(data)); - // write out result - VXnode& result=*new(pool) VXnode(pool, node, false); - r.write_no_lang(result); - } catch(const XalanDOMException& e) { - Exception::provide_source(pool, &method_name, e); - } + GdomeException exc; + GdomeNode *node=(GdomeNode *)gdome_doc_createCDATASection( + vdoc.get_document(&method_name), + pool.transcode(data), + &exc); + writeNode(r, method_name, node, exc); } // ProcessingInstruction createProcessingInstruction(in DOMString target,in DOMString data) raises(DOMException); @@ -161,16 +139,13 @@ static void _createProcessingInstruction const String& target=params->as_string(0, "data must be string"); const String& data=params->as_string(1, "data must be string"); - try { - XalanNode *node= - vdoc.get_document(pool, &method_name). - createProcessingInstruction(*pool.transcode(target), *pool.transcode(data)); - // write out result - VXnode& result=*new(pool) VXnode(pool, node, false); - r.write_no_lang(result); - } catch(const XalanDOMException& e) { - Exception::provide_source(pool, &method_name, e); - } + GdomeException exc; + GdomeNode *node=(GdomeNode *)gdome_doc_createProcessingInstruction( + vdoc.get_document(&method_name), + pool.transcode(target), + pool.transcode(data), + &exc); + writeNode(r, method_name, node, exc); } // Attr createAttribute(in DOMString name) raises(DOMException); @@ -180,16 +155,12 @@ static void _createAttribute(Request& r, const String& name=params->as_string(0, "name must be string"); - try { - XalanNode *node= - vdoc.get_document(pool, &method_name). - createAttribute(*pool.transcode(name)); - // write out result - VXnode& result=*new(pool) VXnode(pool, node, false); - r.write_no_lang(result); - } catch(const XalanDOMException& e) { - Exception::provide_source(pool, &method_name, e); - } + GdomeException exc; + GdomeNode *node=(GdomeNode *)gdome_doc_createAttribute( + vdoc.get_document(&method_name), + pool.transcode(name), + &exc); + writeNode(r, method_name, node, exc); } // EntityReference createEntityReference(in DOMString name) raises(DOMException); static void _createEntityReference(Request& r, const String& method_name, MethodParams *params) { @@ -198,30 +169,29 @@ static void _createEntityReference(Reque const String& name=params->as_string(0, "name must be string"); - try { - XalanNode *node= - vdoc.get_document(pool, &method_name). - createEntityReference(*pool.transcode(name)); - // write out result - VXnode& result=*new(pool) VXnode(pool, node, false); - r.write_no_lang(result); - } catch(const XalanDOMException& e) { - Exception::provide_source(pool, &method_name, e); - } + GdomeException exc; + GdomeNode *node=(GdomeNode *)gdome_doc_createEntityReference( + vdoc.get_document(&method_name), + pool.transcode(name), + &exc); + writeNode(r, method_name, node, exc); } -/* static void _getElementsByTagName(Request& r, const String& method_name, MethodParams *params) { Pool& pool=r.pool(); VXdoc& vdoc=*static_cast(r.self); - // tagname - const char *name=params->as_string(0, "name must be string").cstr(String::UL_XML); + const String& name=params->as_string(0, "name must be string"); + GdomeException exc; VHash& result=*new(pool) VHash(pool); - if(const XalanNodeList *nodes= - vdoc.get_document(pool, &method_name).getElementsByTagName(XalanDOMString(name))) { - for(int i=0; igetLength(); i++) { + if(GdomeNodeList *nodes= + gdome_doc_getElementsByTagName( + vdoc.get_document(&method_name), + pool.transcode(name), + &exc)) { + gulong length=gdome_nl_length(nodes, &exc); + for(gulong i=0; iitem(i))); + result.hash(0).put(skey, new(pool) VXnode(pool, gdome_nl_item(nodes, i, &exc))); } } @@ -242,14 +212,19 @@ static void _getElementsByTagNameNS(Requ VXdoc& vdoc=*static_cast(r.self); // namespaceURI;localName - const char *namespaceURI=params->as_string(0, "namespaceURI must be string").cstr(String::UL_XML); - const char *localName=params->as_string(0, "localName must be string").cstr(String::UL_XML); + const String& namespaceURI=params->as_string(0, "namespaceURI must be string"); + const String& localName=params->as_string(0, "localName must be string"); + GdomeException exc; VHash& result=*new(pool) VHash(pool); - if(const XalanNodeList *nodes= - vdoc.get_document(pool, &method_name).getElementsByTagNameNS( - XalanDOMString(namespaceURI), XalanDOMString(localName))) { - for(int i=0; igetLength(); i++) { + if(GdomeNodeList *nodes= + gdome_doc_getElementsByTagNameNS( + vdoc.get_document(&method_name), + pool.transcode(namespaceURI), + pool.transcode(localName), + &exc)) { + gulong length=gdome_nl_length(nodes, &exc); + for(gulong i=0; iitem(i))); + result.hash(0).put(skey, new(pool) VXnode(pool, gdome_nl_item(nodes, i, &exc))); } } + // write out result r.write_no_lang(result); } -*/ - - -class ParserStringXalanOutputStream: public XalanOutputStream { -public: - - explicit ParserStringXalanOutputStream(String& astring) : fstring(astring) {} - -protected: // XalanOutputStream - - virtual void writeData(const char *theBuffer, unsigned long theBufferLength) { - char *copy=(char *)fstring.malloc((size_t)theBufferLength); - memcpy(copy, theBuffer, (size_t)theBufferLength); - fstring.APPEND_CLEAN(copy, (size_t)theBufferLength, "xdoc", 0); - } - virtual void doFlush() {} - -private: - - String& fstring; - -}; +static void _getElementById(Request& r, const String& method_name, MethodParams *params) { + Pool& pool=r.pool(); + VXdoc& vdoc=*static_cast(r.self); -class XalanSourceTreeParserLiaison2: public XalanSourceTreeParserLiaison { -public: - XalanSourceTreeParserLiaison2(XalanSourceTreeDOMSupport& theSupport) : XalanSourceTreeParserLiaison(theSupport), - ferror_handler(new HandlerBase) { - } + // elementId + const String& elementId=params->as_string(0, "elementID must be string"); - XalanDocument* - parseXMLStream2( - const InputSource& inputSource) { - XalanSourceTreeContentHandler theContentHandler(createXalanSourceTreeDocument()); - XalanAutoPtr theReader(XMLReaderFactory::createXMLReader()); - theReader->setContentHandler(&theContentHandler); - theReader->setDTDHandler(&theContentHandler); - theReader->setErrorHandler(ferror_handler); // disable stderr output - theReader->setLexicalHandler(&theContentHandler); - EntityResolver* const theResolver = getEntityResolver(); - if (theResolver != 0) { - theReader->setEntityResolver(theResolver); - } - theReader->parse(inputSource); - return theContentHandler.getDocument(); - } - - ~XalanSourceTreeParserLiaison2() { - delete ferror_handler; - } -private: - ErrorHandler *ferror_handler; -}; + GdomeException exc; + if(GdomeNode *node=(GdomeNode *)gdome_doc_getElementById( + vdoc.get_document(&method_name), + pool.transcode(elementId), + &exc)) { + // write out result + VXnode& result=*new(pool) VXnode(pool, node); + r.write_no_lang(result); + } else if(exc) + throw Exception(0, 0, + &method_name, + exc); +} +/* +GdomeNode *gdome_doc_importNode (GdomeDocument *self, GdomeNode *importedNode, GdomeBoolean deep, GdomeException *exc); +GdomeElement *gdome_doc_createElementNS (GdomeDocument *self, GdomeDOMString *namespaceURI, GdomeDOMString *qualifiedName, GdomeException *exc); +GdomeAttr *gdome_doc_createAttributeNS (GdomeDocument *self, GdomeDOMString *namespaceURI, GdomeDOMString *qualifiedName, GdomeException *exc); +GdomeNodeList *gdome_doc_getElementsByTagNameNS (GdomeDocument *self, GdomeDOMString *namespaceURI, GdomeDOMString *localName, GdomeException *exc); +*/ -class XalanDefaultParsedSource2 : public XalanParsedSource -{ -public: - XalanDefaultParsedSource2(const XSLTInputSource& theInputSource); +static void _create(Request& r, const String& method_name, MethodParams *params) { + //_asm int 3; + Pool& pool=r.pool(); + VXdoc& vdoc=*static_cast(r.self); - virtual XalanDocument* - getDocument() const; + const String& qualifiedName=params->as_string(0, "qualifiedName must be string"); - virtual XalanParsedSourceHelper* - createHelper() const; + GdomeException exc; + /* + GdomeDocumentType *documentType=gdome_di_createDocumentType ( + docimpl, + pool.transcode(qualifiedName), + 0/*publicId* /, + 0/*systemId* /, + &exc); + if(!documentType || exc) + throw Exception(0, 0, + &method_name, + exc); + */ + GdomeDocument *document=gdome_di_createDocument (domimpl, + 0/*namespaceURI*/, + pool.transcode(qualifiedName), + 0/*doctype*/, + &exc); + if(!document || exc) + throw Exception(0, 0, + &method_name, + exc); -private: + /// +createXMLDecl ? + //document.appendChild(document.createElement(*pool.transcode(qualifiedName))); - XalanSourceTreeDOMSupport m_domSupport; + // replace any previous parsed source + vdoc.set_document(document); +} - XalanSourceTreeParserLiaison2 m_parserLiaison2; +static void _set(Request& r, const String& method_name, MethodParams *params) { +// _asm int 3; + Pool& pool=r.pool(); + VXdoc& vdoc=*static_cast(r.self); - XalanSourceTreeDocument* const m_parsedSource; -}; + Value& vxml=params->as_junction(0, "xml must be code"); + Temp_lang temp_lang(r, String::UL_XML); + const String& xml=r.process(vxml).as_string(); -XalanDefaultParsedSource2::XalanDefaultParsedSource2(const XSLTInputSource& theInputSource): - XalanParsedSource(), - m_domSupport(), - m_parserLiaison2(m_domSupport), - m_parsedSource(m_parserLiaison2.mapDocument(m_parserLiaison2.parseXMLStream2(theInputSource))) -{ - assert(m_parsedSource != 0); + GdomeException exc; + GdomeDocument *document=gdome_di_createDocFromMemory(domimpl, + xml.cstr(String::UL_UNSPECIFIED, r.connection), + GDOME_LOAD_VALIDATING + /*GDOME_LOAD_PARSING */ + /*|GDOME_LOAD_SUBSTITUTE_ENTITIES */, + &exc); + if(!document || exc) + throw Exception(0, 0, + &method_name, + exc); - m_domSupport.setParserLiaison(&m_parserLiaison2); + // replace any previous parsed source + vdoc.set_document(document); } +static void _load(Request& r, const String& method_name, MethodParams *params) { + Pool& pool=r.pool(); + VXdoc& vdoc=*static_cast(r.self); + // filespec + const String& file_name=params->as_string(0, "uri must be string"); + const String& uri=r.absolute(file_name); + + GdomeException exc; + GdomeDocument *document=gdome_di_createDocFromURI(domimpl, + uri.cstr(), + GDOME_LOAD_VALIDATING + /*GDOME_LOAD_PARSING */ + /*|GDOME_LOAD_SUBSTITUTE_ENTITIES */, + &exc); + if(!document || exc) + throw Exception(0, 0, + &method_name, + exc); -XalanDocument* -XalanDefaultParsedSource2::getDocument() const -{ - return m_parsedSource; + // replace any previous parsed source + vdoc.set_document(document); } - - -XalanParsedSourceHelper* -XalanDefaultParsedSource2::createHelper() const -{ - return new XalanDefaultParsedSourceHelper(m_domSupport); +/* +static void param_option_over_output_option(Pool& pool, + Hash *param_options, const char *option_name, + XalanDOMString& output_option) { + if(Value *value=static_cast(param_options->get(*new(pool) + String(pool, option_name)))) { + output_option.clear(); + output_option.append(value->as_string().cstr()); + } +} +static void param_option_over_output_option(Pool& pool, + Hash *param_options, const char *option_name, + bool& output_option) { + if(Value *value=static_cast(param_options->get(*new(pool) + String(pool, option_name)))) { + const String& s=value->as_string(); + if(s=="yes") + output_option=true; + else if(s=="no") + output_option=false; + else + throw Exception(0, 0, + &s, + "%s must be either 'yes' or 'no'", option_name); + } } + static std::auto_ptr create_optioned_listener( + Pool& pool, const String& method_name, MethodParams *params, int index, + VXdoc::Output_options& oo, Writer& writer) { +/* + XalanDOMString encoding; + XalanDOMString mediaType; + XalanDOMString doctypeSystem; + XalanDOMString doctypePublic; + bool doIndent; + XalanDOMString version; + XalanDOMString standalone; + bool xmlDecl; +* / +/* + +* / + + /* + fToXML->setStripCData(stripCData); + fToXML->setEscapeCData(escapeCData); + * / - -static void create_optioned_listener( - const char *& content_type, const char *& charset, FormatterListener *& listener, - Pool& pool, - const String& method_name, MethodParams *params, int index, Writer& writer) { - // default encoding from pool - const String *scharset=&pool.get_charset(); - const String *method=0; - XalanDOMString xalan_encoding; - + // configuring with options from parameter... if(params->size()>index) { Value& voptions=params->as_no_junction(index, "options must be string"); if(voptions.is_defined()) { @@ -385,44 +423,74 @@ static void create_optioned_listener( // $.method[xml|html|text] if(Value *vmethod=static_cast(options->get(*new(pool) String(pool, XDOC_OUTPUT_METHOD_OPTION_NAME)))) - method=&vmethod->as_string(); + oo.method=vmethod->as_string().cstr(); + // $.version[1.0] + param_option_over_output_option(pool, options, "version", oo.version); // $.encoding[windows-1251|...] - if(Value *vencoding=static_cast(options->get(*new(pool) - String(pool, XDOC_OUTPUT_ENCODING_OPTION_NAME)))) { - scharset=&vencoding->as_string(); - } + param_option_over_output_option(pool, options, "encoding", oo.encoding); + // $.omit-xml-declaration[yes|no] + bool omit_xml_declaration=!oo.xmlDecl; + param_option_over_output_option(pool, options, "omit-xml-declaration", omit_xml_declaration); + oo.xmlDecl=!omit_xml_declaration; + // $.standalone[yes|no] + param_option_over_output_option(pool, options, "standalone", oo.standalone); + // $.doctype-public[?] + param_option_over_output_option(pool, options, "doctype-public", oo.doctypePublic); + // $.doctype-system[?] + param_option_over_output_option(pool, options, "doctype-system", oo.doctypeSystem); + // $.indent[yes|no] + param_option_over_output_option(pool, options, "indent", oo.doIndent); + // $.media-type[text/{html|xml|plain}] + param_option_over_output_option(pool, options, "media-type", oo.mediaType); } } } - xalan_encoding.append(charset=scharset->cstr()); - if(!method/*default='xml'*/ || *method == XDOC_OUTPUT_METHOD_OPTION_VALUE_XML) { - content_type="text/xml"; - listener=new FormatterToXML(writer, - XalanDOMString(), // version - true, // doIndent + // default encoding from pool + if(oo.encoding.empty()) + oo.encoding.append(pool.get_source_charset().name().cstr()); + // default method=xml + if(!oo.method) + oo.method=XDOC_OUTPUT_METHOD_OPTION_VALUE_XML; + + if(strcmp(oo.method, XDOC_OUTPUT_METHOD_OPTION_VALUE_XML)==0) { + if(oo.mediaType.empty()) + oo.mediaType.append("text/xml"); + return std::auto_ptr(new FormatterToXML(writer, + oo.version, + oo.doIndent, + XDOC_OUTPUT_DEFAULT_INDENT, // indent + oo.encoding, + oo.mediaType, + oo.doctypeSystem, + oo.doctypePublic, + oo.xmlDecl, + oo.standalone + )); + } else if(strcmp(oo.method, XDOC_OUTPUT_METHOD_OPTION_VALUE_HTML)==0) { + if(oo.mediaType.empty()) + oo.mediaType.append("text/html"); + return std::auto_ptr(new FormatterToHTML(writer, + oo.encoding, + oo.mediaType, + oo.doctypeSystem, + oo.doctypePublic, + oo.doIndent, XDOC_OUTPUT_DEFAULT_INDENT, // indent - xalan_encoding // encoding - ); - } else if(*method == XDOC_OUTPUT_METHOD_OPTION_VALUE_HTML) { - content_type="text/html"; - listener=new FormatterToHTML(writer, - xalan_encoding, // encoding - XalanDOMString(), // mediaType - XalanDOMString(), // doctypeSystem; String to be printed at the top of the document - XalanDOMString(), // doctypePublic - true, // doIndent - XDOC_OUTPUT_DEFAULT_INDENT // indent - ); - } else if(*method == XDOC_OUTPUT_METHOD_OPTION_VALUE_TEXT) { - content_type="text/plain"; - listener=new FormatterToText(writer, - xalan_encoding // encoding - ); + oo.version, + oo.standalone, + oo.xmlDecl + )); + } else if(strcmp(oo.method, XDOC_OUTPUT_METHOD_OPTION_VALUE_TEXT)==0) { + if(oo.mediaType.empty()) + oo.mediaType.append("text/plain"); + return std::auto_ptr(new FormatterToText(writer, + oo.encoding + )); } else throw Exception(0, 0, - method, + &method_name, XDOC_OUTPUT_METHOD_OPTION_NAME " option is invalid; valid methods are: " "'" XDOC_OUTPUT_METHOD_OPTION_VALUE_XML "', " "'" XDOC_OUTPUT_METHOD_OPTION_VALUE_HTML "', " @@ -430,198 +498,104 @@ static void create_optioned_listener( // never reached } +*/ static void _save(Request& r, const String& method_name, MethodParams *params) { Pool& pool=r.pool(); - VXnode& vnode=*static_cast(r.self); + VXdoc& vdoc=*static_cast(r.self); - // filespec const String& file_name=params->as_string(0, "file name must be string"); - const char *filespec=r.absolute(file_name).cstr(String::UL_FILE_SPEC); + const String& filespec=r.absolute(file_name); - // node - XalanNode& node=vnode.get_node(pool, &method_name); - - try { - XalanFileOutputStream stream(XalanDOMString(filespec, strlen(filespec))); - XalanOutputStreamPrintWriter writer(stream); - const char *content_type, *charset; - FormatterListener *formatterListener; - create_optioned_listener(content_type, charset, formatterListener, - pool, method_name, params, 1, writer); - FormatterTreeWalker treeWalker(*formatterListener); - treeWalker.traverse(&node); // Walk that node and produce the XML... - } catch(const XSLException& e) { - Exception::provide_source(pool, &method_name, e); - } + GdomeException exc; + if(!gdome_di_saveDocToFile(domimpl, + vdoc.get_document(&method_name), + filespec.cstr(String::UL_FILE_SPEC), + GDOME_SAVE_LIBXML_INDENT /*GDOME_SAVE_STANDARD */, + &exc)) + throw Exception(0, 0, + &method_name, + exc); } static void _string(Request& r, const String& method_name, MethodParams *params) { Pool& pool=r.pool(); VXdoc& vdoc=*static_cast(r.self); - // node - XalanNode *node=&vdoc.get_document(pool, &method_name);//.getDocumentElement(); - if(!node) - throw Exception(0, 0, - &method_name, - "no documentElement"); - - try { - String parserString=*new(pool) String(pool); - ParserStringXalanOutputStream stream(parserString); - XalanOutputStreamPrintWriter writer(stream); - const char *content_type, *charset; - FormatterListener *formatterListener; - create_optioned_listener(content_type, charset, formatterListener, - pool, method_name, params, 0, writer); - FormatterTreeWalker treeWalker(*formatterListener); - treeWalker.traverse(node); // Walk that node and produce the XML... - - // write out result - r.write_no_lang(parserString); - } catch(const XSLException& e) { - Exception::provide_source(pool, &method_name, e); - } + char *mem; + GdomeException exc; + if(!gdome_di_saveDocToMemory(domimpl, + vdoc.get_document(&method_name), + &mem, + GDOME_SAVE_LIBXML_INDENT /*GDOME_SAVE_STANDARD */, + &exc)) + throw Exception(0, 0, + &method_name, + exc); + + // move to pool memory + size_t size=strlen(mem); + char *buf=(char *)pool.malloc(size); + memcpy(buf, mem, size); + g_free(mem); + // write out result + r.write_no_lang(*new(pool) String(pool, buf, size)); } - +/* static void _file(Request& r, const String& method_name, MethodParams *params) { Pool& pool=r.pool(); + VXdoc& vdoc=*static_cast(r.self); VXnode& vnode=*static_cast(r.self); // node - XalanNode& node=vnode.get_node(pool, &method_name); + GdomeNode *node=vnode.get_node(pool, &method_name); try { + VXdoc::Output_options oo(vdoc.output_options); String& parserString=*new(pool) String(pool); ParserStringXalanOutputStream stream(parserString); XalanOutputStreamPrintWriter writer(stream); - const char *content_type, *charset; - FormatterListener *formatterListener; - create_optioned_listener(content_type, charset, formatterListener, - pool, method_name, params, 0, writer); + std::auto_ptr formatterListener= + create_optioned_listener(pool, method_name, params, 0, + oo, writer); FormatterTreeWalker treeWalker(*formatterListener); treeWalker.traverse(&node); // Walk that node and produce the XML... // write out result VFile& vfile=*new(pool) VFile(pool); const char *cstr=parserString.cstr(); - String *scontent_type=new(pool) String(pool, content_type); + const String& scontent_type=pool.transcode(oo.mediaType); Value *vcontent_type; - if(charset) { + if(oo.encoding.empty()) + vcontent_type=new(pool) VString(scontent_type); + else { VHash *vhcontent_type=new(pool) VHash(pool); - vhcontent_type->hash().put(*value_name, new(pool) VString(*scontent_type)); - String *scharset=new(pool) String(pool, charset); - vhcontent_type->hash().put(*new(pool) String(pool, "charset"), new(pool) VString(*scharset)); + vhcontent_type->hash(&method_name).put(*value_name, new(pool) VString(scontent_type)); + const String& scharset=pool.transcode(oo.encoding); + vhcontent_type->hash(&method_name).put(*new(pool) String(pool, "charset"), new(pool) VString(scharset)); vcontent_type=vhcontent_type; - } else - vcontent_type=new(pool) VString(*scontent_type); - vfile.set(false/*tainted*/, cstr, strlen(cstr), 0/*file_name*/, vcontent_type); + } + + vfile.set(false/*tainted* /, cstr, strlen(cstr), 0/*file_name* /, vcontent_type); r.write_no_lang(vfile); } catch(const XSLException& e) { Exception::provide_source(pool, &method_name, e); } } - -static void _set(Request& r, const String& method_name, MethodParams *params) { - //_asm int 3; - Pool& pool=r.pool(); - VXdoc& vdoc=*static_cast(r.self); - - Value& vxml=params->as_junction(0, "xml must be code"); - Temp_lang temp_lang(r, String::UL_XML); - const String& xml=r.process(vxml).as_string(); - - std::istrstream stream(xml.cstr()); - const XalanParsedSource* parsedSource; - - try { - parsedSource = new XalanDefaultParsedSource2(&stream); - } - catch (XSLException& e) { - Exception::provide_source(pool, &method_name, e); - } - catch (SAXParseException& e) { - Exception::provide_source(pool, &method_name, e); - } - catch (SAXException& e) { - Exception::provide_source(pool, &method_name, e); - } - catch (XMLException& e) { - Exception::provide_source(pool, &method_name, e); - } - catch(const XalanDOMException& e) { - Exception::provide_source(pool, &method_name, e); - } - - // replace any previous parsed source - vdoc.set_parsed_source(*parsedSource); -} - -static void _create(Request& r, const String& method_name, MethodParams *params) { - //_asm int 3; - Pool& pool=r.pool(); - VXdoc& vdoc=*static_cast(r.self); - - const String& qualifiedName=params->as_string(0, "qualifiedName must be string"); - - XalanDocument& document=*new XercesDocumentBridge( - DOM_Document::createDocument(), - 0, - false /*threadSafe*/, - false /*don' buildBridge -- too early, empty document*/); - - /// +createXMLDecl ? - document.appendChild(document.createElement(*pool.transcode(qualifiedName))); - - // replace any previous document - vdoc.set_document(document, true/*owns*/); -} - -static void _load(Request& r, const String& method_name, MethodParams *params) { - Pool& pool=r.pool(); - VXdoc& vdoc=*static_cast(r.self); - - // filespec - const String& file_name=params->as_string(0, "file name must be string"); - const char *filespec=r.absolute(file_name).cstr(String::UL_FILE_SPEC); - - const XalanParsedSource* parsedSource; - try { - parsedSource = new XalanDefaultParsedSource2(filespec); - } - catch (XSLException& e) { - Exception::provide_source(pool, &method_name, e); - } - catch (SAXParseException& e) { - Exception::provide_source(pool, &method_name, e); - } - catch (SAXException& e) { - Exception::provide_source(pool, &method_name, e); - } - catch (XMLException& e) { - Exception::provide_source(pool, &method_name, e); - } - catch(const XalanDOMException& e) { - Exception::provide_source(pool, &method_name, e); - } - - // replace any previous parsed source - vdoc.set_parsed_source(*parsedSource); -} - +*/ +/* +/// @test lang=String::UL_UNSPECIFIED? static void add_xslt_param(const Hash::Key& aattribute, Hash::Val *ameaning, void *info) { XalanTransformer2& transformer=*static_cast(info); - const char *attribute_cstr=aattribute.cstr(); - const char *meaning_cstr=static_cast(ameaning)->as_string().cstr(); + const char *attribute_cstr=aattribute.cstr(String::UL_UNSPECIFIED); + const char *meaning_cstr=static_cast(ameaning)->as_string().cstr(String::UL_UNSPECIFIED); transformer.setStylesheetParam( XalanDOMString(attribute_cstr), XalanDOMString(meaning_cstr)); } - static void _transform(Request& r, const String& method_name, MethodParams *params) { Pool& pool=r.pool(); VXdoc& vdoc=*static_cast(r.self); @@ -649,18 +623,70 @@ static void _transform(Request& r, const // transform try { + // note: + // actually, never found any difference between the two + // but still there some extra "xerces" words at start of transform body + // wich were originally "xalan" + // not daring to change that + + const XalanCompiledStylesheet& stylesheet=connection.stylesheet(false/*nocache* /); if(vdoc.has_parsed_source()) { // set|load, not create? vdoc.transformer().transform2( vdoc.get_parsed_source(pool, &method_name), - &connection.stylesheet(true/*nocache*/), + &stylesheet, target); } else { target=vdoc.parser_xerces_liaison().createDocument(); vdoc.transformer().transform2( - vdoc.get_document(pool, &method_name), - &connection.stylesheet(true/*nocache*/), + vdoc.get_document(&method_name), + &stylesheet, target); } + VXdoc& result=*new(pool) VXdoc(pool, target, false/*owns not* /); + // write out result + r.write_no_lang(result); + // + if(const StylesheetRoot *stylesheetRoot=stylesheet.getStylesheetRoot()) { + /* + + * / + + VXdoc::Output_options& oo=result.output_options; + oo.encoding=stylesheetRoot->m_encoding; + oo.mediaType=stylesheetRoot->m_mediatype; + oo.doctypeSystem=stylesheetRoot->m_doctypeSystem; + oo.doctypePublic=stylesheetRoot->m_doctypePublic; + oo.doIndent=stylesheetRoot->m_indentResult; + oo.version=stylesheetRoot->m_version; + oo.standalone=stylesheetRoot->m_standalone; + oo.xmlDecl=!stylesheetRoot->m_omitxmlDecl; + + switch(stylesheetRoot->getOutputMethod()) { + case FormatterListener::OUTPUT_METHOD_HTML: + oo.method=XDOC_OUTPUT_METHOD_OPTION_VALUE_HTML; break; + case FormatterListener::OUTPUT_METHOD_TEXT: + oo.method=XDOC_OUTPUT_METHOD_OPTION_VALUE_TEXT; break; + case FormatterListener::OUTPUT_METHOD_NONE: + case FormatterListener::OUTPUT_METHOD_XML: + oo.method=XDOC_OUTPUT_METHOD_OPTION_VALUE_XML; break; + default: + throw Exception(0, 0, + &method_name, + "unsupported output method specified"); + break; // never + } + } } catch (XSLException& e) { connection.close(); @@ -683,25 +709,11 @@ static void _transform(Request& r, const Exception::provide_source(pool, &stylesheet_file_name, e); } - // write out result - VXdoc& result=*new(pool) VXdoc(pool, target, false/*owns not*/); - r.write_no_lang(result); + // close + connection.close(); } +*/ -static void _getElementById(Request& r, const String& method_name, MethodParams *params) { - Pool& pool=r.pool(); - VXdoc& vdoc=*static_cast(r.self); - - // elementId - const String& elementId=params->as_string(0, "elementID must be string"); - - if(XalanNode *node= - vdoc.get_document(pool, &method_name).getElementById(*pool.transcode(elementId))) { - // write out result - VXnode& result=*new(pool) VXnode(pool, node, false); - r.write_no_lang(result); - } -} // constructor MXdoc::MXdoc(Pool& apool) : MXnode(apool) { @@ -728,13 +740,9 @@ MXdoc::MXdoc(Pool& apool) : MXnode(apool // EntityReference createEntityReference(in DOMString name) raises(DOMException); add_native_method("createEntityReference", Method::CT_DYNAMIC, _createEntityReference, 1, 1); // NodeList getElementsByTagName(in DOMString tagname); - /* - // ^xdoc.getElementsByTagName[tagname] - add_native_method("getElementsByTagName", Method::CT_DYNAMIC, _getElementsByTagName, 1, 1); - - // ^xdoc.getElementsByTagNameNS[namespaceURI;localName] = array of nodes - add_native_method("getElementsByTagNameNS", Method::CT_DYNAMIC, _getElementsByTagNameNS, 2, 2); - */ + add_native_method("getElementsByTagName", Method::CT_DYNAMIC, _getElementsByTagName, 1, 1); + // ^xdoc.getElementsByTagNameNS[namespaceURI;localName] = array of nodes + add_native_method("getElementsByTagNameNS", Method::CT_DYNAMIC, _getElementsByTagNameNS, 2, 2); /// DOM2(?) @@ -743,6 +751,14 @@ MXdoc::MXdoc(Pool& apool) : MXnode(apool /// parser + // ^xdoc::create{qualifiedName} + add_native_method("create", Method::CT_DYNAMIC, _create, 1, 1); + // ^xdoc::set[xml] + add_native_method("set", Method::CT_DYNAMIC, _set, 1, 1); + + // ^xdoc::load[some.xml] + add_native_method("load", Method::CT_DYNAMIC, _load, 1, 1); + // ^xdoc.save[some.xml] // ^xdoc.save[some.xml;options hash] add_native_method("save", Method::CT_DYNAMIC, _save, 1, 2); @@ -753,19 +769,11 @@ MXdoc::MXdoc(Pool& apool) : MXnode(apool // ^xdoc.file[] file with "" // ^xdoc.file[options hash] file with "" - add_native_method("file", Method::CT_DYNAMIC, _file, 0, 1); - - // ^xdoc::set[xml] - add_native_method("set", Method::CT_DYNAMIC, _set, 1, 1); - // ^xdoc::create{qualifiedName} - add_native_method("create", Method::CT_DYNAMIC, _create, 1, 1); - - // ^xdoc::load[some.xml] - add_native_method("load", Method::CT_DYNAMIC, _load, 1, 1); +// add_native_method("file", Method::CT_DYNAMIC, _file, 0, 1); // ^xdoc.transform[stylesheet file_name] // ^xdoc.transform[stylesheet file_name;params hash] - add_native_method("transform", Method::CT_DYNAMIC, _transform, 1, 2); +// add_native_method("transform", Method::CT_DYNAMIC, _transform, 1, 2); }