ncurses/widechar/widechars.c

   1 /****************************************************************************
   2  * Copyright (c) 2012 Free Software Foundation, Inc.                        *
   3  *                                                                          *
   4  * Permission is hereby granted, free of charge, to any person obtaining a  *
   5  * copy of this software and associated documentation files (the            *
   6  * "Software"), to deal in the Software without restriction, including      *
   7  * without limitation the rights to use, copy, modify, merge, publish,      *
   8  * distribute, distribute with modifications, sublicense, and/or sell       *
   9  * copies of the Software, and to permit persons to whom the Software is    *
  10  * furnished to do so, subject to the following conditions:                 *
  11  *                                                                          *
  12  * The above copyright notice and this permission notice shall be included  *
  13  * in all copies or substantial portions of the Software.                   *
  14  *                                                                          *
  15  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS  *
  16  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF               *
  17  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.   *
  18  * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,   *
  19  * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR    *
  20  * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR    *
  21  * THE USE OR OTHER DEALINGS IN THE SOFTWARE.                               *
  22  *                                                                          *
  23  * Except as contained in this notice, the name(s) of the above copyright   *
  24  * holders shall not be used in advertising or otherwise to promote the     *
  25  * sale, use or other dealings in this Software without prior written       *
  26  * authorization.                                                           *
  27  ****************************************************************************/
  28
  29 #include <curses.priv.h>
  30
  31 #if USE_WIDEC_SUPPORT
  32
  33 MODULE_ID("$Id: widechars.c,v 1.4 2012/12/02 01:50:59 tom Exp $")
  34
  35 #if defined(__MINGW32__)
  36 /*
  37  * MinGW has wide-character functions, but they do not work correctly.
  38  */
  39
  40 int
  41 _nc_mbtowc(wchar_t *pwc, const char *s, size_t n)
  42 {
  43     int result;
  44     int count;
  45     int try;
  46
  47     if (s != 0 && n != 0) {
  48         /*
  49          * MultiByteToWideChar() can decide to return more than one wide-character.
  50          * We want only one. Ignore any trailing null, both in the initial count
  51          * and in the conversion.
  52          */
  53         count = 0;
  54         for (try = 1; try <= (int) n; ++try) {
  55             count = MultiByteToWideChar(CP_UTF8,
  56                                         MB_ERR_INVALID_CHARS,
  57                                         s,
  58                                         try,
  59                                         pwc,
  60                                         0);
  61             TR(TRACE_BITS, ("...try %d:%d", try, count));
  62             if (count > 0) {
  63                 break;
  64             }
  65         }
  66         if (count < 1 || count > 2) {
  67             result = -1;
  68         } else {
  69             wchar_t actual[2];
  70             count = MultiByteToWideChar(CP_UTF8,
  71                                         MB_ERR_INVALID_CHARS,
  72                                         s,
  73                                         try,
  74                                         actual,
  75                                         2);
  76             TR(TRACE_BITS, ("\twin32 ->%#x, %#x", actual[0], actual[1]));
  77             *pwc = actual[0];
  78             if (actual[1] != 0)
  79                 result = -1;
  80             else
  81                 result = try;
  82         }
  83     } else {
  84         result = 0;
  85     }
  86
  87     return result;
  88 }
  89
  90 int
  91 _nc_mblen(const char *s, size_t n)
  92 {
  93     int result = -1;
  94     int count;
  95     wchar_t temp;
  96
  97     if (s != 0 && n != 0) {
  98         count = _nc_mbtowc(&temp, s, n);
  99         if (count == 1) {
 100             int check = WideCharToMultiByte(CP_UTF8,
 101                                             0,
 102                                             &temp,
 103                                             1,
 104                                             NULL,
 105                                             0,  /* compute length only */
 106                                             NULL,
 107                                             NULL);
 108             TR(TRACE_BITS, ("\tcheck ->%d\n", check));
 109             if (check > 0 && (size_t) check <= n) {
 110                 result = check;
 111             }
 112         }
 113     } else {
 114         result = 0;
 115     }
 116
 117     return result;
 118 }
 119
 120 int __MINGW_NOTHROW
 121 _nc_wctomb(char *s, wchar_t wc)
 122 {
 123     int result;
 124     int check;
 125
 126     check = WideCharToMultiByte(CP_UTF8,
 127                                 0,
 128                                 &wc,
 129                                 1,
 130                                 NULL,
 131                                 0,      /* compute length only */
 132                                 NULL,
 133                                 NULL);
 134     if (check > 0) {
 135         result = WideCharToMultiByte(CP_UTF8,
 136                                      0,
 137                                      &wc,
 138                                      1,
 139                                      s,
 140                                      check + 1,
 141                                      NULL,
 142                                      NULL);
 143     } else {
 144         result = -1;
 145     }
 146     return result;
 147 }
 148
 149 #endif /* __MINGW32__ */
 150
 151 #endif /* USE_WIDEC_SUPPORT */