300 lines
8.9 KiB
C
300 lines
8.9 KiB
C
/* $NetBSD: acs.c,v 1.22 2021/09/06 07:03:49 rin Exp $ */
|
|
|
|
/*
|
|
* Copyright (c) 2000 The NetBSD Foundation, Inc.
|
|
* All rights reserved.
|
|
*
|
|
* This code is derived from software contributed to The NetBSD Foundation
|
|
* by Julian Coleman.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
|
|
* ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
|
|
* TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
|
|
* PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
|
|
* BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
|
|
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
|
|
* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
|
|
* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
|
|
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
|
|
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
|
* POSSIBILITY OF SUCH DAMAGE.
|
|
*/
|
|
|
|
#include <sys/cdefs.h>
|
|
#ifndef lint
|
|
__RCSID("$NetBSD: acs.c,v 1.22 2021/09/06 07:03:49 rin Exp $");
|
|
#endif /* not lint */
|
|
|
|
#include "curses.h"
|
|
#include "curses_private.h"
|
|
|
|
chtype _acs_char[NUM_ACS];
|
|
#ifdef HAVE_WCHAR
|
|
#include <assert.h>
|
|
#include <locale.h>
|
|
#include <langinfo.h>
|
|
#include <strings.h>
|
|
|
|
cchar_t _wacs_char[ NUM_ACS ];
|
|
#endif /* HAVE_WCHAR */
|
|
|
|
/*
|
|
* __init_acs --
|
|
* Fill in the ACS characters. The 'acs_chars' terminfo entry is a list of
|
|
* character pairs - ACS definition then terminal representation.
|
|
*/
|
|
void
|
|
__init_acs(SCREEN *screen)
|
|
{
|
|
int count;
|
|
const char *aofac; /* Address of 'ac' */
|
|
unsigned char acs, term;
|
|
|
|
/* Default value '+' for all ACS characters */
|
|
for (count=0; count < NUM_ACS; count++)
|
|
_acs_char[count]= '+';
|
|
|
|
/* Add the SUSv2 defaults (those that are not '+') */
|
|
ACS_RARROW = '>';
|
|
ACS_LARROW = '<';
|
|
ACS_UARROW = '^';
|
|
ACS_DARROW = 'v';
|
|
ACS_BLOCK = '#';
|
|
/* ACS_DIAMOND = '+'; */
|
|
ACS_CKBOARD = ':';
|
|
ACS_DEGREE = 39; /* ' */
|
|
ACS_PLMINUS = '#';
|
|
ACS_BOARD = '#';
|
|
ACS_LANTERN = '#';
|
|
/* ACS_LRCORNER = '+'; */
|
|
/* ACS_URCORNER = '+'; */
|
|
/* ACS_ULCORNER = '+'; */
|
|
/* ACS_LLCORNER = '+'; */
|
|
/* ACS_PLUS = '+'; */
|
|
ACS_HLINE = '-';
|
|
ACS_S1 = '-';
|
|
ACS_S9 = '_';
|
|
/* ACS_LTEE = '+'; */
|
|
/* ACS_RTEE = '+'; */
|
|
/* ACS_BTEE = '+'; */
|
|
/* ACS_TTEE = '+'; */
|
|
ACS_VLINE = '|';
|
|
ACS_BULLET = 'o';
|
|
/* Add the extensions defaults */
|
|
ACS_S3 = '-';
|
|
ACS_S7 = '-';
|
|
ACS_LEQUAL = '<';
|
|
ACS_GEQUAL = '>';
|
|
ACS_PI = '*';
|
|
ACS_NEQUAL = '!';
|
|
ACS_STERLING = 'f';
|
|
|
|
if (t_acs_chars(screen->term) == NULL)
|
|
goto out;
|
|
|
|
aofac = t_acs_chars(screen->term);
|
|
|
|
while (*aofac != '\0') {
|
|
if ((acs = *aofac) == '\0')
|
|
return;
|
|
if ((term = *++aofac) == '\0')
|
|
return;
|
|
/* Only add characters 1 to 127 */
|
|
if (acs < NUM_ACS)
|
|
_acs_char[acs] = term | __ALTCHARSET;
|
|
aofac++;
|
|
__CTRACE(__CTRACE_INIT, "__init_acs: %c = %c\n", acs, term);
|
|
}
|
|
|
|
if (t_ena_acs(screen->term) != NULL)
|
|
ti_puts(screen->term, t_ena_acs(screen->term), 0,
|
|
__cputchar_args, screen->outfd);
|
|
|
|
out:
|
|
for (count=0; count < NUM_ACS; count++)
|
|
screen->acs_char[count]= _acs_char[count];
|
|
}
|
|
|
|
void
|
|
_cursesi_reset_acs(SCREEN *screen)
|
|
{
|
|
int count;
|
|
|
|
for (count=0; count < NUM_ACS; count++)
|
|
_acs_char[count]= screen->acs_char[count];
|
|
}
|
|
|
|
#ifdef HAVE_WCHAR
|
|
/*
|
|
* __init_wacs --
|
|
* Fill in the ACS characters. The 'acs_chars' terminfo entry is a list of
|
|
* character pairs - ACS definition then terminal representation.
|
|
*/
|
|
void
|
|
__init_wacs(SCREEN *screen)
|
|
{
|
|
int count;
|
|
const char *aofac; /* Address of 'ac' */
|
|
unsigned char acs, term;
|
|
char *lstr;
|
|
|
|
/* Default value '+' for all ACS characters */
|
|
for (count=0; count < NUM_ACS; count++) {
|
|
_wacs_char[ count ].vals[ 0 ] = ( wchar_t )btowc( '+' );
|
|
_wacs_char[ count ].attributes = 0;
|
|
_wacs_char[ count ].elements = 1;
|
|
}
|
|
|
|
/* Add the SUSv2 defaults (those that are not '+') */
|
|
if (!strcmp(setlocale(LC_CTYPE, NULL), "C"))
|
|
setlocale(LC_CTYPE, "");
|
|
lstr = nl_langinfo(CODESET);
|
|
_DIAGASSERT(lstr);
|
|
if (strcasecmp(lstr, "UTF-8")) {
|
|
__CTRACE(__CTRACE_INIT, "__init_wacs: setting defaults\n" );
|
|
WACS_RARROW->vals[0] = ( wchar_t )btowc( '>' );
|
|
WACS_LARROW->vals[0] = ( wchar_t )btowc( '<' );
|
|
WACS_UARROW->vals[0] = ( wchar_t )btowc( '^' );
|
|
WACS_DARROW->vals[0] = ( wchar_t )btowc( 'v' );
|
|
WACS_BLOCK->vals[0] = ( wchar_t )btowc( '#' );
|
|
WACS_CKBOARD->vals[0] = ( wchar_t )btowc( ':' );
|
|
WACS_DEGREE->vals[0] = ( wchar_t )btowc( 39 ); /* ' */
|
|
WACS_PLMINUS->vals[0] = ( wchar_t )btowc( '#' );
|
|
WACS_BOARD->vals[0] = ( wchar_t )btowc( '#' );
|
|
WACS_LANTERN->vals[0] = ( wchar_t )btowc( '#' );
|
|
WACS_HLINE->vals[0] = ( wchar_t )btowc( '-' );
|
|
WACS_S1->vals[0] = ( wchar_t )btowc( '-' );
|
|
WACS_S9->vals[0] = ( wchar_t )btowc( '_' );
|
|
WACS_VLINE->vals[0] = ( wchar_t )btowc( '|' );
|
|
WACS_BULLET->vals[0] = ( wchar_t )btowc( 'o' );
|
|
WACS_S3->vals[0] = ( wchar_t )btowc( 'p' );
|
|
WACS_S7->vals[0] = ( wchar_t )btowc( 'r' );
|
|
WACS_LEQUAL->vals[0] = ( wchar_t )btowc( 'y' );
|
|
WACS_GEQUAL->vals[0] = ( wchar_t )btowc( 'z' );
|
|
WACS_PI->vals[0] = ( wchar_t )btowc( '{' );
|
|
WACS_NEQUAL->vals[0] = ( wchar_t )btowc( '|' );
|
|
WACS_STERLING->vals[0]= ( wchar_t )btowc( '}' );
|
|
} else {
|
|
/* Unicode defaults */
|
|
__CTRACE(__CTRACE_INIT,
|
|
"__init_wacs: setting Unicode defaults\n" );
|
|
WACS_RARROW->vals[0] = 0x2192;
|
|
ACS_RARROW = '+' | __ACS_IS_WACS;
|
|
WACS_LARROW->vals[0] = 0x2190;
|
|
ACS_LARROW = ',' | __ACS_IS_WACS;
|
|
WACS_UARROW->vals[0] = 0x2191;
|
|
ACS_UARROW = '-' | __ACS_IS_WACS;
|
|
WACS_DARROW->vals[0] = 0x2193;
|
|
ACS_DARROW = '.' | __ACS_IS_WACS;
|
|
WACS_BLOCK->vals[0] = 0x25ae;
|
|
ACS_BLOCK = '0' | __ACS_IS_WACS;
|
|
WACS_DIAMOND->vals[0] = 0x25c6;
|
|
ACS_DIAMOND = '`' | __ACS_IS_WACS;
|
|
WACS_CKBOARD->vals[0] = 0x2592;
|
|
ACS_CKBOARD = 'a' | __ACS_IS_WACS;
|
|
WACS_DEGREE->vals[0] = 0x00b0;
|
|
ACS_DEGREE = 'f' | __ACS_IS_WACS;
|
|
WACS_PLMINUS->vals[0] = 0x00b1;
|
|
ACS_PLMINUS = 'g' | __ACS_IS_WACS;
|
|
WACS_BOARD->vals[0] = 0x2592;
|
|
ACS_BOARD = 'h' | __ACS_IS_WACS;
|
|
WACS_LANTERN->vals[0] = 0x2603;
|
|
ACS_LANTERN = 'i' | __ACS_IS_WACS;
|
|
WACS_LRCORNER->vals[0]= 0x2518;
|
|
ACS_LRCORNER = 'j' | __ACS_IS_WACS;
|
|
WACS_URCORNER->vals[0]= 0x2510;
|
|
ACS_URCORNER = 'k' | __ACS_IS_WACS;
|
|
WACS_ULCORNER->vals[0]= 0x250c;
|
|
ACS_ULCORNER = 'l' | __ACS_IS_WACS;
|
|
WACS_LLCORNER->vals[0]= 0x2514;
|
|
ACS_LLCORNER = 'm' | __ACS_IS_WACS;
|
|
WACS_PLUS->vals[0] = 0x253c;
|
|
ACS_PLUS = 'n' | __ACS_IS_WACS;
|
|
WACS_HLINE->vals[0] = 0x2500;
|
|
ACS_HLINE = 'q' | __ACS_IS_WACS;
|
|
WACS_S1->vals[0] = 0x23ba;
|
|
ACS_S1 = 'o' | __ACS_IS_WACS;
|
|
WACS_S9->vals[0] = 0x23bd;
|
|
ACS_S9 = 's' | __ACS_IS_WACS;
|
|
WACS_LTEE->vals[0] = 0x251c;
|
|
ACS_LTEE = 't' | __ACS_IS_WACS;
|
|
WACS_RTEE->vals[0] = 0x2524;
|
|
ACS_RTEE = 'u' | __ACS_IS_WACS;
|
|
WACS_BTEE->vals[0] = 0x2534;
|
|
ACS_BTEE = 'v' | __ACS_IS_WACS;
|
|
WACS_TTEE->vals[0] = 0x252c;
|
|
ACS_TTEE = 'w' | __ACS_IS_WACS;
|
|
WACS_VLINE->vals[0] = 0x2502;
|
|
ACS_VLINE = 'x' | __ACS_IS_WACS;
|
|
WACS_BULLET->vals[0] = 0x00b7;
|
|
ACS_BULLET = '~' | __ACS_IS_WACS;
|
|
WACS_S3->vals[0] = 0x23bb;
|
|
ACS_S3 = 'p' | __ACS_IS_WACS;
|
|
WACS_S7->vals[0] = 0x23bc;
|
|
ACS_S7 = 'r' | __ACS_IS_WACS;
|
|
WACS_LEQUAL->vals[0] = 0x2264;
|
|
ACS_LEQUAL = 'y' | __ACS_IS_WACS;
|
|
WACS_GEQUAL->vals[0] = 0x2265;
|
|
ACS_GEQUAL = 'z' | __ACS_IS_WACS;
|
|
WACS_PI->vals[0] = 0x03C0;
|
|
ACS_PI = '{' | __ACS_IS_WACS;
|
|
WACS_NEQUAL->vals[0] = 0x2260;
|
|
ACS_NEQUAL = '|' | __ACS_IS_WACS;
|
|
WACS_STERLING->vals[0]= 0x00A3;
|
|
ACS_STERLING = '}' | __ACS_IS_WACS;
|
|
}
|
|
|
|
if (t_acs_chars(screen->term) == NULL) {
|
|
__CTRACE(__CTRACE_INIT,
|
|
"__init_wacs: no alternative characters\n" );
|
|
goto out;
|
|
}
|
|
|
|
aofac = t_acs_chars(screen->term);
|
|
|
|
while (*aofac != '\0') {
|
|
if ((acs = *aofac) == '\0')
|
|
return;
|
|
if ((term = *++aofac) == '\0')
|
|
return;
|
|
/* Only add characters 1 to 127 */
|
|
if (acs < NUM_ACS) {
|
|
_wacs_char[acs].vals[ 0 ] = term;
|
|
_wacs_char[acs].attributes |= WA_ALTCHARSET;
|
|
}
|
|
aofac++;
|
|
__CTRACE(__CTRACE_INIT, "__init_wacs: %c = %c\n", acs, term);
|
|
}
|
|
|
|
if (t_ena_acs(screen->term) != NULL)
|
|
ti_puts(screen->term, t_ena_acs(screen->term), 0,
|
|
__cputchar_args, screen->outfd);
|
|
|
|
out:
|
|
for (count=0; count < NUM_ACS; count++) {
|
|
memcpy(&screen->wacs_char[count], &_wacs_char[count],
|
|
sizeof(cchar_t));
|
|
screen->acs_char[count]= _acs_char[count];
|
|
}
|
|
}
|
|
|
|
void
|
|
_cursesi_reset_wacs(SCREEN *screen)
|
|
{
|
|
int count;
|
|
|
|
for (count=0; count < NUM_ACS; count++)
|
|
memcpy( &_wacs_char[count], &screen->wacs_char[count],
|
|
sizeof( cchar_t ));
|
|
}
|
|
#endif /* HAVE_WCHAR */
|