/****************************************************************************
- * Copyright (c) 2000 Free Software Foundation, Inc. *
+ * Copyright 2019-2020,2022 Thomas E. Dickey *
+ * Copyright 2000-2013,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 *
****************************************************************************/
/*
- * Author: Thomas E. Dickey <dickey@clark.net> 2000
+ * Author: Thomas E. Dickey - 2000
*
- * $Id: railroad.c,v 1.1 2000/01/15 02:41:27 tom Exp $
+ * $Id: railroad.c,v 1.26 2022/12/11 00:12:13 tom Exp $
*
* A simple demo of the termcap interface.
*/
+#define USE_TINFO
#include <test.priv.h>
-#include <termcap.h>
-#include <ctype.h>
-#include <signal.h>
+#if HAVE_TGETENT
+
+static char *wipeit;
+static char *moveit;
+static int length;
+static int height;
static char *finisC;
static char *finisS;
static bool interrupted = FALSE;
-static int
-outc(int c)
+static
+TPUTS_PROTO(outc, c)
{
+ int rc = OK;
+
if (interrupted) {
- char tmp = c;
- write(STDOUT_FILENO, &tmp, 1);
+ char tmp = (char) c;
+ if (write(STDOUT_FILENO, &tmp, (size_t) 1) == -1)
+ rc = ERR;
} else {
- putc(c, stdout);
+ if (putc(c, stdout) == EOF)
+ rc = ERR;
}
- return 0;
+ TPUTS_RETURN(rc);
}
static void
{
putchar(ch);
fflush(stdout);
- napms(50); /* not really termcap... */
+ napms(moveit ? 10 : 50); /* not really termcap... */
}
static void
}
static void
-ShowCursor(int flag)
+MyShowCursor(int flag)
{
if (startC != 0 && finisC != 0) {
tputs(flag ? startC : finisC, 1, outc);
static void
ShowSign(char *string)
{
- int ch, first, last;
+ char *base = string;
+ int first, last;
+
+ if (moveit != 0) {
+ tputs(tgoto(moveit, 0, height - 1), 1, outc);
+ tputs(wipeit, 1, outc);
+ }
while (*string != 0) {
- ch = *string;
- last = ch;
- if (isalpha(ch)) {
- first = isupper(ch) ? 'A' : 'a';
- } else if (isdigit(ch)) {
- first = '0';
- } else {
- first = ch;
- }
- if (first < last) {
- Underline(1);
- while (first < last) {
- PutChar(first);
- Backup();
- first++;
+ int ch = *string;
+ if (ch != ' ') {
+ if (moveit != 0) {
+ for (first = length - 2; first >= (string - base); first--) {
+ if (first < length - 1) {
+ tputs(tgoto(moveit, first + 1, height - 1), 1, outc);
+ PutChar(' ');
+ }
+ tputs(tgoto(moveit, first, height - 1), 1, outc);
+ PutChar(ch);
+ }
+ } else {
+ last = ch;
+ if (isalpha(ch)) {
+ first = isupper(ch) ? 'A' : 'a';
+ } else if (isdigit(ch)) {
+ first = '0';
+ } else {
+ first = ch;
+ }
+ if (first < last) {
+ Underline(1);
+ while (first < last) {
+ PutChar(first);
+ Backup();
+ first++;
+ }
+ Underline(0);
+ }
}
- Underline(0);
+ if (moveit != 0)
+ Backup();
}
StandOut(1);
PutChar(ch);
fflush(stdout);
string++;
}
+ if (moveit != 0)
+ tputs(wipeit, 1, outc);
putchar('\n');
}
{
Underline(0);
StandOut(0);
- ShowCursor(1);
+ MyShowCursor(1);
}
static void
{
interrupted = TRUE;
cleanup();
- exit(EXIT_FAILURE);
+ ExitProgram(EXIT_FAILURE);
}
static void
railroad(char **args)
{
- char *name = getenv("TERM");
+ NCURSES_CONST char *name = getenv("TERM");
char buffer[1024];
char area[1024], *ap = area;
- int j;
+ int z;
if (name == 0)
+#ifdef EXP_WIN32_DRIVER
+ name = "ms-terminal";
+#else
name = "dumb";
- if (tgetent(buffer, name)) {
+#endif
+
+ InitAndCatch(z = tgetent(buffer, name), onsig);
+ if (z >= 0) {
+
+ wipeit = tgetstr("ce", &ap);
+ height = tgetnum("li");
+ length = tgetnum("co");
+ moveit = tgetstr("cm", &ap);
+
+ if (wipeit == 0
+ || moveit == 0
+ || height <= 0
+ || length <= 0) {
+ wipeit = 0;
+ moveit = 0;
+ height = 0;
+ length = 0;
+ }
+
startS = tgetstr("so", &ap);
finisS = tgetstr("se", &ap);
startC = tgetstr("ve", &ap);
finisC = tgetstr("vi", &ap);
- ShowCursor(0);
-
- for (j = SIGHUP; j <= SIGTERM; j++)
- if (signal(j, SIG_IGN) != SIG_IGN)
- signal(j, onsig);
+ MyShowCursor(0);
while (*args) {
ShowSign(*args++);
}
- ShowCursor(1);
+ MyShowCursor(1);
}
}
+static void
+usage(int ok)
+{
+ static const char *msg[] =
+ {
+ "Usage: railroad [options]"
+ ,""
+ ,USAGE_COMMON
+ };
+ size_t n;
+
+ for (n = 0; n < SIZEOF(msg); n++)
+ fprintf(stderr, "%s\n", msg[n]);
+
+ ExitProgram(ok ? EXIT_SUCCESS : EXIT_FAILURE);
+}
+/* *INDENT-OFF* */
+VERSION_COMMON()
+/* *INDENT-ON* */
+
int
-main(
- int argc,
- char *argv[])
+main(int argc, char *argv[])
{
- if (argc > 1) {
- railroad(argv + 1);
+ int ch;
+
+ while ((ch = getopt(argc, argv, OPTS_COMMON)) != -1) {
+ switch (ch) {
+ case OPTS_VERSION:
+ show_version(argv);
+ ExitProgram(EXIT_SUCCESS);
+ default:
+ usage(ch == OPTS_USAGE);
+ /* NOTREACHED */
+ }
+ }
+
+ if (optind < argc) {
+ railroad(argv + optind);
} else {
+ static char world[] = "Hello World";
static char *hello[] =
- {"Hello World", 0};
+ {world, 0};
railroad(hello);
}
- return EXIT_SUCCESS;
+ ExitProgram(EXIT_SUCCESS);
+}
+
+#else
+int
+main(void)
+{
+ printf("This program requires termcap\n");
+ exit(EXIT_FAILURE);
}
+#endif