123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482 |
- /* $Id: tcpedit.c 1895 2007-08-22 04:24:33Z aturner $ */
- /*
- * Copyright (c) 2001-2007 Aaron Turner.
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- * 1. Redistributions of source code must retain the above copyright
- * notice, this list of conditions and the following disclaimer.
- * 2. Redistributions in binary form must reproduce the above copyright
- * notice, this list of conditions and the following disclaimer in the
- * documentation and/or other materials provided with the distribution.
- * 3. Neither the names of the copyright owners nor the names of its
- * contributors may be used to endorse or promote products derived from
- * this software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED
- * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
- * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
- * IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
- * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
- * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
- * GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER
- * IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
- * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
- * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
- */
- #include "config.h"
- #include "defines.h"
- #include <ctype.h>
- #include <fcntl.h>
- #include <stdio.h>
- #include <stdlib.h>
- #include <string.h>
- #include <sys/types.h>
- #include <unistd.h>
- #include <stdarg.h>
- #include "tcpedit-int.h"
- #include "tcpedit_stub.h"
- #include "portmap.h"
- #include "common.h"
- #include "edit_packet.h"
- #include "parse_args.h"
- #include "plugins/dlt_plugins.h"
- #include "lib/sll.h"
- #include "dlt.h"
- tOptDesc *const tcpedit_tcpedit_optDesc_p;
- /**
- * \brief Edit the given packet
- *
- * Processs a given packet and edit the pkthdr/pktdata structures
- * according to the rules in tcpedit
- * Returns: TCPEDIT_ERROR on error
- * TCPEDIT_SOFT_ERROR on remove packet
- * 0 on no change
- * 1 on change
- */
- int
- tcpedit_packet(tcpedit_t *tcpedit, struct pcap_pkthdr **pkthdr,
- u_char **pktdata, tcpr_dir_t direction)
- {
- ipv4_hdr_t *ip_hdr = NULL;
- arp_hdr_t *arp_hdr = NULL;
- int l2len = 0, l2proto, retval = 0, dlt, pktlen, lendiff;
- int needtorecalc = 0; /* did the packet change? if so, checksum */
- static u_char *packet = NULL; /* static buffer to hold packet data when padding out */
-
- assert(tcpedit);
- assert(pkthdr);
- assert(*pkthdr);
- assert(pktdata);
- assert(*pktdata);
- assert(tcpedit->validated);
-
- tcpedit->runtime.packetnum++;
- dbgx(2, "packet " COUNTER_SPEC " caplen %d",
- tcpedit->runtime.packetnum, (*pkthdr)->caplen);
-
- /*
- * if we are padding out the packet, we need to move the packet
- * data to a different buffer because the incoming **pktdata buffer
- * most likely isn't big enough for the extra padding
- */
- if (HAVE_OPT(FIXLEN) && strcmp(OPT_ARG(FIXLEN), "pad") == 0) {
- /* allocate our buffer the first time */
- if (packet == NULL)
- packet = safe_malloc(MAX_SNAPLEN);
-
- memcpy(packet, *pktdata, (*pkthdr)->caplen);
- *pktdata = packet;
- }
-
- /*
- * remove the Ethernet FCS (checksum)?
- * note that this feature requires the end user to be smart and
- * only set this flag IFF the pcap has the FCS. If not, then they
- * just removed 2 bytes of ACTUAL PACKET DATA. Sucks to be them.
- */
- if (tcpedit->efcs)
- (*pkthdr)->caplen -= 2;
-
- /* rewrite DLT */
- if ((pktlen = tcpedit_dlt_process(tcpedit->dlt_ctx, *pktdata, (*pkthdr)->caplen, direction)) == TCPEDIT_ERROR)
- errx(1, "%s", tcpedit_geterr(tcpedit));
- /* unable to edit packet, most likely 802.11 management frame */
- if (pktlen == TCPEDIT_SOFT_ERROR) {
- dbgx(1, "%s", tcpedit_geterr(tcpedit));
- return TCPEDIT_SOFT_ERROR;
- }
- /* update our packet lengths (real/captured) based on L2 length changes */
- lendiff = pktlen - (*pkthdr)->caplen;
- (*pkthdr)->caplen += lendiff;
- (*pkthdr)->len += lendiff;
- dlt = tcpedit_dlt_dst(tcpedit->dlt_ctx);
- l2proto = tcpedit_dlt_proto(tcpedit->dlt_ctx, dlt, *pktdata, (*pkthdr)->caplen);
- l2len = tcpedit_dlt_l2len(tcpedit->dlt_ctx, dlt, *pktdata, (*pkthdr)->caplen);
- /* does packet have an IP header? if so set our pointer to it */
- if (l2proto == ETHERTYPE_IP) {
- ip_hdr = (ipv4_hdr_t *)tcpedit_dlt_l3data(tcpedit->dlt_ctx, dlt, *pktdata, (*pkthdr)->caplen);
- if (ip_hdr == NULL) {
- return -1;
- }
- dbg(3, "Packet has an IPv4 header...");
- } else {
- dbgx(3, "Packet isn't IPv4: 0x%02x", l2proto);
- /* non-IP packets have a NULL ip_hdr struct */
- ip_hdr = NULL;
- }
- /* rewrite IP addresses */
- if (tcpedit->rewrite_ip) {
- /* IP packets */
- if (ip_hdr != NULL) {
- if ((retval = rewrite_ipv4l3(tcpedit, ip_hdr, direction)) < 0)
- return -1;
- needtorecalc += retval;
- }
- /* ARP packets */
- else if (l2proto == ETHERTYPE_ARP) {
- arp_hdr = (arp_hdr_t *)(&(*pktdata)[l2len]);
- /* unlike, rewrite_ipl3, we don't care if the packet changed
- * because we never need to recalc the checksums for an ARP
- * packet. So ignore the return value
- */
- if (rewrite_iparp(tcpedit, arp_hdr, direction) < 0)
- return -1;
- }
- }
- /* rewrite ports */
- if (tcpedit->portmap != NULL && (ip_hdr != NULL)) {
- if ((retval = rewrite_ports(tcpedit, &ip_hdr)) < 0)
- return -1;
- needtorecalc += retval;
- }
- /* Untruncate packet? Only for IP packets */
- if ((tcpedit->fixlen) && (ip_hdr != NULL)) {
- if ((retval = untrunc_packet(tcpedit, *pkthdr, *pktdata, ip_hdr)) < 0)
- return -1;
- needtorecalc += retval;
- }
- /* do we need to spoof the src/dst IP address? */
- if (tcpedit->seed) {
- if (ip_hdr != NULL) {
- if ((retval = randomize_ipv4(tcpedit, *pkthdr, *pktdata,
- ip_hdr)) < 0)
- return -1;
- needtorecalc += retval;
- } else {
- if (direction == TCPR_DIR_C2S) {
- if (randomize_iparp(tcpedit, *pkthdr, *pktdata,
- tcpedit->runtime.dlt1) < 0)
- return -1;
- } else {
- if (randomize_iparp(tcpedit, *pkthdr, *pktdata,
- tcpedit->runtime.dlt2) < 0)
- return -1;
- }
- }
- }
- /* do we need to fix checksums? */
- if ((tcpedit->fixcsum || needtorecalc) && (ip_hdr != NULL)) {
- retval = fix_checksums(tcpedit, *pkthdr, ip_hdr);
- if (retval < 0) {
- return TCPEDIT_ERROR;
- } else if (retval == TCPEDIT_WARN) {
- warnx("%s", tcpedit_getwarn(tcpedit));
- }
- }
-
- tcpedit_dlt_merge_l3data(tcpedit->dlt_ctx, dlt, *pktdata, (*pkthdr)->caplen, (u_char *)ip_hdr);
- tcpedit->runtime.total_bytes += (*pkthdr)->caplen;
- tcpedit->runtime.pkts_edited ++;
- return retval;
- }
- /**
- * initializes the tcpedit library. returns 0 on success, -1 on error.
- */
- int
- tcpedit_init(tcpedit_t **tcpedit_ex, int dlt)
- {
- tcpedit_t *tcpedit;
-
- *tcpedit_ex = safe_malloc(sizeof(tcpedit_t));
- tcpedit = *tcpedit_ex;
- if ((tcpedit->dlt_ctx = tcpedit_dlt_init(tcpedit, dlt)) == NULL)
- return TCPEDIT_ERROR;
- tcpedit->mtu = DEFAULT_MTU; /* assume 802.3 Ethernet */
-
- memset(&(tcpedit->runtime), 0, sizeof(tcpedit_runtime_t));
- tcpedit->runtime.dlt1 = dlt;
- tcpedit->runtime.dlt2 = dlt;
-
- dbgx(1, "Input file (1) datalink type is %s\n",
- pcap_datalink_val_to_name(dlt));
- #ifdef FORCE_ALIGN
- tcpedit->runtime.l3buff = (u_char *)safe_malloc(MAXPACKET);
- #endif
- return TCPEDIT_OK;
- }
- /**
- * return the output DLT type
- */
- int
- tcpedit_get_output_dlt(tcpedit_t *tcpedit)
- {
- assert(tcpedit);
- return tcpedit_dlt_output_dlt(tcpedit->dlt_ctx);
- }
- /**
- * \brief tcpedit option validator. Call after tcpedit_init()
- *
- * Validates that given the current state of tcpedit that the given
- * pcap source and destination (based on DLT) can be properly rewritten
- * return 0 on sucess
- * return -1 on error
- * DO NOT USE!
- */
- int
- tcpedit_validate(tcpedit_t *tcpedit)
- {
- assert(tcpedit);
- tcpedit->validated = 1;
- /* we used to do a bunch of things here, but not anymore...
- * maybe I should find something to do or just get ride of it
- */
- return 0;
- }
- /**
- * return the error string when a tcpedit() function returns
- * TCPEDIT_ERROR
- */
- char *
- tcpedit_geterr(tcpedit_t *tcpedit)
- {
- assert(tcpedit);
- return tcpedit->runtime.errstr;
- }
- /**
- * \brief Internal function to set the tcpedit error string
- *
- * Used to set the error string when there is an error, result is retrieved
- * using tcpedit_geterr(). You shouldn't ever actually call this, but use
- * tcpedit_seterr() which is a macro wrapping this instead.
- */
- void
- __tcpedit_seterr(tcpedit_t *tcpedit, const char *func, const int line, const char *file, const char *fmt, ...)
- {
- va_list ap;
- char errormsg[TCPEDIT_ERRSTR_LEN];
-
- assert(tcpedit);
- va_start(ap, fmt);
- if (fmt != NULL) {
- (void)vsnprintf(errormsg,
- (TCPEDIT_ERRSTR_LEN - 1), fmt, ap);
- }
- va_end(ap);
-
- snprintf(tcpedit->runtime.errstr, (TCPEDIT_ERRSTR_LEN -1), "From %s:%s() line %d:\n%s",
- file, func, line, errormsg);
- }
- /**
- * return the warning string when a tcpedit() function returns
- * TCPEDIT_WARN
- */
- char *
- tcpedit_getwarn(tcpedit_t *tcpedit)
- {
- assert(tcpedit);
- return tcpedit->runtime.warnstr;
- }
- /**
- * used to set the warning string when there is an warning
- */
- void
- tcpedit_setwarn(tcpedit_t *tcpedit, const char *fmt, ...)
- {
- va_list ap;
- assert(tcpedit);
- va_start(ap, fmt);
- if (fmt != NULL) {
- dbgx(1, fmt, ap);
- (void)vsnprintf(tcpedit->runtime.warnstr,
- (TCPEDIT_ERRSTR_LEN - 1), fmt, ap);
- }
- va_end(ap);
-
- }
- /**
- * \brief Checks the given error code and does the right thing
- *
- * Generic function which checks the TCPEDIT_* error code
- * and always returns OK or ERROR. For warnings, prints the
- * warning message and returns OK. For any other value, fails with
- * an assert.
- *
- * prefix is a string prepended to the error/warning
- */
- int
- tcpedit_checkerror(tcpedit_t *tcpedit, const int rcode, const char *prefix) {
- assert(tcpedit);
-
- switch (rcode) {
- case TCPEDIT_OK:
- case TCPEDIT_ERROR:
- return rcode;
- break;
-
- case TCPEDIT_SOFT_ERROR:
- if (prefix != NULL) {
- fprintf(stderr, "Error %s: %s\n", prefix, tcpedit_geterr(tcpedit));
- } else {
- fprintf(stderr, "Error: %s\n", tcpedit_geterr(tcpedit));
- }
- break;
- case TCPEDIT_WARN:
- if (prefix != NULL) {
- fprintf(stderr, "Warning %s: %s\n", prefix, tcpedit_getwarn(tcpedit));
- } else {
- fprintf(stderr, "Warning: %s\n", tcpedit_getwarn(tcpedit));
- }
- return TCPEDIT_OK;
- break;
-
- default:
- assert(0 == 1); /* this should never happen! */
- break;
- }
- return TCPEDIT_ERROR;
- }
- /**
- * \brief Cleans up after ourselves. Return 0 on success.
- *
- * Clean up after ourselves, but does not actually free the ptr.
- */
- int
- tcpedit_close(tcpedit_t *tcpedit)
- {
- assert(tcpedit);
- dbgx(1, "tcpedit processed " COUNTER_SPEC " bytes in " COUNTER_SPEC
- " packets.\n", tcpedit->runtime.total_bytes,
- tcpedit->runtime.pkts_edited);
- /* free buffer if required */
- #ifdef FORCE_ALIGN
- safe_free(tcpedit->runtime.l3buff);
- #endif
- return 0;
- }
- /**
- * Return a ptr to the Layer 3 data. Returns TCPEDIT_ERROR on error
- */
- const u_char *
- tcpedit_l3data(tcpedit_t *tcpedit, tcpedit_coder_t code, u_char *packet, const int pktlen)
- {
- u_char *result = NULL;
- if (code == BEFORE_PROCESS) {
- result = tcpedit_dlt_l3data(tcpedit->dlt_ctx, tcpedit->dlt_ctx->decoder->dlt, packet, pktlen);
- } else {
- result = tcpedit_dlt_l3data(tcpedit->dlt_ctx, tcpedit->dlt_ctx->encoder->dlt, packet, pktlen);
- }
- return result;
- }
- /**
- * return the length of the layer 2 header. Returns TCPEDIT_ERROR on error
- */
- int
- tcpedit_l2len(tcpedit_t *tcpedit, tcpedit_coder_t code, u_char *packet, const int pktlen)
- {
- int result = 0;
- if (code == BEFORE_PROCESS) {
- result = tcpedit_dlt_l2len(tcpedit->dlt_ctx, tcpedit->dlt_ctx->decoder->dlt, packet, pktlen);
- } else {
- result = tcpedit_dlt_l2len(tcpedit->dlt_ctx, tcpedit->dlt_ctx->encoder->dlt, packet, pktlen);
- }
- return result;
- }
- /**
- * Returns the layer 3 type, often encoded as the layer2.proto field
- */
- int
- tcpedit_l3proto(tcpedit_t *tcpedit, tcpedit_coder_t code, const u_char *packet, const int pktlen)
- {
- int result = 0;
- if (code == BEFORE_PROCESS) {
- tcpedit_dlt_proto(tcpedit->dlt_ctx, tcpedit->dlt_ctx->decoder->dlt, packet, pktlen);
- } else {
- tcpedit_dlt_proto(tcpedit->dlt_ctx, tcpedit->dlt_ctx->encoder->dlt, packet, pktlen);
- }
- return result;
- }
- /*
- u_char *
- tcpedit_srcmac(tcpedit_t *tcpedit, tcpedit_coder_t code, u_char *packet, const int pktlen)
- {
-
- }
- u_char *
- tcpedit_dstmac(tcpedit_t *tcpedit, tcpedit_coder_t code, u_char *packet, const int pktlen)
- {
-
- }
- int
- tcpedit_maclen(tcpedit_t *tcpedit, tcpedit_coder_t code)
- {
-
- }
- */
|