1 //===-------------------------- ios.cpp -----------------------------------===// 2 // 3 // The LLVM Compiler Infrastructure 4 // 5 // This file is dual licensed under the MIT and the University of Illinois Open 6 // Source Licenses. See LICENSE.TXT for details. 7 // 8 //===----------------------------------------------------------------------===// 9 10 #include "__config" 11 12 #include "ios" 13 14 #include <stdlib.h> 15 16 #include "__locale" 17 #include "algorithm" 18 #include "include/config_elast.h" 19 #include "istream" 20 #include "limits" 21 #include "memory" 22 #include "new" 23 #include "streambuf" 24 #include "string" 25 26 _LIBCPP_BEGIN_NAMESPACE_STD 27 28 template class basic_ios<char>; 29 template class basic_ios<wchar_t>; 30 31 template class basic_streambuf<char>; 32 template class basic_streambuf<wchar_t>; 33 34 template class basic_istream<char>; 35 template class basic_istream<wchar_t>; 36 37 template class basic_ostream<char>; 38 template class basic_ostream<wchar_t>; 39 40 template class basic_iostream<char>; 41 42 class _LIBCPP_HIDDEN __iostream_category 43 : public __do_message 44 { 45 public: 46 virtual const char* name() const _NOEXCEPT; 47 virtual string message(int ev) const; 48 }; 49 50 const char* 51 __iostream_category::name() const _NOEXCEPT 52 { 53 return "iostream"; 54 } 55 56 string 57 __iostream_category::message(int ev) const 58 { 59 if (ev != static_cast<int>(io_errc::stream) 60 #ifdef _LIBCPP_ELAST 61 && ev <= _LIBCPP_ELAST 62 #endif // _LIBCPP_ELAST 63 ) 64 return __do_message::message(ev); 65 return string("unspecified iostream_category error"); 66 } 67 68 const error_category& 69 iostream_category() _NOEXCEPT 70 { 71 static __iostream_category s; 72 return s; 73 } 74 75 // ios_base::failure 76 77 ios_base::failure::failure(const string& msg, const error_code& ec) 78 : system_error(ec, msg) 79 { 80 } 81 82 ios_base::failure::failure(const char* msg, const error_code& ec) 83 : system_error(ec, msg) 84 { 85 } 86 87 ios_base::failure::~failure() throw() 88 { 89 } 90 91 // ios_base locale 92 93 const ios_base::fmtflags ios_base::boolalpha; 94 const ios_base::fmtflags ios_base::dec; 95 const ios_base::fmtflags ios_base::fixed; 96 const ios_base::fmtflags ios_base::hex; 97 const ios_base::fmtflags ios_base::internal; 98 const ios_base::fmtflags ios_base::left; 99 const ios_base::fmtflags ios_base::oct; 100 const ios_base::fmtflags ios_base::right; 101 const ios_base::fmtflags ios_base::scientific; 102 const ios_base::fmtflags ios_base::showbase; 103 const ios_base::fmtflags ios_base::showpoint; 104 const ios_base::fmtflags ios_base::showpos; 105 const ios_base::fmtflags ios_base::skipws; 106 const ios_base::fmtflags ios_base::unitbuf; 107 const ios_base::fmtflags ios_base::uppercase; 108 const ios_base::fmtflags ios_base::adjustfield; 109 const ios_base::fmtflags ios_base::basefield; 110 const ios_base::fmtflags ios_base::floatfield; 111 112 const ios_base::iostate ios_base::badbit; 113 const ios_base::iostate ios_base::eofbit; 114 const ios_base::iostate ios_base::failbit; 115 const ios_base::iostate ios_base::goodbit; 116 117 const ios_base::openmode ios_base::app; 118 const ios_base::openmode ios_base::ate; 119 const ios_base::openmode ios_base::binary; 120 const ios_base::openmode ios_base::in; 121 const ios_base::openmode ios_base::out; 122 const ios_base::openmode ios_base::trunc; 123 124 void 125 ios_base::__call_callbacks(event ev) 126 { 127 for (size_t i = __event_size_; i;) 128 { 129 --i; 130 __fn_[i](ev, *this, __index_[i]); 131 } 132 } 133 134 // locale 135 136 locale 137 ios_base::imbue(const locale& newloc) 138 { 139 static_assert(sizeof(locale) == sizeof(__loc_), ""); 140 locale& loc_storage = *reinterpret_cast<locale*>(&__loc_); 141 locale oldloc = loc_storage; 142 loc_storage = newloc; 143 __call_callbacks(imbue_event); 144 return oldloc; 145 } 146 147 locale 148 ios_base::getloc() const 149 { 150 const locale& loc_storage = *reinterpret_cast<const locale*>(&__loc_); 151 return loc_storage; 152 } 153 154 // xalloc 155 #if defined(_LIBCPP_HAS_C_ATOMIC_IMP) && !defined(_LIBCPP_HAS_NO_THREADS) 156 atomic<int> ios_base::__xindex_ = ATOMIC_VAR_INIT(0); 157 #else 158 int ios_base::__xindex_ = 0; 159 #endif 160 161 template <typename _Tp> 162 static size_t __ios_new_cap(size_t __req_size, size_t __current_cap) 163 { // Precondition: __req_size > __current_cap 164 const size_t mx = std::numeric_limits<size_t>::max() / sizeof(_Tp); 165 if (__req_size < mx/2) 166 return _VSTD::max(2 * __current_cap, __req_size); 167 else 168 return mx; 169 } 170 171 int 172 ios_base::xalloc() 173 { 174 return __xindex_++; 175 } 176 177 long& 178 ios_base::iword(int index) 179 { 180 size_t req_size = static_cast<size_t>(index)+1; 181 if (req_size > __iarray_cap_) 182 { 183 size_t newcap = __ios_new_cap<long>(req_size, __iarray_cap_); 184 long* iarray = static_cast<long*>(realloc(__iarray_, newcap * sizeof(long))); 185 if (iarray == 0) 186 { 187 setstate(badbit); 188 static long error; 189 error = 0; 190 return error; 191 } 192 __iarray_ = iarray; 193 for (long* p = __iarray_ + __iarray_size_; p < __iarray_ + newcap; ++p) 194 *p = 0; 195 __iarray_cap_ = newcap; 196 } 197 __iarray_size_ = max<size_t>(__iarray_size_, req_size); 198 return __iarray_[index]; 199 } 200 201 void*& 202 ios_base::pword(int index) 203 { 204 size_t req_size = static_cast<size_t>(index)+1; 205 if (req_size > __parray_cap_) 206 { 207 size_t newcap = __ios_new_cap<void *>(req_size, __iarray_cap_); 208 void** parray = static_cast<void**>(realloc(__parray_, newcap * sizeof(void *))); 209 if (parray == 0) 210 { 211 setstate(badbit); 212 static void* error; 213 error = 0; 214 return error; 215 } 216 __parray_ = parray; 217 for (void** p = __parray_ + __parray_size_; p < __parray_ + newcap; ++p) 218 *p = 0; 219 __parray_cap_ = newcap; 220 } 221 __parray_size_ = max<size_t>(__parray_size_, req_size); 222 return __parray_[index]; 223 } 224 225 // register_callback 226 227 void 228 ios_base::register_callback(event_callback fn, int index) 229 { 230 size_t req_size = __event_size_ + 1; 231 if (req_size > __event_cap_) 232 { 233 size_t newcap = __ios_new_cap<event_callback>(req_size, __event_cap_); 234 event_callback* fns = static_cast<event_callback*>(realloc(__fn_, newcap * sizeof(event_callback))); 235 if (fns == 0) 236 setstate(badbit); 237 __fn_ = fns; 238 int* indxs = static_cast<int *>(realloc(__index_, newcap * sizeof(int))); 239 if (indxs == 0) 240 setstate(badbit); 241 __index_ = indxs; 242 __event_cap_ = newcap; 243 } 244 __fn_[__event_size_] = fn; 245 __index_[__event_size_] = index; 246 ++__event_size_; 247 } 248 249 ios_base::~ios_base() 250 { 251 __call_callbacks(erase_event); 252 locale& loc_storage = *reinterpret_cast<locale*>(&__loc_); 253 loc_storage.~locale(); 254 free(__fn_); 255 free(__index_); 256 free(__iarray_); 257 free(__parray_); 258 } 259 260 // iostate 261 262 void 263 ios_base::clear(iostate state) 264 { 265 if (__rdbuf_) 266 __rdstate_ = state; 267 else 268 __rdstate_ = state | badbit; 269 #ifndef _LIBCPP_NO_EXCEPTIONS 270 if (((state | (__rdbuf_ ? goodbit : badbit)) & __exceptions_) != 0) 271 throw failure("ios_base::clear"); 272 #endif // _LIBCPP_NO_EXCEPTIONS 273 } 274 275 // init 276 277 void 278 ios_base::init(void* sb) 279 { 280 __rdbuf_ = sb; 281 __rdstate_ = __rdbuf_ ? goodbit : badbit; 282 __exceptions_ = goodbit; 283 __fmtflags_ = skipws | dec; 284 __width_ = 0; 285 __precision_ = 6; 286 __fn_ = 0; 287 __index_ = 0; 288 __event_size_ = 0; 289 __event_cap_ = 0; 290 __iarray_ = 0; 291 __iarray_size_ = 0; 292 __iarray_cap_ = 0; 293 __parray_ = 0; 294 __parray_size_ = 0; 295 __parray_cap_ = 0; 296 ::new(&__loc_) locale; 297 } 298 299 void 300 ios_base::copyfmt(const ios_base& rhs) 301 { 302 // If we can't acquire the needed resources, throw bad_alloc (can't set badbit) 303 // Don't alter *this until all needed resources are acquired 304 unique_ptr<event_callback, void (*)(void*)> new_callbacks(0, free); 305 unique_ptr<int, void (*)(void*)> new_ints(0, free); 306 unique_ptr<long, void (*)(void*)> new_longs(0, free); 307 unique_ptr<void*, void (*)(void*)> new_pointers(0, free); 308 if (__event_cap_ < rhs.__event_size_) 309 { 310 size_t newesize = sizeof(event_callback) * rhs.__event_size_; 311 new_callbacks.reset(static_cast<event_callback*>(malloc(newesize))); 312 #ifndef _LIBCPP_NO_EXCEPTIONS 313 if (!new_callbacks) 314 throw bad_alloc(); 315 #endif // _LIBCPP_NO_EXCEPTIONS 316 317 size_t newisize = sizeof(int) * rhs.__event_size_; 318 new_ints.reset(static_cast<int *>(malloc(newisize))); 319 #ifndef _LIBCPP_NO_EXCEPTIONS 320 if (!new_ints) 321 throw bad_alloc(); 322 #endif // _LIBCPP_NO_EXCEPTIONS 323 } 324 if (__iarray_cap_ < rhs.__iarray_size_) 325 { 326 size_t newsize = sizeof(long) * rhs.__iarray_size_; 327 new_longs.reset(static_cast<long*>(malloc(newsize))); 328 #ifndef _LIBCPP_NO_EXCEPTIONS 329 if (!new_longs) 330 throw bad_alloc(); 331 #endif // _LIBCPP_NO_EXCEPTIONS 332 } 333 if (__parray_cap_ < rhs.__parray_size_) 334 { 335 size_t newsize = sizeof(void*) * rhs.__parray_size_; 336 new_pointers.reset(static_cast<void**>(malloc(newsize))); 337 #ifndef _LIBCPP_NO_EXCEPTIONS 338 if (!new_pointers) 339 throw bad_alloc(); 340 #endif // _LIBCPP_NO_EXCEPTIONS 341 } 342 // Got everything we need. Copy everything but __rdstate_, __rdbuf_ and __exceptions_ 343 __fmtflags_ = rhs.__fmtflags_; 344 __precision_ = rhs.__precision_; 345 __width_ = rhs.__width_; 346 locale& lhs_loc = *reinterpret_cast<locale*>(&__loc_); 347 const locale& rhs_loc = *reinterpret_cast<const locale*>(&rhs.__loc_); 348 lhs_loc = rhs_loc; 349 if (__event_cap_ < rhs.__event_size_) 350 { 351 free(__fn_); 352 __fn_ = new_callbacks.release(); 353 free(__index_); 354 __index_ = new_ints.release(); 355 __event_cap_ = rhs.__event_size_; 356 } 357 for (__event_size_ = 0; __event_size_ < rhs.__event_size_; ++__event_size_) 358 { 359 __fn_[__event_size_] = rhs.__fn_[__event_size_]; 360 __index_[__event_size_] = rhs.__index_[__event_size_]; 361 } 362 if (__iarray_cap_ < rhs.__iarray_size_) 363 { 364 free(__iarray_); 365 __iarray_ = new_longs.release(); 366 __iarray_cap_ = rhs.__iarray_size_; 367 } 368 for (__iarray_size_ = 0; __iarray_size_ < rhs.__iarray_size_; ++__iarray_size_) 369 __iarray_[__iarray_size_] = rhs.__iarray_[__iarray_size_]; 370 if (__parray_cap_ < rhs.__parray_size_) 371 { 372 free(__parray_); 373 __parray_ = new_pointers.release(); 374 __parray_cap_ = rhs.__parray_size_; 375 } 376 for (__parray_size_ = 0; __parray_size_ < rhs.__parray_size_; ++__parray_size_) 377 __parray_[__parray_size_] = rhs.__parray_[__parray_size_]; 378 } 379 380 void 381 ios_base::move(ios_base& rhs) 382 { 383 // *this is uninitialized 384 __fmtflags_ = rhs.__fmtflags_; 385 __precision_ = rhs.__precision_; 386 __width_ = rhs.__width_; 387 __rdstate_ = rhs.__rdstate_; 388 __exceptions_ = rhs.__exceptions_; 389 __rdbuf_ = 0; 390 locale& rhs_loc = *reinterpret_cast<locale*>(&rhs.__loc_); 391 ::new(&__loc_) locale(rhs_loc); 392 __fn_ = rhs.__fn_; 393 rhs.__fn_ = 0; 394 __index_ = rhs.__index_; 395 rhs.__index_ = 0; 396 __event_size_ = rhs.__event_size_; 397 rhs.__event_size_ = 0; 398 __event_cap_ = rhs.__event_cap_; 399 rhs.__event_cap_ = 0; 400 __iarray_ = rhs.__iarray_; 401 rhs.__iarray_ = 0; 402 __iarray_size_ = rhs.__iarray_size_; 403 rhs.__iarray_size_ = 0; 404 __iarray_cap_ = rhs.__iarray_cap_; 405 rhs.__iarray_cap_ = 0; 406 __parray_ = rhs.__parray_; 407 rhs.__parray_ = 0; 408 __parray_size_ = rhs.__parray_size_; 409 rhs.__parray_size_ = 0; 410 __parray_cap_ = rhs.__parray_cap_; 411 rhs.__parray_cap_ = 0; 412 } 413 414 void 415 ios_base::swap(ios_base& rhs) _NOEXCEPT 416 { 417 _VSTD::swap(__fmtflags_, rhs.__fmtflags_); 418 _VSTD::swap(__precision_, rhs.__precision_); 419 _VSTD::swap(__width_, rhs.__width_); 420 _VSTD::swap(__rdstate_, rhs.__rdstate_); 421 _VSTD::swap(__exceptions_, rhs.__exceptions_); 422 locale& lhs_loc = *reinterpret_cast<locale*>(&__loc_); 423 locale& rhs_loc = *reinterpret_cast<locale*>(&rhs.__loc_); 424 _VSTD::swap(lhs_loc, rhs_loc); 425 _VSTD::swap(__fn_, rhs.__fn_); 426 _VSTD::swap(__index_, rhs.__index_); 427 _VSTD::swap(__event_size_, rhs.__event_size_); 428 _VSTD::swap(__event_cap_, rhs.__event_cap_); 429 _VSTD::swap(__iarray_, rhs.__iarray_); 430 _VSTD::swap(__iarray_size_, rhs.__iarray_size_); 431 _VSTD::swap(__iarray_cap_, rhs.__iarray_cap_); 432 _VSTD::swap(__parray_, rhs.__parray_); 433 _VSTD::swap(__parray_size_, rhs.__parray_size_); 434 _VSTD::swap(__parray_cap_, rhs.__parray_cap_); 435 } 436 437 void 438 ios_base::__set_badbit_and_consider_rethrow() 439 { 440 __rdstate_ |= badbit; 441 #ifndef _LIBCPP_NO_EXCEPTIONS 442 if (__exceptions_ & badbit) 443 throw; 444 #endif // _LIBCPP_NO_EXCEPTIONS 445 } 446 447 void 448 ios_base::__set_failbit_and_consider_rethrow() 449 { 450 __rdstate_ |= failbit; 451 #ifndef _LIBCPP_NO_EXCEPTIONS 452 if (__exceptions_ & failbit) 453 throw; 454 #endif // _LIBCPP_NO_EXCEPTIONS 455 } 456 457 bool 458 ios_base::sync_with_stdio(bool sync) 459 { 460 static bool previous_state = true; 461 bool r = previous_state; 462 previous_state = sync; 463 return r; 464 } 465 466 _LIBCPP_END_NAMESPACE_STD 467