Update Files

Kha/Tools/linux_arm64/std/java/internal/Runtime.hx

@@ -0,0 +1,598 @@
+/*
+ * 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 java.internal;
+
+/**
+	This class is meant for internal compiler use only. It provides the Haxe runtime
+	compatibility to the host language. Do not access it directly.
+**/
+@:native('haxe.lang.Runtime')
+@:nativeGen
+@:classCode('
+	public static java.lang.Object getField(haxe.lang.IHxObject obj, java.lang.String field, boolean throwErrors)
+	{
+		if (obj == null && !throwErrors) return null;
+		return obj.__hx_getField(field, throwErrors, false, false);
+	}
+
+	public static double getField_f(haxe.lang.IHxObject obj, java.lang.String field, boolean throwErrors)
+	{
+		if (obj == null && !throwErrors) return 0.0;
+		return obj.__hx_getField_f(field, throwErrors, false);
+	}
+
+	public static java.lang.Object setField(haxe.lang.IHxObject obj, java.lang.String field, java.lang.Object value)
+	{
+		return obj.__hx_setField(field, value, false);
+	}
+
+	public static double setField_f(haxe.lang.IHxObject obj, java.lang.String field, double value)
+	{
+		return obj.__hx_setField_f(field, value, false);
+	}
+
+	public static java.lang.Object callField(haxe.lang.IHxObject obj, java.lang.String field, java.lang.Object[] args)
+	{
+		return obj.__hx_invokeField(field, args);
+	}
+')
+@:keep class Runtime {
+	public static var undefined:Dynamic = {};
+
+	@:functionCode('
+	return new haxe.lang.Closure(obj, field);
+	')
+	public static function closure(obj:Dynamic, field:String):Dynamic {
+		return null;
+	}
+
+	@:functionCode('
+			if (v1 == v2)
+				return true;
+			if (v1 == null || v2 == null)
+				return false;
+
+			if (v1 instanceof java.lang.Number)
+			{
+				if (!(v2 instanceof java.lang.Number))
+					return false;
+
+				java.lang.Number v1c = (java.lang.Number) v1;
+				java.lang.Number v2c = (java.lang.Number) v2;
+				if (v1 instanceof java.lang.Long || v2 instanceof java.lang.Long)
+					return v1c.longValue() == v2c.longValue();
+				return v1c.doubleValue() == v2c.doubleValue();
+			} else if (v1 instanceof java.lang.String || v1 instanceof haxe.lang.IEquatable) { //TODO see what happens with Boolean cases
+				return v1.equals(v2);
+			}
+
+			return false;
+	')
+	public static function eq(v1:Dynamic, v2:Dynamic):Bool {
+		return false;
+	}
+
+	@:functionCode('
+		if (v1 == v2)
+			return true;
+
+		if (v1 instanceof java.lang.String || v1 instanceof haxe.lang.IEquatable)
+		{
+			return v1 != null && v1.equals(v2);
+		} else {
+			return v1 == v2;
+		}
+	')
+	public static function refEq(v1:{}, v2:{}):Bool {
+		return false;
+	}
+
+	@:functionCode('
+		return v1 == v2 || (v1 != null && v1.equals(v2));
+	')
+	public static function valEq(v1:{}, v2:{}):Bool {
+		return false;
+	}
+
+	@:functionCode('
+		return (obj == null) ? 0.0 : ((java.lang.Number) obj).doubleValue();
+	')
+	public static function toDouble(obj:Dynamic):Float {
+		return 0.0;
+	}
+
+	public static function toBool(obj:java.lang.Boolean):Bool {
+		return obj == null ? false : obj.booleanValue();
+	}
+
+	@:functionCode('
+		return (obj == null) ? 0 : ((java.lang.Number) obj).intValue();
+	')
+	public static function toInt(obj:Dynamic):Int {
+		return 0;
+	}
+
+	public static function toLong(obj:Dynamic):haxe.Int64 {
+		return obj == null ? 0 : (obj : java.lang.Number).longValue();
+	}
+
+	@:functionCode('
+		if (obj != null && obj instanceof java.lang.Number)
+		{
+			return true;
+		} else {
+			return false;
+		}
+	')
+	public static function isDouble(obj:Dynamic):Bool {
+		return false;
+	}
+
+	@:overload public static function isInt(obj:Dynamic):Bool {
+		if (Std.isOfType(obj, java.lang.Number)) {
+			var n:java.lang.Number = obj;
+			return n.doubleValue() == n.intValue();
+		} else {
+			return false;
+		}
+	}
+
+	@:overload public static function isInt(num:java.lang.Number):Bool {
+		return num != null && num.doubleValue() == num.intValue();
+	}
+
+	@:functionCode('
+		java.lang.Class cl = null;
+		if (o instanceof java.lang.Class)
+		{
+			if (o == java.lang.String.class)
+				return field.equals("fromCharCode");
+
+			cl = (java.lang.Class) o;
+		} else if (o instanceof java.lang.String) {
+			return haxe.lang.StringRefl.handleGetField( (java.lang.String) o, field, false) != null;
+		} else {
+			cl = o.getClass();
+		}
+
+		try
+		{
+			java.lang.reflect.Field f = cl.getField(field);
+			return true;
+		}
+		catch(Throwable t)
+		{
+			java.lang.reflect.Method[] ms = cl.getMethods();
+			for (int i = 0; i < ms.length; i++)
+			{
+				if (ms[i].getName().equals(field))
+				{
+					return true;
+				}
+			}
+		}
+
+		return false;
+	')
+	public static function slowHasField(o:Dynamic, field:String):Bool {
+		return false;
+	}
+
+	@:functionCode('
+			if (v1 == v2)
+				return 0;
+			if (v1 == null) return -1;
+			if (v2 == null) return 1;
+
+			if (v1 instanceof java.lang.Number || v2 instanceof java.lang.Number)
+			{
+				java.lang.Number v1c = (java.lang.Number) v1;
+				java.lang.Number v2c = (java.lang.Number) v2;
+
+				if (v1 instanceof java.lang.Long || v2 instanceof java.lang.Long)
+				{
+					long l1 = (v1 == null) ? 0L : v1c.longValue();
+					long l2 = (v2 == null) ? 0L : v2c.longValue();
+          return (l1 < l2) ? -1 : (l1 > l2) ? 1 : 0;
+				} else {
+					double d1 = (v1 == null) ? 0.0 : v1c.doubleValue();
+					double d2 = (v2 == null) ? 0.0 : v2c.doubleValue();
+
+          return (d1 < d2) ? -1 : (d1 > d2) ? 1 : 0;
+				}
+			}
+			//if it\'s not a number it must be a String
+			return ((java.lang.String) v1).compareTo((java.lang.String) v2);
+	')
+	public static function compare(v1:Dynamic, v2:Dynamic):Int {
+		return 0;
+	}
+
+	@:functionCode('
+			if (v1 instanceof java.lang.String || v2 instanceof java.lang.String)
+				return toString(v1) + toString(v2);
+
+			if (v1 instanceof java.lang.Number || v2 instanceof java.lang.Number)
+			{
+				java.lang.Number v1c = (java.lang.Number) v1;
+				java.lang.Number v2c = (java.lang.Number) v2;
+
+				double d1 = (v1 == null) ? 0.0 : v1c.doubleValue();
+				double d2 = (v2 == null) ? 0.0 : v2c.doubleValue();
+
+				return d1 + d2;
+			}
+
+			throw new java.lang.IllegalArgumentException("Cannot dynamically add " + v1 + " and " + v2);
+	')
+	public static function plus(v1:Dynamic, v2:Dynamic):Dynamic {
+		return null;
+	}
+
+	@:functionCode('
+
+	if (obj == null)
+		if (throwErrors)
+			throw new java.lang.NullPointerException("Cannot access field \'" + field + "\' of null.");
+		else
+			return null;
+
+	java.lang.Class cl = null;
+	try
+	{
+		if (obj instanceof java.lang.Class)
+		{
+			if (obj == java.lang.String.class && field.equals("fromCharCode"))
+				return new haxe.lang.Closure(haxe.lang.StringExt.class, field);
+
+			cl = (java.lang.Class) obj;
+			obj = null;
+		} else if (obj instanceof java.lang.String) {
+			return haxe.lang.StringRefl.handleGetField((java.lang.String) obj, field, throwErrors);
+		} else {
+			cl = obj.getClass();
+		}
+
+		java.lang.reflect.Field f = cl.getField(field);
+		f.setAccessible(true);
+		return f.get(obj);
+	} catch (Throwable t)
+	{
+		try
+		{
+			java.lang.reflect.Method[] ms = cl.getMethods();
+			for (int i = 0; i < ms.length; i++)
+			{
+				if (ms[i].getName().equals(field))
+				{
+					return new haxe.lang.Closure(obj != null ? obj : cl, field);
+				}
+			}
+		} catch (Throwable t2)
+		{
+
+		}
+
+		if (throwErrors)
+			throw (java.lang.RuntimeException)haxe.Exception.thrown(t);
+
+		return null;
+	}
+
+	')
+	public static function slowGetField(obj:Dynamic, field:String, throwErrors:Bool):Dynamic {
+		return null;
+	}
+
+	@:functionCode('
+		java.lang.Class cl = null;
+		if (obj instanceof java.lang.Class)
+		{
+			cl = (java.lang.Class) obj;
+			obj = null;
+		} else {
+			cl = obj.getClass();
+		}
+
+		try {
+			java.lang.reflect.Field f = cl.getField(field);
+			f.setAccessible(true);
+
+			//FIXME we must evaluate if field to be set receives either int or double
+			if (isInt(value))
+			{
+				f.setInt(obj, toInt(value));
+			} else if (isDouble(value)) {
+				f.setDouble(obj, toDouble(value));
+			} else {
+				f.set(obj, value);
+			}
+			return value;
+		}
+		catch (Throwable t)
+		{
+			throw (java.lang.RuntimeException)haxe.Exception.thrown(t);
+		}
+	')
+	public static function slowSetField(obj:Dynamic, field:String, value:Dynamic):Dynamic {
+		return null;
+	}
+
+	@:functionCode('
+		java.lang.Class cl = null;
+		if (obj instanceof java.lang.Class)
+		{
+			if (obj == java.lang.String.class && field.equals("fromCharCode"))
+				return haxe.lang.StringExt.fromCharCode(toInt(args[0]));
+
+			cl = (java.lang.Class) obj;
+			obj = null;
+		} else if (obj instanceof java.lang.String) {
+			return haxe.lang.StringRefl.handleCallField((java.lang.String) obj, field, args);
+		} else {
+			cl = obj.getClass();
+		}
+
+		if (args == null) args = new java.lang.Object[0];
+
+		int len = args.length;
+		java.lang.Class[] cls = new java.lang.Class[len];
+		java.lang.Object[] objs = new java.lang.Object[len];
+
+		java.lang.reflect.Method[] ms = cl.getMethods();
+		int msl = ms.length;
+		int realMsl = 0;
+		for(int i =0; i < msl; i++)
+		{
+			if (!ms[i].getName().equals(field) || (!ms[i].isVarArgs() && ms[i].getParameterTypes().length != len))
+			{
+				ms[i] = null;
+			} else {
+				ms[realMsl] = ms[i];
+				if (realMsl != i)
+					ms[i] = null;
+				realMsl++;
+			}
+		}
+
+		boolean hasNumber = false;
+
+		for (int i = 0; i < len; i++)
+		{
+			Object o = args[i];
+			if (o == null)
+			{
+				continue; //can be anything
+			}
+			objs[i]= o;
+			cls[i] = o.getClass();
+			boolean isNum = false;
+
+			if (o instanceof java.lang.Number)
+			{
+				cls[i] = java.lang.Number.class;
+				isNum = hasNumber = true;
+			} else if (o instanceof java.lang.Boolean) {
+				cls[i] = java.lang.Boolean.class;
+				isNum = true;
+			}
+
+			msl = realMsl;
+			realMsl = 0;
+
+			for (int j = 0; j < msl; j++)
+			{
+				java.lang.Class[] allcls = ms[j].getParameterTypes();
+				if (i < allcls.length)
+				{
+					if (!  ((isNum && allcls[i].isPrimitive()) || allcls[i].isAssignableFrom(cls[i])) )
+					{
+						ms[j] = null;
+					} else {
+						ms[realMsl] = ms[j];
+						if (realMsl != j)
+							ms[j] = null;
+						realMsl++;
+					}
+				}
+			}
+
+		}
+
+		java.lang.reflect.Method found;
+		if (ms.length == 0 || (found = ms[0]) == null)
+			throw (java.lang.RuntimeException)haxe.Exception.thrown("No compatible method found for: " + field);
+
+		if (hasNumber)
+		{
+			java.lang.Class[] allcls = found.getParameterTypes();
+
+			for (int i = 0; i < len; i++)
+			{
+				java.lang.Object o = objs[i];
+				if (o instanceof java.lang.Number)
+				{
+					java.lang.Class curCls = null;
+					if (i < allcls.length)
+					{
+						curCls = allcls[i];
+						if (!curCls.isAssignableFrom(o.getClass()))
+						{
+							String name = curCls.getName();
+							if (name.equals("double") || name.equals("java.lang.Double"))
+							{
+								objs[i] = ((java.lang.Number)o).doubleValue();
+							} else if (name.equals("int") || name.equals("java.lang.Integer"))
+							{
+								objs[i] = ((java.lang.Number)o).intValue();
+							} else if (name.equals("float") || name.equals("java.lang.Float"))
+							{
+								objs[i] = ((java.lang.Number)o).floatValue();
+							} else if (name.equals("byte") || name.equals("java.lang.Byte"))
+							{
+								objs[i] = ((java.lang.Number)o).byteValue();
+							} else if (name.equals("short") || name.equals("java.lang.Short"))
+							{
+								objs[i] = ((java.lang.Number)o).shortValue();
+							} else if (name.equals("long") || name.equals("java.lang.Long"))
+							{
+								objs[i] = ((java.lang.Number)o).longValue();
+							}
+						}
+					} //else varargs not handled TODO
+				}
+			}
+		}
+
+		try {
+			found.setAccessible(true);
+			return found.invoke(obj, objs);
+		}
+
+		catch (java.lang.reflect.InvocationTargetException e)
+		{
+			throw (java.lang.RuntimeException)haxe.Exception.thrown(e.getCause());
+		}
+
+		catch (Throwable t)
+		{
+			throw (java.lang.RuntimeException)haxe.Exception.thrown(t);
+		}
+	')
+	public static function slowCallField(obj:Dynamic, field:String, args:java.NativeArray<Dynamic>):Dynamic {
+		return null;
+	}
+
+	@:functionCode('
+		if (obj instanceof haxe.lang.IHxObject)
+		{
+			return ((haxe.lang.IHxObject) obj).__hx_invokeField(field, args);
+		}
+
+		return slowCallField(obj, field, args);
+	')
+	public static function callField(obj:Dynamic, field:String, args:java.NativeArray<Dynamic>):Dynamic {
+		return null;
+	}
+
+	@:functionCode('
+
+		if (obj instanceof haxe.lang.IHxObject)
+			return ((haxe.lang.IHxObject) obj).__hx_getField(field, throwErrors, false, false);
+
+		return slowGetField(obj, field, throwErrors);
+
+	')
+	public static function getField(obj:Dynamic, field:String, throwErrors:Bool):Dynamic {
+		return null;
+	}
+
+	@:functionCode('
+
+		if (obj instanceof haxe.lang.IHxObject)
+			return ((haxe.lang.IHxObject) obj).__hx_getField_f(field, throwErrors, false);
+
+		return toDouble(slowGetField(obj, field, throwErrors));
+
+	')
+	public static function getField_f(obj:Dynamic, field:String, throwErrors:Bool):Float {
+		return 0.0;
+	}
+
+	@:functionCode('
+
+		if (obj instanceof haxe.lang.IHxObject)
+			return ((haxe.lang.IHxObject) obj).__hx_setField(field, value, false);
+
+		return slowSetField(obj, field, value);
+
+	')
+	public static function setField(obj:Dynamic, field:String, value:Dynamic):Dynamic {
+		return null;
+	}
+
+	@:functionCode('
+
+		if (obj instanceof haxe.lang.IHxObject)
+			return ((haxe.lang.IHxObject) obj).__hx_setField_f(field, value, false);
+
+		return toDouble(slowSetField(obj, field, value));
+
+	')
+	public static function setField_f(obj:Dynamic, field:String, value:Float):Float {
+		return 0.0;
+	}
+
+	public static function toString(obj:Dynamic):String {
+		if (obj == null)
+			return null;
+
+		if (Std.isOfType(obj, java.lang.Number) && !Std.isOfType(obj, java.lang.Integer.IntegerClass) && isInt((obj : java.lang.Number)))
+			return java.lang.Integer._toString(toInt(obj));
+		return untyped obj.toString();
+	}
+
+	public static function isFinite(v:Float):Bool {
+		return (v == v) && !java.lang.Double.DoubleClass._isInfinite(v);
+	}
+
+	public static function getIntFromNumber(n:java.lang.Number):Int {
+		return n == null ? 0 : n.intValue();
+	}
+
+	public static function getFloatFromNumber(n:java.lang.Number):Float {
+		return n == null ? 0.0 : n.doubleValue();
+	}
+
+	public static function getInt64FromNumber(n:java.lang.Number):java.StdTypes.Int64 {
+		return n == null ? 0.0 : n.longValue();
+	}
+
+	public static function numToInteger(num:java.lang.Number):java.lang.Integer {
+		return num == null ? null : (Std.isOfType(num, java.lang.Integer.IntegerClass) ? cast num : java.lang.Integer.valueOf(num.intValue()));
+	}
+
+	public static function numToDouble(num:java.lang.Number):java.lang.Double {
+		return num == null ? null : (Std.isOfType(num, java.lang.Double.DoubleClass) ? cast num : java.lang.Double.valueOf(num.doubleValue()));
+	}
+
+	public static function numToFloat(num:java.lang.Number):java.lang.Float {
+		return num == null ? null : (Std.isOfType(num, java.lang.Float.FloatClass) ? cast num : java.lang.Float.valueOf(num.floatValue()));
+	}
+
+	public static function numToByte(num:java.lang.Number):java.lang.Byte {
+		return num == null ? null : (Std.isOfType(num, java.lang.Byte.ByteClass) ? cast num : java.lang.Byte.valueOf(num.byteValue()));
+	}
+
+	public static function numToLong(num:java.lang.Number):java.lang.Long {
+		return num == null ? null : (Std.isOfType(num, java.lang.Long.LongClass) ? cast num : java.lang.Long.valueOf(num.longValue()));
+	}
+
+	public static function numToShort(num:java.lang.Number):java.lang.Short {
+		return num == null ? null : (Std.isOfType(num, java.lang.Short.ShortClass) ? cast num : java.lang.Short.valueOf(num.shortValue()));
+	}
+}
+
+@:keep @:native("haxe.lang.EmptyObject") enum EmptyObject {
+	EMPTY;
+}