ipnat.c revision 145519
1145519Sdarrenr/* $FreeBSD: head/contrib/ipfilter/tools/ipnat.c 145519 2005-04-25 18:20:15Z darrenr $ */ 2145510Sdarrenr 3145510Sdarrenr/* 4145510Sdarrenr * Copyright (C) 1993-2001 by Darren Reed. 5145510Sdarrenr * 6145510Sdarrenr * See the IPFILTER.LICENCE file for details on licencing. 7145510Sdarrenr * 8145510Sdarrenr * Added redirect stuff and a variety of bug fixes. (mcn@EnGarde.com) 9145510Sdarrenr */ 10145510Sdarrenr#include <stdio.h> 11145510Sdarrenr#include <string.h> 12145510Sdarrenr#include <fcntl.h> 13145510Sdarrenr#include <errno.h> 14145510Sdarrenr#include <sys/types.h> 15145510Sdarrenr#if !defined(__SVR4) && !defined(__svr4__) 16145510Sdarrenr#include <strings.h> 17145510Sdarrenr#else 18145510Sdarrenr#include <sys/byteorder.h> 19145510Sdarrenr#endif 20145510Sdarrenr#include <sys/time.h> 21145510Sdarrenr#include <sys/param.h> 22145510Sdarrenr#include <stdlib.h> 23145510Sdarrenr#include <unistd.h> 24145510Sdarrenr#include <stddef.h> 25145510Sdarrenr#include <sys/file.h> 26145510Sdarrenr#define _KERNEL 27145510Sdarrenr#include <sys/uio.h> 28145510Sdarrenr#undef _KERNEL 29145510Sdarrenr#include <sys/socket.h> 30145510Sdarrenr#include <sys/ioctl.h> 31145510Sdarrenr#if defined(sun) && (defined(__svr4__) || defined(__SVR4)) 32145510Sdarrenr# include <sys/ioccom.h> 33145510Sdarrenr# include <sys/sysmacros.h> 34145510Sdarrenr#endif 35145510Sdarrenr#include <netinet/in.h> 36145510Sdarrenr#include <netinet/in_systm.h> 37145510Sdarrenr#include <netinet/ip.h> 38145510Sdarrenr#include <netinet/tcp.h> 39145510Sdarrenr#include <net/if.h> 40145510Sdarrenr#if __FreeBSD_version >= 300000 41145510Sdarrenr# include <net/if_var.h> 42145510Sdarrenr#endif 43145510Sdarrenr#include <netdb.h> 44145510Sdarrenr#include <arpa/nameser.h> 45145510Sdarrenr#include <arpa/inet.h> 46145510Sdarrenr#include <resolv.h> 47145510Sdarrenr#include <ctype.h> 48145510Sdarrenr#if defined(linux) 49145510Sdarrenr# include <linux/a.out.h> 50145510Sdarrenr#else 51145510Sdarrenr# include <nlist.h> 52145510Sdarrenr#endif 53145510Sdarrenr#include "ipf.h" 54145510Sdarrenr#include "ipl.h" 55145510Sdarrenr#include "kmem.h" 56145510Sdarrenr 57145510Sdarrenr#ifdef __hpux 58145510Sdarrenr# define nlist nlist64 59145510Sdarrenr#endif 60145510Sdarrenr 61145510Sdarrenr#if defined(sun) && !SOLARIS2 62145510Sdarrenr# define STRERROR(x) sys_errlist[x] 63145510Sdarrenrextern char *sys_errlist[]; 64145510Sdarrenr#else 65145510Sdarrenr# define STRERROR(x) strerror(x) 66145510Sdarrenr#endif 67145510Sdarrenr 68145510Sdarrenr#if !defined(lint) 69145510Sdarrenrstatic const char sccsid[] ="@(#)ipnat.c 1.9 6/5/96 (C) 1993 Darren Reed"; 70145510Sdarrenrstatic const char rcsid[] = "@(#)Id: ipnat.c,v 1.24.2.1 2004/04/28 17:56:22 darrenr Exp"; 71145510Sdarrenr#endif 72145510Sdarrenr 73145510Sdarrenr 74145510Sdarrenr#if SOLARIS 75145510Sdarrenr#define bzero(a,b) memset(a,0,b) 76145510Sdarrenr#endif 77145510Sdarrenrint use_inet6 = 0; 78145510Sdarrenrchar thishost[MAXHOSTNAMELEN]; 79145510Sdarrenr 80145510Sdarrenrextern char *optarg; 81145510Sdarrenr 82145510Sdarrenrvoid dostats __P((natstat_t *, int)), flushtable __P((int, int)); 83145510Sdarrenrvoid usage __P((char *)); 84145510Sdarrenrint main __P((int, char*[])); 85145510Sdarrenrvoid showhostmap __P((natstat_t *nsp)); 86145510Sdarrenrvoid natstat_dead __P((natstat_t *, char *)); 87145510Sdarrenr 88145510Sdarrenrint opts; 89145510Sdarrenr 90145510Sdarrenrvoid usage(name) 91145510Sdarrenrchar *name; 92145510Sdarrenr{ 93145510Sdarrenr fprintf(stderr, "Usage: %s [-CFhlnrRsv] [-f filename]\n", name); 94145510Sdarrenr exit(1); 95145510Sdarrenr} 96145510Sdarrenr 97145510Sdarrenr 98145510Sdarrenrint main(argc, argv) 99145510Sdarrenrint argc; 100145510Sdarrenrchar *argv[]; 101145510Sdarrenr{ 102145510Sdarrenr char *file, *core, *kernel; 103145510Sdarrenr natstat_t ns, *nsp; 104145510Sdarrenr int fd, c, mode; 105145510Sdarrenr ipfobj_t obj; 106145510Sdarrenr 107145510Sdarrenr fd = -1; 108145510Sdarrenr opts = 0; 109145510Sdarrenr nsp = &ns; 110145510Sdarrenr file = NULL; 111145510Sdarrenr core = NULL; 112145510Sdarrenr kernel = NULL; 113145510Sdarrenr mode = O_RDWR; 114145510Sdarrenr 115145510Sdarrenr while ((c = getopt(argc, argv, "CdFf:hlM:N:nrRsv")) != -1) 116145510Sdarrenr switch (c) 117145510Sdarrenr { 118145510Sdarrenr case 'C' : 119145510Sdarrenr opts |= OPT_CLEAR; 120145510Sdarrenr break; 121145510Sdarrenr case 'd' : 122145510Sdarrenr opts |= OPT_DEBUG; 123145510Sdarrenr break; 124145510Sdarrenr case 'f' : 125145510Sdarrenr file = optarg; 126145510Sdarrenr break; 127145510Sdarrenr case 'F' : 128145510Sdarrenr opts |= OPT_FLUSH; 129145510Sdarrenr break; 130145510Sdarrenr case 'h' : 131145510Sdarrenr opts |=OPT_HITS; 132145510Sdarrenr break; 133145510Sdarrenr case 'l' : 134145510Sdarrenr opts |= OPT_LIST; 135145510Sdarrenr mode = O_RDONLY; 136145510Sdarrenr break; 137145510Sdarrenr case 'M' : 138145510Sdarrenr core = optarg; 139145510Sdarrenr break; 140145510Sdarrenr case 'N' : 141145510Sdarrenr kernel = optarg; 142145510Sdarrenr break; 143145510Sdarrenr case 'n' : 144145510Sdarrenr opts |= OPT_DONOTHING; 145145510Sdarrenr mode = O_RDONLY; 146145510Sdarrenr break; 147145510Sdarrenr case 'R' : 148145510Sdarrenr opts |= OPT_NORESOLVE; 149145510Sdarrenr break; 150145510Sdarrenr case 'r' : 151145510Sdarrenr opts |= OPT_REMOVE; 152145510Sdarrenr break; 153145510Sdarrenr case 's' : 154145510Sdarrenr opts |= OPT_STAT; 155145510Sdarrenr mode = O_RDONLY; 156145510Sdarrenr break; 157145510Sdarrenr case 'v' : 158145510Sdarrenr opts |= OPT_VERBOSE; 159145510Sdarrenr break; 160145510Sdarrenr default : 161145510Sdarrenr usage(argv[0]); 162145510Sdarrenr } 163145510Sdarrenr 164145510Sdarrenr initparse(); 165145510Sdarrenr 166145510Sdarrenr if ((kernel != NULL) || (core != NULL)) { 167145510Sdarrenr (void) setgid(getgid()); 168145510Sdarrenr (void) setuid(getuid()); 169145510Sdarrenr } 170145510Sdarrenr 171145510Sdarrenr bzero((char *)&ns, sizeof(ns)); 172145510Sdarrenr 173145510Sdarrenr if ((opts & OPT_DONOTHING) == 0) { 174145510Sdarrenr if (checkrev(IPL_NAME) == -1) { 175145510Sdarrenr fprintf(stderr, "User/kernel version check failed\n"); 176145510Sdarrenr exit(1); 177145510Sdarrenr } 178145510Sdarrenr } 179145510Sdarrenr 180145510Sdarrenr 181145510Sdarrenr if (!(opts & OPT_DONOTHING) && (kernel == NULL) && (core == NULL)) { 182145510Sdarrenr if (openkmem(kernel, core) == -1) 183145510Sdarrenr exit(1); 184145510Sdarrenr 185145510Sdarrenr if (((fd = open(IPNAT_NAME, mode)) == -1) && 186145510Sdarrenr ((fd = open(IPNAT_NAME, O_RDONLY)) == -1)) { 187145510Sdarrenr (void) fprintf(stderr, "%s: open: %s\n", IPNAT_NAME, 188145510Sdarrenr STRERROR(errno)); 189145510Sdarrenr exit(1); 190145510Sdarrenr } 191145510Sdarrenr 192145510Sdarrenr bzero((char *)&obj, sizeof(obj)); 193145510Sdarrenr obj.ipfo_rev = IPFILTER_VERSION; 194145510Sdarrenr obj.ipfo_size = sizeof(*nsp); 195145510Sdarrenr obj.ipfo_type = IPFOBJ_NATSTAT; 196145510Sdarrenr obj.ipfo_ptr = (void *)nsp; 197145510Sdarrenr if (ioctl(fd, SIOCGNATS, &obj) == -1) { 198145510Sdarrenr perror("ioctl(SIOCGNATS)"); 199145510Sdarrenr exit(1); 200145510Sdarrenr } 201145510Sdarrenr (void) setgid(getgid()); 202145510Sdarrenr (void) setuid(getuid()); 203145510Sdarrenr } else if ((kernel != NULL) || (core != NULL)) { 204145510Sdarrenr if (openkmem(kernel, core) == -1) 205145510Sdarrenr exit(1); 206145510Sdarrenr 207145510Sdarrenr natstat_dead(nsp, kernel); 208145510Sdarrenr if (opts & (OPT_LIST|OPT_STAT)) 209145510Sdarrenr dostats(nsp, opts); 210145510Sdarrenr exit(0); 211145510Sdarrenr } 212145510Sdarrenr 213145510Sdarrenr if (opts & (OPT_FLUSH|OPT_CLEAR)) 214145510Sdarrenr flushtable(fd, opts); 215145510Sdarrenr if (file) { 216145510Sdarrenr ipnat_parsefile(fd, ipnat_addrule, ioctl, file); 217145510Sdarrenr } 218145510Sdarrenr if (opts & (OPT_LIST|OPT_STAT)) 219145510Sdarrenr dostats(nsp, opts); 220145510Sdarrenr return 0; 221145510Sdarrenr} 222145510Sdarrenr 223145510Sdarrenr 224145510Sdarrenr/* 225145510Sdarrenr * Read NAT statistic information in using a symbol table and memory file 226145510Sdarrenr * rather than doing ioctl's. 227145510Sdarrenr */ 228145510Sdarrenrvoid natstat_dead(nsp, kernel) 229145510Sdarrenrnatstat_t *nsp; 230145510Sdarrenrchar *kernel; 231145510Sdarrenr{ 232145510Sdarrenr struct nlist nat_nlist[10] = { 233145510Sdarrenr { "nat_table" }, /* 0 */ 234145510Sdarrenr { "nat_list" }, 235145510Sdarrenr { "maptable" }, 236145510Sdarrenr { "ipf_nattable_sz" }, 237145510Sdarrenr { "ipf_natrules_sz" }, 238145510Sdarrenr { "ipf_rdrrules_sz" }, /* 5 */ 239145510Sdarrenr { "ipf_hostmap_sz" }, 240145510Sdarrenr { "nat_instances" }, 241145510Sdarrenr { "ap_sess_list" }, 242145510Sdarrenr { NULL } 243145510Sdarrenr }; 244145510Sdarrenr void *tables[2]; 245145510Sdarrenr 246145510Sdarrenr if (nlist(kernel, nat_nlist) == -1) { 247145510Sdarrenr fprintf(stderr, "nlist error\n"); 248145510Sdarrenr return; 249145510Sdarrenr } 250145510Sdarrenr 251145510Sdarrenr /* 252145510Sdarrenr * Normally the ioctl copies all of these values into the structure 253145510Sdarrenr * for us, before returning it to userland, so here we must copy each 254145510Sdarrenr * one in individually. 255145510Sdarrenr */ 256145510Sdarrenr kmemcpy((char *)&tables, nat_nlist[0].n_value, sizeof(tables)); 257145510Sdarrenr nsp->ns_table[0] = tables[0]; 258145510Sdarrenr nsp->ns_table[1] = tables[1]; 259145510Sdarrenr 260145510Sdarrenr kmemcpy((char *)&nsp->ns_list, nat_nlist[1].n_value, 261145510Sdarrenr sizeof(nsp->ns_list)); 262145510Sdarrenr kmemcpy((char *)&nsp->ns_maptable, nat_nlist[2].n_value, 263145510Sdarrenr sizeof(nsp->ns_maptable)); 264145510Sdarrenr kmemcpy((char *)&nsp->ns_nattab_sz, nat_nlist[3].n_value, 265145510Sdarrenr sizeof(nsp->ns_nattab_sz)); 266145510Sdarrenr kmemcpy((char *)&nsp->ns_rultab_sz, nat_nlist[4].n_value, 267145510Sdarrenr sizeof(nsp->ns_rultab_sz)); 268145510Sdarrenr kmemcpy((char *)&nsp->ns_rdrtab_sz, nat_nlist[5].n_value, 269145510Sdarrenr sizeof(nsp->ns_rdrtab_sz)); 270145510Sdarrenr kmemcpy((char *)&nsp->ns_hostmap_sz, nat_nlist[6].n_value, 271145510Sdarrenr sizeof(nsp->ns_hostmap_sz)); 272145510Sdarrenr kmemcpy((char *)&nsp->ns_instances, nat_nlist[7].n_value, 273145510Sdarrenr sizeof(nsp->ns_instances)); 274145510Sdarrenr kmemcpy((char *)&nsp->ns_apslist, nat_nlist[8].n_value, 275145510Sdarrenr sizeof(nsp->ns_apslist)); 276145510Sdarrenr} 277145510Sdarrenr 278145510Sdarrenr 279145510Sdarrenr/* 280145510Sdarrenr * Display NAT statistics. 281145510Sdarrenr */ 282145510Sdarrenrvoid dostats(nsp, opts) 283145510Sdarrenrnatstat_t *nsp; 284145510Sdarrenrint opts; 285145510Sdarrenr{ 286145510Sdarrenr nat_t *np, nat; 287145510Sdarrenr ipnat_t ipn; 288145510Sdarrenr 289145510Sdarrenr /* 290145510Sdarrenr * Show statistics ? 291145510Sdarrenr */ 292145510Sdarrenr if (opts & OPT_STAT) { 293145510Sdarrenr printf("mapped\tin\t%lu\tout\t%lu\n", 294145510Sdarrenr nsp->ns_mapped[0], nsp->ns_mapped[1]); 295145510Sdarrenr printf("added\t%lu\texpired\t%lu\n", 296145510Sdarrenr nsp->ns_added, nsp->ns_expire); 297145510Sdarrenr printf("no memory\t%lu\tbad nat\t%lu\n", 298145510Sdarrenr nsp->ns_memfail, nsp->ns_badnat); 299145510Sdarrenr printf("inuse\t%lu\nrules\t%lu\n", 300145510Sdarrenr nsp->ns_inuse, nsp->ns_rules); 301145510Sdarrenr printf("wilds\t%u\n", nsp->ns_wilds); 302145510Sdarrenr if (opts & OPT_VERBOSE) 303145510Sdarrenr printf("table %p list %p\n", 304145510Sdarrenr nsp->ns_table, nsp->ns_list); 305145510Sdarrenr } 306145510Sdarrenr 307145510Sdarrenr /* 308145510Sdarrenr * Show list of NAT rules and NAT sessions ? 309145510Sdarrenr */ 310145510Sdarrenr if (opts & OPT_LIST) { 311145510Sdarrenr printf("List of active MAP/Redirect filters:\n"); 312145510Sdarrenr while (nsp->ns_list) { 313145510Sdarrenr if (kmemcpy((char *)&ipn, (long)nsp->ns_list, 314145510Sdarrenr sizeof(ipn))) { 315145510Sdarrenr perror("kmemcpy"); 316145510Sdarrenr break; 317145510Sdarrenr } 318145510Sdarrenr if (opts & OPT_HITS) 319145510Sdarrenr printf("%lu ", ipn.in_hits); 320145510Sdarrenr printnat(&ipn, opts & (OPT_DEBUG|OPT_VERBOSE)); 321145510Sdarrenr nsp->ns_list = ipn.in_next; 322145510Sdarrenr } 323145510Sdarrenr 324145510Sdarrenr printf("\nList of active sessions:\n"); 325145510Sdarrenr 326145510Sdarrenr for (np = nsp->ns_instances; np; np = nat.nat_next) { 327145510Sdarrenr if (kmemcpy((char *)&nat, (long)np, sizeof(nat))) 328145510Sdarrenr break; 329145510Sdarrenr printactivenat(&nat, opts); 330145510Sdarrenr if (nat.nat_aps) 331145510Sdarrenr printaps(nat.nat_aps, opts); 332145510Sdarrenr } 333145510Sdarrenr 334145510Sdarrenr if (opts & OPT_VERBOSE) 335145510Sdarrenr showhostmap(nsp); 336145510Sdarrenr } 337145510Sdarrenr} 338145510Sdarrenr 339145510Sdarrenr 340145510Sdarrenr/* 341145510Sdarrenr * Display the active host mapping table. 342145510Sdarrenr */ 343145510Sdarrenrvoid showhostmap(nsp) 344145510Sdarrenrnatstat_t *nsp; 345145510Sdarrenr{ 346145510Sdarrenr hostmap_t hm, *hmp, **maptable; 347145510Sdarrenr u_int hv; 348145510Sdarrenr 349145510Sdarrenr printf("\nList of active host mappings:\n"); 350145510Sdarrenr 351145510Sdarrenr maptable = (hostmap_t **)malloc(sizeof(hostmap_t *) * 352145510Sdarrenr nsp->ns_hostmap_sz); 353145510Sdarrenr if (kmemcpy((char *)maptable, (u_long)nsp->ns_maptable, 354145510Sdarrenr sizeof(hostmap_t *) * nsp->ns_hostmap_sz)) { 355145510Sdarrenr perror("kmemcpy (maptable)"); 356145510Sdarrenr return; 357145510Sdarrenr } 358145510Sdarrenr 359145510Sdarrenr for (hv = 0; hv < nsp->ns_hostmap_sz; hv++) { 360145510Sdarrenr hmp = maptable[hv]; 361145510Sdarrenr 362145510Sdarrenr while (hmp) { 363145510Sdarrenr if (kmemcpy((char *)&hm, (u_long)hmp, sizeof(hm))) { 364145510Sdarrenr perror("kmemcpy (hostmap)"); 365145510Sdarrenr return; 366145510Sdarrenr } 367145510Sdarrenr 368145510Sdarrenr printhostmap(&hm, hv); 369145510Sdarrenr hmp = hm.hm_next; 370145510Sdarrenr } 371145510Sdarrenr } 372145510Sdarrenr free(maptable); 373145510Sdarrenr} 374145510Sdarrenr 375145510Sdarrenr 376145510Sdarrenr/* 377145510Sdarrenr * Issue an ioctl to flush either the NAT rules table or the active mapping 378145510Sdarrenr * table or both. 379145510Sdarrenr */ 380145510Sdarrenrvoid flushtable(fd, opts) 381145510Sdarrenrint fd, opts; 382145510Sdarrenr{ 383145510Sdarrenr int n = 0; 384145510Sdarrenr 385145510Sdarrenr if (opts & OPT_FLUSH) { 386145510Sdarrenr n = 0; 387145510Sdarrenr if (!(opts & OPT_DONOTHING) && ioctl(fd, SIOCIPFFL, &n) == -1) 388145510Sdarrenr perror("ioctl(SIOCFLNAT)"); 389145510Sdarrenr else 390145510Sdarrenr printf("%d entries flushed from NAT table\n", n); 391145510Sdarrenr } 392145510Sdarrenr 393145510Sdarrenr if (opts & OPT_CLEAR) { 394145510Sdarrenr n = 1; 395145510Sdarrenr if (!(opts & OPT_DONOTHING) && ioctl(fd, SIOCIPFFL, &n) == -1) 396145510Sdarrenr perror("ioctl(SIOCCNATL)"); 397145510Sdarrenr else 398145510Sdarrenr printf("%d entries flushed from NAT list\n", n); 399145510Sdarrenr } 400145510Sdarrenr} 401