ikvm-fork/runtime/vm.cs

468 строки
11 KiB
C#

/*
Copyright (C) 2002, 2003, 2004, 2005, 2006, 2007 Jeroen Frijters
This software is provided 'as-is', without any express or implied
warranty. In no event will the authors be held liable for any damages
arising from the use of this software.
Permission is granted to anyone to use this software for any purpose,
including commercial applications, and to alter it and redistribute it
freely, subject to the following restrictions:
1. The origin of this software must not be misrepresented; you must not
claim that you wrote the original software. If you use this software
in a product, an acknowledgment in the product documentation would be
appreciated but is not required.
2. Altered source versions must be plainly marked as such, and must not be
misrepresented as being the original software.
3. This notice may not be removed or altered from any source distribution.
Jeroen Frijters
jeroen@frijters.net
*/
using System;
using System.Threading;
using System.Reflection;
using System.IO;
using System.Diagnostics;
using System.Text;
using System.Security;
using System.Security.Permissions;
using IKVM.Internal;
#if !STATIC_COMPILER && !COMPACT_FRAMEWORK
namespace IKVM.Internal
{
public static class Starter
{
public static void PrepareForSaveDebugImage()
{
JVM.IsSaveDebugImage = true;
}
public static void SaveDebugImage()
{
DynamicClassLoader.SaveDebugImages();
}
public static bool EnableReflectionOnMethodsWithUnloadableTypeParameters
{
get
{
return JVM.EnableReflectionOnMethodsWithUnloadableTypeParameters;
}
set
{
JVM.EnableReflectionOnMethodsWithUnloadableTypeParameters = value;
}
}
public static bool ClassUnloading
{
#if CLASSGC
get { return JVM.classUnloading; }
set { JVM.classUnloading = value; }
#else
get { return false; }
set { }
#endif
}
}
}
#endif // !STATIC_COMPILER && !COMPACT_FRAMEWORK
namespace IKVM.Internal
{
static class JVM
{
#if STATIC_COMPILER
internal const bool IsStaticCompiler = true;
internal const bool FinishingForDebugSave = false;
internal const bool IsSaveDebugImage = false;
#else
internal const bool IsStaticCompiler = false;
private static bool enableReflectionOnMethodsWithUnloadableTypeParameters;
private static bool finishingForDebugSave;
private static int emitSymbols;
internal static bool IsSaveDebugImage;
#if CLASSGC
internal static bool classUnloading = true;
#endif
#endif // STATIC_COMPILER
private static Assembly coreAssembly;
internal static Version SafeGetAssemblyVersion(Assembly asm)
{
// Assembly.GetName().Version requires FileIOPermission,
// so we parse the FullName manually :-(
string name = asm.FullName;
int start = name.IndexOf(", Version=");
if(start >= 0)
{
start += 10;
int end = name.IndexOf(',', start);
if(end >= 0)
{
return new Version(name.Substring(start, end - start));
}
}
return new Version();
}
internal static string SafeGetEnvironmentVariable(string name)
{
try
{
return Environment.GetEnvironmentVariable(name);
}
catch(SecurityException)
{
return null;
}
}
internal static Assembly CoreAssembly
{
get
{
#if !STATIC_COMPILER
if(coreAssembly == null)
{
#if FIRST_PASS
throw new InvalidOperationException("This version of IKVM.Runtime.dll was compiled with FIRST_PASS defined.");
#else
coreAssembly = typeof(java.lang.Object).Assembly;
#endif
}
#endif // !STATIC_COMPILER
return coreAssembly;
}
set
{
coreAssembly = value;
}
}
#if !STATIC_COMPILER
public static bool EnableReflectionOnMethodsWithUnloadableTypeParameters
{
get
{
return enableReflectionOnMethodsWithUnloadableTypeParameters;
}
set
{
enableReflectionOnMethodsWithUnloadableTypeParameters = value;
}
}
internal static bool FinishingForDebugSave
{
get
{
return finishingForDebugSave;
}
set
{
finishingForDebugSave = value;
}
}
internal static bool EmitSymbols
{
get
{
if (emitSymbols == 0)
{
int state;
string debug = System.Configuration.ConfigurationManager.AppSettings["ikvm-emit-symbols"];
if (debug == null)
{
state = Debugger.IsAttached ? 1 : 2;
}
else
{
state = debug.Equals("True", StringComparison.OrdinalIgnoreCase) ? 1 : 2;
}
// make sure we only set the value once, because it isn't allowed to changed as that could cause
// the compiler to try emitting symbols into a ModuleBuilder that doesn't accept them (and would
// throw an InvalidOperationException)
Interlocked.CompareExchange(ref emitSymbols, state, 0);
}
return emitSymbols == 1;
}
}
#endif // !STATIC_COMPILER
internal static bool IsUnix
{
get
{
return Environment.OSVersion.Platform == PlatformID.Unix;
}
}
internal static string MangleResourceName(string name)
{
// FXBUG there really shouldn't be any need to mangle the resource names,
// but in order for ILDASM/ILASM round tripping to work reliably, we have
// to make sure that we don't produce resource names that'll cause ILDASM
// to generate invalid filenames.
StringBuilder sb = new StringBuilder("ikvm__", name.Length + 6);
foreach(char c in name)
{
if("abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ_-+.()$#@~=&{}[]0123456789`".IndexOf(c) != -1)
{
sb.Append(c);
}
else if(c == '/')
{
sb.Append('!');
}
else
{
sb.Append('%');
sb.Append(string.Format("{0:X4}", (int)c));
}
}
return sb.ToString();
}
// based on Bret Mulvey's C# port of Jenkins32
// note that this algorithm cannot be changed, because we persist these hashcodes in the metadata of shared class loader assemblies
internal static int PersistableHash(string str)
{
uint key = 1;
foreach (char c in str)
{
key += c;
key += (key << 12);
key ^= (key >> 22);
key += (key << 4);
key ^= (key >> 9);
key += (key << 10);
key ^= (key >> 2);
key += (key << 7);
key ^= (key >> 12);
}
return (int)key;
}
internal static void CriticalFailure(string message, Exception x)
{
try
{
Tracer.Error(Tracer.Runtime, "CRITICAL FAILURE: {0}", message);
Type messageBox = null;
#if !STATIC_COMPILER
// NOTE we use reflection to invoke MessageBox.Show, to make sure we run in environments where WinForms isn't available
Assembly winForms = IsUnix ? null : Assembly.Load("System.Windows.Forms, Version=1.0.5000.0, Culture=neutral, PublicKeyToken=b77a5c561934e089");
if(winForms != null)
{
messageBox = winForms.GetType("System.Windows.Forms.MessageBox");
}
#endif
message = String.Format("****** Critical Failure: {1} ******{0}{0}" +
"PLEASE FILE A BUG REPORT FOR IKVM.NET WHEN YOU SEE THIS MESSAGE{0}{0}" +
(messageBox != null ? "(on Windows you can use Ctrl+C to copy the contents of this message to the clipboard){0}{0}" : "") +
"{2}{0}" +
"{3}{0}" +
"{4}",
Environment.NewLine,
message,
x,
x != null ? new StackTrace(x, true).ToString() : "",
new StackTrace(true));
if(messageBox != null)
{
try
{
Version ver = SafeGetAssemblyVersion(typeof(JVM).Assembly);
messageBox.InvokeMember("Show", BindingFlags.InvokeMethod | BindingFlags.Static | BindingFlags.Public, null, null, new object[] { message, "IKVM.NET " + ver + " Critical Failure" });
}
catch
{
Console.Error.WriteLine(message);
}
}
else
{
Console.Error.WriteLine(message);
}
}
catch(Exception ex)
{
Console.Error.WriteLine(ex);
}
finally
{
Environment.Exit(666);
}
}
// this method resolves types in IKVM.Runtime.dll
// (the version of IKVM.Runtime.dll that we're running
// with can be different from the one we're compiling against.)
internal static Type LoadType(Type type)
{
#if STATIC_COMPILER
return StaticCompiler.GetType(type.FullName);
#else
return type;
#endif
}
internal static object Box(object val)
{
#if STATIC_COMPILER || FIRST_PASS
return null;
#else
if(val is byte)
{
return java.lang.Byte.valueOf((byte)val);
}
else if(val is bool)
{
return java.lang.Boolean.valueOf((bool)val);
}
else if(val is short)
{
return java.lang.Short.valueOf((short)val);
}
else if(val is char)
{
return java.lang.Character.valueOf((char)val);
}
else if(val is int)
{
return java.lang.Integer.valueOf((int)val);
}
else if(val is float)
{
return java.lang.Float.valueOf((float)val);
}
else if(val is long)
{
return java.lang.Long.valueOf((long)val);
}
else if(val is double)
{
return java.lang.Double.valueOf((double)val);
}
else
{
throw new java.lang.IllegalArgumentException();
}
#endif
}
internal static object Unbox(object val)
{
#if STATIC_COMPILER || FIRST_PASS
return null;
#else
java.lang.Byte b = val as java.lang.Byte;
if(b != null)
{
return b.byteValue();
}
java.lang.Boolean b1 = val as java.lang.Boolean;
if(b1 != null)
{
return b1.booleanValue();
}
java.lang.Short s = val as java.lang.Short;
if(s != null)
{
return s.shortValue();
}
java.lang.Character c = val as java.lang.Character;
if(c != null)
{
return c.charValue();
}
java.lang.Integer i = val as java.lang.Integer;
if(i != null)
{
return i.intValue();
}
java.lang.Float f = val as java.lang.Float;
if(f != null)
{
return f.floatValue();
}
java.lang.Long l = val as java.lang.Long;
if(l != null)
{
return l.longValue();
}
java.lang.Double d = val as java.lang.Double;
if(d != null)
{
return d.doubleValue();
}
else
{
throw new java.lang.IllegalArgumentException();
}
#endif
}
#if !STATIC_COMPILER
internal static object NewAnnotation(object classLoader, object definition)
{
#if FIRST_PASS
return null;
#else
return ikvm.@internal.AnnotationAttributeBase.newAnnotation((java.lang.ClassLoader)classLoader, definition);
#endif
}
#endif
#if !STATIC_COMPILER
internal static object NewAnnotationElementValue(object classLoader, object expectedClass, object definition)
{
#if FIRST_PASS
return null;
#else
try
{
return ikvm.@internal.AnnotationAttributeBase.decodeElementValue(definition, (java.lang.Class)expectedClass, (java.lang.ClassLoader)classLoader);
}
catch(java.lang.IllegalAccessException)
{
// TODO this shouldn't be here
return null;
}
#endif
}
#endif
#if !STATIC_COMPILER
// helper for JNI (which doesn't have access to core library internals)
internal static object CreateCallerID(RuntimeMethodHandle method)
{
#if FIRST_PASS
return null;
#else
return ikvm.@internal.CallerID.create(MethodBase.GetMethodFromHandle(method));
#endif
}
#endif
#if !STATIC_COMPILER
// helper for JNI (which doesn't have access to core library internals)
internal static object NewDirectByteBuffer(long address, int capacity)
{
#if FIRST_PASS
return null;
#else
return java.nio.DirectByteBuffer.__new(address, capacity);
#endif
}
#endif
}
}