No OneTemporary
Actions

Size

53 KB

Referenced Files

None

Subscribers

None

View Options

	diff --git a/libnozzle/internals.c b/libnozzle/internals.c
	index a1e41004..48815e4d 100644
	--- a/libnozzle/internals.c
	+++ b/libnozzle/internals.c
	@@ -1,942 +1,916 @@
	/*
	* Copyright (C) 2010-2017 Red Hat, Inc. All rights reserved.
	*
	* Author: Fabio M. Di Nitto <fabbione@kronosnet.org>
	*
	* This software licensed under GPL-2.0+, LGPL-2.0+
	*/

	#include "config.h"

	#include <errno.h>
	#include <stdlib.h>
	#include <string.h>
	#include <sys/types.h>
	#include <sys/stat.h>
	#include <sys/wait.h>
	#include <unistd.h>
	#include <limits.h>
	#include <stdio.h>
	#include <stdint.h>
	#include <arpa/inet.h>

	#include "libnozzle.h"
	#include "internals.h"

	static int read_pipe(int fd, char *file, size_t length)
	{
	char buf[4096];
	int n;
	int done = 0;

	*file = NULL;
	*length = 0;

	memset(buf, 0, sizeof(buf));

	while (!done) {

	n = read(fd, buf, sizeof(buf));

	if (n < 0) {
	if (errno == EINTR)
	continue;

	if (*file)
	free(*file);

	return n;
	}

	if (n == 0 && (!*length))
	return 0;

	if (n == 0)
	done = 1;

	if (*file)
	file = realloc(file, (*length) + n + done);
	else
	*file = malloc(n + done);

	if (!*file)
	return -1;

	memmove((file) + (length), buf, n);
	*length += (done + n);
	}

	/* Null terminator */
	(file)[(length) - 1] = 0;

	return 0;
	}

	int execute_bin_sh_command(const char command, char *error_string)
	{
	pid_t pid;
	int status, err = 0;
	int fd[2];
	size_t size = 0;

	if ((command == NULL) \|\| (!error_string)) {
	errno = EINVAL;
	return -1;
	}

	*error_string = NULL;

	err = pipe(fd);
	if (err)
	goto out_clean;

	pid = fork();
	if (pid < 0) {
	err = pid;
	goto out_clean;
	}

	if (pid) { /* parent */

	close(fd[1]);
	err = read_pipe(fd[0], error_string, &size);
	if (err)
	goto out_clean0;

	waitpid(pid, &status, 0);
	if (!WIFEXITED(status)) {
	err = -1;
	goto out_clean0;
	}
	if (WIFEXITED(status) && WEXITSTATUS(status) != 0) {
	err = WEXITSTATUS(status);
	goto out_clean0;
	}
	goto out_clean0;
	} else { /* child */
	close(0);
	close(1);
	close(2);

	close(fd[0]);
	dup2(fd[1], 1);
	dup2(fd[1], 2);
	close(fd[1]);

	execlp("/bin/sh", "/bin/sh", "-c", command, NULL);
	exit(EXIT_FAILURE);
	}

	out_clean:
	close(fd[1]);
	out_clean0:
	close(fd[0]);

	return err;
	}

	-int run_updown(const nozzle_t nozzle, const char action, char *error_string)
	-{
	- char command[PATH_MAX];
	- struct stat sb;
	- int err = 0;
	-
	- if (!nozzle->hasupdown)
	- return 0;
	-
	- memset(command, 0, PATH_MAX);
	-
	- snprintf(command, PATH_MAX, "%s%s/%s", nozzle->updownpath, action, nozzle->name);
	-
	- err = stat(command, &sb);
	- if ((err < 0) && (errno == ENOENT))
	- return 0;
	-
	- err = execute_bin_sh_command(command, error_string);
	- if ((!err) && (*error_string)) {
	- free(*error_string);
	- *error_string = NULL;
	- }
	-
	- return err;
	-}
	-
	char generate_v4_broadcast(const char ipaddr, const char *prefix)
	{
	int prefix_len;
	struct in_addr mask;
	struct in_addr broadcast;
	struct in_addr address;

	prefix_len = atoi(prefix);

	if ((prefix_len > 32) \|\| (prefix_len < 0))
	return NULL;

	if (inet_pton(AF_INET, ipaddr, &address) <= 0)
	return NULL;

	mask.s_addr = htonl(~((1 << (32 - prefix_len)) - 1));

	memset(&broadcast, 0, sizeof(broadcast));
	broadcast.s_addr = (address.s_addr & mask.s_addr) \| ~mask.s_addr;

	return strdup(inet_ntoa(broadcast));
	}

	int find_ip(nozzle_t nozzle,
	const char ipaddr, const char prefix,
	struct nozzle_ip ip, struct nozzle_ip ip_prev)
	{
	struct nozzle_ip local_ip, local_ip_prev;
	int found = 0;

	local_ip = local_ip_prev = nozzle->ip;

	while(local_ip) {
	if ((!strcmp(local_ip->ipaddr, ipaddr)) && (!strcmp(local_ip->prefix, prefix))) {
	found = 1;
	break;
	}
	local_ip_prev = local_ip;
	local_ip = local_ip->next;
	}

	if (found) {
	*ip = local_ip;
	*ip_prev = local_ip_prev;
	}

	return found;
	}

	#if 0
	static void _close(nozzle_t nozzle)
	{
	#ifdef KNET_BSD
	struct ifreq ifr;
	#endif

	if (!nozzle)
	return;

	if (nozzle->fd)
	close(nozzle->fd);

	#ifdef KNET_BSD
	memset(&ifr, 0, sizeof(struct ifreq));
	strncpy(ifname, nozzle->name, IFNAMSIZ);

	ioctl(lib_cfg.ioctlfd, SIOCIFDESTROY, &ifr);
	#endif

	free(nozzle);

	return;
	}

	static void _close_cfg(void)
	{
	if (lib_cfg.head == NULL) {
	close(lib_cfg.ioctlfd);
	lib_init = 0;
	}
	}

	nozzle_t nozzle_open(char devname, size_t devname_size, const char updownpath)
	{
	int savederrno = 0;
	nozzle_t nozzle = NULL;
	char *temp_mac = NULL;
	#ifdef KNET_LINUX
	struct ifreq ifr;
	#endif
	#ifdef KNET_BSD
	uint16_t i;
	long int nozzlenum = 0;
	char curnozzle[IFNAMSIZ];
	#endif

	if (devname == NULL) {
	errno = EINVAL;
	return NULL;
	}

	if (devname_size < IFNAMSIZ) {
	errno = EINVAL;
	return NULL;
	}

	if (strlen(devname) > IFNAMSIZ) {
	errno = E2BIG;
	return NULL;
	}

	#ifdef KNET_BSD
	/*
	* BSD does not support named devices like Linux
	* but it is possible to force a nozzleX device number
	* where X is 0 to 255.
	*/
	if (strlen(devname)) {
	if (strncmp(devname, "tap", 3)) {
	errno = EINVAL;
	return NULL;
	}
	errno = 0;
	nozzlenum = strtol(devname+3, NULL, 10);
	if (errno) {
	errno = EINVAL;
	return NULL;
	}
	if ((nozzlenum < 0) \|\| (nozzlenum > 255)) {
	errno = EINVAL;
	return NULL;
	}
	}
	#endif

	if (updownpath) {
	/* only absolute paths */
	if (updownpath[0] != '/') {
	errno = EINVAL;
	return NULL;
	}
	if (strlen(updownpath) >= UPDOWN_PATH_MAX) {
	errno = E2BIG;
	return NULL;
	}
	}

	savederrno = pthread_mutex_lock(&config_mutex);
	if (savederrno) {
	errno = savederrno;
	return NULL;
	}

	if (!lib_init) {
	lib_cfg.head = NULL;
	#ifdef KNET_LINUX
	lib_cfg.ioctlfd = socket(AF_INET, SOCK_STREAM, 0);
	#endif
	#ifdef KNET_BSD
	lib_cfg.ioctlfd = socket(AF_LOCAL, SOCK_DGRAM, 0);
	#endif
	if (lib_cfg.ioctlfd < 0) {
	savederrno = errno;
	goto out_error;
	}
	lib_init = 1;
	}

	nozzle = malloc(sizeof(struct nozzle_iface));
	if (!nozzle) {
	savederrno = ENOMEM;
	goto out_error;
	}

	memset(nozzle, 0, sizeof(struct nozzle_iface));

	#ifdef KNET_BSD
	if (!strlen(devname)) {
	for (i = 0; i < 256; i++) {
	snprintf(curnozzle, sizeof(curnozzle) - 1, "/dev/tap%u", i);
	nozzle->fd = open(curnozzle, O_RDWR);
	savederrno = errno;
	if (nozzle->fd > 0) {
	break;
	}
	}
	snprintf(curnozzle, sizeof(curnozzle) -1 , "tap%u", i);
	} else {
	snprintf(curnozzle, sizeof(curnozzle) - 1, "/dev/%s", devname);
	nozzle->fd = open(curnozzle, O_RDWR);
	savederrno = errno;
	snprintf(curnozzle, sizeof(curnozzle) - 1, "%s", devname);
	}
	if (nozzle->fd < 0) {
	errno = EBUSY;
	goto out_error;
	}
	strncpy(devname, curnozzle, IFNAMSIZ);
	strncpy(nozzle->name, curnozzle, IFNAMSIZ);
	#endif

	#ifdef KNET_LINUX
	if ((nozzle->fd = open("/dev/net/tun", O_RDWR)) < 0) {
	savederrno = errno;
	goto out_error;
	}

	memset(&ifr, 0, sizeof(struct ifreq));
	strncpy(ifname, devname, IFNAMSIZ);
	ifr.ifr_flags = IFF_TAP \| IFF_NO_PI;

	if (ioctl(nozzle->fd, TUNSETIFF, &ifr) < 0) {
	savederrno = errno;
	goto out_error;
	}

	if ((strlen(devname) > 0) && (strcmp(devname, ifname) != 0)) {
	errno = EBUSY;
	goto out_error;
	}

	strncpy(devname, ifname, IFNAMSIZ);
	strncpy(nozzle->name, ifname, IFNAMSIZ);
	#endif

	nozzle->default_mtu = _get_mtu(nozzle);
	if (nozzle->default_mtu < 0) {
	savederrno = errno;
	goto out_error;
	}

	if (_get_mac(nozzle, &temp_mac) < 0) {
	savederrno = errno;
	goto out_error;
	}

	strncpy(nozzle->default_mac, temp_mac, 18);
	free(temp_mac);

	if (updownpath) {
	int len = strlen(updownpath);

	strcpy(nozzle->updownpath, updownpath);
	if (nozzle->updownpath[len-1] != '/') {
	nozzle->updownpath[len] = '/';
	}
	nozzle->hasupdown = 1;
	}

	nozzle->next = lib_cfg.head;
	lib_cfg.head = nozzle;

	pthread_mutex_unlock(&config_mutex);
	errno = savederrno;
	return nozzle;

	out_error:
	_close(nozzle);
	_close_cfg();
	pthread_mutex_unlock(&config_mutex);
	errno = savederrno;
	return NULL;
	}

	int nozzle_close(nozzle_t nozzle, char error_down, char error_postdown)
	{
	int err = 0, savederrno = 0;
	nozzle_t temp = lib_cfg.head;
	nozzle_t prev = lib_cfg.head;
	struct nozzle_ip ip, ip_next;
	char *error_string = NULL;

	savederrno = pthread_mutex_lock(&config_mutex);
	if (savederrno) {
	errno = savederrno;
	return -1;
	}

	if (!_check(nozzle)) {
	savederrno = EINVAL;
	err = -1;
	goto out_clean;
	}

	while ((temp) && (temp != nozzle)) {
	prev = temp;
	temp = temp->next;
	}

	if (nozzle == prev) {
	lib_cfg.head = nozzle->next;
	} else {
	prev->next = nozzle->next;
	}

	_set_down(nozzle, error_down, error_postdown);

	ip = nozzle->ip;
	while (ip) {
	ip_next = ip->next;
	_set_ip(nozzle, "del", ip->ipaddr, ip->prefix, &error_string, 0);
	if (error_string) {
	free(error_string);
	error_string = NULL;
	}
	free(ip);
	ip = ip_next;
	}

	_close(nozzle);
	_close_cfg();

	out_clean:
	pthread_mutex_unlock(&config_mutex);
	errno = savederrno;
	return err;
	}

	int nozzle_set_mtu(nozzle_t nozzle, const int mtu, char **error_string)
	{
	int err = 0, savederrno = 0;
	struct nozzle_ip *tmp_ip;
	struct ifreq ifr;

	if ((!nozzle) \|\| (!mtu) \|\| (!error_string)) {
	errno = EINVAL;
	return -1;
	}

	savederrno = pthread_mutex_lock(&config_mutex);
	if (savederrno) {
	errno = savederrno;
	return -1;
	}

	if (!_check(nozzle)) {
	errno = EINVAL;
	err = -1;
	goto out_clean;
	}

	err = nozzle->current_mtu = _get_mtu(nozzle);
	if (err < 0) {
	savederrno = errno;
	goto out_clean;
	}

	memset(&ifr, 0, sizeof(struct ifreq));
	strncpy(ifname, nozzle->name, IFNAMSIZ);
	ifr.ifr_mtu = mtu;

	err = ioctl(lib_cfg.ioctlfd, SIOCSIFMTU, &ifr);
	if (err) {
	savederrno = errno;
	goto out_clean;
	}

	if ((nozzle->current_mtu < 1280) && (mtu >= 1280)) {
	tmp_ip = nozzle->ip;
	while(tmp_ip) {
	if (tmp_ip->domain == AF_INET6) {
	err = _set_ip(nozzle, "add", tmp_ip->ipaddr, tmp_ip->prefix, error_string, 0);
	if (err) {
	savederrno = errno;
	err = -1;
	goto out_clean;
	}
	}
	tmp_ip = tmp_ip->next;
	}
	}

	out_clean:
	pthread_mutex_unlock(&config_mutex);
	errno = savederrno;
	return err;
	}

	int nozzle_reset_mtu(nozzle_t nozzle, char **error_string)
	{
	return nozzle_set_mtu(nozzle, nozzle->default_mtu, error_string);
	}

	int nozzle_set_up(nozzle_t nozzle, char error_preup, char error_up)
	{
	int err = 0, savederrno = 0;
	struct ifreq ifr;

	if (!nozzle) {
	errno = EINVAL;
	return -1;
	}

	savederrno = pthread_mutex_lock(&config_mutex);
	if (savederrno) {
	errno = savederrno;
	return -1;
	}

	if (!_check(nozzle)) {
	savederrno = EINVAL;
	err = -1;
	goto out_clean;
	}

	if ((nozzle->hasupdown) && ((!error_preup) \|\| (!error_up))) {
	savederrno = EINVAL;
	err = -1;
	goto out_clean;
	}

	if (nozzle->up) {
	goto out_clean;
	}

	memset(&ifr, 0, sizeof(struct ifreq));
	strncpy(ifname, nozzle->name, IFNAMSIZ);

	err = ioctl(lib_cfg.ioctlfd, SIOCGIFFLAGS, &ifr);
	if (err) {
	savederrno = errno;
	goto out_clean;
	}

	_exec_updown(nozzle, "pre-up.d", error_preup);

	ifr.ifr_flags \|= IFF_UP \| IFF_RUNNING;
	err = ioctl(lib_cfg.ioctlfd, SIOCSIFFLAGS, &ifr);
	if (err) {
	savederrno = errno;
	goto out_clean;
	}

	_exec_updown(nozzle, "up.d", error_up);

	nozzle->up = 1;

	out_clean:
	pthread_mutex_unlock(&config_mutex);
	errno = savederrno;
	return err;
	}

	static int _set_down(nozzle_t nozzle, char error_down, char error_postdown)
	{
	int err = 0, savederrno = 0;
	struct ifreq ifr;

	if (!nozzle->up) {
	goto out_clean;
	}

	memset(&ifr, 0, sizeof(struct ifreq));
	strncpy(ifname, nozzle->name, IFNAMSIZ);

	err = ioctl(lib_cfg.ioctlfd, SIOCGIFFLAGS, &ifr);
	if (err) {
	savederrno = errno;
	goto out_clean;
	}

	_exec_updown(nozzle, "down.d", error_down);

	ifr.ifr_flags &= ~IFF_UP;

	err = ioctl(lib_cfg.ioctlfd, SIOCSIFFLAGS, &ifr);
	if (err) {
	savederrno = errno;
	goto out_clean;
	}

	_exec_updown(nozzle, "post-down.d", error_postdown);

	nozzle->up = 0;

	out_clean:
	errno = savederrno;
	return err;
	}

	int nozzle_set_down(nozzle_t nozzle, char error_down, char error_postdown)
	{
	int err = 0, savederrno = 0;

	if (!nozzle) {
	errno = EINVAL;
	return -1;
	}

	savederrno = pthread_mutex_lock(&config_mutex);
	if (savederrno) {
	errno = savederrno;
	return -1;
	}

	if (!_check(nozzle)) {
	savederrno = EINVAL;
	err = -1;
	goto out_clean;
	}

	if ((nozzle->hasupdown) && ((!error_down) \|\| (!error_postdown))) {
	savederrno = EINVAL;
	err = -1;
	goto out_clean;
	}

	err = _set_down(nozzle, error_down, error_postdown);
	savederrno = errno;

	out_clean:
	pthread_mutex_unlock(&config_mutex);
	errno = savederrno;
	return err;
	}

	static int _set_ip(nozzle_t nozzle, const char *command,
	const char ipaddr, const char prefix,
	char **error_string, int secondary)
	{
	char *broadcast = NULL;
	char cmdline[4096];
	#ifdef KNET_BSD
	char proto[6];
	int v4 = 1;

	snprintf(proto, sizeof(proto), "inet");
	#endif

	if (!strchr(ipaddr, ':')) {
	broadcast = _get_v4_broadcast(ipaddr, prefix);
	if (!broadcast) {
	errno = EINVAL;
	return -1;
	}
	}
	#ifdef KNET_BSD
	else {
	v4 = 0;
	snprintf(proto, sizeof(proto), "inet6");
	}
	#endif

	memset(cmdline, 0, sizeof(cmdline));

	#ifdef KNET_LINUX
	if (broadcast) {
	snprintf(cmdline, sizeof(cmdline)-1,
	"ip addr %s %s/%s dev %s broadcast %s",
	command, ipaddr, prefix,
	nozzle->name, broadcast);
	} else {
	snprintf(cmdline, sizeof(cmdline)-1,
	"ip addr %s %s/%s dev %s",
	command, ipaddr, prefix,
	nozzle->name);
	}
	#endif
	#ifdef KNET_BSD
	if (!strcmp(command, "add")) {
	snprintf(cmdline, sizeof(cmdline)-1,
	"ifconfig %s %s %s/%s",
	nozzle->name, proto, ipaddr, prefix);
	if (broadcast) {
	snprintf(cmdline + strlen(cmdline),
	sizeof(cmdline) - strlen(cmdline) -1,
	" broadcast %s", broadcast);
	}
	if ((secondary) && (v4)) {
	snprintf(cmdline + strlen(cmdline),
	sizeof(cmdline) - strlen(cmdline) -1,
	" alias");
	}
	} else {
	snprintf(cmdline, sizeof(cmdline)-1,
	"ifconfig %s %s %s/%s delete",
	nozzle->name, proto, ipaddr, prefix);
	}
	#endif
	if (broadcast) {
	free(broadcast);
	}
	return _execute_bin_sh(cmdline, error_string);
	}

	int nozzle_add_ip(nozzle_t nozzle, const char ipaddr, const char prefix, char **error_string)
	{
	int err = 0, savederrno = 0;
	int found = 0;
	struct nozzle_ip ip = NULL, ip_prev = NULL, *ip_last = NULL;
	int secondary = 0;

	if ((!nozzle) \|\| (!ipaddr) \|\| (!prefix) \|\| (!error_string)) {
	errno = EINVAL;
	return -1;
	}

	savederrno = pthread_mutex_lock(&config_mutex);
	if (savederrno) {
	errno = savederrno;
	return -1;
	}

	if (!_check(nozzle)) {
	errno = EINVAL;
	err = -1;
	goto out_clean;
	}

	found = _find_ip(nozzle, ipaddr, prefix, &ip, &ip_prev);
	if (found) {
	goto out_clean;
	}

	ip = malloc(sizeof(struct nozzle_ip));
	if (!ip) {
	savederrno = errno;
	err = -1 ;
	goto out_clean;
	}

	memset(ip, 0, sizeof(struct nozzle_ip));
	strncpy(ip->ipaddr, ipaddr, IPADDR_CHAR_MAX);
	strncpy(ip->prefix, prefix, PREFIX_CHAR_MAX);
	if (!strchr(ip->ipaddr, ':')) {
	ip->domain = AF_INET;
	} else {
	ip->domain = AF_INET6;
	}

	/*
	* if user asks for an IPv6 address, but MTU < 1280
	* store the IP and bring it up later if and when MTU > 1280
	*/
	if ((ip->domain == AF_INET6) && (_get_mtu(nozzle) < 1280)) {
	err = 0;
	} else {
	if (nozzle->ip) {
	secondary = 1;
	}
	err = _set_ip(nozzle, "add", ipaddr, prefix, error_string, secondary);
	savederrno = errno;
	}

	if (err) {
	free(ip);
	goto out_clean;
	}

	if (nozzle->ip) {
	ip_last = nozzle->ip;
	while (ip_last->next != NULL) {
	ip_last = ip_last->next;
	}
	ip_last->next = ip;
	} else {
	nozzle->ip = ip;
	}

	out_clean:
	pthread_mutex_unlock(&config_mutex);
	errno = savederrno;
	return err;
	}

	int nozzle_del_ip(nozzle_t nozzle, const char ipaddr, const char prefix, char **error_string)
	{
	int err = 0, savederrno = 0;
	int found = 0;
	struct nozzle_ip ip = NULL, ip_prev = NULL;

	if ((!nozzle) \|\| (!ipaddr) \|\| (!prefix) \|\| (!error_string)) {
	errno = EINVAL;
	return -1;
	}

	savederrno = pthread_mutex_lock(&config_mutex);
	if (savederrno) {
	errno = savederrno;
	return -1;
	}

	if (!_check(nozzle)) {
	errno = EINVAL;
	err = -1;
	goto out_clean;
	}

	found = _find_ip(nozzle, ipaddr, prefix, &ip, &ip_prev);
	if (!found) {
	goto out_clean;
	}

	err = _set_ip(nozzle, "del", ipaddr, prefix, error_string, 0);
	savederrno = errno;
	if (!err) {
	if (ip == ip_prev) {
	nozzle->ip = ip->next;
	} else {
	ip_prev->next = ip->next;
	}
	free(ip);
	}

	out_clean:
	pthread_mutex_unlock(&config_mutex);
	errno = savederrno;
	return err;
	}

	int nozzle_get_ips(const nozzle_t nozzle, char *ipaddr_list, int entries)
	{
	int err = 0, savederrno = 0;
	int found = 0;
	char *ip_list = NULL;
	int size = 0, offset = 0, len;
	struct nozzle_ip *ip = NULL;

	if ((!nozzle) \|\| (!ipaddr_list) \|\| (!entries)) {
	errno = EINVAL;
	return -1;
	}

	savederrno = pthread_mutex_lock(&config_mutex);
	if (savederrno) {
	errno = savederrno;
	return -1;
	}

	if (!_check(nozzle)) {
	errno = EINVAL;
	goto out_clean;
	}

	ip = nozzle->ip;

	while (ip) {
	found++;
	ip = ip->next;
	}

	if (!found) {
	*ipaddr_list = NULL;
	*entries = 0;
	goto out_clean;
	}

	size = found * (IPADDR_CHAR_MAX + PREFIX_CHAR_MAX + 2);

	ip_list = malloc(size);
	if (!ip_list) {
	savederrno = errno;
	err = -1;
	goto out_clean;
	}

	memset(ip_list, 0, size);

	ip = nozzle->ip;

	while (ip) {
	len = strlen(ip->ipaddr);
	memmove(ip_list + offset, ip->ipaddr, len);
	offset = offset + len + 1;
	len = strlen(ip->prefix);
	memmove(ip_list + offset, ip->prefix, len);
	offset = offset + len + 1;
	ip = ip->next;
	}

	*ipaddr_list = ip_list;
	*entries = found;

	out_clean:
	pthread_mutex_unlock(&config_mutex);
	errno = savederrno;
	return err;
	}
	#endif
	diff --git a/libnozzle/internals.h b/libnozzle/internals.h
	index 6a940ee9..f6c25a92 100644
	--- a/libnozzle/internals.h
	+++ b/libnozzle/internals.h
	@@ -1,72 +1,71 @@
	/*
	* Copyright (C) 2010-2017 Red Hat, Inc. All rights reserved.
	*
	* Author: Fabio M. Di Nitto <fabbione@kronosnet.org>
	*
	* This software licensed under GPL-2.0+, LGPL-2.0+
	*/

	#ifndef __NOZZLE_INTERNALS_H__
	#define __NOZZLE_INTERNALS_H__

	#include "config.h"
	#include <net/if.h>

	struct nozzle_lib_config {
	struct nozzle_iface *head;
	int ioctlfd;
	};

	#define IPADDR_CHAR_MAX 128
	#define PREFIX_CHAR_MAX 4

	struct nozzle_ip {
	char ipaddr[IPADDR_CHAR_MAX];
	char prefix[PREFIX_CHAR_MAX];
	int domain; /* AF_INET or AF_INET6 */
	struct nozzle_ip *next;
	};

	#define MACADDR_CHAR_MAX 18

	/*
	* 11 = post-down.d
	* 1 = /
	*/
	#define UPDOWN_PATH_MAX PATH_MAX - 11 - 1 - IFNAMSIZ

	struct nozzle_iface {
	char name[IFNAMSIZ]; /* interface name */
	int fd; /* interface fd */
	int up; /* interface status 0 is down, 1 is up */
	/*
	* extra data
	*/
	struct nozzle_ip ip; / configured ip addresses */

	/*
	* default MAC address assigned by the kernel at creation time
	*/
	char default_mac[MACADDR_CHAR_MAX];

	int default_mtu; /* MTU assigned by the kernel at creation time */
	int current_mtu; /* MTU configured by libnozzle user */

	int hasupdown; /* interface has up/down path to scripts configured */
	char updownpath[UPDOWN_PATH_MAX]; /* path to up/down scripts if configured */

	struct nozzle_iface *next;
	};

	#define ifname ifr.ifr_name

	int execute_bin_sh_command(const char command, char *error_string);
	-int run_updown(const nozzle_t nozzle, const char action, char *error_string);

	int find_ip(nozzle_t nozzle,
	const char ipaddr, const char prefix,
	struct nozzle_ip ip, struct nozzle_ip ip_prev);

	char generate_v4_broadcast(const char ipaddr, const char *prefix);

	#endif
	diff --git a/libnozzle/libnozzle.c b/libnozzle/libnozzle.c
	index 30b5d4ce..948e8363 100644
	--- a/libnozzle/libnozzle.c
	+++ b/libnozzle/libnozzle.c
	@@ -1,1093 +1,1153 @@
	/*
	* Copyright (C) 2010-2018 Red Hat, Inc. All rights reserved.
	*
	* Author: Fabio M. Di Nitto <fabbione@kronosnet.org>
	*
	* This software licensed under GPL-2.0+, LGPL-2.0+
	*/

	#include "config.h"

	#include <errno.h>
	#include <stdlib.h>
	#include <string.h>
	#include <sys/types.h>
	#include <sys/stat.h>
	#include <sys/socket.h>
	#include <sys/wait.h>
	#include <fcntl.h>
	#include <unistd.h>
	#include <sys/ioctl.h>
	#include <net/ethernet.h>
	#include <pthread.h>
	#include <limits.h>
	#include <stdio.h>
	#include <net/if.h>
	#include <ifaddrs.h>
	#include <stdint.h>

	#ifdef KNET_LINUX
	#include <linux/if_tun.h>
	#include <netinet/ether.h>
	#endif
	#ifdef KNET_BSD
	#include <net/if_dl.h>
	#endif

	#include "libnozzle.h"
	#include "internals.h"

	/*
	* internal functions are all _unlocked_
	* locking should be handled at external API functions
	*/
	static int lib_init = 0;
	static struct nozzle_lib_config lib_cfg;
	static pthread_mutex_t config_mutex = PTHREAD_MUTEX_INITIALIZER;

	/*
	* internal helpers
	*/

	static void _close(nozzle_t nozzle)
	{
	#ifdef KNET_BSD
	struct ifreq ifr;
	#endif

	if (!nozzle)
	return;

	if (nozzle->fd)
	close(nozzle->fd);

	#ifdef KNET_BSD
	memset(&ifr, 0, sizeof(struct ifreq));
	strncpy(ifname, nozzle->name, IFNAMSIZ);

	ioctl(lib_cfg.ioctlfd, SIOCIFDESTROY, &ifr);
	#endif

	free(nozzle);

	return;
	}

	static void _close_cfg(void)
	{
	if (lib_cfg.head == NULL) {
	close(lib_cfg.ioctlfd);
	lib_init = 0;
	}
	}

	static int _set_down(nozzle_t nozzle, char error_down, char error_postdown)
	{
	int err = 0, savederrno = 0;
	struct ifreq ifr;

	if (!nozzle->up) {
	goto out_clean;
	}

	memset(&ifr, 0, sizeof(struct ifreq));
	strncpy(ifname, nozzle->name, IFNAMSIZ);

	err = ioctl(lib_cfg.ioctlfd, SIOCGIFFLAGS, &ifr);
	if (err) {
	savederrno = errno;
	goto out_clean;
	}

	- run_updown(nozzle, "down.d", error_down);
	-
	ifr.ifr_flags &= ~IFF_UP;

	err = ioctl(lib_cfg.ioctlfd, SIOCSIFFLAGS, &ifr);
	if (err) {
	savederrno = errno;
	goto out_clean;
	}

	- run_updown(nozzle, "post-down.d", error_postdown);
	-
	nozzle->up = 0;

	out_clean:
	errno = savederrno;
	return err;
	}

	static int _set_ip(nozzle_t nozzle, const char *command,
	const char ipaddr, const char prefix,
	char **error_string, int secondary)
	{
	char *broadcast = NULL;
	char cmdline[4096];
	#ifdef KNET_BSD
	char proto[6];
	int v4 = 1;

	snprintf(proto, sizeof(proto), "inet");
	#endif

	if (!strchr(ipaddr, ':')) {
	broadcast = generate_v4_broadcast(ipaddr, prefix);
	if (!broadcast) {
	errno = EINVAL;
	return -1;
	}
	}
	#ifdef KNET_BSD
	else {
	v4 = 0;
	snprintf(proto, sizeof(proto), "inet6");
	}
	#endif

	memset(cmdline, 0, sizeof(cmdline));

	#ifdef KNET_LINUX
	if (broadcast) {
	snprintf(cmdline, sizeof(cmdline)-1,
	"ip addr %s %s/%s dev %s broadcast %s",
	command, ipaddr, prefix,
	nozzle->name, broadcast);
	} else {
	snprintf(cmdline, sizeof(cmdline)-1,
	"ip addr %s %s/%s dev %s",
	command, ipaddr, prefix,
	nozzle->name);
	}
	#endif
	#ifdef KNET_BSD
	if (!strcmp(command, "add")) {
	snprintf(cmdline, sizeof(cmdline)-1,
	"ifconfig %s %s %s/%s",
	nozzle->name, proto, ipaddr, prefix);
	if (broadcast) {
	snprintf(cmdline + strlen(cmdline),
	sizeof(cmdline) - strlen(cmdline) -1,
	" broadcast %s", broadcast);
	}
	if ((secondary) && (v4)) {
	snprintf(cmdline + strlen(cmdline),
	sizeof(cmdline) - strlen(cmdline) -1,
	" alias");
	}
	} else {
	snprintf(cmdline, sizeof(cmdline)-1,
	"ifconfig %s %s %s/%s delete",
	nozzle->name, proto, ipaddr, prefix);
	}
	#endif
	if (broadcast) {
	free(broadcast);
	}
	return execute_bin_sh_command(cmdline, error_string);
	}

	/*
	* internal helpers below should be completed
	*
	* keep all ioctl work within this file
	*/

	static int is_valid_nozzle(const nozzle_t nozzle)
	{
	nozzle_t temp;

	if (!nozzle) {
	return 0;
	}

	if (!lib_init) {
	return 0;
	}

	temp = lib_cfg.head;

	while (temp != NULL) {
	if (nozzle == temp)
	return 1;

	temp = temp->next;
	}

	return 0;
	}

	static int get_iface_mtu(const nozzle_t nozzle)
	{
	int err = 0, savederrno = 0;
	struct ifreq ifr;

	memset(&ifr, 0, sizeof(struct ifreq));
	strncpy(ifname, nozzle->name, IFNAMSIZ);

	err = ioctl(lib_cfg.ioctlfd, SIOCGIFMTU, &ifr);
	if (err) {
	savederrno = errno;
	goto out_clean;
	}

	err = ifr.ifr_mtu;

	out_clean:
	errno = savederrno;
	return err;
	}

	static int get_iface_mac(const nozzle_t nozzle, char **ether_addr)
	{
	int err = 0, savederrno = 0;
	struct ifreq ifr;
	char mac[MACADDR_CHAR_MAX];
	#ifdef KNET_BSD
	struct ifaddrs *ifap = NULL;
	struct ifaddrs *ifa;
	int found = 0;
	#endif

	memset(&mac, 0, MACADDR_CHAR_MAX);
	memset(&ifr, 0, sizeof(struct ifreq));
	strncpy(ifname, nozzle->name, IFNAMSIZ);

	#ifdef KNET_LINUX
	err = ioctl(lib_cfg.ioctlfd, SIOCGIFHWADDR, &ifr);
	if (err) {
	savederrno = errno;
	goto out_clean;
	}

	ether_ntoa_r((struct ether_addr *)ifr.ifr_hwaddr.sa_data, mac);
	#endif
	#ifdef KNET_BSD
	/*
	* there is no ioctl to get the ether address of an interface on FreeBSD
	* (not to be confused with hwaddr). Use workaround described here:
	* https://lists.freebsd.org/pipermail/freebsd-hackers/2004-June/007394.html
	*/
	err = getifaddrs(&ifap);
	if (err < 0) {
	savederrno = errno;
	goto out_clean;
	}

	ifa = ifap;

	while (ifa) {
	if (!strncmp(nozzle->name, ifa->ifa_name, IFNAMSIZ)) {
	found = 1;
	break;
	}
	ifa=ifa->ifa_next;
	}

	if (found) {
	ether_ntoa_r((struct ether_addr )LLADDR((struct sockaddr_dl )ifa->ifa_addr), mac);
	} else {
	errno = EINVAL;
	err = -1;
	}

	freeifaddrs(ifap);

	if (err) {
	goto out_clean;
	}

	#endif
	*ether_addr = strdup(mac);
	if (!*ether_addr) {
	savederrno = errno;
	err = -1;
	}

	out_clean:
	errno = savederrno;
	return err;
	}

	/*
	* public API
	*/

	nozzle_t nozzle_open(char devname, size_t devname_size, const char updownpath)
	{
	int savederrno = 0;
	nozzle_t nozzle = NULL;
	char *temp_mac = NULL;
	#ifdef KNET_LINUX
	struct ifreq ifr;
	#endif
	#ifdef KNET_BSD
	uint16_t i;
	long int nozzlenum = 0;
	char curnozzle[IFNAMSIZ];
	#endif

	if (devname == NULL) {
	errno = EINVAL;
	return NULL;
	}

	if (devname_size < IFNAMSIZ) {
	errno = EINVAL;
	return NULL;
	}

	if (strlen(devname) > IFNAMSIZ) {
	errno = E2BIG;
	return NULL;
	}

	#ifdef KNET_BSD
	/*
	* BSD does not support named devices like Linux
	* but it is possible to force a nozzleX device number
	* where X is 0 to 255.
	*/
	if (strlen(devname)) {
	if (strncmp(devname, "tap", 3)) {
	errno = EINVAL;
	return NULL;
	}
	errno = 0;
	nozzlenum = strtol(devname+3, NULL, 10);
	if (errno) {
	errno = EINVAL;
	return NULL;
	}
	if ((nozzlenum < 0) \|\| (nozzlenum > 255)) {
	errno = EINVAL;
	return NULL;
	}
	}
	#endif

	if (updownpath) {
	/* only absolute paths */
	if (updownpath[0] != '/') {
	errno = EINVAL;
	return NULL;
	}
	if (strlen(updownpath) >= UPDOWN_PATH_MAX) {
	errno = E2BIG;
	return NULL;
	}
	}

	savederrno = pthread_mutex_lock(&config_mutex);
	if (savederrno) {
	errno = savederrno;
	return NULL;
	}

	if (!lib_init) {
	lib_cfg.head = NULL;
	#ifdef KNET_LINUX
	lib_cfg.ioctlfd = socket(AF_INET, SOCK_STREAM, 0);
	#endif
	#ifdef KNET_BSD
	lib_cfg.ioctlfd = socket(AF_LOCAL, SOCK_DGRAM, 0);
	#endif
	if (lib_cfg.ioctlfd < 0) {
	savederrno = errno;
	goto out_error;
	}
	lib_init = 1;
	}

	nozzle = malloc(sizeof(struct nozzle_iface));
	if (!nozzle) {
	savederrno = ENOMEM;
	goto out_error;
	}

	memset(nozzle, 0, sizeof(struct nozzle_iface));

	#ifdef KNET_BSD
	if (!strlen(devname)) {
	for (i = 0; i < 256; i++) {
	snprintf(curnozzle, sizeof(curnozzle) - 1, "/dev/tap%u", i);
	nozzle->fd = open(curnozzle, O_RDWR);
	savederrno = errno;
	if (nozzle->fd > 0) {
	break;
	}
	}
	snprintf(curnozzle, sizeof(curnozzle) -1 , "tap%u", i);
	} else {
	snprintf(curnozzle, sizeof(curnozzle) - 1, "/dev/%s", devname);
	nozzle->fd = open(curnozzle, O_RDWR);
	savederrno = errno;
	snprintf(curnozzle, sizeof(curnozzle) - 1, "%s", devname);
	}
	if (nozzle->fd < 0) {
	errno = EBUSY;
	goto out_error;
	}
	strncpy(devname, curnozzle, IFNAMSIZ);
	strncpy(nozzle->name, curnozzle, IFNAMSIZ);
	#endif

	#ifdef KNET_LINUX
	if ((nozzle->fd = open("/dev/net/tun", O_RDWR)) < 0) {
	savederrno = errno;
	goto out_error;
	}

	memset(&ifr, 0, sizeof(struct ifreq));
	strncpy(ifname, devname, IFNAMSIZ);
	ifr.ifr_flags = IFF_TAP \| IFF_NO_PI;

	if (ioctl(nozzle->fd, TUNSETIFF, &ifr) < 0) {
	savederrno = errno;
	goto out_error;
	}

	if ((strlen(devname) > 0) && (strcmp(devname, ifname) != 0)) {
	errno = EBUSY;
	goto out_error;
	}

	strncpy(devname, ifname, IFNAMSIZ);
	strncpy(nozzle->name, ifname, IFNAMSIZ);
	#endif

	nozzle->default_mtu = get_iface_mtu(nozzle);
	if (nozzle->default_mtu < 0) {
	savederrno = errno;
	goto out_error;
	}

	if (get_iface_mac(nozzle, &temp_mac) < 0) {
	savederrno = errno;
	goto out_error;
	}

	strncpy(nozzle->default_mac, temp_mac, 18);
	free(temp_mac);

	if (updownpath) {
	int len = strlen(updownpath);

	strcpy(nozzle->updownpath, updownpath);
	if (nozzle->updownpath[len-1] != '/') {
	nozzle->updownpath[len] = '/';
	}
	nozzle->hasupdown = 1;
	}

	nozzle->next = lib_cfg.head;
	lib_cfg.head = nozzle;

	pthread_mutex_unlock(&config_mutex);
	errno = savederrno;
	return nozzle;

	out_error:
	_close(nozzle);
	_close_cfg();
	pthread_mutex_unlock(&config_mutex);
	errno = savederrno;
	return NULL;
	}

	int nozzle_close(nozzle_t nozzle, char error_down, char error_postdown)
	{
	int err = 0, savederrno = 0;
	nozzle_t temp = lib_cfg.head;
	nozzle_t prev = lib_cfg.head;
	struct nozzle_ip ip, ip_next;
	char *error_string = NULL;

	savederrno = pthread_mutex_lock(&config_mutex);
	if (savederrno) {
	errno = savederrno;
	return -1;
	}

	if (!is_valid_nozzle(nozzle)) {
	savederrno = EINVAL;
	err = -1;
	goto out_clean;
	}

	while ((temp) && (temp != nozzle)) {
	prev = temp;
	temp = temp->next;
	}

	if (nozzle == prev) {
	lib_cfg.head = nozzle->next;
	} else {
	prev->next = nozzle->next;
	}

	_set_down(nozzle, error_down, error_postdown);

	ip = nozzle->ip;
	while (ip) {
	ip_next = ip->next;
	_set_ip(nozzle, "del", ip->ipaddr, ip->prefix, &error_string, 0);
	if (error_string) {
	free(error_string);
	error_string = NULL;
	}
	free(ip);
	ip = ip_next;
	}

	_close(nozzle);
	_close_cfg();

	out_clean:
	pthread_mutex_unlock(&config_mutex);
	errno = savederrno;
	return err;
	}

	int nozzle_set_mtu(nozzle_t nozzle, const int mtu, char **error_string)
	{
	int err = 0, savederrno = 0;
	struct nozzle_ip *tmp_ip;
	struct ifreq ifr;

	if ((!mtu) \|\| (!error_string)) {
	errno = EINVAL;
	return -1;
	}

	savederrno = pthread_mutex_lock(&config_mutex);
	if (savederrno) {
	errno = savederrno;
	return -1;
	}

	if (!is_valid_nozzle(nozzle)) {
	savederrno = EINVAL;
	err = -1;
	goto out_clean;
	}

	err = nozzle->current_mtu = get_iface_mtu(nozzle);
	if (err < 0) {
	savederrno = errno;
	goto out_clean;
	}

	memset(&ifr, 0, sizeof(struct ifreq));
	strncpy(ifname, nozzle->name, IFNAMSIZ);
	ifr.ifr_mtu = mtu;

	err = ioctl(lib_cfg.ioctlfd, SIOCSIFMTU, &ifr);
	if (err) {
	savederrno = errno;
	goto out_clean;
	}

	if ((nozzle->current_mtu < 1280) && (mtu >= 1280)) {
	tmp_ip = nozzle->ip;
	while(tmp_ip) {
	if (tmp_ip->domain == AF_INET6) {
	err = _set_ip(nozzle, "add", tmp_ip->ipaddr, tmp_ip->prefix, error_string, 0);
	if (err) {
	savederrno = errno;
	err = -1;
	goto out_clean;
	}
	}
	tmp_ip = tmp_ip->next;
	}
	}

	out_clean:
	pthread_mutex_unlock(&config_mutex);
	errno = savederrno;
	return err;
	}

	int nozzle_reset_mtu(nozzle_t nozzle, char **error_string)
	{
	return nozzle_set_mtu(nozzle, nozzle->default_mtu, error_string);
	}

	int nozzle_set_up(nozzle_t nozzle, char error_preup, char error_up)
	{
	int err = 0, savederrno = 0;
	struct ifreq ifr;

	savederrno = pthread_mutex_lock(&config_mutex);
	if (savederrno) {
	errno = savederrno;
	return -1;
	}

	if (!is_valid_nozzle(nozzle)) {
	savederrno = EINVAL;
	err = -1;
	goto out_clean;
	}

	if ((nozzle->hasupdown) && ((!error_preup) \|\| (!error_up))) {
	savederrno = EINVAL;
	err = -1;
	goto out_clean;
	}

	if (nozzle->up) {
	goto out_clean;
	}

	memset(&ifr, 0, sizeof(struct ifreq));
	strncpy(ifname, nozzle->name, IFNAMSIZ);

	err = ioctl(lib_cfg.ioctlfd, SIOCGIFFLAGS, &ifr);
	if (err) {
	savederrno = errno;
	goto out_clean;
	}

	- run_updown(nozzle, "pre-up.d", error_preup);
	-
	ifr.ifr_flags \|= IFF_UP \| IFF_RUNNING;
	err = ioctl(lib_cfg.ioctlfd, SIOCSIFFLAGS, &ifr);
	if (err) {
	savederrno = errno;
	goto out_clean;
	}

	- run_updown(nozzle, "up.d", error_up);
	-
	nozzle->up = 1;

	out_clean:
	pthread_mutex_unlock(&config_mutex);
	errno = savederrno;
	return err;
	}

	int nozzle_set_down(nozzle_t nozzle, char error_down, char error_postdown)
	{
	int err = 0, savederrno = 0;

	savederrno = pthread_mutex_lock(&config_mutex);
	if (savederrno) {
	errno = savederrno;
	return -1;
	}

	if (!is_valid_nozzle(nozzle)) {
	savederrno = EINVAL;
	err = -1;
	goto out_clean;
	}

	if ((nozzle->hasupdown) && ((!error_down) \|\| (!error_postdown))) {
	savederrno = EINVAL;
	err = -1;
	goto out_clean;
	}

	err = _set_down(nozzle, error_down, error_postdown);
	savederrno = errno;

	out_clean:
	pthread_mutex_unlock(&config_mutex);
	errno = savederrno;
	return err;
	}

	int nozzle_add_ip(nozzle_t nozzle, const char ipaddr, const char prefix, char **error_string)
	{
	int err = 0, savederrno = 0;
	int found = 0;
	struct nozzle_ip ip = NULL, ip_prev = NULL, *ip_last = NULL;
	int secondary = 0;

	if ((!ipaddr) \|\| (!prefix) \|\| (!error_string)) {
	errno = EINVAL;
	return -1;
	}

	savederrno = pthread_mutex_lock(&config_mutex);
	if (savederrno) {
	errno = savederrno;
	return -1;
	}

	if (!is_valid_nozzle(nozzle)) {
	savederrno = EINVAL;
	err = -1;
	goto out_clean;
	}

	found = find_ip(nozzle, ipaddr, prefix, &ip, &ip_prev);
	if (found) {
	goto out_clean;
	}

	ip = malloc(sizeof(struct nozzle_ip));
	if (!ip) {
	savederrno = errno;
	err = -1 ;
	goto out_clean;
	}

	memset(ip, 0, sizeof(struct nozzle_ip));
	strncpy(ip->ipaddr, ipaddr, IPADDR_CHAR_MAX);
	strncpy(ip->prefix, prefix, PREFIX_CHAR_MAX);
	if (!strchr(ip->ipaddr, ':')) {
	ip->domain = AF_INET;
	} else {
	ip->domain = AF_INET6;
	}

	/*
	* if user asks for an IPv6 address, but MTU < 1280
	* store the IP and bring it up later if and when MTU > 1280
	*/
	if ((ip->domain == AF_INET6) && (get_iface_mtu(nozzle) < 1280)) {
	err = 0;
	} else {
	if (nozzle->ip) {
	secondary = 1;
	}
	err = _set_ip(nozzle, "add", ipaddr, prefix, error_string, secondary);
	savederrno = errno;
	}

	if (err) {
	free(ip);
	goto out_clean;
	}

	if (nozzle->ip) {
	ip_last = nozzle->ip;
	while (ip_last->next != NULL) {
	ip_last = ip_last->next;
	}
	ip_last->next = ip;
	} else {
	nozzle->ip = ip;
	}

	out_clean:
	pthread_mutex_unlock(&config_mutex);
	errno = savederrno;
	return err;
	}

	int nozzle_del_ip(nozzle_t nozzle, const char ipaddr, const char prefix, char **error_string)
	{
	int err = 0, savederrno = 0;
	int found = 0;
	struct nozzle_ip ip = NULL, ip_prev = NULL;

	if ((!ipaddr) \|\| (!prefix) \|\| (!error_string)) {
	errno = EINVAL;
	return -1;
	}

	savederrno = pthread_mutex_lock(&config_mutex);
	if (savederrno) {
	errno = savederrno;
	return -1;
	}

	if (!is_valid_nozzle(nozzle)) {
	savederrno = EINVAL;
	err = -1;
	goto out_clean;
	}

	found = find_ip(nozzle, ipaddr, prefix, &ip, &ip_prev);
	if (!found) {
	goto out_clean;
	}

	err = _set_ip(nozzle, "del", ipaddr, prefix, error_string, 0);
	savederrno = errno;
	if (!err) {
	if (ip == ip_prev) {
	nozzle->ip = ip->next;
	} else {
	ip_prev->next = ip->next;
	}
	free(ip);
	}

	out_clean:
	pthread_mutex_unlock(&config_mutex);
	errno = savederrno;
	return err;
	}

	int nozzle_get_ips(const nozzle_t nozzle, char *ipaddr_list, int entries)
	{
	int err = 0, savederrno = 0;
	int found = 0;
	char *ip_list = NULL;
	int size = 0, offset = 0, len;
	struct nozzle_ip *ip = NULL;

	if ((!ipaddr_list) \|\| (!entries)) {
	errno = EINVAL;
	return -1;
	}

	savederrno = pthread_mutex_lock(&config_mutex);
	if (savederrno) {
	errno = savederrno;
	return -1;
	}

	if (!is_valid_nozzle(nozzle)) {
	savederrno = EINVAL;
	goto out_clean;
	}

	ip = nozzle->ip;

	while (ip) {
	found++;
	ip = ip->next;
	}

	if (!found) {
	*ipaddr_list = NULL;
	*entries = 0;
	goto out_clean;
	}

	size = found * (IPADDR_CHAR_MAX + PREFIX_CHAR_MAX + 2);

	ip_list = malloc(size);
	if (!ip_list) {
	savederrno = errno;
	err = -1;
	goto out_clean;
	}

	memset(ip_list, 0, size);

	ip = nozzle->ip;

	while (ip) {
	len = strlen(ip->ipaddr);
	memmove(ip_list + offset, ip->ipaddr, len);
	offset = offset + len + 1;
	len = strlen(ip->prefix);
	memmove(ip_list + offset, ip->prefix, len);
	offset = offset + len + 1;
	ip = ip->next;
	}

	*ipaddr_list = ip_list;
	*entries = found;

	out_clean:
	pthread_mutex_unlock(&config_mutex);
	errno = savederrno;
	return err;
	}

	+int nozzle_run_updown(const nozzle_t nozzle, uint8_t action, char **exec_string)
	+{
	+ int err = 0, savederrno = 0;
	+ char command[PATH_MAX];
	+ const char *action_str = NULL;
	+ struct stat sb;
	+
	+ if (action > NOZZLE_POSTDOWN) {
	+ errno = EINVAL;
	+ return -1;
	+ }
	+
	+ if (!exec_string) {
	+ errno = EINVAL;
	+ return -1;
	+ }
	+
	+ savederrno = pthread_mutex_lock(&config_mutex);
	+ if (savederrno) {
	+ errno = savederrno;
	+ return -1;
	+ }
	+
	+ if (!is_valid_nozzle(nozzle)) {
	+ savederrno = EINVAL;
	+ err = -1;
	+ goto out_clean;
	+ }
	+
	+ if (!nozzle->hasupdown) {
	+ savederrno = EINVAL;
	+ err = -1;
	+ goto out_clean;
	+ }
	+
	+ switch(action) {
	+ case NOZZLE_PREUP:
	+ action_str = "pre-up.d";
	+ break;
	+ case NOZZLE_UP:
	+ action_str = "up.d";
	+ break;
	+ case NOZZLE_DOWN:
	+ action_str = "down.d";
	+ break;
	+ case NOZZLE_POSTDOWN:
	+ action_str = "post-down.d";
	+ break;
	+ }
	+
	+ memset(command, 0, PATH_MAX);
	+
	+ snprintf(command, PATH_MAX, "%s%s/%s", nozzle->updownpath, action_str, nozzle->name);
	+
	+ err = stat(command, &sb);
	+ if (err) {
	+ savederrno = errno;
	+ goto out_clean;
	+ }
	+
	+ err = execute_bin_sh_command(command, exec_string);
	+
	+out_clean:
	+ pthread_mutex_unlock(&config_mutex);
	+ errno = savederrno;
	+ return err;
	+}
	+
	/*
	* functions below should be completed
	*/

	int nozzle_get_mtu(const nozzle_t nozzle)
	{
	int err = 0, savederrno = 0;

	savederrno = pthread_mutex_lock(&config_mutex);
	if (savederrno) {
	errno = savederrno;
	return -1;
	}

	if (!is_valid_nozzle(nozzle)) {
	savederrno = EINVAL;
	err = -1;
	goto out_clean;
	}

	err = get_iface_mtu(nozzle);
	savederrno = errno;

	out_clean:
	pthread_mutex_unlock(&config_mutex);
	savederrno = errno;
	return err;
	}

	int nozzle_get_mac(const nozzle_t nozzle, char **ether_addr)
	{
	int err = 0, savederrno = 0;

	if (!ether_addr) {
	errno = EINVAL;
	return -1;
	}

	savederrno = pthread_mutex_lock(&config_mutex);
	if (savederrno) {
	errno = savederrno;
	return -1;
	}

	if (!is_valid_nozzle(nozzle)) {
	savederrno = EINVAL;
	err = -1;
	goto out_clean;
	}

	err = get_iface_mac(nozzle, ether_addr);

	out_clean:
	pthread_mutex_unlock(&config_mutex);
	errno = savederrno;
	return err;
	}

	int nozzle_set_mac(nozzle_t nozzle, const char *ether_addr)
	{
	int err = 0, savederrno = 0;
	struct ifreq ifr;

	if (!ether_addr) {
	errno = EINVAL;
	return -1;
	}

	savederrno = pthread_mutex_lock(&config_mutex);
	if (savederrno) {
	errno = savederrno;
	return -1;
	}

	if (!is_valid_nozzle(nozzle)) {
	savederrno = EINVAL;
	err = -1;
	goto out_clean;
	}

	memset(&ifr, 0, sizeof(struct ifreq));
	strncpy(ifname, nozzle->name, IFNAMSIZ);
	#ifdef KNET_LINUX
	err = ioctl(lib_cfg.ioctlfd, SIOCGIFHWADDR, &ifr);
	if (err) {
	savederrno = errno;
	goto out_clean;
	}

	memmove(ifr.ifr_hwaddr.sa_data, ether_aton(ether_addr), ETH_ALEN);

	err = ioctl(lib_cfg.ioctlfd, SIOCSIFHWADDR, &ifr);
	savederrno = errno;
	#endif
	#ifdef KNET_BSD
	err = ioctl(lib_cfg.ioctlfd, SIOCGIFADDR, &ifr);
	if (err) {
	savederrno = errno;
	goto out_clean;
	}

	memmove(ifr.ifr_addr.sa_data, ether_aton(ether_addr), ETHER_ADDR_LEN);
	ifr.ifr_addr.sa_len = ETHER_ADDR_LEN;

	err = ioctl(lib_cfg.ioctlfd, SIOCSIFLLADDR, &ifr);
	savederrno = errno;
	#endif
	out_clean:
	pthread_mutex_unlock(&config_mutex);
	errno = savederrno;
	return err;
	}

	int nozzle_reset_mac(nozzle_t nozzle)
	{
	return nozzle_set_mac(nozzle, nozzle->default_mac);
	}

	nozzle_t nozzle_get_handle_by_name(const char *devname)
	{
	int savederrno = 0;
	nozzle_t nozzle;

	if ((devname == NULL) \|\| (strlen(devname) > IFNAMSIZ)) {
	errno = EINVAL;
	return NULL;
	}

	savederrno = pthread_mutex_lock(&config_mutex);
	if (savederrno) {
	errno = savederrno;
	return NULL;
	}

	nozzle = lib_cfg.head;
	while (nozzle != NULL) {
	if (!strcmp(devname, nozzle->name))
	break;
	nozzle = nozzle->next;
	}

	if (!nozzle) {
	savederrno = ENOENT;
	}

	pthread_mutex_unlock(&config_mutex);
	errno = savederrno;
	return nozzle;
	}

	const char *nozzle_get_name_by_handle(const nozzle_t nozzle)
	{
	int savederrno = 0;
	char *name = NULL;

	savederrno = pthread_mutex_lock(&config_mutex);
	if (savederrno) {
	errno = savederrno;
	return NULL;
	}

	if (!is_valid_nozzle(nozzle)) {
	savederrno = ENOENT;
	goto out_clean;
	}

	name = nozzle->name;

	out_clean:
	pthread_mutex_unlock(&config_mutex);
	errno = savederrno;
	return name;
	}

	int nozzle_get_fd(const nozzle_t nozzle)
	{
	int fd = -1, savederrno = 0;

	savederrno = pthread_mutex_lock(&config_mutex);
	if (savederrno) {
	errno = savederrno;
	return -1;
	}

	if (!is_valid_nozzle(nozzle)) {
	savederrno = ENOENT;
	fd = -1;
	goto out_clean;
	}

	fd = nozzle->fd;

	out_clean:
	pthread_mutex_unlock(&config_mutex);
	errno = savederrno;
	return fd;
	}
	diff --git a/libnozzle/libnozzle.h b/libnozzle/libnozzle.h
	index dbbadf51..5d28154e 100644
	--- a/libnozzle/libnozzle.h
	+++ b/libnozzle/libnozzle.h
	@@ -1,332 +1,357 @@
	/*
	* Copyright (C) 2010-2018 Red Hat, Inc. All rights reserved.
	*
	* Author: Fabio M. Di Nitto <fabbione@kronosnet.org>
	*
	* This software licensed under GPL-2.0+, LGPL-2.0+
	*/

	#ifndef __LIBNOZZLE_H__
	#define __LIBNOZZLE_H__

	#include <sys/types.h>
	#include <net/if.h>

	/**
	*
	* @file libnozzle.h
	* @brief tap interfaces management API include file
	* @copyright Copyright (C) 2010-2017 Red Hat, Inc. All rights reserved.
	*
	* nozzle is a commodity library to manage tap (ethernet) interfaces
	*/

	typedef struct nozzle_iface *nozzle_t;

	/**
	* nozzle_open
	* @brief create a new tap device on the system.
	*
	* devname - pointer to device name of at least size IFNAMSIZ.
	* if the dev strlen is 0, then the system will assign a name automatically.
	* if a string is specified, the system will try to create a device with
	* the specified name.
	* NOTE: on FreeBSD the tap device names can only be tapX where X is a
	* number from 0 to 255. On Linux such limitation does not apply.
	* The name must be unique to the system. If an interface with the same
	* name is already configured on the system, an error will be returned.
	*
	* devname_size - length of the buffer provided in dev (has to be at least IFNAMSIZ).
	*
	* updownpath - nozzle supports the typical filesystem structure to execute
	* actions for: down.d post-down.d pre-up.d up.d
	* in the form of:
	* updownpath/<action>/<interface_name>
	* updownpath specifies where to find those directories on the
	* filesystem and it must be an absolute path.
	*
	* @return
	* nozzle_open returns
	* a pointer to a nozzle struct on success
	* NULL on error and errno is set.
	*/

	nozzle_t nozzle_open(char devname, size_t devname_size, const char updownpath);

	/**
	* nozzle_close
	* @brief deconfigure and destroy a nozzle device
	*
	* nozzle - pointer to the nozzle struct to destroy
	*
	* error_down - pointers to string to record errors from executing down.d
	* when configured. The string is malloc'ed, the caller needs to free those
	* buffers.
	*
	* error_postdown - pointers to string to record errors from executing post-down.d
	* when configured. The string is malloc'ed, the caller needs to free
	* those buffers.
	*
	* @return
	* 0 on success
	* -1 on error and errno is set.
	* error_down / error_postdown are set to NULL if execution of external scripts
	* is sucessful
	* error_down / error_postdown will contain strings recording the execution error.
	*/

	int nozzle_close(nozzle_t nozzle, char error_down, char error_postdown);

	+
	+#define NOZZLE_PREUP 0
	+#define NOZZLE_UP 1
	+#define NOZZLE_DOWN 2
	+#define NOZZLE_POSTDOWN 3
	+
	+/**
	+ * nozzle_run_updown
	+ * @brief execute updown commands associated with a nozzle device
	+ *
	+ * nozzle - pointer to the nozzle struct
	+ *
	+ * action - pre-up.d / up.d / down.d / post-down.d (see defines above)
	+ *
	+ * exec_string - pointers to string to record executing action stdout/stderr.
	+ * The string is malloc'ed, the caller needs to free the buffer.
	+ * If the script generates no output this string might be NULL.
	+ *
	+ * @return
	+ * 0 on success
	+ * -1 on error and errno is set.
	+ */
	+
	+int nozzle_run_updown(const nozzle_t nozzle, uint8_t action, char **exec_string);
	+
	/**
	* nozzle_set_up
	* @brief equivalent of ifconfig up, executes pre-up.d up.d if configured
	*
	* nozzle - pointer to the nozzle struct
	*
	* error_preup - pointer to string pointer to record errors from executing pre-up.d
	* when configured. The string is malloc'ed, the caller needs to free that
	* buffer.
	*
	* error_up - pointer to string pointer to record errors from executing up.d
	* when configured. The string is malloc'ed, the caller needs to free that
	* buffer.
	*
	* @return
	* 0 on success
	* -1 on error and errno is set.
	* error_preup / error_up are set to NULL if execution of external scripts
	* is sucessful
	* error_preup / error_up will contain strings recording the execution error.
	*/

	int nozzle_set_up(nozzle_t nozzle, char error_preup, char error_up);

	/**
	* nozzle_set_down
	* @brief equivalent of ifconfig down, executes down.d post-down.d
	*
	* nozzle - pointer to the nozzle struct
	*
	* error_down - pointer to a string pointer to record errors from executing down.d
	* when configured. The string is malloc'ed, the caller needs to free that
	* buffer.
	*
	* error_postdown - pointer to a string pointer to record errors from executing post-down.d
	* when configured. The string is malloc'ed, the caller needs to free
	* that buffer.
	*
	* @return
	* 0 on success
	* -1 on error and errno is set.
	* error_down / error_postdown are set to NULL if execution of external scripts
	* is sucessful
	* error_down / error_postdown will contain strings recording the execution error.
	*/

	int nozzle_set_down(nozzle_t nozzle, char error_down, char error_postdown);

	/**
	* nozzle_add_ip
	* @brief equivalent of ip addr or ifconfig <ipaddress/prefix>
	*
	* nozzle - pointer to the nozzle struct
	*
	* ipaddr - string containing either an IPv4 or an IPv6 address.
	* Please note that Linux will automatically remove any IPv6 addresses from an interface
	* with MTU < 1280. libnozzle will cache those IPs and re-instate them when MTU is > 1280.
	* MTU must be set via nozzle_set_mtu for IPv6 to be re-instated.
	*
	* prefix - 24, 64 or any valid network prefix for the requested address.
	*
	* error_string - pointers to string to record errors from ipaddr2 (Linux) or ifconfig (BSD).
	* The string is malloc'ed, the caller needs to free this buffer.
	*
	* @return
	* 0 on success
	* -1 on error and errno is set.
	* error_string is set to NULL on success
	* error_string will contain a string recording the execution error.
	*/

	int nozzle_add_ip(nozzle_t nozzle, const char ipaddr, const char prefix, char **error_string);

	/**
	* nozzle_del_ip
	* @brief equivalent of ip addr del or ifconfig del <ipaddress/prefix>
	*
	* nozzle - pointer to the nozzle struct
	*
	* ipaddr - string containing either an IPv4 or an IPv6 address.
	*
	* prefix - 24, 64 or any valid network prefix for the requested address.
	*
	* error_string - pointers to string to record errors from ipaddr2 (Linux) or ifconfig (BSD).
	* The string is malloc'ed, the caller needs to free this buffer.
	*
	* @return
	* 0 on success
	* -1 on error and errno is set.
	* error_string is set to NULL on success
	* error_string will contain a string recording the execution error.
	*/

	int nozzle_del_ip(nozzle_t nozzle, const char ipaddr, const char prefix, char **error_string);

	/**
	* nozzle_get_ips
	* @brief retrive the list of all configured ips for a given interface
	*
	* TODO: change to use a ipaddr_list struct!
	*
	* nozzle - pointer to the nozzle struct
	*
	* ipaddr_list - list of strings containing either an IPv4 or an IPv6 address and their prefixes.
	*
	* entries - entries recorded.
	*
	* @return
	* 0 on success
	* -1 on error and errno is set.
	* ipaddr_list is a malloc'ed buffer that the user needs to parse and free after use. ipaddr_list can
	* be NULL if entries is 0.
	*
	*/

	int nozzle_get_ips(const nozzle_t nozzle, char *ipaddr_list, int entries);

	/**
	* nozzle_get_mtu
	* @brief retrive mtu on a given nozzle interface
	*
	* nozzle - pointer to the nozzle struct
	*
	* @return
	* MTU on success
	* -1 on error and errno is set.
	*/

	int nozzle_get_mtu(const nozzle_t nozzle);

	/**
	* nozzle_set_mtu
	* @brief set mtu on a given nozzle interface
	*
	* nozzle - pointer to the nozzle struct
	*
	* mtu - new MTU value
	*
	* error_string - pointer to string to record errors from ipaddr2 (Linux) or ifconfig (BSD)
	* when re-instanting IPv6 address if MTU is becoming again > 1280.
	* The string is malloc'ed, the caller needs to free this buffer.
	*
	* @return
	* 0 on success
	* -1 on error and errno is set.
	* error_string is set to NULL on success
	* error_string will contain a string recording the execution error.
	*/

	int nozzle_set_mtu(nozzle_t nozzle, const int mtu, char **error_string);

	/**
	* nozzle_reset_mtu
	* @brief reset mtu on a given nozzle interface to the system default
	*
	* nozzle - pointer to the nozzle struct
	*
	* error_string - pointer to string to record errors from ipaddr2 (Linux) or ifconfig (BSD)
	* when re-instanting IPv6 address if MTU is becoming again > 1280.
	* The string is malloc'ed, the caller needs to free this buffer.
	*
	* @return
	* 0 on success
	* -1 on error and errno is set.
	* error_string is set to NULL on success
	* error_string will contain a string recording the execution error.
	*/

	int nozzle_reset_mtu(nozzle_t nozzle, char **error_string);

	/**
	* nozzle_get_mac
	* @brief retrive mac address on a given nozzle interface
	*
	* nozzle - pointer to the nozzle struct
	*
	* ether_addr - pointers to string containing the current mac address.
	* The string is malloc'ed, the caller needs to free this buffer.
	* @return
	* 0 on success.
	* -1 on error and errno is set.
	*/

	int nozzle_get_mac(const nozzle_t nozzle, char **ether_addr);

	/**
	* nozzle_set_mac
	* @brief set mac address on a given nozzle interface
	*
	* nozzle - pointer to the nozzle struct
	*
	* ether_addr - pointers to string containing the new mac address.
	*
	* @return
	* 0 on success.
	* -1 on error and errno is set.
	*/

	int nozzle_set_mac(nozzle_t nozzle, const char *ether_addr);

	/**
	* nozzle_reset_mac
	* @brief reset mac address on a given nozzle interface to system default
	*
	* nozzle - pointer to the nozzle struct
	*
	* @return
	* 0 on success.
	* -1 on error and errno is set.
	*/

	int nozzle_reset_mac(nozzle_t nozzle);

	/**
	* nozzle_get_handle_by_name
	* @brief find a nozzle handle by device name
	*
	* devname - string containing the name of the interface
	*
	* @return
	* handle on success.
	* NULL on error and errno is set.
	*/

	nozzle_t nozzle_get_handle_by_name(const char *devname);

	/**
	* nozzle_get_name_by_handle
	* @brief retrive nozzle interface name by handle
	*
	* nozzle - pointer to the nozzle struct
	*
	* @return
	* pointer to the interface name
	* NULL on error and errno is set.
	*/

	const char *nozzle_get_name_by_handle(const nozzle_t nozzle);

	/**
	* nozzle_get_fd
	* @brief
	*
	* nozzle - pointer to the nozzle struct
	*
	* @return
	* fd associated to a given nozzle on success.
	* -1 on error and errno is set.
	*/

	int nozzle_get_fd(const nozzle_t nozzle);

	#endif

File Metadata

Mime Type: text/x-diff
Expires: Tue, Feb 25, 7:40 PM (1 d, 7 h)
Storage Engine: blob
Storage Format: Raw Data
Storage Handle: 1463938
Default Alt Text: (53 KB)

No OneTemporaryActions

View Options

File Metadata

Event Timeline

No OneTemporary
Actions