Initial import of the CDE 2.1.30 sources from the Open Group.

cde/programs/nsgmls/OutputCharStream.C

@@ -0,0 +1,247 @@
+/* $XConsortium: OutputCharStream.C /main/1 1996/07/29 16:59:34 cde-hp $ */
+// Copyright (c) 1994 James Clark
+// See the file COPYING for copying permission.
+
+#include "splib.h"
+#include "OutputCharStream.h"
+#include "CodingSystem.h"
+#include "macros.h"
+#include <iostream.h>
+#include <stdio.h>
+
+#ifdef SP_NAMESPACE
+namespace SP_NAMESPACE {
+#endif
+
+OutputCharStream::OutputCharStream()
+: ptr_(0), end_(0), escaper_(0)
+{
+}
+
+OutputCharStream::~OutputCharStream()
+{
+}
+
+OutputCharStream &OutputCharStream::write(const Char *s, size_t n)
+{
+  for (;;) {
+    size_t spare = end_ - ptr_;
+    if (n <= spare) {
+      memcpy(ptr_, s, n*sizeof(Char));
+      ptr_ += n;
+      break;
+    }
+    if (spare > 0) {
+      memcpy(ptr_, s, spare*sizeof(Char));
+      ptr_ += spare;
+      s += spare;
+      n -= spare;
+    }
+    n--;
+    flushBuf(*s++);
+  }
+  return *this;
+}
+
+OutputCharStream &OutputCharStream::operator<<(const char *s)
+{
+  while (*s)
+    put(*s++);
+  return *this;
+}
+
+// FIXME Avoid stdio
+
+OutputCharStream &OutputCharStream::operator<<(unsigned long n)
+{
+  char buf[sizeof(unsigned long)*3 + 1];
+  sprintf(buf, "%lu", n);
+  return *this << buf;
+}
+
+OutputCharStream &OutputCharStream::operator<<(int n)
+{
+  char buf[sizeof(int)*3 + 2];
+  sprintf(buf, "%d", n);
+  return *this << buf;
+}
+
+
+IosOutputCharStream::IosOutputCharStream()
+: buf_(0), byteStream_(0)
+{
+}
+
+IosOutputCharStream::IosOutputCharStream(streambuf *byteStream,
+					 const OutputCodingSystem *codingSystem)
+: buf_(0),
+  byteStream_(byteStream),
+  ownedEncoder_(codingSystem->makeEncoder())
+{
+  encoder_ = ownedEncoder_.pointer();
+  encoder_->setUnencodableHandler(this);
+  allocBuf(codingSystem->fixedBytesPerChar());
+  encoder_->startFile(byteStream_);
+}
+
+IosOutputCharStream::IosOutputCharStream(streambuf *byteStream,
+					 Encoder *encoder)
+: buf_(0),
+  byteStream_(byteStream),
+  encoder_(encoder)
+{
+  allocBuf(0);
+}
+
+IosOutputCharStream::~IosOutputCharStream()
+{
+  if (byteStream_)
+    flush();
+  delete [] buf_;
+}
+
+void IosOutputCharStream::open(streambuf *byteStream,
+			       const OutputCodingSystem *codingSystem)
+{
+  if (byteStream_)
+    flush();
+  byteStream_ = byteStream;
+  ownedEncoder_ = codingSystem->makeEncoder();
+  encoder_ = ownedEncoder_.pointer();
+  encoder_->setUnencodableHandler(this);
+  delete [] buf_;
+  buf_ = 0;
+  ptr_ = end_ = buf_;
+  allocBuf(codingSystem->fixedBytesPerChar());
+  encoder_->startFile(byteStream_);
+}
+
+void IosOutputCharStream::flush()
+{
+  if (ptr_ > buf_) {
+    encoder_->output(buf_, ptr_ - buf_, byteStream_);
+    ptr_ = buf_;
+  }
+  byteStream_->sync();
+}
+
+void IosOutputCharStream::flushBuf(Char c)
+{
+  ASSERT(buf_ != 0);
+  encoder_->output(buf_, ptr_ - buf_, byteStream_);
+  ptr_ = buf_;
+  *ptr_++ = c;
+}
+
+void IosOutputCharStream::allocBuf(int bytesPerChar)
+{
+  const int blockSize = 1024;
+  size_t bufSize = bytesPerChar ? blockSize/bytesPerChar : blockSize;
+  ptr_ = buf_ = new Char[bufSize];
+  end_ = buf_ + bufSize;
+}
+
+void IosOutputCharStream::handleUnencodable(Char c, streambuf *)
+{
+  IosOutputCharStream tem(byteStream_, encoder_);
+  escape(tem, c);
+}
+
+StrOutputCharStream::StrOutputCharStream()
+: buf_(0), bufSize_(0)
+{
+  sync(0);
+}
+
+StrOutputCharStream::~StrOutputCharStream()
+{
+  delete [] buf_;
+}
+
+void StrOutputCharStream::extractString(StringC &str)
+{
+  str.assign(buf_, ptr_ - buf_);
+  sync(0);
+}
+
+void StrOutputCharStream::flushBuf(Char c)
+{
+  size_t used = ptr_ - buf_;
+  size_t oldSize = bufSize_;
+  bufSize_ = oldSize ? 2*oldSize : 10;
+  Char *oldBuf = buf_;
+  buf_ = new Char[bufSize_];
+  if (oldSize) {
+    memcpy(buf_, oldBuf, oldSize * sizeof(Char));
+    delete [] oldBuf;
+  }
+  sync(used);
+  *ptr_++ = c;
+}
+
+void StrOutputCharStream::flush()
+{
+}
+
+void StrOutputCharStream::sync(size_t length)
+{
+  ptr_ = buf_ + length;
+  end_ = buf_ + bufSize_;
+}
+
+RecordOutputCharStream::RecordOutputCharStream(OutputCharStream *os)
+: os_(os)
+{
+  ptr_ = buf_;
+  end_ = buf_ + bufSize_;
+}
+
+RecordOutputCharStream::~RecordOutputCharStream()
+{
+  outputBuf();
+  delete os_;
+}
+
+void RecordOutputCharStream::flush()
+{
+  outputBuf();
+  os_->flush();
+}
+
+void RecordOutputCharStream::flushBuf(Char c)
+{
+  outputBuf();
+  *ptr_++ = c;
+}
+
+void RecordOutputCharStream::outputBuf()
+{
+  Char *start = buf_;
+  Char *p = start;
+  while (p < ptr_) {
+    switch (*p) {
+    case '\r':			// translate RE to newline
+      if (start < p)
+	os_->write(start, p - start);
+      start = ++p;
+      *os_ << newline;
+      break;
+    case '\n':			// ignore RS
+      if (start < p)
+	os_->write(start, p - start);
+      start = ++p;
+      break;
+    default:
+      ++p;
+      break;
+    }
+  }
+  if (start < p)
+    os_->write(start, p - start);
+  ptr_ = buf_;
+  end_ = buf_ + bufSize_;
+}
+
+#ifdef SP_NAMESPACE
+}
+#endif