00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028
00029
00030
00031
00032
00033
00034
00035
00036
00037
00038
00039
00040 module mango.format.Number;
00041
00042 private import mango.format.Styled;
00043
00044
00045
00046
00047
00048
00049
00050
00051
00052
00053
00054
00055
00056 class Number : Styled
00057 {
00058 enum NFormat:ubyte {Binary='b', Octal='o', Hex='x', HexUpper='X', Decimal='d', Unsigned='u'};
00059
00060
00061
00062
00063
00064
00065
00066
00067
00068
00069
00070
00071
00072
00073
00074
00075
00076
00077
00078
00079
00080
00081
00082
00083
00084
00085
00086
00087
00088
00089
00090 final static char[] format (char[] dst, long i, NFormat fmt = NFormat.Decimal, Flags flags = 0)
00091 {
00092 char[] prefix;
00093 int len = dst.length;
00094
00095
00096 if (len)
00097 {
00098 uint radix;
00099 char[] numbers = "0123456789abcdef";
00100
00101
00102 switch (fmt)
00103 {
00104 default:
00105 case NFormat.Decimal:
00106 if (i < 0)
00107 {
00108 prefix = "-";
00109 i = -i;
00110 }
00111 else
00112 if (flags & Flags.Space)
00113 prefix = " ";
00114 else
00115 if (flags & Flags.Plus)
00116 prefix = "+";
00117
00118 case NFormat.Unsigned:
00119 radix = 10;
00120 break;
00121
00122 case NFormat.Binary:
00123 radix = 2;
00124 if (flags & Flags.Hash)
00125 prefix = "0b";
00126 break;
00127
00128 case NFormat.Octal:
00129 radix = 8;
00130 if (flags & Flags.Hash)
00131 prefix = "0o";
00132 break;
00133
00134 case NFormat.Hex:
00135 radix = 16;
00136 if (flags & Flags.Hash)
00137 prefix = "0x";
00138 break;
00139
00140 case NFormat.HexUpper:
00141 radix = 16;
00142 numbers = "0123456789ABCDEF";
00143 if (flags & Flags.Hash)
00144 prefix = "0X";
00145 break;
00146 }
00147
00148
00149 char* p = dst.ptr + len;
00150 if (i <= uint.max)
00151 {
00152 uint v = i;
00153 do {
00154 *--p = numbers[v % radix];
00155 } while ((v /= radix) && --len);
00156 }
00157 else
00158 {
00159 ulong v = i;
00160 do {
00161 *--p = numbers[v % radix];
00162 } while ((v /= radix) && --len);
00163 }
00164 }
00165
00166
00167 if (--len < 0 || 0 > (len -= prefix.length))
00168 error ("output buffer too small in Number.format()");
00169
00170
00171 if (flags & Flags.Zero)
00172 {
00173 dst [prefix.length .. len + prefix.length] = '0';
00174 len = 0;
00175 }
00176
00177
00178 dst [len .. len + prefix.length] = prefix[];
00179
00180
00181 return dst [len .. dst.length];
00182 }
00183
00184
00185
00186
00187
00188
00189
00190
00191
00192
00193
00194
00195
00196
00197 package static uint trim (char[] digits, inout bool sign, uint* radix=null)
00198 {
00199 char c;
00200 char* p = digits;
00201 int len = digits.length;
00202
00203
00204 for (c = *p; len; c = *++p, --len)
00205 if (c == ' ' || c == '\t')
00206 {}
00207 else
00208 if (c == '-')
00209 sign = true;
00210 else
00211 if (c == '+')
00212 sign = false;
00213 else
00214 break;
00215
00216
00217 if (radix && *radix == 0)
00218 if (c == '0' && len)
00219 switch (*++p)
00220 {
00221 case 'x':
00222 case 'X':
00223 ++p;
00224 *radix = 16;
00225 break;
00226
00227 case 'b':
00228 case 'B':
00229 ++p;
00230 *radix = 2;
00231 break;
00232
00233 case 'o':
00234 case 'O':
00235 ++p;
00236 default:
00237 *radix = 8;
00238 break;
00239 }
00240 else
00241 *radix = 10;
00242
00243
00244 return p - digits.ptr;
00245 }
00246 }
00247
00248