New tests.
[mono.git] / mcs / mcs / support.cs
index ddab0825bb63629611552db0078c9a0205757e1f..8fcb5bf6081b058042eb984fdb684167c9412570 100644 (file)
 //
 // Author:
 //   Miguel de Icaza (miguel@ximian.com)
+//   Marek Safar (marek.safar@gmail.com)
 //
 // Copyright 2001 Ximian, Inc (http://www.ximian.com)
-// Copyright 2003-2008 Novell, Inc
+// Copyright 2003-2009 Novell, Inc
 //
 
 using System;
 using System.IO;
 using System.Text;
 using System.Reflection;
-using System.Collections;
 using System.Reflection.Emit;
 using System.Globalization;
+using System.Collections.Generic;
 
 namespace Mono.CSharp {
 
-       class PtrHashtable : Hashtable {
-               sealed class PtrComparer : IComparer
-#if NET_2_0
-                       , IEqualityComparer
-#endif
-               {
-                       private PtrComparer () {}
-
-                       public static PtrComparer Instance = new PtrComparer ();
+       sealed class ReferenceEquality<T> : IEqualityComparer<T> where T : class
+       {
+               public static readonly IEqualityComparer<T> Default = new ReferenceEquality<T> ();
 
-                       public int Compare (object x, object y)
-                       {
-                               if (x == y)
-                                       return 0;
-                               else
-                                       return 1;
-                       }
-#if NET_2_0
-                       bool IEqualityComparer.Equals (object x, object y)
-                       {
-                               return x == y;
-                       }
-                       
-                       int IEqualityComparer.GetHashCode (object obj)
-                       {
-                               return obj.GetHashCode ();
-                       }
-#endif
-                       
+               private ReferenceEquality ()
+               {
                }
 
-#if NET_2_0
-               public PtrHashtable () : base (PtrComparer.Instance) {}
-#else
-               public PtrHashtable () 
+               public bool Equals (T x, T y)
                {
-                       comparer = PtrComparer.Instance;
+                       return ReferenceEquals (x, y);
                }
-#endif
 
-#if MS_COMPATIBLE
-               //
-               // Workaround System.InvalidOperationException for enums
-               //
-               protected override int GetHash (object key)
+               public int GetHashCode (T obj)
                {
-                       TypeBuilder tb = key as TypeBuilder;
-                       if (tb != null && tb.BaseType == TypeManager.enum_type && tb.BaseType != null)
-                               key = tb.BaseType;
-
-                       return base.GetHash (key);
+                       return System.Runtime.CompilerServices.RuntimeHelpers.GetHashCode (obj);
                }
-#endif
        }
 
-       /*
-        * Hashtable whose keys are character arrays with the same length
-        */
-       class CharArrayHashtable : Hashtable {
-               sealed class ArrComparer : IComparer {
-                       private int len;
-
-                       public ArrComparer (int len) {
-                               this.len = len;
-                       }
-
-                       public int Compare (object x, object y)
-                       {
-                               char[] a = (char[])x;
-                               char[] b = (char[])y;
-
-                               for (int i = 0; i < len; ++i)
-                                       if (a [i] != b [i])
-                                               return 1;
-                               return 0;
-                       }
+       class Tuple<T1, T2> : IEquatable<Tuple<T1, T2>>
+       {
+               public Tuple (T1 item1, T2 item2)
+               {
+                       Item1 = item1;
+                       Item2 = item2;
                }
 
-               private int len;
+               public T1 Item1 { get; private set; }
+               public T2 Item2 { get; private set; }
 
-               protected override int GetHash (Object key)
+               public override int GetHashCode ()
                {
-                       char[] arr = (char[])key;
-                       int h = 0;
-
-                       for (int i = 0; i < len; ++i)
-                               h = (h << 5) - h + arr [i];
-
-                       return h;
+                       return Item1.GetHashCode () ^ Item2.GetHashCode ();
                }
 
-               public CharArrayHashtable (int len)
+               #region IEquatable<Tuple<T1,T2>> Members
+
+               public bool Equals (Tuple<T1, T2> other)
                {
-                       this.len = len;
-                       comparer = new ArrComparer (len);
+                       return EqualityComparer<T1>.Default.Equals (Item1, other.Item1) &&
+                               EqualityComparer<T2>.Default.Equals (Item2, other.Item2);
                }
-       }
 
-       struct Pair {
-               public object First;
-               public object Second;
+               #endregion
+       }
 
-               public Pair (object f, object s)
+       static class Tuple
+       {
+               public static Tuple<T1, T2> Create<T1, T2> (T1 item1, T2 item2)
                {
-                       First = f;
-                       Second = s;
+                       return new Tuple<T1, T2> (item1, item2);
                }
        }
 
@@ -149,36 +95,44 @@ namespace Mono.CSharp {
        ///   but if the seek is too far, it may read the underly
        ///   stream all over from the beginning.
        /// </summary>
-       public class SeekableStreamReader
+       public class SeekableStreamReader : IDisposable
        {
-               const int default_average_read_length = 1024;
                const int buffer_read_length_spans = 3;
 
                TextReader reader;
                Stream stream;
-               Encoding encoding;
 
-               char[] buffer;
+               static char[] buffer;
                int average_read_length;
                int buffer_start;       // in chars
                int char_count;         // count buffer[] valid characters
                int pos;                // index into buffer[]
 
-               void ResetStream (int read_length_inc)
+               public SeekableStreamReader (Stream stream, Encoding encoding)
                {
-                       average_read_length += read_length_inc;
-                       stream.Position = 0;
+                       this.stream = stream;
+
+                       const int default_average_read_length = 1024;
+                       InitializeStream (default_average_read_length);
                        reader = new StreamReader (stream, encoding, true);
-                       buffer = new char [average_read_length * buffer_read_length_spans];
-                       buffer_start = char_count = pos = 0;
                }
 
-               public SeekableStreamReader (Stream stream, Encoding encoding)
+               public void Dispose ()
                {
-                       this.stream = stream;
-                       this.encoding = encoding;
+                       // Needed to release stream reader buffers
+                       reader.Dispose ();
+               }
 
-                       ResetStream (default_average_read_length);
+               void InitializeStream (int read_length_inc)
+               {
+                       average_read_length += read_length_inc;
+
+                       int required_buffer_size = average_read_length * buffer_read_length_spans;
+                       if (buffer == null || buffer.Length < required_buffer_size)
+                               buffer = new char [required_buffer_size];
+
+                       stream.Position = 0;                    
+                       buffer_start = char_count = pos = 0;
                }
 
                /// <remarks>
@@ -194,7 +148,7 @@ namespace Mono.CSharp {
                        set {
                                // If the lookahead was too small, re-read from the beginning.  Increase the buffer size while we're at it
                                if (value < buffer_start)
-                                       ResetStream (average_read_length / 2);
+                                       InitializeStream (average_read_length / 2);
 
                                while (value > buffer_start + char_count) {
                                        pos = char_count;
@@ -323,90 +277,6 @@ namespace Mono.CSharp {
                }
        }
 
-       class PartialMethodDefinitionInfo : MethodInfo
-       {
-               MethodOrOperator mc;
-               MethodAttributes attrs;
-
-               public PartialMethodDefinitionInfo (MethodOrOperator mc)
-               {
-                       this.mc = mc;
-                       if ((mc.ModFlags & Modifiers.STATIC) != 0)
-                               attrs = MethodAttributes.Static;
-               }
-
-               public override MethodInfo GetBaseDefinition ()
-               {
-                       throw new NotImplementedException ();
-               }
-
-               public override ICustomAttributeProvider ReturnTypeCustomAttributes
-               {
-                       get { throw new NotImplementedException (); }
-               }
-
-               public override MethodAttributes Attributes
-               {
-                       get { return attrs; }
-               }
-
-               public override MethodImplAttributes GetMethodImplementationFlags ()
-               {
-                       throw new NotImplementedException ();
-               }
-
-               public override ParameterInfo [] GetParameters ()
-               {
-                       throw new NotImplementedException ();
-               }
-
-               public override object Invoke (object obj, BindingFlags invokeAttr, Binder binder, object [] parameters, CultureInfo culture)
-               {
-                       throw new NotImplementedException ();
-               }
-
-               public override RuntimeMethodHandle MethodHandle
-               {
-                       get { throw new NotImplementedException (); }
-               }
-
-               public override Type DeclaringType
-               {
-                       get { return mc.Parent.TypeBuilder; }
-               }
-
-               public override object [] GetCustomAttributes (Type attributeType, bool inherit)
-               {
-                       throw new NotImplementedException ();
-               }
-
-               public override object [] GetCustomAttributes (bool inherit)
-               {
-                       throw new NotImplementedException ();
-               }
-
-               public override Type ReturnType {
-                       get {
-                               return mc.MemberType;
-                       }
-               }
-
-               public override bool IsDefined (Type attributeType, bool inherit)
-               {
-                       throw new NotImplementedException ();
-               }
-
-               public override string Name
-               {
-                       get { return mc.Name; }
-               }
-
-               public override Type ReflectedType
-               {
-                       get { throw new NotImplementedException (); }
-               }
-       }
-
        public class UnixUtils {
                [System.Runtime.InteropServices.DllImport ("libc", EntryPoint="isatty")]
                extern static int _isatty (int fd);
@@ -438,8 +308,9 @@ namespace Mono.CSharp {
                        if (base_text == null)
                                throw new ArgumentNullException ("base_text");
                        this.base_text = base_text;
-                       
+
                        result = res;
+                       Array.Sort (result);
                }
 
                public string [] Result {