- removed minilogd and its calls (more pain than gain)

[projects/rc-scripts.git] / src / getkey.c

/*\r
 * Copyright (c) 1999-2003 Red Hat, Inc. All rights reserved.\r
 *\r
 * This software may be freely redistributed under the terms of the GNU\r
 * public license.\r
 *\r
 * You should have received a copy of the GNU General Public License\r
 * along with this program; if not, write to the Free Software\r
 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.\r
 *\r
 * getkey\r
 *\r
 * A very simple keygrabber.\r
 *\r
 */\r
#include <ctype.h>\r
#include <errno.h>\r
#include <signal.h>\r
#include <stdlib.h>\r
#include <stdio.h>\r
#include <string.h>\r
#include <termios.h>\r
#include <unistd.h>\r
#include <sys/poll.h>\r
#include "popt.h"\r
\r
struct termios tp;\r
\r
void reset_term(int x) {\r
	tcsetattr(0,TCSANOW,&tp);\r
	exit(x);\r
}\r
\r
int main(int argc, char **argv) {\r
	char foo[2];\r
	char list[100]; /* should be enough */\r
	char *waitmessage = NULL;\r
	char *waitprint, *waitsprint;\r
	const char *fooptr;\r
	int waitseconds=0;\r
	int alarmlen=0;\r
	int ignore_control=0;\r
	int tp_if,tp_of,tp_lf;\r
	int x, r;\r
	struct pollfd ufds; /* only one, no need for an array... */\r
        poptContext context;\r
	struct poptOption options[] = {\r
            { "wait", 'c', POPT_ARG_INT, &waitseconds, 0, "Number of seconds to wait for keypress", NULL },\r
	    /*            { "message", 'm', POPT_ARG_STRING, &waitmessage, 0, "Message to print out while waiting for string", "NOTE: argument must have a \"%d\" in it so the number of seconds\nleft until getkey times out can be printed" },*/\r
            { "message", 'm', POPT_ARG_STRING, &waitmessage, 0, "Message to print out while waiting for string\nNOTE: message must have a \"%d\" in it, to hold the number of seconds left to wait", NULL },\r
            { "ignore-control-chars", 'i', POPT_ARG_NONE, &ignore_control, 0, "Ignore Control-C and Control-D", NULL },\r
            POPT_AUTOHELP\r
            POPT_TABLEEND\r
        };\r
\r
	strcpy(list, "");\r
        context = poptGetContext("getkey", argc, argv, options, \r
                                POPT_CONTEXT_POSIXMEHARDER);\r
        poptSetOtherOptionHelp(context, "[keys]");\r
\r
        r = poptGetNextOpt(context);\r
        if (r < -1) {\r
            fprintf(stderr, "%s: %s\n", \r
                   poptBadOption(context, POPT_BADOPTION_NOALIAS),\r
                   poptStrerror(r));\r
\r
            return -1;\r
        }\r
        fooptr = poptGetArg(context);\r
	if (fooptr != NULL) {\r
	    strncpy(list, fooptr, sizeof(list) - 1);\r
	    list[99] = '\0';\r
	    for (x=0;list[x];x++) list[x]=toupper(list[x]);\r
	}\r
	if (waitseconds) {\r
	    alarmlen = waitseconds;\r
	}\r
	foo[0]=foo[1]='\0';\r
\r
	signal(SIGTERM,reset_term);\r
	alarm(alarmlen);\r
	signal(SIGALRM,reset_term);\r
\r
	tcgetattr(0,&tp);\r
	tp_if=tp.c_iflag;\r
	tp_of=tp.c_oflag;\r
	tp_lf=tp.c_lflag;\r
	tp.c_iflag=0;\r
	tp.c_oflag &= ~OPOST;\r
	tp.c_lflag &= ~(ISIG | ICANON);\r
	tcsetattr(0,TCSANOW,&tp);\r
	tp.c_iflag=tp_if;\r
	tp.c_oflag=tp_of;\r
	tp.c_lflag=tp_lf;\r
\r
	ufds.events = POLLIN;\r
	ufds.fd = 0;\r
\r
	if (waitseconds && waitmessage) {\r
	    waitprint = alloca (strlen(waitmessage)+15); /* long enough */\r
	    waitprint[0] = '\r';\r
	    waitsprint = waitprint + 1;\r
	}\r
\r
	while (1) {\r
	    if (waitseconds && waitmessage) {\r
		sprintf (waitsprint, waitmessage, waitseconds);\r
		write (1, waitprint, strlen(waitprint));\r
	    }\r
	    r = poll(&ufds, 1, alarmlen ? 1000 : -1);\r
	    if (r == 0) {\r
		/* we have waited a whole second with no keystroke... */\r
		waitseconds--;\r
	    }\r
	    if (r > 0) {\r
		read(0,foo,1);\r
		foo[0]=toupper(foo[0]);\r
		/* Die if we get a control-c or control-d */\r
                if (ignore_control == 0) {\r
		    if (foo[0]==3 || foo[0]==4) reset_term(1);\r
                }\r
		/* Don't let a null character be interpreted as a match\r
		   by strstr */\r
		if (foo[0] != 0) {\r
		    if (strcmp(list, "") == 0 || strstr(list,foo)) {\r
		      reset_term(0);\r
		    }\r
		}\r
	    }\r
	}\r
}\r