#include "alutInternal.h"
#include <string.h>

struct OutputStream_struct
{
  char *data;
  char *current;
  size_t maximumLength;
};

/****************************************************************************
 * The functions below know the internal OutputStream representation.
 ****************************************************************************/

OutputStream *
_alutOutputStreamConstruct (size_t maximumLength)
{
  OutputStream *stream = (OutputStream *) _alutMalloc (sizeof (OutputStream));
  if (stream == NULL)
    {
      return NULL;
    }
  stream->data = _alutMalloc (maximumLength);
  if (stream->data == NULL)
    {
      free (stream);
      return NULL;
    }
  stream->current = stream->data;
  stream->maximumLength = maximumLength;
  return stream;
}

ALboolean
_alutOutputStreamDestroy (OutputStream *stream)
{
  free (stream->data);
  free (stream);
  return AL_TRUE;
}

void *
_alutOutputStreamGetData (OutputStream *stream)
{
  return stream->data;
}

size_t
_alutOutputStreamGetLength (OutputStream *stream)
{
  return stream->current - stream->data;
}

static ALboolean
streamWrite (OutputStream *stream, const void *ptr, size_t numBytesToWrite)
{
  size_t remainingLength =
    stream->maximumLength - _alutOutputStreamGetLength (stream);
  if (remainingLength < numBytesToWrite)
    {
      /* this should never happen within our library */
      _alutSetError (ALUT_ERROR_IO_ERROR);
      return AL_FALSE;
    }
  memcpy (stream->current, ptr, numBytesToWrite);
  stream->current += numBytesToWrite;
  return AL_TRUE;
}

/****************************************************************************
 * The utility functions below do not know the internal OutputStream
 * representation.
 ****************************************************************************/

ALboolean
_alutOutputStreamWriteInt16BE (OutputStream *stream, Int16BigEndian value)
{
  unsigned char buf[2];
  buf[0] = (unsigned char) (value >> 8);
  buf[1] = (unsigned char) value;
  return streamWrite (stream, buf, 2);
}

ALboolean
_alutOutputStreamWriteInt32BE (OutputStream *stream, Int32BigEndian value)
{
  unsigned char buf[4];
  buf[0] = (unsigned char) (value >> 24);
  buf[1] = (unsigned char) (value >> 16);
  buf[2] = (unsigned char) (value >> 8);
  buf[3] = (unsigned char) value;
  return streamWrite (stream, buf, 4);
}