//
using System.Globalization;
+using System.Threading;
namespace System {
- public struct Int64 : IComparable, IFormattable { //, IConvertible {
- private static Type Type = typeof (long);
+ [Serializable]
+ public struct Int64 : IComparable, IFormattable, IConvertible {
public const long MaxValue = 0x7fffffffffffffff;
public const long MinValue = -9223372036854775808;
public int CompareTo (object v)
{
- if (v == null || !(v 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;
public static long Parse (string s)
{
- return Parse (s, NumberStyles.Integer, null);
+ 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)
public static long Parse (string s, NumberStyles style, IFormatProvider fp)
{
- // TODO: Implement me
- return 0;
+ 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 ("G", null);
+ return ToString (null, null);
}
public string ToString (IFormatProvider fp)
{
- return ToString ("G", fp);
+ return ToString (null, fp);
}
public string ToString (string format)
public string ToString (string format, IFormatProvider fp)
{
- string fmt;
- NumberFormatInfo nfi;
+ NumberFormatInfo nfi = NumberFormatInfo.GetInstance( fp );
- fmt = (format == null) ? "G" : format;
+ if ( format == null )
+ format = "G";
- if (fp == null)
- nfi = NumberFormatInfo.CurrentInfo;
- else {
- nfi = (NumberFormatInfo) fp.GetFormat (Type);
-
- if (nfi == null)
- nfi = NumberFormatInfo.CurrentInfo;
- }
-
- return IntegerFormatter.NumberToString (fmt, nfi, value);
+ return IntegerFormatter.NumberToString (format, nfi, value);
}
// =========== IConvertible Methods =========== //
{
return TypeCode.Int64;
}
+
+ bool IConvertible.ToBoolean (IFormatProvider provider)
+ {
+ return System.Convert.ToBoolean (value);
+ }
+
+ byte IConvertible.ToByte (IFormatProvider provider)
+ {
+ return System.Convert.ToByte (value);
+ }
+
+ char IConvertible.ToChar (IFormatProvider provider)
+ {
+ return System.Convert.ToChar (value);
+ }
+
+ DateTime IConvertible.ToDateTime (IFormatProvider provider)
+ {
+ return System.Convert.ToDateTime (value);
+ }
+
+ decimal IConvertible.ToDecimal (IFormatProvider provider)
+ {
+ return System.Convert.ToDecimal (value);
+ }
+
+ double IConvertible.ToDouble (IFormatProvider provider)
+ {
+ return System.Convert.ToDouble (value);
+ }
+
+ short IConvertible.ToInt16 (IFormatProvider provider)
+ {
+ return System.Convert.ToInt16 (value);
+ }
+
+ int IConvertible.ToInt32 (IFormatProvider provider)
+ {
+ return System.Convert.ToInt32 (value);
+ }
+
+ long IConvertible.ToInt64 (IFormatProvider provider)
+ {
+ return System.Convert.ToInt64 (value);
+ }
+
+ [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)
+ {
+ return System.Convert.ToUInt64 (value);
+ }
}
}
projects / mono.git / blobdiff