1 //===------------------------ iostream.cpp --------------------------------===//
2 //
3 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4 // See https://llvm.org/LICENSE.txt for license information.
5 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6 //
7 //===----------------------------------------------------------------------===//
8 
9 #include "__std_stream"
10 #include "__locale"
11 #include "string"
12 #include "new"
13 
14 #define _str(s) #s
15 #define str(s) _str(s)
16 #define _LIBCPP_ABI_NAMESPACE_STR str(_LIBCPP_ABI_NAMESPACE)
17 
18 _LIBCPP_BEGIN_NAMESPACE_STD
19 
20 _ALIGNAS_TYPE (istream) _LIBCPP_FUNC_VIS char cin[sizeof(istream)]
21 #if defined(_LIBCPP_ABI_MICROSOFT) && defined(__clang__)
22 __asm__("?cin@" _LIBCPP_ABI_NAMESPACE_STR "@std@@3V?$basic_istream@DU?$char_traits@D@" _LIBCPP_ABI_NAMESPACE_STR "@std@@@12@A")
23 #endif
24 ;
25 _ALIGNAS_TYPE (__stdinbuf<char> ) static char __cin[sizeof(__stdinbuf <char>)];
26 static mbstate_t mb_cin;
27 _ALIGNAS_TYPE (wistream) _LIBCPP_FUNC_VIS char wcin[sizeof(wistream)]
28 #if defined(_LIBCPP_ABI_MICROSOFT) && defined(__clang__)
29 __asm__("?wcin@" _LIBCPP_ABI_NAMESPACE_STR "@std@@3V?$basic_istream@_WU?$char_traits@_W@" _LIBCPP_ABI_NAMESPACE_STR "@std@@@12@A")
30 #endif
31 ;
32 _ALIGNAS_TYPE (__stdinbuf<wchar_t> ) static char __wcin[sizeof(__stdinbuf <wchar_t>)];
33 static mbstate_t mb_wcin;
34 
35 _ALIGNAS_TYPE (ostream) _LIBCPP_FUNC_VIS char cout[sizeof(ostream)]
36 #if defined(_LIBCPP_ABI_MICROSOFT) && defined(__clang__)
37 __asm__("?cout@" _LIBCPP_ABI_NAMESPACE_STR "@std@@3V?$basic_ostream@DU?$char_traits@D@" _LIBCPP_ABI_NAMESPACE_STR "@std@@@12@A")
38 #endif
39 ;
40 _ALIGNAS_TYPE (__stdoutbuf<char>) static char __cout[sizeof(__stdoutbuf<char>)];
41 static mbstate_t mb_cout;
42 _ALIGNAS_TYPE (wostream) _LIBCPP_FUNC_VIS char wcout[sizeof(wostream)]
43 #if defined(_LIBCPP_ABI_MICROSOFT) && defined(__clang__)
44 __asm__("?wcout@" _LIBCPP_ABI_NAMESPACE_STR "@std@@3V?$basic_ostream@_WU?$char_traits@_W@" _LIBCPP_ABI_NAMESPACE_STR "@std@@@12@A")
45 #endif
46 ;
47 _ALIGNAS_TYPE (__stdoutbuf<wchar_t>) static char __wcout[sizeof(__stdoutbuf<wchar_t>)];
48 static mbstate_t mb_wcout;
49 
50 _ALIGNAS_TYPE (ostream) _LIBCPP_FUNC_VIS char cerr[sizeof(ostream)]
51 #if defined(_LIBCPP_ABI_MICROSOFT) && defined(__clang__)
52 __asm__("?cerr@" _LIBCPP_ABI_NAMESPACE_STR "@std@@3V?$basic_ostream@DU?$char_traits@D@" _LIBCPP_ABI_NAMESPACE_STR "@std@@@12@A")
53 #endif
54 ;
55 _ALIGNAS_TYPE (__stdoutbuf<char>) static char __cerr[sizeof(__stdoutbuf<char>)];
56 static mbstate_t mb_cerr;
57 _ALIGNAS_TYPE (wostream) _LIBCPP_FUNC_VIS char wcerr[sizeof(wostream)]
58 #if defined(_LIBCPP_ABI_MICROSOFT) && defined(__clang__)
59 __asm__("?wcerr@" _LIBCPP_ABI_NAMESPACE_STR "@std@@3V?$basic_ostream@_WU?$char_traits@_W@" _LIBCPP_ABI_NAMESPACE_STR "@std@@@12@A")
60 #endif
61 ;
62 _ALIGNAS_TYPE (__stdoutbuf<wchar_t>) static char __wcerr[sizeof(__stdoutbuf<wchar_t>)];
63 static mbstate_t mb_wcerr;
64 
65 _ALIGNAS_TYPE (ostream) _LIBCPP_FUNC_VIS char clog[sizeof(ostream)]
66 #if defined(_LIBCPP_ABI_MICROSOFT) && defined(__clang__)
67 __asm__("?clog@" _LIBCPP_ABI_NAMESPACE_STR "@std@@3V?$basic_ostream@DU?$char_traits@D@" _LIBCPP_ABI_NAMESPACE_STR "@std@@@12@A")
68 #endif
69 ;
70 _ALIGNAS_TYPE (wostream) _LIBCPP_FUNC_VIS char wclog[sizeof(wostream)]
71 #if defined(_LIBCPP_ABI_MICROSOFT) && defined(__clang__)
72 __asm__("?wclog@" _LIBCPP_ABI_NAMESPACE_STR "@std@@3V?$basic_ostream@_WU?$char_traits@_W@" _LIBCPP_ABI_NAMESPACE_STR "@std@@@12@A")
73 #endif
74 ;
75 
76 _LIBCPP_HIDDEN ios_base::Init __start_std_streams _LIBCPP_INIT_PRIORITY_MAX;
77 
78 // On Windows the TLS storage for locales needs to be initialized before we create
79 // the standard streams, otherwise it may not be alive during program termination
80 // when we flush the streams.
81 static void force_locale_initialization() {
82 #if defined(_LIBCPP_MSVCRT_LIKE)
83   static bool once = []() {
84     auto loc = newlocale(LC_ALL_MASK, "C", 0);
85     {
86         __libcpp_locale_guard g(loc); // forces initialization of locale TLS
87         ((void)g);
88     }
89     freelocale(loc);
90     return true;
91   }();
92   ((void)once);
93 #endif
94 }
95 
96 class DoIOSInit {
97 public:
98 	DoIOSInit();
99 	~DoIOSInit();
100 };
101 
102 DoIOSInit::DoIOSInit()
103 {
104     force_locale_initialization();
105 
106     istream* cin_ptr  = ::new(cin)  istream(::new(__cin)  __stdinbuf <char>(stdin, &mb_cin));
107     wistream* wcin_ptr  = ::new(wcin)  wistream(::new(__wcin)  __stdinbuf <wchar_t>(stdin, &mb_wcin));
108     ostream* cout_ptr = ::new(cout) ostream(::new(__cout) __stdoutbuf<char>(stdout, &mb_cout));
109     wostream* wcout_ptr = ::new(wcout) wostream(::new(__wcout) __stdoutbuf<wchar_t>(stdout, &mb_wcout));
110     ostream* cerr_ptr = ::new(cerr) ostream(::new(__cerr) __stdoutbuf<char>(stderr, &mb_cerr));
111                         ::new(clog) ostream(cerr_ptr->rdbuf());
112     wostream* wcerr_ptr = ::new(wcerr) wostream(::new(__wcerr) __stdoutbuf<wchar_t>(stderr, &mb_wcerr));
113                           ::new(wclog) wostream(wcerr_ptr->rdbuf());
114 
115     cin_ptr->tie(cout_ptr);
116     wcin_ptr->tie(wcout_ptr);
117     _VSTD::unitbuf(*cerr_ptr);
118     _VSTD::unitbuf(*wcerr_ptr);
119     cerr_ptr->tie(cout_ptr);
120     wcerr_ptr->tie(wcout_ptr);
121 }
122 
123 DoIOSInit::~DoIOSInit()
124 {
125     ostream* cout_ptr = reinterpret_cast<ostream*>(cout);
126     wostream* wcout_ptr = reinterpret_cast<wostream*>(wcout);
127     cout_ptr->flush();
128     wcout_ptr->flush();
129 
130     ostream* clog_ptr = reinterpret_cast<ostream*>(clog);
131     wostream* wclog_ptr = reinterpret_cast<wostream*>(wclog);
132     clog_ptr->flush();
133     wclog_ptr->flush();
134 }
135 
136 ios_base::Init::Init()
137 {
138     static DoIOSInit init_the_streams; // gets initialized once
139 }
140 
141 ios_base::Init::~Init()
142 {
143 }
144 
145 _LIBCPP_END_NAMESPACE_STD
146