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: 355
