Annotation of parser3/src/types/pa_vxnode.C, revision 1.24
1.1 parser 1: /** @node
2: Parser: @b dnode parser type.
3:
1.16 paf 4: Copyright(c) 2001, 2002 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.24 ! paf 10: static const char* IDENT_VXNODE_C="$Date: 2002/08/14 14:18:32 $";
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.23 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.12 paf 34: return NEW VString(transcode(gdome_n_nodeName(selfNode, &exc)));
1.21 paf 35: } else if(aname=="nodeValue") {
1.12 paf 36: return NEW VString(transcode(gdome_n_nodeValue(selfNode, &exc)));
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.21 paf 42: } else if(aname=="childNodes") {
1.12 paf 43: if(GdomeNode *currentNode=gdome_n_firstChild(selfNode, &exc)) {
44: VHash *result=NEW VHash(pool());
45: int i=0;
46: do {
47: String& skey=*NEW String(pool());
48: {
49: char *buf=(char *)malloc(MAX_NUMBER);
1.20 paf 50: snprintf(buf, MAX_NUMBER, "%d", i++);
1.12 paf 51: skey << buf;
52: }
1.21 paf 53: result->hash(&aname).put(skey, NEW VXnode(pool(), currentNode));
1.12 paf 54: } while(currentNode=gdome_n_nextSibling(currentNode, &exc));
1.3 parser 55: return result;
1.12 paf 56: }
1.21 paf 57: } else if(aname=="firstChild") {
1.13 paf 58: if(GdomeNode *result_node=gdome_n_firstChild(selfNode, &exc))
59: return NEW VXnode(pool(), result_node);
1.21 paf 60: } else if(aname=="lastChild") {
1.13 paf 61: if(GdomeNode *result_node=gdome_n_lastChild(selfNode, &exc))
62: return NEW VXnode(pool(), result_node);
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.21 paf 66: } else if(aname=="nextSibling") {
1.13 paf 67: if(GdomeNode *result_node=gdome_n_nextSibling(selfNode, &exc))
68: return NEW VXnode(pool(), result_node);
1.21 paf 69: } else if(aname=="ownerDocument") {
1.12 paf 70: if(GdomeDocument *document=gdome_n_ownerDocument(selfNode, &exc))
71: return NEW VXdoc(pool(), document);
1.13 paf 72: } else switch(gdome_n_nodeType(selfNode, &exc)) {
73: case GDOME_ELEMENT_NODE:
1.21 paf 74: if(aname=="attributes") {
1.13 paf 75: if(GdomeNamedNodeMap *attributes=gdome_n_attributes(selfNode, &exc)) {
1.12 paf 76: VHash *result=NEW VHash(pool());
1.13 paf 77: gulong length=gdome_nnm_length(attributes, &exc);
78: for(gulong i=0; i<length; i++) {
79: GdomeNode *attr_node=gdome_nnm_item(attributes, i, &exc);
1.12 paf 80: result->hash(0).put(
81: transcode(gdome_n_nodeName(attr_node, &exc)),
1.13 paf 82: NEW VXnode(pool(), attr_node));
1.3 parser 83: }
1.12 paf 84: return result;
85: }
1.21 paf 86: } else if(aname=="tagName") {
1.13 paf 87: return NEW VString(transcode(gdome_el_tagName(GDOME_EL(selfNode), &exc)));
1.2 parser 88: }
1.12 paf 89: break;
1.13 paf 90: case GDOME_ATTRIBUTE_NODE:
1.21 paf 91: if(aname=="specified")
1.13 paf 92: return NEW VBool(pool(), gdome_a_specified(GDOME_A(selfNode), &exc)!=0);
1.21 paf 93: else if(aname=="aname")
1.17 paf 94: return NEW VString(transcode(gdome_a_name(GDOME_A(selfNode), &exc)));
1.21 paf 95: else if(aname=="value")
1.17 paf 96: return NEW VString(transcode(gdome_a_value(GDOME_A(selfNode), &exc)));
1.12 paf 97: break;
98: /*
1.13 paf 99: case GDOME_COMMENT_NODE:
1.12 paf 100: substringData(unsigned int offset, unsigned int count)
101: */
1.13 paf 102: case GDOME_PROCESSING_INSTRUCTION_NODE:
1.21 paf 103: if(aname=="target")
1.13 paf 104: return NEW VString(transcode(gdome_pi_target(GDOME_PI(selfNode), &exc)));
1.21 paf 105: else if(aname=="data")
1.17 paf 106: return NEW VString(transcode(gdome_pi_data(GDOME_PI(selfNode), &exc)));
1.12 paf 107: break;
1.13 paf 108: case GDOME_DOCUMENT_TYPE_NODE:
1.12 paf 109: {
1.13 paf 110: GdomeDocumentType *doctype=GDOME_DT(selfNode);
1.21 paf 111: if(aname=="aname") {
112: // readonly attribute DOMString aname;
113: // The aname of DTD; i.e., the aname immediately following
1.12 paf 114: // the DOCTYPE keyword in an XML source document.
115: return NEW VString(transcode(gdome_dt_name(doctype, &exc)));
1.1 parser 116: }
1.12 paf 117: /*
118: readonly attribute NamedNodeMap entities;
119: readonly attribute NamedNodeMap notations;
120: virtual const XalanNamedNodeMap* getEntities () const = 0
121: This function returns a NamedNodeMap containing the general entities, both external and internal, declared in the DTD. More...
122: virtual const XalanNamedNodeMap* getNotations () const = 0
123: This function returns a named selfNode map containing an entry for each notation declared in a document's DTD. More...
124: */
125: }
126: break;
1.13 paf 127: case GDOME_NOTATION_NODE:
1.12 paf 128: {
1.13 paf 129: GdomeNotation *notation=GDOME_NOT(selfNode);
1.21 paf 130: if(aname=="publicId") {
1.12 paf 131: // readonly attribute DOMString publicId;
132: return NEW VString(transcode(gdome_not_publicId(notation, &exc)));
1.21 paf 133: } else if(aname=="systemId") {
1.12 paf 134: // readonly attribute DOMString systemId;
135: return NEW VString(transcode(gdome_not_systemId(notation, &exc)));
1.4 parser 136: }
1.12 paf 137: }
138: break;
139: }
1.3 parser 140:
1.24 ! paf 141: bark("%s field not found", 0, &aname); return 0;
1.1 parser 142: }
143:
144: #endif
E-mail: