Merge from vendor branch FILE:
[dragonfly.git] / sbin / ifconfig / af_inet.c
1 /*
2  * Copyright (c) 1983, 1993
3  *      The Regents of the University of California.  All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 4. Neither the name of the University nor the names of its contributors
14  *    may be used to endorse or promote products derived from this software
15  *    without specific prior written permission.
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27  * SUCH DAMAGE.
28  *
29  * $FreeBSD: src/sbin/ifconfig/af_inet.c,v 1.2 2005/06/16 19:37:09 ume Exp $
30  * $DragonFly: src/sbin/ifconfig/af_inet.c,v 1.2 2006/06/24 07:51:37 sephe Exp $
31  */
32
33 #include <sys/types.h>
34 #include <sys/ioctl.h>
35 #include <sys/socket.h>
36 #include <net/if.h>
37 #include <net/route.h>          /* for RTX_IFA */
38
39 #include <err.h>
40 #include <stdio.h>
41 #include <stdlib.h>
42 #include <string.h>
43 #include <unistd.h>
44
45 #include <netinet/in.h>
46 #include <net/if_var.h>         /* for struct ifaddr */
47 #include <netinet/in_var.h>
48 #include <arpa/inet.h>
49 #include <netdb.h>
50
51 #include "ifconfig.h"
52
53 static struct ifaliasreq in_addreq;
54 static struct ifreq in_ridreq;
55
56 static void
57 in_status(int s __unused, const struct rt_addrinfo * info)
58 {
59         struct sockaddr_in *sin, null_sin;
60         
61         memset(&null_sin, 0, sizeof(null_sin));
62
63         sin = (struct sockaddr_in *)info->rti_info[RTAX_IFA];
64         if (sin == NULL)
65                 return;
66
67         printf("\tinet %s ", inet_ntoa(sin->sin_addr));
68
69         if (flags & IFF_POINTOPOINT) {
70                 /* note RTAX_BRD overlap with IFF_BROADCAST */
71                 sin = (struct sockaddr_in *)info->rti_info[RTAX_BRD];
72                 if (!sin)
73                         sin = &null_sin;
74                 printf("--> %s ", inet_ntoa(sin->sin_addr));
75         }
76
77         sin = (struct sockaddr_in *)info->rti_info[RTAX_NETMASK];
78         if (!sin)
79                 sin = &null_sin;
80         printf("netmask 0x%lx ", (unsigned long)ntohl(sin->sin_addr.s_addr));
81
82         if (flags & IFF_BROADCAST) {
83                 /* note RTAX_BRD overlap with IFF_POINTOPOINT */
84                 sin = (struct sockaddr_in *)info->rti_info[RTAX_BRD];
85                 if (sin && sin->sin_addr.s_addr != 0)
86                         printf("broadcast %s", inet_ntoa(sin->sin_addr));
87         }
88         putchar('\n');
89 }
90
91 #define SIN(x) ((struct sockaddr_in *) &(x))
92 static struct sockaddr_in *sintab[] = {
93         SIN(in_ridreq.ifr_addr), SIN(in_addreq.ifra_addr),
94         SIN(in_addreq.ifra_mask), SIN(in_addreq.ifra_broadaddr)
95 };
96
97 static void
98 in_getaddr(const char *s, int which)
99 {
100         struct sockaddr_in *sin = sintab[which];
101         struct hostent *hp;
102         struct netent *np;
103
104         sin->sin_len = sizeof(*sin);
105         if (which != MASK)
106                 sin->sin_family = AF_INET;
107
108         if (which == ADDR) {
109                 char *p = NULL;
110
111                 if((p = strrchr(s, '/')) != NULL) {
112                         /* address is `name/masklen' */
113                         int masklen;
114                         int ret;
115                         struct sockaddr_in *min = sintab[MASK];
116                         *p = '\0';
117                         ret = sscanf(p+1, "%u", &masklen);
118                         if(ret != 1 || (masklen < 0 || masklen > 32)) {
119                                 *p = '/';
120                                 errx(1, "%s: bad value", s);
121                         }
122                         min->sin_len = sizeof(*min);
123                         min->sin_addr.s_addr = htonl(~((1LL << (32 - masklen)) - 1) & 
124                                               0xffffffff);
125                 }
126         }
127
128         if (inet_aton(s, &sin->sin_addr))
129                 return;
130         if ((hp = gethostbyname(s)) != 0)
131                 bcopy(hp->h_addr, (char *)&sin->sin_addr, 
132                     MIN(hp->h_length, sizeof(sin->sin_addr)));
133         else if ((np = getnetbyname(s)) != 0)
134                 sin->sin_addr = inet_makeaddr(np->n_net, INADDR_ANY);
135         else
136                 errx(1, "%s: bad value", s);
137 }
138
139 static void
140 in_status_tunnel(int s)
141 {
142         char src[NI_MAXHOST];
143         char dst[NI_MAXHOST];
144         struct ifreq ifr;
145         const struct sockaddr *sa = (const struct sockaddr *) &ifr.ifr_addr;
146
147         memset(&ifr, 0, sizeof(ifr));
148         strncpy(ifr.ifr_name, name, IFNAMSIZ);
149
150         if (ioctl(s, SIOCGIFPSRCADDR, (caddr_t)&ifr) < 0)
151                 return;
152         if (sa->sa_family != AF_INET)
153                 return;
154         if (getnameinfo(sa, sa->sa_len, src, sizeof(src), 0, 0, NI_NUMERICHOST) != 0)
155                 src[0] = '\0';
156
157         if (ioctl(s, SIOCGIFPDSTADDR, (caddr_t)&ifr) < 0)
158                 return;
159         if (sa->sa_family != AF_INET)
160                 return;
161         if (getnameinfo(sa, sa->sa_len, dst, sizeof(dst), 0, 0, NI_NUMERICHOST) != 0)
162                 dst[0] = '\0';
163
164         printf("\ttunnel inet %s --> %s\n", src, dst);
165 }
166
167 static void
168 in_set_tunnel(int s, struct addrinfo *srcres, struct addrinfo *dstres)
169 {
170         struct ifaliasreq addreq;
171
172         memset(&addreq, 0, sizeof(addreq));
173         strncpy(addreq.ifra_name, name, IFNAMSIZ);
174         memcpy(&addreq.ifra_addr, srcres->ai_addr, srcres->ai_addr->sa_len);
175         memcpy(&addreq.ifra_dstaddr, dstres->ai_addr, dstres->ai_addr->sa_len);
176
177         if (ioctl(s, SIOCSIFPHYADDR, &addreq) < 0)
178                 warn("SIOCSIFPHYADDR");
179 }
180
181 static struct afswtch af_inet = {
182         .af_name        = "inet",
183         .af_af          = AF_INET,
184         .af_status      = in_status,
185         .af_getaddr     = in_getaddr,
186         .af_status_tunnel = in_status_tunnel,
187         .af_settunnel   = in_set_tunnel,
188         .af_difaddr     = SIOCDIFADDR,
189         .af_aifaddr     = SIOCAIFADDR,
190         .af_ridreq      = &in_ridreq,
191         .af_addreq      = &in_addreq,
192 };
193
194 static __constructor void
195 inet_ctor(void)
196 {
197         af_register(&af_inet);
198 }