ncurses 5.6 - patch 20070512
[ncurses.git] / ncurses / widechar / lib_cchar.c
index 75dbf4a521a2c1cab1f5f63ab5479f7a288aca86..b4a0c37a285f9b8b1198a32783d7c8f673f6629b 100644 (file)
@@ -1,5 +1,5 @@
 /****************************************************************************
- * Copyright (c) 2001-2002,2003 Free Software Foundation, Inc.              *
+ * Copyright (c) 2001-2005,2007 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            *
 
 #include <curses.priv.h>
 
-MODULE_ID("$Id: lib_cchar.c,v 1.8 2003/05/25 00:07:41 tom Exp $")
+MODULE_ID("$Id: lib_cchar.c,v 1.12 2007/05/12 19:03:06 tom Exp $")
 
 /* 
  * The SuSv2 description leaves some room for interpretation.  We'll assume wch
- * is L'\0' terminated, contains at most one character with strictly positive
- * width, which must be the first, and contains no characters of negative
- * width.
+ * points to a string which is L'\0' terminated, contains at least one
+ * character with strictly positive width, which must be the first, and
+ * contains no characters of negative width.
  */
 NCURSES_EXPORT(int)
-setcchar(cchar_t * wcval, const wchar_t * wch, const attr_t attrs,
-        short color_pair, const void *opts)
+setcchar(cchar_t *wcval,
+        const wchar_t *wch,
+        const attr_t attrs,
+        short color_pair,
+        const void *opts)
 {
     int i;
     int len;
     int code = OK;
 
-    TR(TRACE_CCALLS, (T_CALLED("setcchar(%p,%s,%ld,%d,%p)"),
-                     wcval, _nc_viswbuf(wch), attrs, color_pair, opts));
+    TR(TRACE_CCALLS, (T_CALLED("setcchar(%p,%s,%lu,%d,%p)"),
+                     wcval, _nc_viswbuf(wch),
+                     (unsigned long) attrs, color_pair, opts));
 
-    if (opts != NULL || (len = wcslen(wch)) > CCHARW_MAX
+    len = wcslen(wch);
+    if (opts != NULL
        || (len > 1 && wcwidth(wch[0]) < 0)) {
        code = ERR;
     } else {
+       if (len > CCHARW_MAX)
+           len = CCHARW_MAX;
 
        /*
         * If we have a following spacing-character, stop at that point.  We
@@ -73,7 +80,8 @@ setcchar(cchar_t * wcval, const wchar_t * wch, const attr_t attrs,
        memset(wcval, 0, sizeof(*wcval));
 
        if (len != 0) {
-           SetAttr(*wcval, attrs | color_pair);
+           SetAttr(*wcval, attrs | COLOR_PAIR(color_pair));
+           SetPair(CHDEREF(wcval), color_pair);
            memcpy(&wcval->chars, wch, len * sizeof(wchar_t));
            TR(TRACE_CCALLS, ("copy %d wchars, first is %s", len,
                              _tracecchar_t(wcval)));
@@ -85,8 +93,11 @@ setcchar(cchar_t * wcval, const wchar_t * wch, const attr_t attrs,
 }
 
 NCURSES_EXPORT(int)
-getcchar(const cchar_t * wcval, wchar_t * wch, attr_t * attrs,
-        short *color_pair, void *opts)
+getcchar(const cchar_t *wcval,
+        wchar_t *wch,
+        attr_t *attrs,
+        short *color_pair,
+        void *opts)
 {
     wchar_t *wp;
     int len;
@@ -105,8 +116,8 @@ getcchar(const cchar_t * wcval, wchar_t * wch, attr_t * attrs,
        } else if (attrs == 0 || color_pair == 0) {
            code = ERR;
        } else if (len >= 0) {
-           *attrs = AttrOf(*wcval);
-           *color_pair = AttrOf(*wcval) & A_COLOR;
+           *attrs = AttrOf(*wcval) & A_ATTRIBUTES;
+           *color_pair = GetPair(*wcval);
            wmemcpy(wch, wcval->chars, (unsigned) len);
            wch[len] = L'\0';
            code = OK;