1 /*

   2  * Copyright (c) 2002-2004 Tim J. Robbins.
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  *
  14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT

  55  * that the stream orientation change, but legacy calls don't do that.
  56  *
  57  * Note that we had the source for the XPG5 version of this, but it relied
  58  * on closed implementation bits that we lack, so we supply replacements
  59  * here.
  60  */
  61 static wint_t
  62 __fputwc_impl(wchar_t wc, FILE *fp, int orient)
  63 {
  64         char buf[MB_LEN_MAX];
  65         size_t          i, len;
  66         rmutex_t        *mx;
  67 
  68         /* If we are given WEOF, then we have to stop */
  69         if (wc == WEOF)
  70                 return (WEOF);
  71 
  72         if (MB_CUR_MAX == 1 && wc > 0 && wc <= UCHAR_MAX) {
  73                 /*
  74                  * Assume single-byte locale with no special encoding.
  75                  * A more careful test would be to check
  76                  * _CurrentRuneLocale->encoding.
  77                  */
  78                 *buf = (unsigned char)wc;
  79                 len = 1;
  80         } else {
  81                 /*
  82                  * FreeBSD used restartable wcrtomb.  I think we can use
  83                  * the simpler wctomb form here.  We should have a complete
  84                  * decode.
  85                  */
  86                 if ((len = wctomb(buf, wc)) == (size_t)-1) {
  87                         fp->_flag |= _IOERR;
  88                         errno = EILSEQ;
  89                         return (WEOF);
  90                 }
  91         }
  92 
  93         FLOCKFILE(mx, fp);
  94         /*
  95          * This is used for XPG 5 semantics, which requires the stream
  96          * orientation to be changed when the function is called.

   1 /*
   2  * Copyright 2013 Garrett D'Amore <garrett@damore.org>
   3  * Copyright (c) 2002-2004 Tim J. Robbins.
   4  * All rights reserved.
   5  *
   6  * Redistribution and use in source and binary forms, with or without
   7  * modification, are permitted provided that the following conditions
   8  * are met:
   9  * 1. Redistributions of source code must retain the above copyright
  10  *    notice, this list of conditions and the following disclaimer.
  11  * 2. Redistributions in binary form must reproduce the above copyright
  12  *    notice, this list of conditions and the following disclaimer in the
  13  *    documentation and/or other materials provided with the distribution.
  14  *
  15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  16  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  17  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  18  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  19  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  20  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  21  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  22  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT

  56  * that the stream orientation change, but legacy calls don't do that.
  57  *
  58  * Note that we had the source for the XPG5 version of this, but it relied
  59  * on closed implementation bits that we lack, so we supply replacements
  60  * here.
  61  */
  62 static wint_t
  63 __fputwc_impl(wchar_t wc, FILE *fp, int orient)
  64 {
  65         char buf[MB_LEN_MAX];
  66         size_t          i, len;
  67         rmutex_t        *mx;
  68 
  69         /* If we are given WEOF, then we have to stop */
  70         if (wc == WEOF)
  71                 return (WEOF);
  72 
  73         if (MB_CUR_MAX == 1 && wc > 0 && wc <= UCHAR_MAX) {
  74                 /*
  75                  * Assume single-byte locale with no special encoding.


  76                  */
  77                 *buf = (unsigned char)wc;
  78                 len = 1;
  79         } else {
  80                 /*
  81                  * FreeBSD used restartable wcrtomb.  I think we can use
  82                  * the simpler wctomb form here.  We should have a complete
  83                  * decode.
  84                  */
  85                 if ((len = wctomb(buf, wc)) == (size_t)-1) {
  86                         fp->_flag |= _IOERR;
  87                         errno = EILSEQ;
  88                         return (WEOF);
  89                 }
  90         }
  91 
  92         FLOCKFILE(mx, fp);
  93         /*
  94          * This is used for XPG 5 semantics, which requires the stream
  95          * orientation to be changed when the function is called.