ncurses 6.2 - patch 20210206

[ncurses.git] / ncurses / widechar / lib_cchar.c

diff --git a/ncurses/widechar/lib_cchar.c b/ncurses/widechar/lib_cchar.c
index 20ccb75b804e77f1fd86a778444e17c1e879b7ff..62a1113ecaa61e7bb8e375024605b1f2acd5f613 100644 (file)
--- a/ncurses/widechar/lib_cchar.c
+++ b/ncurses/widechar/lib_cchar.c
@@ -1,5 +1,6 @@
 /****************************************************************************
- * Copyright (c) 2001-2014,2016 Free Software Foundation, Inc.              *
+ * Copyright 2019-2020,2021 Thomas E. Dickey                                *
+ * Copyright 2001-2016,2017 Free Software Foundation, Inc.                  *
  *                                                                          *
  * Permission is hereby granted, free of charge, to any person obtaining a  *
  * copy of this software and associated documentation files (the            *
@@ -34,8 +35,9 @@
 */
 
 #include <curses.priv.h>
+#include <wchar.h>
 
-MODULE_ID("$Id: lib_cchar.c,v 1.28 2016/05/28 23:36:34 tom Exp $")
+MODULE_ID("$Id: lib_cchar.c,v 1.35 2021/01/17 00:04:08 tom Exp $")
 
 /* 
  * The SuSv2 description leaves some room for interpretation.  We'll assume wch
@@ -47,19 +49,21 @@ NCURSES_EXPORT(int)
 setcchar(cchar_t *wcval,
         const wchar_t *wch,
         const attr_t attrs,
-        NCURSES_PAIRS_T color_pair,
+        NCURSES_PAIRS_T pair_arg,
         const void *opts)
 {
-    unsigned len;
     int code = OK;
+    int color_pair = pair_arg;
+    unsigned len;
 
-    TR(TRACE_CCALLS, (T_CALLED("setcchar(%p,%s,%lu,%d,%p)"),
+    TR(TRACE_CCALLS, (T_CALLED("setcchar(%p,%s,attrs=%lu,pair=%d,%p)"),
                      (void *) wcval, _nc_viswbuf(wch),
-                     (unsigned long) attrs, (int) color_pair, opts));
+                     (unsigned long) attrs, color_pair, opts));
 
-    if (opts != NULL
-       || wch == NULL
-       || ((len = (unsigned) wcslen(wch)) > 1 && wcwidth(wch[0]) < 0)) {
+    set_extended_pair(opts, color_pair);
+    if (wch == NULL
+       || ((len = (unsigned) wcslen(wch)) > 1 && _nc_wacs_width(wch[0]) < 0)
+       || color_pair < 0) {
        code = ERR;
     } else {
        unsigned i;
@@ -72,7 +76,7 @@ setcchar(cchar_t *wcval,
         * are only interested in adding non-spacing characters.
         */
        for (i = 1; i < len; ++i) {
-           if (wcwidth(wch[i]) != 0) {
+           if (_nc_wacs_width(wch[i]) != 0) {
                len = i;
                break;
            }
@@ -97,19 +101,25 @@ NCURSES_EXPORT(int)
 getcchar(const cchar_t *wcval,
         wchar_t *wch,
         attr_t *attrs,
-        NCURSES_PAIRS_T *color_pair,
+        NCURSES_PAIRS_T *pair_arg,
         void *opts)
 {
     int code = ERR;
+    int color_pair;
 
     TR(TRACE_CCALLS, (T_CALLED("getcchar(%p,%p,%p,%p,%p)"),
                      (const void *) wcval,
                      (void *) wch,
                      (void *) attrs,
-                     (void *) color_pair,
+                     (void *) pair_arg,
                      opts));
 
-    if (opts == NULL && wcval != NULL) {
+#if !NCURSES_EXT_COLORS
+    if (opts != NULL) {
+       ;                       /* empty */
+    } else
+#endif
+    if (wcval != NULL) {
        wchar_t *wp;
        int len;
 
@@ -123,14 +133,19 @@ getcchar(const cchar_t *wcval,
             * If the value is not a null, return the length plus 1 for null.
             */
            code = (len < CCHARW_MAX) ? (len + 1) : CCHARW_MAX;
-       } else if (attrs == 0 || color_pair == 0) {
+       } else if (attrs == 0 || pair_arg == 0) {
            code = ERR;
        } else if (len >= 0) {
+           TR(TRACE_CCALLS, ("copy %d wchars, first is %s", len,
+                             _tracecchar_t(wcval)));
            *attrs = AttrOf(*wcval) & A_ATTRIBUTES;
-           *color_pair = (NCURSES_PAIRS_T) GetPair(*wcval);
+           color_pair = GetPair(*wcval);
+           get_extended_pair(opts, color_pair);
+           *pair_arg = limit_PAIRS(color_pair);
            wmemcpy(wch, wcval->chars, (size_t) len);
            wch[len] = L'\0';
-           code = OK;
+           if (*pair_arg >= 0)
+               code = OK;
        }
     }