locales, libconv: Sync with FreeBSD (extensive reach)
[dragonfly.git] / lib / libc / stdio / vswscanf.c
1 /*-
2  * Copyright (c) 1990, 1993
3  *      The Regents of the University of California.  All rights reserved.
4  *
5  * This code is derived from software contributed to Berkeley by
6  * Donn Seeley at UUNET Technologies, Inc.
7  *
8  * Copyright (c) 2011 The FreeBSD Foundation
9  * All rights reserved.
10  * Portions of this software were developed by David Chisnall
11  * under sponsorship from the FreeBSD Foundation.
12  *
13  * Redistribution and use in source and binary forms, with or without
14  * modification, are permitted provided that the following conditions
15  * are met:
16  * 1. Redistributions of source code must retain the above copyright
17  *    notice, this list of conditions and the following disclaimer.
18  * 2. Redistributions in binary form must reproduce the above copyright
19  *    notice, this list of conditions and the following disclaimer in the
20  *    documentation and/or other materials provided with the distribution.
21  * 3. Neither the name of the University nor the names of its contributors
22  *    may be used to endorse or promote products derived from this software
23  *    without specific prior written permission.
24  *
25  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
26  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
27  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
28  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
29  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
30  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
31  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
32  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
33  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
34  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
35  * SUCH DAMAGE.
36  *
37  * @(#)vsscanf.c        8.1 (Berkeley) 6/4/93
38  * $FreeBSD: head/lib/libc/stdio/vswscanf.c 249808 2013-04-23 13:33:13Z emaste $
39  */
40
41 #include <limits.h>
42 #include <stdarg.h>
43 #include <stdio.h>
44 #include <stdlib.h>
45 #include <string.h>
46 #include <wchar.h>
47 #include "local.h"
48 #include "xlocale_private.h"
49
50 static int      eofread(void *, char *, int);
51
52 static int
53 eofread(void *cookie __unused, char *buf __unused, int len __unused)
54 {
55
56         return (0);
57 }
58
59 int
60 vswscanf_l(const wchar_t * __restrict str, locale_t locale,
61                 const wchar_t * __restrict fmt, va_list ap)
62 {
63         static const mbstate_t initial;
64         mbstate_t mbs;
65         FILE f = FAKE_FILE;
66         char *mbstr;
67         size_t mlen;
68         int r;
69         const wchar_t *strp;
70         FIX_LOCALE(locale);
71
72         /*
73          * XXX Convert the wide character string to multibyte, which
74          * __vfwscanf() will convert back to wide characters.
75          */
76         if ((mbstr = malloc(wcslen(str) * MB_CUR_MAX + 1)) == NULL)
77                 return (EOF);
78         mbs = initial;
79         strp = str;
80         if ((mlen = wcsrtombs_l(mbstr, &strp, SIZE_T_MAX, &mbs, locale)) == (size_t)-1) {
81                 free(mbstr);
82                 return (EOF);
83         }
84         f.pub._flags = __SRD;
85         f._bf._base = f.pub._p = (unsigned char *)mbstr;
86         f._bf._size = f.pub._r = mlen;
87         f._read = eofread;
88         r = __vfwscanf(&f, locale, fmt, ap);
89         free(mbstr);
90
91         return (r);
92 }
93 int
94 vswscanf(const wchar_t * __restrict str, const wchar_t * __restrict fmt,
95     va_list ap)
96 {
97         return vswscanf_l(str, __get_locale(), fmt, ap);
98 }