2002-07-10 Gonzalo Paniagua Javier <gonzalo@ximian.com>
[mono.git] / mcs / class / corlib / System / Int64.cs
index 89a2578f820bdc180e42399dacb0f460317e705a..a25e42e3725547098a9a1ee247100d02fc3e09c9 100644 (file)
@@ -7,20 +7,34 @@
 // (C) Ximian, Inc.  http://www.ximian.com
 //
 
+using System.Globalization;
+using System.Threading;
+
 namespace System {
        
-       public struct Int64 : ValueType, IComparable, IFormattable {
-               public const long MinValue = 0x8000000000000000;
+       [Serializable]
+       public struct Int64 : IComparable, IFormattable, IConvertible {
+
                public const long MaxValue = 0x7fffffffffffffff;
+               public const long MinValue = -9223372036854775808;
                
-               long value;
+               public long value;
 
                public int CompareTo (object v)
                {
-                       if (!(value is System.Int64))
-                               throw new ArgumentException ("Value is not a System.Int64");
+                       if (v == null)
+                               return 1;
+                       
+                       if (!(v is System.Int64))
+                               throw new ArgumentException (Locale.GetText ("Value is not a System.Int64"));
+
+                       if (value == (long) v)
+                               return 0;
 
-                       return value - (long) v;
+                       if (value < (long) v)
+                               return -1;
+
+                       return 1;
                }
 
                public override bool Equals (object o)
@@ -33,61 +47,386 @@ namespace System {
 
                public override int GetHashCode ()
                {
-                       return (value & 0xffffffff) ^ (value >> 32);
+                       return (int)(value & 0xffffffff) ^ (int)(value >> 32);
+               }
+
+               public static long Parse (string s)
+               {
+                       long val = 0;
+                       int len;
+                       int i;
+                       int sign = 1;
+                       bool digits_seen = false;
+                       
+                       if (s == null)
+                               throw new ArgumentNullException (Locale.GetText ("s is null"));
+
+                       len = s.Length;
+
+                       char c;
+                       for (i = 0; i < len; i++){
+                               c = s [i];
+                               if (!Char.IsWhiteSpace (c))
+                                       break;
+                       }
+                       
+                       if (i == len)
+                               throw new FormatException ();
+
+                       c = s [i];
+                       if (c == '+')
+                               i++;
+                       else if (c == '-'){
+                               sign = -1;
+                               i++;
+                       }
+                       
+                       for (; i < len; i++){
+                               c = s [i];
+
+                               if (c >= '0' && c <= '9'){
+                                       val = checked (val * 10 + (c - '0') * sign);
+                                       digits_seen = true;
+                               } else {
+                                       if (Char.IsWhiteSpace (c)){
+                                               for (i++; i < len; i++){
+                                                       if (!Char.IsWhiteSpace (s [i]))
+                                                               throw new FormatException ();
+                                               }
+                                               break;
+                                       } else
+                                               throw new FormatException ();
+                               }
+                       }
+                       if (!digits_seen)
+                               throw new FormatException ();
+                       
+                       return val;
+               }
+
+               public static long Parse (string s, IFormatProvider fp)
+               {
+                       return Parse (s, NumberStyles.Integer, fp);
+               }
+
+               public static long Parse (string s, NumberStyles style)
+               {
+                       return Parse (s, style, null);
+               }
+
+               public static long Parse (string s, NumberStyles style, IFormatProvider fp)
+               {
+                       if (s == null)
+                               throw new ArgumentNullException ();
+
+                       if (s.Length == 0)
+                               throw new FormatException ("Input string was not " + 
+                                                          "in the correct format: s.Length==0.");
+
+                       NumberFormatInfo nfi;
+                       if (fp != null) {
+                               Type typeNFI = typeof (System.Globalization.NumberFormatInfo);
+                               nfi = (NumberFormatInfo) fp.GetFormat (typeNFI);
+                       }
+                       else
+                               nfi = Thread.CurrentThread.CurrentCulture.NumberFormat;
+
+                       Int32.CheckStyle (style);
+
+                       bool AllowCurrencySymbol = (style & NumberStyles.AllowCurrencySymbol) != 0;
+                       bool AllowExponent = (style & NumberStyles.AllowExponent) != 0;
+                       bool AllowHexSpecifier = (style & NumberStyles.AllowHexSpecifier) != 0;
+                       bool AllowThousands = (style & NumberStyles.AllowThousands) != 0;
+                       bool AllowDecimalPoint = (style & NumberStyles.AllowDecimalPoint) != 0;
+                       bool AllowParentheses = (style & NumberStyles.AllowParentheses) != 0;
+                       bool AllowTrailingSign = (style & NumberStyles.AllowTrailingSign) != 0;
+                       bool AllowLeadingSign = (style & NumberStyles.AllowLeadingSign) != 0;
+                       bool AllowTrailingWhite = (style & NumberStyles.AllowTrailingWhite) != 0;
+                       bool AllowLeadingWhite = (style & NumberStyles.AllowLeadingWhite) != 0;
+
+                       int pos = 0;
+
+                       if (AllowLeadingWhite)
+                               pos = Int32.JumpOverWhite (pos, s, true);
+
+                       bool foundOpenParentheses = false;
+                       bool negative = false;
+                       bool foundSign = false;
+                       bool foundCurrency = false;
+
+                       // Pre-number stuff
+                       if (AllowParentheses && s [pos] == '(') {
+                               foundOpenParentheses = true;
+                               foundSign = true;
+                               negative = true; // MS always make the number negative when there parentheses
+                                                // even when NumberFormatInfo.NumberNegativePattern != 0!!!
+                               pos++;
+                               if (AllowLeadingWhite)
+                                       pos = Int32.JumpOverWhite (pos, s, true);
+
+                               if (s.Substring (pos, nfi.NegativeSign.Length) == nfi.NegativeSign)
+                                       throw new FormatException ("Input string was not in the correct " +
+                                                                  "format: Has Negative Sign.");
+                               if (s.Substring (pos, nfi.PositiveSign.Length) == nfi.PositiveSign)
+                                       throw new FormatException ("Input string was not in the correct " +
+                                                                  "format: Has Positive Sign.");
+                       }
+
+                       if (AllowLeadingSign && !foundSign) {
+                               // Sign + Currency
+                               Int32.FindSign (ref pos, s, nfi, ref foundSign, ref negative);
+                               if (foundSign) {
+                                       if (AllowLeadingWhite)
+                                               pos = Int32.JumpOverWhite (pos, s, true);
+                                       if (AllowCurrencySymbol) {
+                                               Int32.FindCurrency (ref pos, s, nfi,
+                                                                   ref foundCurrency);
+                                               if (foundCurrency && AllowLeadingWhite)
+                                                       pos = Int32.JumpOverWhite (pos, s, true);
+                                       }
+                               }
+                       }
+                       
+                       if (AllowCurrencySymbol && !foundCurrency) {
+                               // Currency + sign
+                               Int32.FindCurrency (ref pos, s, nfi, ref foundCurrency);
+                               if (foundCurrency) {
+                                       if (AllowLeadingWhite)
+                                               pos = Int32.JumpOverWhite (pos, s, true);
+                                       if (foundCurrency) {
+                                               if (!foundSign && AllowLeadingSign) {
+                                                       Int32.FindSign (ref pos, s, nfi, ref foundSign,
+                                                                       ref negative);
+                                                       if (foundSign && AllowLeadingWhite)
+                                                               pos = Int32.JumpOverWhite (pos, s, true);
+                                               }
+                                       }
+                               }
+                       }
+                       
+                       long number = 0;
+                       int nDigits = 0;
+                       bool decimalPointFound = false;
+                       int digitValue;
+                       char hexDigit;
+                               
+                       // Number stuff
+                       do {
+
+                               if (!Int32.ValidDigit (s [pos], AllowHexSpecifier)) {
+                                       if (AllowThousands &&
+                                           (Int32.FindOther (ref pos, s, nfi.NumberGroupSeparator)
+                                               || Int32.FindOther (ref pos, s, nfi.CurrencyGroupSeparator)))
+                                           continue;
+                                       else
+                                       if (!decimalPointFound && AllowDecimalPoint &&
+                                           (Int32.FindOther (ref pos, s, nfi.NumberDecimalSeparator)
+                                               || Int32.FindOther (ref pos, s, nfi.CurrencyDecimalSeparator))) {
+                                           decimalPointFound = true;
+                                           continue;
+                                       }
+
+                                       break;
+                               }
+                               else if (AllowHexSpecifier) {
+                                       nDigits++;
+                                       hexDigit = s [pos++];
+                                       if (Char.IsDigit (hexDigit))
+                                               digitValue = (int) (hexDigit - '0');
+                                       else if (Char.IsLower (hexDigit))
+                                               digitValue = (int) (hexDigit - 'a' + 10);
+                                       else
+                                               digitValue = (int) (hexDigit - 'A' + 10);
+
+                                       number = checked (number * 16 - digitValue);
+                               }
+                               else if (decimalPointFound) {
+                                       nDigits++;
+                                       // Allows decimal point as long as it's only 
+                                       // followed by zeroes.
+                                       if (s [pos++] != '0')
+                                               throw new OverflowException ("Value too large or too " +
+                                                                            "small.");
+                               }
+                               else {
+                                       nDigits++;
+
+                                       try {
+                                               // Calculations done as negative
+                                               // (abs (MinValue) > abs (MaxValue))
+                                               number = checked (
+                                                       number * 10 - 
+                                                       (long) (s [pos++] - '0')
+                                                       );
+                                       } catch (OverflowException) {
+                                               throw new OverflowException ("Value too large or too " +
+                                                                            "small.");
+                                       }
+                               }
+                       } while (pos < s.Length);
+
+                       // Post number stuff
+                       if (nDigits == 0)
+                               throw new FormatException ("Input string was not in the correct format: nDigits == 0.");
+
+                       if (AllowTrailingSign && !foundSign) {
+                               // Sign + Currency
+                               Int32.FindSign (ref pos, s, nfi, ref foundSign, ref negative);
+                               if (foundSign) {
+                                       if (AllowTrailingWhite)
+                                               pos = Int32.JumpOverWhite (pos, s, true);
+                                       if (AllowCurrencySymbol)
+                                               Int32.FindCurrency (ref pos, s, nfi,
+                                                                   ref foundCurrency);
+                               }
+                       }
+                       
+                       if (AllowCurrencySymbol && !foundCurrency) {
+                               // Currency + sign
+                               if (nfi.CurrencyPositivePattern == 3 && s[pos++] != ' ')
+                                       throw new FormatException ("Input string was not in the correct format: no space between number and currency symbol.");
+
+                               Int32.FindCurrency (ref pos, s, nfi, ref foundCurrency);
+                               if (foundCurrency && pos < s.Length) {
+                                       if (AllowTrailingWhite)
+                                               pos = Int32.JumpOverWhite (pos, s, true);
+                                       if (!foundSign && AllowTrailingSign)
+                                               Int32.FindSign (ref pos, s, nfi, ref foundSign,
+                                                               ref negative);
+                               }
+                       }
+                       
+                       if (AllowTrailingWhite && pos < s.Length)
+                               pos = Int32.JumpOverWhite (pos, s, false);
+
+                       if (foundOpenParentheses) {
+                               if (pos >= s.Length || s [pos++] != ')')
+                                       throw new FormatException ("Input string was not in the correct " +
+                                                                  "format: No room for close parens.");
+                               if (AllowTrailingWhite && pos < s.Length)
+                                       pos = Int32.JumpOverWhite (pos, s, false);
+                       }
+
+                       if (pos < s.Length)
+                               throw new FormatException ("Input string was not in the correct format: Did not parse entire string. pos = " 
+                                                                               + pos + " s.Length = " + s.Length);
+
+                       
+                       if (!negative)
+                               number = -number;
+
+                       return number;
+               }
+
+               public override string ToString ()
+               {
+                       return ToString (null, null);
                }
 
+               public string ToString (IFormatProvider fp)
+               {
+                       return ToString (null, fp);
+               }
+
+               public string ToString (string format)
+               {
+                       return ToString (format, null);
+               }
+
+               public string ToString (string format, IFormatProvider fp)
+               {
+                       NumberFormatInfo nfi = NumberFormatInfo.GetInstance( fp );
+                       
+                       if ( format == null )
+                               format = "G";
+                       
+                       return IntegerFormatter.NumberToString (format, nfi, value);
+               }
+
+               // =========== IConvertible Methods =========== //
+
                public TypeCode GetTypeCode ()
                {
                        return TypeCode.Int64;
                }
 
-               public static long Parse (string s)
+               bool IConvertible.ToBoolean (IFormatProvider provider)
                {
-                       // TODO: Implement me
-                       return 0;
+                       return System.Convert.ToBoolean (value);
                }
 
-               public static long Parse (string s, IFormatProvider)
+               byte IConvertible.ToByte (IFormatProvider provider)
                {
-                       // TODO: Implement me
-                       return 0;
+                       return System.Convert.ToByte (value);
                }
 
-               public static long Parse (string s, NumberStyles s, fp)
+               char IConvertible.ToChar (IFormatProvider provider)
                {
-                       // TODO: Implement me
-                       return 0;
+                       return System.Convert.ToChar (value);
                }
 
-               public static long Parse (string s, NumberStyles s, IFormatProvider fp)
+               DateTime IConvertible.ToDateTime (IFormatProvider provider)
                {
-                       // TODO: Implement me
-                       return 0;
+                       return System.Convert.ToDateTime (value);
                }
 
-               public override string ToString ()
+               decimal IConvertible.ToDecimal (IFormatProvider provider)
+               {
+                       return System.Convert.ToDecimal (value);
+               }
+
+               double IConvertible.ToDouble (IFormatProvider provider)
                {
-                       // TODO: Implement me
+                       return System.Convert.ToDouble (value);
+               }
 
-                       return "";
+               short IConvertible.ToInt16 (IFormatProvider provider)
+               {
+                       return System.Convert.ToInt16 (value);
                }
 
-               public string ToString (IFormatProvider fp)
+               int IConvertible.ToInt32 (IFormatProvider provider)
                {
-                       // TODO: Implement me.
-                       return "";
+                       return System.Convert.ToInt32 (value);
                }
 
-               public string ToString (string format)
+               long IConvertible.ToInt64 (IFormatProvider provider)
                {
-                       // TODO: Implement me.
-                       return "";
+                       return System.Convert.ToInt64 (value);
                }
 
-               public string ToString (string format, IFormatProvider fp)
+               [CLSCompliant (false)]
+               sbyte IConvertible.ToSByte (IFormatProvider provider)
+               {
+                       return System.Convert.ToSByte (value);
+               }
+               
+               float IConvertible.ToSingle (IFormatProvider provider)
+               {
+                       return System.Convert.ToSingle (value);
+               }
+
+               object IConvertible.ToType (Type conversionType, IFormatProvider provider)
+               {
+                       return System.Convert.ToType (value, conversionType, provider);
+               }
+
+               [CLSCompliant (false)]
+               ushort IConvertible.ToUInt16 (IFormatProvider provider)
+               {
+                       return System.Convert.ToUInt16 (value);
+               }
+
+               [CLSCompliant (false)]
+               uint IConvertible.ToUInt32 (IFormatProvider provider)
+               {
+                       return System.Convert.ToUInt32 (value);
+               }
+
+               [CLSCompliant (false)]
+               ulong IConvertible.ToUInt64 (IFormatProvider provider)
                {
-                       // TODO: Implement me.
-                       return "";
+                       return System.Convert.ToUInt64 (value);
                }
        }
 }