import elf-only -lcurses
. abandons mixer, gomoku, talk, talkd, top from base system . compile top with clang so no ack-compiled program needs -lcurses any more
This commit is contained in:
Ben Gras
@@ -0,0 +1,54 @@
|
||||
#$Id: Makefile,v 1.2 2007/05/28 15:01:58 blymn Exp $
|
||||
#$Log: Makefile,v $
|
||||
#Revision 1.2 2007/05/28 15:01:58 blymn
|
||||
#Merge in wide curses code done as a Summer of Code project by
|
||||
#Ruibiao Qiu.
|
||||
#
|
||||
#Revision 1.1.2.2 2007/01/31 10:08:47 blymn
|
||||
#Fix up build errors.
|
||||
#
|
||||
#Revision 1.1.2.1 2007/01/21 12:05:54 blymn
|
||||
#Merge wide curses.
|
||||
#
|
||||
#Revision 1.1 2007/01/21 11:38:59 blymn
|
||||
#Wide curses merge
|
||||
#
|
||||
#Revision 1.1 2005/08/31 14:52:08 ruibiao
|
||||
#
|
||||
#A patach for the current source
|
||||
#
|
||||
#Revision 1.2 2005/08/23 21:29:08 ruibiao
|
||||
#
|
||||
#Changed to the right libraries
|
||||
#
|
||||
#Revision 1.1 2005/08/23 16:38:22 ruibiao
|
||||
#
|
||||
#Initial version, to build all versions of file views and the unit tester
|
||||
#
|
||||
|
||||
RM = /bin/rm -f
|
||||
CFLAGS =
|
||||
|
||||
.if defined(DEBUG)
|
||||
CFLAGS+= -g
|
||||
.endif
|
||||
|
||||
all: wcview nwview ccview tcview ncview ex1
|
||||
|
||||
wcview: view.c
|
||||
gcc -DHAVE_WCHAR -o wcview view.c -I.. $(CFLAGS) -lcurses -Wl,-rpath,.. -L..
|
||||
|
||||
nwview: view.c
|
||||
gcc -DHAVE_WCHAR -o nwview view.c -DNCURSES -I/usr/pkg/include $(CFLAGS) -lcurses -Wl,-rpath,/usr/pkg/lib -L/usr/pkg/lib
|
||||
|
||||
ccview: view.c
|
||||
gcc -o ccview view.c -I.. $(CFLAGS) -lcurses -Wl,-rpath,.. -L..
|
||||
|
||||
tcview: view.c
|
||||
gcc -o tcview view.c -L/usr/lib -Wl,-rpath,/usr/lib $(CFLAGS) -lcurses
|
||||
|
||||
ncview: view.c
|
||||
gcc -o ncview view.c -I/usr/pkg/include -DNCURSES -L/usr/pkg/lib -Wl,-rpath,/usr/pkg/lib $(CFLAGS) -lncurses
|
||||
|
||||
ex1: ex1.c
|
||||
gcc -DHAVE_WCHAR -o ex1 ex1.c -I.. $(CFLAGS) -lcurses -Wl,-rpath,.. -L..
|
||||
@@ -0,0 +1,342 @@
|
||||
/* $NetBSD: ex1.c,v 1.5 2007/05/28 15:01:58 blymn Exp $ */
|
||||
|
||||
/*
|
||||
* Copyright (c) 1992, 1993
|
||||
* The Regents of the University of California. All rights reserved.
|
||||
*
|
||||
*
|
||||
* 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.
|
||||
* 3. Neither the name of the University nor the names of its contributors
|
||||
* may be used to endorse or promote products derived from this software
|
||||
* without specific prior written permission.
|
||||
*
|
||||
* THIS SOFTWARE IS PROVIDED BY THE REGENTS 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 REGENTS 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.
|
||||
*/
|
||||
|
||||
#ifndef lint
|
||||
static char copyright[] =
|
||||
"@(#) Copyright (c) 1992, 1993\n\
|
||||
The Regents of the University of California. All rights reserved.\n";
|
||||
#endif /* not lint */
|
||||
|
||||
#ifndef lint
|
||||
static char sccsid[] = "@(#)ex1.c 8.1 (Berkeley) 6/4/93";
|
||||
#endif /* not lint */
|
||||
#include <sys/types.h>
|
||||
#include <curses.h>
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
#include <string.h>
|
||||
#include <signal.h>
|
||||
#include <locale.h>
|
||||
#include <assert.h>
|
||||
|
||||
#define YSIZE 4
|
||||
#define XSIZE 30
|
||||
|
||||
void quit( int );
|
||||
|
||||
main()
|
||||
{
|
||||
int i, j, c, n = 0, ac = 0;
|
||||
size_t len;
|
||||
char id[100];
|
||||
FILE *fp;
|
||||
char *s;
|
||||
cchar_t cc, ncc, cstr[ 128 ], icc, icstr[ 128 ], bcc;
|
||||
int wc_on = 0, wgc_on = 0;
|
||||
char mbs[] = "大";
|
||||
char mbstr[] = "大学之道，在明明德，在亲民，在止于至善。 (Liji)";
|
||||
wchar_t wstr[ 128 ], owstr[ 4 ], gwstr[ 128 ], iwstr[ 128 ];
|
||||
int wslen = 0;
|
||||
wint_t wc;
|
||||
char nostr[ 128 ];
|
||||
attr_t al[ 15 ] = { WA_BLINK,
|
||||
WA_BOLD,
|
||||
WA_DIM,
|
||||
WA_LOW,
|
||||
WA_TOP,
|
||||
WA_INVIS,
|
||||
WA_HORIZONTAL,
|
||||
WA_VERTICAL,
|
||||
WA_LEFT,
|
||||
WA_RIGHT,
|
||||
WA_PROTECT,
|
||||
WA_REVERSE,
|
||||
WA_STANDOUT,
|
||||
WA_UNDERLINE };
|
||||
|
||||
fprintf( stderr, "Current locale: %s\n", setlocale(LC_ALL, ""));
|
||||
if (( wslen = mbstowcs( &cc.vals[ 0 ], mbs, strlen( mbs ))) < 0 ) {
|
||||
fprintf( stderr, "mbstowcs() failed\n" );
|
||||
return -1;
|
||||
}
|
||||
fprintf( stderr, "WC string length: %d\n", wslen );
|
||||
fprintf( stderr, "WC width: %d\n", wcwidth( cc.vals[ 0 ]));
|
||||
cc.elements = ncc.elements = 8;
|
||||
cc.attributes = ncc.attributes = 0;
|
||||
ncc.vals[ 0 ] = 0xda00;
|
||||
cc.vals[ 1 ] = ncc.vals[ 1 ] = 0xda01;
|
||||
cc.vals[ 2 ] = ncc.vals[ 2 ] = 0xda02;
|
||||
cc.vals[ 3 ] = ncc.vals[ 3 ] = 0xda03;
|
||||
cc.vals[ 4 ] = ncc.vals[ 4 ] = 0xda04;
|
||||
cc.vals[ 5 ] = ncc.vals[ 5 ] = 0xda05;
|
||||
cc.vals[ 6 ] = ncc.vals[ 6 ] = 0xda06;
|
||||
cc.vals[ 7 ] = ncc.vals[ 7 ] = 0xda07;
|
||||
|
||||
if (( wslen = mbstowcs( wstr, mbstr, strlen( mbstr ))) < 0 ) {
|
||||
fprintf( stderr, "mbstowcs() failed\n" );
|
||||
return -1;
|
||||
}
|
||||
|
||||
for ( i = 0; i < wslen; i++ ) {
|
||||
cstr[ i ].vals[ 0 ] = wstr[ i ];
|
||||
}
|
||||
cstr[ wslen ].vals[ 0 ] = 0;
|
||||
|
||||
bcc.elements = 8;
|
||||
bcc.attributes = 0;
|
||||
bcc.vals[ 0 ] = L'_';
|
||||
bcc.vals[ 1 ] = 0xda01;
|
||||
bcc.vals[ 2 ] = 0xda02;
|
||||
bcc.vals[ 3 ] = 0xda03;
|
||||
bcc.vals[ 4 ] = 0xda04;
|
||||
bcc.vals[ 5 ] = 0xda05;
|
||||
bcc.vals[ 6 ] = 0xda06;
|
||||
bcc.vals[ 7 ] = 0xda07;
|
||||
|
||||
initscr(); /* Always call initscr() first */
|
||||
signal(SIGINT, quit); /* Make sure wou have a 'cleanup' fn */
|
||||
crmode(); /* We want cbreak mode */
|
||||
noecho(); /* We want to have control of chars */
|
||||
delwin(stdscr); /* Create our own stdscr */
|
||||
stdscr = newwin(YSIZE, XSIZE, 1, 1);
|
||||
flushok(stdscr, TRUE); /* Enable flushing of stdout */
|
||||
scrollok(stdscr, TRUE); /* Enable scrolling */
|
||||
erase(); /* Initially, clear the screen */
|
||||
|
||||
standout();
|
||||
move(0,0);
|
||||
while (1) {
|
||||
if ( !wgc_on ) {
|
||||
c = getchar();
|
||||
switch(c) {
|
||||
case 'q': /* Quit on 'q' */
|
||||
quit( 0 );
|
||||
break;
|
||||
case 'p':
|
||||
keypad( stdscr, TRUE );
|
||||
break;
|
||||
case 'P':
|
||||
keypad( stdscr, FALSE );
|
||||
break;
|
||||
case 'g':
|
||||
wgc_on = 1;
|
||||
echo();
|
||||
break;
|
||||
case 'b':
|
||||
get_wstr( gwstr );
|
||||
move( 1, 0 );
|
||||
addstr( "Input:" );
|
||||
addwstr( gwstr );
|
||||
refresh();
|
||||
break;
|
||||
case 'h':
|
||||
move( 0, 0 );
|
||||
in_wch( &icc );
|
||||
move( 1, 0 );
|
||||
add_wch( &icc );
|
||||
refresh();
|
||||
break;
|
||||
case 'y':
|
||||
move( 0, 0 );
|
||||
in_wchstr( icstr );
|
||||
move( 1, 0 );
|
||||
add_wchstr( icstr );
|
||||
refresh();
|
||||
break;
|
||||
case 'u':
|
||||
move( 0, 0 );
|
||||
inwstr( iwstr );
|
||||
move( 1, 0 );
|
||||
addwstr( iwstr );
|
||||
refresh();
|
||||
break;
|
||||
case 'i':
|
||||
move( 0, 0 );
|
||||
hline_set( &cc, 20 );
|
||||
move( 0, 0 );
|
||||
vline_set( &cc, 20 );
|
||||
refresh();
|
||||
break;
|
||||
case 'o':
|
||||
clrtobot();
|
||||
refresh();
|
||||
break;
|
||||
case 's': /* Go into standout mode on 's' */
|
||||
standout();
|
||||
break;
|
||||
case 'e': /* Exit standout mode on 'e' */
|
||||
standend();
|
||||
break;
|
||||
case 'r': /* Force a refresh on 'r' */
|
||||
wrefresh(curscr);
|
||||
break;
|
||||
case 'w': /* Turn on/off add_wch() tests */
|
||||
wc_on = 1 - wc_on;
|
||||
break;
|
||||
case 'd':
|
||||
add_wchstr(( const cchar_t *)&cstr );
|
||||
refresh();
|
||||
break;
|
||||
case 'c':
|
||||
addwstr(( const wchar_t *)&wstr );
|
||||
refresh();
|
||||
break;
|
||||
case 'z':
|
||||
move( 0, 1 );
|
||||
if ( wc_on )
|
||||
add_wch( &cc );
|
||||
else
|
||||
addch( c );
|
||||
refresh();
|
||||
break;
|
||||
case 'x':
|
||||
move( 0, 3 );
|
||||
if ( wc_on )
|
||||
add_wch( &cc );
|
||||
else
|
||||
addch( c );
|
||||
refresh();
|
||||
break;
|
||||
case 'n':
|
||||
add_wch( &ncc );
|
||||
refresh();
|
||||
break;
|
||||
case 'm':
|
||||
//border( 0, 0, 0, 0, 0, 0, 0, 0 );
|
||||
border_set( NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL );
|
||||
refresh();
|
||||
break;
|
||||
case 'j':
|
||||
box_set( stdscr, &cc, &cc );
|
||||
refresh();
|
||||
break;
|
||||
case 'k':
|
||||
erase();
|
||||
refresh();
|
||||
break;
|
||||
case '1':
|
||||
move( 0, 0 );
|
||||
clrtoeol();
|
||||
refresh();
|
||||
break;
|
||||
case '2':
|
||||
move( 0, 0 );
|
||||
sprintf( nostr, "Orig:%x", al[ ac ]);
|
||||
addstr( nostr );
|
||||
ac = ( ac + 1 ) % 16;
|
||||
bcc.attributes = al[ ac ];
|
||||
bkgrnd( &bcc );
|
||||
move( 1, 0 );
|
||||
sprintf( nostr, "New:%x", al[ ac ]);
|
||||
//addstr( nostr );
|
||||
insstr( nostr );
|
||||
refresh();
|
||||
break;
|
||||
case 'v':
|
||||
if ( wc_on )
|
||||
ins_wch( &cc );
|
||||
else
|
||||
insch( c );
|
||||
refresh();
|
||||
break;
|
||||
case 'f':
|
||||
ins_wstr(( const wchar_t *)&wstr );
|
||||
refresh();
|
||||
break;
|
||||
case 't':
|
||||
for ( i = 0; i < 4; i++ ) {
|
||||
owstr[ i ] = wstr[ i + 5 ];
|
||||
wstr[ i + 5 ] = i + 0xda05;
|
||||
}
|
||||
ins_wstr(( const wchar_t *)&wstr );
|
||||
refresh();
|
||||
for ( i = 0; i < 4; i++ )
|
||||
wstr[ i + 5 ] = owstr[ i ];
|
||||
break;
|
||||
default: /* By default output the character */
|
||||
if ( wc_on )
|
||||
add_wch( &cc );
|
||||
else {
|
||||
if ( c < 0x7F )
|
||||
addch( c );
|
||||
else {
|
||||
addstr( keyname( c ));
|
||||
}
|
||||
}
|
||||
refresh();
|
||||
}
|
||||
} else {
|
||||
get_wch( &wc );
|
||||
switch ( wc ) {
|
||||
case L'w':
|
||||
wgc_on = 0;
|
||||
noecho();
|
||||
break;
|
||||
case L'q':
|
||||
quit( 0 );
|
||||
break;
|
||||
case L't':
|
||||
notimeout( stdscr, TRUE );
|
||||
break;
|
||||
case L'T':
|
||||
notimeout( stdscr, FALSE );
|
||||
break;
|
||||
case L'd':
|
||||
nodelay( stdscr, TRUE );
|
||||
break;
|
||||
case L'D':
|
||||
nodelay( stdscr, FALSE );
|
||||
break;
|
||||
case L'p':
|
||||
keypad( stdscr, TRUE );
|
||||
break;
|
||||
case L'P':
|
||||
keypad( stdscr, FALSE );
|
||||
break;
|
||||
default:
|
||||
break;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
void quit( int sig )
|
||||
{
|
||||
erase(); /* Terminate by erasing the screen */
|
||||
refresh();
|
||||
endwin(); /* Always end with endwin() */
|
||||
delwin(curscr); /* Return storage */
|
||||
delwin(stdscr);
|
||||
putchar('\n');
|
||||
exit( sig );
|
||||
}
|
||||
|
||||
@@ -0,0 +1,527 @@
|
||||
/*
|
||||
* view.c -- a silly little viewer program
|
||||
*
|
||||
* written by Eric S. Raymond <esr@snark.thyrsus.com> December 1994
|
||||
* to test the scrolling code in ncurses.
|
||||
*
|
||||
* modified by Thomas Dickey <dickey@clark.net> July 1995 to demonstrate
|
||||
* the use of 'resizeterm()', and May 2000 to illustrate wide-character
|
||||
* handling.
|
||||
*
|
||||
* Takes a filename argument. It's a simple file-viewer with various
|
||||
* scroll-up and scroll-down commands.
|
||||
*
|
||||
* n -- scroll one line forward
|
||||
* p -- scroll one line back
|
||||
*
|
||||
* Either command accepts a numeric prefix interpreted as a repeat count.
|
||||
* Thus, typing `5n' should scroll forward 5 lines in the file.
|
||||
*
|
||||
* The way you can tell this is working OK is that, in the trace file,
|
||||
* there should be one scroll operation plus a small number of line
|
||||
* updates, as opposed to a whole-page update. This means the physical
|
||||
* scroll operation worked, and the refresh() code only had to do a
|
||||
* partial repaint.
|
||||
*
|
||||
* $Id: view.c,v 1.2 2007/05/28 15:01:58 blymn Exp $
|
||||
*/
|
||||
|
||||
#include <stdlib.h>
|
||||
#include <string.h>
|
||||
#include <sys/types.h>
|
||||
#include <signal.h>
|
||||
#ifdef NCURSES
|
||||
#define _XOPEN_SOURCE_EXTENDED
|
||||
#include <ncurses.h>
|
||||
#include <term.h>
|
||||
#else
|
||||
#include <curses.h>
|
||||
#endif /* NCURSES */
|
||||
#include <locale.h>
|
||||
#include <assert.h>
|
||||
#include <ctype.h>
|
||||
#include <termios.h>
|
||||
#include <util.h>
|
||||
#include <unistd.h>
|
||||
#ifdef HAVE_WCHAR
|
||||
#include <wchar.h>
|
||||
#endif /* HAVE_WCHAR */
|
||||
#ifdef DEBUG
|
||||
#include <syslog.h>
|
||||
#endif /* DEBUG */
|
||||
|
||||
#define UChar(c) ((unsigned char)(c))
|
||||
#define SIZEOF(table) (sizeof(table)/sizeof(table[0]))
|
||||
#define typeMalloc(type,n) (type *) malloc((n) * sizeof(type))
|
||||
|
||||
#define my_pair 1
|
||||
|
||||
#undef CURSES_CH_T
|
||||
#ifdef HAVE_WCHAR
|
||||
#define CURSES_CH_T cchar_t
|
||||
#else
|
||||
#define CURSES_CH_T chtype
|
||||
#endif /* HAVE_WCHAR */
|
||||
|
||||
static void finish(int sig);
|
||||
static void show_all(const char *tag);
|
||||
|
||||
static int shift = 0;
|
||||
static bool try_color = FALSE;
|
||||
|
||||
static char *fname;
|
||||
static CURSES_CH_T **my_lines;
|
||||
static CURSES_CH_T **lptr;
|
||||
static unsigned num_lines;
|
||||
|
||||
static void usage(void)
|
||||
{
|
||||
static const char *msg[] = {
|
||||
"Usage: view [options] file"
|
||||
,""
|
||||
,"Options:"
|
||||
," -c use color if terminal supports it"
|
||||
," -i ignore INT, QUIT, TERM signals"
|
||||
," -n NUM specify maximum number of lines (default 1000)"
|
||||
#if defined(KEY_RESIZE)
|
||||
," -r use old-style sigwinch handler rather than KEY_RESIZE"
|
||||
#endif
|
||||
#ifdef TRACE
|
||||
," -t trace screen updates"
|
||||
," -T NUM specify trace mask"
|
||||
#endif
|
||||
};
|
||||
size_t n;
|
||||
for (n = 0; n < SIZEOF(msg); n++)
|
||||
fprintf(stderr, "%s\n", msg[n]);
|
||||
exit( 1 );
|
||||
}
|
||||
|
||||
static int ch_len(CURSES_CH_T * src)
|
||||
{
|
||||
int result = 0;
|
||||
|
||||
#ifdef HAVE_WCHAR
|
||||
while (getcchar(src++, NULL, NULL, NULL, NULL) > 0)
|
||||
result++;
|
||||
#else
|
||||
while (*src++)
|
||||
result++;
|
||||
#endif
|
||||
return result;
|
||||
}
|
||||
|
||||
/*
|
||||
* Allocate a string into an array of chtype's. If UTF-8 mode is
|
||||
* active, translate the string accordingly.
|
||||
*/
|
||||
static CURSES_CH_T * ch_dup(char *src)
|
||||
{
|
||||
unsigned len = strlen(src);
|
||||
CURSES_CH_T *dst = typeMalloc(CURSES_CH_T, len + 1);
|
||||
unsigned j, k;
|
||||
#ifdef HAVE_WCHAR
|
||||
wchar_t wstr[CCHARW_MAX + 1];
|
||||
wchar_t wch;
|
||||
int l = 0;
|
||||
mbstate_t state;
|
||||
size_t rc;
|
||||
int width;
|
||||
#endif
|
||||
|
||||
#ifdef HAVE_WCHAR
|
||||
mbrtowc( NULL, NULL, 1, &state );
|
||||
#endif
|
||||
for (j = k = 0; j < len; j++) {
|
||||
#ifdef HAVE_WCHAR
|
||||
rc = mbrtowc(&wch, src + j, len - j, &state);
|
||||
#ifdef DEBUG
|
||||
syslog( LOG_INFO, "[ch_dup]mbrtowc() returns %d", rc );
|
||||
#endif /* DEBUG */
|
||||
if (rc == (size_t) -1 || rc == (size_t) -2)
|
||||
break;
|
||||
j += rc - 1;
|
||||
if ((width = wcwidth(wch)) < 0)
|
||||
break;
|
||||
if ((width > 0 && l > 0) || l == CCHARW_MAX) {
|
||||
wstr[l] = L'\0';
|
||||
l = 0;
|
||||
if (setcchar(dst + k, wstr, 0, 0, NULL) != OK)
|
||||
break;
|
||||
++k;
|
||||
}
|
||||
if (width == 0 && l == 0)
|
||||
wstr[l++] = L' ';
|
||||
wstr[l++] = wch;
|
||||
#ifdef DEBUG
|
||||
syslog( LOG_INFO, "[ch_dup]wch=%x", wch );
|
||||
#endif /* DEBUG */
|
||||
#else
|
||||
dst[k++] = src[j];
|
||||
#endif
|
||||
}
|
||||
#ifdef HAVE_WCHAR
|
||||
if (l > 0) {
|
||||
wstr[l] = L'\0';
|
||||
if (setcchar(dst + k, wstr, 0, 0, NULL) == OK)
|
||||
++k;
|
||||
}
|
||||
setcchar(dst + k, L"", 0, 0, NULL);
|
||||
#else
|
||||
dst[k] = 0;
|
||||
#endif
|
||||
return dst;
|
||||
}
|
||||
|
||||
int main(int argc, char *argv[])
|
||||
{
|
||||
int MAXLINES = 1000;
|
||||
FILE *fp;
|
||||
char buf[BUFSIZ];
|
||||
int i;
|
||||
int my_delay = 0;
|
||||
CURSES_CH_T **olptr;
|
||||
int length = 0;
|
||||
int value = 0;
|
||||
bool done = FALSE;
|
||||
bool got_number = FALSE;
|
||||
const char *my_label = "Input";
|
||||
#ifdef HAVE_WCHAR
|
||||
cchar_t icc;
|
||||
#endif /* HAVE_WCHAR */
|
||||
|
||||
setlocale(LC_ALL, "");
|
||||
|
||||
(void) signal(SIGINT, finish); /* arrange interrupts to terminate */
|
||||
|
||||
while ((i = getopt(argc, argv, "cin:rtT:")) != EOF) {
|
||||
switch (i) {
|
||||
case 'c':
|
||||
try_color = TRUE;
|
||||
break;
|
||||
case 'i':
|
||||
signal(SIGINT, SIG_IGN);
|
||||
signal(SIGQUIT, SIG_IGN);
|
||||
signal(SIGTERM, SIG_IGN);
|
||||
break;
|
||||
case 'n':
|
||||
if ((MAXLINES = atoi(optarg)) < 1)
|
||||
usage();
|
||||
break;
|
||||
#ifdef TRACE
|
||||
case 'T':
|
||||
trace(atoi(optarg));
|
||||
break;
|
||||
case 't':
|
||||
trace(TRACE_CALLS);
|
||||
break;
|
||||
#endif
|
||||
default:
|
||||
usage();
|
||||
}
|
||||
}
|
||||
if (optind + 1 != argc)
|
||||
usage();
|
||||
|
||||
if ((my_lines = typeMalloc(CURSES_CH_T *, MAXLINES + 2)) == 0)
|
||||
usage();
|
||||
|
||||
fname = argv[optind];
|
||||
if ((fp = fopen(fname, "r")) == 0) {
|
||||
perror(fname);
|
||||
exit( 1 );
|
||||
}
|
||||
|
||||
/* slurp the file */
|
||||
num_lines = 0;
|
||||
for (lptr = &my_lines[0]; (lptr - my_lines) < MAXLINES; lptr++) {
|
||||
char temp[BUFSIZ], *s, *d;
|
||||
int col;
|
||||
|
||||
if (fgets(buf, sizeof(buf), fp) == 0)
|
||||
break;
|
||||
|
||||
/* convert tabs so that shift will work properly */
|
||||
for (s = buf, d = temp, col = 0; (*d = *s) != '\0'; s++) {
|
||||
if (*d == '\n') {
|
||||
*d = '\0';
|
||||
break;
|
||||
} else if (*d == '\t') {
|
||||
col = (col | 7) + 1;
|
||||
while ((d - temp) != col)
|
||||
*d++ = ' ';
|
||||
} else
|
||||
#ifdef HAVE_WCHAR
|
||||
col++, d++;
|
||||
#else
|
||||
if (isprint(UChar(*d))) {
|
||||
col++;
|
||||
d++;
|
||||
} else {
|
||||
sprintf(d, "\\%03o", UChar(*s));
|
||||
d += strlen(d);
|
||||
col = (d - temp);
|
||||
}
|
||||
#endif
|
||||
}
|
||||
*lptr = ch_dup(temp);
|
||||
num_lines++;
|
||||
}
|
||||
(void) fclose(fp);
|
||||
length = lptr - my_lines;
|
||||
|
||||
(void) initscr(); /* initialize the curses library */
|
||||
keypad(stdscr, TRUE); /* enable keyboard mapping */
|
||||
(void) nonl(); /* tell curses not to do NL->CR/NL on output */
|
||||
(void) cbreak(); /* take input chars one at a time, no wait for \n */
|
||||
(void) noecho(); /* don't echo input */
|
||||
nodelay(stdscr, TRUE);
|
||||
idlok(stdscr, TRUE); /* allow use of insert/delete line */
|
||||
|
||||
if (try_color) {
|
||||
if (has_colors()) {
|
||||
start_color();
|
||||
init_pair(my_pair, COLOR_WHITE, COLOR_BLUE);
|
||||
bkgd(COLOR_PAIR(my_pair));
|
||||
} else {
|
||||
try_color = FALSE;
|
||||
}
|
||||
}
|
||||
|
||||
lptr = my_lines;
|
||||
while (!done) {
|
||||
int n;
|
||||
#ifdef HAVE_WCHAR
|
||||
wint_t c = 0;
|
||||
int ret;
|
||||
#else
|
||||
int c = 0;
|
||||
#endif /* HAVE_WCHAR */
|
||||
|
||||
if (!got_number)
|
||||
show_all(my_label);
|
||||
|
||||
n = 0;
|
||||
for (;;) {
|
||||
c = 0;
|
||||
#ifdef HAVE_WCHAR
|
||||
ret = get_wch( &c );
|
||||
if ( ret == ERR ) {
|
||||
if (!my_delay)
|
||||
napms(50);
|
||||
continue;
|
||||
}
|
||||
#ifdef DEBUG
|
||||
else if ( ret == KEY_CODE_YES )
|
||||
syslog( LOG_INFO, "[main]Func key(%x)", c );
|
||||
else
|
||||
syslog( LOG_INFO, "[main]c=%x", c );
|
||||
#endif /* DEBUG */
|
||||
#else
|
||||
c = getch();
|
||||
#ifdef DEBUG
|
||||
syslog( LOG_INFO, "[main]c='%c'", c );
|
||||
#endif /* DEBUG */
|
||||
#endif /* HAVE_WCHAR */
|
||||
if ((c < 127) && isdigit(c)) {
|
||||
if (!got_number) {
|
||||
mvprintw(0, 0, "Count: ");
|
||||
clrtoeol();
|
||||
}
|
||||
addch(c);
|
||||
value = 10 * value + (c - '0');
|
||||
got_number = TRUE;
|
||||
} else
|
||||
break;
|
||||
}
|
||||
if (got_number && value) {
|
||||
n = value;
|
||||
} else {
|
||||
n = 1;
|
||||
}
|
||||
|
||||
#ifdef HAVE_WCHAR
|
||||
if (ret != ERR)
|
||||
my_label = key_name( c );
|
||||
else
|
||||
if (!my_delay)
|
||||
napms(50);
|
||||
#else
|
||||
if (c != ERR)
|
||||
my_label = keyname(c);
|
||||
#endif /* HAVE_WCHAR */
|
||||
switch (c) {
|
||||
case KEY_DOWN:
|
||||
#ifdef HAVE_WCHAR
|
||||
case L'n':
|
||||
#else
|
||||
case 'n':
|
||||
#endif /* HAVE_WCHAR */
|
||||
olptr = lptr;
|
||||
for (i = 0; i < n; i++)
|
||||
if ((lptr - my_lines) < (length - LINES + 1))
|
||||
lptr++;
|
||||
else
|
||||
break;
|
||||
wscrl(stdscr, lptr - olptr);
|
||||
break;
|
||||
|
||||
case KEY_UP:
|
||||
#ifdef HAVE_WCHAR
|
||||
case L'p':
|
||||
#else
|
||||
case 'p':
|
||||
#endif /* HAVE_WCHAR */
|
||||
olptr = lptr;
|
||||
for (i = 0; i < n; i++)
|
||||
if (lptr > my_lines)
|
||||
lptr--;
|
||||
else
|
||||
break;
|
||||
wscrl(stdscr, lptr - olptr);
|
||||
break;
|
||||
|
||||
#ifdef HAVE_WCHAR
|
||||
case L'h':
|
||||
#else
|
||||
case 'h':
|
||||
#endif /* HAVE_WCHAR */
|
||||
case KEY_HOME:
|
||||
lptr = my_lines;
|
||||
break;
|
||||
|
||||
#ifdef HAVE_WCHAR
|
||||
case L'e':
|
||||
#else
|
||||
case 'e':
|
||||
#endif /* HAVE_WCHAR */
|
||||
case KEY_END:
|
||||
if (length > LINES)
|
||||
lptr = my_lines + length - LINES + 1;
|
||||
else
|
||||
lptr = my_lines;
|
||||
break;
|
||||
|
||||
#ifdef HAVE_WCHAR
|
||||
case L'r':
|
||||
#else
|
||||
case 'r':
|
||||
#endif /* HAVE_WCHAR */
|
||||
case KEY_RIGHT:
|
||||
shift += n;
|
||||
break;
|
||||
|
||||
#ifdef HAVE_WCHAR
|
||||
case L'l':
|
||||
#else
|
||||
case 'l':
|
||||
#endif /* HAVE_WCHAR */
|
||||
case KEY_LEFT:
|
||||
shift -= n;
|
||||
if (shift < 0) {
|
||||
shift = 0;
|
||||
beep();
|
||||
}
|
||||
break;
|
||||
|
||||
#ifdef HAVE_WCHAR
|
||||
case L'q':
|
||||
#else
|
||||
case 'q':
|
||||
#endif /* HAVE_WCHAR */
|
||||
done = TRUE;
|
||||
break;
|
||||
|
||||
#ifdef KEY_RESIZE
|
||||
case KEY_RESIZE:
|
||||
//refresh();
|
||||
break;
|
||||
#endif
|
||||
#ifdef HAVE_WCHAR
|
||||
case L's':
|
||||
#else
|
||||
case 's':
|
||||
#endif /* HAVE_WCHAR */
|
||||
if (got_number) {
|
||||
halfdelay(my_delay = n);
|
||||
} else {
|
||||
nodelay(stdscr, FALSE);
|
||||
my_delay = -1;
|
||||
}
|
||||
break;
|
||||
#ifdef HAVE_WCHAR
|
||||
case L' ':
|
||||
#else
|
||||
case ' ':
|
||||
#endif /* HAVE_WCHAR */
|
||||
nodelay(stdscr, TRUE);
|
||||
my_delay = 0;
|
||||
break;
|
||||
#ifndef HAVE_WCHAR
|
||||
case ERR:
|
||||
if (!my_delay)
|
||||
napms(50);
|
||||
break;
|
||||
#endif /* HAVE_WCHAR */
|
||||
default:
|
||||
beep();
|
||||
break;
|
||||
}
|
||||
if (c >= KEY_MIN || (c > 0 && !isdigit(c))) {
|
||||
got_number = FALSE;
|
||||
value = 0;
|
||||
}
|
||||
}
|
||||
|
||||
finish(0); /* we're done */
|
||||
}
|
||||
|
||||
static void finish(int sig)
|
||||
{
|
||||
endwin();
|
||||
exit(sig != 0 ? 1 : 0 );
|
||||
}
|
||||
|
||||
static void show_all(const char *tag)
|
||||
{
|
||||
int i;
|
||||
char temp[BUFSIZ];
|
||||
CURSES_CH_T *s;
|
||||
time_t this_time;
|
||||
|
||||
sprintf(temp, "%s (%3dx%3d) col %d ", tag, LINES, COLS, shift);
|
||||
i = strlen(temp);
|
||||
sprintf(temp + i, "view %.*s", (int) (sizeof(temp) - 7 - i), fname);
|
||||
move(0, 0);
|
||||
printw("%.*s", COLS, temp);
|
||||
clrtoeol();
|
||||
this_time = time((time_t *) 0);
|
||||
strcpy(temp, ctime(&this_time));
|
||||
if ((i = strlen(temp)) != 0) {
|
||||
temp[--i] = 0;
|
||||
if (move(0, COLS - i - 2) != ERR)
|
||||
printw(" %s", temp);
|
||||
}
|
||||
|
||||
scrollok(stdscr, FALSE); /* prevent screen from moving */
|
||||
for (i = 1; i < LINES; i++) {
|
||||
move(i, 0);
|
||||
printw("%3ld:", (long) (lptr + i - my_lines));
|
||||
clrtoeol();
|
||||
if ((s = lptr[i - 1]) != 0) {
|
||||
if (i < num_lines) {
|
||||
int len = ch_len(s);
|
||||
if (len > shift) {
|
||||
#ifdef HAVE_WCHAR
|
||||
add_wchstr(s + shift);
|
||||
#else
|
||||
addchstr(s + shift);
|
||||
#endif
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
setscrreg(1, LINES - 1);
|
||||
scrollok(stdscr, TRUE);
|
||||
refresh();
|
||||
}
|
||||
Reference in New Issue
Block a user