#include <sys/time.h>
#include <stdio.h>
#include <string.h>

#include <arpa/inet.h>

#ifndef DEBUG
#define DEBUG
#endif

#include "netifd.h"
#include "device.h"
#include "system.h"

int system_init(void)
{
	return 0;
}

int system_bridge_addbr(struct device *bridge, struct bridge_config *cfg)
{
	D(SYSTEM, "brctl addbr %s\n", bridge->ifname);
	return 0;
}

int system_bridge_delbr(struct device *bridge)
{
	D(SYSTEM, "brctl delbr %s\n", bridge->ifname);
	return 0;
}

int system_bridge_addif(struct device *bridge, struct device *dev)
{
	D(SYSTEM, "brctl addif %s %s\n", bridge->ifname, dev->ifname);
	return 0;
}

int system_bridge_delif(struct device *bridge, struct device *dev)
{
	D(SYSTEM, "brctl delif %s %s\n", bridge->ifname, dev->ifname);
	return 0;
}

int system_vlan_add(struct device *dev, int id)
{
	D(SYSTEM, "vconfig add %s %d\n", dev->ifname, id);
	return 0;
}

int system_vlan_del(struct device *dev)
{
	D(SYSTEM, "vconfig rem %s\n", dev->ifname);
	return 0;
}

int system_if_up(struct device *dev)
{
	D(SYSTEM, "ifconfig %s up\n", dev->ifname);
	return 0;
}

int system_if_down(struct device *dev)
{
	D(SYSTEM, "ifconfig %s down\n", dev->ifname);
	return 0;
}

void system_if_clear_state(struct device *dev)
{
}

int system_if_check(struct device *dev)
{
	dev->ifindex = 0;

	if (!strcmp(dev->ifname, "eth0"))
		device_set_present(dev, true);

	return 0;
}

struct device *
system_if_get_parent(struct device *dev)
{
	if (!strcmp(dev->ifname, "eth0"))
		return device_get("eth1", true);

	return NULL;
}

int system_if_dump_stats(struct device *dev, struct blob_buf *b)
{
	return 0;
}

int system_add_address(struct device *dev, struct device_addr *addr)
{
	uint8_t *a = (uint8_t *) &addr->addr.in;
	char ipaddr[64];

	if ((addr->flags & DEVADDR_FAMILY) == DEVADDR_INET4) {
		D(SYSTEM, "ifconfig %s add %d.%d.%d.%d/%d\n",
			dev->ifname, a[0], a[1], a[2], a[3], addr->mask);
	} else {
		inet_ntop(AF_INET6, &addr->addr.in6, ipaddr, sizeof(struct in6_addr));
		D(SYSTEM, "ifconfig %s add %s/%d\n",
			dev->ifname, ipaddr, addr->mask);
		return -1;
	}

	return 0;
}

int system_del_address(struct device *dev, struct device_addr *addr)
{
	uint8_t *a = (uint8_t *) &addr->addr.in;
	char ipaddr[64];

	if ((addr->flags & DEVADDR_FAMILY) == DEVADDR_INET4) {
		D(SYSTEM, "ifconfig %s del %d.%d.%d.%d\n",
			dev->ifname, a[0], a[1], a[2], a[3]);
	} else {
		inet_ntop(AF_INET6, &addr->addr.in6, ipaddr, sizeof(struct in6_addr));
		D(SYSTEM, "ifconfig %s del %s/%d\n",
			dev->ifname, ipaddr, addr->mask);
		return -1;
	}

	return 0;
}

int system_add_route(struct device *dev, struct device_route *route)
{
	uint8_t *a1 = (uint8_t *) &route->addr.in;
	uint8_t *a2 = (uint8_t *) &route->nexthop.in;
	char addr[40], gw[40] = "", devstr[64] = "";

	if ((route->flags & DEVADDR_FAMILY) != DEVADDR_INET4)
		return -1;

	if (!route->mask)
		sprintf(addr, "default");
	else
		sprintf(addr, "%d.%d.%d.%d/%d",
			a1[0], a1[1], a1[2], a1[3], route->mask);

	if (memcmp(a2, "\x00\x00\x00\x00", 4) != 0)
		sprintf(gw, " gw %d.%d.%d.%d",
			a2[0], a2[1], a2[2], a2[3]);

	if (route->flags & DEVADDR_DEVICE)
		sprintf(devstr, " dev %s", dev->ifname);

	D(SYSTEM, "route add %s%s%s\n", addr, gw, devstr);
	return 0;
}

int system_del_route(struct device *dev, struct device_route *route)
{
	uint8_t *a1 = (uint8_t *) &route->addr.in;
	uint8_t *a2 = (uint8_t *) &route->nexthop.in;
	char addr[40], gw[40] = "", devstr[64] = "";

	if ((route->flags & DEVADDR_FAMILY) != DEVADDR_INET4)
		return -1;

	if (!route->mask)
		sprintf(addr, "default");
	else
		sprintf(addr, "%d.%d.%d.%d/%d",
			a1[0], a1[1], a1[2], a1[3], route->mask);

	if (memcmp(a2, "\x00\x00\x00\x00", 4) != 0)
		sprintf(gw, " gw %d.%d.%d.%d",
			a2[0], a2[1], a2[2], a2[3]);

	if (route->flags & DEVADDR_DEVICE)
		sprintf(devstr, " dev %s", dev->ifname);

	D(SYSTEM, "route del %s%s%s\n", addr, gw, devstr);
	return 0;
}

int system_flush_routes(void)
{
	return 0;
}

time_t system_get_rtime(void)
{
	struct timeval tv;

	if (gettimeofday(&tv, NULL) == 0)
		return tv.tv_sec;

	return 0;
}