Ich hab mal ein bisschen die Arbeit vom Cuebernommen :D

[people/pmueller/ipfire-2.x.git] / src / install+setup / libsmooth / varval.c

/* SmoothWall libsmooth.\r
 *\r
 * This program is distributed under the terms of the GNU General Public\r
 * Licence.  See the file COPYING for details.\r
 *\r
 * (c) Lawrence Manning, 2001\r
 * Contains functions for manipulation files full of VAR=VAL pairs.\r
 * \r
 * 2003-07-27 Robert Kerr - Added cooperative file locking to prevent any\r
 * clashes between setuid programs reading configuration and cgi scripts\r
 * trying to write it\r
 *\r
 * $Id: varval.c,v 1.4 2003/12/11 11:25:53 riddles Exp $\r
 * \r
 */\r
 \r
#include "libsmooth.h"\r
\r
/* Sets up the list.  First entry is a dummy one to avoid having to special\r
 * case empty lists. */\r
struct keyvalue *initkeyvalues(void)\r
{\r
 	struct keyvalue *head = malloc(sizeof(struct keyvalue));\r
	\r
	strcpy(head->key, "KEY");\r
	strcpy(head->value, "VALUE");\r
	head->next = NULL;\r
	\r
	return head;\r
}\r
\r
/* Splats all the entries in a list. */\r
void freekeyvalues(struct keyvalue *head)\r
{\r
	struct keyvalue *cur = head->next;\r
	struct keyvalue *next;\r
	\r
	while (cur)\r
	{\r
		next = cur->next;\r
		free(cur);\r
		cur = next;\r
	}\r
}\r
\r
/* Reads from a file into a new list.  Uses appendkeyvalue to add entries.\r
 * Will bomb out on a error (eg bad format line). */\r
int readkeyvalues(struct keyvalue *head, char *filename)\r
{\r
 	FILE *file;\r
	char buffer[STRING_SIZE];\r
	char *temp;\r
	char *key, *value;\r
	\r
	if (!(file = fopen(filename, "r")))\r
		return 0;\r
		\r
	if (flock(fileno(file), LOCK_SH))\r
	{\r
		fclose(file);\r
		return 0;\r
	}\r
	\r
	while (fgets(buffer, STRING_SIZE, file))\r
	{\r
		temp = buffer;\r
		while (*temp)\r
		{\r
			if (*temp =='\n') *temp = '\0';\r
			temp++;\r
		}\r
		if (!strlen(buffer))\r
			continue;\r
		if (!(temp = strchr(buffer, '=')))\r
		{\r
			flock(fileno(file), LOCK_UN);\r
			fclose(file);\r
			return 0;\r
		}\r
		*temp = '\0';\r
		key = buffer; value = temp + 1;\r
		/* See if string is quoted.  If so, skip first quote, and\r
		 * nuke the one at the end. */\r
		if (value[0] == '\'')\r
		{\r
			value++;\r
			if ((temp = strrchr(value, '\'')))\r
				*temp = '\0';\r
			else\r
			{\r
				flock(fileno(file), LOCK_UN);\r
				fclose(file);\r
				return 0;\r
			}\r
		}\r
		if (strlen(key))\r
			appendkeyvalue(head, key, value);\r
	}\r
	\r
	flock(fileno(file), LOCK_UN);\r
	fclose(file);\r
\r
	return 1;\r
}\r
\r
/* Writes out a list to a file.  Easy. */\r
int writekeyvalues(struct keyvalue *head, char *filename)\r
{\r
	FILE *file;\r
	struct keyvalue *cur = head->next;\r
	\r
	if (!(file = fopen(filename, "w")))\r
		return 0;\r
		\r
	if (flock(fileno(file), LOCK_EX))\r
	{\r
		fclose(file);\r
		return 0;\r
	}\r
	\r
		\r
	while (cur)\r
	{\r
		/* No space in value?  If there is, we need to quote the value\r
		 * so the shell can read it. */\r
		if (!strchr(cur->value, ' '))\r
			fprintf(file, "%s=%s\n", cur->key, cur->value);\r
		else\r
			fprintf(file, "%s=\'%s\'\n", cur->key, cur->value);\r
		cur = cur->next;\r
	}\r
	flock(fileno(file), LOCK_UN);\r
	fclose(file);\r
	\r
	return 1;\r
}\r
\r
/* Finds a key and copies the value back.  value must be at least STRING_SIZE\r
 * long. Would be nice to have a func that just returns a pointer to the value?\r
 */\r
int findkey(struct keyvalue *head, char *key, char *value)\r
{\r
	struct keyvalue *cur = head->next;\r
\r
	while (cur)\r
	{\r
		if (strcmp(key, cur->key) == 0)\r
		{\r
			strncpy(value, cur->value, STRING_SIZE);\r
			value[STRING_SIZE-1] = '\0';\r
			return 1;\r
		}\r
		cur = cur->next;\r
	}\r
\r
	return 0;\r
}\r
\r
/* Appends a entry.  Not very efficent because it rescans the list looking\r
 * for the end.  Maybe fix this later. */\r
void appendkeyvalue(struct keyvalue *head, char *key, char *value)\r
{\r
	struct keyvalue *new = malloc(sizeof(struct keyvalue));\r
	struct keyvalue *cur = head->next;\r
	struct keyvalue *tail = head;\r
\r
	strncpy(new->key, key, STRING_SIZE);\r
	strncpy(new->value, value, STRING_SIZE);\r
	new->key[STRING_SIZE-1] = '\0';\r
	new->value[STRING_SIZE-1] = '\0';\r
	new->next = NULL;\r
\r
	while (cur)\r
	{\r
		tail = cur;\r
		cur = cur->next;\r
	}\r
	tail->next = new;\r
}\r
\r
/* Otherwrites a key with a new value, or if it dosn't exist, appends it\r
 * on the end. */\r
void replacekeyvalue(struct keyvalue *head, char *key, char *value)\r
{\r
	struct keyvalue *cur = head->next;\r
\r
	while (cur)\r
	{\r
		if (strcmp(cur->key, key) == 0)\r
		{\r
			strncpy(cur->value, value, STRING_SIZE);\r
			cur->value[STRING_SIZE-1] = '\0';\r
			return;\r
		}\r
		cur = cur->next;\r
	}\r
\r
	appendkeyvalue(head, key, value);\r
}\r