Diff for /parser3/src/classes/xdoc.C between versions 1.6 and 1.151

version 1.6, 2001/09/28 15:58:26 version 1.151, 2007/02/28 19:09:23
Line 1 Line 1
 /** @file  /** @file
         Parser: @b xdoc parser class.          Parser: @b xdoc parser class.
   
         Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com)          Copyright (c) 2001-2005 ArtLebedev Group (http://www.artlebedev.com)
         Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf)          Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
   
         $Id$  
 */  */
 #include "classes.h"  
   #include "pa_config_includes.h"
   
 #ifdef XML  #ifdef XML
   
   static const char * const IDENT_XDOC_C="$Date$";
   
   #include "libxml/tree.h"
   #include "libxml/HTMLtree.h"
   #include "libxslt/xsltInternals.h"
   #include "libxslt/transform.h"
   #include "libxslt/xsltutils.h"
   #include "libxslt/variables.h"
   #include "libxslt/imports.h"
   
   #include "pa_vmethod_frame.h"
   
   #include "pa_stylesheet_manager.h"
 #include "pa_request.h"  #include "pa_request.h"
 #include "pa_vxdoc.h"  #include "pa_vxdoc.h"
 #include "pa_xslt_stylesheet_manager.h"  #include "pa_charset.h"
 #include "pa_stylesheet_connection.h"  
 #include "pa_vfile.h"  #include "pa_vfile.h"
   #include "pa_xml_exception.h"
 #include "xnode.h"  #include "xnode.h"
   
 #include <strstream>  
 #include <Include/PlatformDefinitions.hpp>  
 #include <util/PlatformUtils.hpp>  
 #include <util/TransENameMap.hpp>  
 #include <XalanTransformer/XalanTransformer.hpp>  
 #include <XalanTransformer/XalanParsedSource.hpp>  
 #include <XMLSupport/FormatterToXML.hpp>  
 #include <XMLSupport/FormatterToHTML.hpp>  
 #include <XMLSupport/FormatterToText.hpp>  
 #include <XMLSupport/FormatterTreeWalker.hpp>  
 #include <PlatformSupport/XalanFileOutputStream.hpp>  
 #include <PlatformSupport/XalanOutputStreamPrintWriter.hpp>  
 #include <PlatformSupport/DOMStringPrintWriter.hpp>  
 #include <XalanDOM/XalanElement.hpp>  
 #include <XalanDOM/XalanNodeList.hpp>  
   
 // defines  // defines
   
 #define XDOC_CLASS_NAME "xdoc"  #define XDOC_CLASS_NAME "xdoc"
Line 41 Line 38
 #define XDOC_OUTPUT_METHOD_OPTION_VALUE_HTML "html"  #define XDOC_OUTPUT_METHOD_OPTION_VALUE_HTML "html"
 #define XDOC_OUTPUT_METHOD_OPTION_VALUE_TEXT "text"  #define XDOC_OUTPUT_METHOD_OPTION_VALUE_TEXT "text"
   
 #define XDOC_OUTPUT_ENCODING_OPTION_NAME "encoding"  
   
 #define XDOC_OUTPUT_DEFAULT_INDENT 4  
   
 // class  // class
   
 class MXdoc : public MXnode {  class MXdoc: public MXnode {
 public: // VStateless_class  public: // VStateless_class
         Value *create_new_value(Pool& pool) { return new(pool) VXdoc(pool); }          Value* create_new_value(Pool&, HashStringValue&) { return new VXdoc(); }
   
 public:  public:
         MXdoc(Pool& pool);          MXdoc();
   
 public: // Methoded  
         bool used_directly() { return true; }  
         void configure_admin(Request& r);  
 };  };
   
 // methods  // global variable
   
 class ParserStringXalanOutputStream: public XalanOutputStream {  DECLARE_CLASS_VAR(xdoc, new MXdoc, 0);
 public:  
           
         explicit ParserStringXalanOutputStream(String& astring) : fstring(astring) {}  
   
 protected: // XalanOutputStream  // helper classes
   
         virtual void writeData(const char *theBuffer, unsigned long theBufferLength) {  class xmlOutputBuffer_auto_ptr {
                 char *copy=(char *)fstring.malloc((size_t)theBufferLength);  public:
                 memcpy(copy, theBuffer, (size_t)theBufferLength);          explicit xmlOutputBuffer_auto_ptr(xmlOutputBuffer *_APtr = 0) 
                 fstring.APPEND_CLEAN(copy, (size_t)theBufferLength, "xdoc", 0);                  : _Owns(_APtr != 0), _Ptr(_APtr) {}
         }          xmlOutputBuffer_auto_ptr(const xmlOutputBuffer_auto_ptr& _Y) 
                   : _Owns(_Y._Owns), _Ptr(_Y.release()) {}
           xmlOutputBuffer_auto_ptr& operator=(const xmlOutputBuffer_auto_ptr& _Y) 
                   {if (this != &_Y)
                           {if (_Ptr != _Y.get())
                                   {if (_Owns && _Ptr)
                                           xmlOutputBufferClose(_Ptr);
                                   _Owns = _Y._Owns; }
                           else if (_Y._Owns)
                                   _Owns = true;
                           _Ptr = _Y.release(); }
                   return (*this); }
           ~xmlOutputBuffer_auto_ptr()
                   {if (_Owns && _Ptr)
                           xmlOutputBufferClose(_Ptr); }
           xmlOutputBuffer& operator*() const 
                   {return (*get()); }
           xmlOutputBuffer *operator->() const 
                   {return (get()); }
           xmlOutputBuffer *get() const 
                   {return (_Ptr); }
           xmlOutputBuffer *release() const 
                   {((xmlOutputBuffer_auto_ptr *)this)->_Owns = false;
                   return (_Ptr); }
   private:
           bool _Owns;
           xmlOutputBuffer *_Ptr;
   };
   
         virtual void doFlush() {}  class xsltTransformContext_auto_ptr {
   public:
           explicit xsltTransformContext_auto_ptr(xsltTransformContext *_APtr = 0) 
                   : _Owns(_APtr != 0), _Ptr(_APtr) {}
           xsltTransformContext_auto_ptr(const xsltTransformContext_auto_ptr& _Y) 
                   : _Owns(_Y._Owns), _Ptr(_Y.release()) {}
           xsltTransformContext_auto_ptr& operator=(const xsltTransformContext_auto_ptr& _Y) 
                   {if (this != &_Y)
                           {if (_Ptr != _Y.get())
                                   {if (_Owns && _Ptr)
                                           xsltFreeTransformContext(_Ptr);
                                   _Owns = _Y._Owns; }
                           else if (_Y._Owns)
                                   _Owns = true;
                           _Ptr = _Y.release(); }
                   return (*this); }
           ~xsltTransformContext_auto_ptr()
                   {if (_Owns && _Ptr)
                           xsltFreeTransformContext(_Ptr); }
           xsltTransformContext& operator*() const 
                   {return (*get()); }
           xsltTransformContext *operator->() const 
                   {return (get()); }
           xsltTransformContext *get() const 
                   {return (_Ptr); }
           xsltTransformContext *release() const 
                   {((xsltTransformContext_auto_ptr *)this)->_Owns = false;
                   return (_Ptr); }
   private:
           bool _Owns;
           xsltTransformContext *_Ptr;
   };
   
   class xsltStylesheet_auto_ptr {
   public:
           explicit xsltStylesheet_auto_ptr(xsltStylesheet *_APtr = 0) 
                   : _Owns(_APtr != 0), _Ptr(_APtr) {}
           xsltStylesheet_auto_ptr(const xsltStylesheet_auto_ptr& _Y) 
                   : _Owns(_Y._Owns), _Ptr(_Y.release()) {}
           xsltStylesheet_auto_ptr& operator=(const xsltStylesheet_auto_ptr& _Y) 
                   {if (this != &_Y)
                           {if (_Ptr != _Y.get())
                                   {if (_Owns && _Ptr)
                                           xsltFreeStylesheet(_Ptr);
                                   _Owns = _Y._Owns; }
                           else if (_Y._Owns)
                                   _Owns = true;
                           _Ptr = _Y.release(); }
                   return (*this); }
           ~xsltStylesheet_auto_ptr()
                   {if (_Owns && _Ptr)
                           xsltFreeStylesheet(_Ptr); }
           xsltStylesheet& operator*() const 
                   {return (*get()); }
           xsltStylesheet *operator->() const 
                   {return (get()); }
           xsltStylesheet *get() const 
                   {return (_Ptr); }
           xsltStylesheet *release() const 
                   {((xsltStylesheet_auto_ptr *)this)->_Owns = false;
                   return (_Ptr); }
 private:  private:
           bool _Owns;
           xsltStylesheet *_Ptr;
   };
   
         String& fstring;  // methods
           
   static void writeNode(Request& r, VXdoc& xdoc, xmlNode* node) {
           if(!node)
                   throw Exception("parser.runtime",
                           0,
                           "error creating node"); // OOM, bad name, things like that
   
           // write out result
           r.write_no_lang(xdoc.wrap(*node));
   }
   
   struct IdsIteratorInfo {
           xmlChar *elementId;
           xmlNode *element;
 };  };
   
 static void create_optioned_listener(  /* Hash Scanner function for pa_getElementById */
                                                                          const char *& content_type, const char *& charset, FormatterListener *& listener,   extern "C" void // switching to calling convetion of libxml
                                                                          Pool& pool,   idsHashScanner (void *payload, void *data, xmlChar *name) {
                                                                          const String& method_name, MethodParams *params, int index, Writer& writer) {          IdsIteratorInfo *priv = (IdsIteratorInfo *)data;
         // default encoding from pool  
         const String *scharset=&pool.get_charset();          if (priv->element == NULL && xmlStrEqual (name, priv->elementId))
         const String *method=0;          {
         XalanDOMString xalan_encoding;                  xmlNode* parent=((xmlID *)payload)->attr->parent;
                   assert(parent);
                   priv->element=parent;
           }
   }
   
         if(params->size()>index) {  static xmlNode*
                 Value& voptions=params->as_no_junction(index, "options must not be code");  pa_getElementById(xmlDoc& xmldoc, xmlChar* elementId) {
                 if(voptions.is_defined()) {          xmlHashTable *ids = (xmlHashTable *)xmldoc.ids;
                         if(Hash *options=voptions.get_hash()) {          IdsIteratorInfo iter={elementId, NULL};
                                 // $.method[xml|html|text]          xmlHashScan(ids, idsHashScanner, &iter);
                                 if(Value *vmethod=static_cast<Value *>(options->get(*new(pool)           return iter.element;
                                         String(pool, XDOC_OUTPUT_METHOD_OPTION_NAME))))  }
                                         method=&vmethod->as_string();  
   
                                 // $.encoding[windows-1251|...]  /*
                                 if(Value *vencoding=static_cast<Value *>(options->get(*new(pool)   static xmlNode *
                                         String(pool, XDOC_OUTPUT_ENCODING_OPTION_NAME)))) {  pa_importNode (xmlDoc& xmldoc, xmlNode& importedNode, bool deep) {
                                         scharset=&vencoding->as_string();          xmlNode *result = NULL;
                                 }  
                         } else          switch (importedNode.type) {
                                 PTHROW(0, 0,          case XML_ATTRIBUTE_NODE:
                                         &method_name,                  result = (xmlNode *)xmlCopyProp(xmldoc, (xmlAttr *)importedNode);
                                         "options must be hash");                  result.parent=0; // no idea
                 }                  break;
           case XML_DOCUMENT_FRAG_NODE:
           case XML_ELEMENT_NODE:
           case XML_ENTITY_REF_NODE:
           case XML_PI_NODE:
           case XML_TEXT_NODE:
           case XML_CDATA_SECTION_NODE:
           case XML_COMMENT_NODE:
                   result = xmlCopyNode (importedNode->n, deep);
                   xmlSetTreeDoc (result, priv->n);
                   break;
           default:
                   *exc = GDOME_NOT_SUPPORTED_ERR;
         }          }
   
         xalan_encoding.append(charset=scharset->cstr());          return result;
         if(!method/*default='xml'*/ || *method == XDOC_OUTPUT_METHOD_OPTION_VALUE_XML) {  
                 content_type="text/xml";  
                 listener=new FormatterToXML(writer,  
                         XalanDOMString(),  // version  
                         true, // 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  
                 );  
         } else  
                 PTHROW(0, 0,  
                         method,  
                         XDOC_OUTPUT_METHOD_OPTION_NAME " option is invalid; valid methods are: "  
                                 "'" XDOC_OUTPUT_METHOD_OPTION_VALUE_XML "', "  
                                 "'" XDOC_OUTPUT_METHOD_OPTION_VALUE_HTML "', "  
                                 "'" XDOC_OUTPUT_METHOD_OPTION_VALUE_TEXT "'");                    
   
         // never reached  
 }  }
   */
   
 static void _save(Request& r, const String& method_name, MethodParams *params) {  // Element createElement(in DOMString tagName) raises(DOMException);
         Pool& pool=r.pool();  static void _createElement(Request& r, MethodParams& params) {
         VXnode& vnode=*static_cast<VXnode *>(r.self);          VXdoc& vdoc=GET_SELF(r, VXdoc);
           xmlDoc& xmldoc=vdoc.get_xmldoc();
   
         // filespec          xmlChar* tagName=as_xmlchar(r, params, 0, "tagName must be string");
         const String& file_name=params->as_string(0, "file name must not be code");  
         const char *filespec=r.absolute(file_name).cstr(String::UL_FILE_SPEC);  
           
         // node  
         XalanNode& node=vnode.get_node(pool, &method_name);  
   
         try {          xmlNode *node=xmlNewDocNode(&xmldoc, NULL, tagName, NULL);
                 XalanFileOutputStream stream(XalanDOMString(filespec, strlen(filespec)));          writeNode(r, vdoc, node);
                 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) {  
                 r._throw(&method_name, e);  
         }  
 }  }
   
 static void _string(Request& r, const String& method_name, MethodParams *params) {  // Element createElementNS(in DOMString namespaceURI, in DOMString qualifiedName) raises(DOMException);
         Pool& pool=r.pool();  static void _createElementNS(Request& r, MethodParams& params) {
         VXnode& vnode=*static_cast<VXnode *>(r.self);          VXdoc& vdoc=GET_SELF(r, VXdoc);
           xmlDoc& xmldoc=vdoc.get_xmldoc();
         // node  
         XalanNode& node=vnode.get_node(pool, &method_name);  
   
         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          // namespaceURI;localName
                 r.write_no_lang(parserString);          xmlChar* namespaceURI=as_xmlchar(r, params, 0, "namespaceURI must be string");
         } catch(const XSLException& e) {          xmlChar* qualifiedName=as_xmlchar(r, params, 1, "qualifiedName must be string");
                 r._throw(&method_name, e);  
         }          xmlChar* prefix=0;
           xmlChar* localName=xmlSplitQName2(qualifiedName, &prefix);
   
           xmlNode *node;
           if(localName) {
                   xmlNs& ns=pa_xmlMapNs(xmldoc, namespaceURI, prefix);
                   node=xmlNewDocNode(&xmldoc, &ns, localName, NULL);
           } else
                   node=xmlNewDocNode(&xmldoc, NULL, qualifiedName/*unqualified, actually*/, NULL);
           writeNode(r, vdoc, node);
   }
   
   // DocumentFragment createDocumentFragment()
   static void _createDocumentFragment(Request& r, MethodParams&) {
           VXdoc& vdoc=GET_SELF(r, VXdoc);
           xmlDoc& xmldoc=vdoc.get_xmldoc();
   
           xmlNode *node=xmlNewDocFragment(&xmldoc);
           writeNode(r, vdoc, node);
 }  }
   
   // Text createTextNode(in DOMString data);
   static void _createTextNode(Request& r, MethodParams& params) {
           VXdoc& vdoc=GET_SELF(r, VXdoc);
           xmlDoc& xmldoc=vdoc.get_xmldoc();
   
 static void _file(Request& r, const String& method_name, MethodParams *params) {          xmlChar* data=as_xmlchar(r, params, 0, "data must be string");
         Pool& pool=r.pool();  
         VXnode& vnode=*static_cast<VXnode *>(r.self);  
   
         // node  
         XalanNode& node=vnode.get_node(pool, &method_name);  
   
         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          xmlNode *node=xmlNewDocText(&xmldoc, data);
                 VFile& vfile=*new(pool) VFile(pool);          writeNode(r, vdoc, node);
                 const char *cstr=parserString.cstr();  
                 String *scontent_type=new(pool) String(pool, content_type);  
                 Value *vcontent_type;  
                 if(charset) {  
                         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));  
                         vcontent_type=vhcontent_type;  
                 } else  
                         vcontent_type=new(pool) VString(*scontent_type);  
                 vfile.set(false/*tainted*/, cstr, strlen(cstr), 0/*file_name*/, vcontent_type);  
                 r.write_no_lang(vfile);  
         } catch(const XSLException& e) {  
                 r._throw(&method_name, e);  
         }  
 }  }
   
 static void _set(Request& r, const String& method_name, MethodParams *params) {  // Comment createComment(in DOMString data)
         Pool& pool=r.pool();  static void _createComment(Request& r, MethodParams& params) {
         VXdoc& vdoc=*static_cast<VXdoc *>(r.self);          VXdoc& vdoc=GET_SELF(r, VXdoc);
   
         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;  
         int error=vdoc.transformer().parseSource(&stream, parsedSource);  
   
         if(error)  
                 PTHROW(0, 0,  
                         &method_name,  
                         vdoc.transformer().getLastError());  
   
         // replace any previous parsed source          xmlChar* data=as_xmlchar(r, params, 0, "data must be string");
         vdoc.set_parsed_source(*parsedSource);  
           xmlNode *node=xmlNewComment(data);
           writeNode(r, vdoc, node);
 }  }
   
 static void _load(Request& r, const String& method_name, MethodParams *params) {  // CDATASection createCDATASection(in DOMString data) raises(DOMException);
         Pool& pool=r.pool();  static void _createCDATASection(Request& r, MethodParams& params) {
         VXdoc& vdoc=*static_cast<VXdoc *>(r.self);          VXdoc& vdoc=GET_SELF(r, VXdoc);
           xmlDoc& xmldoc=vdoc.get_xmldoc();
   
         // filespec          xmlChar* data=as_xmlchar(r, params, 0, "data must be string");
         const String& file_name=params->as_string(0, "file name must not be code");  
         const char *filespec=r.absolute(file_name).cstr(String::UL_FILE_SPEC);          xmlNode *node=xmlNewCDataBlock(&xmldoc, data, strlen((const char*)data));
                   writeNode(r, vdoc, node);
         const XalanParsedSource* parsedSource;  }
         int error=vdoc.transformer().parseSource(filespec, parsedSource);  
   
         if(error)  // ProcessingInstruction createProcessingInstruction(in DOMString target,in DOMString data) raises(DOMException);
                 PTHROW(0, 0,  static void _createProcessingInstruction(Request& r, MethodParams& params) {
                         &file_name,          VXdoc& vdoc=GET_SELF(r, VXdoc);
                         vdoc.transformer().getLastError());          xmlDoc& xmldoc=vdoc.get_xmldoc();
   
         // replace any previous parsed source          xmlChar* target=as_xmlchar(r, params, 0, "data must be string");
         vdoc.set_parsed_source(*parsedSource);          xmlChar* data=as_xmlchar(r, params, 1, "data must be string");
   
           xmlNode *node=xmlNewDocPI(&xmldoc, target, data);
           writeNode(r, vdoc, node);
 }  }
   
 static void add_xslt_param(const Hash::Key& aattribute, Hash::Val *ameaning,   // Attr createAttribute(in DOMString name) raises(DOMException);
                                                    void *info) {  static void _createAttribute(Request& r, MethodParams& params) {
         XalanTransformer& transformer=*static_cast<XalanTransformer *>(info);          VXdoc& vdoc=GET_SELF(r, VXdoc);
         const char *attribute_cstr=aattribute.cstr();          xmlDoc& xmldoc=vdoc.get_xmldoc();
         const char *meaning_cstr=static_cast<Value *>(ameaning)->as_string().cstr();  
   
         transformer.setStylesheetParam(  
                 XalanDOMString(attribute_cstr),    
                 XalanDOMString(meaning_cstr));  
 }  
 static void _xslt(Request& r, const String& method_name, MethodParams *params) {  
         Pool& pool=r.pool();  
         VXdoc& vdoc=*static_cast<VXdoc *>(r.self);  
   
         // params          xmlChar* name=as_xmlchar(r, params, 0, "name must be string");
         if(params->size()>1) {  
                 Value& vparams=params->as_no_junction(1, "transform parameters parameter must not be code");  
                 if(vparams.is_defined())  
                         if(Hash *params=vparams.get_hash())  
                                 params->for_each(add_xslt_param, &vdoc.transformer());  
                         else  
                                 PTHROW(0, 0,  
                                         &method_name,  
                                         "transform parameters parameter must be hash");  
         }  
   
         // source          xmlNode *node=(xmlNode*)xmlNewDocProp(&xmldoc, name, 0);
         const XalanParsedSource &parsed_source=vdoc.get_parsed_source(pool, &method_name);          writeNode(r, vdoc, node);
   }
   
         // stylesheet  // Attr createAttributeNS(in DOMString namespaceURI, in DOMString qualifiedName) raises(DOMException);
         const String& stylesheet_file_name=params->as_string(0, "file name must not be code");  static void _createAttributeNS(Request& r, MethodParams& params) {
         const String& stylesheet_filespec=r.absolute(stylesheet_file_name);          VXdoc& vdoc=GET_SELF(r, VXdoc);
         //_asm int 3;          xmlDoc& xmldoc=vdoc.get_xmldoc();
         Stylesheet_connection& connection=XSLT_stylesheet_manager->get_connection(stylesheet_filespec);  
   
         // target  
         XalanDocument* target=vdoc.parser_liaison().createDocument();  
         XSLTResultTarget domResultTarget(target);  
   
         // transform  
         int error=vdoc.transformer().transform(  
                 parsed_source,   
                 &connection.stylesheet(true/*nocache*/),   
                 domResultTarget);  
         connection.close();  
         if(error)  
                 PTHROW(0, 0,  
                         &stylesheet_file_name,  
                         vdoc.transformer().getLastError());  
   
         // write out result          xmlChar* namespaceURI=as_xmlchar(r, params, 0, "namespaceURI must be string");
         VXdoc& result=*new(pool) VXdoc(pool);          xmlChar* qualifiedName=as_xmlchar(r, params, 1, "name must be string");
         result.set_document(*target);  
         r.write_no_lang(result);          xmlChar* prefix=0;
           xmlChar* localName=xmlSplitQName2(qualifiedName, &prefix);
   
           xmlNode *node;
           if(localName) {
                   xmlNs& ns=pa_xmlMapNs(xmldoc, namespaceURI, prefix);
                   node=(xmlNode*)xmlNewDocProp(&xmldoc, localName, NULL);
                   xmlSetNs(node, &ns);
           } else
                   node=(xmlNode*)xmlNewDocProp(&xmldoc, qualifiedName/*unqualified, actually*/, NULL);
           writeNode(r, vdoc, node);
   }
   
   // EntityReference createEntityReference(in DOMString name) raises(DOMException);
   static void _createEntityReference(Request& r, MethodParams& params) {
           VXdoc& vdoc=GET_SELF(r, VXdoc);
           xmlDoc& xmldoc=vdoc.get_xmldoc();
   
           xmlChar* name=as_xmlchar(r, params, 0, "name must be string");
   
           xmlNode *node=xmlNewReference(&xmldoc, name);
           writeNode(r, vdoc, node);
 }  }
   
 static void _getElementById(Request& r, const String& method_name, MethodParams *params) {  
         Pool& pool=r.pool();  static void _getElementById(Request& r, MethodParams& params) {
         VXdoc& vdoc=*static_cast<VXdoc *>(r.self);          VXdoc& vdoc=GET_SELF(r, VXdoc);
           xmlDoc& xmldoc=vdoc.get_xmldoc();
   
         // elementId          // elementId
         const char *elementId=params->as_string(0, "elementID must not be code").cstr(String::UL_AS_IS);          xmlChar* elementId=as_xmlchar(r, params, 0, "elementID must be string");
   
         if(XalanElement *element=          if(xmlNode *node=pa_getElementById(xmldoc, elementId)) {
                 vdoc.get_document(pool, &method_name).getElementById(XalanDOMString(elementId))) {  
                 // write out result                  // write out result
                 VXnode& result=*new(pool) VXnode(pool, element);                  writeNode(r, vdoc, node);
                 r.write_no_lang(result);  
         }          }
 }  }
   
   static void _importNode(Request& r, MethodParams& params) {
           VXdoc& vdoc=GET_SELF(r, VXdoc);
           xmlDoc& xmldoc=vdoc.get_xmldoc();
   
           xmlNode& importedNode=
                   as_node(params, 0, "importedNode must be node");
           bool deep=
                   params.as_bool(1, "deep must be bool", r);
   
           xmlNode *node=xmlDocCopyNode(&importedNode, &xmldoc, deep?1: 0);
           // write out result
           writeNode(r, vdoc, node);
   }
 /*  /*
 static void _getElementsByTagName(Request& r, const String& method_name, MethodParams *params) {  GdomeElement *gdome_doc_createElementNS (GdomeDocument *self, GdomeDOMString *namespaceURI, GdomeDOMString *qualifiedName, GdomeException *exc);
         Pool& pool=r.pool();  GdomeAttr *gdome_doc_createAttributeNS (GdomeDocument *self, GdomeDOMString *namespaceURI, GdomeDOMString *qualifiedName, GdomeException *exc);
         VXdoc& vdoc=*static_cast<VXdoc *>(r.self);  */
   
         // tagname  static void _create(Request& r, MethodParams& params) {
         const char *tagname=params->as_string(0, "tagname must not be code").cstr(String::UL_AS_IS);          Charset& source_charset=r.charsets.source();
           VXdoc& vdoc=GET_SELF(r, VXdoc);
         VHash& result=*new(pool) VHash(pool);  
         if(const XalanNodeList *nodes=          Value& param=params[params.count()-1];
                 vdoc.get_document(pool, &method_name).getElementsByTagName(XalanDOMString(tagname))) {          xmlDoc* xmldoc;
                 for(int i=0; i<nodes->getLength(); i++) {          bool set_encoding=false;
                         String& skey=*new(pool) String(pool);          if(param.get_junction()) { // {<?xml?>...}
                         {                  Temp_lang temp_lang(r, String::L_XML);
                                 char *buf=(char *)pool.malloc(MAX_NUMBER);                  const String& xml=r.process_to_string(param);
                                 snprintf(buf, MAX_NUMBER, "%d", i);  
                                 skey << buf;                  const char* cstr=xml.cstr(String::L_UNSPECIFIED, 0, &r.charsets);
                         }                  xmldoc=xmlParseMemory(cstr, strlen(cstr));
                   //printf("document=0x%p\n", document);
                   if(!xmldoc || xmlHaveGenericErrors())
                           throw XmlException(0);
   
                   // must be last action in if, see after if}
           } else { // [localName]
                   if (VFile* vfile=param.as_vfile(String::L_UNSPECIFIED)){
                           xmldoc=xmlParseMemory(vfile->value_ptr(), vfile->value_size());
                           if(!xmldoc || xmlHaveGenericErrors())
                                   throw XmlException(0);
                   } else {
                           xmlChar* localName=r.transcode(param.as_string());
   #if 0
                   GdomeDocumentType *documentType=gdome_di_createDocumentType (
                           docimpl, 
                           r.transcode(qualifiedName), 
                           0/*publicId*/, 
                           0/*systemId*/, 
                           &exc);
                   if(!documentType || exc || xmlHaveGenericErrors())
                           throw Exception(
                                   method_name, 
                                   exc);
                   /// +xalan createXMLDecl ?
   #endif
                           xmldoc=xmlNewDoc(0);
                           if(!xmldoc || xmlHaveGenericErrors())
                                   throw XmlException(0);
                           xmlNode* node=xmlNewChild((xmlNode*)xmldoc, NULL, localName, NULL);
                           if(!node || xmlHaveGenericErrors())
                                   throw XmlException(0);
   
                         result.hash().put(skey, new(pool) VXnode(pool, nodes->item(i)));                          set_encoding=true;
                           // must be last action in if, see after if}
                 }                  }
         }          }
           // must be first action after if}
           // replace any previous parsed source
           vdoc.set_xmldoc(r.charsets, *xmldoc); 
           
           // URI 
           const char* URI_cstr;
           if(params.count()>1) { // absolute(param)
                   const String& URI=params.as_string(0, "URI must be string");
                   URI_cstr=r.absolute(URI).cstr();
           } else // default = disk path to requested document
                   URI_cstr=r.request_info.path_translated;
           if(URI_cstr)
                   xmldoc->URL=source_charset.transcode_buf2xchar(URI_cstr, strlen(URI_cstr));
   
           if(set_encoding) {
                   const char* source_charset_name=source_charset.NAME().cstr();
                   xmldoc->encoding=source_charset.transcode_buf2xchar(source_charset_name, strlen(source_charset_name));
           }
   }
   
         // write out result  static void _load(Request& r, MethodParams& params) {
         r.write_no_lang(result);          VXdoc& vdoc=GET_SELF(r, VXdoc);
   
           // filespec
           const String* uri=&params.as_string(0, "uri must be string");
           const char* uri_cstr;
           if(uri->pos("://")==STRING_NOT_FOUND) // disk path
                   uri_cstr=r.absolute(*uri).cstr(String::L_FILE_SPEC);
           else // xxx:// 
                   uri_cstr=uri->cstr(String::L_AS_IS); // leave as-is for xmlParseFile to handle
   
           /// todo!! add SAFE MODE!!
           xmlDoc* xmldoc=xmlParseFile(uri_cstr);
           if(!xmldoc || xmlHaveGenericErrors())
                   throw XmlException(uri);
           
           // must be first action after if}
           // replace any previous parsed source
           vdoc.set_xmldoc(r.charsets, *xmldoc); 
 }  }
   
 static void _getElementsByTagNameNS(Request& r, const String& method_name, MethodParams *params) {  static void param_option_over_output_option(
         Pool& pool=r.pool();                                              HashStringValue& param_options, const char* option_name,
         VXdoc& vdoc=*static_cast<VXdoc *>(r.self);                                              const String*& output_option) {
           if(Value* value=param_options.get(String::Body(option_name)))
                   output_option=&value->as_string();
   }
   static void param_option_over_output_option(
                                               HashStringValue& param_options, const char* option_name,
                                               int& output_option) {
           if(Value* value=param_options.get(String::Body(option_name))) {
                   const String& s=value->as_string();
                   if(s=="yes")
                           output_option=1;
                   else if(s=="no")
                           output_option=0;
                   else
                           throw Exception("parser.runtime",
                                   &s,
                                   "%s must be either 'yes' or 'no'", option_name);
           }
   }
   
         // namespaceURI;localName  /// @test valid_options check
         const char *namespaceURI=params->as_string(0, "namespaceURI must not be code").cstr(String::UL_AS_IS);  static void prepare_output_options(Request& r,
         const char *localName=params->as_string(0, "localName must not be code").cstr(String::UL_AS_IS);                                     MethodParams& params, size_t index,
                                      VXdoc::Output_options& oo) {
   /*
   <xsl:output
     !method = "xml" | "html" | "text" | qname-but-not-ncname 
     !version = nmtoken 
     !encoding = string 
     !omit-xml-declaration = "yes" | "no"
     !standalone = "yes" | "no"
     !doctype-public = string 
     !doctype-system = string 
     cdata-section-elements = qnames 
     !indent = "yes" | "no"
     !media-type = string /> 
   */
   
         VHash& result=*new(pool) VHash(pool);          // configuring with options from parameter...
         if(const XalanNodeList *nodes=          if(params.count()>index) {
                 vdoc.get_document(pool, &method_name).getElementsByTagNameNS(                  Value& voptions=params.as_no_junction(index, "options must be string");
                         XalanDOMString(namespaceURI), XalanDOMString(localName))) {                  if(voptions.is_defined()) {
                 for(int i=0; i<nodes->getLength(); i++) {                          if(HashStringValue *options=voptions.get_hash()) {
                         String& skey=*new(pool) String(pool);                                  // $.method[xml|html|text]
                         {                                  if(Value* vmethod=options->get(String::Body(XDOC_OUTPUT_METHOD_OPTION_NAME)))
                                 char *buf=(char *)pool.malloc(MAX_NUMBER);                                          oo.method=&vmethod->as_string();
                                 snprintf(buf, MAX_NUMBER, "%d", i);  
                                 skey << buf;  
                         }  
   
                         result.hash().put(skey, new(pool) VXnode(pool, nodes->item(i)));                                  // $.version[1.0]
                                   param_option_over_output_option(*options, "version", oo.version);
                                   // $.encoding[windows-1251|...]
                                   param_option_over_output_option(*options, "encoding", oo.encoding);
                                   // $.omit-xml-declaration[yes|no]
                                   param_option_over_output_option(*options, "omit-xml-declaration", oo.omitXmlDeclaration);
                                   // $.standalone[yes|no]
                                   param_option_over_output_option(*options, "standalone", oo.standalone);
                                   // $.indent[yes|no]
                                   param_option_over_output_option(*options, "indent", oo.indent);
                                   // $.media-type[text/{html|xml|plain}]
                                   param_option_over_output_option(*options, "media-type", oo.mediaType);                           
                           }
                 }                  }
         }          }
   
         // write out result          // default encoding from pool
         r.write_no_lang(result);          if(!oo.encoding)
                   oo.encoding=new String(r.charsets.source().NAME(), String::L_TAINTED);
           // default method=xml
           if(!oo.method)
                   oo.method=new String(XDOC_OUTPUT_METHOD_OPTION_VALUE_XML);
           // default mediaType = depending on method
           if(!oo.mediaType) {
                   if(*oo.method==XDOC_OUTPUT_METHOD_OPTION_VALUE_XML)
                           oo.mediaType=new String("text/xml");
                   else if(*oo.method==XDOC_OUTPUT_METHOD_OPTION_VALUE_HTML)
                           oo.mediaType=new String("text/html");
                   else // XDOC_OUTPUT_METHOD_OPTION_VALUE_TEXT & all others
                           oo.mediaType=new String("text/plain");
           }
 }  }
 */  
 // constructor  
   
 MXdoc::MXdoc(Pool& apool) : MXnode(apool) {  
         set_name(*NEW String(pool(), XDOC_CLASS_NAME));  
   
         // ^xdoc.save[some.xml]  struct Xdoc2buf_result {
         // ^xdoc.save[some.xml;options hash]          char* str;
         add_native_method("save", Method::CT_DYNAMIC, _save, 1, 2);          size_t length;
   };
   static Xdoc2buf_result xdoc2buf(Request& r, VXdoc& vdoc, 
                                            MethodParams& params, int index,
                                            VXdoc::Output_options& oo,
                                            const String* file_spec,
                                            bool use_source_charset_to_render_and_client_charset_to_write_to_header=false) {
           Xdoc2buf_result result;
           prepare_output_options(r, params, index,
                   oo);
   
           const char* render_encoding;
           const char* header_encoding;
           if(use_source_charset_to_render_and_client_charset_to_write_to_header) {
                   render_encoding=r.charsets.source().NAME_CSTR();
                   header_encoding=r.charsets.client().NAME_CSTR();
           } else {
                   header_encoding=render_encoding=oo.encoding->cstr();
           }
   
         // ^xdoc.string[] <doc/>          xmlCharEncodingHandler *renderer=xmlFindCharEncodingHandler(render_encoding);
         // ^xdoc.string[options hash] <doc/>          if(!renderer)
         add_native_method("string", Method::CT_DYNAMIC, _string, 0, 1);                  throw Exception("parser.runtime",
                           0,
                           "encoding '%s' not supported", render_encoding);
           // UTF-8 renderer contains empty input/output converters, 
           // which is wrong for xmlOutputBufferCreateIO
           // while zero renderer goes perfectly 
           if(strcmp(render_encoding, "UTF-8")==0)
                   renderer=0;
   
           xmlOutputBuffer_auto_ptr outputBuffer(xmlAllocOutputBuffer(renderer));
   
           xsltStylesheet_auto_ptr stylesheet(xsltNewStylesheet());
           if(!stylesheet.get())
                   throw Exception(0,
                           0,
                           "xsltNewStylesheet failed");
   
           #define OOSTRING2STYLE(name) \
                   stylesheet->name=oo.name?BAD_CAST xmlMemStrdup((const char*)r.transcode(*oo.name)):0
           #define OOBOOL2STYLE(name) \
                   if(oo.name>=0) stylesheet->name=oo.name
   
           OOSTRING2STYLE(method);
           OOSTRING2STYLE(encoding);
           OOSTRING2STYLE(mediaType);
   //      OOSTRING2STYLE(doctypeSystem);
   //      OOSTRING2STYLE(doctypePublic);
           OOBOOL2STYLE(indent);
           OOSTRING2STYLE(version);
           OOBOOL2STYLE(standalone);
           OOBOOL2STYLE(omitXmlDeclaration);
   
           xmlDoc& xmldoc=vdoc.get_xmldoc();
           xmldoc.encoding=BAD_CAST xmlMemStrdup(render_encoding);
           if(header_encoding)
                   stylesheet->encoding=BAD_CAST xmlMemStrdup(header_encoding);
           if(xsltSaveResultTo(outputBuffer.get(), &xmldoc, stylesheet.get())<0
                   || xmlHaveGenericErrors())
                   throw XmlException(0);
   
         // ^xdoc.file[] file with "<doc/>"          // write out result
         // ^xdoc.file[options hash] file with "<doc/>"          char *gnome_str;  size_t gnome_length;
         add_native_method("file", Method::CT_DYNAMIC, _file, 0, 1);          if(outputBuffer->conv) {
                   gnome_length=outputBuffer->conv->use;
                   gnome_str=(char *)outputBuffer->conv->content;
           } else {
                   gnome_length=outputBuffer->buffer->use;
                   gnome_str=(char *)outputBuffer->buffer->content;
           }
   
         // ^xdoc::set[<some>xml</some>]          if((result.length=gnome_length)) {
         add_native_method("set", Method::CT_DYNAMIC, _set, 1, 1);                  result.str=pa_strdup(gnome_str, gnome_length);
           } else
                   result.str=0;
   
         // ^xdoc::load[some.xml]          if(file_spec)
         add_native_method("load", Method::CT_DYNAMIC, _load, 1, 1);                  file_write(*file_spec,
                           gnome_str, gnome_length, 
                           true/*as_text*/);
   
           return result;
   }
   
   static void _file(Request& r, MethodParams& params) {
           VXdoc& vdoc=GET_SELF(r, VXdoc);
           VXdoc::Output_options oo(vdoc.output_options);
           Xdoc2buf_result buf=xdoc2buf(r, vdoc, params, 0, 
                   oo,
                   0/*not to file, to memory*/);
           // write out result
           r.write_no_lang(String(buf.str, buf.length));
   
         // ^xdoc.xslt[stylesheet file_name]          // write out result
         // ^xdoc.xslt[stylesheet file_name;params hash]          VFile& vfile=*new VFile;
         add_native_method("xslt", Method::CT_DYNAMIC, _xslt, 1, 2);          VHash& vhcontent_type=*new VHash;
           vhcontent_type.hash().put(
                   value_name, 
                   new VString(*oo.mediaType));
           vhcontent_type.hash().put(
                   String::Body("charset"), 
                   new VString(*oo.encoding));
   
           vfile.set(false/*tainted*/, buf.str?buf.str:""/*to distinguish from stat-ed file*/, buf.length, 
                   0/*file_name*/, &vhcontent_type);
           r.write_no_lang(vfile);
   }
   
         // ^xdoc.getElementById[elementId]  static void _save(Request& r, MethodParams& params) {
         add_native_method("getElementById", Method::CT_DYNAMIC, _getElementById, 1, 1);          VXdoc& vdoc=GET_SELF(r, VXdoc);
 /*        
         // ^xdoc.getElementsByTagName[tagname]  
         add_native_method("getElementsByTagName", Method::CT_DYNAMIC, _getElementsByTagName, 1, 1);  
   
         // ^xdoc.getElementsByTagNameNS[namespaceURI;localName] = array of nodes          const String& file_spec=r.absolute(params.as_string(0, "file name must be string"));
         add_native_method("getElementsByTagNameNS", Method::CT_DYNAMIC, _getElementsByTagNameNS, 2, 2);          
 */          VXdoc::Output_options oo(vdoc.output_options);
           xdoc2buf(r, vdoc, params, 1, 
                   oo,
                   &file_spec);
 }  }
   
   static void _string(Request& r, MethodParams& params) {
           VXdoc& vdoc=GET_SELF(r, VXdoc);
           VXdoc::Output_options oo(vdoc.output_options);
           Xdoc2buf_result buf=xdoc2buf(r, vdoc, params, 0, 
                   oo,
                   0/*not to file, to memory*/,
                   true/*use source charset to render, client charset to put to header*/);
           // write out result
           r.write_no_lang(String(String::Body(buf.str), String::L_AS_IS));
   }
   
   #ifndef DOXYGEN
 #include <util/XercesDefs.hpp>  struct Add_xslt_param_info {
 #include <util/XML256TableTranscoder.hpp>          Request* r;
 //          Array<const xmlChar*>* strings;
 //  This class provides an implementation of the XMLTranscoder interface          const xmlChar** current_transform_param;
 //  for the Windows variant of Latin1, called Windows-1251. Its close to  
 //  Latin1, but is somewhat different.  
 //  
 class XMLWin1251Transcoder : public XML256TableTranscoder  
 {  
 public :  
     // -----------------------------------------------------------------------  
     //  Public constructors and destructor  
     // -----------------------------------------------------------------------  
     XMLWin1251Transcoder  
     (  
         const   XMLCh* const    encodingName  
         , const unsigned int    blockSize  
     );  
   
     virtual ~XMLWin1251Transcoder();  
   
   
 private :  
     // -----------------------------------------------------------------------  
     //  Unimplemented constructors and operators  
     // -----------------------------------------------------------------------  
     XMLWin1251Transcoder();  
     XMLWin1251Transcoder(const XMLWin1251Transcoder&);  
     void operator=(const XMLWin1251Transcoder&);  
 };  };
   #endif
   static void add_xslt_param(
                              HashStringValue::key_type attribute, 
                              HashStringValue::value_type meaning, 
                              Add_xslt_param_info* info) {
           xmlChar* s;
           *info->current_transform_param++=(s=info->r->transcode(attribute)); *info->strings+=s;
           *info->current_transform_param++=(s=info->r->transcode(meaning->as_string())); *info->strings+=s;
   }
   
 // from ICU: ibm-1251.ucm by PAF@design.ru  static VXdoc& _transform(Request& r, const String* stylesheet_source, 
 // ---------------------------------------------------------------------------                                                     VXdoc& vdoc, xsltStylesheetPtr stylesheet, const xmlChar** transform_params) 
 //  Local const data  
 //  
 //  gFromTable  
 //      This is the translation table for Windows 1251 to Unicode. This  
 //      table contains 255 entries. The entry for 1251 byte x is the  
 //      Unicode translation of that byte.  
 //  
 //  gToTable  
 //  gToTableSz  
 //      This is the translation table for Unicode to Windows 1251. This one  
 //      contains a list of records, sorted by the Unicode code point. We do  
 //      a binary search to find the Unicode point, and that record's other  
 //      field is the 1251 code point to translate to.  
 // ---------------------------------------------------------------------------  
 static const XMLCh gFromTable[256] =  
 {  {
 0x0000, 0x0001, 0x0002, 0x0003, 0x0004, 0x0005, 0x0006, 0x0007,           xmlDoc& xmldoc=vdoc.get_xmldoc();
 0x0008, 0x0009, 0x000A, 0x000B, 0x000C, 0x000D, 0x000E, 0x000F,   
 0x0010, 0x0011, 0x0012, 0x0013, 0x0014, 0x0015, 0x0016, 0x0017,   
 0x0018, 0x0019, 0x001A, 0x001B, 0x001C, 0x001D, 0x001E, 0x001F,   
 0x0020, 0xFF01, 0xFF02, 0xFF03, 0xFF04, 0xFF05, 0xFF06, 0xFF07,   
 0xFF08, 0xFF09, 0xFF0A, 0xFF0B, 0xFF0C, 0xFF0D, 0xFF0E, 0xFF0F,   
 0xFF10, 0xFF11, 0xFF12, 0xFF13, 0xFF14, 0xFF15, 0xFF16, 0xFF17,   
 0xFF18, 0xFF19, 0xFF1A, 0xFF1B, 0xFF1C, 0xFF1D, 0xFF1E, 0xFF1F,   
 0xFF20, 0xFF21, 0xFF22, 0xFF23, 0xFF24, 0xFF25, 0xFF26, 0xFF27,   
 0xFF28, 0xFF29, 0xFF2A, 0xFF2B, 0xFF2C, 0xFF2D, 0xFF2E, 0xFF2F,   
 0xFF30, 0xFF31, 0xFF32, 0xFF33, 0xFF34, 0xFF35, 0xFF36, 0xFF37,   
 0xFF38, 0xFF39, 0xFF3A, 0xFF3B, 0xFF3C, 0xFF3D, 0xFF3E, 0xFF3F,   
 0xFF40, 0xFF41, 0xFF42, 0xFF43, 0xFF44, 0xFF45, 0xFF46, 0xFF47,   
 0xFF48, 0xFF49, 0xFF4A, 0xFF4B, 0xFF4C, 0xFF4D, 0xFF4E, 0xFF4F,   
 0xFF50, 0xFF51, 0xFF52, 0xFF53, 0xFF54, 0xFF55, 0xFF56, 0xFF57,   
 0xFF58, 0xFF59, 0xFF5A, 0xFF5B, 0xFF5C, 0xFF5D, 0xFF5E, 0x007F,   
 0x0402, 0x0403, 0x201A, 0x0453, 0x201E, 0x2026, 0x2020, 0x2021,   
 0x0088, 0x2030, 0x0409, 0x2039, 0x040A, 0x040C, 0x040B, 0x040F,   
 0x0452, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014,   
 0x0098, 0x2122, 0x0459, 0x203A, 0x045A, 0x045C, 0x045B, 0x045F,   
 0x00A0, 0x040E, 0x045E, 0x0408, 0x00A4, 0x0490, 0x00A6, 0x00A7,   
 0x0401, 0x00A9, 0x0404, 0x00AB, 0x00AC, 0x00AD, 0x00AE, 0x0407,   
 0x00B0, 0x00B1, 0x0406, 0x0456, 0x0491, 0x00B5, 0x00B6, 0x00B7,   
 0x0451, 0x2116, 0x0454, 0x00BB, 0x0458, 0x0405, 0x0455, 0x0457,   
 0x0410, 0x0411, 0x0412, 0x0413, 0x0414, 0x0415, 0x0416, 0x0417,   
 0x0418, 0x0419, 0x041A, 0x041B, 0x041C, 0x041D, 0x041E, 0x041F,   
 0x0420, 0x0421, 0x0422, 0x0423, 0x0424, 0x0425, 0x0426, 0x0427,   
 0x0428, 0x0429, 0x042A, 0x042B, 0x042C, 0x042D, 0x042E, 0x042F,   
 0x0430, 0x0431, 0x0432, 0x0433, 0x0434, 0x0435, 0x0436, 0x0437,   
 0x0438, 0x0439, 0x043A, 0x043B, 0x043C, 0x043D, 0x043E, 0x043F,   
 0x0440, 0x0441, 0x0442, 0x0443, 0x0444, 0x0445, 0x0446, 0x0447,   
 0x0448, 0x0449, 0x044A, 0x044B, 0x044C, 0x044D, 0x044E, 0x044F  
 };  
   
 static const XMLTransService::TransRec gToTable[] =          xsltTransformContext_auto_ptr transformContext(
 {                  xsltNewTransformContext(stylesheet, &xmldoc));
 { 0x0000, 0x00 }, { 0x0001, 0x01 }, { 0x0002, 0x02 }, { 0x0003, 0x03 },           // make params literal
 { 0x0004, 0x04 }, { 0x0005, 0x05 }, { 0x0006, 0x06 }, { 0x0007, 0x07 },           if (transformContext->globalVars == NULL) // strangly not initialized by xsltNewTransformContext
 { 0x0008, 0x08 }, { 0x0009, 0x09 }, { 0x000A, 0x0A }, { 0x000B, 0x0B },                   transformContext->globalVars = xmlHashCreate(20);
 { 0x000C, 0x0C }, { 0x000D, 0x0D }, { 0x000E, 0x0E }, { 0x000F, 0x0F },           xsltQuoteUserParams(transformContext.get(), (const char**)transform_params);
 { 0x0010, 0x10 }, { 0x0011, 0x11 }, { 0x0012, 0x12 }, { 0x0013, 0x13 },           // do transform
 { 0x0014, 0x14 }, { 0x0015, 0x15 }, { 0x0016, 0x16 }, { 0x0017, 0x17 },           xmlDoc *transformed=xsltApplyStylesheetUser(
 { 0x0018, 0x18 }, { 0x0019, 0x19 }, { 0x001A, 0x1A }, { 0x001B, 0x1B },                   stylesheet,
 { 0x001C, 0x1C }, { 0x001D, 0x1D }, { 0x001E, 0x1E }, { 0x001F, 0x1F },                   &xmldoc,
 { 0x0020, 0x20 }, { 0x0021, 0x21 }, { 0x0022, 0x22 }, { 0x0023, 0x23 },                   0/*already quoted-inserted  transform_params*/,
 { 0x0024, 0x24 }, { 0x0025, 0x25 }, { 0x0026, 0x26 }, { 0x0027, 0x27 },                   0/*const char* output*/,
 { 0x0028, 0x28 }, { 0x0029, 0x29 }, { 0x002A, 0x2A }, { 0x002B, 0x2B },                   0/*FILE *profile*/,
 { 0x002C, 0x2C }, { 0x002D, 0x2D }, { 0x002E, 0x2E }, { 0x002F, 0x2F },                   transformContext.get());
 { 0x0030, 0x30 }, { 0x0031, 0x31 }, { 0x0032, 0x32 }, { 0x0033, 0x33 },           if(!transformed || xmlHaveGenericErrors())
 { 0x0034, 0x34 }, { 0x0035, 0x35 }, { 0x0036, 0x36 }, { 0x0037, 0x37 },                   throw XmlException(stylesheet_source);
 { 0x0038, 0x38 }, { 0x0039, 0x39 }, { 0x003A, 0x3A }, { 0x003B, 0x3B },   
 { 0x003C, 0x3C }, { 0x003D, 0x3D }, { 0x003E, 0x3E }, { 0x003F, 0x3F },           //gdome_xml_doc_mkref dislikes XML_HTML_DOCUMENT_NODE  type, fixing
 { 0x0040, 0x40 }, { 0x0041, 0x41 }, { 0x0042, 0x42 }, { 0x0043, 0x43 },           transformed->type=XML_DOCUMENT_NODE;
 { 0x0044, 0x44 }, { 0x0045, 0x45 }, { 0x0046, 0x46 }, { 0x0047, 0x47 },           // constructing result
 { 0x0048, 0x48 }, { 0x0049, 0x49 }, { 0x004A, 0x4A }, { 0x004B, 0x4B },           VXdoc& result=*new VXdoc(r.charsets, *transformed);
 { 0x004C, 0x4C }, { 0x004D, 0x4D }, { 0x004E, 0x4E }, { 0x004F, 0x4F },           /* grabbing options
 { 0x0050, 0x50 }, { 0x0051, 0x51 }, { 0x0052, 0x52 }, { 0x0053, 0x53 },   
 { 0x0054, 0x54 }, { 0x0055, 0x55 }, { 0x0056, 0x56 }, { 0x0057, 0x57 },                   <xsl:output
 { 0x0058, 0x58 }, { 0x0059, 0x59 }, { 0x005A, 0x5A }, { 0x005B, 0x5B },                   !method = "xml" | "html" | "text"
 { 0x005C, 0x5C }, { 0x005D, 0x5D }, { 0x005E, 0x5E }, { 0x005F, 0x5F },                           X| qname-but-not-ncname 
 { 0x0060, 0x60 }, { 0x0061, 0x61 }, { 0x0062, 0x62 }, { 0x0063, 0x63 },                   !version = nmtoken 
 { 0x0064, 0x64 }, { 0x0065, 0x65 }, { 0x0066, 0x66 }, { 0x0067, 0x67 },                   !encoding = string 
 { 0x0068, 0x68 }, { 0x0069, 0x69 }, { 0x006A, 0x6A }, { 0x006B, 0x6B },                   !omit-xml-declaration = "yes" | "no"
 { 0x006C, 0x6C }, { 0x006D, 0x6D }, { 0x006E, 0x6E }, { 0x006F, 0x6F },                   !standalone = "yes" | "no"
 { 0x0070, 0x70 }, { 0x0071, 0x71 }, { 0x0072, 0x72 }, { 0x0073, 0x73 },                   !doctype-public = string 
 { 0x0074, 0x74 }, { 0x0075, 0x75 }, { 0x0076, 0x76 }, { 0x0077, 0x77 },                   !doctype-system = string 
 { 0x0078, 0x78 }, { 0x0079, 0x79 }, { 0x007A, 0x7A }, { 0x007B, 0x7B },                   Xcdata-section-elements = qnames 
 { 0x007C, 0x7C }, { 0x007D, 0x7D }, { 0x007E, 0x7E }, { 0x007F, 0x7F },                   !indent = "yes" | "no"
 { 0x0088, 0x88 }, { 0x0098, 0x98 }, { 0x00A0, 0xA0 }, { 0x00A4, 0xA4 },                   !media-type = string /> 
 { 0x00A6, 0xA6 }, { 0x00A7, 0xA7 }, { 0x00A9, 0xA9 }, { 0x00AB, 0xAB },           */
 { 0x00AC, 0xAC }, { 0x00AD, 0xAD }, { 0x00AE, 0xAE }, { 0x00B0, 0xB0 },           VXdoc::Output_options& oo=result.output_options;
 { 0x00B1, 0xB1 }, { 0x00B5, 0xB5 }, { 0x00B6, 0xB6 }, { 0x00B7, 0xB7 },   
 { 0x00BB, 0xBB }, { 0x0401, 0xA8 }, { 0x0402, 0x80 }, { 0x0403, 0x81 },           oo.method=stylesheet->method?&r.transcode(stylesheet->method):0;
 { 0x0404, 0xAA }, { 0x0405, 0xBD }, { 0x0406, 0xB2 }, { 0x0407, 0xAF },           oo.encoding=stylesheet->encoding?&r.transcode(stylesheet->encoding):0;
 { 0x0408, 0xA3 }, { 0x0409, 0x8A }, { 0x040A, 0x8C }, { 0x040B, 0x8E },           oo.mediaType=stylesheet->mediaType?&r.transcode(stylesheet->mediaType):0;
 { 0x040C, 0x8D }, { 0x040E, 0xA1 }, { 0x040F, 0x8F }, { 0x0410, 0xC0 },           oo.indent=stylesheet->indent;
 { 0x0411, 0xC1 }, { 0x0412, 0xC2 }, { 0x0413, 0xC3 }, { 0x0414, 0xC4 },           oo.version=stylesheet->version?&r.transcode(stylesheet->version):0;
 { 0x0415, 0xC5 }, { 0x0416, 0xC6 }, { 0x0417, 0xC7 }, { 0x0418, 0xC8 },           oo.standalone=stylesheet->standalone;
 { 0x0419, 0xC9 }, { 0x041A, 0xCA }, { 0x041B, 0xCB }, { 0x041C, 0xCC },           oo.omitXmlDeclaration=stylesheet->omitXmlDeclaration;
 { 0x041D, 0xCD }, { 0x041E, 0xCE }, { 0x041F, 0xCF }, { 0x0420, 0xD0 },   
 { 0x0421, 0xD1 }, { 0x0422, 0xD2 }, { 0x0423, 0xD3 }, { 0x0424, 0xD4 },           // return
 { 0x0425, 0xD5 }, { 0x0426, 0xD6 }, { 0x0427, 0xD7 }, { 0x0428, 0xD8 },           return result;
 { 0x0429, 0xD9 }, { 0x042A, 0xDA }, { 0x042B, 0xDB }, { 0x042C, 0xDC },   }
 { 0x042D, 0xDD }, { 0x042E, 0xDE }, { 0x042F, 0xDF }, { 0x0430, 0xE0 },   static void _transform(Request& r, MethodParams& params) {
 { 0x0431, 0xE1 }, { 0x0432, 0xE2 }, { 0x0433, 0xE3 }, { 0x0434, 0xE4 },           VXdoc& vdoc=GET_SELF(r, VXdoc);
 { 0x0435, 0xE5 }, { 0x0436, 0xE6 }, { 0x0437, 0xE7 }, { 0x0438, 0xE8 },   
 { 0x0439, 0xE9 }, { 0x043A, 0xEA }, { 0x043B, 0xEB }, { 0x043C, 0xEC },   
 { 0x043D, 0xED }, { 0x043E, 0xEE }, { 0x043F, 0xEF }, { 0x0440, 0xF0 },   
 { 0x0441, 0xF1 }, { 0x0442, 0xF2 }, { 0x0443, 0xF3 }, { 0x0444, 0xF4 },   
 { 0x0445, 0xF5 }, { 0x0446, 0xF6 }, { 0x0447, 0xF7 }, { 0x0448, 0xF8 },   
 { 0x0449, 0xF9 }, { 0x044A, 0xFA }, { 0x044B, 0xFB }, { 0x044C, 0xFC },   
 { 0x044D, 0xFD }, { 0x044E, 0xFE }, { 0x044F, 0xFF }, { 0x0451, 0xB8 },   
 { 0x0452, 0x90 }, { 0x0453, 0x83 }, { 0x0454, 0xBA }, { 0x0455, 0xBE },   
 { 0x0456, 0xB3 }, { 0x0457, 0xBF }, { 0x0458, 0xBC }, { 0x0459, 0x9A },   
 { 0x045A, 0x9C }, { 0x045B, 0x9E }, { 0x045C, 0x9D }, { 0x045E, 0xA2 },   
 { 0x045F, 0x9F }, { 0x0490, 0xA5 }, { 0x0491, 0xB4 }, { 0x2013, 0x96 },   
 { 0x2014, 0x97 }, { 0x2018, 0x91 }, { 0x2019, 0x92 }, { 0x201A, 0x82 },   
 { 0x201C, 0x93 }, { 0x201D, 0x94 }, { 0x201E, 0x84 }, { 0x2020, 0x86 },   
 { 0x2021, 0x87 }, { 0x2022, 0x95 }, { 0x2026, 0x85 }, { 0x2030, 0x89 },   
 { 0x2039, 0x8B }, { 0x203A, 0x9B }, { 0x2116, 0xB9 }, { 0x2122, 0x99 },   
 { 0xFF01, 0x21 }, { 0xFF02, 0x22 }, { 0xFF03, 0x23 }, { 0xFF04, 0x24 },   
 { 0xFF05, 0x25 }, { 0xFF06, 0x26 }, { 0xFF07, 0x27 }, { 0xFF08, 0x28 },   
 { 0xFF09, 0x29 }, { 0xFF0A, 0x2A }, { 0xFF0B, 0x2B }, { 0xFF0C, 0x2C },   
 { 0xFF0D, 0x2D }, { 0xFF0E, 0x2E }, { 0xFF0F, 0x2F }, { 0xFF10, 0x30 },   
 { 0xFF11, 0x31 }, { 0xFF12, 0x32 }, { 0xFF13, 0x33 }, { 0xFF14, 0x34 },   
 { 0xFF15, 0x35 }, { 0xFF16, 0x36 }, { 0xFF17, 0x37 }, { 0xFF18, 0x38 },   
 { 0xFF19, 0x39 }, { 0xFF1A, 0x3A }, { 0xFF1B, 0x3B }, { 0xFF1C, 0x3C },   
 { 0xFF1D, 0x3D }, { 0xFF1E, 0x3E }, { 0xFF1F, 0x3F }, { 0xFF20, 0x40 },   
 { 0xFF21, 0x41 }, { 0xFF22, 0x42 }, { 0xFF23, 0x43 }, { 0xFF24, 0x44 },   
 { 0xFF25, 0x45 }, { 0xFF26, 0x46 }, { 0xFF27, 0x47 }, { 0xFF28, 0x48 },   
 { 0xFF29, 0x49 }, { 0xFF2A, 0x4A }, { 0xFF2B, 0x4B }, { 0xFF2C, 0x4C },   
 { 0xFF2D, 0x4D }, { 0xFF2E, 0x4E }, { 0xFF2F, 0x4F }, { 0xFF30, 0x50 },   
 { 0xFF31, 0x51 }, { 0xFF32, 0x52 }, { 0xFF33, 0x53 }, { 0xFF34, 0x54 },   
 { 0xFF35, 0x55 }, { 0xFF36, 0x56 }, { 0xFF37, 0x57 }, { 0xFF38, 0x58 },   
 { 0xFF39, 0x59 }, { 0xFF3A, 0x5A }, { 0xFF3B, 0x5B }, { 0xFF3C, 0x5C },   
 { 0xFF3D, 0x5D }, { 0xFF3E, 0x5E }, { 0xFF3F, 0x5F }, { 0xFF40, 0x60 },   
 { 0xFF41, 0x61 }, { 0xFF42, 0x62 }, { 0xFF43, 0x63 }, { 0xFF44, 0x64 },   
 { 0xFF45, 0x65 }, { 0xFF46, 0x66 }, { 0xFF47, 0x67 }, { 0xFF48, 0x68 },   
 { 0xFF49, 0x69 }, { 0xFF4A, 0x6A }, { 0xFF4B, 0x6B }, { 0xFF4C, 0x6C },   
 { 0xFF4D, 0x6D }, { 0xFF4E, 0x6E }, { 0xFF4F, 0x6F }, { 0xFF50, 0x70 },   
 { 0xFF51, 0x71 }, { 0xFF52, 0x72 }, { 0xFF53, 0x73 }, { 0xFF54, 0x74 },   
 { 0xFF55, 0x75 }, { 0xFF56, 0x76 }, { 0xFF57, 0x77 }, { 0xFF58, 0x78 },   
 { 0xFF59, 0x79 }, { 0xFF5A, 0x7A }, { 0xFF5B, 0x7B }, { 0xFF5C, 0x7C },   
 { 0xFF5D, 0x7D }, { 0xFF5E, 0x7E }  
 };  
 static const unsigned int gToTableSz = 350;  
   
           // params
           Array<const xmlChar*> transform_strings;
           const xmlChar** transform_params=0;
           if(params.count()>1) {
                   Value& vparams=params.as_no_junction(1, "transform parameters must be hash");
                   if(!vparams.is_string())
                           if(HashStringValue* hash=vparams.get_hash()) {
                                   transform_params=new(UseGC) const xmlChar*[hash->count()*2+1];
                                   Add_xslt_param_info info={
                                           &r, 
                                           &transform_strings,
                                           transform_params
                                   };
                                   hash->for_each<Add_xslt_param_info*>(add_xslt_param, &info);
                                   transform_params[hash->count()*2]=0;                            
                           } else
                                   throw Exception("parser.runtime",
                                           0,
                                           "transform parameters parameter must be hash");
           }
   
           VXdoc* result;
           if(Value *vxdoc=params[0].as(VXDOC_TYPE, false)) { // stylesheet (xdoc)
                   xmlDoc& stylesheetdoc=static_cast<VXdoc *>(vxdoc)->get_xmldoc();
                   // compile xdoc stylesheet
                   xsltStylesheet_auto_ptr stylesheet_ptr(xsltParseStylesheetDoc(&stylesheetdoc)); 
                   if(xmlHaveGenericErrors())
                           throw XmlException(0);
                   if(!stylesheet_ptr.get())
                           throw Exception("xml",
                                   0,
                                   "stylesheet failed to compile");
                   // strange thing - xsltParseStylesheetDoc records document and destroys it in stylesheet destructor
                   // we don't need that
                   stylesheet_ptr->doc=0;
   
                   // transform!
                   result=&_transform(r, 0,
                           vdoc, stylesheet_ptr.get(),
                           transform_params);
           } else { // stylesheet (file name)
                   // extablish stylesheet connection
                   const String& stylesheet_filespec=
                           r.absolute(params.as_string(0, "stylesheet must be file name (string) or DOM document (xdoc)"));
                   Stylesheet_connection_ptr connection=stylesheet_manager->get_connection(stylesheet_filespec);
   
                   // load and compile file to stylesheet [or get cached if any]
                   // transform!
                   result=&_transform(r, &stylesheet_filespec, vdoc, connection->stylesheet(),
                           transform_params);
           }
   
 // ---------------------------------------------------------------------------          // write out result
 //  XML1140Transcoder: Constructors and Destructor          r.write_no_lang(*result);
 // ---------------------------------------------------------------------------  
 XMLWin1251Transcoder::XMLWin1251Transcoder( const   XMLCh* const encodingName  
                                             , const unsigned int blockSize) :  
     XML256TableTranscoder  
     (  
         encodingName  
         , blockSize  
         , gFromTable  
         , gToTable  
         , gToTableSz  
     )  
 {  
 }  }
   
   // constructor
   
 XMLWin1251Transcoder::~XMLWin1251Transcoder()  /// @test how to create empty type html?
 {  MXdoc::MXdoc(): MXnode(XDOC_CLASS_NAME, xnode_class) {
 }          /// DOM1
   
           // Element createElement(in DOMString tagName) raises(DOMException);
           add_native_method("createElement", Method::CT_DYNAMIC, _createElement, 1, 1);
           // DocumentFragment createDocumentFragment(); 
           add_native_method("createDocumentFragment", Method::CT_DYNAMIC, _createDocumentFragment, 0, 0);
           // Text createTextNode(in DOMString data);
           add_native_method("createTextNode", Method::CT_DYNAMIC, _createTextNode, 1, 1);
           // Comment createComment(in DOMString data);
           add_native_method("createComment", Method::CT_DYNAMIC, _createComment, 1, 1);
           // CDATASection createCDATASection(in DOMString data) raises(DOMException);
           add_native_method("createCDATASection", Method::CT_DYNAMIC, _createCDATASection, 1, 1);
           // ProcessingInstruction createProcessingInstruction(in DOMString target, in DOMString data) raises(DOMException);
           add_native_method("createProcessingInstruction", Method::CT_DYNAMIC, _createProcessingInstruction, 2, 2);
           // Attr createAttribute(in DOMString name) raises(DOMException);
           add_native_method("createAttribute", Method::CT_DYNAMIC, _createAttribute, 1, 1);
           // EntityReference createEntityReference(in DOMString name) raises(DOMException);
           add_native_method("createEntityReference", Method::CT_DYNAMIC, _createEntityReference, 1, 1);
   
           /// DOM2
   
           // ^xdoc.getElementById[elementId]
           add_native_method("getElementById", Method::CT_DYNAMIC, _getElementById, 1, 1);
   
       // Node (in Node importedNode, in boolean deep) raises(DOMException)
           add_native_method("importNode", Method::CT_DYNAMIC, _importNode, 2, 2);
   
           // Attr createAttributeNS(in DOMString namespaceURI, in DOMString qualifiedName) raises(DOMException);
           add_native_method("createAttributeNS", Method::CT_DYNAMIC, _createAttributeNS, 2, 2);
   
           // Element createElementNS(in DOMString namespaceURI, in DOMString qualifiedName) raises(DOMException);
           add_native_method("createElementNS", Method::CT_DYNAMIC, _createElementNS, 2, 2);
   
           /// parser
           
           // ^xdoc::create{qualifiedName}
           // ^xdoc::create[<some>xml</some>]
           // ^xdoc::create[URI][<some>xml</some>]
           add_native_method("create", Method::CT_DYNAMIC, _create, 1, 2); 
           // for backward compatibility with <=v 1.82 2002/01/31 11:51:46 paf
           add_native_method("set", Method::CT_DYNAMIC, _create, 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);
   
           // ^xdoc.string[] <doc/>
           // ^xdoc.string[options hash] <doc/>
           add_native_method("string", Method::CT_DYNAMIC, _string, 0, 1);
   
           // ^xdoc.file[] file with "<doc/>"
           // ^xdoc.file[options hash] file with "<doc/>"
           add_native_method("file", Method::CT_DYNAMIC, _file, 0, 1);
   
           // ^xdoc.transform[stylesheet file_name/xdoc]
           // ^xdoc.transform[stylesheet file_name/xdoc;params hash]
           add_native_method("transform", Method::CT_DYNAMIC, _transform, 1, 2);
   
 void MXdoc::configure_admin(Request& r) {  
         XalanDOMString *sencoding=new XalanDOMString("WINDOWS-125ODIN");  
         const XMLCh* const encoding_cstr=sencoding->c_str();  
     XMLPlatformUtils::fgTransService->addEncoding(  
                 encoding_cstr,   
                 new ENameMapFor<XMLWin1251Transcoder>(encoding_cstr));  
         // delete sencoding; somehow  
 }  }
   
 // global variable  # else
   
 Methoded *Xdoc_class;  #include "classes.h"
   
 // creator  // global variable
   
 #endif  DECLARE_CLASS_VAR(xdoc, 0, 0); // fictive
   
 Methoded *MXdoc_create(Pool& pool) {  
         return   
 #ifdef XML  
                 Xdoc_class=new(pool) MXdoc(pool);  
 #else  
                 0  
 #endif  #endif
         ;  
 }  

Removed from v.1.6  
changed lines
  Added in v.1.151


E-mail: