]> CyberLeo.Net >> Repos - FreeBSD/releng/9.2.git/blob - sys/netpfil/ipfw/ip_fw_log.c
- Copy stable/9 to releng/9.2 as part of the 9.2-RELEASE cycle.
[FreeBSD/releng/9.2.git] / sys / netpfil / ipfw / ip_fw_log.c
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/mbuf.h>
43 #include <sys/kernel.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/vnet.h>
50 #include <net/if_types.h>       /* for IFT_ETHER */
51 #include <net/bpf.h>            /* for BPF */
52
53 #include <netinet/in.h>
54 #include <netinet/ip.h>
55 #include <netinet/ip_icmp.h>
56 #include <netinet/ip_var.h>
57 #include <netinet/ip_fw.h>
58 #include <netinet/tcp_var.h>
59 #include <netinet/udp.h>
60
61 #include <netinet/ip6.h>
62 #include <netinet/icmp6.h>
63 #ifdef INET6
64 #include <netinet6/in6_var.h>   /* ip6_sprintf() */
65 #endif
66
67 #include <netpfil/ipfw/ip_fw_private.h>
68
69 #ifdef MAC
70 #include <security/mac/mac_framework.h>
71 #endif
72
73 /*
74  * L3HDR maps an ipv4 pointer into a layer3 header pointer of type T
75  * Other macros just cast void * into the appropriate type
76  */
77 #define L3HDR(T, ip)    ((T *)((u_int32_t *)(ip) + (ip)->ip_hl))
78 #define TCP(p)          ((struct tcphdr *)(p))
79 #define SCTP(p)         ((struct sctphdr *)(p))
80 #define UDP(p)          ((struct udphdr *)(p))
81 #define ICMP(p)         ((struct icmphdr *)(p))
82 #define ICMP6(p)        ((struct icmp6_hdr *)(p))
83
84 #define SNPARGS(buf, len) buf + len, sizeof(buf) > len ? sizeof(buf) - len : 0
85 #define SNP(buf) buf, sizeof(buf)
86
87 #ifdef WITHOUT_BPF
88 void
89 ipfw_log_bpf(int onoff)
90 {
91 }
92 #else /* !WITHOUT_BPF */
93 static struct ifnet *log_if;    /* hook to attach to bpf */
94
95 /* we use this dummy function for all ifnet callbacks */
96 static int
97 log_dummy(struct ifnet *ifp, u_long cmd, caddr_t addr)
98 {
99         return EINVAL;
100 }
101
102 static int
103 ipfw_log_output(struct ifnet *ifp, struct mbuf *m,
104         struct sockaddr *dst, struct route *ro)
105 {
106         if (m != NULL)
107                 m_freem(m);
108         return EINVAL;
109 }
110
111 static void
112 ipfw_log_start(struct ifnet* ifp)
113 {
114         panic("ipfw_log_start() must not be called");
115 }
116
117 static const u_char ipfwbroadcastaddr[6] =
118         { 0xff, 0xff, 0xff, 0xff, 0xff, 0xff };
119
120 void
121 ipfw_log_bpf(int onoff)
122 {
123         struct ifnet *ifp;
124
125         if (onoff) {
126                 if (log_if)
127                         return;
128                 ifp = if_alloc(IFT_ETHER);
129                 if (ifp == NULL)
130                         return;
131                 if_initname(ifp, "ipfw", 0);
132                 ifp->if_mtu = 65536;
133                 ifp->if_flags = IFF_UP | IFF_SIMPLEX | IFF_MULTICAST;
134                 ifp->if_init = (void *)log_dummy;
135                 ifp->if_ioctl = log_dummy;
136                 ifp->if_start = ipfw_log_start;
137                 ifp->if_output = ipfw_log_output;
138                 ifp->if_addrlen = 6;
139                 ifp->if_hdrlen = 14;
140                 if_attach(ifp);
141                 ifp->if_broadcastaddr = ipfwbroadcastaddr;
142                 ifp->if_baudrate = IF_Mbps(10);
143                 bpfattach(ifp, DLT_EN10MB, 14);
144                 log_if = ifp;
145         } else {
146                 if (log_if) {
147                         ether_ifdetach(log_if);
148                         if_free(log_if);
149                 }
150                 log_if = NULL;
151         }
152 }
153 #endif /* !WITHOUT_BPF */
154
155 /*
156  * We enter here when we have a rule with O_LOG.
157  * XXX this function alone takes about 2Kbytes of code!
158  */
159 void
160 ipfw_log(struct ip_fw *f, u_int hlen, struct ip_fw_args *args,
161     struct mbuf *m, struct ifnet *oif, u_short offset, uint32_t tablearg,
162     struct ip *ip)
163 {
164         char *action;
165         int limit_reached = 0;
166         char action2[92], proto[128], fragment[32];
167
168         if (V_fw_verbose == 0) {
169 #ifndef WITHOUT_BPF
170
171                 if (log_if == NULL || log_if->if_bpf == NULL)
172                         return;
173
174                 if (args->eh) /* layer2, use orig hdr */
175                         BPF_MTAP2(log_if, args->eh, ETHER_HDR_LEN, m);
176                 else
177                         /* Add fake header. Later we will store
178                          * more info in the header.
179                          */
180                         BPF_MTAP2(log_if, "DDDDDDSSSSSS\x08\x00", ETHER_HDR_LEN, m);
181 #endif /* !WITHOUT_BPF */
182                 return;
183         }
184         /* the old 'log' function */
185         fragment[0] = '\0';
186         proto[0] = '\0';
187
188         if (f == NULL) {        /* bogus pkt */
189                 if (V_verbose_limit != 0 && V_norule_counter >= V_verbose_limit)
190                         return;
191                 V_norule_counter++;
192                 if (V_norule_counter == V_verbose_limit)
193                         limit_reached = V_verbose_limit;
194                 action = "Refuse";
195         } else {        /* O_LOG is the first action, find the real one */
196                 ipfw_insn *cmd = ACTION_PTR(f);
197                 ipfw_insn_log *l = (ipfw_insn_log *)cmd;
198
199                 if (l->max_log != 0 && l->log_left == 0)
200                         return;
201                 l->log_left--;
202                 if (l->log_left == 0)
203                         limit_reached = l->max_log;
204                 cmd += F_LEN(cmd);      /* point to first action */
205                 if (cmd->opcode == O_ALTQ) {
206                         ipfw_insn_altq *altq = (ipfw_insn_altq *)cmd;
207
208                         snprintf(SNPARGS(action2, 0), "Altq %d",
209                                 altq->qid);
210                         cmd += F_LEN(cmd);
211                 }
212                 if (cmd->opcode == O_PROB || cmd->opcode == O_TAG ||
213                     cmd->opcode == O_SETDSCP)
214                         cmd += F_LEN(cmd);
215
216                 action = action2;
217                 switch (cmd->opcode) {
218                 case O_DENY:
219                         action = "Deny";
220                         break;
221
222                 case O_REJECT:
223                         if (cmd->arg1==ICMP_REJECT_RST)
224                                 action = "Reset";
225                         else if (cmd->arg1==ICMP_UNREACH_HOST)
226                                 action = "Reject";
227                         else
228                                 snprintf(SNPARGS(action2, 0), "Unreach %d",
229                                         cmd->arg1);
230                         break;
231
232                 case O_UNREACH6:
233                         if (cmd->arg1==ICMP6_UNREACH_RST)
234                                 action = "Reset";
235                         else
236                                 snprintf(SNPARGS(action2, 0), "Unreach %d",
237                                         cmd->arg1);
238                         break;
239
240                 case O_ACCEPT:
241                         action = "Accept";
242                         break;
243                 case O_COUNT:
244                         action = "Count";
245                         break;
246                 case O_DIVERT:
247                         snprintf(SNPARGS(action2, 0), "Divert %d",
248                                 cmd->arg1);
249                         break;
250                 case O_TEE:
251                         snprintf(SNPARGS(action2, 0), "Tee %d",
252                                 cmd->arg1);
253                         break;
254                 case O_SETFIB:
255                         snprintf(SNPARGS(action2, 0), "SetFib %d",
256                                 IP_FW_ARG_TABLEARG(cmd->arg1));
257                         break;
258                 case O_SKIPTO:
259                         snprintf(SNPARGS(action2, 0), "SkipTo %d",
260                                 IP_FW_ARG_TABLEARG(cmd->arg1));
261                         break;
262                 case O_PIPE:
263                         snprintf(SNPARGS(action2, 0), "Pipe %d",
264                                 IP_FW_ARG_TABLEARG(cmd->arg1));
265                         break;
266                 case O_QUEUE:
267                         snprintf(SNPARGS(action2, 0), "Queue %d",
268                                 IP_FW_ARG_TABLEARG(cmd->arg1));
269                         break;
270                 case O_FORWARD_IP: {
271                         ipfw_insn_sa *sa = (ipfw_insn_sa *)cmd;
272                         int len;
273                         struct in_addr dummyaddr;
274                         if (sa->sa.sin_addr.s_addr == INADDR_ANY)
275                                 dummyaddr.s_addr = htonl(tablearg);
276                         else
277                                 dummyaddr.s_addr = sa->sa.sin_addr.s_addr;
278
279                         len = snprintf(SNPARGS(action2, 0), "Forward to %s",
280                                 inet_ntoa(dummyaddr));
281
282                         if (sa->sa.sin_port)
283                                 snprintf(SNPARGS(action2, len), ":%d",
284                                     sa->sa.sin_port);
285                         }
286                         break;
287 #ifdef INET6
288                 case O_FORWARD_IP6: {
289                         char buf[INET6_ADDRSTRLEN];
290                         ipfw_insn_sa6 *sa = (ipfw_insn_sa6 *)cmd;
291                         int len;
292
293                         len = snprintf(SNPARGS(action2, 0), "Forward to [%s]",
294                             ip6_sprintf(buf, &sa->sa.sin6_addr));
295
296                         if (sa->sa.sin6_port)
297                                 snprintf(SNPARGS(action2, len), ":%u",
298                                     sa->sa.sin6_port);
299                         }
300                         break;
301 #endif
302                 case O_NETGRAPH:
303                         snprintf(SNPARGS(action2, 0), "Netgraph %d",
304                                 cmd->arg1);
305                         break;
306                 case O_NGTEE:
307                         snprintf(SNPARGS(action2, 0), "Ngtee %d",
308                                 cmd->arg1);
309                         break;
310                 case O_NAT:
311                         action = "Nat";
312                         break;
313                 case O_REASS:
314                         action = "Reass";
315                         break;
316                 case O_CALLRETURN:
317                         if (cmd->len & F_NOT)
318                                 action = "Return";
319                         else
320                                 snprintf(SNPARGS(action2, 0), "Call %d",
321                                     cmd->arg1);
322                         break;
323                 default:
324                         action = "UNKNOWN";
325                         break;
326                 }
327         }
328
329         if (hlen == 0) {        /* non-ip */
330                 snprintf(SNPARGS(proto, 0), "MAC");
331
332         } else {
333                 int len;
334 #ifdef INET6
335                 char src[INET6_ADDRSTRLEN + 2], dst[INET6_ADDRSTRLEN + 2];
336 #else
337                 char src[INET_ADDRSTRLEN], dst[INET_ADDRSTRLEN];
338 #endif
339                 struct icmphdr *icmp;
340                 struct tcphdr *tcp;
341                 struct udphdr *udp;
342 #ifdef INET6
343                 struct ip6_hdr *ip6 = NULL;
344                 struct icmp6_hdr *icmp6;
345                 u_short ip6f_mf;
346 #endif
347                 src[0] = '\0';
348                 dst[0] = '\0';
349 #ifdef INET6
350                 ip6f_mf = offset & IP6F_MORE_FRAG;
351                 offset &= IP6F_OFF_MASK;
352
353                 if (IS_IP6_FLOW_ID(&(args->f_id))) {
354                         char ip6buf[INET6_ADDRSTRLEN];
355                         snprintf(src, sizeof(src), "[%s]",
356                             ip6_sprintf(ip6buf, &args->f_id.src_ip6));
357                         snprintf(dst, sizeof(dst), "[%s]",
358                             ip6_sprintf(ip6buf, &args->f_id.dst_ip6));
359
360                         ip6 = (struct ip6_hdr *)ip;
361                         tcp = (struct tcphdr *)(((char *)ip) + hlen);
362                         udp = (struct udphdr *)(((char *)ip) + hlen);
363                 } else
364 #endif
365                 {
366                         tcp = L3HDR(struct tcphdr, ip);
367                         udp = L3HDR(struct udphdr, ip);
368
369                         inet_ntop(AF_INET, &ip->ip_src, src, sizeof(src));
370                         inet_ntop(AF_INET, &ip->ip_dst, dst, sizeof(dst));
371                 }
372
373                 switch (args->f_id.proto) {
374                 case IPPROTO_TCP:
375                         len = snprintf(SNPARGS(proto, 0), "TCP %s", src);
376                         if (offset == 0)
377                                 snprintf(SNPARGS(proto, len), ":%d %s:%d",
378                                     ntohs(tcp->th_sport),
379                                     dst,
380                                     ntohs(tcp->th_dport));
381                         else
382                                 snprintf(SNPARGS(proto, len), " %s", dst);
383                         break;
384
385                 case IPPROTO_UDP:
386                         len = snprintf(SNPARGS(proto, 0), "UDP %s", src);
387                         if (offset == 0)
388                                 snprintf(SNPARGS(proto, len), ":%d %s:%d",
389                                     ntohs(udp->uh_sport),
390                                     dst,
391                                     ntohs(udp->uh_dport));
392                         else
393                                 snprintf(SNPARGS(proto, len), " %s", dst);
394                         break;
395
396                 case IPPROTO_ICMP:
397                         icmp = L3HDR(struct icmphdr, ip);
398                         if (offset == 0)
399                                 len = snprintf(SNPARGS(proto, 0),
400                                     "ICMP:%u.%u ",
401                                     icmp->icmp_type, icmp->icmp_code);
402                         else
403                                 len = snprintf(SNPARGS(proto, 0), "ICMP ");
404                         len += snprintf(SNPARGS(proto, len), "%s", src);
405                         snprintf(SNPARGS(proto, len), " %s", dst);
406                         break;
407 #ifdef INET6
408                 case IPPROTO_ICMPV6:
409                         icmp6 = (struct icmp6_hdr *)(((char *)ip) + hlen);
410                         if (offset == 0)
411                                 len = snprintf(SNPARGS(proto, 0),
412                                     "ICMPv6:%u.%u ",
413                                     icmp6->icmp6_type, icmp6->icmp6_code);
414                         else
415                                 len = snprintf(SNPARGS(proto, 0), "ICMPv6 ");
416                         len += snprintf(SNPARGS(proto, len), "%s", src);
417                         snprintf(SNPARGS(proto, len), " %s", dst);
418                         break;
419 #endif
420                 default:
421                         len = snprintf(SNPARGS(proto, 0), "P:%d %s",
422                             args->f_id.proto, src);
423                         snprintf(SNPARGS(proto, len), " %s", dst);
424                         break;
425                 }
426
427 #ifdef INET6
428                 if (IS_IP6_FLOW_ID(&(args->f_id))) {
429                         if (offset & (IP6F_OFF_MASK | IP6F_MORE_FRAG))
430                                 snprintf(SNPARGS(fragment, 0),
431                                     " (frag %08x:%d@%d%s)",
432                                     args->f_id.extra,
433                                     ntohs(ip6->ip6_plen) - hlen,
434                                     ntohs(offset) << 3, ip6f_mf ? "+" : "");
435                 } else
436 #endif
437                 {
438                         int ipoff, iplen;
439                         ipoff = ntohs(ip->ip_off);
440                         iplen = ntohs(ip->ip_len);
441                         if (ipoff & (IP_MF | IP_OFFMASK))
442                                 snprintf(SNPARGS(fragment, 0),
443                                     " (frag %d:%d@%d%s)",
444                                     ntohs(ip->ip_id), iplen - (ip->ip_hl << 2),
445                                     offset << 3,
446                                     (ipoff & IP_MF) ? "+" : "");
447                 }
448         }
449 #ifdef __FreeBSD__
450         if (oif || m->m_pkthdr.rcvif)
451                 log(LOG_SECURITY | LOG_INFO,
452                     "ipfw: %d %s %s %s via %s%s\n",
453                     f ? f->rulenum : -1,
454                     action, proto, oif ? "out" : "in",
455                     oif ? oif->if_xname : m->m_pkthdr.rcvif->if_xname,
456                     fragment);
457         else
458 #endif
459                 log(LOG_SECURITY | LOG_INFO,
460                     "ipfw: %d %s %s [no if info]%s\n",
461                     f ? f->rulenum : -1,
462                     action, proto, fragment);
463         if (limit_reached)
464                 log(LOG_SECURITY | LOG_NOTICE,
465                     "ipfw: limit %d reached on entry %d\n",
466                     limit_reached, f ? f->rulenum : -1);
467 }
468 /* end of file */