stdio/vswscanf-fbsd.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  * 3. All advertising materials mentioning features or use of this software
  17  *    must display the following acknowledgement:
  18  *      This product includes software developed by the University of
  19  *      California, Berkeley and its contributors.
  20  * 4. Neither the name of the University nor the names of its contributors
  21  *    may be used to endorse or promote products derived from this software
  22  *    without specific prior written permission.
  23  *
  24  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  25  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  26  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  27  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  28  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  29  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  30  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  31  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  32  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  33  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  34  * SUCH DAMAGE.
  35  */
  36
  37 #include <sys/cdefs.h>
  38 #if 0
  39 #if defined(LIBC_SCCS) && !defined(lint)
  40 static char sccsid[] = "@(#)vsscanf.c   8.1 (Berkeley) 6/4/93";
  41 #endif /* LIBC_SCCS and not lint */
  42 __FBSDID("FreeBSD: src/lib/libc/stdio/vsscanf.c,v 1.11 2002/08/21 16:19:57 mike Exp ");
  43 #endif
  44 __FBSDID("$FreeBSD: src/lib/libc/stdio/vswscanf.c,v 1.3 2004/04/07 09:55:05 tjr Exp $");
  45
  46 #include "xlocale_private.h"
  47
  48 #include <limits.h>
  49 #include <stdarg.h>
  50 #include <stdio.h>
  51 #include <stdlib.h>
  52 #include <string.h>
  53 #include <wchar.h>
  54 #include "local.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(const wchar_t * __restrict str, const wchar_t * __restrict fmt,
  67     va_list ap)
  68 {
  69         static const mbstate_t initial;
  70         mbstate_t mbs;
  71         FILE f;
  72         struct __sFILEX ext;
  73         char *mbstr;
  74         size_t mlen;
  75         int r;
  76         locale_t loc = __current_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_L(loc) + 1)) == NULL)
  83                 return (EOF);
  84         mbs = initial;
  85         if ((mlen = wcsrtombs_l(mbstr, &str, 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._extra = &ext;
  97         INITEXTRA(&f);
  98         r = __vfwscanf(&f, loc, fmt, ap);
  99         free(mbstr);
 100
 101         return (r);
 102 }
 103
 104 int
 105 vswscanf_l(const wchar_t * __restrict str, locale_t loc,
 106     const wchar_t * __restrict fmt, va_list ap)
 107 {
 108         static const mbstate_t initial;
 109         mbstate_t mbs;
 110         FILE f;
 111         struct __sFILEX ext;
 112         char *mbstr;
 113         size_t mlen;
 114         int r;
 115
 116         NORMALIZE_LOCALE(loc);
 117         /*
 118          * XXX Convert the wide character string to multibyte, which
 119          * __vfwscanf() will convert back to wide characters.
 120          */
 121         if ((mbstr = malloc(wcslen(str) * MB_CUR_MAX_L(loc) + 1)) == NULL)
 122                 return (EOF);
 123         mbs = initial;
 124         if ((mlen = wcsrtombs_l(mbstr, &str, SIZE_T_MAX, &mbs, loc)) == (size_t)-1) {
 125                 free(mbstr);
 126                 return (EOF);
 127         }
 128         f._file = -1;
 129         f._flags = __SRD;
 130         f._bf._base = f._p = (unsigned char *)mbstr;
 131         f._bf._size = f._r = mlen;
 132         f._read = eofread;
 133         f._ub._base = NULL;
 134         f._lb._base = NULL;
 135         f._extra = &ext;
 136         INITEXTRA(&f);
 137         r = __vfwscanf(&f, loc, fmt, ap);
 138         free(mbstr);
 139
 140         return (r);
 141 }