#include "StreamWriter.h"

#include "llvm/ADT/StringExtras.h"

#include "llvm/Support/Format.h"

#include <cctype>

using namespace llvm::support;

namespace llvm {

raw_ostream &operator<<(raw_ostream &OS, const HexNumber& Value) {

uint64_t N = Value.Value;

// Zero is a special case.

if (N == 0)

return OS << "0x0";

char NumberBuffer[20];

char *EndPtr = NumberBuffer + sizeof(NumberBuffer);

char *CurPtr = EndPtr;

while (N) {

uintptr_t X = N % 16;

*--CurPtr = (X < 10 ? '0' + X : 'A' + X - 10);

N /= 16;

}

OS << "0x";

return OS.write(CurPtr, EndPtr - CurPtr);

}

void StreamWriter::printBinaryImpl(StringRef Label, StringRef Str,

ArrayRef<uint8_t> Data, bool Block) {

if (Data.size() > 16)

Block = true;

if (Block) {

startLine() << Label;

if (Str.size() > 0)

OS << ": " << Str;

OS << " (\n";

for (size_t addr = 0, end = Data.size(); addr < end; addr += 16) {

startLine() << format(" %04" PRIX64 ": ", uint64_t(addr));

// Dump line of hex.

for (size_t i = 0; i < 16; ++i) {

if (i != 0 && i % 4 == 0)

OS << ' ';

if (addr + i < end)

OS << hexdigit((Data[addr + i] >> 4) & 0xF, false)

<< hexdigit(Data[addr + i] & 0xF, false);

else

OS << " ";

}

// Print ascii.

OS << " |";

for (std::size_t i = 0; i < 16 && addr + i < end; ++i) {

if (std::isprint(Data[addr + i] & 0xFF))

OS << Data[addr + i];

else

OS << ".";

}

OS << "|\n";

}

startLine() << ")\n";

} else {

startLine() << Label << ":";

if (Str.size() > 0)

OS << " " << Str;

OS << " (";

for (size_t i = 0; i < Data.size(); ++i) {

if (i > 0)

OS << " ";

OS << format("%02X", static_cast<int>(Data[i]));

}

OS << ")\n";

}

}

} // namespace llvm