mirror of
https://github.com/polserver/polserver
synced 2026-08-13 08:23:08 -04:00
* OpenXMLFile: return error if file does not exist instead of xmlobject in error state * added docs * translate every xml open/parsing error to BError * updated core changes entry, to reflect the latest changes
68 lines
1.6 KiB
Text
68 lines
1.6 KiB
Text
use file;
|
|
|
|
program XMLTest()
|
|
print("itertest...");
|
|
itertest();
|
|
print("membertest...");
|
|
membertest();
|
|
print("scopetest...");
|
|
scopetest();
|
|
print("not existing file...");
|
|
notexistingtest();
|
|
print("invalid file...");
|
|
invalidtest();
|
|
endprogram
|
|
|
|
function itertest()
|
|
var xml:=OpenXMLFile("filemod/xmltest.xml");
|
|
print(xml);
|
|
parsenode(xml,"");
|
|
endfunction
|
|
|
|
function parsenode(node,i)
|
|
foreach blubb in node
|
|
print(i+cstr(blubb)+" ["+blubb.type+"] ("+cstr(_blubb_iter)+")");
|
|
parseattrib(blubb,i+"-");
|
|
parsenode(blubb,i+" ");
|
|
endforeach
|
|
endfunction
|
|
|
|
function parseattrib(node,i)
|
|
foreach ele in (node.attributes)
|
|
print(i+cstr(ele)+" ("+_ele_iter+")");
|
|
endforeach
|
|
endfunction
|
|
|
|
function membertest()
|
|
var xml:=OpenXMLFile("filemod/xmltest.xml");
|
|
var root:=xml[2];
|
|
print("root= "+root);
|
|
print("firstchild= "+root.firstxmlchild());
|
|
print("firstchildstring= "+root.firstxmlchild("nodetwo"));
|
|
print("firstsibling= "+root.firstxmlchild().nextxmlsibling());
|
|
var node:=root.firstxmlchild("nodetwo");
|
|
print("attributes= "+node.attributes.propnames());
|
|
print("attributes= "+node.attributes["j"]);
|
|
endfunction
|
|
|
|
function scopetest()
|
|
var elem:=scopeloose();
|
|
print("root= "+elem);
|
|
print("firstchild= "+elem.firstxmlchild());
|
|
endfunction
|
|
|
|
function scopeloose()
|
|
var xml:=OpenXMLFile("filemod/xmltest.xml");
|
|
return xml[2].clonenode();
|
|
endfunction
|
|
|
|
|
|
function notexistingtest()
|
|
var xml:=OpenXMLFile("filemod/xmltestnotexisting.xml");
|
|
print(typeof(xml));
|
|
endfunction
|
|
|
|
function invalidtest()
|
|
var xml:=OpenXMLFile("filemod/xmlinvalid.xml");
|
|
print(typeof(xml));
|
|
endfunction
|