summaryrefslogtreecommitdiff
path: root/sources/scalac/symtab/classfile/CLRPackageParser.java
diff options
context:
space:
mode:
Diffstat (limited to 'sources/scalac/symtab/classfile/CLRPackageParser.java')
-rw-r--r--sources/scalac/symtab/classfile/CLRPackageParser.java275
1 files changed, 275 insertions, 0 deletions
diff --git a/sources/scalac/symtab/classfile/CLRPackageParser.java b/sources/scalac/symtab/classfile/CLRPackageParser.java
new file mode 100644
index 0000000000..bf2e6971e2
--- /dev/null
+++ b/sources/scalac/symtab/classfile/CLRPackageParser.java
@@ -0,0 +1,275 @@
+/* ____ ____ ____ ____ ______ *\
+** / __// __ \/ __// __ \/ ____/ SOcos COmpiles Scala **
+** __\_ \/ /_/ / /__/ /_/ /\_ \ (c) 2002, LAMP/EPFL **
+** /_____/\____/\___/\____/____/ **
+\* */
+
+// $Id$
+
+package scalac.symtab.classfile;
+
+import java.util.List;
+import java.util.Iterator;
+import java.util.LinkedList;
+import java.util.Map;
+import java.util.HashMap;
+
+import java.io.File;
+
+import ch.epfl.lamp.compiler.msil.*;
+import scalac.symtab.Symbol;
+import scalac.symtab.TermSymbol;
+import scalac.symtab.ClassSymbol;
+import scalac.symtab.Scope;
+import scalac.util.Debug;
+import scalac.util.Name;
+import scalac.Global;
+
+/**
+ */
+public class CLRPackageParser extends MetadataParser {
+
+ //##########################################################################
+
+ Type BYTE;
+ Type UBYTE;
+ Type CHAR;
+ Type SHORT;
+ Type USHORT;
+ Type INT;
+ Type UINT;
+ Type LONG;
+ Type ULONG;
+ Type FLOAT;
+ Type DOUBLE;
+ Type BOOLEAN;
+ Type VOID;
+
+ Type OBJECT;
+ Type STRING;
+ Type STRING_ARRAY;
+
+ protected CLRClassParser completer;
+
+ private CLRPackageParser(Global global) {
+ super(global);
+ }
+
+ public static CLRPackageParser instance;
+ public static CLRPackageParser create(Global global) {
+ if (instance != null)
+ return instance;
+ instance = new CLRPackageParser(global);
+ instance.completer = new CLRClassParser(global, instance);
+ instance.init();
+ return instance;
+ }
+
+ Type[] types;
+
+ public Type[] getTypes() { return types; }
+
+ private boolean initialized = false;
+ public void init() {
+ if (initialized) return;
+ String[] asnames = scalac.util.ClassPath.parse(global.args.assemrefs.value);
+ for (int i = 0; i < asnames.length; i++)
+ assemrefs.add(asnames[i]);
+ Assembly mscorlib = findAssembly("mscorlib.dll");
+ Type.initMSCORLIB(mscorlib);
+
+ BYTE = Type.GetType("System.SByte");
+ UBYTE = Type.GetType("System.Byte");
+ CHAR = Type.GetType("System.Char");
+ SHORT = Type.GetType("System.Int16");
+ USHORT = Type.GetType("System.UInt16");
+ INT = Type.GetType("System.Int32");
+ UINT = Type.GetType("System.UInt32");
+ LONG = Type.GetType("System.Int64");
+ ULONG = Type.GetType("System.UInt64");
+ FLOAT = Type.GetType("System.Single");
+ DOUBLE = Type.GetType("System.Double");
+ BOOLEAN = Type.GetType("System.Boolean");
+ VOID = Type.GetType("System.Void");
+
+ OBJECT = Type.GetType("System.Object");
+ STRING = Type.GetType("System.String");
+ STRING_ARRAY = Type.GetType("System.String[]");
+
+ findAssembly("vjslib.dll");
+ findAssembly("scala.dll");
+ findAssembly("scala_sc.dll");
+ findAllAssemblies();
+
+ Type[] types = Type.EmptyTypes;
+ Iterator as = assemblies.iterator();
+ while (as.hasNext()) {
+ Type[] atypes = ((Assembly)as.next()).GetTypes();
+ int j = 0;
+ for (int i = 0; i < atypes.length; i++)
+ if (/*atypes[i].IsPublic && */atypes[i].DeclaringType == null)
+ atypes[j++] = atypes[i];
+ Type[] btypes = new Type[types.length + j];
+ System.arraycopy(types, 0, btypes, 0, types.length);
+ System.arraycopy(atypes, 0, btypes, types.length, j);
+ types = btypes;
+ }
+ this.types = types;
+
+// for (int i = 0; i < types.length; i++)
+// System.out.println(types[i]);
+
+ initialized = true;
+ }
+
+
+ java.util.Map syms2members = new HashMap();
+ java.util.Map members2syms = new HashMap();
+
+ //##########################################################################
+
+ public void map(Symbol sym, MemberInfo m) {
+ syms2members.put(sym, m);
+ members2syms.put(m, sym);
+ }
+
+ public MemberInfo getMember(Symbol sym) {
+ return (MemberInfo)syms2members.get(sym);
+ }
+
+ public Symbol getSymbol(MemberInfo m) {
+ return (Symbol)members2syms.get(m);
+ }
+
+ public Type getType(String name) {
+ return Type.GetType(name);
+ }
+
+ public Type mkArrayType(Type elemType) {
+ return getType(elemType.FullName + "[]");
+ }
+
+ //##########################################################################
+ // assembly loading methods
+
+ protected final java.util.List assemblies = new LinkedList();
+
+ protected final java.util.List assemrefs = new LinkedList();
+
+ /** Load the assembly with the given name
+ */
+ Assembly findAssembly(String name) {
+ // see if the assembly is referenced directly
+ for (Iterator assems = assemrefs.iterator(); assems.hasNext();) {
+ String assemname = (String)assems.next();
+ File f = new File(assemname);
+ if (!f.getName().equals(name))
+ continue;
+ Assembly assem = Assembly.LoadFrom(f.getPath());
+ if (assem != null) {
+ assems.remove();
+ assemblies.add(assem);
+ return assem;
+ }
+ }
+ for (Iterator assems = assemrefs.iterator(); assems.hasNext();) {
+ File d = new File((String)assems.next());
+ if (!d.isDirectory())
+ continue;
+ File f = new File(d, name);
+ if (f.exists()) {
+ Assembly assem = Assembly.LoadFrom(f.getPath());
+ if (assem != null) {
+ assemblies.add(assem);
+ return assem;
+ }
+ }
+ }
+ global.fail("Cannot find assembly " + name
+ + "; use the -r option to specify its location");
+ return null;
+ }
+
+ /** Load the rest of the assemblies specified with the '-r' option
+ */
+ void findAllAssemblies() {
+ //System.out.println("assembly references left: " + assemrefs);
+ for (Iterator assems = assemrefs.iterator(); assems.hasNext();) {
+ File f = new File((String)assems.next());
+ if (f.isFile()) {
+ Assembly assem = Assembly.LoadFrom(f.getPath());
+ if (assem != null) {
+ assemblies.add(assem);
+ //System.out.println("Loaded assembly " + assem);
+ }
+ }
+ assems.remove();
+ }
+ assert assemrefs.isEmpty();
+ }
+
+ //##########################################################################
+ // main functionality
+
+ protected void doComplete(Symbol p) {
+ // for future use
+ }
+
+ /**
+ */
+ public void importCLRTypes(Symbol p, Scope members, PackageParser pp) {
+ if (p.fullNameString().startsWith("scala")
+ || p.fullNameString().startsWith("java"))
+ return;
+ if (p.isRoot()) {
+ for (int i = 0; i < types.length; i++) {
+ int j = types[i].FullName.indexOf('.');
+ if (j < 0) continue;
+ String namespace = types[i].FullName.substring(0, j);
+ importCLRNamespace(namespace, p, members, pp);
+ }
+ return;
+ }
+ String n1 = p.fullNameString() + ".";
+ for (int i = 0; i < types.length; i++) {
+ String fullname = types[i].FullName;
+ if (!fullname.startsWith(n1))
+ continue;
+ //System.out.println("importing type: " + fullname);
+ int j = n1.length();
+ int k = fullname.indexOf('.', j);
+ String name = fullname.substring(j, k < 0 ? fullname.length() : k);
+ Name n = Name.fromString(name);
+ if (k < 0) {
+ // it's a class
+ ClassSymbol clazz = new ClassSymbol(n.toTypeName(), p, completer);
+ clazz.allConstructors().setInfo(completer.staticsParser(clazz));
+ clazz.module().setInfo(completer.staticsParser(clazz));
+ members.enter(clazz);
+ // ATTENTION: only if not scala.Object!
+ Scope.Entry e = members.lookupEntry(clazz.module().name);
+ if (e != Scope.Entry.NONE)
+ members.unlink(e);
+ members.enter(clazz.module());
+ } else {
+ importCLRNamespace(name, p, members, pp);
+ }
+ }
+ }
+
+ /** Imports a CLR namespace as a scala package.
+ */
+ protected void importCLRNamespace(String namespace, Symbol p,
+ Scope members, PackageParser pp)
+ {
+ Name n = Name.fromString(namespace);
+ if (members.lookup(n) == Symbol.NONE) {
+ //System.out.println("importing namespace " + namespace);
+ TermSymbol module = TermSymbol.newJavaPackageModule(n, p, pp);
+ members.enter(module);
+ members.enter(module.moduleClass());
+ }
+ }
+
+ //##########################################################################
+}
generated by cgit v1.2.3 (git 2.39.1) at 2024-08-26 01:44:31 +0000