1/*
2 * Copyright (C) 1997-2003 by Darren Reed.
3 *
4 * See the IPFILTER.LICENCE file for details on licencing.
5 *
6 * $Id: ip_log.c,v 2.75.2.7 2005/06/11 07:47:44 darrenr Exp $
7 *
8 * Copyright 2008 Sun Microsystems, Inc.  All rights reserved.
9 * Use is subject to license terms.
10 *
11 * Copyright (c) 2014, Joyent, Inc.  All rights reserved.
12 */
13
14#include <sys/param.h>
15#if defined(KERNEL) || defined(_KERNEL)
16# undef KERNEL
17# undef _KERNEL
18# define        KERNEL	1
19# define        _KERNEL	1
20#endif
21#if defined(__NetBSD__) && (NetBSD >= 199905) && !defined(IPFILTER_LKM) && \
22    defined(_KERNEL)
23# include "opt_ipfilter_log.h"
24#endif
25#if defined(__FreeBSD__) && !defined(IPFILTER_LKM)
26# if defined(_KERNEL)
27#  if defined(__FreeBSD_version) && (__FreeBSD_version >= 300000)
28#   include "opt_ipfilter.h"
29#  endif
30# else
31#  include <osreldate.h>
32# endif
33#endif
34#ifdef SOLARIS
35#undef	SOLARIS
36#endif
37#if (defined(sun) && (defined(__svr4__) || defined(__SVR4)))
38#define	SOLARIS	(1)
39#else
40#define	SOLARIS	(0)
41#endif
42#include <sys/errno.h>
43#include <sys/types.h>
44#include <sys/file.h>
45#ifndef _KERNEL
46# include <stdio.h>
47# include <string.h>
48# include <stdlib.h>
49# include <ctype.h>
50# define _KERNEL
51# define KERNEL
52# ifdef __OpenBSD__
53struct file;
54# endif
55# include <sys/uio.h>
56# undef _KERNEL
57# undef KERNEL
58#endif
59#if __FreeBSD_version >= 220000 && defined(_KERNEL)
60# include <sys/fcntl.h>
61# include <sys/filio.h>
62#else
63# include <sys/ioctl.h>
64#endif
65#include <sys/time.h>
66#if defined(_KERNEL)
67# include <sys/systm.h>
68# if defined(NetBSD) && (__NetBSD_Version__ >= 104000000)
69#  include <sys/proc.h>
70# endif
71#endif /* _KERNEL */
72#if !defined(SOLARIS) && !defined(__hpux) && !defined(linux)
73# if (NetBSD > 199609) || (OpenBSD > 199603) || (__FreeBSD_version >= 300000)
74#  include <sys/dirent.h>
75# else
76#  include <sys/dir.h>
77# endif
78# include <sys/mbuf.h>
79#else
80# if !defined(__hpux) && defined(_KERNEL)
81#  include <sys/filio.h>
82#  include <sys/cred.h>
83#  include <sys/ddi.h>
84#  include <sys/sunddi.h>
85#  include <sys/ksynch.h>
86#  include <sys/kmem.h>
87#  include <sys/mkdev.h>
88#  include <sys/dditypes.h>
89#  include <sys/cmn_err.h>
90# endif /* !__hpux */
91#endif /* !SOLARIS && !__hpux */
92#if !defined(linux)
93# include <sys/protosw.h>
94#endif
95#include <sys/socket.h>
96
97#include <net/if.h>
98#ifdef sun
99# include <net/af.h>
100#endif
101#if __FreeBSD_version >= 300000
102# include <net/if_var.h>
103#endif
104#include <net/route.h>
105#include <netinet/in.h>
106#ifdef __sgi
107# include <sys/ddi.h>
108# ifdef IFF_DRVRLOCK /* IRIX6 */
109#  include <sys/hashing.h>
110# endif
111#endif
112#if !defined(__hpux) && !defined(linux) && \
113    !(defined(__sgi) && !defined(IFF_DRVRLOCK)) /*IRIX<6*/
114# include <netinet/in_var.h>
115#endif
116#include <netinet/in_systm.h>
117#include <netinet/ip.h>
118#include <netinet/tcp.h>
119#include <netinet/udp.h>
120#include <netinet/ip_icmp.h>
121#ifdef USE_INET6
122# include <netinet/icmp6.h>
123#endif
124#if !defined(linux)
125# include <netinet/ip_var.h>
126#endif
127#ifndef _KERNEL
128# include <syslog.h>
129#endif
130#include "netinet/ip_compat.h"
131#include <netinet/tcpip.h>
132#include "netinet/ip_fil.h"
133#include "netinet/ip_nat.h"
134#include "netinet/ip_frag.h"
135#include "netinet/ip_state.h"
136#include "netinet/ip_auth.h"
137#include "netinet/ipf_stack.h"
138#if (__FreeBSD_version >= 300000) || defined(__NetBSD__)
139# include <sys/malloc.h>
140#endif
141/* END OF INCLUDES */
142
143#ifdef	IPFILTER_LOG
144
145# if defined(IPL_SELECT)
146#  include	<machine/sys/user.h>
147#  include	<sys/kthread_iface.h>
148#  define	READ_COLLISION	0x001
149
150iplog_select_t	iplog_ss[IPL_LOGMAX+1];
151
152extern int selwait;
153# endif /* IPL_SELECT */
154
155/* ipl_magic never changes */
156int	ipl_magic[IPL_LOGSIZE] = { IPL_MAGIC, IPL_MAGIC_NAT, IPL_MAGIC_STATE,
157				   IPL_MAGIC, IPL_MAGIC, IPL_MAGIC,
158				   IPL_MAGIC, IPL_MAGIC };
159
160/* ------------------------------------------------------------------------ */
161/* Function:    fr_loginit                                                  */
162/* Returns:     int - 0 == success (always returned)                        */
163/* Parameters:  Nil                                                         */
164/*                                                                          */
165/* Initialise log buffers & pointers.  Also iniialised the CRC to a local   */
166/* secret for use in calculating the "last log checksum".                   */
167/* ------------------------------------------------------------------------ */
168int fr_loginit(ifs)
169ipf_stack_t *ifs;
170{
171	int	i;
172
173	for (i = IPL_LOGMAX; i >= 0; i--) {
174		ifs->ifs_iplt[i] = NULL;
175		ifs->ifs_ipll[i] = NULL;
176		ifs->ifs_iplh[i] = &ifs->ifs_iplt[i];
177		ifs->ifs_iplused[i] = 0;
178		bzero((char *)&ifs->ifs_iplcrc[i], sizeof(ifs->ifs_iplcrc[i]));
179# ifdef	IPL_SELECT
180		iplog_ss[i].read_waiter = 0;
181		iplog_ss[i].state = 0;
182# endif
183# if defined(linux) && defined(_KERNEL)
184		init_waitqueue_head(iplh_linux + i);
185# endif
186	}
187
188# if defined(SOLARIS) && defined(_KERNEL)
189	cv_init(&ifs->ifs_iplwait, "ipl condvar", CV_DRIVER, NULL);
190# endif
191	MUTEX_INIT(&ifs->ifs_ipl_mutex, "ipf log mutex");
192
193	ifs->ifs_ipl_log_init = 1;
194
195	return 0;
196}
197
198
199/* ------------------------------------------------------------------------ */
200/* Function:    fr_logunload                                                */
201/* Returns:     Nil                                                         */
202/* Parameters:  Nil                                                         */
203/*                                                                          */
204/* Clean up any log data that has accumulated without being read.           */
205/* ------------------------------------------------------------------------ */
206void fr_logunload(ifs)
207ipf_stack_t *ifs;
208{
209	int i;
210
211	if (ifs->ifs_ipl_log_init == 0)
212		return;
213
214	for (i = IPL_LOGMAX; i >= 0; i--)
215		(void) ipflog_clear(i, ifs);
216
217# if defined(SOLARIS) && defined(_KERNEL)
218	cv_destroy(&ifs->ifs_iplwait);
219# endif
220	MUTEX_DESTROY(&ifs->ifs_ipl_mutex);
221
222	ifs->ifs_ipl_log_init = 0;
223}
224
225
226/* ------------------------------------------------------------------------ */
227/* Function:    ipflog                                                      */
228/* Returns:     int - 0 == success, -1 == failure                           */
229/* Parameters:  fin(I)   - pointer to packet information                    */
230/*              flags(I) - flags from filter rules                          */
231/*                                                                          */
232/* Create a log record for a packet given that it has been triggered by a   */
233/* rule (or the default setting).  Calculate the transport protocol header  */
234/* size using predetermined size of a couple of popular protocols and thus  */
235/* how much data to copy into the log, including part of the data body if   */
236/* requested.                                                               */
237/* ------------------------------------------------------------------------ */
238int ipflog(fin, flags)
239fr_info_t *fin;
240u_int flags;
241{
242	register size_t hlen;
243	int types[2], mlen;
244	size_t sizes[2];
245	void *ptrs[2];
246	ipflog_t ipfl;
247	u_char p;
248	mb_t *m;
249# if defined(SOLARIS) && defined(_KERNEL)
250	net_handle_t nif;
251	void *ifp;
252# else
253#  if defined(__hpux) && defined(_KERNEL)
254	qif_t *ifp;
255#  else
256	struct ifnet *ifp;
257#  endif
258# endif /* SOLARIS */
259	ipf_stack_t *ifs = fin->fin_ifs;
260
261	ipfl.fl_nattag.ipt_num[0] = 0;
262	m = fin->fin_m;
263	ifp = fin->fin_ifp;
264	hlen = fin->fin_hlen;
265	/*
266	 * calculate header size.
267	 */
268	if (fin->fin_off == 0) {
269		p = fin->fin_fi.fi_p;
270		if (p == IPPROTO_TCP)
271			hlen += MIN(sizeof(tcphdr_t), fin->fin_dlen);
272		else if (p == IPPROTO_UDP)
273			hlen += MIN(sizeof(udphdr_t), fin->fin_dlen);
274		else if (p == IPPROTO_ICMP) {
275			struct icmp *icmp;
276
277			icmp = (struct icmp *)fin->fin_dp;
278
279			/*
280			 * For ICMP, if the packet is an error packet, also
281			 * include the information about the packet which
282			 * caused the error.
283			 */
284			switch (icmp->icmp_type)
285			{
286			case ICMP_UNREACH :
287			case ICMP_SOURCEQUENCH :
288			case ICMP_REDIRECT :
289			case ICMP_TIMXCEED :
290			case ICMP_PARAMPROB :
291				hlen += MIN(sizeof(struct icmp) + 8,
292					    fin->fin_dlen);
293				break;
294			default :
295				hlen += MIN(sizeof(struct icmp),
296					    fin->fin_dlen);
297				break;
298			}
299		}
300# ifdef USE_INET6
301		else if (p == IPPROTO_ICMPV6) {
302			struct icmp6_hdr *icmp;
303
304			icmp = (struct icmp6_hdr *)fin->fin_dp;
305
306			/*
307			 * For ICMPV6, if the packet is an error packet, also
308			 * include the information about the packet which
309			 * caused the error.
310			 */
311			if (icmp->icmp6_type < 128) {
312				hlen += MIN(sizeof(struct icmp6_hdr) + 8,
313					    fin->fin_dlen);
314			} else {
315				hlen += MIN(sizeof(struct icmp6_hdr),
316					    fin->fin_dlen);
317			}
318		}
319# endif
320	}
321	/*
322	 * Get the interface number and name to which this packet is
323	 * currently associated.
324	 */
325# if defined(SOLARIS) && defined(_KERNEL)
326	ipfl.fl_unit = (u_int)0;
327	nif = NULL;
328	if (fin->fin_fi.fi_v == 4)
329		nif = ifs->ifs_ipf_ipv4;
330	else if (fin->fin_fi.fi_v == 6)
331		nif = ifs->ifs_ipf_ipv6;
332	if (nif != NULL) {
333		if (net_getifname(nif, (phy_if_t)ifp,
334		    ipfl.fl_ifname, sizeof(ipfl.fl_ifname)) != 0)
335			return (-1);
336	}
337
338# else
339#  if defined(__hpux) && defined(_KERNEL)
340	ipfl.fl_unit = (u_int)0;
341	(void) strncpy(ipfl.fl_ifname, IFNAME(ifp), sizeof(ipfl.fl_ifname));
342#  else
343#   if (defined(NetBSD) && (NetBSD <= 1991011) && (NetBSD >= 199603)) || \
344       (defined(OpenBSD) && (OpenBSD >= 199603)) || defined(linux) || \
345       (defined(__FreeBSD__) && (__FreeBSD_version >= 501113))
346	COPYIFNAME(ifp, ipfl.fl_ifname);
347#   else
348	ipfl.fl_unit = (u_int)ifp->if_unit;
349#    if defined(_KERNEL)
350	if ((ipfl.fl_ifname[0] = ifp->if_name[0]))
351		if ((ipfl.fl_ifname[1] = ifp->if_name[1]))
352			if ((ipfl.fl_ifname[2] = ifp->if_name[2]))
353				ipfl.fl_ifname[3] = ifp->if_name[3];
354#    else
355	(void) strncpy(ipfl.fl_ifname, IFNAME(ifp), sizeof(ipfl.fl_ifname));
356	ipfl.fl_ifname[sizeof(ipfl.fl_ifname) - 1] = '\0';
357#    endif
358#   endif
359#  endif /* __hpux */
360# endif /* SOLARIS */
361	mlen = fin->fin_plen - hlen;
362	if (!ifs->ifs_ipl_logall) {
363		mlen = (flags & FR_LOGBODY) ? MIN(mlen, 128) : 0;
364	} else if ((flags & FR_LOGBODY) == 0) {
365		mlen = 0;
366	}
367	if (mlen < 0)
368		mlen = 0;
369	ipfl.fl_plen = (u_char)mlen;
370	ipfl.fl_hlen = (u_char)hlen;
371	ipfl.fl_rule = fin->fin_rule;
372	(void) strncpy(ipfl.fl_group, fin->fin_group, FR_GROUPLEN);
373	if (fin->fin_fr != NULL) {
374		ipfl.fl_loglevel = fin->fin_fr->fr_loglevel;
375		ipfl.fl_logtag = fin->fin_fr->fr_logtag;
376	} else {
377		ipfl.fl_loglevel = 0xffff;
378		ipfl.fl_logtag = FR_NOLOGTAG;
379	}
380	if (fin->fin_nattag != NULL)
381		bcopy(fin->fin_nattag, (void *)&ipfl.fl_nattag,
382		      sizeof(ipfl.fl_nattag));
383	ipfl.fl_flags = flags;
384	ipfl.fl_dir = fin->fin_out;
385	ipfl.fl_lflags = fin->fin_flx;
386	ptrs[0] = (void *)&ipfl;
387	sizes[0] = sizeof(ipfl);
388	types[0] = 0;
389# if defined(MENTAT) && defined(_KERNEL)
390	/*
391	 * Are we copied from the mblk or an aligned array ?
392	 */
393	if (fin->fin_ip == (ip_t *)m->b_rptr) {
394		ptrs[1] = m;
395		sizes[1] = hlen + mlen;
396		types[1] = 1;
397	} else {
398		ptrs[1] = fin->fin_ip;
399		sizes[1] = hlen + mlen;
400		types[1] = 0;
401	}
402# else
403	ptrs[1] = m;
404	sizes[1] = hlen + mlen;
405	types[1] = 1;
406# endif /* MENTAT */
407	return ipllog(IPL_LOGIPF, fin, ptrs, sizes, types, 2, fin->fin_ifs);
408}
409
410
411/* ------------------------------------------------------------------------ */
412/* Function:    ipllog                                                      */
413/* Returns:     int - 0 == success, -1 == failure                           */
414/* Parameters:  dev(I)    - device that owns this log record                */
415/*              fin(I)    - pointer to packet information                   */
416/*              items(I)  - array of pointers to log data                   */
417/*              itemsz(I) - array of size of valid memory pointed to        */
418/*              types(I)  - type of data pointed to by items pointers       */
419/*              cnt(I)    - number of elements in arrays items/itemsz/types */
420/*                                                                          */
421/* Takes an array of parameters and constructs one record to include the    */
422/* miscellaneous packet information, as well as packet data, for reading    */
423/* from the log device.                                                     */
424/* ------------------------------------------------------------------------ */
425int ipllog(dev, fin, items, itemsz, types, cnt, ifs)
426int dev;
427fr_info_t *fin;
428void **items;
429size_t *itemsz;
430int *types, cnt;
431ipf_stack_t *ifs;
432{
433	caddr_t buf, ptr;
434	iplog_t *ipl;
435	size_t len;
436	int i;
437	SPL_INT(s);
438
439	/*
440	 * Check to see if this log record has a CRC which matches the last
441	 * record logged.  If it does, just up the count on the previous one
442	 * rather than create a new one.
443	 */
444	if (ifs->ifs_ipl_suppress) {
445		MUTEX_ENTER(&ifs->ifs_ipl_mutex);
446		if ((fin != NULL) && (fin->fin_off == 0)) {
447			if ((ifs->ifs_ipll[dev] != NULL) &&
448			    bcmp((char *)fin, (char *)&ifs->ifs_iplcrc[dev],
449				 FI_LCSIZE) == 0) {
450				ifs->ifs_ipll[dev]->ipl_count++;
451				MUTEX_EXIT(&ifs->ifs_ipl_mutex);
452				return 0;
453			}
454			bcopy((char *)fin, (char *)&ifs->ifs_iplcrc[dev],
455			      FI_LCSIZE);
456		} else
457			bzero((char *)&ifs->ifs_iplcrc[dev], FI_CSIZE);
458		MUTEX_EXIT(&ifs->ifs_ipl_mutex);
459	}
460
461	/*
462	 * Get the total amount of data to be logged.
463	 */
464	for (i = 0, len = sizeof(iplog_t); i < cnt; i++)
465		len += itemsz[i];
466
467	/*
468	 * check that we have space to record this information and can
469	 * allocate that much.
470	 */
471	KMALLOCS(buf, caddr_t, len);
472	if (buf == NULL)
473		return -1;
474	SPL_NET(s);
475	MUTEX_ENTER(&ifs->ifs_ipl_mutex);
476	if ((ifs->ifs_iplused[dev] + len) > IPFILTER_LOGSIZE) {
477		MUTEX_EXIT(&ifs->ifs_ipl_mutex);
478		SPL_X(s);
479		KFREES(buf, len);
480		return -1;
481	}
482	ifs->ifs_iplused[dev] += len;
483	MUTEX_EXIT(&ifs->ifs_ipl_mutex);
484	SPL_X(s);
485
486	/*
487	 * advance the log pointer to the next empty record and deduct the
488	 * amount of space we're going to use.
489	 */
490	ipl = (iplog_t *)buf;
491	ipl->ipl_magic = ipl_magic[dev];
492	ipl->ipl_count = 1;
493	ipl->ipl_next = NULL;
494	ipl->ipl_dsize = len;
495#ifdef _KERNEL
496	GETKTIME(&ipl->ipl_sec);
497#else
498	ipl->ipl_sec = 0;
499	ipl->ipl_usec = 0;
500#endif
501
502	/*
503	 * Loop through all the items to be logged, copying each one to the
504	 * buffer.  Use bcopy for normal data or the mb_t copyout routine.
505	 */
506	for (i = 0, ptr = buf + sizeof(*ipl); i < cnt; i++) {
507		if (types[i] == 0) {
508			bcopy(items[i], ptr, itemsz[i]);
509		} else if (types[i] == 1) {
510			COPYDATA(items[i], 0, itemsz[i], ptr);
511		}
512		ptr += itemsz[i];
513	}
514	SPL_NET(s);
515	MUTEX_ENTER(&ifs->ifs_ipl_mutex);
516	ifs->ifs_ipll[dev] = ipl;
517	*ifs->ifs_iplh[dev] = ipl;
518	ifs->ifs_iplh[dev] = &ipl->ipl_next;
519
520	/*
521	 * Now that the log record has been completed and added to the queue,
522	 * wake up any listeners who may want to read it.
523	 */
524# if defined(SOLARIS) && defined(_KERNEL)
525	cv_signal(&ifs->ifs_iplwait);
526	MUTEX_EXIT(&ifs->ifs_ipl_mutex);
527# else
528	MUTEX_EXIT(&ifs->ifs_ipl_mutex);
529	WAKEUP(&ifs->ifs_iplh, dev);
530# endif
531	SPL_X(s);
532# ifdef	IPL_SELECT
533	iplog_input_ready(dev);
534# endif
535	return 0;
536}
537
538
539/* ------------------------------------------------------------------------ */
540/* Function:    ipflog_read                                                 */
541/* Returns:     int    - 0 == success, else error value.                    */
542/* Parameters:  unit(I) - device we are reading from                        */
543/*              uio(O)  - pointer to information about where to store data  */
544/*                                                                          */
545/* Called to handle a read on an IPFilter device.  Returns only complete    */
546/* log messages - will not partially copy a log record out to userland.     */
547/*                                                                          */
548/* NOTE: This function will block and wait for a signal to return data if   */
549/* there is none present.  Asynchronous I/O is not implemented.             */
550/* ------------------------------------------------------------------------ */
551int ipflog_read(unit, uio, ifs)
552minor_t unit;
553struct uio *uio;
554ipf_stack_t *ifs;
555{
556	size_t dlen, copied;
557	int error = 0;
558	iplog_t *ipl;
559	SPL_INT(s);
560
561	/*
562	 * Sanity checks.  Make sure the minor # is valid and we're copying
563	 * a valid chunk of data.
564	 */
565	if (IPL_LOGMAX < unit)
566		return ENXIO;
567	if (uio->uio_resid == 0)
568		return 0;
569	if ((uio->uio_resid < sizeof(iplog_t)) ||
570	    (uio->uio_resid > ifs->ifs_ipl_logsize))
571		return EINVAL;
572
573	/*
574	 * Lock the log so we can snapshot the variables.  Wait for a signal
575	 * if the log is empty.
576	 */
577	SPL_NET(s);
578	MUTEX_ENTER(&ifs->ifs_ipl_mutex);
579
580	while (ifs->ifs_iplt[unit] == NULL) {
581# if defined(SOLARIS) && defined(_KERNEL)
582		/*
583		 * Prevent a deadlock with ipldetach() - see the "ipfilter
584		 * kernel module mutexes and locking" comment block in solaris.c
585		 * for details.
586		 */
587		RWLOCK_EXIT(&ifs->ifs_ipf_global);
588		if (!cv_wait_sig(&ifs->ifs_iplwait, &ifs->ifs_ipl_mutex.ipf_lk)) {
589			READ_ENTER(&ifs->ifs_ipf_global);
590			MUTEX_EXIT(&ifs->ifs_ipl_mutex);
591			return EINTR;
592		}
593		READ_ENTER(&ifs->ifs_ipf_global);
594# else
595#  if defined(__hpux) && defined(_KERNEL)
596		lock_t *l;
597
598#   ifdef IPL_SELECT
599		if (uio->uio_fpflags & (FNBLOCK|FNDELAY)) {
600			/* this is no blocking system call */
601			MUTEX_EXIT(&ifs->ifs_ipl_mutex);
602			return 0;
603		}
604#   endif
605
606		MUTEX_EXIT(&ifs->ifs_ipl_mutex);
607		l = get_sleep_lock(&ifs->ifs_iplh[unit]);
608		error = sleep(&ifs->ifs_iplh[unit], PZERO+1);
609		spinunlock(l);
610#  else
611#   if defined(__osf__) && defined(_KERNEL)
612		error = mpsleep(&ifs->ifs_iplh[unit], PSUSP|PCATCH,  "iplread", 0,
613				&ifs->ifs_ipl_mutex, MS_LOCK_SIMPLE);
614#   else
615		MUTEX_EXIT(&ifs->ifs_ipl_mutex);
616		SPL_X(s);
617		error = SLEEP(&ifs->ifs_iplh[unit], "ipl sleep");
618#   endif /* __osf__ */
619#  endif /* __hpux */
620		if (error)
621			return error;
622		SPL_NET(s);
623		MUTEX_ENTER(&ifs->ifs_ipl_mutex);
624# endif /* SOLARIS */
625	}
626
627# if (BSD >= 199101) || defined(__FreeBSD__) || defined(__osf__)
628	uio->uio_rw = UIO_READ;
629# endif
630
631	for (copied = 0; ((ipl = ifs->ifs_iplt[unit]) != NULL); copied += dlen) {
632		dlen = ipl->ipl_dsize;
633		if (dlen > uio->uio_resid)
634			break;
635		/*
636		 * Don't hold the mutex over the uiomove call.
637		 */
638		ifs->ifs_iplt[unit] = ipl->ipl_next;
639		ifs->ifs_iplused[unit] -= dlen;
640		if (ifs->ifs_iplt[unit] == NULL) {
641			ifs->ifs_iplh[unit] = &ifs->ifs_iplt[unit];
642			ifs->ifs_ipll[unit] = NULL;
643		}
644		MUTEX_EXIT(&ifs->ifs_ipl_mutex);
645		SPL_X(s);
646		error = UIOMOVE((caddr_t)ipl, dlen, UIO_READ, uio);
647		if (error) {
648			SPL_NET(s);
649			MUTEX_ENTER(&ifs->ifs_ipl_mutex);
650			ifs->ifs_iplused[unit] += dlen;
651			ipl->ipl_next = ifs->ifs_iplt[unit];
652			ifs->ifs_iplt[unit] = ipl;
653			ifs->ifs_ipll[unit] = ipl;
654			if (ifs->ifs_iplh[unit] == &ifs->ifs_iplt[unit]) {
655				*ifs->ifs_iplh[unit] = ipl;
656				ifs->ifs_iplh[unit] = &ipl->ipl_next;
657			}
658			break;
659		}
660		MUTEX_ENTER(&ifs->ifs_ipl_mutex);
661		KFREES((caddr_t)ipl, dlen);
662		SPL_NET(s);
663	}
664
665	MUTEX_EXIT(&ifs->ifs_ipl_mutex);
666	SPL_X(s);
667	return error;
668}
669
670
671/* ------------------------------------------------------------------------ */
672/* Function:    ipflog_clear                                                */
673/* Returns:     int    - number of log bytes cleared.                       */
674/* Parameters:  unit(I) - device we are reading from                        */
675/*                                                                          */
676/* Deletes all queued up log records for a given output device.             */
677/* ------------------------------------------------------------------------ */
678int ipflog_clear(unit, ifs)
679minor_t unit;
680ipf_stack_t *ifs;
681{
682	iplog_t *ipl;
683	int used;
684	SPL_INT(s);
685
686	SPL_NET(s);
687	MUTEX_ENTER(&ifs->ifs_ipl_mutex);
688	while ((ipl = ifs->ifs_iplt[unit]) != NULL) {
689		ifs->ifs_iplt[unit] = ipl->ipl_next;
690		KFREES((caddr_t)ipl, ipl->ipl_dsize);
691	}
692	ifs->ifs_iplh[unit] = &ifs->ifs_iplt[unit];
693	ifs->ifs_ipll[unit] = NULL;
694	used = ifs->ifs_iplused[unit];
695	ifs->ifs_iplused[unit] = 0;
696	bzero((char *)&ifs->ifs_iplcrc[unit], FI_CSIZE);
697	MUTEX_EXIT(&ifs->ifs_ipl_mutex);
698	SPL_X(s);
699	return used;
700}
701#endif /* IPFILTER_LOG */
702