1 /*        $NetBSD: af_inetany.c,v 1.23 2022/08/17 23:36:48 nat Exp $  */
2 
3 /*-
4  * Copyright (c) 2008 David Young.  All rights reserved.
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  *
15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25  * SUCH DAMAGE.
26  */
27 
28 #include <sys/cdefs.h>
29 #ifndef lint
30 __RCSID("$NetBSD: af_inetany.c,v 1.23 2022/08/17 23:36:48 nat Exp $");
31 #endif /* not lint */
32 
33 #include <sys/param.h>
34 #include <sys/ioctl.h>
35 #include <sys/socket.h>
36 
37 #include <net/if.h>
38 #include <netinet/in.h>
39 #include <netinet/in_var.h>
40 #include <netinet6/nd6.h>
41 
42 #include <arpa/inet.h>
43 
44 #include <assert.h>
45 #include <err.h>
46 #include <errno.h>
47 #include <ifaddrs.h>
48 #include <netdb.h>
49 #include <string.h>
50 #include <stdlib.h>
51 #include <stdio.h>
52 #include <util.h>
53 
54 #include "env.h"
55 #include "extern.h"
56 #include "af_inetany.h"
57 #include "prog_ops.h"
58 
59 static void *
loadbuf(const struct apbuf * b,const struct paddr_prefix * pfx)60 loadbuf(const struct apbuf *b, const struct paddr_prefix *pfx)
61 {
62           return memcpy(b->buf, &pfx->pfx_addr,
63                         MIN(b->buflen, pfx->pfx_addr.sa_len));
64 }
65 
66 void
commit_address(prop_dictionary_t env,prop_dictionary_t oenv,const struct afparam * param)67 commit_address(prop_dictionary_t env, prop_dictionary_t oenv,
68     const struct afparam *param)
69 {
70           const char *ifname;
71           int af, rc, s;
72           bool alias, delete, replace;
73           prop_data_t d;
74           const struct paddr_prefix *addr, *brd, *dst, *mask;
75           unsigned short flags;
76 
77           if ((af = getaf(env)) == -1)
78                     af = AF_INET;
79 
80           if ((s = getsock(af)) == -1)
81                     err(EXIT_FAILURE, "%s: getsock", __func__);
82 
83           if ((ifname = getifname(env)) == NULL)
84                     err(EXIT_FAILURE, "%s: getifname", __func__);
85 
86           strlcpy(param->name[0].buf, ifname, param->name[0].buflen);
87           strlcpy(param->name[1].buf, ifname, param->name[1].buflen);
88 
89           if ((d = (prop_data_t)prop_dictionary_get(env, "address")) != NULL)
90                     addr = prop_data_value(d);
91           else if (!prop_dictionary_get_bool(env, "alias", &alias) || alias ||
92               param->gifaddr.cmd == 0)
93                     return;
94           else if (prog_ioctl(s, param->gifaddr.cmd, param->dgreq.buf) == -1)
95                     err(EXIT_FAILURE, "%s", param->gifaddr.desc);
96           else if (prog_ioctl(s, param->difaddr.cmd, param->dgreq.buf) == -1)
97                     err(EXIT_FAILURE, "%s", param->difaddr.desc);
98           else
99                     return;
100 
101           if ((d = (prop_data_t)prop_dictionary_get(env, "dst")) != NULL)
102                     dst = prop_data_value(d);
103           else
104                     dst = NULL;
105 
106           if ((d = (prop_data_t)prop_dictionary_get(env, "netmask")) != NULL)
107                     mask = prop_data_value(d);
108           else
109                     mask = NULL;
110 
111           if ((d = (prop_data_t)prop_dictionary_get(env, "broadcast")) != NULL)
112                     brd = prop_data_value(d);
113           else
114                     brd = NULL;
115 
116           if (!prop_dictionary_get_bool(env, "alias", &alias)) {
117                     delete = false;
118                     replace = (param->gifaddr.cmd != 0);
119           } else {
120                     replace = false;
121                     delete = !alias;
122           }
123 
124           loadbuf(&param->addr, addr);
125 
126           /* TBD: read matching ifaddr from kernel, use the netmask as default
127            * TBD: handle preference
128            */
129           if (getifflags(env, oenv, &flags) == -1)
130                     err(EXIT_FAILURE, "%s: getifflags", __func__);
131 
132           switch (flags & (IFF_BROADCAST|IFF_POINTOPOINT)) {
133           case IFF_BROADCAST:
134                     if (brd != NULL)
135                               loadbuf(&param->brd, brd);
136                     /*FALLTHROUGH*/
137           case 0:
138                     break;
139           case IFF_POINTOPOINT:
140                     if (brd != NULL) {
141                               errx(EXIT_FAILURE, "%s is not a broadcast interface",
142                                   ifname);
143                     }
144                     if (dst != NULL)
145                               loadbuf(&param->dst, dst);
146                     break;
147           case IFF_BROADCAST|IFF_POINTOPOINT:
148                     errx(EXIT_FAILURE, "unsupported interface flags");
149           }
150           if (param->mask.buf == NULL) {
151                     if (mask != NULL)
152                               errx(EXIT_FAILURE, "netmask not supported");
153           } else if (mask != NULL)
154                     loadbuf(&param->mask, mask);
155           else if (param->defmask.buf != NULL) {
156                     memcpy(param->mask.buf, param->defmask.buf,
157                         MIN(param->mask.buflen, param->defmask.buflen));
158           }
159           if (replace) {
160                     if (prog_ioctl(s, param->gifaddr.cmd, param->dgreq.buf) == 0) {
161                               rc = prog_ioctl(s, param->difaddr.cmd, param->dgreq.buf);
162                               if (rc == -1)
163                                         err(EXIT_FAILURE, "%s", param->difaddr.desc);
164                     } else if (errno == EADDRNOTAVAIL)
165                               ;         /* No address was assigned yet. */
166                     else
167                               err(EXIT_FAILURE, "%s", param->gifaddr.desc);
168           } else if (delete) {
169                     loadbuf(&param->dgaddr, addr);
170                     if (prog_ioctl(s, param->difaddr.cmd, param->dgreq.buf) == -1)
171                               err(EXIT_FAILURE, "%s", param->difaddr.desc);
172                     return;
173           }
174           if (param->pre_aifaddr != NULL &&
175               (*param->pre_aifaddr)(env, param) == -1)
176                     err(EXIT_FAILURE, "pre-%s", param->aifaddr.desc);
177           if (prog_ioctl(s, param->aifaddr.cmd, param->req.buf) == -1)
178                     err(EXIT_FAILURE, "%s", param->aifaddr.desc);
179 }
180