Annotation of parser3/src/classes/dom.C, revision 1.20
1.2 parser 1: /** @file
2: Parser: @b dom parser class.
3:
4: Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com)
5:
6: Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf)
7: */
1.20 ! parser 8: static const char *RCSId="$Id: dom.C,v 1.19 2001/09/13 14:10:54 parser Exp $";
1.2 parser 9:
10: #if _MSC_VER
11: # pragma warning(disable:4291) // disable warning
12: // "no matching operator delete found; memory will not be freed if initialization throws an exception
13: #endif
14:
15: #include "classes.h"
16: #include "pa_request.h"
17: #include "pa_vdom.h"
1.9 parser 18: #include "pa_vfile.h"
1.20 ! parser 19: #include "pa_xslt_stylesheet_manager.h"
! 20: #include "pa_stylesheet_connection.h"
1.2 parser 21:
1.16 parser 22: #include <strstream>
1.2 parser 23: #include <Include/PlatformDefinitions.hpp>
24: #include <util/PlatformUtils.hpp>
1.5 parser 25: #include <util/XMLString.hpp>
1.2 parser 26: #include <XalanTransformer/XalanTransformer.hpp>
1.4 parser 27: #include <XalanTransformer/XalanParsedSource.hpp>
28: #include <PlatformSupport/XalanFileOutputStream.hpp>
29: #include <PlatformSupport/XalanOutputStreamPrintWriter.hpp>
1.6 parser 30: #include <PlatformSupport/DOMStringPrintWriter.hpp>
1.4 parser 31: #include <XMLSupport/FormatterToXML.hpp>
1.13 parser 32: #include <XMLSupport/FormatterToHTML.hpp>
33: #include <XMLSupport/FormatterToText.hpp>
1.4 parser 34: #include <XMLSupport/FormatterTreeWalker.hpp>
1.6 parser 35:
1.2 parser 36: // defines
37:
1.4 parser 38: #define DOM_CLASS_NAME "dom"
1.2 parser 39:
1.13 parser 40: #define DOM_OUTPUT_METHOD_OPTION_NAME "method"
41: #define DOM_OUTPUT_METHOD_OPTION_VALUE_XML "xml"
42: #define DOM_OUTPUT_METHOD_OPTION_VALUE_HTML "html"
43: #define DOM_OUTPUT_METHOD_OPTION_VALUE_TEXT "text"
44:
45: #define DOM_OUTPUT_ENCODING_OPTION_NAME "encoding"
46:
47: #define DOM_OUTPUT_DEFAULT_INDENT 4
48:
1.2 parser 49: // class
50:
51: class MDom : public Methoded {
52: public: // VStateless_class
1.11 parser 53: Value *create_new_value(Pool& pool) { return new(pool) VDom(pool); }
1.2 parser 54:
55: public:
56: MDom(Pool& pool);
57:
58: public: // Methoded
59: bool used_directly() { return true; }
60: };
61:
62: // methods
63:
1.16 parser 64: static void _set(Request& r, const String& method_name, MethodParams *params) {
65: Pool& pool=r.pool();
66: VDom& vDom=*static_cast<VDom *>(r.self);
67:
1.17 parser 68: Value& vxml=params->as_junction(0, "xml must be code");
69: Temp_lang temp_lang(r, String::UL_XML);
70: const String& xml=r.process(vxml).as_string();
71:
72: std::istrstream stream(xml.cstr());
1.16 parser 73: XalanParsedSource* parsedSource;
74: int error=vDom.get_transformer().parseSource(&stream, parsedSource);
75:
76: if(error)
77: PTHROW(0, 0,
78: &method_name,
79: vDom.get_transformer().getLastError());
80:
81: // replace any previous parsed source
82: vDom.set_parsed_source(*parsedSource);
83: }
84:
1.2 parser 85: static void _load(Request& r, const String& method_name, MethodParams *params) {
86: Pool& pool=r.pool();
1.10 parser 87: VDom& vDom=*static_cast<VDom *>(r.self);
1.2 parser 88:
1.10 parser 89: // filespec
1.20 ! parser 90: const String& file_name=params->as_string(0, "file name must not be code");
! 91: const char *filespec=r.absolute(file_name).cstr(String::UL_FILE_SPEC);
1.2 parser 92:
93: XalanParsedSource* parsedSource;
1.15 parser 94: int error=vDom.get_transformer().parseSource(filespec, parsedSource);
1.2 parser 95:
96: if(error)
97: PTHROW(0, 0,
1.20 ! parser 98: &file_name,
1.10 parser 99: vDom.get_transformer().getLastError());
1.2 parser 100:
1.15 parser 101: // replace any previous parsed source
1.11 parser 102: vDom.set_parsed_source(*parsedSource);
1.2 parser 103: }
104:
1.5 parser 105: const char *strX(const XalanDOMString& s) {
106: return XMLString::transcode(s.c_str());
107: }
108:
109: static void _throw(Pool& pool, const String *source, const XSLException& e) {
110: if(e.getURI().empty())
111: PTHROW(0, 0,
112: source,
113: "%s (%s)",
114: strX(e.getMessage()), // message for exception
115: strX(e.getType()) // type of exception
116: );
117: else
118: PTHROW(0, 0,
119: source,
120: "%s (%s) %s(%d:%d)'",
121: strX(e.getMessage()), // message for exception
122: strX(e.getType()), // type of exception
123:
124: strX(e.getURI()), // URI for the associated document, if any
125: e.getLineNumber(), // line number, or -1 if unknown
126: e.getColumnNumber() // column number, or -1 if unknown
127: );
128: }
129:
1.18 parser 130: class ParserStringXalanOutputStream: public XalanOutputStream {
1.6 parser 131: public:
132:
1.18 parser 133: explicit ParserStringXalanOutputStream(String& astring) : fstring(astring) {}
1.7 parser 134:
135: protected: // XalanOutputStream
136:
137: virtual void writeData(const char *theBuffer, unsigned long theBufferLength) {
1.6 parser 138: char *copy=(char *)fstring.malloc((size_t)theBufferLength);
139: memcpy(copy, theBuffer, (size_t)theBufferLength);
140: fstring.APPEND_CLEAN(copy, (size_t)theBufferLength, "dom", -1);
141: }
142:
1.7 parser 143: virtual void doFlush() {}
1.6 parser 144:
145: private:
146:
147: String& fstring;
148:
149: };
150:
151:
1.18 parser 152: void create_optioned_listener(
1.19 parser 153: const char *& content_type, const char *& charset, FormatterListener *& listener,
1.18 parser 154: Pool& pool,
155: const String& method_name, MethodParams *params, int index, Writer& writer) {
1.19 parser 156: charset=0;
1.13 parser 157: const String *method=0;
158: XalanDOMString xalan_encoding;
159:
160: Value& voptions=params->as_no_junction(index, "options must not be code");
161: if(voptions.is_defined()) {
162: if(Hash *options=voptions.get_hash()) {
163: // $.method[xml|html|text]
1.15 parser 164: if(Value *vmethod=static_cast<Value *>(options->get(*new(pool)
165: String(pool, DOM_OUTPUT_METHOD_OPTION_NAME))))
166: method=&vmethod->as_string();
1.13 parser 167:
168: // $.encoding[windows-1251|...]
169: if(Value *vencoding=static_cast<Value *>(options->get(*new(pool)
170: String(pool, DOM_OUTPUT_ENCODING_OPTION_NAME)))) {
1.19 parser 171: charset=vencoding->as_string().cstr();
172: xalan_encoding.append(charset, strlen(charset));
1.13 parser 173: }
174: } else
175: PTHROW(0, 0,
176: &method_name,
1.16 parser 177: "options must be hash");
1.13 parser 178: }
179:
1.18 parser 180: if(!method/*default='xml'*/ || *method == DOM_OUTPUT_METHOD_OPTION_VALUE_XML) {
181: content_type="text/xml";
182: listener=new FormatterToXML(writer,
1.13 parser 183: XalanDOMString(), // version
184: true, // doIndent
185: DOM_OUTPUT_DEFAULT_INDENT, // indent
186: xalan_encoding // encoding
187: );
1.18 parser 188: } else if(*method == DOM_OUTPUT_METHOD_OPTION_VALUE_HTML) {
189: content_type="text/html";
190: listener=new FormatterToHTML(writer,
1.13 parser 191: xalan_encoding, // encoding
192: XalanDOMString(), // mediaType
193: XalanDOMString(), // doctypeSystem; String to be printed at the top of the document
194: XalanDOMString(), // doctypePublic
195: true, // doIndent
196: DOM_OUTPUT_DEFAULT_INDENT // indent
197: );
1.18 parser 198: } else if(*method == DOM_OUTPUT_METHOD_OPTION_VALUE_TEXT) {
199: content_type="text/plain";
200: listener=new FormatterToText(writer,
1.13 parser 201: xalan_encoding // encoding
202: );
1.18 parser 203: } else
1.13 parser 204: PTHROW(0, 0,
205: method,
1.14 parser 206: DOM_OUTPUT_METHOD_OPTION_NAME " option is invalid; valid methods are: "
207: "'" DOM_OUTPUT_METHOD_OPTION_VALUE_XML "', "
208: "'" DOM_OUTPUT_METHOD_OPTION_VALUE_HTML "', "
1.13 parser 209: "'" DOM_OUTPUT_METHOD_OPTION_VALUE_TEXT "'");
210:
211: // never reached
212: }
213:
1.3 parser 214: static void _save(Request& r, const String& method_name, MethodParams *params) {
215: Pool& pool=r.pool();
1.10 parser 216: VDom& vDom=*static_cast<VDom *>(r.self);
1.3 parser 217:
218: // filespec
1.20 ! parser 219: const String& file_name=params->as_string(1, "file name must not be code");
! 220: const char *filespec=r.absolute(file_name).cstr(String::UL_FILE_SPEC);
1.3 parser 221:
1.11 parser 222: // document
223: XalanDocument& document=vDom.get_document(pool, &method_name);
1.3 parser 224:
1.5 parser 225: try {
1.6 parser 226: XalanFileOutputStream stream(XalanDOMString(filespec, strlen(filespec)));
227: XalanOutputStreamPrintWriter writer(stream);
1.19 parser 228: const char *content_type, *charset;
1.18 parser 229: FormatterListener *formatterListener;
1.19 parser 230: create_optioned_listener(content_type, charset, formatterListener,
1.18 parser 231: pool, method_name, params, 0, writer);
232: FormatterTreeWalker treeWalker(*formatterListener);
1.11 parser 233: treeWalker.traverse(&document); // Walk the document and produce the XML...
1.6 parser 234: } catch(const XSLException& e) {
235: _throw(pool, &method_name, e);
236: }
237: }
238:
239: static void _string(Request& r, const String& method_name, MethodParams *params) {
240: Pool& pool=r.pool();
1.10 parser 241: VDom& vDom=*static_cast<VDom *>(r.self);
1.6 parser 242:
1.11 parser 243: // document
244: XalanDocument& document=vDom.get_document(pool, &method_name);
1.6 parser 245:
246: try {
1.9 parser 247: String parserString=*new(pool) String(pool);
1.18 parser 248: ParserStringXalanOutputStream stream(parserString);
1.6 parser 249: XalanOutputStreamPrintWriter writer(stream);
1.19 parser 250: const char *content_type, *charset;
1.18 parser 251: FormatterListener *formatterListener;
1.19 parser 252: create_optioned_listener(content_type, charset, formatterListener,
1.18 parser 253: pool, method_name, params, 0, writer);
254: FormatterTreeWalker treeWalker(*formatterListener);
1.11 parser 255: treeWalker.traverse(&document); // Walk the document and produce the XML...
1.6 parser 256:
257: // write out result
1.9 parser 258: r.write_no_lang(parserString);
1.5 parser 259: } catch(const XSLException& e) {
260: _throw(pool, &method_name, e);
261: }
1.3 parser 262: }
263:
1.9 parser 264:
265: static void _file(Request& r, const String& method_name, MethodParams *params) {
266: Pool& pool=r.pool();
1.10 parser 267: VDom& vDom=*static_cast<VDom *>(r.self);
1.9 parser 268:
1.11 parser 269: // document
270: XalanDocument& document=vDom.get_document(pool, &method_name);
1.9 parser 271:
272: try {
273: String& parserString=*new(pool) String(pool);
1.18 parser 274: ParserStringXalanOutputStream stream(parserString);
1.9 parser 275: XalanOutputStreamPrintWriter writer(stream);
1.19 parser 276: const char *content_type, *charset;
1.18 parser 277: FormatterListener *formatterListener;
1.19 parser 278: create_optioned_listener(content_type, charset, formatterListener,
1.18 parser 279: pool, method_name, params, 0, writer);
280: FormatterTreeWalker treeWalker(*formatterListener);
1.11 parser 281: treeWalker.traverse(&document); // Walk the document and produce the XML...
1.9 parser 282:
283: // write out result
284: VFile& vfile=*new(pool) VFile(pool);
285: const char *cstr=parserString.cstr();
1.19 parser 286: String *scontent_type=new(pool) String(pool, content_type);
287: Value *vcontent_type;
288: if(charset) {
289: VHash *vhcontent_type=new(pool) VHash(pool);
290: vhcontent_type->hash().put(*value_name, new(pool) VString(*scontent_type));
291: String *scharset=new(pool) String(pool, charset);
292: vhcontent_type->hash().put(*new(pool) String(pool, "charset"), new(pool) VString(*scharset));
293: vcontent_type=vhcontent_type;
294: } else
295: vcontent_type=new(pool) VString(*scontent_type);
1.20 ! parser 296: vfile.set(false/*tainted*/, cstr, strlen(cstr), 0/*file_name*/, vcontent_type);
1.9 parser 297: r.write_no_lang(vfile);
298: } catch(const XSLException& e) {
299: _throw(pool, &method_name, e);
300: }
301: }
302:
303:
1.12 parser 304: static void add_xslt_param(const Hash::Key& aattribute, Hash::Val *ameaning,
1.20 ! parser 305: void *info) {
1.12 parser 306: XalanTransformer& transformer=*static_cast<XalanTransformer *>(info);
307: const char *attribute_cstr=aattribute.cstr();
308: const char *meaning_cstr=static_cast<Value *>(ameaning)->as_string().cstr();
309:
310: transformer.setStylesheetParam(
311: XalanDOMString(attribute_cstr, strlen(attribute_cstr)),
312: XalanDOMString(meaning_cstr, strlen(meaning_cstr)));
313: }
1.10 parser 314: static void _xslt(Request& r, const String& method_name, MethodParams *params) {
315: Pool& pool=r.pool();
316: VDom& vDom=*static_cast<VDom *>(r.self);
317:
1.12 parser 318: // params
319: if(params->size()>1) {
1.18 parser 320: Value& vparams=params->as_no_junction(1, "transform parameters parameter must not be code");
1.12 parser 321: if(vparams.is_defined())
322: if(Hash *params=vparams.get_hash())
323: params->for_each(add_xslt_param, &vDom.get_transformer());
324: else
325: PTHROW(0, 0,
326: &method_name,
1.18 parser 327: "transform parameters parameter must be hash");
1.12 parser 328: }
329:
1.10 parser 330: // source
1.11 parser 331: XalanParsedSource &parsed_source=vDom.get_parsed_source(pool, &method_name);
1.10 parser 332:
333: // stylesheet
1.20 ! parser 334: const String& stylesheet_file_name=params->as_string(0, "file name must not be code");
! 335: const String& stylesheet_filespec=r.absolute(stylesheet_file_name);
! 336: //_asm int 3;
! 337: Stylesheet_connection& connection=XSLT_stylesheet_manager->get_connection(stylesheet_filespec);
1.10 parser 338:
339: // target
1.11 parser 340: XalanDocument* target=vDom.get_parser_liaison().createDocument();
1.10 parser 341: XSLTResultTarget domResultTarget(target);
342:
343: // transform
1.20 ! parser 344: int error=vDom.get_transformer().transform(
! 345: parsed_source,
! 346: &connection.stylesheet(),
! 347: domResultTarget);
! 348: connection.close();
1.10 parser 349: if(error)
350: PTHROW(0, 0,
1.20 ! parser 351: &stylesheet_file_name,
1.10 parser 352: vDom.get_transformer().getLastError());
353:
354: // write out result
1.11 parser 355: VDom& result=*new(pool) VDom(pool);
356: result.set_document(*target);
357: r.write_no_lang(result);
1.10 parser 358: }
359:
1.2 parser 360: // constructor
361:
362: MDom::MDom(Pool& apool) : Methoded(apool) {
1.4 parser 363: set_name(*NEW String(pool(), DOM_CLASS_NAME));
1.16 parser 364:
365: // ^dom::set[<some>xml</some>]
366: add_native_method("set", Method::CT_DYNAMIC, _set, 1, 1);
1.2 parser 367:
1.3 parser 368: // ^dom::load[some.xml]
1.2 parser 369: add_native_method("load", Method::CT_DYNAMIC, _load, 1, 1);
1.3 parser 370:
1.13 parser 371: // ^dom.save[options hash;some.xml]
1.8 parser 372: add_native_method("save", Method::CT_DYNAMIC, _save, 2, 2);
1.2 parser 373:
1.13 parser 374: // ^dom.string[options hash] <doc/>
1.7 parser 375: add_native_method("string", Method::CT_DYNAMIC, _string, 1, 1);
1.9 parser 376:
1.13 parser 377: // ^dom.file[options hash] file with "<doc/>"
1.9 parser 378: add_native_method("file", Method::CT_DYNAMIC, _file, 1, 1);
1.10 parser 379:
1.20 ! parser 380: // ^dom.xslt[stylesheet file_name]
! 381: // ^dom.xslt[stylesheet file_name;params hash]
1.12 parser 382: add_native_method("xslt", Method::CT_DYNAMIC, _xslt, 1, 2);
1.6 parser 383:
1.2 parser 384: }
385: // global variable
386:
387: Methoded *Dom_class;
388:
389: // creator
390:
391: Methoded *MDom_create(Pool& pool) {
392: // Use the static initializers to initialize the Xalan-C++ and Xerces-C++ platforms.
393: // You must initialize Xerces-C++ once per process
394: XMLPlatformUtils::Initialize();
395: XalanTransformer::initialize();
396:
397: return Dom_class=new(pool) MDom(pool);
398: }
E-mail:
![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to dom.C CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [parser3project] / parser3 / src / classes