257 lines
		
	
	
		
			6.5 KiB
		
	
	
	
		
			Haxe
		
	
	
	
	
	
			
		
		
	
	
			257 lines
		
	
	
		
			6.5 KiB
		
	
	
	
		
			Haxe
		
	
	
	
	
	
| /*
 | |
|  * 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.
 | |
|  */
 | |
| @:coreApi
 | |
| class String {
 | |
| 	var bytes:hl.Bytes;
 | |
| 
 | |
| 	public var length(default, null):Int;
 | |
| 
 | |
| 	public function new(string:String):Void {
 | |
| 		bytes = string.bytes;
 | |
| 		length = string.length;
 | |
| 	}
 | |
| 
 | |
| 	public function toUpperCase():String {
 | |
| 		return __alloc__(@:privateAccess bytes.ucs2Upper(0, length), length);
 | |
| 	}
 | |
| 
 | |
| 	public function toLowerCase():String {
 | |
| 		return __alloc__(@:privateAccess bytes.ucs2Lower(0, length), length);
 | |
| 	}
 | |
| 
 | |
| 	public function charAt(index:Int):String {
 | |
| 		if ((index : UInt) >= (length : UInt))
 | |
| 			return "";
 | |
| 		var b = new hl.Bytes(4);
 | |
| 		b.setUI16(0, bytes.getUI16(index << 1));
 | |
| 		b.setUI16(2, 0);
 | |
| 		return __alloc__(b, 1);
 | |
| 	}
 | |
| 
 | |
| 	public function charCodeAt(index:Int):Null<Int> {
 | |
| 		var idx:UInt = index;
 | |
| 		if (idx >= (length : UInt))
 | |
| 			return null;
 | |
| 		return bytes.getUI16(index << 1);
 | |
| 	}
 | |
| 
 | |
| 	inline function findChar(start:Int, len:Int, src:hl.Bytes, srcLen:Int):Int {
 | |
| 		var p = 0;
 | |
| 		while (true) {
 | |
| 			p = bytes.find(start, len - start, src, 0, srcLen);
 | |
| 			if (p < 0 || p & 1 == 0)
 | |
| 				break;
 | |
| 			start = p + 1;
 | |
| 		}
 | |
| 		return p;
 | |
| 	}
 | |
| 
 | |
| 	public function indexOf(str:String, ?startIndex:Int):Int {
 | |
| 		var startByte = 0;
 | |
| 		if (startIndex != null && startIndex > 0) {
 | |
| 			if (startIndex >= length)
 | |
| 				return str == '' ? length : -1;
 | |
| 			startByte = startIndex << 1;
 | |
| 		}
 | |
| 		var p = findChar(startByte, length << 1, str.bytes, str.length << 1);
 | |
| 		if (p > 0)
 | |
| 			p >>= 1;
 | |
| 		return p;
 | |
| 	}
 | |
| 
 | |
| 	public function lastIndexOf(str:String, ?startIndex:Int):Int {
 | |
| 		var max = this.length;
 | |
| 		if (startIndex != null) {
 | |
| 			max = startIndex + str.length;
 | |
| 			if (max < 0)
 | |
| 				max = 0;
 | |
| 			if (max > this.length)
 | |
| 				max = this.length;
 | |
| 		}
 | |
| 		var pos = max - str.length;
 | |
| 		var slen = str.length << 1;
 | |
| 		while (pos >= 0) {
 | |
| 			if (bytes.compare(pos << 1, str.bytes, 0, slen) == 0)
 | |
| 				return pos;
 | |
| 			pos--;
 | |
| 		}
 | |
| 		return -1;
 | |
| 	}
 | |
| 
 | |
| 	public function split(delimiter:String):Array<String> {
 | |
| 		var out = [];
 | |
| 		if (length == 0) {
 | |
| 			out.push("");
 | |
| 			return out;
 | |
| 		}
 | |
| 		if (delimiter.length == 0) {
 | |
| 			for (i in 0...length)
 | |
| 				out.push(substr(i, 1));
 | |
| 			return out;
 | |
| 		}
 | |
| 		var pos = 0;
 | |
| 		var dlen = delimiter.length;
 | |
| 		while (true) {
 | |
| 			var p = findChar(pos << 1, length << 1, delimiter.bytes, dlen << 1);
 | |
| 			if (p < 0) {
 | |
| 				out.push(substr(pos, length - pos));
 | |
| 				break;
 | |
| 			}
 | |
| 			p >>= 1;
 | |
| 			out.push(substr(pos, p - pos));
 | |
| 			pos = p + dlen;
 | |
| 		}
 | |
| 		return out;
 | |
| 	}
 | |
| 
 | |
| 	public function substr(pos:Int, ?len:Int):String@:privateAccess {
 | |
| 		var sl = length;
 | |
| 		var len:Int = if (len == null) sl else len;
 | |
| 		if (len == 0)
 | |
| 			return "";
 | |
| 		if (pos != 0 && len < 0)
 | |
| 			return "";
 | |
| 		if (pos < 0) {
 | |
| 			pos = sl + pos;
 | |
| 			if (pos < 0)
 | |
| 				pos = 0;
 | |
| 		} else if (len < 0) {
 | |
| 			len = sl + len - pos;
 | |
| 			if (len < 0)
 | |
| 				return "";
 | |
| 		}
 | |
| 		if (((pos + len) : UInt) > (sl : UInt))
 | |
| 			len = sl - pos;
 | |
| 		if (pos < 0 || len <= 0)
 | |
| 			return "";
 | |
| 
 | |
| 		var b = new hl.Bytes((len + 1) << 1);
 | |
| 		b.blit(0, bytes, pos << 1, len << 1);
 | |
| 		b.setUI16(len << 1, 0);
 | |
| 		return __alloc__(b, len);
 | |
| 	}
 | |
| 
 | |
| 	public function substring(startIndex:Int, ?endIndex:Int):String {
 | |
| 		var end:Int;
 | |
| 		if (endIndex == null)
 | |
| 			end = length;
 | |
| 		else {
 | |
| 			end = endIndex;
 | |
| 			if (end < 0)
 | |
| 				end = 0;
 | |
| 			else if (end > length)
 | |
| 				end = length;
 | |
| 		}
 | |
| 		if (startIndex < 0)
 | |
| 			startIndex = 0;
 | |
| 		else if (startIndex > length)
 | |
| 			startIndex = length;
 | |
| 		if (startIndex > end) {
 | |
| 			var tmp = startIndex;
 | |
| 			startIndex = end;
 | |
| 			end = tmp;
 | |
| 		}
 | |
| 		return substr(startIndex, end - startIndex);
 | |
| 	}
 | |
| 
 | |
| 	public function toString():String {
 | |
| 		return this;
 | |
| 	}
 | |
| 
 | |
| 	public static function fromCharCode(code:Int):String {
 | |
| 		if (code >= 0 && code < 0x10000) {
 | |
| 			if (code >= 0xD800 && code <= 0xDFFF)
 | |
| 				throw "Invalid unicode char " + code;
 | |
| 			var b = new hl.Bytes(4);
 | |
| 			b.setUI16(0, code);
 | |
| 			b.setUI16(2, 0);
 | |
| 			return __alloc__(b, 1);
 | |
| 		} else if (code < 0x110000) {
 | |
| 			var b = new hl.Bytes(6);
 | |
| 			code -= 0x10000;
 | |
| 			b.setUI16(0, (code >> 10) + 0xD800);
 | |
| 			b.setUI16(2, (code & 1023) + 0xDC00);
 | |
| 			b.setUI16(4, 0);
 | |
| 			return __alloc__(b, 2); // UTF16 encoding but UCS2 API (same as JS)
 | |
| 		} else
 | |
| 			throw "Invalid unicode char " + code;
 | |
| 	}
 | |
| 
 | |
| 	function toUtf8():hl.Bytes {
 | |
| 		return bytes.utf16ToUtf8(0, null);
 | |
| 	}
 | |
| 
 | |
| 	@:keep function __string():hl.Bytes {
 | |
| 		return bytes;
 | |
| 	}
 | |
| 
 | |
| 	@:keep function __compare(v:Dynamic):Int {
 | |
| 		var s = Std.downcast(v, String);
 | |
| 		if (s == null)
 | |
| 			return hl.Api.comparePointer(this, v);
 | |
| 		#if (hl_ver >= version("1.10.0"))
 | |
| 		var v = bytes.compare16(s.bytes, length < s.length ? length : s.length);
 | |
| 		#else
 | |
| 		var v = bytes.compare(0, s.bytes, 0, (length < s.length ? length : s.length) << 1);
 | |
| 		#end
 | |
| 		return v == 0 ? length - s.length : v;
 | |
| 	}
 | |
| 
 | |
| 	@:keep static inline function __alloc__(b:hl.Bytes, length:Int):String {
 | |
| 		var s:String = untyped $new(String);
 | |
| 		s.bytes = b;
 | |
| 		s.length = length;
 | |
| 		return s;
 | |
| 	}
 | |
| 
 | |
| 	@:keep static function call_toString(v:Dynamic):hl.Bytes {
 | |
| 		var s:String = v.toString();
 | |
| 		return s.bytes;
 | |
| 	}
 | |
| 
 | |
| 	inline static function fromUCS2(b:hl.Bytes):String {
 | |
| 		var s:String = untyped $new(String);
 | |
| 		s.bytes = b;
 | |
| 		s.length = @:privateAccess b.ucs2Length(0);
 | |
| 		return s;
 | |
| 	}
 | |
| 
 | |
| 	@:keep static function fromUTF8(b:hl.Bytes):String {
 | |
| 		var outLen = 0;
 | |
| 		var b2 = @:privateAccess b.utf8ToUtf16(0, outLen);
 | |
| 		return __alloc__(b2, outLen >> 1);
 | |
| 	}
 | |
| 
 | |
| 	@:keep static function __add__(a:String, b:String):String {
 | |
| 		if (a == null)
 | |
| 			a = "null";
 | |
| 		if (b == null)
 | |
| 			b = "null";
 | |
| 		var asize = a.length << 1, bsize = b.length << 1, tot = asize + bsize;
 | |
| 		var bytes = new hl.Bytes(tot + 2);
 | |
| 		bytes.blit(0, a.bytes, 0, asize);
 | |
| 		bytes.blit(asize, b.bytes, 0, bsize);
 | |
| 		bytes.setUI16(tot, 0);
 | |
| 		return __alloc__(bytes, tot >> 1);
 | |
| 	}
 | |
| }
 |