--- /dev/null
+/*
+ * Copyright (c) 1999
+ * Silicon Graphics Computer Systems, Inc.
+ *
+ * Copyright (c) 1999
+ * Boris Fomitchev
+ *
+ * This material is provided "as is", with absolutely no warranty expressed
+ * or implied. Any use is at your own risk.
+ *
+ * Permission to use or copy this software for any purpose is hereby granted
+ * without fee, provided the above notices are retained on all copies.
+ * Permission to modify the code and to distribute modified code is granted,
+ * provided the above notices are retained, and a notice that the code was
+ * modified is included with the above copyright notice.
+ *
+ */
+#include "stlport_prefix.h"
+
+#include <istream>
+#include <fstream>
+#if defined (_STLP_MSVC) || defined (__MWERKS__) || defined (__ICL) || defined (__ISCPP__)
+# define _STLP_USE_NOT_INIT_SEGMENT
+# include <iostream>
+#endif
+
+#include "stdio_streambuf.h"
+#include "aligned_buffer.h"
+#include "_stdio_file.h"
+#include "c_locale.h"
+
+// boris : note this is repeated in <iostream>
+#ifndef _STLP_USE_NAMESPACES
+// in case of SGI iostreams, we have to rename our streams not to clash with those
+// provided in native lib
+# define cin _STLP_cin
+# define cout _STLP_cout
+# define cerr _STLP_cerr
+# define clog _STLP_clog
+#endif
+
+_STLP_BEGIN_NAMESPACE
+
+#if defined (__BORLANDC__) && ! defined (_STLP_USE_GLIBC)
+using _STLP_VENDOR_CSTD::_streams;
+#endif
+
+// This file handles iostream initialization. It is inherently
+// nonportable, since the C++ language definition provides no mechanism
+// for controlling order of initialization of nonlocal objects.
+// Initialization has three parts, which must be performed in the following
+// order:
+// (1) Initialize the locale system
+// (2) Call the constructors for the eight global stream objects.
+// (3) Create streambufs for the global stream objects, and initialize
+// the stream objects by calling the init() member function.
+
+
+#if defined (_STLP_USE_NOT_INIT_SEGMENT)
+
+// Definitions of the eight global I/O objects that are declared in
+// <iostream>. For some compilers we use pragmas to put the global I/O
+// objects into an initialization segment that will not
+// be executed. We then explicitly invoke the constructors
+// with placement new in ios_base::_S_initialize()
+
+# if defined (__MWERKS__)
+# pragma suppress_init_code on
+# else
+# pragma init_seg("STLPORT_NO_INIT")
+# endif
+
+_STLP_DECLSPEC istream cin(0);
+
+# ifdef _STLP_REDIRECT_STDSTREAMS
+_STLP_DECLSPEC ofstream cout;
+_STLP_DECLSPEC ofstream cerr;
+_STLP_DECLSPEC ofstream clog;
+# else
+_STLP_DECLSPEC ostream cout(0);
+_STLP_DECLSPEC ostream cerr(0);
+_STLP_DECLSPEC ostream clog(0);
+# endif
+
+# ifndef _STLP_NO_WCHAR_T
+_STLP_DECLSPEC wistream wcin(0);
+_STLP_DECLSPEC wostream wcout(0);
+_STLP_DECLSPEC wostream wcerr(0);
+_STLP_DECLSPEC wostream wclog(0);
+# endif
+
+# if defined (__MWERKS__)
+# pragma suppress_init_code off
+# endif
+
+#else
+
+// Definitions of the eight global I/O objects that are declared in
+// <iostream>. Disgusting hack: we deliberately define them with the
+// wrong types so that the constructors don't get run automatically.
+// We need special tricks to make sure that these objects are struct-
+// aligned rather than byte-aligned.
+
+// This is not portable. Declaring a variable with different types in
+// two translations units is "undefined", according to the C++ standard.
+// Most compilers, however, silently accept this instead of diagnosing
+// it as an error.
+
+# ifndef __DMC__
+_STLP_DECLSPEC _Stl_aligned_buffer<istream> cin;
+_STLP_DECLSPEC _Stl_aligned_buffer<ostream> cout;
+_STLP_DECLSPEC _Stl_aligned_buffer<ostream> cerr;
+_STLP_DECLSPEC _Stl_aligned_buffer<ostream> clog;
+# else
+_Stl_aligned_buffer<istream> cin;
+_Stl_aligned_buffer<ostream> cout;
+_Stl_aligned_buffer<ostream> cerr;
+_Stl_aligned_buffer<ostream> clog;
+
+# 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")
+# 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")
+# 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")
+# 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")
+# endif
+
+# ifndef _STLP_NO_WCHAR_T
+
+# ifndef __DMC__
+_STLP_DECLSPEC _Stl_aligned_buffer<wistream> wcin;
+_STLP_DECLSPEC _Stl_aligned_buffer<wostream> wcout;
+_STLP_DECLSPEC _Stl_aligned_buffer<wostream> wcerr;
+_STLP_DECLSPEC _Stl_aligned_buffer<wostream> wclog;
+# else
+_Stl_aligned_buffer<wistream> wcin;
+_Stl_aligned_buffer<wostream> wcout;
+_Stl_aligned_buffer<wostream> wcerr;
+_Stl_aligned_buffer<wostream> wclog;
+
+# 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")
+# 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")
+# 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")
+# 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")
+# endif
+# endif
+#endif /* STL_MSVC || __MWERKS__ */
+
+// Member functions from class ios_base and ios_base::Init
+
+long ios_base::Init::_S_count = 0;
+// by default, those are synced
+bool ios_base::_S_was_synced = true;
+
+ios_base::Init::Init() {
+ if (_S_count++ == 0) {
+ _Locale_init();
+ ios_base::_S_initialize();
+ _Filebuf_base::_S_initialize();
+ }
+}
+
+ios_base::Init::~Init() {
+ if (--_S_count == 0) {
+ ios_base::_S_uninitialize();
+ _Locale_final();
+ }
+}
+
+static filebuf*
+_Stl_create_filebuf(FILE* f, ios_base::openmode mode ) {
+ basic_filebuf<char, char_traits<char> >* result =
+ new basic_filebuf<char, char_traits<char> >();
+
+ _STLP_TRY {
+ result->_M_open(_FILE_fd(f), mode);
+ }
+ _STLP_CATCH_ALL {}
+
+ if (!result->is_open()) {
+ delete result;
+ result = 0;
+ }
+ return result;
+}
+
+#if !defined (_STLP_NO_WCHAR_T)
+static wfilebuf*
+_Stl_create_wfilebuf(FILE* f, ios_base::openmode mode) {
+ basic_filebuf<wchar_t, char_traits<wchar_t> >* result =
+ new basic_filebuf<wchar_t, char_traits<wchar_t> >();
+
+ _STLP_TRY {
+ result->_M_open(_FILE_fd(f), mode);
+ }
+ _STLP_CATCH_ALL {}
+
+ if (!result->is_open()) {
+ delete result;
+ result = 0;
+ }
+ return result;
+}
+#endif
+
+void _STLP_CALL ios_base::_S_initialize() {
+#if !defined (_STLP_HAS_NO_NAMESPACES) && !defined (_STLP_DONT_USE_PRIV_NAMESPACE)
+ using _STLP_PRIV stdio_istreambuf;
+ using _STLP_PRIV stdio_ostreambuf;
+#endif
+ _STLP_TRY {
+ istream* ptr_cin = new(static_cast<void*>(&cin)) istream(0);
+# ifdef _STLP_REDIRECT_STDSTREAMS
+ ofstream* ptr_cout = new(static_cast<void*>(&cout)) ofstream;
+ ofstream* ptr_cerr = new(static_cast<void*>(&cerr)) ofstream;
+ ofstream* ptr_clog = new(static_cast<void*>(&clog)) ofstream;
+
+ // Initialize the four narrow stream objects.
+ if (_S_was_synced) {
+ ptr_cin->init(new stdio_istreambuf(stdin));
+ ptr_cout->open("/stdout.txt", ios::out);
+ ptr_cerr->open("/stderr.txt", ios::out);
+ ptr_clog->open("/stdlog.txt", ios::out);
+ } else {
+ ptr_cin->init(_Stl_create_filebuf(stdin, ios_base::in));
+ ptr_cin->init(_Stl_create_filebuf(stdout, ios_base::out));
+ ptr_cin->init(_Stl_create_filebuf(stderr, ios_base::out));
+ ptr_cin->init(_Stl_create_filebuf(stderr, ios_base::out));
+ }
+ ptr_cin->tie(ptr_cout);
+ ptr_cerr->setf(ios_base::unitbuf);
+# else
+ ostream* ptr_cout = new(static_cast<void*>(&cout)) ostream(0);
+ ostream* ptr_cerr = new(static_cast<void*>(&cerr)) ostream(0);
+ ostream* ptr_clog = new(static_cast<void*>(&clog)) ostream(0);
+
+ // Initialize the four narrow stream objects.
+ if (_S_was_synced) {
+ ptr_cin->init(new stdio_istreambuf(stdin));
+ ptr_cout->init(new stdio_ostreambuf(stdout));
+ ptr_cerr->init(new stdio_ostreambuf(stderr));
+ ptr_clog->init(new stdio_ostreambuf(stderr));
+ } else {
+ ptr_cin->init(_Stl_create_filebuf(stdin, ios_base::in));
+ ptr_cin->init(_Stl_create_filebuf(stdout, ios_base::out));
+ ptr_cin->init(_Stl_create_filebuf(stderr, ios_base::out));
+ ptr_cin->init(_Stl_create_filebuf(stderr, ios_base::out));
+ }
+ ptr_cin->tie(ptr_cout);
+ ptr_cerr->setf(ios_base::unitbuf);
+# endif /* _STLP_REDIRECT_STDSTREAMS */
+
+# ifndef _STLP_NO_WCHAR_T
+ // Run constructors for the four wide stream objects.
+ wistream* ptr_wcin = new(&wcin) wistream(0);
+ wostream* ptr_wcout = new(&wcout) wostream(0);
+ wostream* ptr_wcerr = new(&wcerr) wostream(0);
+ wostream* ptr_wclog = new(&wclog) wostream(0);
+
+ wfilebuf* win = _Stl_create_wfilebuf(stdin, ios_base::in);
+ wfilebuf* wout = _Stl_create_wfilebuf(stdout, ios_base::out);
+ wfilebuf* werr = _Stl_create_wfilebuf(stderr, ios_base::out);
+ wfilebuf* wlog = _Stl_create_wfilebuf(stderr, ios_base::out);
+
+ ptr_wcin->init(win);
+ ptr_wcout->init(wout);
+ ptr_wcerr->init(werr);
+ ptr_wclog->init(wlog);
+
+ ptr_wcin->tie(ptr_wcout);
+ ptr_wcerr->setf(ios_base::unitbuf);
+
+# endif /* _STLP_NO_WCHAR_T */
+ }
+
+ _STLP_CATCH_ALL {}
+}
+
+void _STLP_CALL ios_base::_S_uninitialize() {
+ // Note that destroying output streambufs flushes the buffers.
+
+ istream* ptr_cin = &cin;
+ ostream* ptr_cout = &cout;
+ ostream* ptr_cerr = &cerr;
+ ostream* ptr_clog = &clog;
+
+#ifndef _STLP_NO_WCHAR_T
+ wistream* ptr_wcin = &wcin;
+ wostream* ptr_wcout = &wcout;
+ wostream* ptr_wcerr = &wcerr;
+ wostream* ptr_wclog = &wclog;
+#endif
+
+ // we don't want any exceptions being thrown here
+ ptr_cin->exceptions(0);
+ ptr_cout->exceptions(0);
+ ptr_cerr->exceptions(0);
+ ptr_clog->exceptions(0);
+
+ delete ptr_cin->rdbuf(0);
+ delete ptr_cout->rdbuf(0);
+ delete ptr_cerr->rdbuf(0);
+ delete ptr_clog->rdbuf(0);
+
+ _Destroy(ptr_cin);
+ _Destroy(ptr_cout);
+ _Destroy(ptr_cerr);
+ _Destroy(ptr_clog);
+
+#ifndef _STLP_NO_WCHAR_T
+ // we don't want any exceptions being thrown here
+ ptr_wcin->exceptions(0);
+ ptr_wcout->exceptions(0);
+ ptr_wcerr->exceptions(0);
+ ptr_wclog->exceptions(0);
+
+ delete ptr_wcin->rdbuf(0);
+ delete ptr_wcout->rdbuf(0);
+ delete ptr_wcerr->rdbuf(0);
+ delete ptr_wclog->rdbuf(0);
+
+ _Destroy(ptr_wcin);
+ _Destroy(ptr_wcout);
+ _Destroy(ptr_wcerr);
+ _Destroy(ptr_wclog);
+#endif
+}
+
+
+bool _STLP_CALL ios_base::sync_with_stdio(bool sync) {
+# if !defined (_STLP_HAS_NO_NAMESPACES) && !defined (_STLP_DONT_USE_PRIV_NAMESPACE)
+ using _STLP_PRIV stdio_istreambuf;
+ using _STLP_PRIV stdio_ostreambuf;
+# endif
+
+ bool was_synced = _S_was_synced;
+
+ // if by any chance we got there before std streams initialization,
+ // just set the sync flag and exit
+ if (Init::_S_count == 0) {
+ _S_was_synced = sync;
+ return was_synced;
+ }
+
+ istream* ptr_cin = &cin;
+ ostream* ptr_cout = &cout;
+ ostream* ptr_cerr = &cerr;
+ ostream* ptr_clog = &clog;
+
+ streambuf* old_cin = ptr_cin->rdbuf();
+ streambuf* old_cout = ptr_cout->rdbuf();
+ streambuf* old_cerr = ptr_cerr->rdbuf();
+ streambuf* old_clog = ptr_clog->rdbuf();
+
+ streambuf* new_cin = 0;
+ streambuf* new_cout = 0;
+ streambuf* new_cerr = 0;
+ streambuf* new_clog = 0;
+
+ _STLP_TRY {
+ if (sync && !was_synced) {
+ new_cin = new stdio_istreambuf(stdin);
+ new_cout = new stdio_ostreambuf(stdout);
+ new_cerr = new stdio_ostreambuf(stderr);
+ new_clog = new stdio_ostreambuf(stderr);
+ }
+ else if (!sync && was_synced) {
+ new_cin = _Stl_create_filebuf(stdin, ios_base::in);
+ new_cout = _Stl_create_filebuf(stdout, ios_base::out);
+ new_cerr = _Stl_create_filebuf(stderr, ios_base::out);
+ new_clog = _Stl_create_filebuf(stderr, ios_base::out);
+ }
+ }
+ _STLP_CATCH_ALL {}
+
+ if (new_cin && new_cout && new_cerr && new_clog) {
+ ptr_cin->rdbuf(new_cin);
+ ptr_cout->rdbuf(new_cout);
+ ptr_cerr->rdbuf(new_cerr);
+ ptr_clog->rdbuf(new_clog);
+
+ delete old_cin;
+ delete old_cout;
+ delete old_cerr;
+ delete old_clog;
+ }
+ else {
+ delete new_cin;
+ delete new_cout;
+ delete new_cerr;
+ delete new_clog;
+ }
+
+ return was_synced;
+}
+
+_STLP_END_NAMESPACE
+
+// Local Variables:
+// mode:C++
+// End:
projects / polintos / scott / priv.git / blobdiff