#include "global.h"
#include "get1steth.h"


char szIface[MAX_STR];
int Verbose;
extern char compiled[], compiledby[], compilehost[];


static void Usage()
{
	printf("-= GET_FIRST_ETHERNET =- Get First Ethernet Interface tool\n"
		"=== %s === %s@%s ===\n\n"
		"Syntax: get1steth [option] [custom_first_interface]\n\n"
		"\t-v\t\tVerbose (more -v more verbosity)\n"
		"\t-g\t\tOnly get first interface, print and exit ...\n"
		"\n", compiled, compiledby, compilehost);
}

// -------------------------------

int main(int argc, char **argv)
{
	char ch, GetOnly = 0;
	struct ifaddrs *ifa, *ifp;
	struct sockaddr_dl *sdl;
	struct ifreq ifr;
	struct vlanreq vlr;
	int s;

	while ((ch = getopt(argc, argv, "hvg")) != -1)
		switch (ch) {
			case 'g':
				GetOnly = 1;
				break;
			case 'v':
				Verbose++;
				break;
			case 'h':
			default:
				Usage();
				return 1;
		}
	argc -= optind;
	argv += optind;

	openlog("get1steth", LOG_CONS | LOG_PERROR, LOG_CONSOLE | LOG_USER);

	if (argc) {
		strlcpy(szIface, *argv, MAX_STR);
		VERB(1) syslog(LOG_NOTICE, "Info:: Get CUSTOM first interface %s\n", szIface);
	} else {
		getifaddrs(&ifa);
		for (ifp = ifa; ifp; ifp = ifp->ifa_next) {
			if (PF_LINK == ifp->ifa_addr->sa_family && 
					IFT_ETHER == ((struct sockaddr_dl*) ifp->ifa_addr)->sdl_type) {
				strlcpy(szIface, ifp->ifa_name, MAX_STR);
				sdl = (struct sockaddr_dl*) ifp->ifa_addr;
				VERB(2) syslog(LOG_NOTICE, "Info:: Get first interface=%s MAC=%s\n", szIface, 
						ether_ntoa((struct ether_addr*) LLADDR(sdl)));
				break;
			}
		}
		freeifaddrs(ifa);
	}
	if (GetOnly) {
		printf("%s\n", szIface);

		closelog();
		return 0;
	}

	// create vlan
	memset(&ifr, 0, sizeof ifr);
	strlcpy(vlr.vlr_parent, szIface, IFNAMSIZ);
	vlr.vlr_tag = MGMT_VTAG;

	strlcpy(ifr.ifr_name, MGMT_IFACE, IFNAMSIZ);
	ifr.ifr_data = (void *) &vlr;

	s = socket(PF_LOCAL, SOCK_DGRAM, 0);
	if (-1 == s) {
		syslog(LOG_ERR, "Error:: socket(LOCAL) #%d - %s\n", errno, strerror(errno));
		return 2;
	}
	if (ioctl(s, SIOCIFCREATE2, &ifr) == -1) {
		syslog(LOG_ERR, "Error:: Create interface=%s ioctl(SIOCIFCREATE2) #%d - %s\n", 
				MGMT_IFACE, errno, strerror(errno));
		close(s);
		return 2;
	} else
		VERB(2) syslog(LOG_NOTICE, "Info:: Created interface=%s\n", MGMT_IFACE);
	// rename iface
	ifr.ifr_data = MGMT_NAME;
	if (ioctl(s, SIOCSIFNAME, &ifr) == -1) {
		syslog(LOG_ERR, "Error:: Managment interface=%s ioctl(SIOCSIFNAME) #%d - %s\n", 
				MGMT_NAME, errno, strerror(errno));
		close(s);
		return 2;
	} else
		VERB(2) syslog(LOG_NOTICE, "Info:: Managment interface=%s\n", MGMT_NAME);
	// assign address & up
	ifr.ifr_flags |= IFF_UP;

	close(s);
	closelog();
	return 0;
}