/* * Copyright (C)2005-2019 Haxe Foundation * * Permission is hereby granted, free of charge, to any person obtaining a * copy of this software and associated documentation files (the "Software"), * to deal in the Software without restriction, including without limitation * the rights to use, copy, modify, merge, publish, distribute, sublicense, * and/or sell copies of the Software, and to permit persons to whom the * Software is furnished to do so, subject to the following conditions: * * The above copyright notice and this permission notice shall be included in * all copies or substantial portions of the Software. * * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER * DEALINGS IN THE SOFTWARE. */ package cpp; enum abstract XmlType(Int) { /** Represents an XML element type. **/ var Element = 0; /** Represents XML parsed character data type. **/ var PCData = 1; /** Represents XML character data type. **/ var CData = 2; /** Represents an XML comment type. **/ var Comment = 3; /** Represents an XML doctype element type. **/ var DocType = 4; /** Represents an XML processing instruction type. **/ var ProcessingInstruction = 5; /** Represents an XML document type. **/ var Document = 6; } class NativeXmlState { var cur:Xml; public function new(x:Xml) { x._children = new Array(); cur = x; } @:keep public function xml(name:String, att:Dynamic) { var x = new Xml(); x._parent = cur; x.nodeType = Xml.Element; x._nodeName = name; x._attributes = att; x._children = new Array(); cur.addChild(x); cur = x; } @:keep public function cdata(text:String) { var x = new Xml(); x._parent = cur; x.nodeType = Xml.CData; x._nodeValue = text; cur.addChild(x); } @:keep public function pcdata(text:String) { var x = new Xml(); x._parent = cur; x.nodeType = Xml.PCData; x._nodeValue = text; cur.addChild(x); } @:keep public function comment(text:String) { var x = new Xml(); x._parent = cur; if (text.length > 1 && StringTools.fastCodeAt(text, 0) == 63) { x.nodeType = Xml.ProcessingInstruction; text = text.substr(1, text.length - 2); } else { x.nodeType = Xml.Comment; } x._nodeValue = text; cur.addChild(x); } @:keep public function doctype(text:String) { var x = new Xml(); x._parent = cur; x.nodeType = Xml.DocType; x._nodeValue = text.substr(1); cur.addChild(x); } @:keep public function done() { cur = cur._parent; } } private class NativeXmlIterator { var cur = 0; var children:Array; public function new(inChildren:Array) { children = inChildren; cur = 0; } public function hasNext():Bool { var k = cur; var l = children.length; while (k < l) { if (children[k].nodeType == Xml.Element) break; k += 1; } cur = k; return k < l; } public function next():Xml { var k = cur; var l = children.length; while (k < l) { var n = children[k]; k += 1; if (n.nodeType == Xml.Element) { cur = k; return n; } } return null; } } private class NativeXmlNamedIterator { var cur = 0; var children:Array; var name:String; public function new(inChildren:Array, inName:String) { children = inChildren; name = inName; cur = 0; } public function hasNext():Bool { var k = cur; var l = children.length; while (k < l) { var n = children[k]; if (n.nodeType == Xml.Element && n._nodeName == name) break; k++; } cur = k; return k < l; } public function next():Xml { var k = cur; var l = children.length; while (k < l) { var n = children[k]; k++; if (n.nodeType == Xml.Element && n._nodeName == name) { cur = k; return n; } } return null; } } @:cppInclude("./NativeXmlImport.cpp") @:allow(cpp.NativeXmlState) @:allow(cpp.NativeXmlIterator) @:allow(cpp.NativeXmlNamedIterator) class Xml { static inline var Element = XmlType.Element; static inline var PCData = XmlType.PCData; static inline var CData = XmlType.CData; static inline var Comment = XmlType.Comment; static inline var DocType = XmlType.DocType; static inline var ProcessingInstruction = XmlType.ProcessingInstruction; static inline var Document = XmlType.Document; private var _nodeName:String; private var _nodeValue:String; private var _attributes:Dynamic; private var _children:Array; private var _parent:Xml; function new():Void {} @:native("parse_xml") extern static function parse_xml(str:String, state:NativeXmlState); public static function parse(str:String):Xml { var x = new Xml(); var state = new NativeXmlState(x); parse_xml(str, state); x.nodeType = Xml.Document; return x; } public static function createElement(name:String):Xml { var r = new Xml(); r.nodeType = Xml.Element; r._nodeName = name; r._attributes = null; r._children = new Array(); return r; } public static function createPCData(data:String):Xml { var r = new Xml(); r.nodeType = Xml.PCData; r._nodeValue = data; return r; } public static function createCData(data:String):Xml { var r = new Xml(); r.nodeType = Xml.CData; r._nodeValue = data; return r; } public static function createComment(data:String):Xml { var r = new Xml(); r.nodeType = Xml.Comment; r._nodeValue = data; return r; } public static function createDocType(data:String):Xml { var r = new Xml(); r.nodeType = Xml.DocType; r._nodeValue = data; return r; } public static function createProcessingInstruction(data:String):Xml { var r = new Xml(); r.nodeType = Xml.ProcessingInstruction; r._nodeValue = data; return r; } public static function createDocument():Xml { var r = new Xml(); r.nodeType = Xml.Document; r._children = new Array(); return r; } public var nodeType(default, null):XmlType; public var nodeName(get, set):String; public var nodeValue(get, set):String; private function get_nodeName():String { if (nodeType != Xml.Element) throw "bad nodeType"; return _nodeName; } private function set_nodeName(n:String):String { if (nodeType != Xml.Element) throw "bad nodeType"; return _nodeName = n; } private function get_nodeValue():String { if (nodeType == Xml.Element || nodeType == Xml.Document) throw "bad nodeType"; return _nodeValue; } private function set_nodeValue(v:String):String { if (nodeType == Xml.Element || nodeType == Xml.Document) throw "bad nodeType"; return _nodeValue = v; } public var parent(get, null):Xml; private function get_parent():Xml { return _parent; } public function get(att:String):String { if (nodeType != Xml.Element) throw "bad nodeType"; return Reflect.field(_attributes, att); } public function set(att:String, value:String):Void { if (nodeType != Xml.Element) throw "bad nodeType"; if (_attributes == null) _attributes = {}; Reflect.setField(_attributes, att, value); return; } public function remove(att:String):Void { if (nodeType != Xml.Element) throw "bad nodeType"; Reflect.deleteField(_attributes, att); return; } public function exists(att:String):Bool { if (nodeType != Xml.Element) throw "bad nodeType"; return Reflect.hasField(_attributes, att); } public function attributes():Iterator { if (nodeType != Xml.Element) throw "bad nodeType"; return Reflect.fields(_attributes).iterator(); } public function iterator():Iterator { if (_children == null) throw "bad nodetype"; return untyped _children.iterator(); } public function elements():Iterator { if (_children == null) throw "bad nodetype"; return new NativeXmlIterator(_children); } public function elementsNamed(name:String):Iterator { if (_children == null) throw "bad nodetype"; return new NativeXmlNamedIterator(_children, name); } public function firstChild():Xml { if (_children == null) throw "bad nodetype"; return _children[0]; } public function firstElement():Xml { if (_children == null) throw "bad nodetype"; for (cur in 0..._children.length) { var n:Xml = _children[cur]; if (n.nodeType == Xml.Element) return n; } return null; } public function addChild(x:Xml):Void { if (_children == null) throw "bad nodetype"; if (x._parent != null) x._parent._children.remove(x); x._parent = this; _children.push(x); return; } public function removeChild(x:Xml):Bool { if (_children == null) throw "bad nodetype"; var b = _children.remove(x); if (b) x._parent = null; return b; } public function insertChild(x:Xml, pos:Int):Void { if (_children == null) throw "bad nodetype"; if (x._parent != null) x._parent._children.remove(x); x._parent = this; _children.insert(pos, x); return; } public function toString():String { var s = new StringBuf(); toStringRec(s); return s.toString(); } private function toStringRec(s:StringBuf):Void { switch (nodeType) { case Xml.Document: for (x in _children) x.toStringRec(s); case Xml.Element: s.addChar("<".code); s.add(_nodeName); for (k in Reflect.fields(_attributes)) { s.addChar(" ".code); s.add(k); s.addChar("=".code); s.addChar("\"".code); s.add(Reflect.field(_attributes, k)); s.addChar("\"".code); } if (_children.length == 0) { s.addChar("/".code); s.addChar(">".code); return; } s.addChar(">".code); for (x in _children) x.toStringRec(s); s.addChar("<".code); s.addChar("/".code); s.add(_nodeName); s.addChar(">".code); case Xml.PCData: s.add(StringTools.htmlEscape(_nodeValue)); case Xml.CData: s.add(""); case Xml.Comment: s.add(""); case Xml.DocType: s.add(""); case Xml.ProcessingInstruction: s.add(""); } } }