0,0 → 1,755 |
// Copyright (C) 1997, 1998, 1999, 2000, 2001 Free Software Foundation, Inc. |
// |
// This file is part of the GNU ISO C++ Library. This library is free |
// software; you can redistribute it and/or modify it under the |
// terms of the GNU General Public License as published by the |
// Free Software Foundation; either version 2, or (at your option) |
// any later version. |
|
// This library is distributed in the hope that it will be useful, |
// but WITHOUT ANY WARRANTY; without even the implied warranty of |
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
// GNU General Public License for more details. |
|
// You should have received a copy of the GNU General Public License along |
// with this library; see the file COPYING. If not, write to the Free |
// Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, |
// USA. |
|
// As a special exception, you may use this file as part of a free software |
// library without restriction. Specifically, if other files instantiate |
// templates or use macros or inline functions from this file, or you compile |
// this file and link it with other files to produce an executable, this |
// file does not by itself cause the resulting executable to be covered by |
// the GNU General Public License. This exception does not however |
// invalidate any other reasons why the executable file might be covered by |
// the GNU General Public License. |
|
// |
// ISO C++ 14882: 27.6.2 Output streams |
// |
|
#include <bits/std_locale.h> |
|
namespace std |
{ |
template<typename _CharT, typename _Traits> |
basic_ostream<_CharT, _Traits>::sentry:: |
sentry(basic_ostream<_CharT,_Traits>& __os) |
: _M_ok(__os.good()), _M_os(__os) |
{ |
// XXX MT |
if (_M_ok && __os.tie()) |
__os.tie()->flush(); |
} |
|
template<typename _CharT, typename _Traits> |
basic_ostream<_CharT, _Traits>& |
basic_ostream<_CharT, _Traits>:: |
operator<<(__ostream_type& (*__pf)(__ostream_type&)) |
{ |
sentry __cerb(*this); |
if (__cerb) |
{ |
try |
{ __pf(*this); } |
catch(exception& __fail) |
{ |
// 27.6.2.5.1 Common requirements. |
// Turn this on without causing an ios::failure to be thrown. |
this->setstate(ios_base::badbit); |
if ((this->exceptions() & ios_base::badbit) != 0) |
__throw_exception_again; |
} |
} |
return *this; |
} |
|
template<typename _CharT, typename _Traits> |
basic_ostream<_CharT, _Traits>& |
basic_ostream<_CharT, _Traits>:: |
operator<<(__ios_type& (*__pf)(__ios_type&)) |
{ |
sentry __cerb(*this); |
if (__cerb) |
{ |
try |
{ __pf(*this); } |
catch(exception& __fail) |
{ |
// 27.6.2.5.1 Common requirements. |
// Turn this on without causing an ios::failure to be thrown. |
this->setstate(ios_base::badbit); |
if ((this->exceptions() & ios_base::badbit) != 0) |
__throw_exception_again; |
} |
} |
return *this; |
} |
|
template<typename _CharT, typename _Traits> |
basic_ostream<_CharT, _Traits>& |
basic_ostream<_CharT, _Traits>:: |
operator<<(ios_base& (*__pf)(ios_base&)) |
{ |
sentry __cerb(*this); |
if (__cerb) |
{ |
try |
{ __pf(*this); } |
catch(exception& __fail) |
{ |
// 27.6.2.5.1 Common requirements. |
// Turn this on without causing an ios::failure to be thrown. |
this->setstate(ios_base::badbit); |
if ((this->exceptions() & ios_base::badbit) != 0) |
__throw_exception_again; |
} |
} |
return *this; |
} |
|
template<typename _CharT, typename _Traits> |
basic_ostream<_CharT, _Traits>& |
basic_ostream<_CharT, _Traits>::operator<<(bool __n) |
{ |
sentry __cerb(*this); |
if (__cerb) |
{ |
try |
{ |
if (_M_check_facet(_M_fnumput)) |
if (_M_fnumput->put(*this, *this, this->fill(), __n).failed()) |
this->setstate(ios_base::badbit); |
} |
catch(exception& __fail) |
{ |
// 27.6.1.2.1 Common requirements. |
// Turn this on without causing an ios::failure to be thrown. |
this->setstate(ios_base::badbit); |
if ((this->exceptions() & ios_base::badbit) != 0) |
__throw_exception_again; |
} |
} |
return *this; |
} |
|
template<typename _CharT, typename _Traits> |
basic_ostream<_CharT, _Traits>& |
basic_ostream<_CharT, _Traits>::operator<<(long __n) |
{ |
sentry __cerb(*this); |
if (__cerb) |
{ |
try |
{ |
char_type __c = this->fill(); |
ios_base::fmtflags __fmt = this->flags() & ios_base::basefield; |
if (_M_check_facet(_M_fnumput)) |
{ |
bool __b = false; |
if (__fmt & ios_base::oct || __fmt & ios_base::hex) |
{ |
unsigned long __l = static_cast<unsigned long>(__n); |
__b = _M_fnumput->put(*this, *this, __c, __l).failed(); |
} |
else |
__b = _M_fnumput->put(*this, *this, __c, __n).failed(); |
if (__b) |
this->setstate(ios_base::badbit); |
} |
} |
catch(exception& __fail) |
{ |
// 27.6.1.2.1 Common requirements. |
// Turn this on without causing an ios::failure to be thrown. |
this->setstate(ios_base::badbit); |
if ((this->exceptions() & ios_base::badbit) != 0) |
__throw_exception_again; |
} |
} |
return *this; |
} |
|
template<typename _CharT, typename _Traits> |
basic_ostream<_CharT, _Traits>& |
basic_ostream<_CharT, _Traits>::operator<<(unsigned long __n) |
{ |
sentry __cerb(*this); |
if (__cerb) |
{ |
try |
{ |
if (_M_check_facet(_M_fnumput)) |
if (_M_fnumput->put(*this, *this, this->fill(), __n).failed()) |
this->setstate(ios_base::badbit); |
} |
catch(exception& __fail) |
{ |
// 27.6.1.2.1 Common requirements. |
// Turn this on without causing an ios::failure to be thrown. |
this->setstate(ios_base::badbit); |
if ((this->exceptions() & ios_base::badbit) != 0) |
__throw_exception_again; |
} |
} |
return *this; |
} |
|
#ifdef _GLIBCPP_USE_LONG_LONG |
template<typename _CharT, typename _Traits> |
basic_ostream<_CharT, _Traits>& |
basic_ostream<_CharT, _Traits>::operator<<(long long __n) |
{ |
sentry __cerb(*this); |
if (__cerb) |
{ |
try |
{ |
char_type __c = this->fill(); |
ios_base::fmtflags __fmt = this->flags() & ios_base::basefield; |
if (_M_check_facet(_M_fnumput)) |
{ |
bool __b = false; |
if (__fmt & ios_base::oct || __fmt & ios_base::hex) |
{ |
unsigned long long __l; |
__l = static_cast<unsigned long long>(__n); |
__b = _M_fnumput->put(*this, *this, __c, __l).failed(); |
} |
else |
__b = _M_fnumput->put(*this, *this, __c, __n).failed(); |
if (__b) |
this->setstate(ios_base::badbit); |
} |
} |
catch(exception& __fail) |
{ |
// 27.6.1.2.1 Common requirements. |
// Turn this on without causing an ios::failure to be thrown. |
this->setstate(ios_base::badbit); |
if ((this->exceptions() & ios_base::badbit) != 0) |
__throw_exception_again; |
} |
} |
return *this; |
} |
|
template<typename _CharT, typename _Traits> |
basic_ostream<_CharT, _Traits>& |
basic_ostream<_CharT, _Traits>::operator<<(unsigned long long __n) |
{ |
sentry __cerb(*this); |
if (__cerb) |
{ |
try |
{ |
if (_M_check_facet(_M_fnumput)) |
if (_M_fnumput->put(*this, *this, this->fill(), __n).failed()) |
this->setstate(ios_base::badbit); |
} |
catch(exception& __fail) |
{ |
// 27.6.1.2.1 Common requirements. |
// Turn this on without causing an ios::failure to be thrown. |
this->setstate(ios_base::badbit); |
if ((this->exceptions() & ios_base::badbit) != 0) |
__throw_exception_again; |
} |
} |
return *this; |
} |
#endif |
|
template<typename _CharT, typename _Traits> |
basic_ostream<_CharT, _Traits>& |
basic_ostream<_CharT, _Traits>::operator<<(double __n) |
{ |
sentry __cerb(*this); |
if (__cerb) |
{ |
try |
{ |
if (_M_check_facet(_M_fnumput)) |
if (_M_fnumput->put(*this, *this, this->fill(), __n).failed()) |
this->setstate(ios_base::badbit); |
} |
catch(exception& __fail) |
{ |
// 27.6.1.2.1 Common requirements. |
// Turn this on without causing an ios::failure to be thrown. |
this->setstate(ios_base::badbit); |
if ((this->exceptions() & ios_base::badbit) != 0) |
__throw_exception_again; |
} |
} |
return *this; |
} |
|
template<typename _CharT, typename _Traits> |
basic_ostream<_CharT, _Traits>& |
basic_ostream<_CharT, _Traits>::operator<<(long double __n) |
{ |
sentry __cerb(*this); |
if (__cerb) |
{ |
try |
{ |
if (_M_check_facet(_M_fnumput)) |
if (_M_fnumput->put(*this, *this, this->fill(), __n).failed()) |
this->setstate(ios_base::badbit); |
} |
catch(exception& __fail) |
{ |
// 27.6.1.2.1 Common requirements. |
// Turn this on without causing an ios::failure to be thrown. |
this->setstate(ios_base::badbit); |
if ((this->exceptions() & ios_base::badbit) != 0) |
__throw_exception_again; |
} |
} |
return *this; |
} |
|
template<typename _CharT, typename _Traits> |
basic_ostream<_CharT, _Traits>& |
basic_ostream<_CharT, _Traits>::operator<<(const void* __n) |
{ |
sentry __cerb(*this); |
if (__cerb) |
{ |
try |
{ |
if (_M_check_facet(_M_fnumput)) |
if (_M_fnumput->put(*this, *this, this->fill(), __n).failed()) |
this->setstate(ios_base::badbit); |
} |
catch(exception& __fail) |
{ |
// 27.6.1.2.1 Common requirements. |
// Turn this on without causing an ios::failure to be thrown. |
this->setstate(ios_base::badbit); |
if ((this->exceptions() & ios_base::badbit) != 0) |
__throw_exception_again; |
} |
} |
return *this; |
} |
|
template<typename _CharT, typename _Traits> |
basic_ostream<_CharT, _Traits>& |
basic_ostream<_CharT, _Traits>::operator<<(__streambuf_type* __sbin) |
{ |
streamsize __xtrct = 0; |
__streambuf_type* __sbout = this->rdbuf(); |
sentry __cerb(*this); |
if (__sbin && __cerb) |
__xtrct = __copy_streambufs(*this, __sbin, __sbout); |
if (!__sbin || !__xtrct) |
this->setstate(ios_base::failbit); |
return *this; |
} |
|
template<typename _CharT, typename _Traits> |
basic_ostream<_CharT, _Traits>& |
basic_ostream<_CharT, _Traits>::put(char_type __c) |
{ |
sentry __cerb(*this); |
if (__cerb) |
{ |
int_type __put = rdbuf()->sputc(__c); |
if (__put != traits_type::to_int_type(__c)) |
this->setstate(ios_base::badbit); |
} |
return *this; |
} |
|
template<typename _CharT, typename _Traits> |
basic_ostream<_CharT, _Traits>& |
basic_ostream<_CharT, _Traits>::write(const _CharT* __s, streamsize __n) |
{ |
sentry __cerb(*this); |
if (__cerb) |
{ |
streamsize __put = this->rdbuf()->sputn(__s, __n); |
if ( __put != __n) |
this->setstate(ios_base::badbit); |
} |
return *this; |
} |
|
template<typename _CharT, typename _Traits> |
basic_ostream<_CharT, _Traits>& |
basic_ostream<_CharT, _Traits>::flush() |
{ |
sentry __cerb(*this); |
if (__cerb) |
{ |
if (this->rdbuf() && this->rdbuf()->pubsync() == -1) |
this->setstate(ios_base::badbit); |
} |
return *this; |
} |
|
template<typename _CharT, typename _Traits> |
typename basic_ostream<_CharT, _Traits>::pos_type |
basic_ostream<_CharT, _Traits>::tellp() |
{ |
pos_type __ret = pos_type(-1); |
bool __testok = this->fail() != true; |
|
if (__testok) |
__ret = this->rdbuf()->pubseekoff(0, ios_base::cur, ios_base::out); |
return __ret; |
} |
|
|
template<typename _CharT, typename _Traits> |
basic_ostream<_CharT, _Traits>& |
basic_ostream<_CharT, _Traits>::seekp(pos_type __pos) |
{ |
bool __testok = this->fail() != true; |
|
if (__testok) |
{ |
#ifdef _GLIBCPP_RESOLVE_LIB_DEFECTS |
// 136. seekp, seekg setting wrong streams? |
pos_type __err = this->rdbuf()->pubseekpos(__pos, ios_base::out); |
|
// 129. Need error indication from seekp() and seekg() |
if (__err == pos_type(off_type(-1))) |
this->setstate(failbit); |
#endif |
} |
return *this; |
} |
|
template<typename _CharT, typename _Traits> |
basic_ostream<_CharT, _Traits>& |
basic_ostream<_CharT, _Traits>:: |
seekp(off_type __off, ios_base::seekdir __d) |
{ |
bool __testok = this->fail() != true; |
|
if (__testok) |
{ |
#ifdef _GLIBCPP_RESOLVE_LIB_DEFECTS |
// 136. seekp, seekg setting wrong streams? |
pos_type __err = this->rdbuf()->pubseekoff(__off, __d, |
ios_base::out); |
|
// 129. Need error indication from seekp() and seekg() |
if (__err == pos_type(off_type(-1))) |
this->setstate(failbit); |
} |
#endif |
return *this; |
} |
|
// 27.6.2.5.4 Character inserters |
|
// Construct correctly padded string, as per 22.2.2.2.2 |
// Similar in theory to __pad_numeric, from num_put, but it doesn't |
// use _S_fill: perhaps it should. |
// Assumes |
// __newlen > __oldlen |
// __news is allocated for __newlen size |
template<typename _CharT, typename _Traits> |
void |
__pad_char(basic_ios<_CharT, _Traits>& __ios, |
_CharT* __news, const _CharT* __olds, |
const streamsize __newlen, const streamsize __oldlen) |
{ |
typedef _CharT char_type; |
typedef _Traits traits_type; |
typedef typename traits_type::int_type int_type; |
|
int_type __plen = static_cast<size_t>(__newlen - __oldlen); |
char_type* __pads = static_cast<char_type*>(__builtin_alloca(sizeof(char_type) * __plen)); |
traits_type::assign(__pads, __plen, __ios.fill()); |
|
char_type* __beg; |
char_type* __end; |
size_t __mod = 0; |
size_t __beglen; //either __plen or __oldlen |
ios_base::fmtflags __fmt = __ios.flags() & ios_base::adjustfield; |
|
if (__fmt == ios_base::left) |
{ |
// Padding last. |
__beg = const_cast<char_type*>(__olds); |
__beglen = __oldlen; |
__end = __pads; |
} |
else if (__fmt == ios_base::internal) |
{ |
// Pad after the sign, if there is one. |
// Pad after 0[xX], if there is one. |
// Who came up with these rules, anyway? Jeeze. |
typedef _Format_cache<_CharT> __cache_type; |
__cache_type const* __fmt = __cache_type::_S_get(__ios); |
const char_type* __minus = traits_type::find(__olds, __oldlen, |
__fmt->_S_minus); |
const char_type* __plus = traits_type::find(__olds, __oldlen, |
__fmt->_S_plus); |
bool __testsign = __minus || __plus; |
bool __testhex = __olds[0] == '0' |
&& (__olds[1] == 'x' || __olds[1] == 'X'); |
|
if (__testhex) |
{ |
__news[0] = __olds[0]; |
__news[1] = __olds[1]; |
__mod += 2; |
__beg = const_cast<char_type*>(__olds + __mod); |
__beglen = __oldlen - __mod; |
__end = __pads; |
} |
else if (__testsign) |
{ |
__mod += __plen; |
const char_type* __sign = __minus ? __minus + 1: __plus + 1; |
__beg = const_cast<char_type*>(__olds); |
__beglen = __sign - __olds; |
__end = const_cast<char_type*>(__sign + __plen); |
traits_type::copy(__news + __beglen, __pads, __plen); |
} |
else |
{ |
// Padding first. |
__beg = __pads; |
__beglen = __plen; |
__end = const_cast<char_type*>(__olds); |
} |
} |
else |
{ |
// Padding first. |
__beg = __pads; |
__beglen = __plen; |
__end = const_cast<char_type*>(__olds); |
} |
|
traits_type::copy(__news, __beg, __beglen); |
traits_type::copy(__news + __beglen, __end, __newlen - __beglen - __mod); |
} |
|
template<typename _CharT, typename _Traits> |
basic_ostream<_CharT, _Traits>& |
operator<<(basic_ostream<_CharT, _Traits>& __out, _CharT __c) |
{ |
typedef basic_ostream<_CharT, _Traits> __ostream_type; |
typename __ostream_type::sentry __cerb(__out); |
if (__cerb) |
{ |
try |
{ |
streamsize __w = __out.width(); |
_CharT* __pads = static_cast<_CharT*>(__builtin_alloca(sizeof(_CharT) * __w)); |
__pads[0] = __c; |
streamsize __len = 1; |
if (__w > __len) |
{ |
__pad_char(__out, __pads, &__c, __w, __len); |
__len = __w; |
} |
__out.write(__pads, __len); |
__out.width(0); |
} |
catch(exception& __fail) |
{ |
// 27.6.1.2.1 Common requirements. |
// Turn this on without causing an ios::failure to be thrown. |
__out.setstate(ios_base::badbit); |
if ((__out.exceptions() & ios_base::badbit) != 0) |
__throw_exception_again; |
} |
} |
return __out; |
} |
|
// Specialization |
template <class _Traits> |
basic_ostream<char, _Traits>& |
operator<<(basic_ostream<char, _Traits>& __out, char __c) |
{ |
typedef basic_ostream<char, _Traits> __ostream_type; |
typename __ostream_type::sentry __cerb(__out); |
if (__cerb) |
{ |
try |
{ |
streamsize __w = __out.width(); |
char* __pads = static_cast<char*>(__builtin_alloca(__w + 1)); |
__pads[0] = __c; |
streamsize __len = 1; |
if (__w > __len) |
{ |
__pad_char(__out, __pads, &__c, __w, __len); |
__len = __w; |
} |
__out.write(__pads, __len); |
__out.width(0); |
} |
catch(exception& __fail) |
{ |
// 27.6.1.2.1 Common requirements. |
// Turn this on without causing an ios::failure to be thrown. |
__out.setstate(ios_base::badbit); |
if ((__out.exceptions() & ios_base::badbit) != 0) |
__throw_exception_again; |
} |
} |
return __out; |
} |
|
template<typename _CharT, typename _Traits> |
basic_ostream<_CharT, _Traits>& |
operator<<(basic_ostream<_CharT, _Traits>& __out, const _CharT* __s) |
{ |
typedef basic_ostream<_CharT, _Traits> __ostream_type; |
typename __ostream_type::sentry __cerb(__out); |
if (__cerb) |
{ |
try |
{ |
streamsize __w = __out.width(); |
_CharT* __pads = static_cast<_CharT*>(__builtin_alloca(sizeof(_CharT) * __w)); |
streamsize __len = static_cast<streamsize>(_Traits::length(__s)); |
if (__w > __len) |
{ |
__pad_char(__out, __pads, __s, __w, __len); |
__s = __pads; |
__len = __w; |
} |
__out.write(__s, __len); |
__out.width(0); |
} |
catch(exception& __fail) |
{ |
// 27.6.1.2.1 Common requirements. |
// Turn this on without causing an ios::failure to be thrown. |
__out.setstate(ios_base::badbit); |
if ((__out.exceptions() & ios_base::badbit) != 0) |
__throw_exception_again; |
} |
} |
return __out; |
} |
|
template<typename _CharT, typename _Traits> |
basic_ostream<_CharT, _Traits>& |
operator<<(basic_ostream<_CharT, _Traits>& __out, const char* __s) |
{ |
typedef basic_ostream<_CharT, _Traits> __ostream_type; |
#ifdef _GLIBCPP_RESOLVE_LIB_DEFECTS |
// 167. Improper use of traits_type::length() |
typedef char_traits<char> __ctraits_type; |
#endif |
typename __ostream_type::sentry __cerb(__out); |
if (__cerb) |
{ |
size_t __clen = __ctraits_type::length(__s); |
_CharT* __ws = static_cast<_CharT*>(__builtin_alloca(sizeof(_CharT) * (__clen + 1))); |
for (size_t __i = 0; __i <= __clen; ++__i) |
__ws[__i] = __out.widen(__s[__i]); |
_CharT* __str = __ws; |
|
try |
{ |
streamsize __len = static_cast<streamsize>(__clen); |
streamsize __w = __out.width(); |
_CharT* __pads = static_cast<_CharT*>(__builtin_alloca(sizeof(_CharT) * __w)); |
|
if (__w > __len) |
{ |
__pad_char(__out, __pads, __ws, __w, __len); |
__str = __pads; |
__len = __w; |
} |
__out.write(__str, __len); |
__out.width(0); |
} |
catch(exception& __fail) |
{ |
// 27.6.1.2.1 Common requirements. |
// Turn this on without causing an ios::failure to be thrown. |
__out.setstate(ios_base::badbit); |
if ((__out.exceptions() & ios_base::badbit) != 0) |
__throw_exception_again; |
} |
} |
return __out; |
} |
|
// Partial specializationss |
template<class _Traits> |
basic_ostream<char, _Traits>& |
operator<<(basic_ostream<char, _Traits>& __out, const char* __s) |
{ |
typedef basic_ostream<char, _Traits> __ostream_type; |
typename __ostream_type::sentry __cerb(__out); |
if (__cerb) |
{ |
try |
{ |
streamsize __w = __out.width(); |
char* __pads = static_cast<char*>(__builtin_alloca(__w)); |
streamsize __len = static_cast<streamsize>(_Traits::length(__s)); |
if (__w > __len) |
{ |
__pad_char(__out, __pads, __s, __w, __len); |
__s = __pads; |
__len = __w; |
} |
__out.write(__s, __len); |
__out.width(0); |
} |
catch(exception& __fail) |
{ |
// 27.6.1.2.1 Common requirements. |
// Turn this on without causing an ios::failure to be thrown. |
__out.setstate(ios_base::badbit); |
if ((__out.exceptions() & ios_base::badbit) != 0) |
__throw_exception_again; |
} |
} |
return __out; |
} |
|
// 21.3.7.9 basic_string::operator<< |
template<typename _CharT, typename _Traits, typename _Alloc> |
basic_ostream<_CharT, _Traits>& |
operator<<(basic_ostream<_CharT, _Traits>& __out, |
const basic_string<_CharT, _Traits, _Alloc>& __str) |
{ |
typedef basic_ostream<_CharT, _Traits> __ostream_type; |
typename __ostream_type::sentry __cerb(__out); |
if (__cerb) |
{ |
const _CharT* __s = __str.data(); |
streamsize __w = __out.width(); |
_CharT* __pads = static_cast<_CharT*>(__builtin_alloca(sizeof(_CharT) * __w)); |
streamsize __len = static_cast<streamsize>(__str.size()); |
#ifdef _GLIBCPP_RESOLVE_LIB_DEFECTS |
// 25. String operator<< uses width() value wrong |
#endif |
if (__w > __len) |
{ |
__pad_char(__out, __pads, __s, __w, __len); |
__s = __pads; |
__len = __w; |
} |
streamsize __res = __out.rdbuf()->sputn(__s, __len); |
__out.width(0); |
if (__res != __len) |
__out.setstate(ios_base::failbit); |
} |
return __out; |
} |
} // namespace std |
|
// Local Variables: |
// mode:C++ |
// End: |
|