release/src/router/libncurses/ncurses/widechar/lib_cchar.c

   1 /****************************************************************************
   2  * Copyright (c) 2001-2009,2010 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 /*
  30 **      lib_cchar.c
  31 **
  32 **      The routines setcchar() and getcchar().
  33 **
  34 */
  35
  36 #include <curses.priv.h>
  37
  38 MODULE_ID("$Id: lib_cchar.c,v 1.20 2010/12/25 23:46:26 tom Exp $")
  39
  40 /*
  41  * The SuSv2 description leaves some room for interpretation.  We'll assume wch
  42  * points to a string which is L'\0' terminated, contains at least one
  43  * character with strictly positive width, which must be the first, and
  44  * contains no characters of negative width.
  45  */
  46 NCURSES_EXPORT(int)
  47 setcchar(cchar_t *wcval,
  48          const wchar_t *wch,
  49          const attr_t attrs,
  50          short color_pair,
  51          const void *opts)
  52 {
  53     unsigned i;
  54     unsigned len;
  55     int code = OK;
  56
  57     TR(TRACE_CCALLS, (T_CALLED("setcchar(%p,%s,%lu,%d,%p)"),
  58                       (void *) wcval, _nc_viswbuf(wch),
  59                       (unsigned long) attrs, color_pair, opts));
  60
  61     len = (unsigned) wcslen(wch);
  62     if (opts != NULL
  63         || (len > 1 && wcwidth(wch[0]) < 0)) {
  64         code = ERR;
  65     } else {
  66         if (len > CCHARW_MAX)
  67             len = CCHARW_MAX;
  68
  69         /*
  70          * If we have a following spacing-character, stop at that point.  We
  71          * are only interested in adding non-spacing characters.
  72          */
  73         for (i = 1; i < len; ++i) {
  74             if (wcwidth(wch[i]) != 0) {
  75                 len = i;
  76                 break;
  77             }
  78         }
  79
  80         memset(wcval, 0, sizeof(*wcval));
  81
  82         if (len != 0) {
  83             SetAttr(*wcval, attrs | (attr_t) ColorPair(color_pair));
  84             SetPair(CHDEREF(wcval), color_pair);
  85             memcpy(&wcval->chars, wch, len * sizeof(wchar_t));
  86             TR(TRACE_CCALLS, ("copy %d wchars, first is %s", len,
  87                               _tracecchar_t(wcval)));
  88         }
  89     }
  90
  91     TR(TRACE_CCALLS, (T_RETURN("%d"), code));
  92     return (code);
  93 }
  94
  95 NCURSES_EXPORT(int)
  96 getcchar(const cchar_t *wcval,
  97          wchar_t *wch,
  98          attr_t *attrs,
  99          short *color_pair,
 100          void *opts)
 101 {
 102     wchar_t *wp;
 103     int len;
 104     int code = ERR;
 105
 106     TR(TRACE_CCALLS, (T_CALLED("getcchar(%p,%p,%p,%p,%p)"),
 107                       (const void *) wcval,
 108                       (void *) wch,
 109                       (void *) attrs,
 110                       (void *) color_pair,
 111                       opts));
 112
 113     if (opts == NULL) {
 114         len = ((wp = wmemchr(wcval->chars, L'\0', CCHARW_MAX))
 115                ? (int) (wp - wcval->chars)
 116                : CCHARW_MAX);
 117
 118         if (wch == NULL) {
 119             /*
 120              * If the value is a null, set the length to 1.
 121              * If the value is not a null, return the length plus 1 for null.
 122              */
 123             code = (len < CCHARW_MAX) ? (len + 1) : CCHARW_MAX;
 124         } else if (attrs == 0 || color_pair == 0) {
 125             code = ERR;
 126         } else if (len >= 0) {
 127             *attrs = AttrOf(*wcval) & A_ATTRIBUTES;
 128             *color_pair = (short) GetPair(*wcval);
 129             wmemcpy(wch, wcval->chars, (unsigned) len);
 130             wch[len] = L'\0';
 131             code = OK;
 132         }
 133     }
 134
 135     TR(TRACE_CCALLS, (T_RETURN("%d"), code));
 136     return (code);
 137 }