xref: /dragonfly/lib/libc/stdio/vasprintf.c (revision 2096fe9a6eb0e90e96a0872c8a73a9e80383c77f)
1 /*        $OpenBSD: vasprintf.c,v 1.4 1998/06/21 22:13:47 millert Exp $         */
2 
3 /*
4  * Copyright (c) 1997 Todd C. Miller <Todd.Miller@courtesan.com>
5  * All rights reserved.
6  *
7  * Copyright (c) 2011 The FreeBSD Foundation
8  * All rights reserved.
9  * Portions of this software were developed by David Chisnall
10  * under sponsorship from the FreeBSD Foundation.
11  *
12  * Redistribution and use in source and binary forms, with or without
13  * modification, are permitted provided that the following conditions
14  * are met:
15  * 1. Redistributions of source code must retain the above copyright
16  *    notice, this list of conditions and the following disclaimer.
17  * 2. Redistributions in binary form must reproduce the above copyright
18  *    notice, this list of conditions and the following disclaimer in the
19  *    documentation and/or other materials provided with the distribution.
20  * 3. The name of the author may not be used to endorse or promote products
21  *    derived from this software without specific prior written permission.
22  *
23  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
24  * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
25  * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL
26  * THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
27  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
28  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
29  * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
30  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
31  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
32  * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
33  *
34  * $FreeBSD: head/lib/libc/stdio/vasprintf.c 227753 2011-11-20 14:45:42Z theraven $
35  */
36 
37 
38 #include <stdio.h>
39 #include <stdlib.h>
40 #include <errno.h>
41 #include <pthread.h> /* for FAKE_FILE PTHREAD_MUTEX_INITIALIZER */
42 #include "xlocale_private.h"
43 #include "local.h"
44 
45 int
vasprintf_l(char ** str,locale_t locale,const char * fmt,__va_list ap)46 vasprintf_l(char **str, locale_t locale, const char *fmt, __va_list ap)
47 {
48           FILE f = FAKE_FILE;
49           int ret;
50           FIX_LOCALE(locale);
51 
52           f.pub._flags = __SWR | __SSTR | __SALC;
53           f._bf._base = f.pub._p = malloc(128);
54           if (f._bf._base == NULL) {
55                     *str = NULL;
56                     errno = ENOMEM;
57                     return (-1);
58           }
59           f._bf._size = f.pub._w = 127;           /* Leave room for the NUL */
60           ret = __vfprintf(&f, locale, fmt, ap);
61           if (ret < 0) {
62                     free(f._bf._base);
63                     *str = NULL;
64                     errno = ENOMEM;
65                     return (-1);
66           }
67           *f.pub._p = '\0';
68           *str = (char *)f._bf._base;
69           return (ret);
70 }
71 int
vasprintf(char ** str,const char * fmt,__va_list ap)72 vasprintf(char **str, const char *fmt, __va_list ap)
73 {
74           return vasprintf_l(str, __get_locale(), fmt, ap);
75 }
76