//
// Author(s):
// Jackson Harper (Jackson@LatitudeGeo.com)
+// Ankit Jain (JAnkit@novell.com)
//
// (C) 2003 Latitude Geographics Group, All rights reserved
+// (C) 2005 Novell, Inc (http://www.novell.com)
//
using System;
using System.Collections;
-using System.Text;
namespace Mono.ILASM {
- public class GenericTypeInst : ModifiableType, ITypeRef {
+ public class GenericTypeInst : BaseGenericTypeRef {
- private string name;
- private string full_name;
- private string sig_mod;
+ private BaseClassRef class_ref;
+ private PEAPI.GenericTypeInst p_gen_inst;
+ private bool is_valuetypeinst;
private GenericArguments gen_args;
- private PEAPI.Type gen_inst;
+ private bool is_added; /* Added to PEFile (to TypeSpec table) ? */
+ /* Note: Using static hashtable here as GenericTypeInsts is not cached */
+ private static Hashtable s_method_table = new Hashtable ();
+ private static Hashtable s_field_table = new Hashtable ();
- private bool is_resolved;
+ public GenericTypeInst (BaseClassRef class_ref, GenericArguments gen_args, bool is_valuetypeinst)
+ : this (class_ref, gen_args, is_valuetypeinst, null, null)
+ {
+ }
- public GenericTypeInst (string name,
- GenericArguments gen_args)
+ public GenericTypeInst (BaseClassRef class_ref, GenericArguments gen_args, bool is_valuetypeinst,
+ string sig_mod, ArrayList conv_list)
+ : base ("", is_valuetypeinst, conv_list, sig_mod)
{
- this.name = name;
- this.gen_args = gen_args;
- full_name = name + gen_args.ToString ();
- sig_mod = String.Empty;
+ if (class_ref is GenericTypeInst)
+ throw new InternalErrorException ("Cannot create nested GenericInst, '" +
+ class_ref.FullName + "' '" + gen_args.ToString () + "'");
- is_resolved = false;
+ this.class_ref = class_ref;
+ this.gen_args = gen_args;
+ is_added = false;
}
- public string FullName {
- get { return full_name + sig_mod; }
+ public override string FullName {
+ get { return class_ref.FullName + gen_args.ToString () + SigMod; }
}
- public override string SigMod {
- get { return sig_mod; }
- set { sig_mod = value; }
+ public override BaseTypeRef Clone ()
+ {
+ //Clone'd instance shares the class_ref and gen_args,
+ //as its basically used to create modified types (arrays etc)
+ return new GenericTypeInst (class_ref, gen_args, is_valuetypeinst, sig_mod,
+ (ArrayList) ConversionList.Clone () );
}
- public PEAPI.Type PeapiType {
- get { return gen_inst; }
+ public override void MakeValueClass ()
+ {
+ class_ref.MakeValueClass ();
}
- public void Resolve (CodeGen code_gen)
+ public override void ResolveNoTypeSpec (CodeGen code_gen)
{
if (is_resolved)
return;
- PEAPI.Type p_gen_type = code_gen.TypeManager.GetPeapiType (name);
+ class_ref.Resolve (code_gen);
+ p_gen_inst = (PEAPI.GenericTypeInst) class_ref.ResolveInstance (code_gen, gen_args);
- gen_inst = new PEAPI.GenericTypeInst (p_gen_type, gen_args.Resolve (code_gen));
- gen_inst = Modify (code_gen, gen_inst);
+ type = Modify (code_gen, p_gen_inst);
is_resolved = true;
}
- public IMethodRef GetMethodRef (ITypeRef ret_type, PEAPI.CallConv call_conv,
- string meth_name, ITypeRef[] param, int gen_param_count)
+ public override void Resolve (CodeGen code_gen)
{
- return new TypeSpecMethodRef (this, ret_type, call_conv, meth_name, param, gen_param_count);
+ ResolveNoTypeSpec (code_gen);
+ if (is_added)
+ return;
+
+ code_gen.PEFile.AddGenericClass ((PEAPI.GenericTypeInst) p_gen_inst);
+ is_added = true;
}
- public IFieldRef GetFieldRef (ITypeRef ret_type, string field_name)
+ public override void Resolve (GenericParameters type_gen_params, GenericParameters method_gen_params)
{
- return new TypeSpecFieldRef (this, ret_type, field_name);
+ gen_args.Resolve (type_gen_params, method_gen_params);
}
- }
+ protected override BaseMethodRef CreateMethodRef (BaseTypeRef ret_type,
+ PEAPI.CallConv call_conv, string name, BaseTypeRef[] param, int gen_param_count)
+ {
+ throw new InternalErrorException ("Should not be called");
+ }
-}
+ public override BaseMethodRef GetMethodRef (BaseTypeRef ret_type, PEAPI.CallConv call_conv,
+ string meth_name, BaseTypeRef[] param, int gen_param_count)
+ {
+ /* Note: Using FullName here as we are caching in a static hashtable */
+ string key = FullName + MethodDef.CreateSignature (ret_type, call_conv, meth_name, param, gen_param_count, true);
+ TypeSpecMethodRef mr = s_method_table [key] as TypeSpecMethodRef;
+ if (mr == null) {
+ mr = new TypeSpecMethodRef (this, call_conv, ret_type, meth_name, param, gen_param_count);
+ s_method_table [key] = mr;
+ }
+
+ return mr;
+ }
+
+ protected override IFieldRef CreateFieldRef (BaseTypeRef ret_type, string field_name)
+ {
+ /* Note: Using FullName here as we are caching in a static hashtable */
+ string key = FullName + ret_type.FullName + field_name;
+ IFieldRef fr = (IFieldRef) s_field_table [key];
+
+ if (fr == null) {
+ fr = new TypeSpecFieldRef (this, ret_type, field_name);
+ s_field_table [key] = fr;
+ }
+
+ return fr;
+ }
+ }
+}