summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--zebra/irdp.c569
1 files changed, 0 insertions, 569 deletions
diff --git a/zebra/irdp.c b/zebra/irdp.c
deleted file mode 100644
index 1b3bf232..00000000
--- a/zebra/irdp.c
+++ /dev/null
@@ -1,569 +0,0 @@
-/* ICMP Router Discovery Messages
- * Copyright (C) 1997, 2000 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 <netinet/ip_icmp.h>
-
-#include "if.h"
-#include "stream.h"
-#include "memory.h"
-#include "command.h"
-#include "log.h"
-#include "sockunion.h"
-#include "sockopt.h"
-
-#include "zebra/irdp.h"
-
-/* Default does nothing. */
-int irdp_mode = IRDP_NONE;
-
-/* Timer interval of irdp. */
-int irdp_timer_interval = IRDP_DEFAULT_INTERVAL;
-
-/* Max solicitations */
-int max_solicitations = MAX_SOLICITATIONS;
-
-#define IRDP_SOLICIT_PACKET_SIZE 8
-
-static struct irdp *irdp_head = NULL;
-
-extern int in_cksum (void *ptr, int nbytes);
-
-char *icmp_type_str[] =
-{
- "Echo Reply",
- "ICMP 1",
- "ICMP 2",
- "Dest Unreachable",
- "Source Quench",
- "Redirect",
- "ICMP 6",
- "ICMP 7",
- "Echo",
- "Router Advertise",
- "Router Solicitation",
- "Time Exceeded",
- "Parameter Problem",
- "Timestamp",
- "Timestamp Reply",
- "Info Request",
- "Info Reply",
- "Netmask Request",
- "Netmask Reply",
-};
-
-char *
-icmp_type (int type)
-{
- if (type < 0 || type >= (sizeof icmp_type_str / sizeof (char *))) {
- return "OUT-OF-RANGE";
- }
- return icmp_type_str [type];
-}
-
-/* */
-void
-irdp_add_interface ()
-{
- ;
-}
-
-/* */
-void
-irdp_delete_interface ()
-{
-
-}
-
-struct irdp *
-irdp_route_new ()
-{
- struct irdp *new = XMALLOC (0, sizeof (struct irdp));
- memset (new, 0, sizeof (struct irdp));
- return new;
-}
-
-void
-irdp_route_free (struct irdp *route)
-{
- XFREE (0, route);
-}
-
-void
-route_delete ()
-{
-
-}
-
-void
-route_init ()
-{
-
-}
-
-void
-route_add (struct in_addr addr, unsigned long pref)
-{
- struct irdp *new = irdp_route_new();
-
- new->prefix = addr;
- new->pref = pref;
-
- printf ("address %s\n", inet_ntoa (new->prefix));
- printf ("pref %ld\n", new->pref);
-}
-
-void
-route_age (int time)
-{
- struct irdp *p;
-
- for (p = irdp_head; p != NULL; p = p->next) {
- if (p->timer < time) {
- /* fire */
- } else {
- p->timer -= time;
- }
- }
-}
-
-#define FLAG_TEST(a) ((ifp->flags & (a)) == (a))
-
-void
-send_multicast (struct interface *ifp, int sock, struct stream *s, int size)
-{
- struct sockaddr_in sin;
- struct in_addr addr;
- int nbytes;
- struct connected *connected;
- listnode node;
-
- for (node = listhead (ifp->connected); node; nextnode (node))
- {
- connected = getdata (node);
- }
-
- if (setsockopt_multicast_ipv4 (sock, IP_MULTICAST_IF,
- addr, 0, ifp->ifindex) < 0)
- {
- perror ("setsockopt");
- exit (1);
- }
-
- sin.sin_addr.s_addr = htonl (INADDR_ALLRTRS_GROUP);
- sin.sin_family = AF_INET;
-
- nbytes = sendto (sock, s->data, size, 0,
- (struct sockaddr *) &sin, sizeof (struct sockaddr));
-
- if (nbytes != size)
- {
- perror ("sendto");
- exit (1);
- }
-}
-
-void
-send_broadcast ()
-{
- struct sockaddr_in sin;
-
- printf ("broadcast\n");
- inet_aton ("255.255.255.255", &sin.sin_addr);
-}
-
-void
-irdp_send_solicit (int sock, struct stream *s, int size)
-{
- struct interface *ifp;
- listnode node;
-
- for (node = listhead (iflist); node; nextnode (node))
- {
- ifp = getdata (node);
- if (FLAG_TEST (IFF_UP | IFF_MULTICAST))
- {
- send_multicast (ifp, sock, s, size);
- }
- else if (FLAG_TEST (IFF_UP | IFF_BROADCAST))
- {
- send_broadcast ();
- }
- }
-}
-
-int
-ipv4_multicast_join (int sock,
- struct in_addr group,
- struct in_addr ifa,
- unsigned int ifindex)
-{
- int ret;
-
- ret = setsockopt_multicast_ipv4 (sock, IP_ADD_MEMBERSHIP,
- ifa, group.saddr, ifindex);
-
- if (ret < 0)
- zlog (NULL, LOG_INFO, "can't setsockopt IP_ADD_MEMBERSHIP");
-
- return ret;
-}
-
-/* multicast packet recieve socket */
-int
-irdp_multicast_socket (int sock, struct in_addr group)
-{
- struct interface *ifp;
- listnode node;
- struct in_addr addr;
-
- for (node = listhead (iflist); node; nextnode (node))
- {
- ifp = getdata (node);
-
- if ((ifp->flags & IFF_UP) && (ifp->flags & IFF_MULTICAST))
- {
- ipv4_multicast_join (sock, group, addr, ifp->ifindex);
- }
- }
- return 0;
-}
-
-struct
-{
- u_char type;
- u_char code;
- u_int16_t checksum;
- u_char number;
- u_char entry;
- u_int16_t lifetime;
-} radv;
-
-void
-irdp_set (int sock)
-{
- struct in_addr irdp_group;
-
- switch (irdp_mode)
- {
- case IRDP_HOST:
- irdp_group.s_addr = htonl (INADDR_ALLHOSTS_GROUP);
- break;
- case IRDP_ROUTER:
- irdp_group.s_addr = htonl (INADDR_ALLRTRS_GROUP);
- break;
- case IRDP_NONE:
- default:
- return;
- }
- irdp_multicast_socket (sock, irdp_group);
-}
-
-/* Make ICMP Router Solicitation Message. */
-int
-make_solicit_packet (struct stream *s)
-{
- int size;
- int checksum;
-
- stream_putc (s, ICMP_ROUTERSOLICIT); /* Type. */
- stream_putc (s, 0); /* Code. */
- stream_putw (s, 0); /* Checksum. */
- stream_putl (s, 0); /* Reserved. */
-
- /* in_cksum return network byte order value */
- size = IRDP_SOLICIT_PACKET_SIZE;
- checksum = in_cksum (s->data, size);
- stream_putw_at (s, checksum, 2);
-
- return IRDP_SOLICIT_PACKET_SIZE;
-}
-
-void
-irdp_solicit (int sock)
-{
- struct stream *s;
-
- s = stream_new (IRDP_SOLICIT_PACKET_SIZE);
- make_solicit_packet (s);
- irdp_send_solicit (sock, s, IRDP_SOLICIT_PACKET_SIZE);
-}
-
-#define ICMP_MINLEN 8
-
-/* check validity of the packet */
-int
-irdp_valid_check (char *packet, size_t size, struct sockaddr_in *from)
-{
- struct icmp *icmp;
-
- icmp = (struct icmp *) packet;
-
- if (in_cksum (packet, size)) {
- zlog_warn ("ICMP %s packet from %s: Bad checksum, silently ignored",
- icmp_type (icmp->icmp_type),
- inet_ntoa (from->sin_addr));
- return -1;
- }
-
- if (icmp->icmp_code != 0) {
- zlog_warn ("ICMP %s packet from %s: Bad ICMP type code, silently ignored",
- icmp_type (icmp->icmp_type),
- inet_ntoa (from->sin_addr));
- return -1;
- }
-
- if (size < ICMP_MINLEN) {
- zlog_warn ("ICMP %s packet from %s: IMCP message length is short",
- icmp_type (icmp->icmp_type),
- inet_ntoa (from->sin_addr));
- return -1;
- }
- return 0;
-}
-
-int
-irdp_solicit_recv (struct stream *s, int size, struct sockaddr_in *from)
-{
- if (irdp_valid_check (s->data, size, from)) {
- return 1;
- }
- return 0;
-}
-
-void
-irdp_advert_recv (struct stream *s, int size, struct sockaddr_in *from)
-{
- int i;
- struct in_addr addr;
- long pref;
-
- if (irdp_valid_check (s->data, size, from) < 0) {
- return;
- }
-
- radv.type = stream_getc (s);
- radv.code = stream_getc (s);
- radv.checksum = stream_getw (s);
- radv.number = stream_getc (s);
- radv.entry = stream_getc (s);
- radv.lifetime = stream_getw (s);
-
- printf ("type : %s\n", icmp_type (radv.type));
- printf ("number: %d\n", radv.number);
- printf ("entry: %d\n", radv.entry);
- printf ("lifetime: %d\n", radv.entry);
-
- for (i = 0; i < radv.number; i++)
- {
- addr.s_addr = stream_getl (s);
- pref = stream_getl (s);
- route_add (addr, ntohl (pref));
- }
- /* Packet size check is needed at here. */
-}
-
-void
-irdp_packet_process (char *buf, int size, struct sockaddr_in *from)
-{
- struct ip *ip;
- struct icmp *icmp;
- int hlen;
- struct stream *s = NULL;
-
- ip = (struct ip *)buf;
- hlen = ip->ip_hl << 2;
-
- if (size < hlen + ICMP_MINLEN)
- zlog_err ("ICMP relpy length is short\n");
-
- icmp = (struct icmp *)(buf + hlen);
-
- stream_forward (s, hlen);
-
- switch (icmp->icmp_type)
- {
- case ICMP_ROUTERADVERT:
- irdp_advert_recv (s, size - hlen, from);
- break;
- case ICMP_ROUTERSOLICIT:
- irdp_solicit_recv (s, size - hlen, from);
- break;
- }
-}
-
-/* Make socket for ICMP Router Discovery. */
-int
-irdp_make_socket ()
-{
- int sock;
- struct protoent *pent;
-
- if ((pent = getprotobyname ("icmp")) == NULL) {
- perror ("getprotobyname");
- exit (1);
- }
-
- if ((sock = socket (AF_INET, SOCK_RAW, pent->p_proto)) < 0)
- {
- perror ("socket");
- exit (1);
- }
-
- return sock;
-}
-
-/* recv routine */
-int
-irdp_recv (int sock)
-{
-#define PACKET_BUF 4096
- int nbytes;
- struct sockaddr_in from;
- int fromlen;
- char buf[PACKET_BUF];
-
- fromlen = sizeof (from);
- nbytes = recvfrom (sock, (char *)buf, PACKET_BUF, 0,
- (struct sockaddr *)&from, &fromlen);
-
- if (nbytes < 0)
- {
- perror ("recvfrom");
- exit (1);
- }
-
- irdp_packet_process (buf, nbytes, &from);
-
- return 0;
-}
-
-/* irdp packet recv loop */
-void
-irdp_loop (int sock)
-{
- while (1)
- {
- irdp_recv (sock);
- }
-}
-
-DEFUN (ip_irdp,
- ip_irdp_cmd,
- "ip irdp",
- IP_STR
- "ICMP Router discovery on this interface\n")
-{
- return CMD_SUCCESS;
-}
-
-DEFUN (ip_irdp_multicast,
- ip_irdp_multicast_cmd,
- "ip irdp multicast",
- IP_STR
- "ICMP Router discovery on this interface\n"
- "Send IRDP advertisement to the multicast address\n")
-{
- return CMD_SUCCESS;
-}
-
-DEFUN (ip_irdp_holdtime,
- ip_irdp_holdtime_cmd,
- "ip irdp holdtime <0-9000>",
- IP_STR
- "ICMP Router discovery on this interface\n"
- "Set holdtime value\n"
- "Holdtime value in seconds. Default is 1800 seconds\n")
-{
- return CMD_SUCCESS;
-}
-
-DEFUN (ip_irdp_maxadvertinterval,
- ip_irdp_maxadvertinterval_cmd,
- "ip irdp maxadvertinterval (0|<4-1800>)",
- IP_STR
- "ICMP Router discovery on this interface\n"
- "Set maximum time between advertisement\n"
- "Maximum advertisement interval in seconds\n")
-{
- return CMD_SUCCESS;
-}
-
-DEFUN (ip_irdp_minadvertinterval,
- ip_irdp_minadvertinterval_cmd,
- "ip irdp minadvertinterval <3-1800>",
- IP_STR
- "ICMP Router discovery on this interface\n"
- "Set minimum time between advertisement\n"
- "Minimum advertisement interval in seconds\n")
-{
- return CMD_SUCCESS;
-}
-
-DEFUN (ip_irdp_preference,
- ip_irdp_preference_cmd,
- /* "ip irdp preference <-2147483648-2147483647>", */
- "ip irdp preference <0-2147483647>",
- IP_STR
- "ICMP Router discovery on this interface\n"
- "Set default preference level for this interface\n"
- "Preference level\n")
-{
- return CMD_SUCCESS;
-}
-
-#if 0
-DEFUN (ip_irdp_address,
- ip_irdp_address_cmd,
- "ip irdp address A.B.C.D",
- IP_STR
- "ICMP Router discovery on this interface\n"
- "Specify IRDP address and preference to proxy-advertise\n"
- "Set IRDP address for proxy-advertise\n")
-{
- return CMD_SUCCESS;
-}
-#endif /* 0 */
-
-DEFUN (ip_irdp_address_preference,
- ip_irdp_address_preference_cmd,
- "ip irdp address A.B.C.D <0-2147483647>",
- IP_STR
- "ICMP Router discovery on this interface\n"
- "Specify IRDP address and preference to proxy-advertise\n"
- "Set IRDP address for proxy-advertise\n"
- "Preference level\n")
-{
- return CMD_SUCCESS;
-}
-
-void
-irdp_init ()
-{
- install_element (INTERFACE_NODE, &ip_irdp_cmd);
- install_element (INTERFACE_NODE, &ip_irdp_multicast_cmd);
- install_element (INTERFACE_NODE, &ip_irdp_holdtime_cmd);
- install_element (INTERFACE_NODE, &ip_irdp_maxadvertinterval_cmd);
- install_element (INTERFACE_NODE, &ip_irdp_minadvertinterval_cmd);
- install_element (INTERFACE_NODE, &ip_irdp_preference_cmd);
- install_element (INTERFACE_NODE, &ip_irdp_address_preference_cmd);
-}