/*
   +----------------------------------------------------------------------+
   | PHP Version 4                                                        |
   +----------------------------------------------------------------------+
   | Copyright (c) 1997-2002 The PHP Group                                |
   +----------------------------------------------------------------------+
   | This source file is subject to version 2.02 of the PHP license,      |
   | that is bundled with this package in the file LICENSE, and is        |
   | available at through the world-wide-web at                           |
   | http://www.php.net/license/2_02.txt.                                 |
   | If you did not receive a copy of the PHP license and are unable to   |
   | obtain it through the world-wide-web, please send a note to          |
   | license@php.net so we can mail you a copy immediately.               |
   +----------------------------------------------------------------------+
   | Author: Sascha Schumann <sascha@schumann.cx>                         |
   +----------------------------------------------------------------------+
 */

#ifndef PHP_SMART_STR_H
#define PHP_SMART_STR_H

#include "php_smart_str_public.h"

#include <stdlib.h>
#include <zend.h>

#define smart_str_0(x) do { if ((x)->c) { (x)->c[(x)->len] = '\0'; } } while (0)

#ifndef SMART_STR_PREALLOC
#define SMART_STR_PREALLOC 128
#endif

#define smart_str_alloc(d, n, what) {\
	if (!d->c) d->len = d->a = 0; \
	newlen = d->len + n; \
	if (newlen >= d->a) {\
		d->c = perealloc(d->c, newlen + SMART_STR_PREALLOC + 1, what); \
		d->a = newlen + SMART_STR_PREALLOC; \
	}\
}

#define smart_str_appends_ex(dest, src, what) smart_str_appendl_ex(dest, src, strlen(src), what)
#define smart_str_appends(dest, src) smart_str_appendl(dest, src, strlen(src))

#define smart_str_appendc(dest, c) smart_str_appendc_ex(dest, c, 0)
#define smart_str_free(s) smart_str_free_ex(s, 0)
#define smart_str_appendl(dest, src, len) smart_str_appendl_ex(dest, src, len, 0)
#define smart_str_append(dest, src) smart_str_append_ex(dest, src, 0)
#define smart_str_append_long(dest, val) smart_str_append_long_ex(dest, val, 0)
#define smart_str_append_unsigned(dest, val) smart_str_append_unsigned_ex(dest, val, 0)

static inline void smart_str_appendc_ex(smart_str *dest, unsigned char c, int what)
{
	size_t newlen;

	smart_str_alloc(dest, 1, what);
	dest->len = newlen;
	((unsigned char *) dest->c)[dest->len - 1] = c;
}


static inline void smart_str_free_ex(smart_str *s, int what)
{
	if (s->c) {
		pefree(s->c, what);
		s->c = NULL;
	}
	s->a = s->len = 0;
}

static inline void smart_str_appendl_ex(smart_str *dest, const char *src, size_t len, int what)
{
	size_t newlen;

	smart_str_alloc(dest, len, what);
	memcpy(dest->c + dest->len, src, len);
	dest->len = newlen;
}

/* buf points to the END of the buffer */
static inline char *smart_str_print_unsigned(char *buf, unsigned long num)
{
	char *p = buf;
	
	*p = '\0';
	do {
		*--p = (char)(num % 10) + '0';
		num /= 10;
	} while (num > 0);

	return p;
}

/* buf points to the END of the buffer */
static inline char *smart_str_print_long(char *buf, long num)
{
	char *p;
	
	if (num < 0) {
		/* this might cause problems when dealing with LONG_MIN
		   and machines which don't support long long.  Works
		   flawlessly on 32bit x86 */
		p = smart_str_print_unsigned(buf, -num);
		*--p = '-';
	} else {
		p = smart_str_print_unsigned(buf, num);
	}

	return p;
}

static inline void smart_str_append_long_ex(smart_str *dest, long num, int type)
{
	char buf[32];
	char *p = smart_str_print_long(buf + sizeof(buf) - 1, num);
	smart_str_appendl_ex(dest, p, (buf + sizeof(buf) - 1) - p, type);
}

static inline void smart_str_append_unsigned_ex(smart_str *dest, long num, int type)
{
	char buf[32];
	char *p = smart_str_print_unsigned(buf + sizeof(buf) - 1, num);
	smart_str_appendl_ex(dest, p, (buf + sizeof(buf) - 1) - p, type);
}

static inline void smart_str_append_ex(smart_str *dest, smart_str *src, int what)
{
	smart_str_appendl_ex(dest, src->c, src->len, what);
}

static inline void smart_str_setl(smart_str *dest, const char *src, size_t len)
{
	dest->len = len;
	dest->a = len + 1;
	dest->c = (char *) src;
}

static inline void smart_str_sets(smart_str *dest, const char *src)
{
	smart_str_setl(dest, src, strlen(src));
}

#endif