[mirror_frr.git] / zebra / if_ioctl_solaris.c

/*
 * Interface looking up by ioctl () on Solaris.
 * Copyright (C) 1997, 98 Kunihiro Ishiguro
 *
 * This file is part of GNU Zebra.
 *
 * GNU Zebra 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, or (at your option) any
 * later version.
 *
 * GNU Zebra 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 GNU Zebra; see the file COPYING.  If not, write to the Free
 * Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
 * 02111-1307, USA.  
 */

#include <zebra.h>

#include "if.h"
#include "sockunion.h"
#include "prefix.h"
#include "ioctl.h"
#include "connected.h"
#include "memory.h"
#include "log.h"
#include "privs.h"

#include "zebra/interface.h"

void lifreq_set_name (struct lifreq *, struct interface *);
static int if_get_addr (struct interface *, struct sockaddr *);
static void interface_info_ioctl (struct interface *);
extern struct zebra_privs_t zserv_privs;

int
interface_list_ioctl (int af)
{
  int ret;
  int sock;
#define IFNUM_BASE 32
  struct lifnum lifn;
  int ifnum;
  struct lifreq *lifreq;
  struct lifconf lifconf;
  struct interface *ifp;
  int n;
  size_t needed, lastneeded = 0;
  char *buf = NULL;

  if (zserv_privs.change(ZPRIVS_RAISE))
    zlog (NULL, LOG_ERR, "Can't raise privileges");
  
  sock = socket (af, SOCK_DGRAM, 0);
  if (sock < 0)
    {
      zlog_warn ("Can't make %s socket stream: %s",
                 (af == AF_INET ? "AF_INET" : "AF_INET6"), strerror (errno));
                 
      if (zserv_privs.change(ZPRIVS_LOWER))
        zlog (NULL, LOG_ERR, "Can't lower privileges");
        
      return -1;
    }

calculate_lifc_len:     /* must hold privileges to enter here */
  lifn.lifn_family = af;
  lifn.lifn_flags = 0;
  ret = ioctl (sock, SIOCGLIFNUM, &lifn);
  
  if (zserv_privs.change(ZPRIVS_LOWER))
    zlog (NULL, LOG_ERR, "Can't lower privileges");
 
  if (ret < 0)
    {
      zlog_warn ("interface_list_ioctl: SIOCGLIFNUM failed %s",
                 strerror (errno));
      close (sock);
      return -1;
    }
  ifnum = lifn.lifn_count;

  /*
   * When calculating the buffer size needed, add a small number
   * of interfaces to those we counted.  We do this to capture
   * the interface status of potential interfaces which may have
   * been plumbed between the SIOCGLIFNUM and the SIOCGLIFCONF.
   */
  needed = (ifnum + 4) * sizeof (struct lifreq);
  if (needed > lastneeded || needed < lastneeded / 2)
    {
      if (buf != NULL)
        XFREE (MTYPE_TMP, buf);
      if ((buf = XMALLOC (MTYPE_TMP, needed)) == NULL)
        {
          zlog_warn ("interface_list_ioctl: malloc failed");
          close (sock);
          return -1;
        }
    }
  lastneeded = needed;

  lifconf.lifc_family = af;
  lifconf.lifc_flags = 0;
  lifconf.lifc_len = needed;
  lifconf.lifc_buf = buf;

  if (zserv_privs.change(ZPRIVS_RAISE))
    zlog (NULL, LOG_ERR, "Can't raise privileges");
    
  ret = ioctl (sock, SIOCGLIFCONF, &lifconf);

  if (ret < 0)
    {
      if (errno == EINVAL)
        goto calculate_lifc_len; /* deliberately hold privileges */

      zlog_warn ("SIOCGLIFCONF: %s", strerror (errno));

      if (zserv_privs.change(ZPRIVS_LOWER))
        zlog (NULL, LOG_ERR, "Can't lower privileges");

      goto end;
    }

  if (zserv_privs.change(ZPRIVS_LOWER))
    zlog (NULL, LOG_ERR, "Can't lower privileges");
    
  /* Allocate interface. */
  lifreq = lifconf.lifc_req;

  for (n = 0; n < lifconf.lifc_len; n += sizeof (struct lifreq))
    {
      ifp = if_get_by_name (lifreq->lifr_name);

      if (lifreq->lifr_addr.ss_family == AF_INET)
        ifp->flags |= IFF_IPV4;

      if (lifreq->lifr_addr.ss_family == AF_INET6)
        {
#ifdef HAVE_IPV6
          ifp->flags |= IFF_IPV6;
#else
          lifreq++;
          continue;
#endif /* HAVE_IPV6 */
        }
        
      if_add_update (ifp);

      interface_info_ioctl (ifp);
      if_get_addr (ifp, (struct sockaddr *) &lifreq->lifr_addr);
      lifreq++;
    }

end:
  close (sock);
  XFREE (MTYPE_TMP, lifconf.lifc_buf);
  return ret;
}

/* Get interface's index by ioctl. */
int
if_get_index (struct interface *ifp)
{
  int ret;
  struct lifreq lifreq;

  lifreq_set_name (&lifreq, ifp);

  if (ifp->flags & IFF_IPV4)
    ret = AF_IOCTL (AF_INET, SIOCGLIFINDEX, (caddr_t) & lifreq);
  else if (ifp->flags & IFF_IPV6)
    ret = AF_IOCTL (AF_INET6, SIOCGLIFINDEX, (caddr_t) & lifreq);
  else
    ret = -1;

  if (ret < 0)
    {
      zlog_warn ("SIOCGLIFINDEX(%s) failed", ifp->name);
      return ret;
    }

  /* OK we got interface index. */
#ifdef ifr_ifindex
  ifp->ifindex = lifreq.lifr_ifindex;
#else
  ifp->ifindex = lifreq.lifr_index;
#endif
  return ifp->ifindex;

}


/* Interface address lookup by ioctl.  This function only looks up
   IPv4 address. */
#define ADDRLEN(sa) (((sa)->sa_family == AF_INET ?  \
                sizeof (struct sockaddr_in) : sizeof (struct sockaddr_in6)))

#define SIN(s) ((struct sockaddr_in *)(s))
#define SIN6(s) ((struct sockaddr_in6 *)(s))

static int
if_get_addr (struct interface *ifp, struct sockaddr *addr)
{
  int ret;
  struct lifreq lifreq;
  struct sockaddr_storage mask, dest;
  char *dest_pnt = NULL;
  u_char prefixlen = 0;
  afi_t af;

  /* Interface's name and address family. */
  strncpy (lifreq.lifr_name, ifp->name, IFNAMSIZ);

  /* Interface's address. */
  memcpy (&lifreq.lifr_addr, addr, ADDRLEN (addr));
  af = addr->sa_family;

  /* Point to point or broad cast address pointer init. */
  dest_pnt = NULL;

  if (ifp->flags & IFF_POINTOPOINT)
    {
      ret = AF_IOCTL (af, SIOCGLIFDSTADDR, (caddr_t) & lifreq);
        
      if (ret < 0)
        {
          zlog_warn ("SIOCGLIFDSTADDR (%s) fail: %s",
                     ifp->name, strerror (errno));
          return ret;
        }
      memcpy (&dest, &lifreq.lifr_dstaddr, ADDRLEN (addr));
      if (af == AF_INET)
        dest_pnt = (char *) &(SIN (&dest)->sin_addr);
      else
        dest_pnt = (char *) &(SIN6 (&dest)->sin6_addr);
    }

  if (af == AF_INET)
    {
      ret = if_ioctl (SIOCGLIFNETMASK, (caddr_t) & lifreq);
      
      if (ret < 0)
        {
          if (errno != EADDRNOTAVAIL)
            {
              zlog_warn ("SIOCGLIFNETMASK (%s) fail: %s", ifp->name,
                         strerror (errno));
              return ret;
            }
          return 0;
        }
      memcpy (&mask, &lifreq.lifr_addr, ADDRLEN (addr));

      prefixlen = ip_masklen (SIN (&mask)->sin_addr);
      if (ifp->flags & IFF_BROADCAST)
        {
          ret = if_ioctl (SIOCGLIFBRDADDR, (caddr_t) & lifreq);
          if (ret < 0)
            {
              if (errno != EADDRNOTAVAIL)
                {
                  zlog_warn ("SIOCGLIFBRDADDR (%s) fail: %s",
                             ifp->name, strerror (errno));
                  return ret;
                }
              return 0;
            }
          memcpy (&dest, &lifreq.lifr_broadaddr, sizeof (struct sockaddr_in));
          dest_pnt = (char *) &SIN (&dest)->sin_addr;
        }
    }
#ifdef HAVE_IPV6
  else if (af == AF_INET6)
    {
      if (ifp->flags & IFF_POINTOPOINT)
        {
          prefixlen = IPV6_MAX_BITLEN;
        }
      else
        {
          ret = if_ioctl_ipv6 (SIOCGLIFSUBNET, (caddr_t) & lifreq);
          if (ret < 0)
            {
              zlog_warn ("SIOCGLIFSUBNET (%s) fail: %s",
                         ifp->name, strerror (errno));
            }
          else
            {
              prefixlen = lifreq.lifr_addrlen;
            }
        }
    }
#endif /* HAVE_IPV6 */

  /* Set address to the interface. */
  if (af == AF_INET)
    connected_add_ipv4 (ifp, 0, &SIN (addr)->sin_addr, prefixlen,
                        (struct in_addr *) dest_pnt, NULL);
#ifdef HAVE_IPV6
  else if (af == AF_INET6)
    connected_add_ipv6 (ifp, &SIN6 (addr)->sin6_addr, prefixlen,
                        (struct in6_addr *) dest_pnt);
#endif /* HAVE_IPV6 */

  return 0;
}

/* Fetch interface information via ioctl(). */
static void
interface_info_ioctl (struct interface *ifp)
{
  if_get_index (ifp);
  if_get_flags (ifp);
  if_get_mtu (ifp);
  if_get_metric (ifp);
}

/* Lookup all interface information. */
void
interface_list ()
{
  interface_list_ioctl (AF_INET);
  interface_list_ioctl (AF_INET6);
}

struct connected *
if_lookup_linklocal (struct interface *ifp)
{
#ifdef HAVE_IPV6
  listnode node;
  struct connected *ifc;

  if (ifp == NULL)
    return NULL;

  for (node = listhead (ifp->connected); node; node = nextnode (node))
    {
      ifc = getdata (node);

      if ((ifc->address->family == AF_INET6) &&
          (IN6_IS_ADDR_LINKLOCAL (&ifc->address->u.prefix6)))
        return ifc;
    }
#endif /* HAVE_IPV6 */

  return NULL;
}
Commit	Line	Data
8842468c	1	/*
	2	* Interface looking up by ioctl () on Solaris.
	3	* Copyright (C) 1997, 98 Kunihiro Ishiguro
	4	*
	5	* This file is part of GNU Zebra.
	6	*
	7	* GNU Zebra is free software; you can redistribute it and/or modify it
	8	* under the terms of the GNU General Public License as published by the
	9	* Free Software Foundation; either version 2, or (at your option) any
	10	* later version.
	11	*
	12	* GNU Zebra is distributed in the hope that it will be useful, but
	13	* WITHOUT ANY WARRANTY; without even the implied warranty of
	14	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
	15	* General Public License for more details.
	16	*
	17	* You should have received a copy of the GNU General Public License
	18	* along with GNU Zebra; see the file COPYING. If not, write to the Free
	19	* Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
	20	* 02111-1307, USA.
	21	*/
	22
	23	#include <zebra.h>
	24
	25	#include "if.h"
	26	#include "sockunion.h"
	27	#include "prefix.h"
	28	#include "ioctl.h"
	29	#include "connected.h"
	30	#include "memory.h"
	31	#include "log.h"
48a46fa0	32	#include "privs.h"
8842468c	33
	34	#include "zebra/interface.h"
	35
	36	void lifreq_set_name (struct lifreq , struct interface );
	37	static int if_get_addr (struct interface , struct sockaddr );
	38	static void interface_info_ioctl (struct interface *);
48a46fa0	39	extern struct zebra_privs_t zserv_privs;
8842468c	40
	41	int
	42	interface_list_ioctl (int af)
	43	{
	44	int ret;
	45	int sock;
	46	#define IFNUM_BASE 32
	47	struct lifnum lifn;
	48	int ifnum;
	49	struct lifreq *lifreq;
	50	struct lifconf lifconf;
	51	struct interface *ifp;
	52	int n;
	53	size_t needed, lastneeded = 0;
	54	char *buf = NULL;
	55
	56	if (zserv_privs.change(ZPRIVS_RAISE))
	57	zlog (NULL, LOG_ERR, "Can't raise privileges");
	58
	59	sock = socket (af, SOCK_DGRAM, 0);
	60	if (sock < 0)
	61	{
	62	zlog_warn ("Can't make %s socket stream: %s",
	63	(af == AF_INET ? "AF_INET" : "AF_INET6"), strerror (errno));
	64
	65	if (zserv_privs.change(ZPRIVS_LOWER))
	66	zlog (NULL, LOG_ERR, "Can't lower privileges");
	67
	68	return -1;
	69	}
	70
	71	calculate_lifc_len: /* must hold privileges to enter here */
	72	lifn.lifn_family = af;
	73	lifn.lifn_flags = 0;
	74	ret = ioctl (sock, SIOCGLIFNUM, &lifn);
	75
	76	if (zserv_privs.change(ZPRIVS_LOWER))
	77	zlog (NULL, LOG_ERR, "Can't lower privileges");
	78
	79	if (ret < 0)
	80	{
	81	zlog_warn ("interface_list_ioctl: SIOCGLIFNUM failed %s",
	82	strerror (errno));
	83	close (sock);
	84	return -1;
	85	}
	86	ifnum = lifn.lifn_count;
	87
	88	/*
	89	* When calculating the buffer size needed, add a small number
	90	* of interfaces to those we counted. We do this to capture
	91	* the interface status of potential interfaces which may have
	92	* been plumbed between the SIOCGLIFNUM and the SIOCGLIFCONF.
	93	*/
	94	needed = (ifnum + 4) * sizeof (struct lifreq);
	95	if (needed > lastneeded \|\| needed < lastneeded / 2)
	96	{
	97	if (buf != NULL)
	98	XFREE (MTYPE_TMP, buf);
	99	if ((buf = XMALLOC (MTYPE_TMP, needed)) == NULL)
	100	{
	101	zlog_warn ("interface_list_ioctl: malloc failed");
	102	close (sock);
	103	return -1;
104	}
105	}
106	lastneeded = needed;
107
108	lifconf.lifc_family = af;
109	lifconf.lifc_flags = 0;
110	lifconf.lifc_len = needed;
111	lifconf.lifc_buf = buf;
112
113	if (zserv_privs.change(ZPRIVS_RAISE))
114	zlog (NULL, LOG_ERR, "Can't raise privileges");
115
116	ret = ioctl (sock, SIOCGLIFCONF, &lifconf);
117
118	if (ret < 0)
119	{
120	if (errno == EINVAL)
121	goto calculate_lifc_len; /* deliberately hold privileges */
122
123	zlog_warn ("SIOCGLIFCONF: %s", strerror (errno));
124
125	if (zserv_privs.change(ZPRIVS_LOWER))
126	zlog (NULL, LOG_ERR, "Can't lower privileges");
127
128	goto end;
129	}
130
131	if (zserv_privs.change(ZPRIVS_LOWER))
132	zlog (NULL, LOG_ERR, "Can't lower privileges");
133
134	/* Allocate interface. */
135	lifreq = lifconf.lifc_req;
136
137	for (n = 0; n < lifconf.lifc_len; n += sizeof (struct lifreq))
138	{
139	ifp = if_get_by_name (lifreq->lifr_name);
5b73a671	140
8842468c	141	if (lifreq->lifr_addr.ss_family == AF_INET)
8842468c	142	ifp->flags \|= IFF_IPV4;
5b73a671	143
8842468c	144	if (lifreq->lifr_addr.ss_family == AF_INET6)
5b73a671	145	{
	146	#ifdef HAVE_IPV6
	147	ifp->flags \|= IFF_IPV6;
	148	#else
	149	lifreq++;
	150	continue;
	151	#endif /* HAVE_IPV6 */
	152	}
	153
8842468c	154	if_add_update (ifp);
5b73a671	155
8842468c	156	interface_info_ioctl (ifp);
	157	if_get_addr (ifp, (struct sockaddr *) &lifreq->lifr_addr);
	158	lifreq++;
	159	}
	160
	161	end:
	162	close (sock);
	163	XFREE (MTYPE_TMP, lifconf.lifc_buf);
	164	return ret;
	165	}
	166
	167	/* Get interface's index by ioctl. */
	168	int
	169	if_get_index (struct interface *ifp)
	170	{
	171	int ret;
	172	struct lifreq lifreq;
	173
	174	lifreq_set_name (&lifreq, ifp);
	175
8842468c	176	if (ifp->flags & IFF_IPV4)
	177	ret = AF_IOCTL (AF_INET, SIOCGLIFINDEX, (caddr_t) & lifreq);
	178	else if (ifp->flags & IFF_IPV6)
	179	ret = AF_IOCTL (AF_INET6, SIOCGLIFINDEX, (caddr_t) & lifreq);
	180	else
	181	ret = -1;
	182
8842468c	183	if (ret < 0)
	184	{
	185	zlog_warn ("SIOCGLIFINDEX(%s) failed", ifp->name);
	186	return ret;
	187	}
	188
	189	/* OK we got interface index. */
	190	#ifdef ifr_ifindex
	191	ifp->ifindex = lifreq.lifr_ifindex;
	192	#else
	193	ifp->ifindex = lifreq.lifr_index;
	194	#endif
	195	return ifp->ifindex;
	196
	197	}
	198
	199
	200	/* Interface address lookup by ioctl. This function only looks up
	201	IPv4 address. */
	202	#define ADDRLEN(sa) (((sa)->sa_family == AF_INET ? \
	203	sizeof (struct sockaddr_in) : sizeof (struct sockaddr_in6)))
	204
	205	#define SIN(s) ((struct sockaddr_in *)(s))
	206	#define SIN6(s) ((struct sockaddr_in6 *)(s))
	207
	208	static int
	209	if_get_addr (struct interface ifp, struct sockaddr addr)
	210	{
	211	int ret;
	212	struct lifreq lifreq;
	213	struct sockaddr_storage mask, dest;
	214	char *dest_pnt = NULL;
	215	u_char prefixlen = 0;
	216	afi_t af;
	217
	218	/* Interface's name and address family. */
	219	strncpy (lifreq.lifr_name, ifp->name, IFNAMSIZ);
	220
	221	/* Interface's address. */
	222	memcpy (&lifreq.lifr_addr, addr, ADDRLEN (addr));
	223	af = addr->sa_family;
	224
	225	/* Point to point or broad cast address pointer init. */
	226	dest_pnt = NULL;
	227
	228	if (ifp->flags & IFF_POINTOPOINT)
	229	{
8842468c	230	ret = AF_IOCTL (af, SIOCGLIFDSTADDR, (caddr_t) & lifreq);
8842468c	231
	232	if (ret < 0)
	233	{
	234	zlog_warn ("SIOCGLIFDSTADDR (%s) fail: %s",
	235	ifp->name, strerror (errno));
	236	return ret;
	237	}
	238	memcpy (&dest, &lifreq.lifr_dstaddr, ADDRLEN (addr));
	239	if (af == AF_INET)
	240	dest_pnt = (char *) &(SIN (&dest)->sin_addr);
	241	else
	242	dest_pnt = (char *) &(SIN6 (&dest)->sin6_addr);
	243	}
	244
	245	if (af == AF_INET)
	246	{
	247	ret = if_ioctl (SIOCGLIFNETMASK, (caddr_t) & lifreq);
	248
	249	if (ret < 0)
	250	{
	251	if (errno != EADDRNOTAVAIL)
	252	{
	253	zlog_warn ("SIOCGLIFNETMASK (%s) fail: %s", ifp->name,
	254	strerror (errno));
	255	return ret;
	256	}
	257	return 0;
	258	}
	259	memcpy (&mask, &lifreq.lifr_addr, ADDRLEN (addr));
	260
	261	prefixlen = ip_masklen (SIN (&mask)->sin_addr);
	262	if (ifp->flags & IFF_BROADCAST)
	263	{
	264	ret = if_ioctl (SIOCGLIFBRDADDR, (caddr_t) & lifreq);
	265	if (ret < 0)
	266	{
	267	if (errno != EADDRNOTAVAIL)
	268	{
	269	zlog_warn ("SIOCGLIFBRDADDR (%s) fail: %s",
	270	ifp->name, strerror (errno));
	271	return ret;
	272	}
	273	return 0;
	274	}
	275	memcpy (&dest, &lifreq.lifr_broadaddr, sizeof (struct sockaddr_in));
	276	dest_pnt = (char *) &SIN (&dest)->sin_addr;
	277	}
	278	}
5b73a671	279	#ifdef HAVE_IPV6
5b73a671	280	else if (af == AF_INET6)
8842468c	281	{
	282	if (ifp->flags & IFF_POINTOPOINT)
	283	{
	284	prefixlen = IPV6_MAX_BITLEN;
	285	}
	286	else
	287	{
	288	ret = if_ioctl_ipv6 (SIOCGLIFSUBNET, (caddr_t) & lifreq);
	289	if (ret < 0)
	290	{
	291	zlog_warn ("SIOCGLIFSUBNET (%s) fail: %s",
	292	ifp->name, strerror (errno));
	293	}
	294	else
	295	{
	296	prefixlen = lifreq.lifr_addrlen;
	297	}
	298	}
	299	}
5b73a671	300	#endif /* HAVE_IPV6 */
8842468c	301
	302	/* Set address to the interface. */
	303	if (af == AF_INET)
	304	connected_add_ipv4 (ifp, 0, &SIN (addr)->sin_addr, prefixlen,
	305	(struct in_addr *) dest_pnt, NULL);
5b73a671	306	#ifdef HAVE_IPV6
5b73a671	307	else if (af == AF_INET6)
8842468c	308	connected_add_ipv6 (ifp, &SIN6 (addr)->sin6_addr, prefixlen,
8842468c	309	(struct in6_addr *) dest_pnt);
5b73a671	310	#endif /* HAVE_IPV6 */
8842468c	311
	312	return 0;
	313	}
	314
	315	/* Fetch interface information via ioctl(). */
	316	static void
	317	interface_info_ioctl (struct interface *ifp)
	318	{
	319	if_get_index (ifp);
	320	if_get_flags (ifp);
	321	if_get_mtu (ifp);
	322	if_get_metric (ifp);
	323	}
	324
	325	/* Lookup all interface information. */
	326	void
	327	interface_list ()
	328	{
	329	interface_list_ioctl (AF_INET);
	330	interface_list_ioctl (AF_INET6);
	331	}
	332
	333	struct connected *
	334	if_lookup_linklocal (struct interface *ifp)
	335	{
5b73a671	336	#ifdef HAVE_IPV6
8842468c	337	listnode node;
	338	struct connected *ifc;
	339
	340	if (ifp == NULL)
	341	return NULL;
	342
	343	for (node = listhead (ifp->connected); node; node = nextnode (node))
	344	{
	345	ifc = getdata (node);
	346
	347	if ((ifc->address->family == AF_INET6) &&
	348	(IN6_IS_ADDR_LINKLOCAL (&ifc->address->u.prefix6)))
	349	return ifc;
	350	}
5b73a671	351	#endif /* HAVE_IPV6 */
5b73a671	352
8842468c	353	return NULL;
8842468c	354	}