_num_put.c File Reference

#include <stl/_num_put.h>
#include <stl/_limits.h>

Include dependency graph for _num_put.c:

Go to the source code of this file.

Macros
#define	_STLP_NUM_PUT_C

Typedefs
typedef long	__max_int_t
typedef unsigned long	__umax_int_t

Functions
template<class _CharT , class _OutputIter >
_STLP_BEGIN_NAMESPACE _STLP_MOVE_TO_PRIV_NAMESPACE _OutputIter _STLP_CALL	__copy_float_and_fill (const _CharT *__first, const _CharT *__last, _OutputIter __oi, ios_base::fmtflags __flags, streamsize __width, _CharT __fill, _CharT __xplus, _CharT __xminus)
template<class _OutputIter >
_OutputIter _STLP_CALL	__put_float (__iostring &__str, _OutputIter __oi, ios_base &__f, wchar_t __fill, wchar_t __decimal_point, wchar_t __sep, size_t __group_pos, const string &__grouping)
template<class _OutputIter >
_OutputIter _STLP_CALL	__put_float (__iostring &__str, _OutputIter __oi, ios_base &__f, char __fill, char __decimal_point, char __sep, size_t __group_pos, const string &__grouping)
template<class _CharT , class _OutputIter , class _Float >
_OutputIter _STLP_CALL	__do_put_float (_OutputIter __s, ios_base &__f, _CharT __fill, _Float __x)
void	__get_money_digits_aux (__iostring &__buf, ios_base &, _STLP_LONGEST_FLOAT_TYPE __x)
void	__get_money_digits_aux (__iowstring &__wbuf, ios_base &__f, _STLP_LONGEST_FLOAT_TYPE __x)
template<class _CharT >
void _STLP_CALL	__get_money_digits (_STLP_BASIC_IOSTRING(_CharT) &__buf, ios_base &__f, _STLP_LONGEST_FLOAT_TYPE __x)
template<class _CharT , class _OutputIter >
_OutputIter _STLP_CALL	__copy_integer_and_fill (const _CharT *__buf, ptrdiff_t __len, _OutputIter __oi, ios_base::fmtflags __flg, streamsize __wid, _CharT __fill, _CharT __xplus, _CharT __xminus)
template<class _OutputIter >
_OutputIter _STLP_CALL	__put_integer (char *__buf, char *__iend, _OutputIter __s, ios_base &__f, ios_base::fmtflags __flags, wchar_t __fill)
template<class _OutputIter >
_OutputIter _STLP_CALL	__put_integer (char *__buf, char *__iend, _OutputIter __s, ios_base &__f, ios_base::fmtflags __flags, char __fill)
_STLP_DECLSPEC const char *_STLP_CALL	__hex_char_table_lo ()
_STLP_DECLSPEC const char *_STLP_CALL	__hex_char_table_hi ()
template<class _Integer >
char *_STLP_CALL	__write_decimal_backward (char *__ptr, _Integer __x, ios_base::fmtflags __flags, const __true_type &)
template<class _Integer >
char *_STLP_CALL	__write_decimal_backward (char *__ptr, _Integer __x, ios_base::fmtflags __flags, const __false_type &)
template<class _Integer >
char *_STLP_CALL	__write_integer_backward (char *__buf, ios_base::fmtflags __flags, _Integer __x)
template<class _CharT , class _OutputIter , class _Integer >
_OutputIter _STLP_CALL	__do_put_integer (_OutputIter __s, ios_base &__f, _CharT __fill, _Integer __x)
template<class _CharT , class _OutputIter >
_OutputIter _STLP_CALL	__do_put_bool (_OutputIter __s, ios_base &__f, _CharT __fill, bool __x)

Macro Definition Documentation

_STLP_NUM_PUT_C

#define _STLP_NUM_PUT_C

Definition at line 19 of file _num_put.c.

Typedef Documentation

__max_int_t

typedef long __max_int_t

Definition at line 267 of file _num_put.c.

__umax_int_t

typedef unsigned long __umax_int_t

Definition at line 268 of file _num_put.c.

Function Documentation

__copy_float_and_fill()

template<class _CharT , class _OutputIter >

_STLP_BEGIN_NAMESPACE _STLP_MOVE_TO_PRIV_NAMESPACE _OutputIter _STLP_CALL __copy_float_and_fill	(	const _CharT *	__first,
		const _CharT *	__last,
		_OutputIter	__oi,
		ios_base::fmtflags	__flags,
		streamsize	__width,
		_CharT	__fill,
		_CharT	__xplus,
		_CharT	__xminus
	)

Definition at line 42 of file _num_put.c.

                                                       {
  if (__width <= __last - __first)
    return _STLP_STD::copy(__first, __last, __oi);
  else {
    streamsize __pad = __width - (__last - __first);
    ios_base::fmtflags __dir = __flags & ios_base::adjustfield;
 
    if (__dir == ios_base::left) {
      __oi = _STLP_STD::copy(__first, __last, __oi);
      return _STLP_PRIV __fill_n(__oi, __pad, __fill);
    }
    else if (__dir == ios_base::internal && __first != __last &&
             (*__first == __xplus || *__first == __xminus)) {
      *__oi++ = *__first++;
      __oi = _STLP_PRIV __fill_n(__oi, __pad, __fill);
      return _STLP_STD::copy(__first, __last, __oi);
    }
    else {
      __oi = _STLP_PRIV __fill_n(__oi, __pad, __fill);
      return _STLP_STD::copy(__first, __last, __oi);
    }
  }
}

Referenced by __put_float().

__copy_integer_and_fill()

template<class _CharT , class _OutputIter >

_OutputIter _STLP_CALL __copy_integer_and_fill	(	const _CharT *	__buf,
		ptrdiff_t	__len,
		_OutputIter	__oi,
		ios_base::fmtflags	__flg,
		streamsize	__wid,
		_CharT	__fill,
		_CharT	__xplus,
		_CharT	__xminus
	)

Definition at line 148 of file _num_put.c.

                                                         {
  if (__len >= __wid)
    return _STLP_STD::copy(__buf, __buf + __len, __oi);
  else {
    //casting numeric_limits<ptrdiff_t>::max to streamsize only works is ptrdiff_t is signed or streamsize representation
    //is larger than ptrdiff_t one.
    _STLP_STATIC_ASSERT((sizeof(streamsize) > sizeof(ptrdiff_t)) ||
                        ((sizeof(streamsize) == sizeof(ptrdiff_t)) && numeric_limits<ptrdiff_t>::is_signed))
    ptrdiff_t __pad = __STATIC_CAST(ptrdiff_t, (min) (__STATIC_CAST(streamsize, (numeric_limits<ptrdiff_t>::max)()),
                                                      __STATIC_CAST(streamsize, __wid - __len)));
    ios_base::fmtflags __dir = __flg & ios_base::adjustfield;
 
    if (__dir == ios_base::left) {
      __oi = _STLP_STD::copy(__buf, __buf + __len, __oi);
      return _STLP_PRIV __fill_n(__oi, __pad, __fill);
    }
    else if (__dir == ios_base::internal && __len != 0 &&
             (__buf[0] == __xplus || __buf[0] == __xminus)) {
      *__oi++ = __buf[0];
      __oi = __fill_n(__oi, __pad, __fill);
      return _STLP_STD::copy(__buf + 1, __buf + __len, __oi);
    }
    else if (__dir == ios_base::internal && __len >= 2 &&
             (__flg & ios_base::showbase) &&
             (__flg & ios_base::basefield) == ios_base::hex) {
      *__oi++ = __buf[0];
      *__oi++ = __buf[1];
      __oi = __fill_n(__oi, __pad, __fill);
      return _STLP_STD::copy(__buf + 2, __buf + __len, __oi);
    }
    else {
      __oi = __fill_n(__oi, __pad, __fill);
      return _STLP_STD::copy(__buf, __buf + __len, __oi);
    }
  }
}

Referenced by __put_integer().

__do_put_bool()

template<class _CharT , class _OutputIter >

_OutputIter _STLP_CALL __do_put_bool	(	_OutputIter	__s,
		ios_base &	__f,
		_CharT	__fill,
		bool	__x
	)

Definition at line 386 of file _num_put.c.

                                                                       {
  const numpunct<_CharT>& __np = use_facet<numpunct<_CharT> >(__f.getloc());
 
  basic_string<_CharT, char_traits<_CharT>, allocator<_CharT> > __str = __x ? __np.truename() : __np.falsename();
 
  streamsize __wid = __f.width(0);
  if (__str.size() >= __STATIC_CAST(size_t, __wid))
    return _STLP_STD::copy(__str.begin(), __str.end(), __s);
  else {
    streamsize __pad = __wid - __str.size();
    ios_base::fmtflags __dir = __f.flags() & ios_base::adjustfield;
 
    if (__dir == ios_base::left) {
      __s = _STLP_STD::copy(__str.begin(), __str.end(), __s);
      return __fill_n(__s, __pad, __fill);
    }
    else /* covers right and internal padding */ {
      __s = __fill_n(__s, __pad, __fill);
      return _STLP_STD::copy(__str.begin(), __str.end(), __s);
    }
  }
}

Referenced by num_put< _CharT, _OutputIter >::do_put().

__do_put_float()

template<class _CharT , class _OutputIter , class _Float >

_OutputIter _STLP_CALL __do_put_float	(	_OutputIter	__s,
		ios_base &	__f,
		_CharT	__fill,
		_Float	__x
	)

Definition at line 115 of file _num_put.c.

                                           {
  __iostring __buf;
 
  size_t __group_pos = __write_float(__buf, __f.flags(), (int)__f.precision(), __x);
 
  const numpunct<_CharT>& __np = use_facet<numpunct<_CharT> >(__f.getloc());
  return __put_float(__buf, __s, __f, __fill,
                     __np.decimal_point(), __np.thousands_sep(),
                     __group_pos, __np.grouping());
}

Referenced by num_put< _CharT, _OutputIter >::do_put().

__do_put_integer()

template<class _CharT , class _OutputIter , class _Integer >

_OutputIter _STLP_CALL __do_put_integer	(	_OutputIter	__s,
		ios_base &	__f,
		_CharT	__fill,
		_Integer	__x
	)

Definition at line 372 of file _num_put.c.

                                                                              {
  // buffer size = number of bytes * number of digit necessary in the smallest Standard base (base 8, 3 digits/byte)
  //               plus the longest base representation '0x'
  // Do not use __buf_size to define __buf static buffer, some compilers (HP aCC) do not accept const variable as
  // the specification of a static buffer size.
  char __buf[sizeof(_Integer) * 3 + 2];
  const ptrdiff_t __buf_size = sizeof(__buf) / sizeof(char);
  ios_base::fmtflags __flags = __f.flags();
  char* __ibeg = __write_integer_backward((char*)__buf + __buf_size, __flags, __x);
  return __put_integer(__ibeg, (char*)__buf + __buf_size, __s, __f, __flags, __fill);
}

Referenced by num_put< _CharT, _OutputIter >::do_put().

__get_money_digits()

template<class _CharT >

void _STLP_CALL __get_money_digits	(	_STLP_BASIC_IOSTRING(_CharT) &	__buf,
		ios_base &	__f,
		_STLP_LONGEST_FLOAT_TYPE	__x
	)

Definition at line 141 of file _num_put.c.

{ __get_money_digits_aux(__buf, __f, __x); }

Referenced by money_put< _CharT, _OutputIter >::do_put().

__get_money_digits_aux() [1/2]

void __get_money_digits_aux ( __iostring &  __buf, ios_base &  , _STLP_LONGEST_FLOAT_TYPE  __x  )

inline

Definition at line 127 of file _num_put.c.

{ __get_floor_digits(__buf, __x); }

Referenced by __get_money_digits().

__get_money_digits_aux() [2/2]

void __get_money_digits_aux ( __iowstring &  __wbuf, ios_base &  __f, _STLP_LONGEST_FLOAT_TYPE  __x  )

inline

Definition at line 131 of file _num_put.c.

                                                                                                      {
  __iostring __buf;
  __get_floor_digits(__buf, __x);
 
  const ctype<wchar_t>& __ct = use_facet<ctype<wchar_t> >(__f.getloc());
  __convert_float_buffer(__buf, __wbuf, __ct, wchar_t(0), false);
}

__hex_char_table_hi()

_STLP_DECLSPEC const char *_STLP_CALL __hex_char_table_hi

(

)

Definition at line 121 of file num_put.cpp.

{ return "0123456789ABCDEFX"; }

Referenced by __write_integer_backward(), and num_put< _CharT, _OutputIter >::do_put().

__hex_char_table_lo()

_STLP_DECLSPEC const char *_STLP_CALL __hex_char_table_lo

(

)

Definition at line 118 of file num_put.cpp.

{ return "0123456789abcdefx"; }

Referenced by __write_integer_backward(), and num_put< _CharT, _OutputIter >::do_put().

__put_float() [1/2]

template<class _OutputIter >

_OutputIter _STLP_CALL __put_float	(	__iostring &	__str,
		_OutputIter	__oi,
		ios_base &	__f,
		char	__fill,
		char	__decimal_point,
		char	__sep,
		size_t	__group_pos,
		const string &	__grouping
	)

Definition at line 96 of file _num_put.c.

                                                          {
  if ((__group_pos < __str.size()) && (__str[__group_pos] == '.')) {
    __str[__group_pos] = __decimal_point;
  }
 
  if (!__grouping.empty()) {
    __insert_grouping(__str, __group_pos,
                      __grouping, __sep, '+', '-', 0);
  }
 
  return __copy_float_and_fill(__str.data(), __str.data() + __str.size(), __oi,
                               __f.flags(), __f.width(0), __fill, '+', '-');
}

__put_float() [2/2]

template<class _OutputIter >

_OutputIter _STLP_CALL __put_float	(	__iostring &	__str,
		_OutputIter	__oi,
		ios_base &	__f,
		wchar_t	__fill,
		wchar_t	__decimal_point,
		wchar_t	__sep,
		size_t	__group_pos,
		const string &	__grouping
	)

Definition at line 74 of file _num_put.c.

                                                          {
  const ctype<wchar_t>& __ct = use_facet<ctype<wchar_t> >(__f.getloc());
 
  __iowstring __wbuf;
  __convert_float_buffer(__str, __wbuf, __ct, __decimal_point);
 
  if (!__grouping.empty()) {
    __insert_grouping(__wbuf, __group_pos, __grouping,
                      __sep, __ct.widen('+'), __ct.widen('-'), 0);
  }
 
  return __copy_float_and_fill(__wbuf.data(), __wbuf.data() + __wbuf.size(), __oi,
                               __f.flags(), __f.width(0), __fill, __ct.widen('+'), __ct.widen('-'));
}

Referenced by __do_put_float().

__put_integer() [1/2]

template<class _OutputIter >

_OutputIter _STLP_CALL __put_integer	(	char *	__buf,
		char *	__iend,
		_OutputIter	__s,
		ios_base &	__f,
		ios_base::fmtflags	__flags,
		char	__fill
	)

Definition at line 232 of file _num_put.c.

                                                                    {
  char __grpbuf[64];
  ptrdiff_t __len = __iend - __buf;
 
  const numpunct<char>& __np = use_facet<numpunct<char> >(__f.getloc());
  const string& __grouping = __np.grouping();
 
  if (!__grouping.empty()) {
    int __basechars;
    if (__flags & ios_base::showbase)
      switch (__flags & ios_base::basefield) {
        case ios_base::hex: __basechars = 2; break;
        case ios_base::oct: __basechars = 1; break;
        default: __basechars = 0;
      }
    else
      __basechars = 0;
 
     // make sure there is room at the end of the buffer
     // we pass to __insert_grouping
    _STLP_STD::copy(__buf, __iend, (char *) __grpbuf);
    __buf = __grpbuf;
    __iend = __grpbuf + __len;
    __len = __insert_grouping(__buf, __iend, __grouping, __np.thousands_sep(),
                              '+', '-', __basechars);
  }
 
  return __copy_integer_and_fill(__buf, __len, __s, __flags, __f.width(0), __fill, '+', '-');
}

__put_integer() [2/2]

template<class _OutputIter >

_OutputIter _STLP_CALL __put_integer	(	char *	__buf,
		char *	__iend,
		_OutputIter	__s,
		ios_base &	__f,
		ios_base::fmtflags	__flags,
		wchar_t	__fill
	)

Definition at line 192 of file _num_put.c.

                                                        {
  locale __loc = __f.getloc();
  const ctype<wchar_t>& __ct = use_facet<ctype<wchar_t> >(__loc);
 
  wchar_t __xplus  = __ct.widen('+');
  wchar_t __xminus = __ct.widen('-');
 
  wchar_t __wbuf[64];
  __ct.widen(__buf, __iend, __wbuf);
  ptrdiff_t __len = __iend - __buf;
  wchar_t* __eend = __wbuf + __len;
 
  const numpunct<wchar_t>& __np = use_facet<numpunct<wchar_t> >(__loc);
  const string& __grouping = __np.grouping();
 
  if (!__grouping.empty()) {
    int __basechars;
    if (__flags & ios_base::showbase)
      switch (__flags & ios_base::basefield) {
        case ios_base::hex: __basechars = 2; break;
        case ios_base::oct: __basechars = 1; break;
        default: __basechars = 0;
      }
    else
      __basechars = 0;
 
    __len = __insert_grouping(__wbuf, __eend, __grouping, __np.thousands_sep(),
                              __xplus, __xminus, __basechars);
  }
 
  return __copy_integer_and_fill((wchar_t*)__wbuf, __len, __s,
                                 __flags, __f.width(0), __fill, __xplus, __xminus);
}

Referenced by __do_put_integer().

__write_decimal_backward() [1/2]

template<class _Integer >

char *_STLP_CALL __write_decimal_backward ( char *  __ptr, _Integer  __x, ios_base::fmtflags  __flags, const __false_type &    )

inline

Definition at line 293 of file _num_put.c.

                                                                                                     {
  for (; __x != 0; __x /= 10)
    *--__ptr = (char)((int)(__x % 10) + '0');
  // put sign if requested
  if (__flags & ios_base::showpos)
    *--__ptr = '+';
  return __ptr;
}

__write_decimal_backward() [2/2]

template<class _Integer >

char *_STLP_CALL __write_decimal_backward ( char *  __ptr, _Integer  __x, ios_base::fmtflags  __flags, const __true_type &    )

inline

Definition at line 276 of file _num_put.c.

                                                                                                    {
  const bool __negative = __x < 0 ;
  __max_int_t __temp = __x;
  __umax_int_t __utemp = __negative?-__temp:__temp;
 
  for (; __utemp != 0; __utemp /= 10)
    *--__ptr = (char)((int)(__utemp % 10) + '0');
  // put sign if needed or requested
  if (__negative)
    *--__ptr = '-';
  else if (__flags & ios_base::showpos)
    *--__ptr = '+';
  return __ptr;
}

Referenced by __write_integer_backward().

__write_integer_backward()

template<class _Integer >

char *_STLP_CALL __write_integer_backward	(	char *	__buf,
		ios_base::fmtflags	__flags,
		_Integer	__x
	)

Definition at line 304 of file _num_put.c.

                                                                              {
  char* __ptr = __buf;
 
  if (__x == 0) {
    *--__ptr = '0';
    if ((__flags & ios_base::showpos) && ((__flags & (ios_base::oct | ios_base::hex)) == 0))
      *--__ptr = '+';
    // oct or hex base shall not be added to the 0 value (see '#' flag in C formating strings)
  }
  else {
    switch (__flags & ios_base::basefield) {
      case ios_base::oct:
        {
          __umax_int_t __temp = __x;
          // if the size of integer is less than 8, clear upper part
          if ( sizeof(__x) < 8  && sizeof(__umax_int_t) >= 8 )
            __temp &= 0xFFFFFFFF;
 
          for (; __temp != 0; __temp >>=3)
            *--__ptr = (char)((((unsigned)__temp)& 0x7) + '0');
 
          // put leading '0' if showbase is set
          if (__flags & ios_base::showbase)
            *--__ptr = '0';
        }
        break;
      case ios_base::hex:
        {
          const char* __table_ptr = (__flags & ios_base::uppercase) ?
            __hex_char_table_hi() : __hex_char_table_lo();
          __umax_int_t __temp = __x;
          // if the size of integer is less than 8, clear upper part
          if ( sizeof(__x) < 8  && sizeof(__umax_int_t) >= 8 )
            __temp &= 0xFFFFFFFF;
 
          for (; __temp != 0; __temp >>=4)
            *--__ptr = __table_ptr[((unsigned)__temp & 0xF)];
 
          if (__flags & ios_base::showbase) {
            *--__ptr = __table_ptr[16];
            *--__ptr = '0';
          }
        }
        break;
      //case ios_base::dec:
      default:
        {
#if defined(__HP_aCC) && (__HP_aCC == 1)
          bool _IsSigned = !((_Integer)-1 > 0);
          if (_IsSigned)
            __ptr = __write_decimal_backward(__ptr, __x, __flags, __true_type() );
          else
            __ptr = __write_decimal_backward(__ptr, __x, __flags, __false_type() );
#else
          typedef typename __bool2type<numeric_limits<_Integer>::is_signed>::_Ret _IsSigned;
          __ptr = __write_decimal_backward(__ptr, __x, __flags, _IsSigned());
#endif
        }
        break;
    }
  }
 
  // return pointer to beginning of the string
  return __ptr;
}

Referenced by __do_put_integer(), and __write_integer().