1 /****************************************************************************
2 * Copyright 2019,2020 Thomas E. Dickey *
3 * Copyright 1998-2016,2017 Free Software Foundation, Inc. *
5 * Permission is hereby granted, free of charge, to any person obtaining a *
6 * copy of this software and associated documentation files (the *
7 * "Software"), to deal in the Software without restriction, including *
8 * without limitation the rights to use, copy, modify, merge, publish, *
9 * distribute, distribute with modifications, sublicense, and/or sell *
10 * copies of the Software, and to permit persons to whom the Software is *
11 * furnished to do so, subject to the following conditions: *
13 * The above copyright notice and this permission notice shall be included *
14 * in all copies or substantial portions of the Software. *
16 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS *
17 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF *
18 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. *
19 * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, *
20 * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR *
21 * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR *
22 * THE USE OR OTHER DEALINGS IN THE SOFTWARE. *
24 * Except as contained in this notice, the name(s) of the above copyright *
25 * holders shall not be used in advertising or otherwise to promote the *
26 * sale, use or other dealings in this Software without prior written *
28 ****************************************************************************/
30 * Grand digital clock for curses compatible terminals
31 * Usage: gdc [-s] [-t hh:mm:ss] [n] -- run for n seconds (default infinity)
34 * modified 10-18-89 for curses (jrl)
35 * 10-18-89 added signal handling
37 * $Id: gdc.c,v 1.54 2020/02/02 23:34:34 tom Exp $
40 #include <test.priv.h>
53 static short disp[11] =
55 075557, 011111, 071747, 071717, 055711,
56 074717, 074757, 071111, 075757, 075717, 002020
58 static long older[6], next[6], newer[6], mask;
60 static int sigtermed = 0;
61 static bool redirected = FALSE;
62 static bool hascolor = FALSE;
67 signal(signo, sighndl);
71 ExitProgram(EXIT_FAILURE);
81 fprintf(stderr, "gdc terminated by signal %d\n", sigtermed);
82 ExitProgram(EXIT_FAILURE);
87 drawbox(bool scrolling)
89 chtype bottom[XLENGTH + 1];
92 (void) attrset(AttrArg(COLOR_PAIR(PAIR_FRAMES), 0));
94 MvAddCh(YBASE - 1, XBASE - 1, ACS_ULCORNER);
95 hline(ACS_HLINE, XLENGTH);
96 MvAddCh(YBASE - 1, XBASE + XLENGTH, ACS_URCORNER);
98 MvAddCh(YBASE + YDEPTH, XBASE - 1, ACS_LLCORNER);
99 if ((mvinchnstr(YBASE + YDEPTH, XBASE, bottom, XLENGTH)) != ERR) {
101 for (n = 0; n < XLENGTH; n++) {
103 bottom[n] &= ~A_COLOR;
104 bottom[n] = ACS_HLINE | (bottom[n] & (A_ATTRIBUTES | A_COLOR));
106 (void) mvaddchnstr(YBASE + YDEPTH, XBASE, bottom, XLENGTH);
108 MvAddCh(YBASE + YDEPTH, XBASE + XLENGTH, ACS_LRCORNER);
110 move(YBASE, XBASE - 1);
111 vline(ACS_VLINE, YDEPTH);
113 move(YBASE, XBASE + XLENGTH);
114 vline(ACS_VLINE, YDEPTH);
117 (void) attrset(AttrArg(COLOR_PAIR(PAIR_OTHERS), 0));
125 attron(COLOR_PAIR(PAIR_DIGITS));
131 attron(COLOR_PAIR(PAIR_OTHERS));
144 for (i = 0; i < 5; i++) {
145 next[i] |= ((disp[t] >> ((4 - i) * 3)) & 07) << n;
146 mask |= (next[i] ^ older[i]) & m;
155 static const char *msg[] =
157 "Usage: gdc [options] [count]"
160 #if HAVE_USE_DEFAULT_COLORS
161 ," -d invoke use_default_colors"
163 ," -n redirect input to /dev/null"
164 ," -s scroll each number into place, rather than flipping"
165 ," -t hh:mm:ss specify starting time (default is ``now'')"
167 ,"If you specify a count, gdc runs for that number of seconds"
170 for (j = 0; j < SIZEOF(msg); j++)
171 fprintf(stderr, "%s\n", msg[j]);
172 ExitProgram(EXIT_FAILURE);
176 parse_time(const char *value)
184 if (sscanf(value, "%d:%d:%d%c", &hh, &mm, &ss, &c) != 3) {
185 if (sscanf(value, "%02d%02d%02d%c", &hh, &mm, &ss, &c) != 3) {
190 if ((hh < 0) || (hh >= 24) ||
191 (mm < 0) || (mm >= 60) ||
192 (ss < 0) || (ss >= 60)) {
196 /* adjust so that the localtime in the main loop will give usable time */
197 result = (hh * 3600) + ((mm * 60) + ss);
198 for (check = 0; check < 24; ++check) {
199 tm = localtime(&result);
200 if (tm->tm_hour == hh)
205 if (tm->tm_hour != hh) {
206 fprintf(stderr, "Cannot find local time for %s!\n", value);
213 main(int argc, char *argv[])
225 #if HAVE_USE_DEFAULT_COLORS
226 bool d_option = FALSE;
229 setlocale(LC_ALL, "");
231 while ((k = getopt(argc, argv, "dnst:")) != -1) {
233 #if HAVE_USE_DEFAULT_COLORS
239 ifp = fopen("/dev/null", "r");
246 starts = parse_time(optarg);
253 count = atoi(argv[optind++]);
261 char *name = getenv("TERM");
263 || newterm(name, ofp, ifp) == 0) {
264 fprintf(stderr, "cannot open terminal\n");
265 ExitProgram(EXIT_FAILURE);
278 hascolor = has_colors();
281 short bg = COLOR_BLACK;
283 #if HAVE_USE_DEFAULT_COLORS
284 if (d_option && (use_default_colors() == OK))
287 init_pair(PAIR_DIGITS, COLOR_BLACK, COLOR_RED);
288 init_pair(PAIR_OTHERS, COLOR_RED, bg);
289 init_pair(PAIR_FRAMES, COLOR_WHITE, bg);
290 (void) attrset(AttrArg(COLOR_PAIR(PAIR_OTHERS), 0));
294 for (j = 0; j < 5; j++)
295 older[j] = newer[j] = next[j] = 0;
308 tm = localtime(&now);
311 set(tm->tm_sec % 10, 0);
312 set(tm->tm_sec / 10, 4);
313 set(tm->tm_min % 10, 10);
314 set(tm->tm_min / 10, 14);
315 set(tm->tm_hour % 10, 20);
316 set(tm->tm_hour / 10, 24);
320 for (k = 0; k < 6; k++) {
322 for (i = 0; i < 5; i++)
323 newer[i] = (newer[i] & ~mask) | (newer[i + 1] & mask);
324 newer[5] = (newer[5] & ~mask) | (next[k] & mask);
326 newer[k] = (newer[k] & ~mask) | (next[k] & mask);
329 for (s = 1; s >= 0; s--) {
331 for (i = 0; i < 6; i++) {
332 if ((a = (newer[i] ^ older[i]) & (s ? newer : older)[i])
334 for (j = 0, t = 1 << 26; t; t >>= 1, j++) {
336 if (!(a & (t << 1))) {
337 move(YBASE + i, XBASE + 2 * j);
352 * If we're scrolling, space out the refreshes to fake
353 * movement. That's 7 frames, or 6 intervals, which would
354 * be 166 msec if we spread it out over a second. It looks
355 * better (but will work on a slow terminal, e.g., less
356 * than 9600bd) to squeeze that into a half-second, and use
357 * half of 170 msec to ensure that the program doesn't eat
358 * a lot of time when asking what time it is, at the top of
359 * this loop -T.Dickey
365 switch (wgetch(stdscr)) {
373 nodelay(stdscr, FALSE);
376 nodelay(stdscr, TRUE);
394 /* this depends on the detailed format of ctime(3) */
395 _nc_STRNCPY(buf, ctime(&now), (size_t) 30);
399 while ((*d2++ = *s2++) != '\0') ;
401 MvAddStr(16, 30, buf);
408 * If we're not smooth-scrolling, wait 1000 msec (1 sec). Use napms()
409 * rather than sleep() because the latter does odd things on some
410 * systems, e.g., suspending output as well.
418 * This is a safe way to check if we're interrupted - making the signal
419 * handler set a flag that we can check. Since we're running
420 * nodelay(), the wgetch() call returns immediately, and in particular
421 * will return an error if interrupted. This works only if we can
422 * read from the input, of course.
425 switch (wgetch(stdscr)) {
433 nodelay(stdscr, FALSE);
436 nodelay(stdscr, TRUE);
452 ExitProgram(EXIT_SUCCESS);