mirror of
https://github.com/jart/cosmopolitan.git
synced 2025-06-28 07:18:30 +00:00
Add ncurses 6.4
This commit is contained in:
Justine Tunney
parent
6ee5580adc
commit
0ed7309fdb
3071 changed files with 69379 additions and 1 deletions
254
third_party/ncurses/lib_slk.c
vendored
Normal file
254
third_party/ncurses/lib_slk.c
vendored
Normal file
|
|
@ -0,0 +1,254 @@
|
|||
/****************************************************************************
|
||||
* Copyright 2020,2022 Thomas E. Dickey *
|
||||
* Copyright 1998-2010,2011 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 *
|
||||
* "Software"), to deal in the Software without restriction, including *
|
||||
* without limitation the rights to use, copy, modify, merge, publish, *
|
||||
* distribute, distribute with modifications, sublicense, and/or sell *
|
||||
* copies of the Software, and to permit persons to whom the Software is *
|
||||
* furnished to do so, subject to the following conditions: *
|
||||
* *
|
||||
* The above copyright notice and this permission notice shall be included *
|
||||
* in all copies or substantial portions of the Software. *
|
||||
* *
|
||||
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS *
|
||||
* OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF *
|
||||
* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. *
|
||||
* IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, *
|
||||
* DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR *
|
||||
* OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR *
|
||||
* THE USE OR OTHER DEALINGS IN THE SOFTWARE. *
|
||||
* *
|
||||
* Except as contained in this notice, the name(s) of the above copyright *
|
||||
* holders shall not be used in advertising or otherwise to promote the *
|
||||
* sale, use or other dealings in this Software without prior written *
|
||||
* authorization. *
|
||||
****************************************************************************/
|
||||
|
||||
/****************************************************************************
|
||||
* Authors: *
|
||||
* Gerhard Fuernkranz 1993 (original) *
|
||||
* Zeyd M. Ben-Halim 1992,1995 (sic) *
|
||||
* Eric S. Raymond *
|
||||
* Juergen Pfeifer 1996-on *
|
||||
* Thomas E. Dickey *
|
||||
****************************************************************************/
|
||||
|
||||
/*
|
||||
* lib_slk.c
|
||||
* Soft key routines.
|
||||
*/
|
||||
|
||||
#include "curses.priv.h"
|
||||
#include <ctype.h>
|
||||
|
||||
#ifndef CUR
|
||||
#define CUR SP_TERMTYPE
|
||||
#endif
|
||||
|
||||
MODULE_ID("$Id: lib_slk.c,v 1.50 2022/08/20 18:29:22 tom Exp $")
|
||||
|
||||
#ifdef USE_TERM_DRIVER
|
||||
#define NumLabels InfoOf(SP_PARM).numlabels
|
||||
#define NoColorVideo InfoOf(SP_PARM).nocolorvideo
|
||||
#define LabelWidth InfoOf(SP_PARM).labelwidth
|
||||
#define LabelHeight InfoOf(SP_PARM).labelheight
|
||||
#else
|
||||
#define NumLabels num_labels
|
||||
#define NoColorVideo no_color_video
|
||||
#define LabelWidth label_width
|
||||
#define LabelHeight label_height
|
||||
#endif
|
||||
|
||||
/*
|
||||
* Free any memory related to soft labels, return an error.
|
||||
*/
|
||||
static int
|
||||
slk_failed(NCURSES_SP_DCL0)
|
||||
{
|
||||
if ((0 != SP_PARM) && SP_PARM->_slk) {
|
||||
FreeIfNeeded(SP_PARM->_slk->ent);
|
||||
free(SP_PARM->_slk);
|
||||
SP_PARM->_slk = (SLK *) 0;
|
||||
}
|
||||
return ERR;
|
||||
}
|
||||
|
||||
NCURSES_EXPORT(int)
|
||||
_nc_format_slks(NCURSES_SP_DCLx int cols)
|
||||
{
|
||||
int gap, i, x;
|
||||
int max_length;
|
||||
|
||||
if (!SP_PARM || !SP_PARM->_slk)
|
||||
return ERR;
|
||||
|
||||
max_length = SP_PARM->_slk->maxlen;
|
||||
if (SP_PARM->slk_format >= 3) { /* PC style */
|
||||
gap = (cols - 3 * (3 + 4 * max_length)) / 2;
|
||||
|
||||
if (gap < 1)
|
||||
gap = 1;
|
||||
|
||||
for (i = x = 0; i < SP_PARM->_slk->maxlab; i++) {
|
||||
SP_PARM->_slk->ent[i].ent_x = x;
|
||||
x += max_length;
|
||||
x += (i == 3 || i == 7) ? gap : 1;
|
||||
}
|
||||
} else {
|
||||
if (SP_PARM->slk_format == 2) { /* 4-4 */
|
||||
gap = cols - (int) (SP_PARM->_slk->maxlab * max_length) - 6;
|
||||
|
||||
if (gap < 1)
|
||||
gap = 1;
|
||||
for (i = x = 0; i < SP_PARM->_slk->maxlab; i++) {
|
||||
SP_PARM->_slk->ent[i].ent_x = x;
|
||||
x += max_length;
|
||||
x += (i == 3) ? gap : 1;
|
||||
}
|
||||
} else {
|
||||
if (SP_PARM->slk_format == 1) { /* 1 -> 3-2-3 */
|
||||
gap = (cols - (SP_PARM->_slk->maxlab * max_length) - 5)
|
||||
/ 2;
|
||||
|
||||
if (gap < 1)
|
||||
gap = 1;
|
||||
for (i = x = 0; i < SP_PARM->_slk->maxlab; i++) {
|
||||
SP_PARM->_slk->ent[i].ent_x = x;
|
||||
x += max_length;
|
||||
x += (i == 2 || i == 4) ? gap : 1;
|
||||
}
|
||||
} else {
|
||||
return slk_failed(NCURSES_SP_ARG);
|
||||
}
|
||||
}
|
||||
}
|
||||
SP_PARM->_slk->dirty = TRUE;
|
||||
|
||||
return OK;
|
||||
}
|
||||
|
||||
/*
|
||||
* Initialize soft labels.
|
||||
* Called from newterm()
|
||||
*/
|
||||
NCURSES_EXPORT(int)
|
||||
_nc_slk_initialize(WINDOW *stwin, int cols)
|
||||
{
|
||||
int i;
|
||||
int res = OK;
|
||||
size_t max_length;
|
||||
SCREEN *sp;
|
||||
int numlab;
|
||||
|
||||
T((T_CALLED("_nc_slk_initialize()")));
|
||||
|
||||
assert(stwin);
|
||||
|
||||
sp = _nc_screen_of(stwin);
|
||||
if (0 == sp)
|
||||
returnCode(ERR);
|
||||
|
||||
assert(TerminalOf(SP_PARM));
|
||||
|
||||
numlab = NumLabels;
|
||||
|
||||
if (SP_PARM->_slk) { /* we did this already, so simply return */
|
||||
returnCode(OK);
|
||||
} else if ((SP_PARM->_slk = typeCalloc(SLK, 1)) == 0)
|
||||
returnCode(ERR);
|
||||
|
||||
if (!SP_PARM->slk_format)
|
||||
SP_PARM->slk_format = _nc_globals.slk_format;
|
||||
|
||||
/*
|
||||
* If we use colors, vidputs() will suppress video attributes that conflict
|
||||
* with colors. In that case, we're still guaranteed that "reverse" would
|
||||
* work.
|
||||
*/
|
||||
if ((NoColorVideo & 1) == 0)
|
||||
SetAttr(SP_PARM->_slk->attr, A_STANDOUT);
|
||||
else
|
||||
SetAttr(SP_PARM->_slk->attr, A_REVERSE);
|
||||
|
||||
SP_PARM->_slk->maxlab = (short) ((numlab > 0)
|
||||
? numlab
|
||||
: MAX_SKEY(SP_PARM->slk_format));
|
||||
SP_PARM->_slk->maxlen = (short) ((numlab > 0)
|
||||
? LabelWidth * LabelHeight
|
||||
: MAX_SKEY_LEN(SP_PARM->slk_format));
|
||||
SP_PARM->_slk->labcnt = (short) ((SP_PARM->_slk->maxlab < MAX_SKEY(SP_PARM->slk_format))
|
||||
? MAX_SKEY(SP_PARM->slk_format)
|
||||
: SP_PARM->_slk->maxlab);
|
||||
|
||||
if (SP_PARM->_slk->maxlen <= 0
|
||||
|| SP_PARM->_slk->labcnt <= 0
|
||||
|| (SP_PARM->_slk->ent = typeCalloc(slk_ent,
|
||||
(size_t) SP_PARM->_slk->labcnt))
|
||||
== NULL) {
|
||||
free(SP_PARM->_slk->ent);
|
||||
returnCode(slk_failed(NCURSES_SP_ARG));
|
||||
}
|
||||
|
||||
max_length = (size_t) SP_PARM->_slk->maxlen;
|
||||
for (i = 0; i < SP_PARM->_slk->labcnt; i++) {
|
||||
size_t used = max_length + 1;
|
||||
|
||||
SP_PARM->_slk->ent[i].ent_text = (char *) _nc_doalloc(0, used);
|
||||
if (SP_PARM->_slk->ent[i].ent_text == 0)
|
||||
returnCode(slk_failed(NCURSES_SP_ARG));
|
||||
memset(SP_PARM->_slk->ent[i].ent_text, 0, used);
|
||||
|
||||
SP_PARM->_slk->ent[i].form_text = (char *) _nc_doalloc(0, used);
|
||||
if (SP_PARM->_slk->ent[i].form_text == 0)
|
||||
returnCode(slk_failed(NCURSES_SP_ARG));
|
||||
|
||||
if (used > 1) {
|
||||
memset(SP_PARM->_slk->ent[i].form_text, ' ', used - 1);
|
||||
}
|
||||
SP_PARM->_slk->ent[i].form_text[used - 1] = '\0';
|
||||
|
||||
SP_PARM->_slk->ent[i].visible = (char) (i < SP_PARM->_slk->maxlab);
|
||||
}
|
||||
|
||||
res = _nc_format_slks(NCURSES_SP_ARGx cols);
|
||||
|
||||
if ((SP_PARM->_slk->win = stwin) == NULL) {
|
||||
returnCode(slk_failed(NCURSES_SP_ARG));
|
||||
}
|
||||
|
||||
/* We now reset the format so that the next newterm has again
|
||||
* per default no SLK keys and may call slk_init again to
|
||||
* define a new layout. (juergen 03-Mar-1999)
|
||||
*/
|
||||
_nc_globals.slk_format = 0;
|
||||
returnCode(res);
|
||||
}
|
||||
|
||||
/*
|
||||
* Restore the soft labels on the screen.
|
||||
*/
|
||||
NCURSES_EXPORT(int)
|
||||
NCURSES_SP_NAME(slk_restore) (NCURSES_SP_DCL0)
|
||||
{
|
||||
T((T_CALLED("slk_restore(%p)"), (void *) SP_PARM));
|
||||
|
||||
if (0 == SP_PARM)
|
||||
returnCode(ERR);
|
||||
if (SP_PARM->_slk == NULL)
|
||||
returnCode(ERR);
|
||||
SP_PARM->_slk->hidden = FALSE;
|
||||
SP_PARM->_slk->dirty = TRUE;
|
||||
|
||||
returnCode(NCURSES_SP_NAME(slk_refresh) (NCURSES_SP_ARG));
|
||||
}
|
||||
|
||||
#if NCURSES_SP_FUNCS
|
||||
NCURSES_EXPORT(int)
|
||||
slk_restore(void)
|
||||
{
|
||||
return NCURSES_SP_NAME(slk_restore) (CURRENT_SCREEN);
|
||||
}
|
||||
#endif
|
||||
Loading…
Add table
Add a link
Reference in a new issue