lib/3rdparty/stlport/src/iostream.cpp

   1 /*
   2  * Copyright (c) 1999
   3  * Silicon Graphics Computer Systems, Inc.
   4  *
   5  * Copyright (c) 1999
   6  * Boris Fomitchev
   7  *
   8  * This material is provided "as is", with absolutely no warranty expressed
   9  * or implied. Any use is at your own risk.
  10  *
  11  * Permission to use or copy this software for any purpose is hereby granted
  12  * without fee, provided the above notices are retained on all copies.
  13  * Permission to modify the code and to distribute modified code is granted,
  14  * provided the above notices are retained, and a notice that the code was
  15  * modified is included with the above copyright notice.
  16  *
  17  */
  18 #include "stlport_prefix.h"
  19
  20 #include <memory>
  21 #include <istream>
  22 #include <fstream>
  23 #if defined (_STLP_MSVC) || defined (__MWERKS__) || defined (__ICL) || defined (__ISCPP__)
  24 #  define _STLP_USE_NOT_INIT_SEGMENT
  25 #  include <iostream>
  26 #endif
  27
  28 #include "stdio_streambuf.h"
  29 #include "aligned_buffer.h"
  30 #include "_stdio_file.h"
  31 #include "c_locale.h"
  32
  33 // boris : note this is repeated in <iostream>
  34 #ifndef _STLP_USE_NAMESPACES
  35 // in case of SGI iostreams, we have to rename our streams not to clash with those
  36 // provided in native lib
  37 #  define cin _STLP_cin
  38 #  define cout _STLP_cout
  39 #  define cerr _STLP_cerr
  40 #  define clog _STLP_clog
  41 #endif
  42
  43 _STLP_BEGIN_NAMESPACE
  44
  45 // This file handles iostream initialization.  It is inherently
  46 // nonportable, since the C++ language definition provides no mechanism
  47 // for controlling order of initialization of nonlocal objects.
  48 // Initialization has three parts, which must be performed in the following
  49 // order:
  50 //  (1) Initialize the locale system
  51 //  (2) Call the constructors for the eight global stream objects.
  52 //  (3) Create streambufs for the global stream objects, and initialize
  53 //      the stream objects by calling the init() member function.
  54
  55
  56 #if defined (_STLP_USE_NOT_INIT_SEGMENT)
  57
  58 // Definitions of the eight global I/O objects that are declared in
  59 // <iostream>. For some compilers we use pragmas to put the global I/O
  60 // objects into an initialization segment that will not
  61 // be executed. We then explicitly invoke the constructors
  62 // with placement new in ios_base::_S_initialize()
  63
  64 #  if defined (__MWERKS__)
  65 #    pragma suppress_init_code on
  66 #  else
  67 #    pragma init_seg("STLPORT_NO_INIT")
  68 #  endif
  69
  70 _STLP_DECLSPEC istream cin(0);
  71 _STLP_DECLSPEC ostream cout(0);
  72 _STLP_DECLSPEC ostream cerr(0);
  73 _STLP_DECLSPEC ostream clog(0);
  74
  75 #  ifndef _STLP_NO_WCHAR_T
  76 _STLP_DECLSPEC wistream wcin(0);
  77 _STLP_DECLSPEC wostream wcout(0);
  78 _STLP_DECLSPEC wostream wcerr(0);
  79 _STLP_DECLSPEC wostream wclog(0);
  80 #  endif
  81
  82 #  if defined (__MWERKS__)
  83 #    pragma suppress_init_code off
  84 #  endif
  85
  86 #else
  87
  88 // Definitions of the eight global I/O objects that are declared in
  89 // <iostream>.  Disgusting hack: we deliberately define them with the
  90 // wrong types so that the constructors don't get run automatically.
  91 // We need special tricks to make sure that these objects are struct-
  92 // aligned rather than byte-aligned.
  93
  94 // This is not portable.  Declaring a variable with different types in
  95 // two translations units is "undefined", according to the C++ standard.
  96 // Most compilers, however, silently accept this instead of diagnosing
  97 // it as an error.
  98
  99 #  ifndef __DMC__
 100 _STLP_DECLSPEC _Stl_aligned_buffer<istream> cin;
 101 _STLP_DECLSPEC _Stl_aligned_buffer<ostream> cout;
 102 _STLP_DECLSPEC _Stl_aligned_buffer<ostream> cerr;
 103 _STLP_DECLSPEC _Stl_aligned_buffer<ostream> clog;
 104 #  else
 105 _Stl_aligned_buffer<istream> cin;
 106 _Stl_aligned_buffer<ostream> cout;
 107 _Stl_aligned_buffer<ostream> cerr;
 108 _Stl_aligned_buffer<ostream> clog;
 109
 110 #    pragma alias("?cin@std@@3V?$basic_istream@std@DV?$char_traits@std@D@1@@1@A", "?cin@std@@3T?$_Stl_aligned_buffer@std@V?$basic_istream@std@DV?$char_traits@std@D@1@@1@@1@A")
 111 #    pragma alias("?cout@std@@3V?$basic_ostream@std@DV?$char_traits@std@D@1@@1@A", "?cout@std@@3T?$_Stl_aligned_buffer@std@V?$basic_ostream@std@DV?$char_traits@std@D@1@@1@@1@A")
 112 #    pragma alias("?cerr@std@@3V?$basic_ostream@std@DV?$char_traits@std@D@1@@1@A", "?cerr@std@@3T?$_Stl_aligned_buffer@std@V?$basic_ostream@std@DV?$char_traits@std@D@1@@1@@1@A")
 113 #    pragma alias("?clog@std@@3V?$basic_ostream@std@DV?$char_traits@std@D@1@@1@A", "?clog@std@@3T?$_Stl_aligned_buffer@std@V?$basic_ostream@std@DV?$char_traits@std@D@1@@1@@1@A")
 114 #  endif
 115
 116 #  ifndef _STLP_NO_WCHAR_T
 117
 118 #    ifndef __DMC__
 119 _STLP_DECLSPEC _Stl_aligned_buffer<wistream> wcin;
 120 _STLP_DECLSPEC _Stl_aligned_buffer<wostream> wcout;
 121 _STLP_DECLSPEC _Stl_aligned_buffer<wostream> wcerr;
 122 _STLP_DECLSPEC _Stl_aligned_buffer<wostream> wclog;
 123 #    else
 124 _Stl_aligned_buffer<wistream> wcin;
 125 _Stl_aligned_buffer<wostream> wcout;
 126 _Stl_aligned_buffer<wostream> wcerr;
 127 _Stl_aligned_buffer<wostream> wclog;
 128
 129 #      pragma alias("?wcin@std@@3V?$basic_istream@std@_YV?$char_traits@std@_Y@1@@1@A", "?wcin@std@@3T?$_Stl_aligned_buffer@std@V?$basic_istream@std@_YV?$char_traits@std@_Y@1@@1@@1@A")
 130 #      pragma alias("?wcout@std@@3V?$basic_ostream@std@_YV?$char_traits@std@_Y@1@@1@A", "?wcout@std@@3T?$_Stl_aligned_buffer@std@V?$basic_ostream@std@_YV?$char_traits@std@_Y@1@@1@@1@A")
 131 #      pragma alias("?wcerr@std@@3V?$basic_ostream@std@_YV?$char_traits@std@_Y@1@@1@A", "?wcerr@std@@3T?$_Stl_aligned_buffer@std@V?$basic_ostream@std@_YV?$char_traits@std@_Y@1@@1@@1@A")
 132 #      pragma alias("?wclog@std@@3V?$basic_ostream@std@_YV?$char_traits@std@_Y@1@@1@A", "?wclog@std@@3T?$_Stl_aligned_buffer@std@V?$basic_ostream@std@_YV?$char_traits@std@_Y@1@@1@@1@A")
 133 #    endif
 134 #  endif
 135 #endif /* STL_MSVC || __MWERKS__ */
 136
 137 // Member functions from class ios_base and ios_base::Init
 138
 139 long ios_base::Init::_S_count = 0;
 140 // by default, those are synced
 141 bool ios_base::_S_is_synced = true;
 142
 143 ios_base::Init::Init() {
 144   if (_S_count++ == 0) {
 145     _Locale_init();
 146     ios_base::_S_initialize();
 147     _Filebuf_base::_S_initialize();
 148   }
 149 }
 150
 151 ios_base::Init::~Init() {
 152   if (--_S_count == 0) {
 153     ios_base::_S_uninitialize();
 154     _Locale_final();
 155   }
 156 }
 157
 158 static int _Stl_extract_open_param(FILE* f)
 159 { return _FILE_fd(f); }
 160
 161 #ifdef _STLP_REDIRECT_STDSTREAMS
 162 static const char* _Stl_extract_open_param(const char* name)
 163 { return name; }
 164 #endif
 165
 166 template <class _Tp>
 167 static filebuf*
 168 _Stl_create_filebuf(_Tp x, ios_base::openmode mode ) {
 169   auto_ptr<filebuf> result(new basic_filebuf<char, char_traits<char> >());
 170   result->open(_Stl_extract_open_param(x), mode);
 171
 172   if (result->is_open())
 173     return result.release();
 174
 175   return 0;
 176 }
 177
 178 #if !defined (_STLP_NO_WCHAR_T)
 179 static wfilebuf*
 180 _Stl_create_wfilebuf(FILE* f, ios_base::openmode mode) {
 181   auto_ptr<wfilebuf> result(new basic_filebuf<wchar_t, char_traits<wchar_t> >());
 182   result->_M_open(_FILE_fd(f), mode);
 183
 184   if (result->is_open())
 185     return result.release();
 186
 187   return 0;
 188 }
 189 #endif
 190
 191 void  _STLP_CALL ios_base::_S_initialize() {
 192 #if !defined (_STLP_HAS_NO_NAMESPACES) && !defined (_STLP_DONT_USE_PRIV_NAMESPACE)
 193   using _STLP_PRIV stdio_istreambuf;
 194   using _STLP_PRIV stdio_ostreambuf;
 195 #endif
 196
 197   auto_ptr<streambuf> cin_buf;
 198   auto_ptr<streambuf> cout_buf;
 199   auto_ptr<streambuf> cerr_buf;
 200   auto_ptr<streambuf> clog_buf;
 201
 202   if (_S_is_synced)
 203     cin_buf.reset(new stdio_istreambuf(stdin));
 204   else
 205     cin_buf.reset(_Stl_create_filebuf(stdin, ios_base::in));
 206
 207   if (_S_is_synced) {
 208 #ifdef _STLP_REDIRECT_STDSTREAMS
 209     cout_buf.reset(_Stl_create_filebuf("/stdout.txt", ios::out));
 210     cerr_buf.reset(_Stl_create_filebuf("/stderr.txt", ios::out));
 211     clog_buf.reset(_Stl_create_filebuf("/stdlog.txt", ios::out));
 212 #else
 213     cout_buf.reset(new stdio_ostreambuf(stdout));
 214     cerr_buf.reset(new stdio_ostreambuf(stderr));
 215     clog_buf.reset(new stdio_ostreambuf(stderr));
 216 #endif
 217   }
 218   else {
 219     cout_buf.reset(_Stl_create_filebuf(stdout, ios_base::out));
 220     cerr_buf.reset(_Stl_create_filebuf(stderr, ios_base::out));
 221     clog_buf.reset(_Stl_create_filebuf(stderr, ios_base::out));
 222   }
 223
 224   istream* ptr_cin  = new(&cin)  istream(cin_buf.get()); cin_buf.release();
 225   ostream* ptr_cout = new(&cout) ostream(cout_buf.get()); cout_buf.release();
 226   ostream* ptr_cerr = new(&cerr) ostream(cerr_buf.get()); cerr_buf.release();
 227   /*ostream* ptr_clog = */ new(&clog) ostream(clog_buf.get()); clog_buf.release();
 228   ptr_cin->tie(ptr_cout);
 229   ptr_cerr->setf(ios_base::unitbuf);
 230
 231 #ifndef _STLP_NO_WCHAR_T
 232   auto_ptr<wfilebuf> win(_Stl_create_wfilebuf(stdin, ios_base::in));
 233   auto_ptr<wfilebuf> wout(_Stl_create_wfilebuf(stdout, ios_base::out));
 234   auto_ptr<wfilebuf> werr(_Stl_create_wfilebuf(stderr, ios_base::out));
 235   auto_ptr<wfilebuf> wlog(_Stl_create_wfilebuf(stderr, ios_base::out));
 236
 237   // Run constructors for the four wide stream objects.
 238   wistream* ptr_wcin  = new(&wcin)  wistream(win.get()); win.release();
 239   wostream* ptr_wcout = new(&wcout) wostream(wout.get()); wout.release();
 240   wostream* ptr_wcerr = new(&wcerr) wostream(werr.get()); werr.release();
 241   /*wostream* ptr_wclog = */ new(&wclog) wostream(wlog.get()); wlog.release();
 242
 243   ptr_wcin->tie(ptr_wcout);
 244   ptr_wcerr->setf(ios_base::unitbuf);
 245 #endif
 246 }
 247
 248 void _STLP_CALL ios_base::_S_uninitialize() {
 249   // Note that destroying output streambufs flushes the buffers.
 250   istream* ptr_cin  = &cin;
 251   ostream* ptr_cout = &cout;
 252   ostream* ptr_cerr = &cerr;
 253   ostream* ptr_clog = &clog;
 254
 255   // We don't want any exceptions being thrown here
 256   ptr_cin->exceptions(0);
 257   ptr_cout->exceptions(0);
 258   ptr_cerr->exceptions(0);
 259   ptr_clog->exceptions(0);
 260
 261   delete ptr_cin->rdbuf(0);
 262   delete ptr_cout->rdbuf(0);
 263   delete ptr_cerr->rdbuf(0);
 264   delete ptr_clog->rdbuf(0);
 265
 266   _Destroy(ptr_cin);
 267   _Destroy(ptr_cout);
 268   _Destroy(ptr_cerr);
 269   _Destroy(ptr_clog);
 270
 271 #ifndef _STLP_NO_WCHAR_T
 272   wistream* ptr_wcin  = &wcin;
 273   wostream* ptr_wcout = &wcout;
 274   wostream* ptr_wcerr = &wcerr;
 275   wostream* ptr_wclog = &wclog;
 276
 277   // We don't want any exceptions being thrown here
 278   ptr_wcin->exceptions(0);
 279   ptr_wcout->exceptions(0);
 280   ptr_wcerr->exceptions(0);
 281   ptr_wclog->exceptions(0);
 282
 283   delete ptr_wcin->rdbuf(0);
 284   delete ptr_wcout->rdbuf(0);
 285   delete ptr_wcerr->rdbuf(0);
 286   delete ptr_wclog->rdbuf(0);
 287
 288   _Destroy(ptr_wcin);
 289   _Destroy(ptr_wcout);
 290   _Destroy(ptr_wcerr);
 291   _Destroy(ptr_wclog);
 292 #endif
 293 }
 294
 295
 296 bool _STLP_CALL ios_base::sync_with_stdio(bool sync) {
 297 #  if !defined (_STLP_HAS_NO_NAMESPACES) && !defined (_STLP_DONT_USE_PRIV_NAMESPACE)
 298   using _STLP_PRIV stdio_istreambuf;
 299   using _STLP_PRIV stdio_ostreambuf;
 300 #  endif
 301
 302   if (sync == _S_is_synced) return sync;
 303
 304   // if by any chance we got there before std streams initialization,
 305   // just set the sync flag and exit
 306   if (Init::_S_count == 0) {
 307     _S_is_synced = sync;
 308     return sync;
 309   }
 310
 311   auto_ptr<streambuf> cin_buf;
 312   auto_ptr<streambuf> cout_buf;
 313   auto_ptr<streambuf> cerr_buf;
 314   auto_ptr<streambuf> clog_buf;
 315
 316   if (sync)
 317     cin_buf.reset(new stdio_istreambuf(stdin));
 318   else
 319     cin_buf.reset(_Stl_create_filebuf(stdin, ios_base::in));
 320
 321   if (sync) {
 322 #ifdef _STLP_REDIRECT_STDSTREAMS
 323     cout_buf.reset(_Stl_create_filebuf("/stdout.txt", ios::out));
 324     cerr_buf.reset(_Stl_create_filebuf("/stderr.txt", ios::out));
 325     clog_buf.reset(_Stl_create_filebuf("/stdlog.txt", ios::out));
 326 #else
 327     cout_buf.reset(new stdio_ostreambuf(stdout));
 328     cerr_buf.reset(new stdio_ostreambuf(stderr));
 329     clog_buf.reset(new stdio_ostreambuf(stderr));
 330 #endif
 331   }
 332   else {
 333     cout_buf.reset(_Stl_create_filebuf(stdout, ios_base::out));
 334     cerr_buf.reset(_Stl_create_filebuf(stderr, ios_base::out));
 335     clog_buf.reset(_Stl_create_filebuf(stderr, ios_base::out));
 336   }
 337
 338   if (cin_buf.get() != 0 && cout_buf.get() != 0 && cerr_buf.get() != 0 && clog_buf.get() != 0) {
 339     // When streambuf passed to rdbuf is not null, rdbuf is exception safe:
 340     delete (&cin)->rdbuf(cin_buf.release());
 341     delete (&cout)->rdbuf(cout_buf.release());
 342     delete (&cerr)->rdbuf(cerr_buf.release());
 343     delete (&clog)->rdbuf(clog_buf.release());
 344     _S_is_synced = sync;
 345   }
 346
 347   return _S_is_synced;
 348 }
 349
 350 _STLP_END_NAMESPACE
 351
 352 // Local Variables:
 353 // mode:C++
 354 // End: