mirror of
https://github.com/jart/cosmopolitan.git
synced 2025-06-27 14:58:30 +00:00
Add ncurses 6.4
This commit is contained in:
parent
6ee5580adc
commit
0ed7309fdb
3071 changed files with 69379 additions and 1 deletions
188
third_party/ncurses/lib_ti.c
vendored
Normal file
188
third_party/ncurses/lib_ti.c
vendored
Normal file
|
@ -0,0 +1,188 @@
|
|||
/****************************************************************************
|
||||
* Copyright 2018,2020 Thomas E. Dickey *
|
||||
* Copyright 1998-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 *
|
||||
* "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. *
|
||||
****************************************************************************/
|
||||
|
||||
/****************************************************************************
|
||||
* Author: Zeyd M. Ben-Halim <zmbenhal@netcom.com> 1992,1995 *
|
||||
* and: Eric S. Raymond <esr@snark.thyrsus.com> *
|
||||
* and: Thomas E. Dickey 1996-on *
|
||||
****************************************************************************/
|
||||
|
||||
#include "curses.priv.h"
|
||||
|
||||
#include "tic.h"
|
||||
|
||||
MODULE_ID("$Id: lib_ti.c,v 1.34 2020/02/02 23:34:34 tom Exp $")
|
||||
|
||||
#if 0
|
||||
static bool
|
||||
same_name(const char *a, const char *b)
|
||||
{
|
||||
fprintf(stderr, "compare(%s,%s)\n", a, b);
|
||||
return !strcmp(a, b);
|
||||
}
|
||||
#else
|
||||
#define same_name(a,b) !strcmp(a,b)
|
||||
#endif
|
||||
|
||||
NCURSES_EXPORT(int)
|
||||
NCURSES_SP_NAME(tigetflag) (NCURSES_SP_DCLx const char *str)
|
||||
{
|
||||
int result = ABSENT_BOOLEAN;
|
||||
|
||||
T((T_CALLED("tigetflag(%p, %s)"), (void *) SP_PARM, str));
|
||||
|
||||
if (HasTInfoTerminal(SP_PARM)) {
|
||||
TERMTYPE2 *tp = &TerminalType(TerminalOf(SP_PARM));
|
||||
struct name_table_entry const *entry_ptr;
|
||||
int j = -1;
|
||||
|
||||
entry_ptr = _nc_find_type_entry(str, BOOLEAN, FALSE);
|
||||
if (entry_ptr != 0) {
|
||||
j = entry_ptr->nte_index;
|
||||
}
|
||||
#if NCURSES_XNAMES
|
||||
else {
|
||||
int i;
|
||||
for_each_ext_boolean(i, tp) {
|
||||
const char *capname = ExtBoolname(tp, i, boolnames);
|
||||
if (same_name(str, capname)) {
|
||||
j = i;
|
||||
break;
|
||||
}
|
||||
}
|
||||
}
|
||||
#endif
|
||||
if (j >= 0) {
|
||||
/* note: setupterm forces invalid booleans to false */
|
||||
result = tp->Booleans[j];
|
||||
}
|
||||
}
|
||||
|
||||
returnCode(result);
|
||||
}
|
||||
|
||||
#if NCURSES_SP_FUNCS
|
||||
NCURSES_EXPORT(int)
|
||||
tigetflag(const char *str)
|
||||
{
|
||||
return NCURSES_SP_NAME(tigetflag) (CURRENT_SCREEN, str);
|
||||
}
|
||||
#endif
|
||||
|
||||
NCURSES_EXPORT(int)
|
||||
NCURSES_SP_NAME(tigetnum) (NCURSES_SP_DCLx const char *str)
|
||||
{
|
||||
int result = CANCELLED_NUMERIC; /* Solaris returns a -1 on error */
|
||||
|
||||
T((T_CALLED("tigetnum(%p, %s)"), (void *) SP_PARM, str));
|
||||
|
||||
if (HasTInfoTerminal(SP_PARM)) {
|
||||
TERMTYPE2 *tp = &TerminalType(TerminalOf(SP_PARM));
|
||||
struct name_table_entry const *entry_ptr;
|
||||
int j = -1;
|
||||
|
||||
entry_ptr = _nc_find_type_entry(str, NUMBER, FALSE);
|
||||
if (entry_ptr != 0) {
|
||||
j = entry_ptr->nte_index;
|
||||
}
|
||||
#if NCURSES_XNAMES
|
||||
else {
|
||||
int i;
|
||||
for_each_ext_number(i, tp) {
|
||||
const char *capname = ExtNumname(tp, i, numnames);
|
||||
if (same_name(str, capname)) {
|
||||
j = i;
|
||||
break;
|
||||
}
|
||||
}
|
||||
}
|
||||
#endif
|
||||
if (j >= 0) {
|
||||
if (VALID_NUMERIC(tp->Numbers[j]))
|
||||
result = tp->Numbers[j];
|
||||
else
|
||||
result = ABSENT_NUMERIC;
|
||||
}
|
||||
}
|
||||
|
||||
returnCode(result);
|
||||
}
|
||||
|
||||
#if NCURSES_SP_FUNCS
|
||||
NCURSES_EXPORT(int)
|
||||
tigetnum(const char *str)
|
||||
{
|
||||
return NCURSES_SP_NAME(tigetnum) (CURRENT_SCREEN, str);
|
||||
}
|
||||
#endif
|
||||
|
||||
NCURSES_EXPORT(char *)
|
||||
NCURSES_SP_NAME(tigetstr) (NCURSES_SP_DCLx const char *str)
|
||||
{
|
||||
char *result = CANCELLED_STRING;
|
||||
|
||||
T((T_CALLED("tigetstr(%p, %s)"), (void *) SP_PARM, str));
|
||||
|
||||
if (HasTInfoTerminal(SP_PARM)) {
|
||||
TERMTYPE2 *tp = &TerminalType(TerminalOf(SP_PARM));
|
||||
struct name_table_entry const *entry_ptr;
|
||||
int j = -1;
|
||||
|
||||
entry_ptr = _nc_find_type_entry(str, STRING, FALSE);
|
||||
if (entry_ptr != 0) {
|
||||
j = entry_ptr->nte_index;
|
||||
}
|
||||
#if NCURSES_XNAMES
|
||||
else {
|
||||
int i;
|
||||
for_each_ext_string(i, tp) {
|
||||
const char *capname = ExtStrname(tp, i, strnames);
|
||||
if (same_name(str, capname)) {
|
||||
j = i;
|
||||
break;
|
||||
}
|
||||
}
|
||||
}
|
||||
#endif
|
||||
if (j >= 0) {
|
||||
/* note: setupterm forces cancelled strings to null */
|
||||
result = tp->Strings[j];
|
||||
}
|
||||
}
|
||||
|
||||
returnPtr(result);
|
||||
}
|
||||
|
||||
#if NCURSES_SP_FUNCS
|
||||
NCURSES_EXPORT(char *)
|
||||
tigetstr(const char *str)
|
||||
{
|
||||
return NCURSES_SP_NAME(tigetstr) (CURRENT_SCREEN, str);
|
||||
}
|
||||
#endif
|
Loading…
Add table
Add a link
Reference in a new issue