#include <ctype.h>
#include <errno.h>
#include <fcntl.h>
#include <stdbool.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <syslog.h>
#include <sys/stat.h>
#include <sys/types.h>
#include <sys/wait.h>
#include <unistd.h>

#include <cdebconf/debconfclient.h>
#include <debian-installer.h>

#include <libsysfs.h>

#define SYSCONFIG_DIR "/etc/sysconfig/hardware/"
#define TEMPLATE_PREFIX	"s390-netdevice/"

static struct debconfclient *client;

enum channel_type
{
	CHANNEL_TYPE_CU3088_ALL,
	CHANNEL_TYPE_CU3088_CTC,
	CHANNEL_TYPE_QETH,
};

struct channel
{
	int key;
	char name[SYSFS_NAME_LEN];
	enum channel_type type;
	unsigned int cu_type;
	unsigned int cu_model;
};

enum device_type
{
	DEVICE_TYPE_CTC,
	DEVICE_TYPE_QETH,
	DEVICE_TYPE_IUCV,
};

struct device
{
	int key;
	enum device_type type;
	union
	{
		struct
		{
			struct channel *channels[2];
			int protocol;
		} ctc;
		struct
		{
			struct channel *channels[3];
			bool layer2;
			int port;
		} qeth;
		struct
		{
			char peername[32];
		} iucv;
	};
};

struct device *device_current;

static di_tree *channels;
static di_tree *devices;

struct driver
{
	const char *name;
	int type;
};

static const struct driver drivers[] =
{
	{ "ctcm", CHANNEL_TYPE_CU3088_ALL },
	{ "qeth", CHANNEL_TYPE_QETH },
};

struct buffer_desc
{
	char  *buf;
	size_t size;
};

enum
{
	TYPE_NONE = 0,
	TYPE_CTC,
	TYPE_IUCV,
	TYPE_QETH,
	TYPE_VIRTIO,
}
type = TYPE_NONE;

enum state
{
	BACKUP,
	SETUP,
	DETECT_CHANNELS,
	DETECT_DEVICES,
	GET_NETWORKTYPE,
	GET_CTC_DEVICE,
	GET_CTC_CHANNELS,
	GET_CTC_PROTOCOL,
	GET_QETH_DEVICE,
	GET_QETH_LAYER2,
	GET_QETH_PORT,
	GET_IUCV_DEVICE,
	GET_IUCV_PEER,
	CONFIRM_CTC,
	CONFIRM_QETH,
	CONFIRM_IUCV,
	WRITE_CTC,
	WRITE_QETH,
	WRITE_IUCV,
	ERROR,
	FINISH
};

enum state_wanted
{
	WANT_NONE = 0,
	WANT_BACKUP,
	WANT_NEXT,
	WANT_FINISH,
	WANT_ERROR
};

static int my_debconf_input (const char *priority, const char *template, char **p)
{
	int ret;

	debconf_input(client, priority, template);
	ret = debconf_go(client);
	debconf_get(client, template);
	*p = client->value;
	return ret;
}

static di_compare_func channel_compare;
int channel_compare (const void *key1, const void *key2)
{
	const unsigned int *k1 = key1, *k2 = key2;
	return *k1 - *k2;
}

static int channel_device (const char *i)
{
	unsigned int ret;
	if (sscanf (i, "0.0.%04x", &ret) == 1)
		return ret;
	if (sscanf (i, "%04x", &ret) == 1)
		return ret;
	return -1;
}

static enum state_wanted setup ()
{
	channels = di_tree_new (channel_compare);
	devices = di_tree_new (channel_compare);

	return WANT_NEXT;
}

static enum state_wanted detect_channels_driver (struct dlist *devices, int type)
{
	struct sysfs_device *device;

	dlist_for_each_data (devices, device, struct sysfs_device)
	{
		struct sysfs_attribute *attr_cutype;
		struct channel *current;
		char buf[SYSFS_PATH_MAX];

		/* Ignore already used channels. */
		strncpy (buf, device->path, SYSFS_PATH_MAX);
		strncat (buf, "/group_device", SYSFS_PATH_MAX);
		if (!sysfs_path_is_link (buf))
			continue;

		current = di_new0 (struct channel, 1);
		if (!current)
			return WANT_ERROR;
		current->type = type;

		strncpy (current->name, device->name, sizeof (current->name));
		current->key = channel_device(device->name);

		attr_cutype = sysfs_get_device_attr (device, "cutype");
		sysfs_read_attribute (attr_cutype);
		sscanf (attr_cutype->value, "%04x/%02x", &current->cu_type, &current->cu_model);

		di_tree_insert (channels, current, current);
	}

	return WANT_NONE;
}

static enum state_wanted detect_channels (void)
{
	enum state_wanted ret = WANT_NONE;
	unsigned int i;

	for (i = 0; i < sizeof (drivers) / sizeof (*drivers); i++)
	{
		struct sysfs_driver *driver = sysfs_open_driver ("ccw", drivers[i].name);
		if (driver)
		{
			struct dlist *devices;
			devices = sysfs_get_driver_devices (driver);
			if (devices)
				ret = detect_channels_driver (devices, drivers[i].type);
			sysfs_close_driver (driver);
			if (ret)
				return ret;
		}
	}
	return WANT_NEXT;
}

struct detect_devices_info
{
	struct device *current_device;
};

static di_hfunc detect_devices_each;
static void detect_devices_each (void *key __attribute__ ((unused)), void *value, void *user_data)
{
	struct channel *chan = value;
	struct detect_devices_info *info = user_data;

	switch (chan->type)
	{
		case CHANNEL_TYPE_CU3088_ALL:
			switch (chan->cu_model)
			{
				case 0x8:
					chan->type = CHANNEL_TYPE_CU3088_CTC;
					break;
				default:
					break;
			};
			break;
		case CHANNEL_TYPE_QETH:
			if (!info->current_device)
				info->current_device = di_new0 (struct device, 1);

			if (info->current_device->qeth.channels[1])
			{
				if (info->current_device->qeth.channels[1]->key + 1 == chan->key)
				{
					info->current_device->qeth.channels[2] = chan;
					di_tree_insert (devices, info->current_device, info->current_device);
					info->current_device = NULL;
				}
				else
					info->current_device->type = 0;
			}
			else if (info->current_device->qeth.channels[0])
			{
				if (info->current_device->qeth.channels[0]->key + 1 == chan->key)
					info->current_device->qeth.channels[1] = chan;
				else
					info->current_device->type = 0;
			}

			if (info->current_device && !info->current_device->type)
			{
				info->current_device->type = DEVICE_TYPE_QETH;
				info->current_device->key = chan->key;
				info->current_device->qeth.channels[0] = chan;
			}
			break;
		default:
			break;
	};
}

static enum state_wanted detect_devices (void)
{
	struct detect_devices_info info = { 0, };
	di_tree_foreach (channels, detect_devices_each, &info);
	return WANT_NEXT;
}

static enum state_wanted get_networktype (void)
{
	char *ptr;
	int ret = my_debconf_input ("critical", TEMPLATE_PREFIX "choose_networktype", &ptr);

	if (ret == 30)
		return WANT_BACKUP;
	if (ret)
		return WANT_ERROR;

	if (!strncmp (ptr, "qeth", 4))
		type = TYPE_QETH;
	else if (!strncmp (ptr, "ctc", 3))
		type = TYPE_CTC;
	else if (!strncmp (ptr, "iucv", 4))
		type = TYPE_IUCV;
	else if (!strncmp (ptr, "virtio", 6))
		type = TYPE_VIRTIO;
	else
		return WANT_ERROR;

	return WANT_NEXT;
}

static di_hfunc get_ctc_channels_append;
static void get_ctc_channels_append (void *key __attribute__ ((unused)), void *value, void *user_data)
{
	struct channel *channel = value;
	struct buffer_desc *bd = user_data;

	if (channel->type == CHANNEL_TYPE_CU3088_CTC)
		di_snprintfcat (bd->buf, bd->size, "%s%s",
				bd->buf[0] ? ", " : "",
				channel->name);
}

static enum state_wanted get_ctc_channels (void)
{
	const char *template;
	struct buffer_desc bd;
	int dev, ret;
	char *ptr;

	/* Allocate memory to create the complete list of channels,
	 * account 2 characters as list separator, 9 characters to
	 * contain the channel bus-ID (xx.y.zzzz), and a NUL to end
	 * the string.
	 */
	bd.size = di_tree_size (channels) * (2 + 9 + 1);
	bd.buf = di_malloc0 (bd.size);

	di_tree_foreach (channels, get_ctc_channels_append, &bd);

	if (!strlen (bd.buf))
	{
		my_debconf_input ("critical", TEMPLATE_PREFIX "ctc/no", &ptr);
		di_free (bd.buf);
		return WANT_BACKUP;
	}

	template = TEMPLATE_PREFIX "ctc/choose_read";
	debconf_subst (client, template, "choices", bd.buf);
	debconf_input (client, "critical", template);
	ret = debconf_go (client);
	if (ret == 30)
	{
		di_free (bd.buf);
		return WANT_BACKUP;
	}
	if (ret)
	{
		di_free (bd.buf);
		return WANT_ERROR;
	}
	debconf_get (client, template);

	dev = channel_device (client->value);
	device_current->ctc.channels[0] = di_tree_lookup (channels, &dev);

	template = TEMPLATE_PREFIX "ctc/choose_write";
	debconf_subst (client, template, "choices", bd.buf);
	debconf_input (client, "critical", template);
	ret = debconf_go (client);
	if (ret == 30)
	{
		di_free (bd.buf);
		return WANT_BACKUP;
	}
	if (ret)
	{
		di_free (bd.buf);
		return WANT_ERROR;
	}
	debconf_get (client, template);

	dev = channel_device (client->value);
	device_current->ctc.channels[1] = di_tree_lookup (channels, &dev);
	di_free (bd.buf);

	return WANT_NEXT;
}

static enum state_wanted get_ctc_device_iucv_device (enum state state)
{
	device_current = di_new0 (struct device, 1);

	switch (state)
	{
		case GET_CTC_DEVICE:
			device_current->type = DEVICE_TYPE_CTC;
			break;
		case GET_IUCV_DEVICE:
			device_current->type = DEVICE_TYPE_IUCV;
			break;
		default:
			return WANT_ERROR;
	}

	return WANT_NEXT;
}

static enum state_wanted get_ctc_protocol (void)
{
	char *ptr;
	int ret = my_debconf_input ("critical", TEMPLATE_PREFIX "ctc/protocol", &ptr);

	if (ret == 30)
		return WANT_BACKUP;
	if (ret)
		return WANT_ERROR;

	device_current->ctc.protocol = 0;
	if (!strcmp (ptr, "Linux (1)"))
		device_current->ctc.protocol = 1;
	else if (!strcmp (ptr, "OS/390 (3)"))
		device_current->ctc.protocol = 3;

	return WANT_NEXT;
}

static di_hfunc get_qeth_device_append;
static void get_qeth_device_append (void *key __attribute__ ((unused)), void *value, void *user_data)
{
	struct device *device = value;
	struct buffer_desc *bd = user_data;

	if (device->type == DEVICE_TYPE_QETH)
		di_snprintfcat (bd->buf, bd->size, "%s%s-%s-%s",
				bd->buf[0] ? ", " : "",
				device->qeth.channels[0]->name,
				device->qeth.channels[1]->name,
				device->qeth.channels[2]->name);
}

static enum state_wanted get_qeth_device (void)
{
	const char *template;
	struct buffer_desc bd;
	int dev, ret;
	char *ptr;

	/* Allocate memory to create the complete list of channels,
	 * account 2 characters as list separator, 10 characters
	 * for each qeth channel bus-ID (xx.y.zzzz), delimited with
	 * "-", and a NUL to end the string.
	 */
	bd.size = 2 + 3 * 10 + 1;
	bd.size *= di_tree_size (devices);
	bd.buf = di_malloc0 (bd.size);

	di_tree_foreach (devices, get_qeth_device_append, &bd);

	if (!strlen (bd.buf))
	{
		my_debconf_input ("critical", TEMPLATE_PREFIX "qeth/no", &ptr);
		di_free (bd.buf);
		return WANT_BACKUP;
	}

	template = TEMPLATE_PREFIX "qeth/choose";
	debconf_subst (client, template, "choices", bd.buf);
	debconf_input (client, "critical", template);
	ret = debconf_go (client);
	if (ret == 30)
	{
		di_free (bd.buf);
		return WANT_BACKUP;
	}
	if (ret)
	{
		di_free (bd.buf);
		return WANT_ERROR;
	}
	debconf_get (client, template);

	dev = channel_device (client->value);
	device_current = di_tree_lookup (devices, &dev);
	di_free (bd.buf);

	return WANT_NEXT;
}

static enum state_wanted get_qeth_layer2 (void)
{
	char *ptr;
	int ret = my_debconf_input ("critical", TEMPLATE_PREFIX "qeth/layer2", &ptr);

	if (ret == 30)
		return WANT_BACKUP;
	if (ret)
		return WANT_ERROR;

	device_current->qeth.layer2 = strstr (ptr, "true");

	return WANT_NEXT;
}

static enum state_wanted get_qeth_port (void)
{
	char *ptr;
	int ret = my_debconf_input ("medium", TEMPLATE_PREFIX "qeth/port", &ptr);

	if (ret == 30)
		return WANT_BACKUP;
	if (ret)
		return WANT_ERROR;

	sscanf (ptr, "%d", &device_current->qeth.port);

	return WANT_NEXT;
}

static enum state_wanted get_iucv_peer (void)
{
	char *ptr, *tmp;
	int ret, i, j;

	tmp = device_current->iucv.peername;
	ret = my_debconf_input ("critical", TEMPLATE_PREFIX "iucv/peer", &ptr);
	if (ret)
		return ret;

	*tmp = '0';

	j = strlen (ptr);
	if (j)
	{
		strcpy (tmp, ptr);
		for (i = 0; i < j; i++)
			tmp[i] = toupper (tmp[i]);
	}

	return WANT_NEXT;
}

static enum state_wanted confirm_ctc (void)
{
	const char *template = TEMPLATE_PREFIX "ctc/confirm";
	int ret;
	char *ptr;

	debconf_subst (client, template, "device_read", device_current->ctc.channels[0]->name);
	debconf_subst (client, template, "device_write", device_current->ctc.channels[1]->name);

	switch (device_current->ctc.protocol)
	{
		case 0:
			ptr = "S/390";
			break;
		case 1:
			ptr = "Linux";
			break;
		case 3:
			ptr = "OS/390";
			break;
		default:
			ptr = "unknown";
	}
	debconf_subst (client,  template, "protocol", ptr);

	debconf_set (client, template, "true");
	ret = my_debconf_input ("medium", template, &ptr);

	if (ret == 30 && !strstr (ptr, "true"))
		return WANT_BACKUP;
	if (ret)
		return WANT_ERROR;

	return WANT_NEXT;
}

static enum state_wanted confirm_qeth (void)
{
	const char *template = TEMPLATE_PREFIX "qeth/confirm";
	int ret;
	char *ptr;
	char *layer2 = device_current->qeth.layer2 ? "yes" : "no";
	char *portno = device_current->qeth.port ? "1" : "0";

	debconf_subst (client, template, "layer2", layer2);
	debconf_subst (client, template, "port", portno);
	debconf_subst (client, template, "device0", device_current->qeth.channels[0]->name);
	debconf_subst (client, template, "device1", device_current->qeth.channels[1]->name);
	debconf_subst (client, template, "device2", device_current->qeth.channels[2]->name);

	debconf_set (client, template, "true");
	ret = my_debconf_input ("medium", template, &ptr);

	if (ret == 30 && !strstr (ptr, "true"))
		return WANT_BACKUP;
	if (ret)
		return WANT_ERROR;

	return WANT_NEXT;
}

static enum state_wanted confirm_iucv (void)
{
	return WANT_ERROR;
}

static enum state_wanted write_sysfs (void)
{
	struct sysfs_device *device;
	struct sysfs_driver *driver;
	struct sysfs_attribute *attr;
	const char *driver_name = 0;
	const char *device_name = 0;
	char group[256];

	switch (device_current->type)
	{
		case DEVICE_TYPE_CTC:
			driver_name = "ctcm";
			device_name = device_current->ctc.channels[0]->name;
			snprintf (group, sizeof group, "%s,%s\n",
				       	device_current->ctc.channels[0]->name,
				       	device_current->ctc.channels[1]->name);

			/* This is necessary :/ */
			di_exec_shell_log ("modprobe ctcm");
			break;
		case DEVICE_TYPE_QETH:
			driver_name = "qeth";
			device_name = device_current->qeth.channels[0]->name;
			snprintf (group, sizeof group, "%s,%s,%s\n",
				       	device_current->qeth.channels[0]->name,
				       	device_current->qeth.channels[1]->name,
				       	device_current->qeth.channels[2]->name);
			break;
		case DEVICE_TYPE_IUCV:
			return WANT_ERROR;
	}

	driver = sysfs_open_driver ("ccwgroup", driver_name);
	if (!driver)
	{
		syslog (LOG_ERR, "Can't open ccwgroup driver %s", driver_name);
		return WANT_ERROR;
	}

	attr = sysfs_get_driver_attr (driver, "group");
	if (!attr)
	{
		syslog (LOG_ERR, "Can't open ccwgroup driver attribute group");
		return WANT_ERROR;
	}

	if (sysfs_write_attribute (attr, group, strlen (group)) < 0)
	{
		syslog (LOG_ERR, "Can't write ccwgroup driver attribute group");
		return WANT_ERROR;
	}

	sysfs_close_driver (driver);

	device = sysfs_open_device ("ccwgroup", device_name);
	if (!device)
	{
		syslog (LOG_ERR, "Can't open ccwgroup device %s", device_name);
		return WANT_ERROR;
	}

	if (device_current->type == DEVICE_TYPE_QETH)
	{
		attr = sysfs_get_device_attr (device, "layer2");
		if (!attr)
		{
			syslog (LOG_ERR, "Can't open ccwgroup device attribute layer2");
			return WANT_ERROR;
		}

		if (sysfs_write_attribute (attr, device_current->qeth.layer2 ? "1" : "0", 1) < 0)
		{
			syslog (LOG_ERR, "Can't write ccwgroup device attribute layer2");
			return WANT_ERROR;
		}

		/* Set the relative port number.
		 * Valid port numbers are 0 (default) or 1
		 */
		if (device_current->qeth.port)
		{
			attr = sysfs_get_device_attr (device, "portno");
			if (attr)
			{
				if (sysfs_write_attribute (attr, "1", 1) < 0)
				{
					syslog (LOG_ERR, "Could not write device attribute portno");
					return WANT_ERROR;
				}
			}
		}
	}

	attr = sysfs_get_device_attr (device, "online");
	if (!attr)
	{
		syslog (LOG_ERR, "Can't open ccwgroup device attribute online");
		return WANT_ERROR;
	}

	if (sysfs_write_attribute (attr, "1", 1) < 0)
	{
		syslog (LOG_ERR, "Can't write ccwgroup device attribute online");
		return WANT_ERROR;
	}

	sysfs_close_device (device);

	return WANT_NEXT;
}

static enum state_wanted write_ctc (void)
{
	char buf[256];
	enum state_wanted ret;
	FILE *config;

	ret = write_sysfs ();
	if (ret != WANT_NEXT)
		return ret;

	snprintf (buf, sizeof (buf), SYSCONFIG_DIR "config-ccw-%s", device_current->ctc.channels[0]->name);
	config = fopen (buf, "w");
	if (!config)
		return WANT_ERROR;

	snprintf (buf, sizeof (buf), "CCWGROUP_CHANS=(%s %s)\n", device_current->ctc.channels[0]->name, device_current->ctc.channels[1]->name);
	fwrite (buf, strlen (buf), 1, config);
	snprintf (buf, sizeof (buf), "CTC_PROTOCOL=%d\n", device_current->ctc.protocol);
	fwrite (buf, strlen (buf), 1, config);

	fclose (config);

	return WANT_NEXT;
}

static enum state_wanted write_qeth (void)
{
	char buf[256];
	enum state_wanted ret;
	FILE *config;

	ret = write_sysfs ();
	if (ret != WANT_NEXT)
		return ret;

	snprintf (buf, sizeof (buf), SYSCONFIG_DIR "config-ccw-%s", device_current->qeth.channels[0]->name);
	config = fopen (buf, "w");
	if (!config)
		return WANT_ERROR;

	snprintf (buf, sizeof (buf), "CCWGROUP_CHANS=(%s %s %s)\n", device_current->qeth.channels[0]->name, device_current->qeth.channels[1]->name, device_current->qeth.channels[2]->name);
	fwrite (buf, strlen (buf), 1, config);

	if (device_current->qeth.layer2)
		fprintf (config, "QETH_OPTIONS=(layer2)\n");
	fprintf (config, "QETH_PORTNO=%d", device_current->qeth.port);

	fclose (config);

	return WANT_NEXT;
}

static enum state_wanted write_iucv (void)
{
	return WANT_ERROR;
}

int main (int argc __attribute__ ((unused)), char *argv[] __attribute__ ((unused)))
{
	di_system_init ("s390-netdevice");
	openlog ("s390-netdevice", 0, LOG_USER);

	client = debconfclient_new ();
	debconf_capb (client, "backup");

	enum state state = SETUP;

	while (1)
	{
		enum state_wanted state_want = WANT_ERROR;

		switch (state)
		{
			case BACKUP:
				return 10;
			case SETUP:
				state_want = setup ();
				break;
			case DETECT_CHANNELS:
				state_want = detect_channels ();
				break;
			case DETECT_DEVICES:
				state_want = detect_devices ();
				break;
			case GET_NETWORKTYPE:
				state_want = get_networktype ();
				break;
			case GET_CTC_DEVICE:
			case GET_IUCV_DEVICE:
				state_want = get_ctc_device_iucv_device (state);
				break;
			case GET_CTC_CHANNELS:
				state_want = get_ctc_channels ();
				break;
			case GET_CTC_PROTOCOL:
				state_want = get_ctc_protocol ();
				break;
			case GET_QETH_DEVICE:
				state_want = get_qeth_device ();
				break;
			case GET_QETH_LAYER2:
				state_want = get_qeth_layer2 ();
				break;
			case GET_QETH_PORT:
				state_want = get_qeth_port ();
				break;
			case GET_IUCV_PEER:
				state_want = get_iucv_peer ();
				break;
			case CONFIRM_CTC:
				state_want = confirm_ctc ();
				break;
			case CONFIRM_QETH:
				state_want = confirm_qeth ();
				break;
			case CONFIRM_IUCV:
				state_want = confirm_iucv ();
				break;
			case WRITE_CTC:
				state_want = write_ctc ();
				break;
			case WRITE_QETH:
				state_want = write_qeth ();
				break;
			case WRITE_IUCV:
				state_want = write_iucv ();
				break;
			case ERROR:
				return 1;
			case FINISH:
				return 0;
		}

		switch (state_want)
		{
			case WANT_NEXT:
				switch (state)
				{
					case SETUP:
						state = DETECT_CHANNELS;
						break;
					case DETECT_CHANNELS:
						state = DETECT_DEVICES;
						break;
					case DETECT_DEVICES:
						state = GET_NETWORKTYPE;
						break;
					case GET_NETWORKTYPE:
						switch (type)
						{
							case TYPE_CTC:
								state = GET_CTC_DEVICE;
								break;
							case TYPE_QETH:
								state = GET_QETH_DEVICE;
								break;
							case TYPE_IUCV:
								state = GET_IUCV_DEVICE;
								break;
							case TYPE_VIRTIO:
								// no further configuration needed
								state = FINISH;
								break;
							default:
								state = ERROR;
						}
						break;
					case GET_CTC_DEVICE:
						state = GET_CTC_CHANNELS;
						break;
					case GET_CTC_CHANNELS:
						state = GET_CTC_PROTOCOL;
						break;
					case GET_CTC_PROTOCOL:
						state = CONFIRM_CTC;
						break;
					case GET_QETH_DEVICE:
						state = GET_QETH_LAYER2;
						break;
					case GET_QETH_LAYER2:
						state = GET_QETH_PORT;
						break;
					case GET_QETH_PORT:
						state = CONFIRM_QETH;
						break;
					case GET_IUCV_DEVICE:
						/* state = GET_IUCV_PEER; */
						state = ERROR;
						break;
					case GET_IUCV_PEER:
						state = CONFIRM_IUCV;
						break;
					case CONFIRM_CTC:
						state = WRITE_CTC;
						break;
					case CONFIRM_QETH:
						state = WRITE_QETH;
						break;
					case CONFIRM_IUCV:
						state = WRITE_IUCV;
						break;
					case WRITE_CTC:
					case WRITE_QETH:
					case WRITE_IUCV:
						state = FINISH;
						break;
					case BACKUP:
					case ERROR:
					case FINISH:
						state = ERROR;
				}
				break;
			case WANT_BACKUP:
				switch (state)
				{
					case GET_NETWORKTYPE:
						state = BACKUP;
						break;
					default:
						state = ERROR;
				}
				break;
			case WANT_FINISH:
				state = FINISH;
				break;
			default:
				state = ERROR;
		}
	}
}

/* vim: noexpandtab sw=8
 */