lcdproc/server/parse.c

/*
 * parse.c
 * This file is part of LCDd, the lcdproc server.
 *
 * This file is released under the GNU General Public License. Refer to the
 * COPYING file distributed with this package.
 *
 * Copyright (c) 1999, William Ferrell, Scott Scriven
 *
 *
 * Handles input commands from clients, by splitting strings into tokens
 * and passing arguments to the appropriate handler.
 *
 * It works much like a command line.  Only the first token is used to
 * determine what function to call.
 *
 */

#include <stdlib.h>
#include <stdio.h>
#include <string.h>

#include "shared/LL.h"
#include "shared/sockets.h"
#include "shared/report.h"
#include "clients.h"
#include "commands/command_list.h"
#include "parse.h"

/* This is a big function... TOO big.  How to trim....
 * TODO: Simplify... simplify...
 */

#define MAX_ARGUMENTS 256

int
parse_all_client_messages ()
{
	int i; /* int j, len;*/
	/*int newtoken, inquote;*/
	Client * c;
	char *str, *p, *q, *s;
/*   char *tok;*/
	int argc;
	char *argv[MAX_ARGUMENTS];
	/*char delimiters[] = " ";*/
	char leftquote[] = "\"'`([{";
	char rightquote[] = "\"'`)]}";
	char errmsg[256];
	int invalid = 0;
	int quoteindex;

	debug( RPT_DEBUG, "parse_all_client_messages()" );

	for (i = 0; i < MAX_ARGUMENTS; i++) {
		argv[i] = NULL;
	}

#define	SEPARATOR_CHAR	' '
#define	LINE_TERM_CHAR	'\0'
#define COMMENT_CHAR '#'

	for( c=clients_getfirst(); c; c=clients_getnext()) {

		/* And parse all its messages...*/
		/*debug(RPT_DEBUG, "parse: Getting messages...");*/
		for (str = client_get_message (c); str; str = client_get_message (c)) {

			debug (RPT_DEBUG, "parse: ...%s", str);
			/* Now, split up the string...*/
			argc = 0;
			i = 0;
			q = p = str;

			if (*p == COMMENT_CHAR) {
				continue; /* found a comment line - skip it...*/
			}

			debug (RPT_DEBUG, "starting string scan...");

			do {
				/* bypass initial white space...*/
				while ((*p == SEPARATOR_CHAR) && (*p)) {
					p++;
					q++;
				}

				/* If (*p) is null here, we reached the end of
				 * an empty parameter... so one of two things
				 * is true:
				 *
				 * 1. There is nothing but white space on this line (odd..)
				 * 2. This is trailing white space (odd... but allowable)
				 */

				if (*p == LINE_TERM_CHAR) {
					break;
					/* if there are no arguments, argc == 0 and will fail
					 * appropriately...
					 *
					 * if this is trailing white space, ignore the argc++ at the
					 * end and claim this as the end...
					 */
				}

				/* Handle quoted strings...*/
				if ((s = strchr(leftquote, *p)) != NULL) {
					quoteindex = s - leftquote;
					/*debug(RPT_DEBUG, "found <%c> at index [%d] = <%c>", *p, quoteindex, leftquote[quoteindex]);*/
					q = ++p; /* past open quote...*/
					while ((rightquote[quoteindex] != *p) && (*p != LINE_TERM_CHAR)) {
						p++;
					}
					if (*p == LINE_TERM_CHAR) {
						/* We just sucked up the rest of the command line: ERROR!!*/
						snprintf (errmsg, sizeof(errmsg), "huh? unterminated string! missing ending %c\n",
							rightquote[quoteindex]);
						sock_send_string (c->sock, errmsg);
						continue;
					} else {
						*p = LINE_TERM_CHAR;	/* terminate string*/
						p++;		/* bypass to next character*/
						/* Note that next character could be a EndOfLine (null)
						 * if the string was last on the line, or it could be
						 * something else... is it a blank?
						 */
						if (*p != SEPARATOR_CHAR && *p != LINE_TERM_CHAR) {
							sock_send_string (c->sock, "huh? improperly terminated string! (missing whitespace)\n");
							continue;
						}
					}

				/* Otherwise, normal string...*/
				} else {
					while (*p != SEPARATOR_CHAR && *p != LINE_TERM_CHAR)
						p++;
				}

				/* Not end of line?*/
				if (*p) {
					*p = LINE_TERM_CHAR;
					/*debug(RPT_DEBUG, "found new token: %s", q);*/
					argv[i++] = q;
					q = ++p;
				} else {
					/*debug(RPT_DEBUG, "found new token: %s", q);*/
					argv[i++] = q;
				}
				/* At the end of this statement,
				 * *p will be '\0' if end of input reached;
				 * otherwise, it is the first character of the
				 * next part of the string.
				 */


				argc++;
			} while (*p);

			/*debug(RPT_DEBUG, "exiting string scan...");*/

			argv[argc] = NULL;
			if (argc < 1)
				continue;

			/* Now find and call the appropriate function...*/
			invalid = 1;
			for (i = 0; commands[i].keyword; i++) {
				if (0 == strcmp (argv[0], commands[i].keyword)) {
					invalid = commands[i].function (c, argc, argv);
					break; /* found our function - don't continue on...*/
				}
			}

			if (invalid) {
				snprintf (errmsg, sizeof(errmsg), "huh? Invalid command \"%.40s\"\n", argv[0]);
				sock_send_string (c->sock, errmsg);
			}

			free (str);			  /* fixed memory leak?*/
		}							  /* end for(str...)*/
	}

	return 0;
}