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