StdLib/LibC/Stdio/fputwc.c

   1 /*
   2     Copyright (c) 2010 - 2011, Intel Corporation. All rights reserved.<BR>
   3     This program and the accompanying materials are licensed and made available
   4     under the terms and conditions of the BSD License that accompanies this
   5     distribution.  The full text of the license may be found at
   6     http://opensource.org/licenses/bsd-license.
   7
   8     THE PROGRAM IS DISTRIBUTED UNDER THE BSD LICENSE ON AN "AS IS" BASIS,
   9     WITHOUT WARRANTIES OR REPRESENTATIONS OF ANY KIND, EITHER EXPRESS OR IMPLIED.
  10
  11  * Copyright (c)2001 Citrus Project,
  12  * All rights reserved.
  13  *
  14  * Redistribution and use in source and binary forms, with or without
  15  * modification, are permitted provided that the following conditions
  16  * are met:
  17  * 1. Redistributions of source code must retain the above copyright
  18  *    notice, this list of conditions and the following disclaimer.
  19  * 2. Redistributions in binary form must reproduce the above copyright
  20  *    notice, this list of conditions and the following disclaimer in the
  21  *    documentation and/or other materials provided with the distribution.
  22  *
  23  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  24  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  25  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  26  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  27  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  28  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  29  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  30  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  31  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  32  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  33  * SUCH DAMAGE.
  34  *
  35  * $Citrus$
  36
  37 NetBSD: fputwc.c,v 1.4 2005/06/12 05:21:27 lukem Exp
  38 */
  39 #include  <LibConfig.h>
  40 #include <sys/EfiCdefs.h>
  41
  42 #include <assert.h>
  43 #include <errno.h>
  44 #include <limits.h>
  45 #include <stdio.h>
  46 #include <wchar.h>
  47 #include "reentrant.h"
  48 #include "local.h"
  49 #include "fvwrite.h"
  50
  51 wint_t
  52 __fputwc_unlock(wchar_t wc, FILE *fp)
  53 {
  54   struct wchar_io_data *wcio;
  55   mbstate_t *st;
  56   size_t size;
  57   char buf[MB_LEN_MAX];
  58   struct __suio uio;
  59   struct __siov iov;
  60
  61   _DIAGASSERT(fp != NULL);
  62   if(fp == NULL) {
  63     errno = EINVAL;
  64     return (WEOF);
  65   }
  66
  67   /* LINTED we don't play with buf */
  68   iov.iov_base = (void *)buf;
  69   uio.uio_iov = &iov;
  70   uio.uio_iovcnt = 1;
  71
  72   _SET_ORIENTATION(fp, 1);
  73   wcio = WCIO_GET(fp);
  74   if (wcio == 0) {
  75     errno = ENOMEM;
  76     return WEOF;
  77   }
  78
  79   wcio->wcio_ungetwc_inbuf = 0;
  80   st = &wcio->wcio_mbstate_out;
  81
  82   size = wcrtomb(buf, wc, st);
  83   if (size == (size_t)-1) {
  84     errno = EILSEQ;
  85     return WEOF;
  86   }
  87
  88   _DIAGASSERT(size != 0);
  89
  90   uio.uio_resid = (int)(iov.iov_len = size);
  91   if (__sfvwrite(fp, &uio)) {
  92     return WEOF;
  93   }
  94
  95   return (wint_t)wc;
  96 }
  97
  98 wint_t
  99 fputwc(wchar_t wc, FILE *fp)
 100 {
 101   wint_t r;
 102
 103   _DIAGASSERT(fp != NULL);
 104   if(fp == NULL) {
 105     errno = EINVAL;
 106     return (WEOF);
 107   }
 108
 109   FLOCKFILE(fp);
 110   r = __fputwc_unlock(wc, fp);
 111   FUNLOCKFILE(fp);
 112
 113   return (r);
 114 }