contrib/llvm/lib/Support/raw_ostream.cpp

   1 //===--- raw_ostream.cpp - Implement the raw_ostream classes --------------===//
   2 //
   3 //                     The LLVM Compiler Infrastructure
   4 //
   5 // This file is distributed under the University of Illinois Open Source
   6 // License. See LICENSE.TXT for details.
   7 //
   8 //===----------------------------------------------------------------------===//
   9 //
  10 // This implements support for bulk buffered stream output.
  11 //
  12 //===----------------------------------------------------------------------===//
  13
  14 #include "llvm/Support/raw_ostream.h"
  15 #include "llvm/ADT/STLExtras.h"
  16 #include "llvm/ADT/SmallVector.h"
  17 #include "llvm/ADT/StringExtras.h"
  18 #include "llvm/Config/config.h"
  19 #include "llvm/Support/Compiler.h"
  20 #include "llvm/Support/ErrorHandling.h"
  21 #include "llvm/Support/FileSystem.h"
  22 #include "llvm/Support/Format.h"
  23 #include "llvm/Support/FormatVariadic.h"
  24 #include "llvm/Support/MathExtras.h"
  25 #include "llvm/Support/NativeFormatting.h"
  26 #include "llvm/Support/Process.h"
  27 #include "llvm/Support/Program.h"
  28 #include <algorithm>
  29 #include <cctype>
  30 #include <cerrno>
  31 #include <cstdio>
  32 #include <iterator>
  33 #include <sys/stat.h>
  34 #include <system_error>
  35
  36 // <fcntl.h> may provide O_BINARY.
  37 #if defined(HAVE_FCNTL_H)
  38 # include <fcntl.h>
  39 #endif
  40
  41 #if defined(HAVE_UNISTD_H)
  42 # include <unistd.h>
  43 #endif
  44 #if defined(HAVE_SYS_UIO_H) && defined(HAVE_WRITEV)
  45 #  include <sys/uio.h>
  46 #endif
  47
  48 #if defined(__CYGWIN__)
  49 #include <io.h>
  50 #endif
  51
  52 #if defined(_MSC_VER)
  53 #include <io.h>
  54 #ifndef STDIN_FILENO
  55 # define STDIN_FILENO 0
  56 #endif
  57 #ifndef STDOUT_FILENO
  58 # define STDOUT_FILENO 1
  59 #endif
  60 #ifndef STDERR_FILENO
  61 # define STDERR_FILENO 2
  62 #endif
  63 #endif
  64
  65 #ifdef LLVM_ON_WIN32
  66 #include "Windows/WindowsSupport.h"
  67 #endif
  68
  69 using namespace llvm;
  70
  71 raw_ostream::~raw_ostream() {
  72   // raw_ostream's subclasses should take care to flush the buffer
  73   // in their destructors.
  74   assert(OutBufCur == OutBufStart &&
  75          "raw_ostream destructor called with non-empty buffer!");
  76
  77   if (BufferMode == InternalBuffer)
  78     delete [] OutBufStart;
  79 }
  80
  81 // An out of line virtual method to provide a home for the class vtable.
  82 void raw_ostream::handle() {}
  83
  84 size_t raw_ostream::preferred_buffer_size() const {
  85   // BUFSIZ is intended to be a reasonable default.
  86   return BUFSIZ;
  87 }
  88
  89 void raw_ostream::SetBuffered() {
  90   // Ask the subclass to determine an appropriate buffer size.
  91   if (size_t Size = preferred_buffer_size())
  92     SetBufferSize(Size);
  93   else
  94     // It may return 0, meaning this stream should be unbuffered.
  95     SetUnbuffered();
  96 }
  97
  98 void raw_ostream::SetBufferAndMode(char *BufferStart, size_t Size,
  99                                    BufferKind Mode) {
 100   assert(((Mode == Unbuffered && !BufferStart && Size == 0) ||
 101           (Mode != Unbuffered && BufferStart && Size != 0)) &&
 102          "stream must be unbuffered or have at least one byte");
 103   // Make sure the current buffer is free of content (we can't flush here; the
 104   // child buffer management logic will be in write_impl).
 105   assert(GetNumBytesInBuffer() == 0 && "Current buffer is non-empty!");
 106
 107   if (BufferMode == InternalBuffer)
 108     delete [] OutBufStart;
 109   OutBufStart = BufferStart;
 110   OutBufEnd = OutBufStart+Size;
 111   OutBufCur = OutBufStart;
 112   BufferMode = Mode;
 113
 114   assert(OutBufStart <= OutBufEnd && "Invalid size!");
 115 }
 116
 117 raw_ostream &raw_ostream::operator<<(unsigned long N) {
 118   write_integer(*this, static_cast<uint64_t>(N), 0, IntegerStyle::Integer);
 119   return *this;
 120 }
 121
 122 raw_ostream &raw_ostream::operator<<(long N) {
 123   write_integer(*this, static_cast<int64_t>(N), 0, IntegerStyle::Integer);
 124   return *this;
 125 }
 126
 127 raw_ostream &raw_ostream::operator<<(unsigned long long N) {
 128   write_integer(*this, static_cast<uint64_t>(N), 0, IntegerStyle::Integer);
 129   return *this;
 130 }
 131
 132 raw_ostream &raw_ostream::operator<<(long long N) {
 133   write_integer(*this, static_cast<int64_t>(N), 0, IntegerStyle::Integer);
 134   return *this;
 135 }
 136
 137 raw_ostream &raw_ostream::write_hex(unsigned long long N) {
 138   llvm::write_hex(*this, N, HexPrintStyle::Lower);
 139   return *this;
 140 }
 141
 142 raw_ostream &raw_ostream::write_escaped(StringRef Str,
 143                                         bool UseHexEscapes) {
 144   for (unsigned char c : Str) {
 145     switch (c) {
 146     case '\\':
 147       *this << '\\' << '\\';
 148       break;
 149     case '\t':
 150       *this << '\\' << 't';
 151       break;
 152     case '\n':
 153       *this << '\\' << 'n';
 154       break;
 155     case '"':
 156       *this << '\\' << '"';
 157       break;
 158     default:
 159       if (std::isprint(c)) {
 160         *this << c;
 161         break;
 162       }
 163
 164       // Write out the escaped representation.
 165       if (UseHexEscapes) {
 166         *this << '\\' << 'x';
 167         *this << hexdigit((c >> 4 & 0xF));
 168         *this << hexdigit((c >> 0) & 0xF);
 169       } else {
 170         // Always use a full 3-character octal escape.
 171         *this << '\\';
 172         *this << char('0' + ((c >> 6) & 7));
 173         *this << char('0' + ((c >> 3) & 7));
 174         *this << char('0' + ((c >> 0) & 7));
 175       }
 176     }
 177   }
 178
 179   return *this;
 180 }
 181
 182 raw_ostream &raw_ostream::operator<<(const void *P) {
 183   llvm::write_hex(*this, (uintptr_t)P, HexPrintStyle::PrefixLower);
 184   return *this;
 185 }
 186
 187 raw_ostream &raw_ostream::operator<<(double N) {
 188   llvm::write_double(*this, N, FloatStyle::Exponent);
 189   return *this;
 190 }
 191
 192 void raw_ostream::flush_nonempty() {
 193   assert(OutBufCur > OutBufStart && "Invalid call to flush_nonempty.");
 194   size_t Length = OutBufCur - OutBufStart;
 195   OutBufCur = OutBufStart;
 196   write_impl(OutBufStart, Length);
 197 }
 198
 199 raw_ostream &raw_ostream::write(unsigned char C) {
 200   // Group exceptional cases into a single branch.
 201   if (LLVM_UNLIKELY(OutBufCur >= OutBufEnd)) {
 202     if (LLVM_UNLIKELY(!OutBufStart)) {
 203       if (BufferMode == Unbuffered) {
 204         write_impl(reinterpret_cast<char*>(&C), 1);
 205         return *this;
 206       }
 207       // Set up a buffer and start over.
 208       SetBuffered();
 209       return write(C);
 210     }
 211
 212     flush_nonempty();
 213   }
 214
 215   *OutBufCur++ = C;
 216   return *this;
 217 }
 218
 219 raw_ostream &raw_ostream::write(const char *Ptr, size_t Size) {
 220   // Group exceptional cases into a single branch.
 221   if (LLVM_UNLIKELY(size_t(OutBufEnd - OutBufCur) < Size)) {
 222     if (LLVM_UNLIKELY(!OutBufStart)) {
 223       if (BufferMode == Unbuffered) {
 224         write_impl(Ptr, Size);
 225         return *this;
 226       }
 227       // Set up a buffer and start over.
 228       SetBuffered();
 229       return write(Ptr, Size);
 230     }
 231
 232     size_t NumBytes = OutBufEnd - OutBufCur;
 233
 234     // If the buffer is empty at this point we have a string that is larger
 235     // than the buffer. Directly write the chunk that is a multiple of the
 236     // preferred buffer size and put the remainder in the buffer.
 237     if (LLVM_UNLIKELY(OutBufCur == OutBufStart)) {
 238       assert(NumBytes != 0 && "undefined behavior");
 239       size_t BytesToWrite = Size - (Size % NumBytes);
 240       write_impl(Ptr, BytesToWrite);
 241       size_t BytesRemaining = Size - BytesToWrite;
 242       if (BytesRemaining > size_t(OutBufEnd - OutBufCur)) {
 243         // Too much left over to copy into our buffer.
 244         return write(Ptr + BytesToWrite, BytesRemaining);
 245       }
 246       copy_to_buffer(Ptr + BytesToWrite, BytesRemaining);
 247       return *this;
 248     }
 249
 250     // We don't have enough space in the buffer to fit the string in. Insert as
 251     // much as possible, flush and start over with the remainder.
 252     copy_to_buffer(Ptr, NumBytes);
 253     flush_nonempty();
 254     return write(Ptr + NumBytes, Size - NumBytes);
 255   }
 256
 257   copy_to_buffer(Ptr, Size);
 258
 259   return *this;
 260 }
 261
 262 void raw_ostream::copy_to_buffer(const char *Ptr, size_t Size) {
 263   assert(Size <= size_t(OutBufEnd - OutBufCur) && "Buffer overrun!");
 264
 265   // Handle short strings specially, memcpy isn't very good at very short
 266   // strings.
 267   switch (Size) {
 268   case 4: OutBufCur[3] = Ptr[3]; LLVM_FALLTHROUGH;
 269   case 3: OutBufCur[2] = Ptr[2]; LLVM_FALLTHROUGH;
 270   case 2: OutBufCur[1] = Ptr[1]; LLVM_FALLTHROUGH;
 271   case 1: OutBufCur[0] = Ptr[0]; LLVM_FALLTHROUGH;
 272   case 0: break;
 273   default:
 274     memcpy(OutBufCur, Ptr, Size);
 275     break;
 276   }
 277
 278   OutBufCur += Size;
 279 }
 280
 281 // Formatted output.
 282 raw_ostream &raw_ostream::operator<<(const format_object_base &Fmt) {
 283   // If we have more than a few bytes left in our output buffer, try
 284   // formatting directly onto its end.
 285   size_t NextBufferSize = 127;
 286   size_t BufferBytesLeft = OutBufEnd - OutBufCur;
 287   if (BufferBytesLeft > 3) {
 288     size_t BytesUsed = Fmt.print(OutBufCur, BufferBytesLeft);
 289
 290     // Common case is that we have plenty of space.
 291     if (BytesUsed <= BufferBytesLeft) {
 292       OutBufCur += BytesUsed;
 293       return *this;
 294     }
 295
 296     // Otherwise, we overflowed and the return value tells us the size to try
 297     // again with.
 298     NextBufferSize = BytesUsed;
 299   }
 300
 301   // If we got here, we didn't have enough space in the output buffer for the
 302   // string.  Try printing into a SmallVector that is resized to have enough
 303   // space.  Iterate until we win.
 304   SmallVector<char, 128> V;
 305
 306   while (true) {
 307     V.resize(NextBufferSize);
 308
 309     // Try formatting into the SmallVector.
 310     size_t BytesUsed = Fmt.print(V.data(), NextBufferSize);
 311
 312     // If BytesUsed fit into the vector, we win.
 313     if (BytesUsed <= NextBufferSize)
 314       return write(V.data(), BytesUsed);
 315
 316     // Otherwise, try again with a new size.
 317     assert(BytesUsed > NextBufferSize && "Didn't grow buffer!?");
 318     NextBufferSize = BytesUsed;
 319   }
 320 }
 321
 322 raw_ostream &raw_ostream::operator<<(const formatv_object_base &Obj) {
 323   SmallString<128> S;
 324   Obj.format(*this);
 325   return *this;
 326 }
 327
 328 raw_ostream &raw_ostream::operator<<(const FormattedString &FS) {
 329   if (FS.Str.size() >= FS.Width || FS.Justify == FormattedString::JustifyNone) {
 330     this->operator<<(FS.Str);
 331     return *this;
 332   }
 333   const size_t Difference = FS.Width - FS.Str.size();
 334   switch (FS.Justify) {
 335   case FormattedString::JustifyLeft:
 336     this->operator<<(FS.Str);
 337     this->indent(Difference);
 338     break;
 339   case FormattedString::JustifyRight:
 340     this->indent(Difference);
 341     this->operator<<(FS.Str);
 342     break;
 343   case FormattedString::JustifyCenter: {
 344     int PadAmount = Difference / 2;
 345     this->indent(PadAmount);
 346     this->operator<<(FS.Str);
 347     this->indent(Difference - PadAmount);
 348     break;
 349   }
 350   default:
 351     llvm_unreachable("Bad Justification");
 352   }
 353   return *this;
 354 }
 355
 356 raw_ostream &raw_ostream::operator<<(const FormattedNumber &FN) {
 357   if (FN.Hex) {
 358     HexPrintStyle Style;
 359     if (FN.Upper && FN.HexPrefix)
 360       Style = HexPrintStyle::PrefixUpper;
 361     else if (FN.Upper && !FN.HexPrefix)
 362       Style = HexPrintStyle::Upper;
 363     else if (!FN.Upper && FN.HexPrefix)
 364       Style = HexPrintStyle::PrefixLower;
 365     else
 366       Style = HexPrintStyle::Lower;
 367     llvm::write_hex(*this, FN.HexValue, Style, FN.Width);
 368   } else {
 369     llvm::SmallString<16> Buffer;
 370     llvm::raw_svector_ostream Stream(Buffer);
 371     llvm::write_integer(Stream, FN.DecValue, 0, IntegerStyle::Integer);
 372     if (Buffer.size() < FN.Width)
 373       indent(FN.Width - Buffer.size());
 374     (*this) << Buffer;
 375   }
 376   return *this;
 377 }
 378
 379 raw_ostream &raw_ostream::operator<<(const FormattedBytes &FB) {
 380   if (FB.Bytes.empty())
 381     return *this;
 382
 383   size_t LineIndex = 0;
 384   auto Bytes = FB.Bytes;
 385   const size_t Size = Bytes.size();
 386   HexPrintStyle HPS = FB.Upper ? HexPrintStyle::Upper : HexPrintStyle::Lower;
 387   uint64_t OffsetWidth = 0;
 388   if (FB.FirstByteOffset.hasValue()) {
 389     // Figure out how many nibbles are needed to print the largest offset
 390     // represented by this data set, so that we can align the offset field
 391     // to the right width.
 392     size_t Lines = Size / FB.NumPerLine;
 393     uint64_t MaxOffset = *FB.FirstByteOffset + Lines * FB.NumPerLine;
 394     unsigned Power = 0;
 395     if (MaxOffset > 0)
 396       Power = llvm::Log2_64_Ceil(MaxOffset);
 397     OffsetWidth = std::max<uint64_t>(4, llvm::alignTo(Power, 4) / 4);
 398   }
 399
 400   // The width of a block of data including all spaces for group separators.
 401   unsigned NumByteGroups =
 402       alignTo(FB.NumPerLine, FB.ByteGroupSize) / FB.ByteGroupSize;
 403   unsigned BlockCharWidth = FB.NumPerLine * 2 + NumByteGroups - 1;
 404
 405   while (!Bytes.empty()) {
 406     indent(FB.IndentLevel);
 407
 408     if (FB.FirstByteOffset.hasValue()) {
 409       uint64_t Offset = FB.FirstByteOffset.getValue();
 410       llvm::write_hex(*this, Offset + LineIndex, HPS, OffsetWidth);
 411       *this << ": ";
 412     }
 413
 414     auto Line = Bytes.take_front(FB.NumPerLine);
 415
 416     size_t CharsPrinted = 0;
 417     // Print the hex bytes for this line in groups
 418     for (size_t I = 0; I < Line.size(); ++I, CharsPrinted += 2) {
 419       if (I && (I % FB.ByteGroupSize) == 0) {
 420         ++CharsPrinted;
 421         *this << " ";
 422       }
 423       llvm::write_hex(*this, Line[I], HPS, 2);
 424     }
 425
 426     if (FB.ASCII) {
 427       // Print any spaces needed for any bytes that we didn't print on this
 428       // line so that the ASCII bytes are correctly aligned.
 429       assert(BlockCharWidth >= CharsPrinted);
 430       indent(BlockCharWidth - CharsPrinted + 2);
 431       *this << "|";
 432
 433       // Print the ASCII char values for each byte on this line
 434       for (uint8_t Byte : Line) {
 435         if (isprint(Byte))
 436           *this << static_cast<char>(Byte);
 437         else
 438           *this << '.';
 439       }
 440       *this << '|';
 441     }
 442
 443     Bytes = Bytes.drop_front(Line.size());
 444     LineIndex += Line.size();
 445     if (LineIndex < Size)
 446       *this << '\n';
 447   }
 448   return *this;
 449 }
 450
 451 /// indent - Insert 'NumSpaces' spaces.
 452 raw_ostream &raw_ostream::indent(unsigned NumSpaces) {
 453   static const char Spaces[] = "                                "
 454                                "                                "
 455                                "                ";
 456
 457   // Usually the indentation is small, handle it with a fastpath.
 458   if (NumSpaces < array_lengthof(Spaces))
 459     return write(Spaces, NumSpaces);
 460
 461   while (NumSpaces) {
 462     unsigned NumToWrite = std::min(NumSpaces,
 463                                    (unsigned)array_lengthof(Spaces)-1);
 464     write(Spaces, NumToWrite);
 465     NumSpaces -= NumToWrite;
 466   }
 467   return *this;
 468 }
 469
 470 //===----------------------------------------------------------------------===//
 471 //  Formatted Output
 472 //===----------------------------------------------------------------------===//
 473
 474 // Out of line virtual method.
 475 void format_object_base::home() {
 476 }
 477
 478 //===----------------------------------------------------------------------===//
 479 //  raw_fd_ostream
 480 //===----------------------------------------------------------------------===//
 481
 482 static int getFD(StringRef Filename, std::error_code &EC,
 483                  sys::fs::OpenFlags Flags) {
 484   // Handle "-" as stdout. Note that when we do this, we consider ourself
 485   // the owner of stdout and may set the "binary" flag globally based on Flags.
 486   if (Filename == "-") {
 487     EC = std::error_code();
 488     // If user requested binary then put stdout into binary mode if
 489     // possible.
 490     if (!(Flags & sys::fs::F_Text))
 491       sys::ChangeStdoutToBinary();
 492     return STDOUT_FILENO;
 493   }
 494
 495   int FD;
 496   EC = sys::fs::openFileForWrite(Filename, FD, Flags);
 497   if (EC)
 498     return -1;
 499
 500   return FD;
 501 }
 502
 503 raw_fd_ostream::raw_fd_ostream(StringRef Filename, std::error_code &EC,
 504                                sys::fs::OpenFlags Flags)
 505     : raw_fd_ostream(getFD(Filename, EC, Flags), true) {}
 506
 507 /// FD is the file descriptor that this writes to.  If ShouldClose is true, this
 508 /// closes the file when the stream is destroyed.
 509 raw_fd_ostream::raw_fd_ostream(int fd, bool shouldClose, bool unbuffered)
 510     : raw_pwrite_stream(unbuffered), FD(fd), ShouldClose(shouldClose),
 511       Error(false) {
 512   if (FD < 0 ) {
 513     ShouldClose = false;
 514     return;
 515   }
 516   // We do not want to close STDOUT as there may have been several uses of it
 517   // such as the case: llc %s -o=- -pass-remarks-output=- -filetype=asm
 518   // which cause multiple closes of STDOUT_FILENO and/or use-after-close of it.
 519   // Using dup() in getFD doesn't work as we end up with original STDOUT_FILENO
 520   // open anyhow.
 521   if (FD <= STDERR_FILENO)
 522     ShouldClose = false;
 523
 524   // Get the starting position.
 525   off_t loc = ::lseek(FD, 0, SEEK_CUR);
 526 #ifdef LLVM_ON_WIN32
 527   // MSVCRT's _lseek(SEEK_CUR) doesn't return -1 for pipes.
 528   sys::fs::file_status Status;
 529   std::error_code EC = status(FD, Status);
 530   SupportsSeeking = !EC && Status.type() == sys::fs::file_type::regular_file;
 531 #else
 532   SupportsSeeking = loc != (off_t)-1;
 533 #endif
 534   if (!SupportsSeeking)
 535     pos = 0;
 536   else
 537     pos = static_cast<uint64_t>(loc);
 538 }
 539
 540 raw_fd_ostream::~raw_fd_ostream() {
 541   if (FD >= 0) {
 542     flush();
 543     if (ShouldClose && sys::Process::SafelyCloseFileDescriptor(FD))
 544       error_detected();
 545   }
 546
 547 #ifdef __MINGW32__
 548   // On mingw, global dtors should not call exit().
 549   // report_fatal_error() invokes exit(). We know report_fatal_error()
 550   // might not write messages to stderr when any errors were detected
 551   // on FD == 2.
 552   if (FD == 2) return;
 553 #endif
 554
 555   // If there are any pending errors, report them now. Clients wishing
 556   // to avoid report_fatal_error calls should check for errors with
 557   // has_error() and clear the error flag with clear_error() before
 558   // destructing raw_ostream objects which may have errors.
 559   if (has_error())
 560     report_fatal_error("IO failure on output stream.", /*GenCrashDiag=*/false);
 561 }
 562
 563 void raw_fd_ostream::write_impl(const char *Ptr, size_t Size) {
 564   assert(FD >= 0 && "File already closed.");
 565   pos += Size;
 566
 567 #ifndef LLVM_ON_WIN32
 568 #if defined(__linux__)
 569   bool ShouldWriteInChunks = true;
 570 #else
 571   bool ShouldWriteInChunks = false;
 572 #endif
 573 #else
 574   // Writing a large size of output to Windows console returns ENOMEM. It seems
 575   // that, prior to Windows 8, WriteFile() is redirecting to WriteConsole(), and
 576   // the latter has a size limit (66000 bytes or less, depending on heap usage).
 577   bool ShouldWriteInChunks = !!::_isatty(FD) && !RunningWindows8OrGreater();
 578 #endif
 579
 580   do {
 581     size_t ChunkSize = Size;
 582     if (ChunkSize > 32767 && ShouldWriteInChunks)
 583         ChunkSize = 32767;
 584
 585     ssize_t ret = ::write(FD, Ptr, ChunkSize);
 586
 587     if (ret < 0) {
 588       // If it's a recoverable error, swallow it and retry the write.
 589       //
 590       // Ideally we wouldn't ever see EAGAIN or EWOULDBLOCK here, since
 591       // raw_ostream isn't designed to do non-blocking I/O. However, some
 592       // programs, such as old versions of bjam, have mistakenly used
 593       // O_NONBLOCK. For compatibility, emulate blocking semantics by
 594       // spinning until the write succeeds. If you don't want spinning,
 595       // don't use O_NONBLOCK file descriptors with raw_ostream.
 596       if (errno == EINTR || errno == EAGAIN
 597 #ifdef EWOULDBLOCK
 598           || errno == EWOULDBLOCK
 599 #endif
 600           )
 601         continue;
 602
 603       // Otherwise it's a non-recoverable error. Note it and quit.
 604       error_detected();
 605       break;
 606     }
 607
 608     // The write may have written some or all of the data. Update the
 609     // size and buffer pointer to reflect the remainder that needs
 610     // to be written. If there are no bytes left, we're done.
 611     Ptr += ret;
 612     Size -= ret;
 613   } while (Size > 0);
 614 }
 615
 616 void raw_fd_ostream::close() {
 617   assert(ShouldClose);
 618   ShouldClose = false;
 619   flush();
 620   if (sys::Process::SafelyCloseFileDescriptor(FD))
 621     error_detected();
 622   FD = -1;
 623 }
 624
 625 uint64_t raw_fd_ostream::seek(uint64_t off) {
 626   assert(SupportsSeeking && "Stream does not support seeking!");
 627   flush();
 628 #ifdef LLVM_ON_WIN32
 629   pos = ::_lseeki64(FD, off, SEEK_SET);
 630 #elif defined(HAVE_LSEEK64)
 631   pos = ::lseek64(FD, off, SEEK_SET);
 632 #else
 633   pos = ::lseek(FD, off, SEEK_SET);
 634 #endif
 635   if (pos == (uint64_t)-1)
 636     error_detected();
 637   return pos;
 638 }
 639
 640 void raw_fd_ostream::pwrite_impl(const char *Ptr, size_t Size,
 641                                  uint64_t Offset) {
 642   uint64_t Pos = tell();
 643   seek(Offset);
 644   write(Ptr, Size);
 645   seek(Pos);
 646 }
 647
 648 size_t raw_fd_ostream::preferred_buffer_size() const {
 649 #if !defined(_MSC_VER) && !defined(__MINGW32__) && !defined(__minix)
 650   // Windows and Minix have no st_blksize.
 651   assert(FD >= 0 && "File not yet open!");
 652   struct stat statbuf;
 653   if (fstat(FD, &statbuf) != 0)
 654     return 0;
 655
 656   // If this is a terminal, don't use buffering. Line buffering
 657   // would be a more traditional thing to do, but it's not worth
 658   // the complexity.
 659   if (S_ISCHR(statbuf.st_mode) && isatty(FD))
 660     return 0;
 661   // Return the preferred block size.
 662   return statbuf.st_blksize;
 663 #else
 664   return raw_ostream::preferred_buffer_size();
 665 #endif
 666 }
 667
 668 raw_ostream &raw_fd_ostream::changeColor(enum Colors colors, bool bold,
 669                                          bool bg) {
 670   if (sys::Process::ColorNeedsFlush())
 671     flush();
 672   const char *colorcode =
 673     (colors == SAVEDCOLOR) ? sys::Process::OutputBold(bg)
 674     : sys::Process::OutputColor(colors, bold, bg);
 675   if (colorcode) {
 676     size_t len = strlen(colorcode);
 677     write(colorcode, len);
 678     // don't account colors towards output characters
 679     pos -= len;
 680   }
 681   return *this;
 682 }
 683
 684 raw_ostream &raw_fd_ostream::resetColor() {
 685   if (sys::Process::ColorNeedsFlush())
 686     flush();
 687   const char *colorcode = sys::Process::ResetColor();
 688   if (colorcode) {
 689     size_t len = strlen(colorcode);
 690     write(colorcode, len);
 691     // don't account colors towards output characters
 692     pos -= len;
 693   }
 694   return *this;
 695 }
 696
 697 raw_ostream &raw_fd_ostream::reverseColor() {
 698   if (sys::Process::ColorNeedsFlush())
 699     flush();
 700   const char *colorcode = sys::Process::OutputReverse();
 701   if (colorcode) {
 702     size_t len = strlen(colorcode);
 703     write(colorcode, len);
 704     // don't account colors towards output characters
 705     pos -= len;
 706   }
 707   return *this;
 708 }
 709
 710 bool raw_fd_ostream::is_displayed() const {
 711   return sys::Process::FileDescriptorIsDisplayed(FD);
 712 }
 713
 714 bool raw_fd_ostream::has_colors() const {
 715   return sys::Process::FileDescriptorHasColors(FD);
 716 }
 717
 718 //===----------------------------------------------------------------------===//
 719 //  outs(), errs(), nulls()
 720 //===----------------------------------------------------------------------===//
 721
 722 /// outs() - This returns a reference to a raw_ostream for standard output.
 723 /// Use it like: outs() << "foo" << "bar";
 724 raw_ostream &llvm::outs() {
 725   // Set buffer settings to model stdout behavior.  Delete the file descriptor
 726   // when the program exits, forcing error detection.  This means that if you
 727   // ever call outs(), you can't open another raw_fd_ostream on stdout, as we'll
 728   // close stdout twice and print an error the second time.
 729   std::error_code EC;
 730   static raw_fd_ostream S("-", EC, sys::fs::F_None);
 731   assert(!EC);
 732   return S;
 733 }
 734
 735 /// errs() - This returns a reference to a raw_ostream for standard error.
 736 /// Use it like: errs() << "foo" << "bar";
 737 raw_ostream &llvm::errs() {
 738   // Set standard error to be unbuffered by default.
 739   static raw_fd_ostream S(STDERR_FILENO, false, true);
 740   return S;
 741 }
 742
 743 /// nulls() - This returns a reference to a raw_ostream which discards output.
 744 raw_ostream &llvm::nulls() {
 745   static raw_null_ostream S;
 746   return S;
 747 }
 748
 749 //===----------------------------------------------------------------------===//
 750 //  raw_string_ostream
 751 //===----------------------------------------------------------------------===//
 752
 753 raw_string_ostream::~raw_string_ostream() {
 754   flush();
 755 }
 756
 757 void raw_string_ostream::write_impl(const char *Ptr, size_t Size) {
 758   OS.append(Ptr, Size);
 759 }
 760
 761 //===----------------------------------------------------------------------===//
 762 //  raw_svector_ostream
 763 //===----------------------------------------------------------------------===//
 764
 765 uint64_t raw_svector_ostream::current_pos() const { return OS.size(); }
 766
 767 void raw_svector_ostream::write_impl(const char *Ptr, size_t Size) {
 768   OS.append(Ptr, Ptr + Size);
 769 }
 770
 771 void raw_svector_ostream::pwrite_impl(const char *Ptr, size_t Size,
 772                                       uint64_t Offset) {
 773   memcpy(OS.data() + Offset, Ptr, Size);
 774 }
 775
 776 //===----------------------------------------------------------------------===//
 777 //  raw_null_ostream
 778 //===----------------------------------------------------------------------===//
 779
 780 raw_null_ostream::~raw_null_ostream() {
 781 #ifndef NDEBUG
 782   // ~raw_ostream asserts that the buffer is empty. This isn't necessary
 783   // with raw_null_ostream, but it's better to have raw_null_ostream follow
 784   // the rules than to change the rules just for raw_null_ostream.
 785   flush();
 786 #endif
 787 }
 788
 789 void raw_null_ostream::write_impl(const char *Ptr, size_t Size) {
 790 }
 791
 792 uint64_t raw_null_ostream::current_pos() const {
 793   return 0;
 794 }
 795
 796 void raw_null_ostream::pwrite_impl(const char *Ptr, size_t Size,
 797                                    uint64_t Offset) {}