#include "p11-tests.h"
#include "p11-tests-lib.h"

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

static char* config_data = NULL;

static char*
trim(char* data)
{
	char *t;
	while(*data && isspace(*data))
		++data;

	t = data + strlen(data);
	while(t > data && isspace(*(t - 1)))
	{
		t--;
		*t = 0;
	}

	return data;
}

int
p11t_config_parse (const char* filename)
{
	char* name = NULL;
	char* value = NULL;
	char* next;
	FILE* f = NULL;
	long len;
	char* p;
	char* t;

	f = fopen(filename, "r");
	if (f == NULL) {
		p11t_msg_print ("couldn't open config file: %s", filename);
		return -1;
	}

	/* Figure out size */
	if (fseek (f, 0, SEEK_END) == -1 || (len = ftell (f)) == -1 || fseek (f, 0, SEEK_SET) == -1) {
		p11t_msg_print ("couldn't seek config file: %s", filename);
		return -1;
	}

	assert(!config_data);
	config_data = malloc(len + 2);
	if (!config_data) {
		p11t_msg_print ("out of memory");
		return -1;
	}

	/* And read in one block */
	if (fread(config_data, 1, len, f) != len) {
		p11t_msg_print ("couldn't read config file: %s", filename);
		return -1;
	}

	fclose(f);

	/* Null terminate the data */
	config_data[len] = '\n';
	config_data[len + 1] = 0;

	next = config_data;

	/* Go through lines and process them */
	while((t = strchr(next, '\n')) != NULL)
	{
		*t = 0;
		p = next; /* Do this before cleaning below */
		next = t + 1;

		t = trim(p);

		name = NULL;
		value = NULL;

		/* Empty lines / comments at start / comments without continuation */
		if(!*t || *p == '#')
			continue;

		/* Look for the break between name = value on the same line */
		t = p + strcspn(p, ":=");
		if(!*t)
		{
			fprintf (stderr, "p11-test: invalid config line: %s", p);
			exit(1);
		}

		/* Null terminate and split value part */
		*t = 0;
		t++;

		name = trim(p);
		value = trim(t);

		if(name && value)
		{
			p11t_module_config(name, value);
			p11t_session_config(name, value);
		}
	}

	return 0;
}

void
p11t_config_cleanup(void)
{
	free(config_data);
	config_data = NULL;
}