src/libcore/fmt/num.rs

   1 // Copyright 2014 The Rust Project Developers. See the COPYRIGHT
   2 // file at the top-level directory of this distribution and at
   3 // http://rust-lang.org/COPYRIGHT.
   4 //
   5 // Licensed under the Apache License, Version 2.0 <LICENSE-APACHE or
   6 // http://www.apache.org/licenses/LICENSE-2.0> or the MIT license
   7 // <LICENSE-MIT or http://opensource.org/licenses/MIT>, at your
   8 // option. This file may not be copied, modified, or distributed
   9 // except according to those terms.
  10
  11 //! Integer and floating-point number formatting
  12
  13 #![allow(deprecated)]
  14
  15
  16 use fmt;
  17 use ops::{Div, Rem, Sub};
  18 use str;
  19 use slice;
  20 use ptr;
  21 use mem;
  22
  23 #[doc(hidden)]
  24 trait Int: PartialEq + PartialOrd + Div<Output=Self> + Rem<Output=Self> +
  25            Sub<Output=Self> + Copy {
  26     fn zero() -> Self;
  27     fn from_u8(u: u8) -> Self;
  28     fn to_u8(&self) -> u8;
  29     fn to_u16(&self) -> u16;
  30     fn to_u32(&self) -> u32;
  31     fn to_u64(&self) -> u64;
  32     fn to_u128(&self) -> u128;
  33 }
  34
  35 macro_rules! doit {
  36     ($($t:ident)*) => ($(impl Int for $t {
  37         fn zero() -> $t { 0 }
  38         fn from_u8(u: u8) -> $t { u as $t }
  39         fn to_u8(&self) -> u8 { *self as u8 }
  40         fn to_u16(&self) -> u16 { *self as u16 }
  41         fn to_u32(&self) -> u32 { *self as u32 }
  42         fn to_u64(&self) -> u64 { *self as u64 }
  43         fn to_u128(&self) -> u128 { *self as u128 }
  44     })*)
  45 }
  46 doit! { i8 i16 i32 i64 i128 isize u8 u16 u32 u64 u128 usize }
  47
  48 /// A type that represents a specific radix
  49 #[doc(hidden)]
  50 trait GenericRadix {
  51     /// The number of digits.
  52     fn base(&self) -> u8;
  53
  54     /// A radix-specific prefix string.
  55     fn prefix(&self) -> &'static str {
  56         ""
  57     }
  58
  59     /// Converts an integer to corresponding radix digit.
  60     fn digit(&self, x: u8) -> u8;
  61
  62     /// Format an integer using the radix using a formatter.
  63     fn fmt_int<T: Int>(&self, mut x: T, f: &mut fmt::Formatter) -> fmt::Result {
  64         // The radix can be as low as 2, so we need a buffer of at least 128
  65         // characters for a base 2 number.
  66         let zero = T::zero();
  67         let is_nonnegative = x >= zero;
  68         let mut buf = [0; 128];
  69         let mut curr = buf.len();
  70         let base = T::from_u8(self.base());
  71         if is_nonnegative {
  72             // Accumulate each digit of the number from the least significant
  73             // to the most significant figure.
  74             for byte in buf.iter_mut().rev() {
  75                 let n = x % base;              // Get the current place value.
  76                 x = x / base;                  // Deaccumulate the number.
  77                 *byte = self.digit(n.to_u8()); // Store the digit in the buffer.
  78                 curr -= 1;
  79                 if x == zero {
  80                     // No more digits left to accumulate.
  81                     break
  82                 };
  83             }
  84         } else {
  85             // Do the same as above, but accounting for two's complement.
  86             for byte in buf.iter_mut().rev() {
  87                 let n = zero - (x % base);     // Get the current place value.
  88                 x = x / base;                  // Deaccumulate the number.
  89                 *byte = self.digit(n.to_u8()); // Store the digit in the buffer.
  90                 curr -= 1;
  91                 if x == zero {
  92                     // No more digits left to accumulate.
  93                     break
  94                 };
  95             }
  96         }
  97         let buf = unsafe { str::from_utf8_unchecked(&buf[curr..]) };
  98         f.pad_integral(is_nonnegative, self.prefix(), buf)
  99     }
 100 }
 101
 102 /// A binary (base 2) radix
 103 #[derive(Clone, PartialEq)]
 104 struct Binary;
 105
 106 /// An octal (base 8) radix
 107 #[derive(Clone, PartialEq)]
 108 struct Octal;
 109
 110 /// A hexadecimal (base 16) radix, formatted with lower-case characters
 111 #[derive(Clone, PartialEq)]
 112 struct LowerHex;
 113
 114 /// A hexadecimal (base 16) radix, formatted with upper-case characters
 115 #[derive(Clone, PartialEq)]
 116 struct UpperHex;
 117
 118 macro_rules! radix {
 119     ($T:ident, $base:expr, $prefix:expr, $($x:pat => $conv:expr),+) => {
 120         impl GenericRadix for $T {
 121             fn base(&self) -> u8 { $base }
 122             fn prefix(&self) -> &'static str { $prefix }
 123             fn digit(&self, x: u8) -> u8 {
 124                 match x {
 125                     $($x => $conv,)+
 126                     x => panic!("number not in the range 0..{}: {}", self.base() - 1, x),
 127                 }
 128             }
 129         }
 130     }
 131 }
 132
 133 radix! { Binary,    2, "0b", x @  0 ...  1 => b'0' + x }
 134 radix! { Octal,     8, "0o", x @  0 ...  7 => b'0' + x }
 135 radix! { LowerHex, 16, "0x", x @  0 ...  9 => b'0' + x,
 136                              x @ 10 ... 15 => b'a' + (x - 10) }
 137 radix! { UpperHex, 16, "0x", x @  0 ...  9 => b'0' + x,
 138                              x @ 10 ... 15 => b'A' + (x - 10) }
 139
 140 macro_rules! int_base {
 141     ($Trait:ident for $T:ident as $U:ident -> $Radix:ident) => {
 142         #[stable(feature = "rust1", since = "1.0.0")]
 143         impl fmt::$Trait for $T {
 144             fn fmt(&self, f: &mut fmt::Formatter) -> fmt::Result {
 145                 $Radix.fmt_int(*self as $U, f)
 146             }
 147         }
 148     }
 149 }
 150
 151 macro_rules! debug {
 152     ($T:ident) => {
 153         #[stable(feature = "rust1", since = "1.0.0")]
 154         impl fmt::Debug for $T {
 155             #[inline]
 156             fn fmt(&self, f: &mut fmt::Formatter) -> fmt::Result {
 157                 fmt::Display::fmt(self, f)
 158             }
 159         }
 160     }
 161 }
 162
 163 macro_rules! integer {
 164     ($Int:ident, $Uint:ident) => {
 165         int_base! { Binary   for $Int as $Uint  -> Binary }
 166         int_base! { Octal    for $Int as $Uint  -> Octal }
 167         int_base! { LowerHex for $Int as $Uint  -> LowerHex }
 168         int_base! { UpperHex for $Int as $Uint  -> UpperHex }
 169         debug! { $Int }
 170
 171         int_base! { Binary   for $Uint as $Uint -> Binary }
 172         int_base! { Octal    for $Uint as $Uint -> Octal }
 173         int_base! { LowerHex for $Uint as $Uint -> LowerHex }
 174         int_base! { UpperHex for $Uint as $Uint -> UpperHex }
 175         debug! { $Uint }
 176     }
 177 }
 178 integer! { isize, usize }
 179 integer! { i8, u8 }
 180 integer! { i16, u16 }
 181 integer! { i32, u32 }
 182 integer! { i64, u64 }
 183 integer! { i128, u128 }
 184
 185 const DEC_DIGITS_LUT: &'static[u8] =
 186     b"0001020304050607080910111213141516171819\
 187       2021222324252627282930313233343536373839\
 188       4041424344454647484950515253545556575859\
 189       6061626364656667686970717273747576777879\
 190       8081828384858687888990919293949596979899";
 191
 192 macro_rules! impl_Display {
 193     ($($t:ident),*: $conv_fn:ident) => ($(
 194     #[stable(feature = "rust1", since = "1.0.0")]
 195     impl fmt::Display for $t {
 196         #[allow(unused_comparisons)]
 197         fn fmt(&self, f: &mut fmt::Formatter) -> fmt::Result {
 198             let is_nonnegative = *self >= 0;
 199             let mut n = if is_nonnegative {
 200                 self.$conv_fn()
 201             } else {
 202                 // convert the negative num to positive by summing 1 to it's 2 complement
 203                 (!self.$conv_fn()).wrapping_add(1)
 204             };
 205             let mut buf: [u8; 39] = unsafe { mem::uninitialized() };
 206             let mut curr = buf.len() as isize;
 207             let buf_ptr = buf.as_mut_ptr();
 208             let lut_ptr = DEC_DIGITS_LUT.as_ptr();
 209
 210             unsafe {
 211                 // need at least 16 bits for the 4-characters-at-a-time to work.
 212                 if ::mem::size_of::<$t>() >= 2 {
 213                     // eagerly decode 4 characters at a time
 214                     while n >= 10000 {
 215                         let rem = (n % 10000) as isize;
 216                         n /= 10000;
 217
 218                         let d1 = (rem / 100) << 1;
 219                         let d2 = (rem % 100) << 1;
 220                         curr -= 4;
 221                         ptr::copy_nonoverlapping(lut_ptr.offset(d1), buf_ptr.offset(curr), 2);
 222                         ptr::copy_nonoverlapping(lut_ptr.offset(d2), buf_ptr.offset(curr + 2), 2);
 223                     }
 224                 }
 225
 226                 // if we reach here numbers are <= 9999, so at most 4 chars long
 227                 let mut n = n as isize; // possibly reduce 64bit math
 228
 229                 // decode 2 more chars, if > 2 chars
 230                 if n >= 100 {
 231                     let d1 = (n % 100) << 1;
 232                     n /= 100;
 233                     curr -= 2;
 234                     ptr::copy_nonoverlapping(lut_ptr.offset(d1), buf_ptr.offset(curr), 2);
 235                 }
 236
 237                 // decode last 1 or 2 chars
 238                 if n < 10 {
 239                     curr -= 1;
 240                     *buf_ptr.offset(curr) = (n as u8) + b'0';
 241                 } else {
 242                     let d1 = n << 1;
 243                     curr -= 2;
 244                     ptr::copy_nonoverlapping(lut_ptr.offset(d1), buf_ptr.offset(curr), 2);
 245                 }
 246             }
 247
 248             let buf_slice = unsafe {
 249                 str::from_utf8_unchecked(
 250                     slice::from_raw_parts(buf_ptr.offset(curr), buf.len() - curr as usize))
 251             };
 252             f.pad_integral(is_nonnegative, "", buf_slice)
 253         }
 254     })*);
 255 }
 256
 257 impl_Display!(i8, u8, i16, u16, i32, u32: to_u32);
 258 impl_Display!(i64, u64: to_u64);
 259 impl_Display!(i128, u128: to_u128);
 260 #[cfg(target_pointer_width = "16")]
 261 impl_Display!(isize, usize: to_u16);
 262 #[cfg(target_pointer_width = "32")]
 263 impl_Display!(isize, usize: to_u32);
 264 #[cfg(target_pointer_width = "64")]
 265 impl_Display!(isize, usize: to_u64);