jehanne/sys/src/libc/fmt/vsmprint.c

86 lines
1.6 KiB
C

/*
* This file is part of the UCB release of Plan 9. It is subject to the license
* terms in the LICENSE file found in the top-level directory of this
* distribution and at http://akaros.cs.berkeley.edu/files/Plan9License. No
* part of the UCB release of Plan 9, including this file, may be copied,
* modified, propagated, or distributed except according to the terms contained
* in the LICENSE file.
*/
#include <u.h>
#include <libc.h>
#include "fmtdef.h"
static int
fmtStrFlush(Fmt *f)
{
char *s;
int n;
if(f->start == nil)
return 0;
n = (int)(uintptr)f->farg;
n *= 2;
s = f->start;
f->start = realloc(s, n);
if(f->start == nil){
f->farg = nil;
f->to = nil;
f->stop = nil;
free(s);
return 0;
}
f->farg = (void*)(uintptr_t)n;
f->to = (char*)f->start + ((char*)f->to - s);
f->stop = (char*)f->start + n - 1;
return 1;
}
int
fmtstrinit(Fmt *f)
{
int n;
memset(f, 0, sizeof *f);
f->runes = 0;
n = 32;
/* this should not be necessary */
n = 4096;
f->start = malloc(n);
if(f->start == nil)
return -1;
setmalloctag(f->start, getcallerpc());
f->to = f->start;
f->stop = (char*)f->start + n - 1;
f->flush = fmtStrFlush;
f->farg = (void*)(uintptr_t)n;
f->nfmt = 0;
return 0;
}
/*
* print into an allocated string buffer
*/
char*
vsmprint(const char *fmt, va_list args)
{
Fmt f;
int n;
if(fmtstrinit(&f) < 0)
return nil;
//f.args = args;
va_copy(f.args,args);
n = dofmt(&f, fmt);
va_end(f.args);
if(f.start == nil) /* realloc failed? */
return nil;
if(n < 0){
free(f.start);
return nil;
}
setmalloctag(f.start, getcallerpc());
*(char*)f.to = '\0';
return f.start;
}