1 /****************************************************************************
2 * Copyright (c) 1998-2004,2005 Free Software Foundation, Inc. *
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: *
12 * The above copyright notice and this permission notice shall be included *
13 * in all copies or substantial portions of the Software. *
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. *
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 *
27 ****************************************************************************/
29 /****************************************************************************
31 * Gerhard Fuernkranz 1993 (original) *
32 * Zeyd M. Ben-Halim 1992,1995 (sic) *
34 * Juergen Pfeifer 1996-on *
36 ****************************************************************************/
43 #include <curses.priv.h>
46 #include <term.h> /* num_labels, label_*, plab_norm */
48 MODULE_ID("$Id: lib_slk.c,v 1.30 2005/01/08 21:56:36 tom Exp $")
51 * We'd like to move these into the screen context structure, but cannot,
52 * because slk_init() is called before initscr()/newterm().
54 NCURSES_EXPORT_VAR(int)
55 _nc_slk_format = 0; /* one more than format specified in slk_init() */
58 * Paint the info line for the PC style SLK emulation.
62 slk_paint_info(WINDOW *win)
64 if (win && SP->slk_format == 4) {
67 mvwhline(win, 0, 0, 0, getmaxx(win));
70 for (i = 0; i < SP->_slk->maxlab; i++) {
71 mvwprintw(win, 0, SP->_slk->ent[i].ent_x, "F%d", i + 1);
77 * Free any memory related to soft labels, return an error.
83 FreeIfNeeded(SP->_slk->ent);
91 * Initialize soft labels.
92 * Called from newterm()
95 _nc_slk_initialize(WINDOW *stwin, int cols)
101 T((T_CALLED("_nc_slk_initialize()")));
103 if (SP->_slk) { /* we did this already, so simply return */
105 } else if ((SP->_slk = typeCalloc(SLK, 1)) == 0)
108 SP->_slk->ent = NULL;
111 * If we use colors, vidputs() will suppress video attributes that conflict
112 * with colors. In that case, we're still guaranteed that "reverse" would
115 if ((no_color_video & 1) == 0)
116 SetAttr(SP->_slk->attr, A_STANDOUT);
118 SetAttr(SP->_slk->attr, A_REVERSE);
120 SP->_slk->maxlab = ((num_labels > 0)
122 : MAX_SKEY(_nc_slk_format));
123 SP->_slk->maxlen = ((num_labels > 0)
124 ? label_width * label_height
125 : MAX_SKEY_LEN(_nc_slk_format));
126 SP->_slk->labcnt = ((SP->_slk->maxlab < MAX_SKEY(_nc_slk_format))
127 ? MAX_SKEY(_nc_slk_format)
130 if (SP->_slk->maxlen <= 0
131 || SP->_slk->labcnt <= 0
132 || (SP->_slk->ent = typeCalloc(slk_ent,
133 (unsigned) SP->_slk->labcnt)) == NULL)
134 returnCode(slk_failed());
136 max_length = SP->_slk->maxlen;
137 for (i = 0; i < SP->_slk->labcnt; i++) {
138 size_t used = max_length + 1;
140 if ((SP->_slk->ent[i].ent_text = (char *) _nc_doalloc(0, used)) == 0)
141 returnCode(slk_failed());
142 memset(SP->_slk->ent[i].ent_text, 0, used);
144 if ((SP->_slk->ent[i].form_text = (char *) _nc_doalloc(0, used)) == 0)
145 returnCode(slk_failed());
146 memset(SP->_slk->ent[i].form_text, 0, used);
148 memset(SP->_slk->ent[i].form_text, ' ', max_length);
149 SP->_slk->ent[i].visible = (i < SP->_slk->maxlab);
151 if (_nc_slk_format >= 3) { /* PC style */
152 int gap = (cols - 3 * (3 + 4 * max_length)) / 2;
157 for (i = x = 0; i < SP->_slk->maxlab; i++) {
158 SP->_slk->ent[i].ent_x = x;
160 x += (i == 3 || i == 7) ? gap : 1;
162 slk_paint_info(stwin);
164 if (_nc_slk_format == 2) { /* 4-4 */
165 int gap = cols - (SP->_slk->maxlab * max_length) - 6;
169 for (i = x = 0; i < SP->_slk->maxlab; i++) {
170 SP->_slk->ent[i].ent_x = x;
172 x += (i == 3) ? gap : 1;
175 if (_nc_slk_format == 1) { /* 1 -> 3-2-3 */
176 int gap = (cols - (SP->_slk->maxlab * max_length) - 5)
181 for (i = x = 0; i < SP->_slk->maxlab; i++) {
182 SP->_slk->ent[i].ent_x = x;
184 x += (i == 2 || i == 4) ? gap : 1;
187 returnCode(slk_failed());
190 SP->_slk->dirty = TRUE;
191 if ((SP->_slk->win = stwin) == NULL) {
192 returnCode(slk_failed());
195 /* We now reset the format so that the next newterm has again
196 * per default no SLK keys and may call slk_init again to
197 * define a new layout. (juergen 03-Mar-1999)
199 SP->slk_format = _nc_slk_format;
205 * Restore the soft labels on the screen.
210 T((T_CALLED("slk_restore()")));
212 if (SP->_slk == NULL)
214 SP->_slk->hidden = FALSE;
215 SP->_slk->dirty = TRUE;
216 /* we have to repaint info line eventually */
217 slk_paint_info(SP->_slk->win);
219 returnCode(slk_refresh());