xref: /freebsd/sys/netpfil/ipfw/ip_fw_log.c (revision fd5e3f3ec6c6248e892c9e7b2f17da3bfe7b6837)
1 /*-
2  * Copyright (c) 2002-2009 Luigi Rizzo, Universita` di Pisa
3  *
4  * Redistribution and use in source and binary forms, with or without
5  * modification, are permitted provided that the following conditions
6  * are met:
7  * 1. Redistributions of source code must retain the above copyright
8  *    notice, this list of conditions and the following disclaimer.
9  * 2. Redistributions in binary form must reproduce the above copyright
10  *    notice, this list of conditions and the following disclaimer in the
11  *    documentation and/or other materials provided with the distribution.
12  *
13  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
14  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
15  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
16  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
17  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
18  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
19  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
20  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
21  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
22  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
23  * SUCH DAMAGE.
24  */
25 
26 #include <sys/cdefs.h>
27 __FBSDID("$FreeBSD$");
28 
29 /*
30  * Logging support for ipfw
31  */
32 
33 #include "opt_ipfw.h"
34 #include "opt_inet.h"
35 #ifndef INET
36 #error IPFIREWALL requires INET.
37 #endif /* INET */
38 #include "opt_inet6.h"
39 
40 #include <sys/param.h>
41 #include <sys/systm.h>
42 #include <sys/kernel.h>
43 #include <sys/mbuf.h>
44 #include <sys/socket.h>
45 #include <sys/sysctl.h>
46 #include <sys/syslog.h>
47 #include <net/ethernet.h> /* for ETHERTYPE_IP */
48 #include <net/if.h>
49 #include <net/if_var.h>
50 #include <net/vnet.h>
51 
52 #include <netinet/in.h>
53 #include <netinet/ip.h>
54 #include <netinet/ip_icmp.h>
55 #include <netinet/ip_var.h>
56 #include <netinet/ip_fw.h>
57 #include <netinet/tcp_var.h>
58 #include <netinet/udp.h>
59 
60 #include <netinet/ip6.h>
61 #include <netinet/icmp6.h>
62 #ifdef INET6
63 #include <netinet6/in6_var.h>	/* ip6_sprintf() */
64 #endif
65 
66 #include <netpfil/ipfw/ip_fw_private.h>
67 
68 #ifdef MAC
69 #include <security/mac/mac_framework.h>
70 #endif
71 
72 /*
73  * L3HDR maps an ipv4 pointer into a layer3 header pointer of type T
74  * Other macros just cast void * into the appropriate type
75  */
76 #define	L3HDR(T, ip)	((T *)((u_int32_t *)(ip) + (ip)->ip_hl))
77 #define	TCP(p)		((struct tcphdr *)(p))
78 #define	SCTP(p)		((struct sctphdr *)(p))
79 #define	UDP(p)		((struct udphdr *)(p))
80 #define	ICMP(p)		((struct icmphdr *)(p))
81 #define	ICMP6(p)	((struct icmp6_hdr *)(p))
82 
83 #ifdef __APPLE__
84 #undef snprintf
85 #define snprintf	sprintf
86 #define SNPARGS(buf, len) buf + len
87 #define SNP(buf) buf
88 #else	/* !__APPLE__ */
89 #define SNPARGS(buf, len) buf + len, sizeof(buf) > len ? sizeof(buf) - len : 0
90 #define SNP(buf) buf, sizeof(buf)
91 #endif /* !__APPLE__ */
92 
93 #define	TARG(k, f)	IP_FW_ARG_TABLEARG(chain, k, f)
94 /*
95  * We enter here when we have a rule with O_LOG.
96  * XXX this function alone takes about 2Kbytes of code!
97  */
98 void
99 ipfw_log(struct ip_fw_chain *chain, struct ip_fw *f, u_int hlen,
100     struct ip_fw_args *args, struct mbuf *m, struct ifnet *oif,
101     u_short offset, uint32_t tablearg, struct ip *ip)
102 {
103 	char *action;
104 	int limit_reached = 0;
105 	char action2[92], proto[128], fragment[32];
106 
107 	if (V_fw_verbose == 0) {
108 		if (args->eh) /* layer2, use orig hdr */
109 			ipfw_bpf_mtap2(args->eh, ETHER_HDR_LEN, m);
110 		else {
111 			/* Add fake header. Later we will store
112 			 * more info in the header.
113 			 */
114 			if (ip->ip_v == 4)
115 				ipfw_bpf_mtap2("DDDDDDSSSSSS\x08\x00",
116 				    ETHER_HDR_LEN, m);
117 			else if (ip->ip_v == 6)
118 				ipfw_bpf_mtap2("DDDDDDSSSSSS\x86\xdd",
119 				    ETHER_HDR_LEN, m);
120 			else
121 				/* Obviously bogus EtherType. */
122 				ipfw_bpf_mtap2("DDDDDDSSSSSS\xff\xff",
123 				    ETHER_HDR_LEN, m);
124 		}
125 		return;
126 	}
127 	/* the old 'log' function */
128 	fragment[0] = '\0';
129 	proto[0] = '\0';
130 
131 	if (f == NULL) {	/* bogus pkt */
132 		if (V_verbose_limit != 0 && V_norule_counter >= V_verbose_limit)
133 			return;
134 		V_norule_counter++;
135 		if (V_norule_counter == V_verbose_limit)
136 			limit_reached = V_verbose_limit;
137 		action = "Refuse";
138 	} else {	/* O_LOG is the first action, find the real one */
139 		ipfw_insn *cmd = ACTION_PTR(f);
140 		ipfw_insn_log *l = (ipfw_insn_log *)cmd;
141 
142 		if (l->max_log != 0 && l->log_left == 0)
143 			return;
144 		l->log_left--;
145 		if (l->log_left == 0)
146 			limit_reached = l->max_log;
147 		cmd += F_LEN(cmd);	/* point to first action */
148 		if (cmd->opcode == O_ALTQ) {
149 			ipfw_insn_altq *altq = (ipfw_insn_altq *)cmd;
150 
151 			snprintf(SNPARGS(action2, 0), "Altq %d",
152 				altq->qid);
153 			cmd += F_LEN(cmd);
154 		}
155 		if (cmd->opcode == O_PROB || cmd->opcode == O_TAG ||
156 		    cmd->opcode == O_SETDSCP)
157 			cmd += F_LEN(cmd);
158 
159 		action = action2;
160 		switch (cmd->opcode) {
161 		case O_DENY:
162 			action = "Deny";
163 			break;
164 
165 		case O_REJECT:
166 			if (cmd->arg1==ICMP_REJECT_RST)
167 				action = "Reset";
168 			else if (cmd->arg1==ICMP_UNREACH_HOST)
169 				action = "Reject";
170 			else
171 				snprintf(SNPARGS(action2, 0), "Unreach %d",
172 					cmd->arg1);
173 			break;
174 
175 		case O_UNREACH6:
176 			if (cmd->arg1==ICMP6_UNREACH_RST)
177 				action = "Reset";
178 			else
179 				snprintf(SNPARGS(action2, 0), "Unreach %d",
180 					cmd->arg1);
181 			break;
182 
183 		case O_ACCEPT:
184 			action = "Accept";
185 			break;
186 		case O_COUNT:
187 			action = "Count";
188 			break;
189 		case O_DIVERT:
190 			snprintf(SNPARGS(action2, 0), "Divert %d",
191 				TARG(cmd->arg1, divert));
192 			break;
193 		case O_TEE:
194 			snprintf(SNPARGS(action2, 0), "Tee %d",
195 				TARG(cmd->arg1, divert));
196 			break;
197 		case O_SETFIB:
198 			snprintf(SNPARGS(action2, 0), "SetFib %d",
199 				TARG(cmd->arg1, fib) & 0x7FFF);
200 			break;
201 		case O_SKIPTO:
202 			snprintf(SNPARGS(action2, 0), "SkipTo %d",
203 				TARG(cmd->arg1, skipto));
204 			break;
205 		case O_PIPE:
206 			snprintf(SNPARGS(action2, 0), "Pipe %d",
207 				TARG(cmd->arg1, pipe));
208 			break;
209 		case O_QUEUE:
210 			snprintf(SNPARGS(action2, 0), "Queue %d",
211 				TARG(cmd->arg1, pipe));
212 			break;
213 		case O_FORWARD_IP: {
214 			char buf[INET_ADDRSTRLEN];
215 			ipfw_insn_sa *sa = (ipfw_insn_sa *)cmd;
216 			int len;
217 			struct in_addr dummyaddr;
218 			if (sa->sa.sin_addr.s_addr == INADDR_ANY)
219 				dummyaddr.s_addr = htonl(tablearg);
220 			else
221 				dummyaddr.s_addr = sa->sa.sin_addr.s_addr;
222 
223 			len = snprintf(SNPARGS(action2, 0), "Forward to %s",
224 				inet_ntoa_r(dummyaddr, buf));
225 
226 			if (sa->sa.sin_port)
227 				snprintf(SNPARGS(action2, len), ":%d",
228 				    sa->sa.sin_port);
229 			}
230 			break;
231 #ifdef INET6
232 		case O_FORWARD_IP6: {
233 			char buf[INET6_ADDRSTRLEN];
234 			ipfw_insn_sa6 *sa = (ipfw_insn_sa6 *)cmd;
235 			int len;
236 
237 			len = snprintf(SNPARGS(action2, 0), "Forward to [%s]",
238 			    ip6_sprintf(buf, &sa->sa.sin6_addr));
239 
240 			if (sa->sa.sin6_port)
241 				snprintf(SNPARGS(action2, len), ":%u",
242 				    sa->sa.sin6_port);
243 			}
244 			break;
245 #endif
246 		case O_NETGRAPH:
247 			snprintf(SNPARGS(action2, 0), "Netgraph %d",
248 				cmd->arg1);
249 			break;
250 		case O_NGTEE:
251 			snprintf(SNPARGS(action2, 0), "Ngtee %d",
252 				cmd->arg1);
253 			break;
254 		case O_NAT:
255 			action = "Nat";
256  			break;
257 		case O_REASS:
258 			action = "Reass";
259 			break;
260 		case O_CALLRETURN:
261 			if (cmd->len & F_NOT)
262 				action = "Return";
263 			else
264 				snprintf(SNPARGS(action2, 0), "Call %d",
265 				    cmd->arg1);
266 			break;
267 		case O_EXTERNAL_ACTION:
268 			snprintf(SNPARGS(action2, 0), "Eaction %s",
269 			    ((struct named_object *)SRV_OBJECT(chain,
270 			    cmd->arg1))->name);
271 			break;
272 		default:
273 			action = "UNKNOWN";
274 			break;
275 		}
276 	}
277 
278 	if (hlen == 0) {	/* non-ip */
279 		snprintf(SNPARGS(proto, 0), "MAC");
280 
281 	} else {
282 		int len;
283 #ifdef INET6
284 		char src[INET6_ADDRSTRLEN + 2], dst[INET6_ADDRSTRLEN + 2];
285 #else
286 		char src[INET_ADDRSTRLEN], dst[INET_ADDRSTRLEN];
287 #endif
288 		struct icmphdr *icmp;
289 		struct tcphdr *tcp;
290 		struct udphdr *udp;
291 #ifdef INET6
292 		struct ip6_hdr *ip6 = NULL;
293 		struct icmp6_hdr *icmp6;
294 		u_short ip6f_mf;
295 #endif
296 		src[0] = '\0';
297 		dst[0] = '\0';
298 #ifdef INET6
299 		ip6f_mf = offset & IP6F_MORE_FRAG;
300 		offset &= IP6F_OFF_MASK;
301 
302 		if (IS_IP6_FLOW_ID(&(args->f_id))) {
303 			char ip6buf[INET6_ADDRSTRLEN];
304 			snprintf(src, sizeof(src), "[%s]",
305 			    ip6_sprintf(ip6buf, &args->f_id.src_ip6));
306 			snprintf(dst, sizeof(dst), "[%s]",
307 			    ip6_sprintf(ip6buf, &args->f_id.dst_ip6));
308 
309 			ip6 = (struct ip6_hdr *)ip;
310 			tcp = (struct tcphdr *)(((char *)ip) + hlen);
311 			udp = (struct udphdr *)(((char *)ip) + hlen);
312 		} else
313 #endif
314 		{
315 			tcp = L3HDR(struct tcphdr, ip);
316 			udp = L3HDR(struct udphdr, ip);
317 
318 			inet_ntop(AF_INET, &ip->ip_src, src, sizeof(src));
319 			inet_ntop(AF_INET, &ip->ip_dst, dst, sizeof(dst));
320 		}
321 
322 		switch (args->f_id.proto) {
323 		case IPPROTO_TCP:
324 			len = snprintf(SNPARGS(proto, 0), "TCP %s", src);
325 			if (offset == 0)
326 				snprintf(SNPARGS(proto, len), ":%d %s:%d",
327 				    ntohs(tcp->th_sport),
328 				    dst,
329 				    ntohs(tcp->th_dport));
330 			else
331 				snprintf(SNPARGS(proto, len), " %s", dst);
332 			break;
333 
334 		case IPPROTO_UDP:
335 			len = snprintf(SNPARGS(proto, 0), "UDP %s", src);
336 			if (offset == 0)
337 				snprintf(SNPARGS(proto, len), ":%d %s:%d",
338 				    ntohs(udp->uh_sport),
339 				    dst,
340 				    ntohs(udp->uh_dport));
341 			else
342 				snprintf(SNPARGS(proto, len), " %s", dst);
343 			break;
344 
345 		case IPPROTO_ICMP:
346 			icmp = L3HDR(struct icmphdr, ip);
347 			if (offset == 0)
348 				len = snprintf(SNPARGS(proto, 0),
349 				    "ICMP:%u.%u ",
350 				    icmp->icmp_type, icmp->icmp_code);
351 			else
352 				len = snprintf(SNPARGS(proto, 0), "ICMP ");
353 			len += snprintf(SNPARGS(proto, len), "%s", src);
354 			snprintf(SNPARGS(proto, len), " %s", dst);
355 			break;
356 #ifdef INET6
357 		case IPPROTO_ICMPV6:
358 			icmp6 = (struct icmp6_hdr *)(((char *)ip) + hlen);
359 			if (offset == 0)
360 				len = snprintf(SNPARGS(proto, 0),
361 				    "ICMPv6:%u.%u ",
362 				    icmp6->icmp6_type, icmp6->icmp6_code);
363 			else
364 				len = snprintf(SNPARGS(proto, 0), "ICMPv6 ");
365 			len += snprintf(SNPARGS(proto, len), "%s", src);
366 			snprintf(SNPARGS(proto, len), " %s", dst);
367 			break;
368 #endif
369 		default:
370 			len = snprintf(SNPARGS(proto, 0), "P:%d %s",
371 			    args->f_id.proto, src);
372 			snprintf(SNPARGS(proto, len), " %s", dst);
373 			break;
374 		}
375 
376 #ifdef INET6
377 		if (IS_IP6_FLOW_ID(&(args->f_id))) {
378 			if (offset || ip6f_mf)
379 				snprintf(SNPARGS(fragment, 0),
380 				    " (frag %08x:%d@%d%s)",
381 				    args->f_id.extra,
382 				    ntohs(ip6->ip6_plen) - hlen,
383 				    ntohs(offset) << 3, ip6f_mf ? "+" : "");
384 		} else
385 #endif
386 		{
387 			int ipoff, iplen;
388 			ipoff = ntohs(ip->ip_off);
389 			iplen = ntohs(ip->ip_len);
390 			if (ipoff & (IP_MF | IP_OFFMASK))
391 				snprintf(SNPARGS(fragment, 0),
392 				    " (frag %d:%d@%d%s)",
393 				    ntohs(ip->ip_id), iplen - (ip->ip_hl << 2),
394 				    offset << 3,
395 				    (ipoff & IP_MF) ? "+" : "");
396 		}
397 	}
398 #ifdef __FreeBSD__
399 	if (oif || m->m_pkthdr.rcvif)
400 		log(LOG_SECURITY | LOG_INFO,
401 		    "ipfw: %d %s %s %s via %s%s\n",
402 		    f ? f->rulenum : -1,
403 		    action, proto, oif ? "out" : "in",
404 		    oif ? oif->if_xname : m->m_pkthdr.rcvif->if_xname,
405 		    fragment);
406 	else
407 #endif
408 		log(LOG_SECURITY | LOG_INFO,
409 		    "ipfw: %d %s %s [no if info]%s\n",
410 		    f ? f->rulenum : -1,
411 		    action, proto, fragment);
412 	if (limit_reached)
413 		log(LOG_SECURITY | LOG_NOTICE,
414 		    "ipfw: limit %d reached on entry %d\n",
415 		    limit_reached, f ? f->rulenum : -1);
416 }
417 /* end of file */
418