1 /* $NetBSD: ipf.c,v 1.4 2018/12/13 13:11:28 sborrill Exp $ */
2
3 /*
4 * ipf.c - NAT lookup code for IP Filter.
5 *
6 * This software is in the public domain.
7 * Written by Peter Postma <peter@NetBSD.org>
8 */
9
10 #include <sys/cdefs.h>
11 __RCSID("$NetBSD: ipf.c,v 1.4 2018/12/13 13:11:28 sborrill Exp $");
12
13 #include <sys/types.h>
14 #include <sys/socket.h>
15 #include <sys/ioctl.h>
16 #include <sys/fcntl.h>
17
18 #include <net/if.h>
19 #include <netinet/in.h>
20 #include <netinet/in_systm.h>
21 #include <netinet/ipl.h>
22 #include <netinet/ip_compat.h>
23 #include <netinet/ip_fil.h>
24 #include <netinet/ip_nat.h>
25
26 #include <stdlib.h>
27 #include <string.h>
28 #include <syslog.h>
29 #include <unistd.h>
30
31 #include "identd.h"
32
33 int
ipf_natlookup(const struct sockaddr_storage * ss,struct sockaddr_storage * nat_addr,in_port_t * nat_lport)34 ipf_natlookup(const struct sockaddr_storage *ss,
35 struct sockaddr_storage *nat_addr, in_port_t *nat_lport)
36 {
37 natlookup_t nl;
38 ipfobj_t obj;
39 int dev;
40
41 (void)memset(&obj, 0, sizeof(obj));
42 (void)memset(&nl, 0, sizeof(nl));
43
44 /* Build the ipf object description structure. */
45 obj.ipfo_rev = IPFILTER_VERSION;
46 obj.ipfo_size = sizeof(nl);
47 obj.ipfo_ptr = &nl;
48 obj.ipfo_type = IPFOBJ_NATLOOKUP;
49
50 /* Build the ipf natlook structure. */
51 switch (ss[0].ss_family) {
52 case AF_INET:
53 (void)memcpy(&nl.nl_realip, &csatosin(&ss[0])->sin_addr,
54 sizeof(struct in_addr));
55 (void)memcpy(&nl.nl_outip, &csatosin(&ss[1])->sin_addr,
56 sizeof(struct in_addr));
57 nl.nl_realport = ntohs(csatosin(&ss[0])->sin_port);
58 nl.nl_outport = ntohs(csatosin(&ss[1])->sin_port);
59 nl.nl_flags = IPN_TCP | IPN_IN;
60 nl.nl_v = 4; /* IPv4 */
61 break;
62 case AF_INET6:
63 /* XXX IP Filter doesn't support IPv6 NAT yet. */
64 default:
65 maybe_syslog(LOG_ERR, "Unsupported protocol for NAT lookup "
66 "(no. %d)", ss[0].ss_family);
67 return 0;
68 }
69
70 /* Open the NAT device and do the lookup. */
71 if ((dev = open(IPNAT_NAME, O_RDONLY)) == -1) {
72 maybe_syslog(LOG_ERR, "Cannot open %s: %m", IPNAT_NAME);
73 return 0;
74 }
75 if (ioctl(dev, SIOCGNATL, &obj) == -1) {
76 maybe_syslog(LOG_ERR, "NAT lookup failure: %m");
77 (void)close(dev);
78 return 0;
79 }
80 (void)close(dev);
81
82 /*
83 * Put the originating address into nat_addr and fill
84 * the port with the ident port, 113.
85 */
86 switch (ss[0].ss_family) {
87 case AF_INET:
88 (void)memcpy(&satosin(nat_addr)->sin_addr, &nl.nl_inip,
89 sizeof(struct in_addr));
90 satosin(nat_addr)->sin_port = htons(113);
91 satosin(nat_addr)->sin_len = sizeof(struct sockaddr_in);
92 satosin(nat_addr)->sin_family = AF_INET;
93 break;
94 case AF_INET6:
95 break;
96 }
97 /* Put the originating port into nat_lport. */
98 *nat_lport = nl.nl_inport;
99
100 return 1;
101 }
102