ncurses 6.0 - patch 20170401
[ncurses.git] / ncurses / base / lib_slkatr_set.c
1 /****************************************************************************
2  * Copyright (c) 1998-2004,2017 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  *  Author:  Juergen Pfeifer, 1998                                          *
31  *     and:  Thomas E. Dickey 2005-on                                       *
32  ****************************************************************************/
33
34 /*
35  *      lib_slkatr_set.c
36  *      Soft key routines.
37  *      Set the label's attributes
38  */
39 #include <curses.priv.h>
40
41 MODULE_ID("$Id: lib_slkatr_set.c,v 1.16 2017/03/16 23:45:36 tom Exp $")
42
43 NCURSES_EXPORT(int)
44 NCURSES_SP_NAME(slk_attr_set) (NCURSES_SP_DCLx
45                                const attr_t attr,
46                                NCURSES_PAIRS_T pair_arg,
47                                void *opts)
48 {
49     int code = ERR;
50     int color_pair = pair_arg;
51
52     T((T_CALLED("slk_attr_set(%p,%s,%d)"),
53        (void *) SP_PARM,
54        _traceattr(attr),
55        color_pair));
56
57     set_extended_pair(opts, color_pair);
58     if (SP_PARM != 0
59         && SP_PARM->_slk != 0
60         && color_pair >= 0
61         && color_pair < SP_PARM->_pair_limit) {
62         TR(TRACE_ATTRS, ("... current %s", _tracech_t(CHREF(SP_PARM->_slk->attr))));
63         SetAttr(SP_PARM->_slk->attr, attr);
64         if (color_pair > 0) {
65             SetPair(SP_PARM->_slk->attr, color_pair);
66         }
67         TR(TRACE_ATTRS, ("new attribute is %s", _tracech_t(CHREF(SP_PARM->_slk->attr))));
68         code = OK;
69     }
70     returnCode(code);
71 }
72
73 #if NCURSES_SP_FUNCS
74 NCURSES_EXPORT(int)
75 slk_attr_set(const attr_t attr, NCURSES_COLOR_T pair_arg, void *opts)
76 {
77     return NCURSES_SP_NAME(slk_attr_set) (CURRENT_SCREEN, attr,
78                                           pair_arg, opts);
79 }
80 #endif