484 lines
10 KiB
C
484 lines
10 KiB
C
/*
|
|
* Copyright (C) 1997 by Darren Reed.
|
|
*
|
|
* Redistribution and use in source and binary forms are permitted
|
|
* provided that this notice is preserved and due credit is given
|
|
* to the original author and the contributors.
|
|
*
|
|
* $Id: ip_log.c,v 1.5 1998/11/26 18:54:52 eivind Exp $
|
|
*/
|
|
#include "opt_ipfilter.h"
|
|
|
|
#ifdef IPFILTER_LOG
|
|
# ifndef SOLARIS
|
|
# define SOLARIS (defined(sun) && (defined(__svr4__) || defined(__SVR4)))
|
|
# endif
|
|
|
|
# if defined(KERNEL) && !defined(_KERNEL)
|
|
# define _KERNEL
|
|
# endif
|
|
# ifdef __FreeBSD__
|
|
# if defined(_KERNEL) && !defined(IPFILTER_LKM)
|
|
# define __FreeBSD_version 300000 /* this will do as a hack */
|
|
# else
|
|
# include <osreldate.h>
|
|
# endif
|
|
# endif
|
|
# ifndef _KERNEL
|
|
# include <stdio.h>
|
|
# include <string.h>
|
|
# include <stdlib.h>
|
|
# include <ctype.h>
|
|
# endif
|
|
# include <sys/errno.h>
|
|
# include <sys/types.h>
|
|
# include <sys/param.h>
|
|
# include <sys/file.h>
|
|
# if __FreeBSD_version >= 220000 && defined(_KERNEL)
|
|
# include <sys/fcntl.h>
|
|
# include <sys/filio.h>
|
|
# else
|
|
# include <sys/ioctl.h>
|
|
# endif
|
|
# include <sys/time.h>
|
|
# if defined(_KERNEL) && !defined(linux)
|
|
# include <sys/systm.h>
|
|
# endif
|
|
# include <sys/uio.h>
|
|
# if !SOLARIS
|
|
# if (NetBSD > 199609) || (OpenBSD > 199603) || defined(__FreeBSD__)
|
|
# include <sys/dirent.h>
|
|
# else
|
|
# include <sys/dir.h>
|
|
# endif
|
|
# ifndef linux
|
|
# include <sys/mbuf.h>
|
|
# endif
|
|
# else
|
|
# include <sys/filio.h>
|
|
# include <sys/cred.h>
|
|
# include <sys/ddi.h>
|
|
# include <sys/sunddi.h>
|
|
# include <sys/ksynch.h>
|
|
# include <sys/kmem.h>
|
|
# include <sys/mkdev.h>
|
|
# include <sys/dditypes.h>
|
|
# include <sys/cmn_err.h>
|
|
# endif
|
|
# ifndef linux
|
|
# include <sys/protosw.h>
|
|
# endif
|
|
# include <sys/socket.h>
|
|
|
|
# include <net/if.h>
|
|
# ifdef sun
|
|
# include <net/af.h>
|
|
# endif
|
|
# if __FreeBSD_version >= 300000
|
|
# include <sys/malloc.h>
|
|
# include <machine/random.h>
|
|
# endif
|
|
# include <net/route.h>
|
|
# include <netinet/in.h>
|
|
# ifdef __sgi
|
|
# include <sys/ddi.h>
|
|
# ifdef IFF_DRVRLOCK /* IRIX6 */
|
|
# include <sys/hashing.h>
|
|
# endif
|
|
# endif
|
|
# if !defined(linux) && !(defined(__sgi) && !defined(IFF_DRVRLOCK)) /*IRIX<6*/
|
|
# include <netinet/in_var.h>
|
|
# endif
|
|
# include <netinet/in_systm.h>
|
|
# include <netinet/ip.h>
|
|
# include <netinet/tcp.h>
|
|
# include <netinet/udp.h>
|
|
# include <netinet/ip_icmp.h>
|
|
# ifndef linux
|
|
# include <netinet/ip_var.h>
|
|
# endif
|
|
# ifndef _KERNEL
|
|
# include <syslog.h>
|
|
# endif
|
|
# include "netinet/ip_compat.h"
|
|
# include <netinet/tcpip.h>
|
|
# include "netinet/ip_fil.h"
|
|
# include "netinet/ip_proxy.h"
|
|
# include "netinet/ip_nat.h"
|
|
# include "netinet/ip_frag.h"
|
|
# include "netinet/ip_state.h"
|
|
# include "netinet/ip_auth.h"
|
|
# ifndef MIN
|
|
# define MIN(a,b) (((a)<(b))?(a):(b))
|
|
# endif
|
|
|
|
|
|
# if SOLARIS || defined(__sgi)
|
|
extern kmutex_t ipl_mutex;
|
|
# if SOLARIS
|
|
extern kcondvar_t iplwait;
|
|
# endif
|
|
# endif
|
|
|
|
iplog_t **iplh[IPL_LOGMAX+1], *iplt[IPL_LOGMAX+1];
|
|
int iplused[IPL_LOGMAX+1];
|
|
static u_long iplcrc[IPL_LOGMAX+1];
|
|
static u_long iplcrcinit;
|
|
#ifdef linux
|
|
static struct wait_queue *iplwait[IPL_LOGMAX+1];
|
|
#endif
|
|
|
|
|
|
/*
|
|
* Initialise log buffers & pointers. Also iniialised the CRC to a local
|
|
* secret for use in calculating the "last log checksum".
|
|
*/
|
|
void ipflog_init()
|
|
{
|
|
int i;
|
|
|
|
for (i = IPL_LOGMAX; i >= 0; i--) {
|
|
iplt[i] = NULL;
|
|
iplh[i] = &iplt[i];
|
|
iplused[i] = 0;
|
|
}
|
|
# if defined(__FreeBSD__) && __FreeBSD_version >= 300000
|
|
read_random(&iplcrcinit, sizeof iplcrcinit);
|
|
# else
|
|
{
|
|
struct timeval tv;
|
|
|
|
#if BSD >= 199306 || defined(__FreeBSD__) || defined(__sgi)
|
|
microtime(&tv);
|
|
# else
|
|
uniqtime(&tv);
|
|
# endif
|
|
iplcrcinit = tv.tv_sec ^ (tv.tv_usec << 8) ^ tv.tv_usec;
|
|
}
|
|
# endif
|
|
}
|
|
|
|
|
|
/*
|
|
* ipflog
|
|
* Create a log record for a packet given that it has been triggered by a
|
|
* rule (or the default setting). Calculate the transport protocol header
|
|
* size using predetermined size of a couple of popular protocols and thus
|
|
* how much data to copy into the log, including part of the data body if
|
|
* requested.
|
|
*/
|
|
int ipflog(flags, ip, fin, m)
|
|
u_int flags;
|
|
ip_t *ip;
|
|
fr_info_t *fin;
|
|
mb_t *m;
|
|
{
|
|
ipflog_t ipfl;
|
|
register int mlen, hlen;
|
|
u_long crc;
|
|
size_t sizes[2];
|
|
void *ptrs[2];
|
|
int types[2];
|
|
# if SOLARIS
|
|
ill_t *ifp = fin->fin_ifp;
|
|
# else
|
|
struct ifnet *ifp = fin->fin_ifp;
|
|
# endif
|
|
|
|
/*
|
|
* calculate header size.
|
|
*/
|
|
hlen = fin->fin_hlen;
|
|
if (ip->ip_p == IPPROTO_TCP)
|
|
hlen += MIN(sizeof(tcphdr_t), fin->fin_dlen);
|
|
else if (ip->ip_p == IPPROTO_UDP)
|
|
hlen += MIN(sizeof(udphdr_t), fin->fin_dlen);
|
|
else if (ip->ip_p == IPPROTO_ICMP) {
|
|
struct icmp *icmp = (struct icmp *)((char *)ip + hlen);
|
|
|
|
/*
|
|
* For ICMP, if the packet is an error packet, also include
|
|
* the information about the packet which caused the error.
|
|
*/
|
|
switch (icmp->icmp_type)
|
|
{
|
|
case ICMP_UNREACH :
|
|
case ICMP_SOURCEQUENCH :
|
|
case ICMP_REDIRECT :
|
|
case ICMP_TIMXCEED :
|
|
case ICMP_PARAMPROB :
|
|
hlen += MIN(sizeof(struct icmp) + 8, fin->fin_dlen);
|
|
break;
|
|
default :
|
|
hlen += MIN(sizeof(struct icmp), fin->fin_dlen);
|
|
break;
|
|
}
|
|
}
|
|
/*
|
|
* Get the interface number and name to which this packet is
|
|
* currently associated.
|
|
*/
|
|
# if SOLARIS
|
|
ipfl.fl_unit = (u_char)ifp->ill_ppa;
|
|
bcopy(ifp->ill_name, ipfl.fl_ifname, MIN(ifp->ill_name_length, 4));
|
|
mlen = (flags & FR_LOGBODY) ? MIN(msgdsize(m) - hlen, 128) : 0;
|
|
# else
|
|
# if (defined(NetBSD) && (NetBSD <= 1991011) && (NetBSD >= 199603)) || \
|
|
(defined(OpenBSD) && (OpenBSD >= 199603))
|
|
strncpy(ipfl.fl_ifname, ifp->if_xname, IFNAMSIZ);
|
|
# else
|
|
# ifndef linux
|
|
ipfl.fl_unit = (u_char)ifp->if_unit;
|
|
# endif
|
|
if ((ipfl.fl_ifname[0] = ifp->if_name[0]))
|
|
if ((ipfl.fl_ifname[1] = ifp->if_name[1]))
|
|
if ((ipfl.fl_ifname[2] = ifp->if_name[2]))
|
|
ipfl.fl_ifname[3] = ifp->if_name[3];
|
|
# endif
|
|
mlen = (flags & FR_LOGBODY) ? MIN(ip->ip_len - hlen, 128) : 0;
|
|
# endif
|
|
ipfl.fl_plen = (u_char)mlen;
|
|
ipfl.fl_hlen = (u_char)hlen;
|
|
ipfl.fl_rule = fin->fin_rule;
|
|
ipfl.fl_group = fin->fin_group;
|
|
ipfl.fl_flags = flags;
|
|
ptrs[0] = (void *)&ipfl;
|
|
sizes[0] = sizeof(ipfl);
|
|
types[0] = 0;
|
|
#if SOLARIS
|
|
/*
|
|
* Are we copied from the mblk or an aligned array ?
|
|
*/
|
|
if (ip == (ip_t *)m->b_rptr) {
|
|
ptrs[1] = m;
|
|
sizes[1] = hlen + mlen;
|
|
types[1] = 1;
|
|
} else {
|
|
ptrs[1] = ip;
|
|
sizes[1] = hlen + mlen;
|
|
types[1] = 0;
|
|
}
|
|
#else
|
|
ptrs[1] = m;
|
|
sizes[1] = hlen + mlen;
|
|
types[1] = 1;
|
|
#endif
|
|
crc = (ipf_cksum((u_short *)fin, FI_CSIZE) << 8) + iplcrcinit;
|
|
return ipllog(IPL_LOGIPF, crc, ptrs, sizes, types, 2);
|
|
}
|
|
|
|
|
|
/*
|
|
* ipllog
|
|
*/
|
|
int ipllog(dev, crc, items, itemsz, types, cnt)
|
|
int dev;
|
|
u_long crc;
|
|
void **items;
|
|
size_t *itemsz;
|
|
int *types, cnt;
|
|
{
|
|
iplog_t *ipl;
|
|
caddr_t buf, s;
|
|
int len, i;
|
|
|
|
/*
|
|
* Check to see if this log record has a CRC which matches the last
|
|
* record logged. If it does, just up the count on the previous one
|
|
* rather than create a new one.
|
|
*/
|
|
if (crc) {
|
|
MUTEX_ENTER(&ipl_mutex);
|
|
if ((iplcrc[dev] == crc) && *iplh[dev]) {
|
|
(*iplh[dev])->ipl_count++;
|
|
MUTEX_EXIT(&ipl_mutex);
|
|
return 1;
|
|
}
|
|
iplcrc[dev] = crc;
|
|
MUTEX_EXIT(&ipl_mutex);
|
|
}
|
|
|
|
/*
|
|
* Get the total amount of data to be logged.
|
|
*/
|
|
for (i = 0, len = sizeof(iplog_t); i < cnt; i++)
|
|
len += itemsz[i];
|
|
|
|
/*
|
|
* check that we have space to record this information and can
|
|
* allocate that much.
|
|
*/
|
|
KMALLOC(buf, caddr_t, len);
|
|
if (!buf)
|
|
return 0;
|
|
MUTEX_ENTER(&ipl_mutex);
|
|
if ((iplused[dev] + len) > IPLLOGSIZE) {
|
|
MUTEX_EXIT(&ipl_mutex);
|
|
KFREES(buf, len);
|
|
return 0;
|
|
}
|
|
iplused[dev] += len;
|
|
MUTEX_EXIT(&ipl_mutex);
|
|
|
|
/*
|
|
* advance the log pointer to the next empty record and deduct the
|
|
* amount of space we're going to use.
|
|
*/
|
|
ipl = (iplog_t *)buf;
|
|
ipl->ipl_magic = IPL_MAGIC;
|
|
ipl->ipl_count = 1;
|
|
ipl->ipl_next = NULL;
|
|
ipl->ipl_dsize = len;
|
|
# if SOLARIS || defined(sun) || defined(linux)
|
|
uniqtime((struct timeval *)&ipl->ipl_sec);
|
|
# else
|
|
# if BSD >= 199306 || defined(__FreeBSD__) || defined(__sgi)
|
|
microtime((struct timeval *)&ipl->ipl_sec);
|
|
# endif
|
|
# endif
|
|
|
|
/*
|
|
* Loop through all the items to be logged, copying each one to the
|
|
* buffer. Use bcopy for normal data or the mb_t copyout routine.
|
|
*/
|
|
for (i = 0, s = buf + sizeof(*ipl); i < cnt; i++) {
|
|
if (types[i] == 0)
|
|
bcopy(items[i], s, itemsz[i]);
|
|
else if (types[i] == 1) {
|
|
# if SOLARIS
|
|
copyout_mblk(items[i], 0, itemsz[i], s);
|
|
# else
|
|
m_copydata(items[i], 0, itemsz[i], s);
|
|
# endif
|
|
}
|
|
s += itemsz[i];
|
|
}
|
|
MUTEX_ENTER(&ipl_mutex);
|
|
*iplh[dev] = ipl;
|
|
iplh[dev] = &ipl->ipl_next;
|
|
# if SOLARIS
|
|
cv_signal(&iplwait);
|
|
mutex_exit(&ipl_mutex);
|
|
# else
|
|
MUTEX_EXIT(&ipl_mutex);
|
|
# ifdef linux
|
|
wake_up_interruptible(&iplwait[dev]);
|
|
# else
|
|
wakeup(&iplh[dev]);
|
|
# endif
|
|
# endif
|
|
return 1;
|
|
}
|
|
|
|
|
|
int ipflog_read(unit, uio)
|
|
int unit;
|
|
struct uio *uio;
|
|
{
|
|
iplog_t *ipl;
|
|
int error = 0, dlen, copied;
|
|
# if defined(_KERNEL) && !SOLARIS
|
|
int s;
|
|
# endif
|
|
|
|
/*
|
|
* Sanity checks. Make sure the minor # is valid and we're copying
|
|
* a valid chunk of data.
|
|
*/
|
|
if ((IPL_LOGMAX < unit) || (unit < 0))
|
|
return ENXIO;
|
|
if (!uio->uio_resid)
|
|
return 0;
|
|
if ((uio->uio_resid < sizeof(iplog_t)) ||
|
|
(uio->uio_resid > IPLLOGSIZE))
|
|
return EINVAL;
|
|
|
|
/*
|
|
* Lock the log so we can snapshot the variables. Wait for a signal
|
|
* if the log is empty.
|
|
*/
|
|
SPL_NET(s);
|
|
MUTEX_ENTER(&ipl_mutex);
|
|
|
|
while (!iplused[unit] || !iplt[unit]) {
|
|
# if SOLARIS && defined(_KERNEL)
|
|
if (!cv_wait_sig(&iplwait, &ipl_mutex)) {
|
|
MUTEX_EXIT(&ipl_mutex);
|
|
return EINTR;
|
|
}
|
|
# else
|
|
# ifdef linux
|
|
interruptible_sleep_on(&iplwait[unit]);
|
|
if (current->signal & ~current->blocked)
|
|
return -EINTR;
|
|
# else
|
|
MUTEX_EXIT(&ipl_mutex);
|
|
SPL_X(s);
|
|
error = SLEEP(&iplh[unit], "ipl sleep");
|
|
if (error)
|
|
return error;
|
|
SPL_NET(s);
|
|
MUTEX_ENTER(&ipl_mutex);
|
|
# endif /* linux */
|
|
# endif /* SOLARIS */
|
|
}
|
|
|
|
# if BSD >= 199306 || defined(__FreeBSD__)
|
|
uio->uio_rw = UIO_READ;
|
|
# endif
|
|
|
|
for (copied = 0; (ipl = iplt[unit]); copied += dlen) {
|
|
dlen = ipl->ipl_dsize;
|
|
if (dlen + sizeof(iplog_t) > uio->uio_resid)
|
|
break;
|
|
/*
|
|
* Don't hold the mutex over the uiomove call.
|
|
*/
|
|
iplt[unit] = ipl->ipl_next;
|
|
MUTEX_EXIT(&ipl_mutex);
|
|
SPL_X(s);
|
|
error = UIOMOVE((caddr_t)ipl, ipl->ipl_dsize, UIO_READ, uio);
|
|
KFREES((caddr_t)ipl, ipl->ipl_dsize);
|
|
if (error)
|
|
break;
|
|
SPL_NET(s);
|
|
MUTEX_ENTER(&ipl_mutex);
|
|
iplused[unit] -= dlen;
|
|
}
|
|
if (!ipl) {
|
|
iplused[unit] = 0;
|
|
iplh[unit] = &iplt[unit];
|
|
}
|
|
|
|
if (!error) {
|
|
MUTEX_EXIT(&ipl_mutex);
|
|
SPL_X(s);
|
|
}
|
|
#ifdef linux
|
|
if (!error)
|
|
return copied;
|
|
return -error;
|
|
#else
|
|
return error;
|
|
#endif
|
|
}
|
|
|
|
|
|
int ipflog_clear(unit)
|
|
int unit;
|
|
{
|
|
iplog_t *ipl;
|
|
int used;
|
|
|
|
while ((ipl = iplt[unit])) {
|
|
iplt[unit] = ipl->ipl_next;
|
|
KFREES((caddr_t)ipl, ipl->ipl_dsize);
|
|
}
|
|
iplh[unit] = &iplt[unit];
|
|
used = iplused[unit];
|
|
iplused[unit] = 0;
|
|
iplcrc[unit] = 0;
|
|
return used;
|
|
}
|
|
#endif /* IPFILTER_LOG */
|