1 /* Copyright (C) 2007 Eric Blake
2 * Permission to use, copy, modify, and distribute this software
3 * is freely granted, provided that this notice is preserved.
4 */
5 /* This code was derived from asprintf.c */
6 /* doc in vfprintf.c */
7
8 #define _DEFAULT_SOURCE
9 #include <_ansi.h>
10 #include <stdio.h>
11 #include <stdarg.h>
12 #include <limits.h>
13 #include <errno.h>
14 #include "local.h"
15
16 char *
vasnprintf(char * buf,size_t * lenp,const char * fmt,va_list ap)17 vasnprintf (
18 char *buf,
19 size_t *lenp,
20 const char *fmt,
21 va_list ap)
22 {
23 int ret;
24 FILE f;
25 size_t len = *lenp;
26
27 if (buf && len)
28 {
29 /* mark an existing buffer, but allow allocation of larger string */
30 f._flags = __SWR | __SSTR | __SOPT;
31 }
32 else
33 {
34 /* mark a zero-length reallocatable buffer */
35 f._flags = __SWR | __SSTR | __SMBF;
36 len = 0;
37 buf = NULL;
38 }
39 f._bf._base = f._p = (unsigned char *) buf;
40 /* For now, inherit the 32-bit signed limit of FILE._bf._size.
41 FIXME - it would be nice to rewrite sys/reent.h to support size_t
42 for _size. */
43 if (len > INT_MAX)
44 {
45 _REENT_ERRNO(ptr) = EOVERFLOW;
46 return NULL;
47 }
48 f._bf._size = f._w = len;
49 f._file = -1; /* No file. */
50 ret = svfprintf ( &f, fmt, ap);
51 if (ret < 0)
52 return NULL;
53 *lenp = ret;
54 *f._p = '\0';
55 return (char *) f._bf._base;
56 }
57
58 #ifdef _NANO_FORMATTED_IO
59 char *
60 vasniprintf (char *, size_t *, const char *, __VALIST)
61 _ATTRIBUTE ((__alias__("vasnprintf")));
62 #endif
63
