/*
 * netlink-events.c
 * This file is part of Network-inador
 *
 * Copyright (C) 2019, 2020 - Félix Arreola Rodríguez
 *
 * Network-inador is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * Network-inador is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with Network-inador; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin St, Fifth Floor, 
 * Boston, MA  02110-1301  USA
 */

#include <netlink/socket.h>
#include <netlink/msg.h>

#include <glib.h>

#include <linux/nl80211.h>

#include <fcntl.h>

#include "common.h"
#include "interfaces.h"
#include "ip-address.h"
#include "routes.h"

static int _netlink_events_route_dispatcher (struct nl_msg *msg, void *arg) {
	struct nlmsghdr *reply;
	
	reply = nlmsg_hdr (msg);
	
	switch (reply->nlmsg_type) {
		case RTM_NEWLINK:
			return interface_receive_message_newlink (msg, arg);
			break;
		case RTM_DELLINK:
			return interface_receive_message_dellink (msg, arg);
			break;
		case RTM_NEWADDR:
			return ip_address_receive_message_newaddr (msg, arg);
			break;
		case RTM_DELADDR:
			return ip_address_receive_message_deladdr (msg, arg);
			break;
		case RTM_NEWROUTE:
			return routes_receive_message_newroute (msg, arg);
			break;
		case RTM_DELROUTE:
			return routes_receive_message_delroute (msg, arg);
			break;
	}
	
	return NL_SKIP;
}

static gboolean _netlink_events_handle_read (GIOChannel *source, GIOCondition condition, gpointer data) {
	struct nl_sock *socket = (struct nl_sock *) data;
	
	nl_recvmsgs_default (socket);
	return TRUE;
}

void netlink_events_create_pair (NetlinkEventPair *pair, int family) {
	struct nl_sock * sock_req;
	int fd;
	GIOChannel *channel;
	
	if (pair == NULL) return;
	
	sock_req = nl_socket_alloc ();
	
	if (nl_connect (sock_req, family) != 0) {
		perror ("Falló conectar netlink socket para eventos\n");
		
		return;
	}
	
	nl_socket_set_nonblocking (sock_req);
	nl_socket_disable_seq_check (sock_req);
	
	fd = nl_socket_get_fd (sock_req);
	fcntl (fd, F_SETFD, 1);
	
	channel = g_io_channel_unix_new (fd);
	
	pair->source = g_io_add_watch (channel, G_IO_IN | G_IO_PRI | G_IO_ERR | G_IO_HUP, _netlink_events_handle_read, sock_req);
	pair->nl_sock = sock_req;
	g_io_channel_unref (channel);
}

void netlink_events_clear_pair (NetlinkEventPair *pair) {
	g_source_remove (pair->source);
	
	pair->source = 0;
	
	/* Cerrar el socket */
	nl_close (pair->nl_sock);
	pair->nl_sock = NULL;
}

void netlink_events_setup (NetworkInadorHandle *handle) {
	netlink_events_create_pair (&handle->route_events, NETLINK_ROUTE);
	
	nl_socket_add_memberships (handle->route_events.nl_sock, RTNLGRP_LINK, RTNLGRP_IPV4_IFADDR, RTNLGRP_IPV6_IFADDR, RTNLGRP_IPV6_IFINFO, RTNLGRP_IPV4_ROUTE, RTNLGRP_IPV6_ROUTE, 0);
	nl_socket_modify_cb (handle->route_events.nl_sock, NL_CB_VALID, NL_CB_CUSTOM, _netlink_events_route_dispatcher, handle);
}

void netlink_events_clear (NetworkInadorHandle *handle) {
	/* Primero, detener los eventos del source watch */
	netlink_events_clear_pair (&handle->route_events);
}