Annotation of parser3/src/types/pa_vxnode.C, revision 1.30.2.2
1.1 parser 1: /** @node
2: Parser: @b dnode parser type.
3:
1.30.2.1 paf 4: Copyright(c) 2001-2003 ArtLebedev Group (http://www.artlebedev.com)
1.15 paf 5: Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
1.1 parser 6: */
7: #include "pa_config_includes.h"
8: #ifdef XML
1.18 paf 9:
1.30.2.2! paf 10: static const char* IDENT_VXNODE_C="$Date: 2003/01/31 12:34:46 $";
1.1 parser 11:
12: #include "pa_vxnode.h"
13: #include "pa_vxdoc.h"
14: #include "pa_vstring.h"
15: #include "pa_vbool.h"
16: #include "pa_vhash.h"
17:
18: void VXnode_cleanup(void *vxnode) {
19: //_asm int 3;
1.12 paf 20: static_cast<VXnode *>(vxnode)->~VXnode();
1.1 parser 21: }
22:
1.29 paf 23: Value *VXnode::get_element(const String& aname, Value& aself, bool looking_up) {
1.12 paf 24: // $CLASS,$method
1.23 paf 25: if(Value *result=VStateless_object::get_element(aname, aself, looking_up))
1.12 paf 26: return result;
27:
28: // fields
29:
1.21 paf 30: GdomeNode *selfNode=get_node(&aname);
1.12 paf 31: GdomeException exc;
32:
1.21 paf 33: if(aname=="nodeName") {
1.28 paf 34: return NEW VString(transcode(gdome_n_nodeName(selfNode, &exc), &aname));
1.21 paf 35: } else if(aname=="nodeValue") {
1.28 paf 36: return NEW VString(transcode(gdome_n_nodeValue(selfNode, &exc), &aname));
1.21 paf 37: } else if(aname=="nodeType") {
1.12 paf 38: return NEW VInt(pool(), gdome_n_nodeType(selfNode, &exc));
1.21 paf 39: } else if(aname=="parentNode") {
1.13 paf 40: if(GdomeNode *result_node=gdome_n_parentNode(selfNode, &exc))
41: return NEW VXnode(pool(), result_node);
1.25 paf 42: return 0;
1.21 paf 43: } else if(aname=="childNodes") {
1.12 paf 44: if(GdomeNode *currentNode=gdome_n_firstChild(selfNode, &exc)) {
45: VHash *result=NEW VHash(pool());
46: int i=0;
47: do {
48: String& skey=*NEW String(pool());
1.30.2.2! paf 49: skey << pool?.format_integer(i++);
1.21 paf 50: result->hash(&aname).put(skey, NEW VXnode(pool(), currentNode));
1.12 paf 51: } while(currentNode=gdome_n_nextSibling(currentNode, &exc));
1.3 parser 52: return result;
1.12 paf 53: }
1.25 paf 54: return 0;
1.21 paf 55: } else if(aname=="firstChild") {
1.13 paf 56: if(GdomeNode *result_node=gdome_n_firstChild(selfNode, &exc))
57: return NEW VXnode(pool(), result_node);
1.25 paf 58: return 0;
1.21 paf 59: } else if(aname=="lastChild") {
1.13 paf 60: if(GdomeNode *result_node=gdome_n_lastChild(selfNode, &exc))
61: return NEW VXnode(pool(), result_node);
1.25 paf 62: return 0;
1.21 paf 63: } else if(aname=="previousSibling") {
1.13 paf 64: if(GdomeNode *result_node=gdome_n_previousSibling(selfNode, &exc))
65: return NEW VXnode(pool(), result_node);
1.25 paf 66: return 0;
1.21 paf 67: } else if(aname=="nextSibling") {
1.13 paf 68: if(GdomeNode *result_node=gdome_n_nextSibling(selfNode, &exc))
69: return NEW VXnode(pool(), result_node);
1.25 paf 70: return 0;
1.21 paf 71: } else if(aname=="ownerDocument") {
1.12 paf 72: if(GdomeDocument *document=gdome_n_ownerDocument(selfNode, &exc))
73: return NEW VXdoc(pool(), document);
1.25 paf 74: return 0;
1.13 paf 75: } else switch(gdome_n_nodeType(selfNode, &exc)) {
76: case GDOME_ELEMENT_NODE:
1.21 paf 77: if(aname=="attributes") {
1.13 paf 78: if(GdomeNamedNodeMap *attributes=gdome_n_attributes(selfNode, &exc)) {
1.12 paf 79: VHash *result=NEW VHash(pool());
1.13 paf 80: gulong length=gdome_nnm_length(attributes, &exc);
81: for(gulong i=0; i<length; i++) {
82: GdomeNode *attr_node=gdome_nnm_item(attributes, i, &exc);
1.12 paf 83: result->hash(0).put(
1.28 paf 84: transcode(gdome_n_nodeName(attr_node, &exc), &aname),
1.13 paf 85: NEW VXnode(pool(), attr_node));
1.3 parser 86: }
1.12 paf 87: return result;
88: }
1.25 paf 89: return 0;
1.21 paf 90: } else if(aname=="tagName") {
1.28 paf 91: return NEW VString(transcode(gdome_el_tagName(GDOME_EL(selfNode), &exc), &aname));
1.2 parser 92: }
1.12 paf 93: break;
1.13 paf 94: case GDOME_ATTRIBUTE_NODE:
1.21 paf 95: if(aname=="specified")
1.13 paf 96: return NEW VBool(pool(), gdome_a_specified(GDOME_A(selfNode), &exc)!=0);
1.27 paf 97: else if(aname=="name")
1.28 paf 98: return NEW VString(transcode(gdome_a_name(GDOME_A(selfNode), &exc), &aname));
1.21 paf 99: else if(aname=="value")
1.28 paf 100: return NEW VString(transcode(gdome_a_value(GDOME_A(selfNode), &exc), &aname));
1.12 paf 101: break;
102: /*
1.13 paf 103: case GDOME_COMMENT_NODE:
1.12 paf 104: substringData(unsigned int offset, unsigned int count)
105: */
1.13 paf 106: case GDOME_PROCESSING_INSTRUCTION_NODE:
1.21 paf 107: if(aname=="target")
1.28 paf 108: return NEW VString(transcode(gdome_pi_target(GDOME_PI(selfNode), &exc), &aname));
1.21 paf 109: else if(aname=="data")
1.28 paf 110: return NEW VString(transcode(gdome_pi_data(GDOME_PI(selfNode), &exc), &aname));
1.12 paf 111: break;
1.13 paf 112: case GDOME_DOCUMENT_TYPE_NODE:
1.12 paf 113: {
1.13 paf 114: GdomeDocumentType *doctype=GDOME_DT(selfNode);
1.26 paf 115: if(aname=="name") {
1.21 paf 116: // readonly attribute DOMString aname;
117: // The aname of DTD; i.e., the aname immediately following
1.12 paf 118: // the DOCTYPE keyword in an XML source document.
1.28 paf 119: return NEW VString(transcode(gdome_dt_name(doctype, &exc), &aname));
1.1 parser 120: }
1.12 paf 121: /*
122: readonly attribute NamedNodeMap entities;
123: readonly attribute NamedNodeMap notations;
124: virtual const XalanNamedNodeMap* getEntities () const = 0
125: This function returns a NamedNodeMap containing the general entities, both external and internal, declared in the DTD. More...
126: virtual const XalanNamedNodeMap* getNotations () const = 0
127: This function returns a named selfNode map containing an entry for each notation declared in a document's DTD. More...
128: */
129: }
130: break;
1.13 paf 131: case GDOME_NOTATION_NODE:
1.12 paf 132: {
1.13 paf 133: GdomeNotation *notation=GDOME_NOT(selfNode);
1.21 paf 134: if(aname=="publicId") {
1.12 paf 135: // readonly attribute DOMString publicId;
1.28 paf 136: return NEW VString(transcode(gdome_not_publicId(notation, &exc), &aname));
1.21 paf 137: } else if(aname=="systemId") {
1.12 paf 138: // readonly attribute DOMString systemId;
1.28 paf 139: return NEW VString(transcode(gdome_not_systemId(notation, &exc), &aname));
1.4 parser 140: }
1.12 paf 141: }
142: break;
143: }
1.3 parser 144:
1.24 paf 145: bark("%s field not found", 0, &aname); return 0;
1.1 parser 146: }
147:
148: #endif
E-mail: