7 #define NOMEM ((size_t) -1)
9 PHPSTR_API phpstr
*phpstr_init_ex(phpstr
*buf
, size_t chunk_size
, int flags
)
12 buf
= pemalloc(sizeof(phpstr
), flags
& PHPSTR_INIT_PERSISTENT
);
16 buf
->size
= (chunk_size
> 0) ? chunk_size
: PHPSTR_DEFAULT_SIZE
;
17 buf
->pmem
= (flags
& PHPSTR_INIT_PERSISTENT
) ? 1 : 0;
18 buf
->data
= (flags
& PHPSTR_INIT_PREALLOC
) ? pemalloc(buf
->size
, buf
->pmem
) : NULL
;
19 buf
->free
= (flags
& PHPSTR_INIT_PREALLOC
) ? buf
->size
: 0;
26 PHPSTR_API phpstr
*phpstr_from_string_ex(phpstr
*buf
, const char *string
, size_t length
)
28 if ((buf
= phpstr_init(buf
))) {
29 if (NOMEM
== phpstr_append(buf
, string
, length
)) {
30 pefree(buf
, buf
->pmem
);
37 PHPSTR_API
size_t phpstr_resize_ex(phpstr
*buf
, size_t len
, size_t override_size
)
39 if (buf
->free
< len
) {
40 size_t size
= override_size
? override_size
: buf
->size
;
42 while ((size
+ buf
->free
) < len
) {
46 char *ptr
= perealloc(buf
->data
, buf
->used
+ buf
->free
+ size
, buf
->pmem
);
54 buf
->data
= pemalloc(size
, buf
->pmem
);
66 PHPSTR_API
size_t phpstr_append(phpstr
*buf
, const char *append
, size_t append_len
)
68 if (NOMEM
== phpstr_resize(buf
, append_len
)) {
71 memcpy(buf
->data
+ buf
->used
, append
, append_len
);
72 buf
->used
+= append_len
;
73 buf
->free
-= append_len
;
77 PHPSTR_API
size_t phpstr_appendf(phpstr
*buf
, const char *format
, ...)
81 size_t append_len
, alloc
;
83 va_start(argv
, format
);
84 append_len
= vspprintf(&append
, 0, format
, argv
);
87 alloc
= phpstr_append(buf
, append
, append_len
);
96 PHPSTR_API
size_t phpstr_insert(phpstr
*buf
, const char *insert
, size_t insert_len
, size_t offset
)
98 if (NOMEM
== phpstr_resize(buf
, insert_len
)) {
101 memmove(buf
->data
+ offset
+ insert_len
, buf
->data
+ offset
, insert_len
);
102 memcpy(buf
->data
+ offset
, insert
, insert_len
);
103 buf
->used
+= insert_len
;
104 buf
->free
-= insert_len
;
108 PHPSTR_API
size_t phpstr_insertf(phpstr
*buf
, size_t offset
, const char *format
, ...)
112 size_t insert_len
, alloc
;
114 va_start(argv
, format
);
115 insert_len
= vspprintf(&insert
, 0, format
, argv
);
118 alloc
= phpstr_insert(buf
, insert
, insert_len
, offset
);
121 if (NOMEM
== alloc
) {
127 PHPSTR_API
size_t phpstr_prepend(phpstr
*buf
, const char *prepend
, size_t prepend_len
)
129 if (NOMEM
== phpstr_resize(buf
, prepend_len
)) {
132 memmove(buf
->data
+ prepend_len
, buf
->data
, buf
->used
);
133 memcpy(buf
->data
, prepend
, prepend_len
);
134 buf
->used
+= prepend_len
;
135 buf
->free
-= prepend_len
;
139 PHPSTR_API
size_t phpstr_prependf(phpstr
*buf
, const char *format
, ...)
143 size_t prepend_len
, alloc
;
145 va_start(argv
, format
);
146 prepend_len
= vspprintf(&prepend
, 0, format
, argv
);
149 alloc
= phpstr_prepend(buf
, prepend
, prepend_len
);
152 if (NOMEM
== alloc
) {
158 PHPSTR_API
char *phpstr_data(const phpstr
*buf
, char **into
, size_t *len
)
160 char *copy
= ecalloc(1, buf
->used
+ 1);
161 memcpy(copy
, buf
->data
, buf
->used
);
171 PHPSTR_API phpstr
*phpstr_dup(const phpstr
*buf
)
173 phpstr
*dup
= phpstr_clone(buf
);
174 if (NOMEM
== phpstr_append(dup
, buf
->data
, buf
->used
)) {
180 PHPSTR_API
size_t phpstr_cut(phpstr
*buf
, size_t offset
, size_t length
)
182 if (offset
>= buf
->used
) {
185 if (offset
+ length
> buf
->used
) {
186 length
= buf
->used
- offset
;
188 memmove(buf
->data
+ offset
, buf
->data
+ offset
+ length
, buf
->used
- length
);
194 PHPSTR_API phpstr
*phpstr_sub(const phpstr
*buf
, size_t offset
, size_t length
)
196 if (offset
>= buf
->used
) {
199 size_t need
= (length
+ offset
) > buf
->used
? (buf
->used
- offset
) : (length
- offset
);
200 phpstr
*sub
= phpstr_init_ex(NULL
, need
, PHPSTR_INIT_PREALLOC
| (buf
->pmem
? PHPSTR_INIT_PERSISTENT
:0));
202 if (NOMEM
== phpstr_append(sub
, buf
->data
+ offset
, need
)) {
205 sub
->size
= buf
->size
;
212 PHPSTR_API phpstr
*phpstr_right(const phpstr
*buf
, size_t length
)
214 if (length
< buf
->used
) {
215 return phpstr_sub(buf
, buf
->used
- length
, length
);
217 return phpstr_sub(buf
, 0, buf
->used
);
222 PHPSTR_API phpstr
*phpstr_merge_va(phpstr
*buf
, unsigned argc
, va_list argv
)
224 unsigned f
= 0, i
= 0;
225 buf
= phpstr_init(buf
);
229 phpstr_free_t f
= va_arg(argv
, phpstr_free_t
);
230 phpstr
*current
= va_arg(argv
, phpstr
*);
231 if (NOMEM
== phpstr_append(buf
, current
->data
, current
->used
)) {
234 FREE_PHPSTR(f
, current
);
245 PHPSTR_API phpstr
*phpstr_merge_ex(phpstr
*buf
, unsigned argc
, ...)
250 va_start(argv
, argc
);
251 ret
= phpstr_merge_va(buf
, argc
, argv
);
256 PHPSTR_API phpstr
*phpstr_merge(unsigned argc
, ...)
261 va_start(argv
, argc
);
262 ret
= phpstr_merge_va(NULL
, argc
, argv
);
267 PHPSTR_API phpstr
*phpstr_fix(phpstr
*buf
)
269 if (NOMEM
== phpstr_resize_ex(buf
, 1, 1)) {
272 buf
->data
[buf
->used
] = '\0';
276 PHPSTR_API
int phpstr_cmp(phpstr
*left
, phpstr
*right
)
278 if (left
->used
> right
->used
) {
280 } else if (right
->used
> left
->used
) {
283 return memcmp(left
->data
, right
->data
, left
->used
);
287 PHPSTR_API
void phpstr_reset(phpstr
*buf
)
289 buf
->free
+= buf
->used
;
293 PHPSTR_API
void phpstr_dtor(phpstr
*buf
)
296 pefree(buf
->data
, buf
->pmem
);
303 PHPSTR_API
void phpstr_free(phpstr
**buf
)
307 pefree(*buf
, (*buf
)->pmem
);
312 PHPSTR_API
size_t phpstr_chunk_buffer(phpstr
**s
, const char *data
, size_t data_len
, char **chunk
, size_t chunk_size
)
319 *s
= phpstr_init_ex(NULL
, chunk_size
* 2, chunk_size
? PHPSTR_INIT_PREALLOC
: 0);
324 phpstr_append(storage
, data
, data_len
);
328 phpstr_data(storage
, chunk
, &chunk_size
);
333 if (storage
->used
>= storage
->size
/2) {
334 phpstr
*avail
= phpstr_left(storage
, storage
->size
/2);
335 *chunk
= estrndup(PHPSTR_VAL(avail
), PHPSTR_LEN(avail
));
337 phpstr_cut(storage
, 0, storage
->size
/2);
338 return storage
->size
/2;
344 PHPSTR_API
void phpstr_chunked_output(phpstr
**s
, const char *data
, size_t data_len
, size_t chunk_len
, void (*passthru
)(const char *, size_t TSRMLS_DC
) TSRMLS_DC
)
349 while ((got
= phpstr_chunk_buffer(s
, data
, data_len
, &chunk
, chunk_len
))) {
350 passthru(chunk
, got TSRMLS_CC
);
352 /* we already got the last chunk,
353 and freed all resources */
358 STR_SET(chunk
, NULL
);
368 * vim600: sw=4 ts=4 fdm=marker