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