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
  38 #include <sys/cdefs.h>
  39 #if 0
  40 #if defined(LIBC_SCCS) && !defined(lint)
  41 static char sccsid[] = "@(#)vsscanf.c   8.1 (Berkeley) 6/4/93";
  42 #endif /* LIBC_SCCS and not lint */
  43 __FBSDID("FreeBSD: src/lib/libc/stdio/vsscanf.c,v 1.11 2002/08/21 16:19:57 mike Exp ");
  44 #endif
  45 __FBSDID("$FreeBSD$");
  46
  47 #include <limits.h>
  48 #include <stdarg.h>
  49 #include <stdio.h>
  50 #include <stdlib.h>
  51 #include <string.h>
  52 #include <wchar.h>
  53 #include "local.h"
  54 #include "xlocale_private.h"
  55
  56 static int      eofread(void *, char *, int);
  57
  58 static int
  59 eofread(void *cookie, char *buf, int len)
  60 {
  61
  62         return (0);
  63 }
  64
  65 int
  66 vswscanf_l(const wchar_t * __restrict str, locale_t locale,
  67                 const wchar_t * __restrict fmt, va_list ap)
  68 {
  69         static const mbstate_t initial;
  70         mbstate_t mbs;
  71         FILE f = FAKE_FILE;
  72         char *mbstr;
  73         size_t mlen;
  74         int r;
  75         const wchar_t *strp;
  76         FIX_LOCALE(locale);
  77
  78         /*
  79          * XXX Convert the wide character string to multibyte, which
  80          * __vfwscanf() will convert back to wide characters.
  81          */
  82         if ((mbstr = malloc(wcslen(str) * MB_CUR_MAX + 1)) == NULL)
  83                 return (EOF);
  84         mbs = initial;
  85         strp = str;
  86         if ((mlen = wcsrtombs_l(mbstr, &strp, SIZE_T_MAX, &mbs, locale)) == (size_t)-1) {
  87                 free(mbstr);
  88                 return (EOF);
  89         }
  90         f._flags = __SRD;
  91         f._bf._base = f._p = (unsigned char *)mbstr;
  92         f._bf._size = f._r = mlen;
  93         f._read = eofread;
  94         r = __vfwscanf(&f, locale, fmt, ap);
  95         free(mbstr);
  96
  97         return (r);
  98 }
  99 int
 100 vswscanf(const wchar_t * __restrict str, const wchar_t * __restrict fmt,
 101     va_list ap)
 102 {
 103         return vswscanf_l(str, __get_locale(), fmt, ap);
 104 }