1 /*
2 * Copyright (c) 1990 The Regents of the University of California.
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms are permitted
6 * provided that the above copyright notice and this paragraph are
7 * duplicated in all such forms and that any documentation,
8 * advertising materials, and other materials related to such
9 * distribution and use acknowledge that the software was developed
10 * by the University of California, Berkeley. The name of the
11 * University may not be used to endorse or promote products derived
12 * from this software without specific prior written permission.
13 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
14 * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
15 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
16 */
17 /* This code was copied from asprintf.c */
18 /* doc in siprintf.c */
19
20 #include <_ansi.h>
21 #include <stdio.h>
22 #include <stdarg.h>
23 #include <limits.h>
24 #include "local.h"
25
26 int
_asiprintf_r(struct _reent * ptr,char ** strp,const char * fmt,...)27 _asiprintf_r (struct _reent *ptr,
28 char **strp,
29 const char *fmt, ...)
30 {
31 int ret;
32 va_list ap;
33 FILE f;
34
35 /* mark a zero-length reallocatable buffer */
36 f._flags = __SWR | __SSTR | __SMBF;
37 f._bf._base = f._p = NULL;
38 f._bf._size = f._w = 0;
39 f._file = -1; /* No file. */
40 va_start (ap, fmt);
41 ret = _svfiprintf_r (ptr, &f, fmt, ap);
42 va_end (ap);
43 if (ret >= 0)
44 {
45 *f._p = 0;
46 *strp = (char *) f._bf._base;
47 }
48 return (ret);
49 }
50
51 #ifndef _REENT_ONLY
52
53 int
asiprintf(char ** strp,const char * fmt,...)54 asiprintf (char **strp,
55 const char *fmt, ...)
56 {
57 int ret;
58 va_list ap;
59 FILE f;
60
61 /* mark a zero-length reallocatable buffer */
62 f._flags = __SWR | __SSTR | __SMBF;
63 f._bf._base = f._p = NULL;
64 f._bf._size = f._w = 0;
65 f._file = -1; /* No file. */
66 va_start (ap, fmt);
67 ret = _svfiprintf_r (_REENT, &f, fmt, ap);
68 va_end (ap);
69 if (ret >= 0)
70 {
71 *f._p = 0;
72 *strp = (char *) f._bf._base;
73 }
74 return (ret);
75 }
76
77 #endif /* ! _REENT_ONLY */
78