/*
 * Copyright (C) 1997-2001 Id Software, Inc.
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or (at
 * your option) any later version.
 *
 * This program is distributed in the hope that it will be useful, but
 * WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 *
 * See the GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
 * 02111-1307, USA.
 *
 * =======================================================================
 *
 * Server zone, server side of memory management
 *
 * =======================================================================
 */

#include "header/common.h"

void
SZ_Init(sizebuf_t *buf, byte *data, int length)
{
	memset(buf, 0, sizeof(*buf));
	buf->data = data;
	buf->maxsize = length;
}

void
SZ_Clear(sizebuf_t *buf)
{
	buf->cursize = 0;
	buf->overflowed = false;
}

void *
SZ_GetSpace(sizebuf_t *buf, int length)
{
	void *data;

	if (buf->cursize + length > buf->maxsize)
	{
		if (!buf->allowoverflow)
		{
			Com_Error(ERR_FATAL, "%s: overflow without allowoverflow set",
				__func__);
		}

		if (length > buf->maxsize)
		{
			Com_Error(ERR_FATAL, "%s: %i is > full buffer size",
					__func__, length);
		}

		SZ_Clear(buf);
		buf->overflowed = true;
		Com_Printf("%s: overflow\n", __func__);
	}

	data = buf->data + buf->cursize;
	buf->cursize += length;

	return data;
}

void
SZ_Write(sizebuf_t *buf, const void *data, int length)
{
	if(length > 0)
		memcpy(SZ_GetSpace(buf, length), data, length);
}

void
SZ_Print(sizebuf_t *buf, const char *data)
{
	int len;

	len = (int)strlen(data) + 1;

	if (buf->cursize)
	{
		if (buf->data[buf->cursize - 1])
		{
			memcpy((byte *)SZ_GetSpace(buf, len), data, len); /* no trailing 0 */
		}
		else
		{
			memcpy((byte *)SZ_GetSpace(buf, len - 1) - 1, data, len); /* write over trailing 0 */
		}
	}
	else
	{
		memcpy((byte *)SZ_GetSpace(buf, len), data, len);
	}
}

