stdio/FreeBSD/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  * Redistribution and use in source and binary forms, with or without
   9  * modification, are permitted provided that the following conditions
  10  * are met:
  11  * 1. Redistributions of source code must retain the above copyright
  12  *    notice, this list of conditions and the following disclaimer.
  13  * 2. Redistributions in binary form must reproduce the above copyright
  14  *    notice, this list of conditions and the following disclaimer in the
  15  *    documentation and/or other materials provided with the distribution.
  16  * 4. Neither the name of the University nor the names of its contributors
  17  *    may be used to endorse or promote products derived from this software
  18  *    without specific prior written permission.
  19  *
  20  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  21  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  22  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  23  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  24  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  25  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  26  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  27  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  28  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  29  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  30  * SUCH DAMAGE.
  31  */
  32
  33 #include <sys/cdefs.h>
  34 #if 0
  35 #if defined(LIBC_SCCS) && !defined(lint)
  36 static char sccsid[] = "@(#)vsscanf.c   8.1 (Berkeley) 6/4/93";
  37 #endif /* LIBC_SCCS and not lint */
  38 __FBSDID("FreeBSD: src/lib/libc/stdio/vsscanf.c,v 1.11 2002/08/21 16:19:57 mike Exp ");
  39 #endif
  40 __FBSDID("$FreeBSD: src/lib/libc/stdio/vswscanf.c,v 1.6 2009/01/15 18:53:52 rdivacky Exp $");
  41
  42 #include "xlocale_private.h"
  43
  44 #include <limits.h>
  45 #include <stdarg.h>
  46 #include <stdio.h>
  47 #include <stdlib.h>
  48 #include <string.h>
  49 #include <wchar.h>
  50 #include "local.h"
  51
  52 static int      eofread(void *, char *, int);
  53
  54 static int
  55 eofread(void *cookie, char *buf, int len)
  56 {
  57
  58         return (0);
  59 }
  60
  61 int
  62 vswscanf_l(const wchar_t * __restrict str, locale_t loc, const wchar_t * __restrict fmt,
  63     va_list ap)
  64 {
  65         static const mbstate_t initial;
  66         mbstate_t mbs;
  67         FILE f;
  68         char *mbstr;
  69         size_t mlen;
  70         int r;
  71         const wchar_t *strp;
  72         struct __sFILEX ext;
  73         f._extra = &ext;
  74         INITEXTRA(&f);
  75
  76         NORMALIZE_LOCALE(loc);
  77         /*
  78          * XXX Convert the wide character string to multibyte, which
  79          * __vfwscanf() will convert back to wide characters.
  80          */
  81         if ((mbstr = malloc(wcslen(str) * MB_CUR_MAX_L(loc) + 1)) == NULL)
  82                 return (EOF);
  83         mbs = initial;
  84         strp = str;
  85         if ((mlen = wcsrtombs_l(mbstr, &strp, SIZE_T_MAX, &mbs, loc)) == (size_t)-1) {
  86                 free(mbstr);
  87                 return (EOF);
  88         }
  89         f._file = -1;
  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         f._ub._base = NULL;
  95         f._lb._base = NULL;
  96         f._orientation = 0;
  97         memset(&f._mbstate, 0, sizeof(mbstate_t));
  98         r = __vfwscanf(&f, loc, fmt, ap);
  99         free(mbstr);
 100
 101         return (r);
 102 }
 103
 104 int
 105 vswscanf(const wchar_t * __restrict str, const wchar_t * __restrict fmt,
 106     va_list ap)
 107 {
 108         return vswscanf_l(str, __current_locale(), fmt, ap);
 109 }
 110