Exemple #1
0
        private javaClass GetPointerClass()
        {
            javaClass pointerClass = method.getClass();

            string pointerClassName = pointerClass.getName();

            if (pointerClassName == "java.lang.Integer")
            {
                return(java.lang.Integer.TYPE);
            }
            else if (pointerClassName == "java.lang.Long")
            {
                return(java.lang.Long.TYPE);
            }
            else
            {
                return(pointerClass.getInterfaces()[0]);
            }
        }
        public static void Run()
        {
            List <java.lang.Class> classes = new List <java.lang.Class>();

            foreach (Type type in typeof(org.objectfabric.Transaction).Assembly.GetTypes())
            {
                java.lang.Class c = type;

                if (c != null && c.getName().StartsWith("org.objectfabric"))
                {
                    classes.Add(type);
                }
            }

            //AppDomain.CurrentDomain.UnhandledException += new UnhandledExceptionEventHandler( CurrentDomain_UnhandledException );

            org.junit.runner.JUnitCore core = new org.junit.runner.JUnitCore();
            core.addListener(new Listener());
            core.run(classes.ToArray());

            Console.WriteLine("Success!");
        }
Exemple #3
0
        public static object DynamicCast(object obj, java.lang.Class clazz)
        {
#if FIRST_PASS
            return(null);
#else
            Debug.Assert(obj != null);
            Profiler.Count("DynamicCast");
            if (!DynamicInstanceOf(obj, clazz))
            {
                throw new java.lang.ClassCastException(NativeCode.ikvm.runtime.Util.GetTypeWrapperFromObject(obj).Name + " cannot be cast to " + clazz.getName());
            }
            return(obj);
#endif
        }
Exemple #4
0
        public static javaClass Unbox(this javaClass self)
        {
            if (Intrinsics.IsCILBoxing())
            {
                if (self.getName() == "System.SByte")
                {
                    return(javaByte.TYPE);
                }
                if (self.getName() == "System.Int16")
                {
                    return(javaShort.TYPE);
                }
                if (self.getName() == "System.Int32")
                {
                    return(javaInt.TYPE);
                }
                if (self.getName() == "System.Int64")
                {
                    return(javaLong.TYPE);
                }
                if (self.getName() == "System.Single")
                {
                    return(javaFloat.TYPE);
                }
                if (self.getName() == "System.Double")
                {
                    return(javaDouble.TYPE);
                }
                if (self.getName() == "System.Char")
                {
                    return(javaChar.TYPE);
                }
                if (self.getName() == "System.Boolean")
                {
                    return(javaBool.TYPE);
                }

                if (self.getName() == "System.Byte")
                {
                    return(javaByte.TYPE);
                }
                if (self.getName() == "System.UInt16")
                {
                    return(javaShort.TYPE);
                }
                if (self.getName() == "System.UInt32")
                {
                    return(javaInt.TYPE);
                }
                if (self.getName() == "System.UInt64")
                {
                    return(javaLong.TYPE);
                }
            }

            if (Intrinsics.IsJavaBoxing())
            {
                if (self == Intrinsics.GetClass(typeof(javaByte)))
                {
                    return(javaByte.TYPE);
                }
                if (self == Intrinsics.GetClass(typeof(javaShort)))
                {
                    return(javaShort.TYPE);
                }
                if (self == Intrinsics.GetClass(typeof(javaInt)))
                {
                    return(javaInt.TYPE);
                }
                if (self == Intrinsics.GetClass(typeof(javaLong)))
                {
                    return(javaLong.TYPE);
                }
                if (self == Intrinsics.GetClass(typeof(javaFloat)))
                {
                    return(javaFloat.TYPE);
                }
                if (self == Intrinsics.GetClass(typeof(javaDouble)))
                {
                    return(javaDouble.TYPE);
                }
                if (self == Intrinsics.GetClass(typeof(javaChar)))
                {
                    return(javaChar.TYPE);
                }
                if (self == Intrinsics.GetClass(typeof(javaBool)))
                {
                    return(javaBool.TYPE);
                }
            }

            return(self);
        }
Exemple #5
0
        private void AddMembers(String p, Symbol s, java.lang.Class ci, List <object> exceptFor, int maxDepth)
        {
            Package pkg = CurrentPackage();
            String  ns  = ci.getName();

            if (!useClassname(ns))
            {
                return;
            }
            WriteLine("; importing " + p + " as " + ns);
            java.lang.reflect.Field[] fi = ci.getFields();
            for (int i = 0; i < fi.Length; i++)
            {
                java.lang.reflect.Field f = fi[i];
                f.setAccessible(true);
                String fname = ("" + p + "." + f.getName()).ToUpper();
                Symbol old   = pkg.findAccessibleSymbol(fname);
                if (old != null)
                {
                    //   fname = ("" + p + "%" + f.getName()).ToUpper() + "";
                    //  old = pkg.findAccessibleSymbol(fname);
                }
                bool needsClear = false;
                if (old == null)
                {
                    old        = pkg.intern(new SimpleString(fname));
                    needsClear = true;
                    // WriteLine(";;; skip field " + fname + " for " + f);
                    //  continue;
                }
                WriteLine(";;; field " + fname + " for " + f);
                Symbol sfm = Intern(fname, null, exceptFor, f.getType(), maxDepth - 1);// IkvmSite.fieldToInstanceSymbol(fname, pkg, s, f);
                if (needsClear)
                {
                    sfm.setSymbolValue(null);
                }

                if (maxDepth > 0)
                {
                    exceptFor.Add(f);
                    AddMembers(fname, sfm, f.getType(), exceptFor, maxDepth - 1);
                }
                else
                {
                    if (false && !exceptFor.Contains(f))
                    {
                        exceptFor.Add(f);
                        AddMembers(fname, sfm, ikvm.runtime.Util.getInstanceTypeFromClass(f.getType()), exceptFor, maxDepth - 1);
                    }
                }
            }
            java.lang.reflect.Method[] mi = ci.getDeclaredMethods();
            if (false)
            {
                for (int i = 0; i < mi.Length; i++)
                {
                    java.lang.reflect.Method m = mi[i];
                    String fname = ("" + p + "." + m.getName()).ToUpper() + "";
                    Symbol old   = pkg.findAccessibleSymbol(fname);
                    if (old != null)
                    {
                        fname = ("" + p + "/" + m.getName()).ToUpper() + "";
                        old   = pkg.findAccessibleSymbol(fname);
                    }
                    if (old != null)
                    {
                        fname = ("" + p + "//" + m.getName()).ToUpper() + "";
                        old   = pkg.findAccessibleSymbol(fname);
                    }
                    if (old != null)
                    {
                        WriteLine(";;; skip method " + fname + " for " + m);
                        continue;
                    }
                    WriteLine(";;; method " + p + " as " + fname + " to " + m);
                    //LispObject sfm = IkvmSite.methodToInstanceSymbol(fname, pkg, s, m);
                }
            }
        }
Exemple #6
0
        public Symbol Intern(string p, object globalcogbotTextForm, List <object> exceptFor, java.lang.Class ic, int depth)
        {
            Package pkg = CurrentPackage();

            if (p == null)
            {
                p = ic.getName();
                p = p.ToString();
            }
            p = p.ToUpper();
            Symbol     s  = Lisp.intern(p, pkg);
            LispObject sv = s.getSymbolValue();

            if (sv is JavaObject)
            {
                if (sv.javaInstance() == globalcogbotTextForm)
                {
                    return(s);
                }
            }
            Symbol fun  = pkg.findAccessibleSymbol("SYMBOL-JOBJECT");
            String mask = String.Format("{0} {1}", p, ic.getName());

            if (fun != null && !allExceptFor.Contains(mask))
            {
                allExceptFor.Add(mask);
                LispObject vtemp = s.getSymbolValue();
                s.setSymbolValue(s);
                var jclass = JavaObject.getInstance(ic);
                Lisp.eval(Lisp.list4(fun, new SimpleString(p), s, jclass));
                s.setSymbolValue(vtemp);
                depth++;
            }
            if (globalcogbotTextForm != null)
            {
                LispObject jo = JavaObject.getInstance(globalcogbotTextForm);
                s.setSymbolValue(jo);

                if (exceptFor.Contains(globalcogbotTextForm))
                {
                    return(s);
                }
                exceptFor.Add(globalcogbotTextForm);
            }

            if (true)
            {
                return(s);
            }

            String ns = ic.getName();

            if (!useClassname(ns))
            {
                return(s);
            }
            if (depth > 0)
            {
                AddMembers(p, s, ic, exceptFor, depth - 1);
            }
            return(s);
        }