lib/inet6.c

   1 /*
   2  * lib/inet6.c        This file contains an implementation of the "INET6"
   3  *              support functions for the net-tools.
   4  *              (most of it copied from lib/inet.c 1.26).
   5  *
   6  * Version:     $Id: inet6.c,v 1.9 1999/12/11 13:35:57 freitag Exp $
   7  *
   8  * Author:      Fred N. van Kempen, <waltje@uwalt.nl.mugnet.org>
   9  *              Copyright 1993 MicroWalt Corporation
  10  *
  11  * Modified:
  12  *960808 {0.01} Frank Strauss :         adapted for IPv6 support
  13  *980701 {0.02} Arnaldo C. Melo:        GNU gettext instead of catgets
  14  *990824        Bernd Eckenfels:        clear members for selecting v6 address
  15  *
  16  *              This program is free software; you can redistribute it
  17  *              and/or  modify it under  the terms of  the GNU General
  18  *              Public  License as  published  by  the  Free  Software
  19  *              Foundation;  either  version 2 of the License, or  (at
  20  *              your option) any later version.
  21  */
  22 #include "config.h"
  23
  24 #if HAVE_AFINET6
  25 #include <asm/types.h>
  26 #include <sys/types.h>
  27 #include <sys/socket.h>
  28 #include <netinet/in.h>
  29 #include <arpa/inet.h>
  30 #include <arpa/nameser.h>
  31 #include <ctype.h>
  32 #include <errno.h>
  33 #include <netdb.h>
  34 #include <resolv.h>
  35 #include <stdlib.h>
  36 #include <string.h>
  37 #include <stdio.h>
  38 #include <unistd.h>
  39 #include "version.h"
  40 #include "net-support.h"
  41 #include "pathnames.h"
  42 #include "intl.h"
  43 #include "util.h"
  44
  45 extern int h_errno;             /* some netdb.h versions don't export this */
  46
  47 static int INET6_resolve(char *name, struct sockaddr_in6 *sin6)
  48 {
  49     struct addrinfo req, *ai;
  50     int s;
  51
  52     memset (&req, '\0', sizeof req);
  53     req.ai_family = AF_INET6;
  54     if ((s = getaddrinfo(name, NULL, &req, &ai))) {
  55         fprintf(stderr, "getaddrinfo: %s: %d\n", name, s);
  56         return -1;
  57     }
  58     memcpy(sin6, ai->ai_addr, sizeof(struct sockaddr_in6));
  59
  60     freeaddrinfo(ai);
  61
  62     return (0);
  63 }
  64
  65 #ifndef IN6_IS_ADDR_UNSPECIFIED
  66 #define IN6_IS_ADDR_UNSPECIFIED(a) \
  67         (((__u32 *) (a))[0] == 0 && ((__u32 *) (a))[1] == 0 && \
  68          ((__u32 *) (a))[2] == 0 && ((__u32 *) (a))[3] == 0)
  69 #endif
  70
  71
  72 static int INET6_rresolve(char *name, struct sockaddr_in6 *sin6, int numeric)
  73 {
  74     int s;
  75
  76     /* Grmpf. -FvK */
  77     if (sin6->sin6_family != AF_INET6) {
  78 #ifdef DEBUG
  79         fprintf(stderr, _("rresolve: unsupport address family %d !\n"),
  80                 sin6->sin6_family);
  81 #endif
  82         errno = EAFNOSUPPORT;
  83         return (-1);
  84     }
  85     if (numeric & 0x7FFF) {
  86         inet_ntop(AF_INET6, &sin6->sin6_addr, name, 80);
  87         return (0);
  88     }
  89     if (IN6_IS_ADDR_UNSPECIFIED(&sin6->sin6_addr)) {
  90         if (numeric & 0x8000)
  91             strcpy(name, "default");
  92         else
  93             strcpy(name, "*");
  94         return (0);
  95     }
  96
  97     if ((s = getnameinfo((struct sockaddr *) sin6, sizeof(struct sockaddr_in6),
  98                          name, 255 /* !! */ , NULL, 0, 0))) {
  99         fprintf(stderr, "getnameinfo: %s\n", gai_strerror(s));
 100         return -1;
 101     }
 102     return (0);
 103 }
 104
 105
 106 static void INET6_reserror(char *text)
 107 {
 108     herror(text);
 109 }
 110
 111
 112 /* Display an Internet socket address. */
 113 static char *INET6_print(unsigned char *ptr)
 114 {
 115     static char name[80];
 116
 117     inet_ntop(AF_INET6, (struct in6_addr *) ptr, name, 80);
 118     return name;
 119 }
 120
 121
 122 /* Display an Internet socket address. */
 123 /* dirty! struct sockaddr usually doesn't suffer for inet6 addresses, fst. */
 124 static char *INET6_sprint(struct sockaddr *sap, int numeric)
 125 {
 126     static char buff[128];
 127
 128     if (sap->sa_family == 0xFFFF || sap->sa_family == 0)
 129         return safe_strncpy(buff, _("[NONE SET]"), sizeof(buff));
 130     if (INET6_rresolve(buff, (struct sockaddr_in6 *) sap, numeric) != 0)
 131         return (NULL);
 132     return (buff);
 133 }
 134
 135
 136 static int INET6_getsock(char *bufp, struct sockaddr *sap)
 137 {
 138     struct sockaddr_in6 *sin6;
 139
 140     sin6 = (struct sockaddr_in6 *) sap;
 141     sin6->sin6_family = AF_INET6;
 142     sin6->sin6_port = 0;
 143
 144     if (inet_pton(AF_INET6, bufp, sin6->sin6_addr.s6_addr) <= 0)
 145         return (-1);
 146
 147     return 16;                  /* ?;) */
 148 }
 149
 150 static int INET6_input(int type, char *bufp, struct sockaddr *sap)
 151 {
 152     switch (type) {
 153     case 1:
 154         return (INET6_getsock(bufp, sap));
 155     default:
 156         return (INET6_resolve(bufp, (struct sockaddr_in6 *) sap));
 157     }
 158 }
 159
 160
 161 struct aftype inet6_aftype =
 162 {
 163     "inet6", NULL, /*"IPv6", */ AF_INET6, sizeof(struct in6_addr),
 164     INET6_print, INET6_sprint, INET6_input, INET6_reserror,
 165     INET6_rprint, INET6_rinput, NULL,
 166
 167     -1,
 168     "/proc/net/if_inet6"
 169 };
 170
 171
 172 #endif                          /* HAVE_AFINET6 */