php_smart_str.h

Go to the documentation of this file.

/*
   +----------------------------------------------------------------------+
   | PHP Version 5                                                        |
   +----------------------------------------------------------------------+
   | Copyright (c) 1997-2004 The PHP Group                                |
   +----------------------------------------------------------------------+
   | This source file is subject to version 3.0 of the PHP license,       |
   | that is bundled with this package in the file LICENSE, and is        |
   | available through the world-wide-web at the following url:           |
   | http://www.php.net/license/3_0.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>
#ifndef SMART_STR_USE_REALLOC
#include <zend.h>
#endif

#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

#ifndef SMART_STR_START_SIZE
#define SMART_STR_START_SIZE 78
#endif

#ifdef SMART_STR_USE_REALLOC
#define SMART_STR_REALLOC(a,b,c) realloc((a),(b))
#else
#define SMART_STR_REALLOC(a,b,c) perealloc((a),(b),(c))
#endif

#define SMART_STR_DO_REALLOC(d, what) \
        (d)->c = SMART_STR_REALLOC((d)->c, (d)->a + 1, (what))

#define smart_str_alloc4(d, n, what, newlen) do {                                       \
        if (!(d)->c) {                                                                                                  \
                (d)->len = 0;                                                                                           \
                newlen = (n);                                                                                           \
                (d)->a = newlen < SMART_STR_START_SIZE                                          \
                                ? SMART_STR_START_SIZE                                                          \
                                : newlen + SMART_STR_PREALLOC;                                          \
                SMART_STR_DO_REALLOC(d, what);                                                          \
        } else {                                                                                                                \
                newlen = (d)->len + (n);                                                                        \
                if (newlen >= (d)->a) {                                                                         \
                        (d)->a = newlen + SMART_STR_PREALLOC;                                   \
                        SMART_STR_DO_REALLOC(d, what);                                                  \
                }                                                                                                                       \
        }                                                                                                                               \
} while (0)

#define smart_str_alloc(d, n, what) \
        smart_str_alloc4((d), (n), (what), newlen)

/* wrapper */

#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_off_t(dest, val) \
        smart_str_append_off_t_ex((dest), (val), 0)
#define smart_str_append_unsigned(dest, val) \
        smart_str_append_unsigned_ex((dest), (val), 0)

#define smart_str_appendc_ex(dest, ch, what) do {                                       \
        register size_t __nl;                                                                                   \
        smart_str_alloc4((dest), 1, (what), __nl);                                              \
        (dest)->len = __nl;                                                                                             \
        ((unsigned char *) (dest)->c)[(dest)->len - 1] = (ch);                  \
} while (0)

#define smart_str_free_ex(s, what) do {                                                         \
        smart_str *__s = (smart_str *) (s);                                                             \
        if (__s->c) {                                                                                                   \
                pefree(__s->c, what);                                                                           \
                __s->c = NULL;                                                                                          \
        }                                                                                                                               \
        __s->a = __s->len = 0;                                                                                  \
} while (0)

#define smart_str_appendl_ex(dest, src, nlen, what) do {                        \
        register size_t __nl;                                                                                   \
        smart_str *__dest = (smart_str *) (dest);                                               \
                                                                                                                                        \
        smart_str_alloc4(__dest, (nlen), (what), __nl);                                 \
        memcpy(__dest->c + __dest->len, (src), (nlen));                                 \
        __dest->len = __nl;                                                                                             \
} while (0)

/* input: buf points to the END of the buffer */
#define smart_str_print_unsigned4(buf, num, vartype, result) do {       \
        char *__p = (buf);                                                                                              \
        vartype __num = (num);                                                                                  \
        *__p = '\0';                                                                                                    \
        do {                                                                                                                    \
                *--__p = (char) (__num % 10) + '0';                                                     \
                __num /= 10;                                                                                            \
        } while (__num > 0);                                                                                    \
        result = __p;                                                                                                   \
} while (0)

/* buf points to the END of the buffer */
#define smart_str_print_long4(buf, num, vartype, result) do {   \
        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 */                                                           \
                smart_str_print_unsigned4((buf), -(num), vartype, (result));    \
                *--(result) = '-';                                                                                      \
        } else {                                                                                                                \
                smart_str_print_unsigned4((buf), (num), vartype, (result));     \
        }                                                                                                                               \
} while (0)

/*
 * these could be replaced using a braced-group inside an expression
 * for GCC compatible compilers, e.g.
 *
 * #define f(..) ({char *r;..;__r;})
 */  
 
static inline char *smart_str_print_long(char *buf, long num) {
        char *r; 
        smart_str_print_long4(buf, num, unsigned long, r); 
        return r;
}

static inline char *smart_str_print_unsigned(char *buf, long num) {
        char *r; 
        smart_str_print_unsigned4(buf, num, unsigned long, r); 
        return r;
}

#define smart_str_append_generic_ex(dest, num, type, vartype, func) do {        \
        char __b[32];                                                                                                                   \
        char *__t;                                                                                                                              \
        smart_str_print##func##4 (__b + sizeof(__b) - 1, (num), vartype, __t);  \
        smart_str_appendl_ex((dest), __t, __b + sizeof(__b) - 1 - __t, (type)); \
} while (0)
        
#define smart_str_append_unsigned_ex(dest, num, type) \
        smart_str_append_generic_ex((dest), (num), (type), unsigned long, _unsigned)

#define smart_str_append_long_ex(dest, num, type) \
        smart_str_append_generic_ex((dest), (num), (type), unsigned long, _long)

#define smart_str_append_off_t_ex(dest, num, type) \
        smart_str_append_generic_ex((dest), (num), (type), off_t, _long)

#define smart_str_append_ex(dest, src, what) \
        smart_str_appendl_ex((dest), ((smart_str *)(src))->c, \
                ((smart_str *)(src))->len, (what));


#define smart_str_setl(dest, src, nlen) do {                                            \
        (dest)->len = (nlen);                                                                                   \
        (dest)->a = (nlen) + 1;                                                                                 \
        (dest)->c = (char *) (src);                                                                             \
} while (0)

#define smart_str_sets(dest, src) \
        smart_str_setl((dest), (src), strlen(src));

#endif

---