blob: c0c5cdedafd5c7c1703b1c22b472a8dd81db059a [file] [log] [blame]
/*
Copyright (C) 2002 Vladimir Oleynik <dzo@simtreas.ru>
*/
#include <stdlib.h>
#include <stdio.h>
#include <stdarg.h>
#ifdef TEST
extern void *xrealloc(void *p, size_t size);
#else
#include "libbb.h" /* busybox source */
#endif
/* Exchange glibc vasprintf - minimize allocate memory version */
/* libc5 and uclibc have not vasprintf function */
void bb_vasprintf(char **string_ptr, const char *format, va_list args)
{
int bs = 128;
char stack_buff[128];
char *buff = stack_buff;
int done;
/* two or more loop, first - calculate memory size only */
while(1) {
done = vsnprintf (buff, bs, format, args);
/* Different libc have different interpretation vsnprintf returned value */
if(done >= 0) {
if(done < bs && buff != stack_buff) {
/* allocated */
*string_ptr = buff;
return;
} else {
/* true calculate memory size */
bs = done+1;
}
} else {
/*
* Old libc. Incrementaly test.
* Exact not minimize allocate memory.
*/
bs += 128;
}
buff = xrealloc((buff == stack_buff ? NULL : buff), bs);
}
}
void bb_asprintf(char **string_ptr, const char *format, ...)
{
va_list p;
va_start(p, format);
bb_vasprintf(string_ptr, format, p);
va_end(p);
}
#ifdef TEST
int main(int argc, char **argv)
{
char *out_buf;
char big_buf[200];
int i;
bb_asprintf(&out_buf, "Hi!\nargc=%d argv[0]=%s\n", argc, argv[0]);
printf(out_buf);
free(out_buf);
for(i=0; i < sizeof(big_buf)-1; i++)
big_buf[i]='x';
big_buf[i]=0;
bb_asprintf(&out_buf, "Test Big\n%s\n", big_buf);
printf(out_buf);
free(out_buf);
return 0;
}
void *xrealloc(void *p, size_t size)
{
void *p2 = realloc(p, size);
if(p2==0) {
fprintf(stderr, "TEST: memory_exhausted\n");
exit(1);
}
return p2;
}
#endif