source: lib/trace.c @ d5879cc

4.0.1-hotfixescachetimestampsdevelopdpdk-ndagetsilivegetfragoffhelplibtrace4ndag_formatpfringrc-4.0.1rc-4.0.2rc-4.0.3rc-4.0.4ringdecrementfixringperformanceringtimestampfixes
Last change on this file since d5879cc was d5879cc, checked in by Perry Lorier <perry@…>, 16 years ago

Fix various issues

  • Property mode set to 100644
File size: 44.0 KB
Line 
1/*
2 * This file is part of libtrace
3 *
4 * Copyright (c) 2004 The University of Waikato, Hamilton, New Zealand.
5 * Authors: Daniel Lawson
6 *          Perry Lorier
7 *         
8 * All rights reserved.
9 *
10 * This code has been developed by the University of Waikato WAND
11 * research group. For further information please see http://www.wand.net.nz/
12 *
13 * libtrace is free software; you can redistribute it and/or modify
14 * it under the terms of the GNU General Public License as published by
15 * the Free Software Foundation; either version 2 of the License, or
16 * (at your option) any later version.
17 *
18 * libtrace is distributed in the hope that it will be useful,
19 * but WITHOUT ANY WARRANTY; without even the implied warranty of
20 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
21 * GNU General Public License for more details.
22 *
23 * You should have received a copy of the GNU General Public License
24 * along with libtrace; if not, write to the Free Software
25 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
26 *
27 * $Id$
28 *
29 */
30
31
32/* @file
33 *
34 * @brief Trace file processing library
35 *
36 * @author Daniel Lawson
37 * @author Perry Lorier
38 *
39 * @internal
40 */
41#define _GNU_SOURCE
42#include "common.h"
43#include "config.h"
44#include <assert.h>
45#include <errno.h>
46#include <fcntl.h>
47#include <netdb.h>
48#include <stdio.h>
49#include <stdlib.h>
50#include <string.h>
51#include <sys/stat.h>
52#include <sys/types.h>
53#include <stdarg.h>
54
55#ifdef HAVE_LIMITS_H
56#  include <limits.h>
57#endif
58
59#ifdef HAVE_SYS_LIMITS_H
60#  include <sys/limits.h>
61#endif
62
63#include <sys/socket.h>
64#include <sys/un.h>
65#include <sys/mman.h>
66#include <unistd.h>
67
68#ifdef HAVE_NET_IF_ARP_H
69#  include <net/if_arp.h>
70#endif
71
72#ifdef HAVE_NET_IF_H
73#  include <net/if.h>
74#endif
75
76#ifdef HAVE_NETINET_IN_H
77#  include <netinet/in.h>
78#endif
79
80#ifdef HAVE_NET_ETHERNET_H
81#  include <net/ethernet.h>
82#endif
83
84#ifdef HAVE_NETINET_IF_ETHER_H
85#  include <netinet/if_ether.h>
86#endif
87
88#include <time.h>
89#include <sys/ioctl.h>
90
91#ifdef HAVE_INTTYPES_H
92#  include <inttypes.h>
93#else
94#  error "Can't find inttypes.h - this needs to be fixed"
95#endif
96
97#ifdef HAVE_STDDEF_H
98#  include <stddef.h>
99#else
100# error "Can't find stddef.h - do you define ptrdiff_t elsewhere?"
101#endif
102
103#include "libtrace.h"
104#include "fifo.h"
105#include "libtrace_int.h"
106#include "parse_cmd.h"
107
108#if HAVE_PCAP_BPF_H
109#  include <pcap-bpf.h>
110#else
111#  ifdef HAVE_NET_BPF_H
112#    include <net/bpf.h>
113#  endif
114#endif
115
116#include "libtrace_int.h"
117#include "format_helper.h"
118#include "rt_protocol.h"
119#include <err.h>
120
121#define MAXOPTS 1024
122
123
124struct trace_err_t trace_err;
125
126struct libtrace_format_t **format_list = 0;
127int format_size = 0;
128int nformats = 0;
129
130/* strncpy is not assured to copy the final \0, so we
131 * will use our own one that does
132 */
133static void xstrncpy(char *dest, const char *src, size_t n)
134{
135        strncpy(dest,src,n);
136        dest[n]='\0';
137}
138 
139static char *xstrndup(const char *src,size_t n)
140{       
141        char *ret=malloc(n+1);
142        xstrncpy(ret,src,n);
143        return ret;
144}
145
146void register_format(struct libtrace_format_t *f) {
147        if (format_list == 0) {
148                format_size = 10;
149                format_list = malloc(
150                                        sizeof(struct libtrace_format_t *) *
151                                        format_size
152                                );
153        } else if (format_size == nformats) {
154                format_size = format_size + 10;
155                format_list = realloc(format_list,
156                                sizeof(struct libtrace_format_t *) * 
157                                format_size);
158        }
159        format_list[nformats] = f;
160        /* Now, verify things */
161        if (format_list[nformats]->init_input) {
162#define REQUIRE(x) \
163                if (!format_list[nformats]->x) \
164                        fprintf(stderr,"%s: Input format should provide " #x "\n",format_list[nformats]->name)
165                REQUIRE(read_packet);
166                REQUIRE(start_input);
167                REQUIRE(config_input);
168                REQUIRE(pause_input);
169                REQUIRE(fin_input);
170                REQUIRE(get_link_type);
171                REQUIRE(get_capture_length);
172                REQUIRE(get_wire_length);
173                REQUIRE(get_framing_length);
174                REQUIRE(trace_event);
175                if (!format_list[nformats]->get_erf_timestamp
176                        && !format_list[nformats]->get_seconds
177                        && !format_list[nformats]->get_timeval) {
178                        fprintf(stderr,"%s: A trace format capable of input, should provide at least one of\n"
179"get_erf_timestamp, get_seconds or trace_timeval\n",format_list[nformats]->name);
180                }
181#undef REQUIRE
182        }
183        else {
184#define REQUIRE(x) \
185                if (format_list[nformats]->x) \
186                        fprintf(stderr,"%s: Non Input format shouldn't need " #x "\n",format_list[nformats]->name)
187                REQUIRE(read_packet);
188                REQUIRE(start_input);
189                REQUIRE(pause_input);
190                REQUIRE(fin_input);
191                REQUIRE(get_link_type);
192                REQUIRE(get_capture_length);
193                REQUIRE(get_wire_length);
194                REQUIRE(get_framing_length);
195                REQUIRE(trace_event);
196#undef REQUIRE
197        }
198        if (format_list[nformats]->init_output) {
199#define REQUIRE(x) \
200                if (!format_list[nformats]->x) \
201                        fprintf(stderr,"%s: Output format should provide " #x "\n",format_list[nformats]->name)
202                REQUIRE(write_packet);
203                REQUIRE(start_output);
204                REQUIRE(config_output);
205                REQUIRE(fin_output);
206#undef REQUIRE
207        }
208        else {
209#define REQUIRE(x) \
210                if (format_list[nformats]->x) \
211                        fprintf(stderr,"%s: Non Output format shouldn't need " #x "\n",format_list[nformats]->name)
212                REQUIRE(write_packet);
213                REQUIRE(start_output);
214                REQUIRE(config_output);
215                REQUIRE(fin_output);
216#undef REQUIRE
217        }
218        nformats++;
219}
220
221/* Prints help information for libtrace
222 *
223 * Function prints out some basic help information regarding libtrace,
224 * and then prints out the help() function registered with each input module
225 */
226void trace_help() {
227        int i = 0;
228        printf("libtrace %s\n",PACKAGE_VERSION);
229        for (i = 0; i < nformats; i++) {
230                if (format_list[i]->help) {
231                        format_list[i]->help();
232                }
233        }
234}
235
236#define RP_BUFSIZE 65536
237#define URI_PROTO_LINE 16
238
239/* Gets the name of the output format for a given output trace.
240 *
241 * @params libtrace     the output trace to get the name of the format for
242 * @returns callee-owned null-terminated char* containing the output format
243 *
244 */
245SIMPLE_FUNCTION
246char *trace_get_output_format(const struct libtrace_out_t *libtrace) {
247        char * format = libtrace->format->name;
248
249        return format;
250}
251
252/* Create a trace file from a URI
253 *
254 * @params char * containing a valid libtrace URI
255 * @returns opaque pointer to a libtrace_t
256 *
257 * Valid URI's are:
258 *  erf:/path/to/erf/file
259 *  erf:/path/to/erf/file.gz
260 *  erf:/path/to/rtclient/socket
261 *  erf:-                       (stdin)
262 *  dag:/dev/dagcard
263 *  pcapint:pcapinterface               (eg: pcapint:eth0)
264 *  pcap:/path/to/pcap/file
265 *  pcap:-
266 *  rtclient:hostname
267 *  rtclient:hostname:port
268 *  wag:-
269 *  wag:/path/to/wag/file
270 *  wag:/path/to/wag/file.gz
271 *  wag:/path/to/wag/socket
272 *
273 * If an error occured when attempting to open a trace, NULL is returned
274 * and an error is output to stdout.
275 */
276struct libtrace_t *trace_create(const char *uri) {
277        struct libtrace_t *libtrace = malloc(sizeof(struct libtrace_t));
278        char *scan = 0;
279        const char *uridata = 0;                 
280        int i = 0;
281       
282        trace_err.err_num = TRACE_ERR_NOERROR;
283        libtrace->format=NULL;
284       
285        /* parse the URI to determine what sort of event we are dealing with */
286        if ((uridata = trace_parse_uri(uri, &scan)) == 0) {
287                trace_set_err(libtrace,TRACE_ERR_BAD_FORMAT,"Bad uri format");
288                return libtrace;
289        }
290       
291        libtrace->event.tdelta = 0.0;
292        libtrace->filter = NULL;
293        libtrace->snaplen = 0;
294
295        for (i = 0; i < nformats; i++) {
296                if (strlen(scan) == strlen(format_list[i]->name) &&
297                                strncasecmp(scan,
298                                        format_list[i]->name,
299                                        strlen(scan)) == 0) {
300                        libtrace->format=format_list[i];
301                        break;
302                }
303        }
304        if (libtrace->format == 0) {
305                trace_set_err(libtrace, TRACE_ERR_BAD_FORMAT,
306                                "Unknown format (%s)",scan);
307                return 0;
308        }
309
310        libtrace->uridata = strdup(uridata);
311        /* libtrace->format now contains the type of uri
312         * libtrace->uridata contains the appropriate data for this
313         */
314       
315        if (libtrace->format->init_input) {
316                int err=libtrace->format->init_input(libtrace);
317                assert (err==-1 || err==0);
318                if (err==-1) {
319                        /* init_input should call trace_set_err to set
320                         * the error message
321                         */
322                        return libtrace;
323                }
324        } else {
325                trace_set_err(libtrace,TRACE_ERR_NO_INIT,
326                                "Format does not support input (%s)",scan);
327                return libtrace;
328        }
329       
330
331        libtrace->fifo = create_tracefifo(1048576);
332        assert(libtrace->fifo);
333        free(scan);
334        libtrace->started=false;
335        trace_set_err(libtrace,0,"");
336        return libtrace;
337}
338
339/* Creates a "dummy" trace file that has only the format type set.
340 *
341 * @returns opaque pointer to a (sparsely initialised) libtrace_t
342 *
343 * IMPORTANT: Do not attempt to call trace_read_packet or other such functions
344 * with the dummy trace. Its intended purpose is to act as a packet->trace for
345 * libtrace_packet_t's that are not associated with a libtrace_t structure.
346 */
347struct libtrace_t * trace_create_dead (const char *uri) {
348        struct libtrace_t *libtrace = malloc(sizeof(struct libtrace_t));
349        char *scan = calloc(sizeof(char),URI_PROTO_LINE);
350        char *uridata;
351        int i;
352       
353        trace_err.err_num = TRACE_ERR_NOERROR;
354
355        if((uridata = strchr(uri,':')) == NULL) {
356                xstrncpy(scan, uri, strlen(uri));
357        } else {
358                xstrncpy(scan,uri, (uridata - uri));
359        }
360       
361        libtrace->format = 0;   
362       
363        for (i = 0; i < nformats; i++) {
364                if (strlen(scan) == strlen(format_list[i]->name) &&
365                                !strncasecmp(scan,
366                                        format_list[i]->name,
367                                        strlen(scan))) {
368                                libtrace->format=format_list[i];
369                                break;
370                                }
371        }
372        if (libtrace->format == 0) {
373                trace_set_err(libtrace,TRACE_ERR_BAD_FORMAT,
374                                "Unknown format (%s)",scan);
375                return 0;
376        }
377       
378        free(scan);
379        return libtrace;
380
381}
382
383/* Creates a trace output file from a URI.
384 *
385 * @param uri   the uri string describing the output format and destination
386 * @returns opaque pointer to a libtrace_output_t
387 *
388 *  If an error occured when attempting to open the output trace, NULL is
389 *  returned and trace_errno is set.
390 */
391       
392libtrace_out_t *trace_create_output(const char *uri) {
393        struct libtrace_out_t *libtrace = malloc(sizeof(struct libtrace_out_t));
394       
395        char *scan = 0;
396        const char *uridata = 0;
397        int i;
398
399        trace_err.err_num = TRACE_ERR_NOERROR;
400        /* parse the URI to determine what sort of event we are dealing with */
401
402        if ((uridata = trace_parse_uri(uri, &scan)) == 0) {
403                trace_set_err_out(libtrace,TRACE_ERR_BAD_FORMAT,"Bad uri format");
404                return libtrace;
405        }
406       
407       
408        libtrace->format = 0;
409        for (i = 0; i < nformats; i++) {
410                if (strlen(scan) == strlen(format_list[i]->name) &&
411                                !strncasecmp(scan,
412                                        format_list[i]->name,
413                                        strlen(scan))) {
414                                libtrace->format=format_list[i];
415                                break;
416                                }
417        }
418        if (libtrace->format == 0) {
419                trace_set_err_out(libtrace,TRACE_ERR_BAD_FORMAT,
420                                "Unknown output format (%s)",scan);
421                return 0;
422        }
423        libtrace->uridata = strdup(uridata);
424
425
426        /* libtrace->format now contains the type of uri
427         * libtrace->uridata contains the appropriate data for this
428         */
429
430        if (libtrace->format->init_output) {
431                /* 0 on success, -1 on failure */
432                switch(libtrace->format->init_output(libtrace)) {
433                        case -1: /* failure */
434                                free(libtrace);
435                                return 0;
436                        case 0: /* success */
437                                break;
438                        default:
439                                assert(!"init_output() should return -1 for failure, or 0 for success");
440                }
441        } else {
442                trace_set_err_out(libtrace,TRACE_ERR_NO_INIT_OUT,
443                                "Format does not support writing (%s)",scan);
444                return libtrace;
445        }
446
447
448        free(scan);
449        libtrace->started=false;
450        return libtrace;
451}
452
453/* Start a trace
454 * @param libtrace      the input trace to start
455 * @returns 0 on success
456 *
457 * This does the work associated with actually starting up
458 * the trace.  it may fail.
459 */
460int trace_start(struct libtrace_t *libtrace)
461{
462        assert(libtrace);
463        if (libtrace->format->start_input) {
464                int ret=libtrace->format->start_input(libtrace);
465                if (ret < 0) {
466                        return ret;
467                }
468        }
469
470        libtrace->started=true;
471        return 0;
472}
473
474int trace_start_output(libtrace_out_t *libtrace) 
475{
476        assert(libtrace);
477        if (libtrace->format->start_output) {
478                int ret=libtrace->format->start_output(libtrace);
479                if (ret < 0) {
480                        return ret;
481                }
482        }
483
484        libtrace->started=false;
485        return 0;
486}
487
488int trace_pause(libtrace_t *libtrace)
489{
490        assert(libtrace);
491        assert(libtrace->started && "BUG: Called trace_pause without calling trace_start first");
492        if (libtrace->format->pause_input)
493                libtrace->format->pause_input(libtrace);
494        libtrace->started=false;
495        return 0;
496}
497
498int trace_config(libtrace_t *libtrace,
499                trace_option_t option,
500                void *value)
501{
502        int ret;
503        if (libtrace->format->config_input) {
504                ret=libtrace->format->config_input(libtrace,option,value);
505                if (ret==0)
506                        return 0;
507        }
508        switch(option) {
509                case TRACE_OPTION_SNAPLEN:
510                        libtrace->snaplen=*(int*)value;
511                        break;
512                case TRACE_OPTION_FILTER:
513                        libtrace->filter=value;
514                        break;
515                case TRACE_OPTION_PROMISC:
516                        trace_set_err(libtrace,TRACE_ERR_OPTION_UNAVAIL,
517                                "Promisc mode is not supported by this format module");
518                        return -1;
519                default:
520                        trace_set_err(libtrace,TRACE_ERR_UNKNOWN_OPTION,
521                                "Unknown option %i", option);
522                        return -1;
523        }
524        return 0;
525}
526
527/* Parses an output options string and calls the appropriate function to deal with output options.
528 *
529 * @param libtrace      the output trace object to apply the options to
530 * @param options       the options string
531 * @returns -1 if option configuration failed, 0 otherwise
532 *
533 * @author Shane Alcock
534 */
535int trace_config_output(struct libtrace_out_t *libtrace, 
536                trace_option_output_t option,
537                void *value) {
538        if (libtrace->format->config_output) {
539                return libtrace->format->config_output(libtrace, option, value);
540        }
541        return -1;
542}
543
544/* Close a trace file, freeing up any resources it may have been using
545 *
546 */
547void trace_destroy(struct libtrace_t *libtrace) {
548        assert(libtrace);
549        if (libtrace->started && libtrace->format->pause_input)
550                libtrace->format->pause_input(libtrace);
551        libtrace->format->fin_input(libtrace);
552        /* need to free things! */
553        free(libtrace->uridata);
554        destroy_tracefifo(libtrace->fifo);
555        free(libtrace);
556}
557
558
559void trace_destroy_dead(struct libtrace_t *libtrace) {
560        assert(libtrace);
561        free(libtrace);
562}
563/* Close an output trace file, freeing up any resources it may have been using
564 *
565 * @param libtrace      the output trace file to be destroyed
566 *
567 * @author Shane Alcock
568 * */
569void trace_destroy_output(struct libtrace_out_t *libtrace) {
570        assert(libtrace);
571        libtrace->format->fin_output(libtrace);
572        free(libtrace->uridata);
573        free(libtrace);
574}
575
576libtrace_packet_t *trace_create_packet() {
577        libtrace_packet_t *packet = calloc(1,sizeof(libtrace_packet_t));
578        packet->buf_control=TRACE_CTRL_PACKET;
579        return packet;
580}
581
582libtrace_packet_t *trace_copy_packet(const libtrace_packet_t *packet) {
583        libtrace_packet_t *dest = malloc(sizeof(libtrace_packet_t));
584        dest->trace=packet->trace;
585        dest->buffer=malloc(
586                        trace_get_framing_length(packet)
587                        +trace_get_capture_length(packet));
588        dest->header=dest->buffer;
589        dest->payload=(void*)
590                ((char*)dest->buffer+trace_get_framing_length(packet));
591        dest->size=packet->size;
592        dest->type=packet->type;
593        dest->buf_control=TRACE_CTRL_PACKET;
594        memcpy(dest->header,packet->header,trace_get_framing_length(packet));
595        memcpy(dest->payload,packet->payload,trace_get_capture_length(packet));
596}
597
598/** Destroy a packet object
599 *
600 * sideeffect: sets packet to NULL
601 */
602void trace_destroy_packet(struct libtrace_packet_t **packet) {
603        if ((*packet)->buf_control == TRACE_CTRL_PACKET) {
604                free((*packet)->buffer);
605        }
606        free((*packet));
607        packet = NULL;
608}       
609
610/* Read one packet from the trace into buffer
611 *
612 * @param libtrace      the libtrace opaque pointer
613 * @param packet        the packet opaque pointer
614 * @returns 0 on EOF, negative value on error
615 *
616 */
617int trace_read_packet(libtrace_t *libtrace, libtrace_packet_t *packet) {
618
619        assert(libtrace && "You called trace_read_packet() with a NULL libtrace parameter!\n");
620        assert(libtrace->started && "BUG: You must call libtrace_start() before trace_read_packet()\n");
621        assert(packet);
622        assert((packet->buf_control==TRACE_CTRL_PACKET || packet->buf_control==TRACE_CTRL_EXTERNAL)&&
623                "BUG: You must allocate a packet using packet_create()");
624     
625        /* Store the trace we are reading from into the packet opaque
626         * structure */
627        packet->trace = libtrace;
628
629
630        if (libtrace->format->read_packet) {
631                do {
632                        packet->size=libtrace->format->read_packet(libtrace,packet);
633                        if (packet->size==-1 || packet->size==0)
634                                return packet->size;
635                        if (libtrace->filter) {
636                                /* If the filter doesn't match, read another
637                                 * packet
638                                 */
639                                if (!trace_bpf_filter(libtrace->filter,packet)){
640                                        continue;
641                                }
642                        }
643                        if (libtrace->snaplen>0) {
644                                /* Snap the packet */
645                                trace_set_capture_length(packet,
646                                                libtrace->snaplen);
647                        }
648
649                        return packet->size;
650                } while(1);
651        }
652        packet->size=-1;
653        return -1;
654}
655
656/* Writes a packet to the specified output
657 *
658 * @param libtrace      describes the output format, destination, etc.
659 * @param packet        the packet to be written out
660 * @returns the number of bytes written, -1 if write failed
661 *
662 * @author Shane Alcock
663 * */
664int trace_write_packet(struct libtrace_out_t *libtrace, const struct libtrace_packet_t *packet) {
665        assert(libtrace);
666        assert(packet); 
667        /* Verify the packet is valid */
668        assert(packet->size<65536);
669        assert(packet->size>0);
670
671        if (libtrace->format->write_packet) {
672                return libtrace->format->write_packet(libtrace, packet);
673        }
674        return -1;
675}
676
677void *trace_get_link(const struct libtrace_packet_t *packet) {
678        return (void *)packet->payload;
679}
680
681/*
682typedef struct legacy_framing {
683        uint64_t        ts;
684        uint32_t        crc;
685        uint32_t        header;
686        uint32_t        data[12]; // pad to 64 bytes
687} legacy_framing_t;
688*/
689
690/* get a pointer to the IP header (if any)
691 * @param packet        a pointer to a libtrace_packet structure
692 *
693 * @returns a pointer to the IP header, or NULL if there is not an IP packet
694 */
695struct libtrace_ip *trace_get_ip(const struct libtrace_packet_t *packet) {
696        struct libtrace_ip *ipptr = 0;
697
698        switch(trace_get_link_type(packet)) {
699                case TRACE_TYPE_80211_PRISM:
700                        {
701                                struct ieee_802_11_header *wifi = 
702                                        (void*)(
703                                         (char*)trace_get_link(packet)+144);
704                                if (!wifi) {
705                                        ipptr = NULL;
706                                        break;
707                                }
708
709                                /* Data packet? */
710                                if (wifi->type != 2) {
711                                        ipptr = NULL;
712                                }
713                                else {
714                                        struct ieee_802_11_payload *eth = 
715                                                (void*)((char*)wifi+sizeof(struct ieee_802_11_header));
716                                        ipptr = NULL;
717
718                                        if (ntohs(eth->type) == 0x0800) {
719                                            ipptr=(void*)
720                                                    ((char*)eth + sizeof(*eth));
721                                        } else if (ntohs(eth->type) == 0x8100) {
722                                            struct libtrace_8021q *vlanhdr =
723                                                (struct libtrace_8021q *)eth;
724                                            if (ntohs(vlanhdr->vlan_ether_type)
725                                                            == 0x0800) {
726                                                ipptr=(void*)(
727                                                 (char*)eth+sizeof(*vlanhdr));
728                                            }
729                                        }
730                                }
731                        }
732                        break;
733                case TRACE_TYPE_80211:
734                        { 
735                               
736                                struct ieee_802_11_header *wifi = trace_get_link(packet);       
737                                if (!wifi) {
738                                        ipptr = NULL;
739                                        break;
740                                }
741
742                                /* Data packet? */
743                                if (wifi->type != 2) {
744                                        ipptr = NULL;
745                                }
746                                else {
747                                        struct ieee_802_11_payload *eth = 
748                                                (void*)((char*)wifi+sizeof(struct ieee_802_11_header));
749                                        ipptr = NULL;
750
751                                        if (ntohs(eth->type) == 0x0800) {
752                                            ipptr=(void*)((char*)eth + sizeof(*eth));
753                                        } else if (ntohs(eth->type) == 0x8100) {
754                                            struct libtrace_8021q *vlanhdr =
755                                                (struct libtrace_8021q *)eth;
756                                            if (ntohs(vlanhdr->vlan_ether_type)
757                                                            == 0x0800) {
758                                                ipptr=(void*)((char*)eth + 
759                                                        sizeof(*vlanhdr));
760                                            }
761                                        }
762                                }
763                        }
764                        break;
765                case TRACE_TYPE_ETH:
766                case TRACE_TYPE_LEGACY_ETH:
767                        {
768                                struct libtrace_ether *eth = 
769                                        trace_get_link(packet);
770                                if (!eth) {
771                                        ipptr = NULL;
772                                        break;
773                                }
774                                ipptr = NULL;
775                               
776                                if (ntohs(eth->ether_type)==0x0800) {
777                                        ipptr = (void*)((char *)eth + sizeof(*eth));
778                                } else if (ntohs(eth->ether_type) == 0x8100) {
779                                        struct libtrace_8021q *vlanhdr = 
780                                                (struct libtrace_8021q *)eth;
781                                        if (ntohs(vlanhdr->vlan_ether_type) 
782                                                        == 0x0800) {
783                                                ipptr = (void*)((char *)eth + 
784                                                        sizeof(*vlanhdr));
785                                        }
786                                }
787                                break;
788                        }
789                case TRACE_TYPE_NONE:
790                        ipptr = trace_get_link(packet);
791                        break;
792                case TRACE_TYPE_LINUX_SLL:
793                        {
794                                struct trace_sll_header_t *sll;
795
796                                sll = trace_get_link(packet);
797                                if (!sll) {
798                                        ipptr = NULL;
799                                        break;
800                                }
801                                if (ntohs(sll->protocol)!=0x0800) {
802                                        ipptr = NULL;
803                                }
804                                else {
805                                        ipptr = (void*)((char*)sll+
806                                                        sizeof(*sll));
807                                }
808                        }
809                        break;
810                case TRACE_TYPE_PFLOG:
811                        {
812                                struct trace_pflog_header_t *pflog;
813                                pflog = trace_get_link(packet);
814                                if (!pflog) {
815                                        ipptr = NULL;
816                                        break;
817                                }
818                                if (pflog->af != AF_INET) {
819                                        ipptr = NULL;
820                                } else {
821                                        ipptr = (void*)((char*)pflog+
822                                                sizeof(*pflog));
823                                }
824                        }
825                        break;
826                case TRACE_TYPE_LEGACY_POS:
827                        {
828                                /* 64 byte capture. */
829                                struct libtrace_pos *pos = 
830                                        trace_get_link(packet);
831                                if (ntohs(pos->ether_type) == 0x0800) {
832                                        ipptr=(void*)((char *)pos+sizeof(*pos));
833                                } else {
834                                        ipptr=NULL;
835                                }
836                                break;
837                               
838                        }
839                case TRACE_TYPE_LEGACY_ATM:
840                case TRACE_TYPE_ATM:
841                        {
842                                /* 64 byte capture. */
843                                struct libtrace_llcsnap *llc = 
844                                        trace_get_link(packet);
845
846                                /* advance the llc ptr +4 into the link layer.
847                                 * need to check what is in these 4 bytes.
848                                 * don't have time!
849                                 */
850                                llc = (void*)((char *)llc + 4);
851                                if (ntohs(llc->type) == 0x0800) {
852                                        ipptr=(void*)((char*)llc+sizeof(*llc));
853                                } else {
854                                        ipptr = NULL;
855                                }
856                                break;
857                        }
858                default:
859                        fprintf(stderr,"Don't understand link layer type %i in trace_get_ip()\n",
860                                trace_get_link_type(packet));
861                        ipptr=NULL;
862                        break;
863        }
864
865        return ipptr;
866}
867
868#define SW_IP_OFFMASK 0xff1f
869
870/* Gets a pointer to the transport layer header (if any)
871 * @param packet        a pointer to a libtrace_packet structure
872 *
873 * @returns a pointer to the transport layer header, or NULL if there is no header
874 */
875void *trace_get_transport(const struct libtrace_packet_t *packet) {
876        void *trans_ptr = 0;
877        struct libtrace_ip *ipptr = 0;
878
879        if (!(ipptr = trace_get_ip(packet))) {
880                return 0;
881        }
882
883        if ((ipptr->ip_off & SW_IP_OFFMASK) == 0) {
884                trans_ptr = (void *)((ptrdiff_t)ipptr + (ipptr->ip_hl * 4));
885        }
886        return trans_ptr;
887}
888
889/* Gets a pointer to the transport layer header (if any) given a pointer to the
890 * IP header
891 * @param ip            The IP Header
892 * @param[out] skipped  An output variable of the number of bytes skipped
893 *
894 * @returns a pointer to the transport layer header, or NULL if there is no header
895 *
896 * Skipped can be NULL, in which case it will be ignored
897 */
898void *trace_get_transport_from_ip(const libtrace_ip_t *ip, int *skipped) {
899        void *trans_ptr = 0;   
900
901        if ((ip->ip_off & SW_IP_OFFMASK) == 0) {
902                trans_ptr = (void *)((ptrdiff_t)ip + (ip->ip_hl * 4));
903        }
904
905        if (skipped)
906                *skipped = (ip->ip_hl*4);
907
908        return trans_ptr;
909}
910
911/* get a pointer to the TCP header (if any)
912 * @param packet        a pointer to a libtrace_packet structure
913 *
914 * @returns a pointer to the TCP header, or NULL if there is not a TCP packet
915 */
916libtrace_tcp_t *trace_get_tcp(const libtrace_packet_t *packet) {
917        struct libtrace_tcp *tcpptr = 0;
918        struct libtrace_ip *ipptr = 0;
919
920        if(!(ipptr = trace_get_ip(packet))) {
921                return 0;
922        }
923        if (ipptr->ip_p == 6) {
924                tcpptr = (struct libtrace_tcp *)trace_get_transport_from_ip(ipptr, 0);
925        }
926        return tcpptr;
927}
928
929/* get a pointer to the TCP header (if any) given a pointer to the IP header
930 * @param ip            The IP header
931 * @param[out] skipped  An output variable of the number of bytes skipped
932 *
933 * @returns a pointer to the TCP header, or NULL if this is not a TCP packet
934 *
935 * Skipped can be NULL, in which case it will be ignored by the program.
936 */
937libtrace_tcp_t *trace_get_tcp_from_ip(const libtrace_ip_t *ip, int *skipped)
938{
939        struct libtrace_tcp *tcpptr = 0;
940
941        if (ip->ip_p == 6)  {
942                tcpptr = (struct libtrace_tcp *)trace_get_transport_from_ip(ip, skipped);
943        }
944
945        return tcpptr;
946}
947
948/* get a pointer to the UDP header (if any)
949 * @param packet        a pointer to a libtrace_packet structure
950 *
951 * @returns a pointer to the UDP header, or NULL if this is not a UDP packet
952 */
953struct libtrace_udp *trace_get_udp(const struct libtrace_packet_t *packet) {
954        struct libtrace_udp *udpptr = 0;
955        struct libtrace_ip *ipptr = 0;
956       
957        if(!(ipptr = trace_get_ip(packet))) {
958                return 0;
959        }
960        if (ipptr->ip_p == 17)  {
961                udpptr = (struct libtrace_udp *)trace_get_transport_from_ip(ipptr, 0);
962        }
963
964        return udpptr;
965}
966
967/* get a pointer to the UDP header (if any) given a pointer to the IP header
968 * @param ip            The IP header
969 * @param[out] skipped  An output variable of the number of bytes skipped
970 *
971 * @returns a pointer to the UDP header, or NULL if this is not a UDP packet
972 *
973 * Skipped can be NULL, in which case it will be ignored by the program.
974 */
975struct libtrace_udp *trace_get_udp_from_ip(const struct libtrace_ip *ip, int *skipped)
976{
977        struct libtrace_udp *udpptr = 0;
978
979        if (ip->ip_p == 17) {
980                udpptr = (struct libtrace_udp *)trace_get_transport_from_ip(ip, skipped);
981        }
982
983        return udpptr;
984}
985
986
987/* get a pointer to the ICMP header (if any)
988 * @param packet        a pointer to a libtrace_packet structure
989 *
990 * @returns a pointer to the ICMP header, or NULL if this is not a ICMP packet
991 */
992struct libtrace_icmp *trace_get_icmp(const struct libtrace_packet_t *packet) {
993        struct libtrace_icmp *icmpptr = 0;
994        struct libtrace_ip *ipptr = 0;
995       
996        if(!(ipptr = trace_get_ip(packet))) {
997                return 0;
998        }
999        if (ipptr->ip_p == 1){
1000                icmpptr = (struct libtrace_icmp *)trace_get_transport_from_ip(ipptr, 0);
1001        }
1002        return icmpptr;
1003}
1004
1005/* get a pointer to the ICMP header (if any) given a pointer to the IP header
1006 * @param ip            The IP header
1007 * @param[out] skipped  An output variable of the number of bytes skipped
1008 *
1009 * @returns a pointer to the ICMP header, or NULL if this is not a ICMP packet
1010 *
1011 * Skipped can be NULL, in which case it will be ignored by the program.
1012 */
1013struct libtrace_icmp *trace_get_icmp_from_ip(const struct libtrace_ip *ip, int *skipped)
1014{
1015        struct libtrace_icmp *icmpptr = 0;
1016
1017        if (ip->ip_p == 1)  {
1018                icmpptr = (struct libtrace_icmp *)trace_get_transport_from_ip(ip, skipped);
1019        }
1020
1021        return icmpptr;
1022}
1023/* parse an ip or tcp option
1024 * @param[in,out] ptr   the pointer to the current option
1025 * @param[in,out] len   the length of the remaining buffer
1026 * @param[out] type     the type of the option
1027 * @param[out] optlen   the length of the option
1028 * @param[out] data     the data of the option
1029 *
1030 * @returns bool true if there is another option (and the fields are filled in)
1031 *               or false if this was the last option.
1032 *
1033 * This updates ptr to point to the next option after this one, and updates
1034 * len to be the number of bytes remaining in the options area.  Type is updated
1035 * to be the code of this option, and data points to the data of this option,
1036 * with optlen saying how many bytes there are.
1037 *
1038 * @note Beware of fragmented packets.
1039 * @author Perry Lorier
1040 */
1041int trace_get_next_option(unsigned char **ptr,int *len,
1042                        unsigned char *type,
1043                        unsigned char *optlen,
1044                        unsigned char **data)
1045{
1046        if (*len<=0)
1047                return 0;
1048        *type=**ptr;
1049        switch(*type) {
1050                case 0: /* End of options */
1051                        return 0;
1052                case 1: /* Pad */
1053                        (*ptr)++;
1054                        (*len)--;
1055                        return 1;
1056                default:
1057                        *optlen = *(*ptr+1);
1058                        if (*optlen<2)
1059                                return 0; /* I have no idea wtf is going on
1060                                           * with these packets
1061                                           */
1062                        (*len)-=*optlen;
1063                        (*data)=(*ptr+2);
1064                        (*ptr)+=*optlen;
1065                        if (*len<0)
1066                                return 0;
1067                        return 1;
1068        }
1069        assert(0);
1070}
1071
1072
1073/* Get the current time in DAG time format
1074 * @param packet        a pointer to a libtrace_packet structure
1075 * @returns a 64 bit timestamp in DAG ERF format (upper 32 bits are the seconds
1076 * past 1970-01-01, the lower 32bits are partial seconds)
1077 * @author Daniel Lawson
1078 */ 
1079uint64_t trace_get_erf_timestamp(const libtrace_packet_t *packet) {
1080        uint64_t timestamp = 0;
1081        double seconds = 0.0;
1082        struct timeval ts;
1083
1084        assert(packet->size>0 && packet->size<65536);
1085
1086        if (packet->trace->format->get_erf_timestamp) {
1087                /* timestamp -> timestamp */
1088                timestamp = packet->trace->format->get_erf_timestamp(packet);
1089        } else if (packet->trace->format->get_timeval) {
1090                /* timeval -> timestamp */
1091                ts = packet->trace->format->get_timeval(packet);
1092                timestamp = ((((uint64_t)ts.tv_sec) << 32) + \
1093                                (((uint64_t)ts.tv_usec * UINT_MAX)/1000000));
1094        } else if (packet->trace->format->get_seconds) {
1095                /* seconds -> timestamp */
1096                seconds = packet->trace->format->get_seconds(packet);
1097                timestamp = ((uint64_t)((uint32_t)seconds) << 32) + \
1098                            (( seconds - (uint32_t)seconds   ) * UINT_MAX);
1099        }
1100        return timestamp;
1101}
1102
1103/* Get the current time in struct timeval
1104 * @param packet        a pointer to a libtrace_packet structure
1105 *
1106 * @returns time that this packet was seen in a struct timeval
1107 * @author Daniel Lawson
1108 * @author Perry Lorier
1109 */ 
1110struct timeval trace_get_timeval(const libtrace_packet_t *packet) {
1111        struct timeval tv;
1112        uint64_t ts = 0;
1113        double seconds = 0.0;
1114        assert(packet->size>0 && packet->size<65536);
1115        if (packet->trace->format->get_timeval) {
1116                /* timeval -> timeval */
1117                tv = packet->trace->format->get_timeval(packet);
1118        } else if (packet->trace->format->get_erf_timestamp) {
1119                /* timestamp -> timeval */
1120                ts = packet->trace->format->get_erf_timestamp(packet);
1121#if __BYTE_ORDER == __BIG_ENDIAN
1122                tv.tv_sec = ts & 0xFFFFFFFF;
1123#elif __BYTE_ORDER == __LITTLE_ENDIAN
1124                tv.tv_sec = ts >> 32;
1125#else
1126#error "What on earth are you running this on?"
1127#endif
1128                tv.tv_usec = ((ts&0xFFFFFFFF)*1000000)>>32;
1129                if (tv.tv_usec >= 1000000) {
1130                        tv.tv_usec -= 1000000;
1131                        tv.tv_sec += 1;
1132                }
1133        } else if (packet->trace->format->get_seconds) {
1134                /* seconds -> timeval */
1135                seconds = packet->trace->format->get_seconds(packet);
1136                tv.tv_sec = (uint32_t)seconds;
1137                tv.tv_usec = (uint32_t)(((seconds - tv.tv_sec) * 1000000)/UINT_MAX);
1138        }
1139
1140        return tv;
1141}
1142
1143/* Get the current time in floating point seconds
1144 * @param packet        a pointer to a libtrace_packet structure
1145 * @returns time that this packet was seen in 64bit floating point seconds
1146 * @author Perry Lorier
1147 */ 
1148double trace_get_seconds(const struct libtrace_packet_t *packet) {
1149        double seconds = 0.0;
1150        uint64_t ts = 0;
1151        struct timeval tv;
1152
1153        assert(packet->size>0 && packet->size<65536);
1154       
1155        if (packet->trace->format->get_seconds) {
1156                /* seconds->seconds */
1157                seconds = packet->trace->format->get_seconds(packet);
1158        } else if (packet->trace->format->get_erf_timestamp) {
1159                /* timestamp -> seconds */
1160                ts = packet->trace->format->get_erf_timestamp(packet);
1161                seconds =  (ts>>32) + ((ts & UINT_MAX)*1.0 / UINT_MAX);
1162        } else if (packet->trace->format->get_timeval) {
1163                /* timeval -> seconds */
1164                tv = packet->trace->format->get_timeval(packet);
1165                seconds = tv.tv_sec + ((tv.tv_usec * UINT_MAX * 1.0)/1000000);
1166        }
1167
1168        return seconds;
1169}
1170
1171int trace_get_capture_length(const struct libtrace_packet_t *packet) {
1172
1173        assert(packet->size>0 && packet->size<65536);
1174
1175        if (packet->trace->format->get_capture_length) {
1176                return packet->trace->format->get_capture_length(packet);
1177        }
1178        return -1;
1179}
1180       
1181/* Get the size of the packet as it was seen on the wire.
1182 * @param packet        a pointer to a libtrace_packet structure
1183 *
1184 * @returns the size of the packet as it was on the wire.
1185 * @author Perry Lorier
1186 * @author Daniel Lawson
1187 * @note Due to the trace being a header capture, or anonymisation this may
1188 * not be the same as the Capture Len.
1189 */ 
1190int trace_get_wire_length(const struct libtrace_packet_t *packet){
1191        assert(packet->size>0 && packet->size<65536);
1192
1193        if (packet->trace->format->get_wire_length) {
1194                return packet->trace->format->get_wire_length(packet);
1195        }
1196        return -1;
1197
1198}
1199
1200/* Get the length of the capture framing headers.
1201 * @param packet        the packet opaque pointer
1202 * @returns the size of the packet as it was on the wire.
1203 * @author Perry Lorier
1204 * @author Daniel Lawson
1205 * @note this length corresponds to the difference between the size of a
1206 * captured packet in memory, and the captured length of the packet
1207 */ 
1208SIMPLE_FUNCTION
1209int trace_get_framing_length(const libtrace_packet_t *packet) {
1210        if (packet->trace->format->get_framing_length) {
1211                return packet->trace->format->get_framing_length(packet);
1212        }
1213        return -1;
1214}
1215
1216
1217/* Get the type of the link layer
1218 * @param packet        a pointer to a libtrace_packet structure
1219 * @returns libtrace_linktype_t
1220 * @author Perry Lorier
1221 * @author Daniel Lawson
1222 */
1223libtrace_linktype_t trace_get_link_type(const libtrace_packet_t *packet ) {
1224        if (packet->trace->format->get_link_type) {
1225                return packet->trace->format->get_link_type(packet);
1226        }
1227        return -1;
1228}
1229
1230/* Get the source MAC addres
1231 * @param packet        a pointer to a libtrace_packet structure
1232 * @returns a pointer to the source mac, (or NULL if there is no source MAC)
1233 * @author Perry Lorier
1234 */
1235uint8_t *trace_get_source_mac(const struct libtrace_packet_t *packet) {
1236        void *link = trace_get_link(packet);
1237        struct ieee_802_11_header *wifi = link;
1238        struct libtrace_ether *ethptr = link;
1239        if (!link)
1240                return NULL;
1241        switch (trace_get_link_type(packet)) {
1242                case TRACE_TYPE_80211:
1243                        return (uint8_t*)&wifi->mac2;
1244                case TRACE_TYPE_ETH:
1245                        return (uint8_t*)&ethptr->ether_shost;
1246                default:
1247                        fprintf(stderr,"Not implemented\n");
1248                        assert(0);
1249        }
1250}
1251
1252/* Get the destination MAC addres
1253 * @param packet a libtrace_packet pointer
1254 * @returns a pointer to the destination mac, (or NULL if there is no
1255 * destination MAC)
1256 * @author Perry Lorier
1257 */
1258uint8_t *trace_get_destination_mac(const struct libtrace_packet_t *packet) {
1259        void *link = trace_get_link(packet);
1260        struct ieee_802_11_header *wifi = link;
1261        struct libtrace_ether *ethptr = link;
1262        if (!link)
1263                return NULL;
1264        switch (trace_get_link_type(packet)) {
1265                case TRACE_TYPE_80211:
1266                        return (uint8_t*)&wifi->mac1;
1267                case TRACE_TYPE_ETH:
1268                        return (uint8_t*)&ethptr->ether_dhost;
1269                default:
1270                        fprintf(stderr,"Not implemented\n");
1271                        assert(0);
1272        }
1273}
1274
1275
1276/* process a libtrace event
1277 * @param trace the libtrace opaque pointer
1278 * @param packet the libtrace_packet opaque pointer
1279 * @returns
1280 *  TRACE_EVENT_IOWAIT  Waiting on I/O on fd
1281 *  TRACE_EVENT_SLEEP   Next event in seconds
1282 *  TRACE_EVENT_PACKET  Packet arrived in buffer with size size
1283 *  TRACE_EVENT_TERMINATE Trace terminated (perhaps with an error condition)
1284 * FIXME currently keeps a copy of the packet inside the trace pointer,
1285 * which in turn is stored inside the new packet object...
1286 * @author Perry Lorier
1287 */
1288struct libtrace_eventobj_t trace_event(struct libtrace_t *trace, 
1289                struct libtrace_packet_t *packet) {
1290        struct libtrace_eventobj_t event = {0,0,0.0,0};
1291
1292        if (!trace) {
1293                fprintf(stderr,"You called trace_event() with a NULL trace object!\n");
1294        }
1295        assert(trace);
1296        assert(packet);
1297
1298        /* Store the trace we are reading from into the packet opaque
1299         * structure */
1300        packet->trace = trace;
1301
1302        if (packet->trace->format->trace_event) {
1303                return packet->trace->format->trace_event(trace,packet);
1304        } else {
1305                return event;
1306        }
1307
1308}
1309
1310/* setup a BPF filter
1311 * @param filterstring a char * containing the bpf filter string
1312 * @returns opaque pointer pointer to a libtrace_filter_t object
1313 * @author Daniel Lawson
1314 */
1315struct libtrace_filter_t *trace_bpf_setfilter(const char *filterstring) {
1316#if HAVE_BPF
1317        struct libtrace_filter_t *filter = malloc(sizeof(struct libtrace_filter_t));
1318        filter->filterstring = strdup(filterstring);
1319        filter->flag = 0;
1320        return filter;
1321#else
1322        fprintf(stderr,"This version of libtrace does not have bpf filter support\n");
1323        return 0;
1324#endif
1325}
1326
1327/* compile a bpf filter, now we know what trace it's on
1328 * @internal
1329 *
1330 * @returns -1 on error, 0 on success
1331 */
1332int trace_bpf_compile(libtrace_filter_t *filter,
1333                const libtrace_packet_t *packet ) {
1334#if HAVE_BPF
1335        void *linkptr = 0;
1336        assert(filter);
1337
1338        /* If this isn't a real packet, then fail */
1339        linkptr = trace_get_link(packet);
1340        if (!linkptr) {
1341                trace_set_err(packet->trace,
1342                                TRACE_ERR_BAD_PACKET,"Packet has no payload");
1343                return -1;
1344        }
1345       
1346        if (filter->filterstring && ! filter->flag) {
1347                pcap_t *pcap;
1348                libtrace_linktype_t linktype=trace_get_link_type(packet);
1349                if (linktype==(libtrace_linktype_t)-1) {
1350                        trace_set_err(packet->trace,TRACE_ERR_BAD_PACKET,
1351                                        "Packet has an unknown linktype");
1352                        return -1;
1353                }
1354                if (libtrace_to_pcap_dlt(linktype) == -1) {
1355                        trace_set_err(packet->trace,TRACE_ERR_BAD_PACKET,
1356                                        "Unknown pcap equivilent linktype");
1357                        return -1;
1358                }
1359                pcap=(pcap_t *)pcap_open_dead(
1360                                libtrace_to_pcap_dlt(linktype),
1361                                1500);
1362                /* build filter */
1363                if (pcap_compile( pcap, &filter->filter, filter->filterstring, 
1364                                        1, 0)) {
1365                        pcap_close(pcap);
1366                        trace_set_err(packet->trace,TRACE_ERR_BAD_PACKET,
1367                                        "Packet has no payload");
1368                        return -1;
1369                }
1370                pcap_close(pcap);
1371                filter->flag=1;
1372        }
1373        return 0;
1374#else
1375        assert(!"This should never be called when BPF not enabled");
1376#endif
1377}
1378
1379int trace_bpf_filter(struct libtrace_filter_t *filter,
1380                        const struct libtrace_packet_t *packet) {
1381#if HAVE_BPF
1382        void *linkptr = 0;
1383        int clen = 0;
1384        assert(filter);
1385        assert(packet);
1386        linkptr = trace_get_link(packet);
1387        if (!linkptr) {
1388                return 0;
1389        }
1390
1391        /* We need to compile it now, because before we didn't know what the
1392         * link type was
1393         */
1394        if (trace_bpf_compile(filter,packet)==-1)
1395                return -1;
1396       
1397        clen = trace_get_capture_length(packet);
1398
1399        assert(filter->flag);
1400        return bpf_filter(filter->filter.bf_insns, linkptr, clen, clen);
1401#else
1402        fprintf(stderr,"This version of libtrace does not have bpf filter support\n");
1403        return 0;
1404#endif
1405}
1406
1407/* Set the direction flag, if it has one
1408 * @param packet the packet opaque pointer
1409 * @param direction the new direction (0,1,2,3)
1410 * @returns a signed value containing the direction flag, or -1 if this is not supported
1411 * @author Daniel Lawson
1412 */
1413int8_t trace_set_direction(struct libtrace_packet_t *packet, int8_t direction) {
1414        assert(packet);
1415        assert(packet->size>0 && packet->size<65536);
1416        if (packet->trace->format->set_direction) {
1417                return packet->trace->format->set_direction(packet,direction);
1418        }
1419        return -1;
1420}
1421
1422/* Get the direction flag, if it has one
1423 * @param packet a pointer to a libtrace_packet structure
1424 * @returns a signed value containing the direction flag, or -1 if this is not supported
1425 * The direction is defined as 0 for packets originating locally (ie, outbound)
1426 * and 1 for packets originating remotely (ie, inbound).
1427 * Other values are possible, which might be overloaded to mean special things
1428 * for a special trace.
1429 * @author Daniel Lawson
1430 */
1431int8_t trace_get_direction(const struct libtrace_packet_t *packet) {
1432        assert(packet);
1433        assert(packet->size>0 && packet->size<65536);
1434        if (packet->trace->format->get_direction) {
1435                return packet->trace->format->get_direction(packet);
1436        }
1437        return -1;
1438}
1439
1440struct ports_t {
1441        uint16_t src;
1442        uint16_t dst;
1443};
1444
1445/* Return the client port
1446 */
1447uint16_t trace_get_source_port(const struct libtrace_packet_t *packet)
1448{
1449        struct libtrace_ip *ip = trace_get_ip(packet);
1450        struct ports_t *port;
1451        if (6 != ip->ip_p
1452          && 17 != ip->ip_p)
1453                return 0;
1454        if (0 != (ip->ip_off & SW_IP_OFFMASK))
1455                return 0;
1456
1457        port = (struct ports_t *)((ptrdiff_t)ip + (ip->ip_hl * 4));
1458
1459        return ntohs(port->src);
1460}
1461
1462/* Same as get_source_port except use the destination port */
1463uint16_t trace_get_destination_port(const struct libtrace_packet_t *packet)
1464{
1465        struct libtrace_ip *ip = trace_get_ip(packet);
1466        struct ports_t *port;
1467
1468        if (6 != ip->ip_p
1469          && 17 != ip->ip_p)
1470                return 0;
1471
1472        if (0 != (ip->ip_off & SW_IP_OFFMASK))
1473                return 0;
1474
1475        port = (struct ports_t *)((ptrdiff_t)ip + (ip->ip_hl * 4));
1476
1477        return ntohs(port->dst);
1478}
1479
1480#define ROOT_SERVER(x) ((x) < 512)
1481#define ROOT_CLIENT(x) ((512 <= (x)) && ((x) < 1024))
1482#define NONROOT_SERVER(x) ((x) >= 5000)
1483#define NONROOT_CLIENT(x) ((1024 <= (x)) && ((x) < 5000))
1484#define DYNAMIC(x) ((49152 < (x)) && ((x) < 65535))
1485#define SERVER(x) ROOT_SERVER(x) || NONROOT_SERVER(x)
1486#define CLIENT(x) ROOT_CLIENT(x) || NONROOT_CLIENT(x)
1487
1488/* Attempt to deduce the 'server' port
1489 * @param protocol the IP protocol (eg, 6 or 17 for TCP or UDP)
1490 * @param source the TCP or UDP source port
1491 * @param dest the TCP or UDP destination port
1492 * @returns a hint as to which port is the server port
1493 * @author Daniel Lawson
1494 */
1495int8_t trace_get_server_port(uint8_t protocol __attribute__((unused)), uint16_t source, uint16_t dest) {
1496        /*
1497         * * If the ports are equal, return DEST
1498         * * Check for well-known ports in the given protocol
1499         * * Root server ports: 0 - 511
1500         * * Root client ports: 512 - 1023
1501         * * non-root client ports: 1024 - 4999
1502         * * non-root server ports: 5000+
1503         * * Check for static ranges: 1024 - 49151
1504         * * Check for dynamic ranges: 49152 - 65535
1505         * * flip a coin.
1506         */
1507       
1508        /* equal */
1509        if (source == dest)
1510                return USE_DEST;
1511
1512        /* root server port, 0 - 511 */
1513        if (ROOT_SERVER(source) && ROOT_SERVER(dest)) {
1514                if (source < dest)
1515                        return USE_SOURCE;
1516                return USE_DEST;
1517        }
1518
1519        if (ROOT_SERVER(source) && !ROOT_SERVER(dest))
1520                return USE_SOURCE;
1521        if (!ROOT_SERVER(source) && ROOT_SERVER(dest))
1522                return USE_DEST;
1523
1524        /* non-root server */
1525        if (NONROOT_SERVER(source) && NONROOT_SERVER(dest)) {
1526                if (source < dest)
1527                        return USE_SOURCE;
1528                return USE_DEST;
1529        }
1530        if (NONROOT_SERVER(source) && !NONROOT_SERVER(dest))
1531                return USE_SOURCE;
1532        if (!NONROOT_SERVER(source) && NONROOT_SERVER(dest))
1533                return USE_DEST;
1534
1535        /* root client */
1536        if (ROOT_CLIENT(source) && ROOT_CLIENT(dest)) {
1537                if (source < dest)
1538                        return USE_SOURCE;
1539                return USE_DEST;
1540        }
1541        if (ROOT_CLIENT(source) && !ROOT_CLIENT(dest)) {
1542                /* prefer root-client over nonroot-client */
1543                if (NONROOT_CLIENT(dest))
1544                        return USE_SOURCE;
1545                return USE_DEST;
1546        }
1547        if (!ROOT_CLIENT(source) && ROOT_CLIENT(dest)) {
1548                /* prefer root-client over nonroot-client */
1549                if (NONROOT_CLIENT(source))
1550                        return USE_DEST;
1551                return USE_SOURCE;
1552        }
1553       
1554        /* nonroot client */
1555        if (NONROOT_CLIENT(source) && NONROOT_CLIENT(dest)) {
1556                if (source < dest) 
1557                        return USE_SOURCE;
1558                return USE_DEST;
1559        }
1560        if (NONROOT_CLIENT(source) && !NONROOT_CLIENT(dest))
1561                return USE_DEST;
1562        if (!NONROOT_CLIENT(source) && NONROOT_CLIENT(dest))
1563                return USE_SOURCE;
1564
1565        /* dynamic range */
1566        if (DYNAMIC(source) && DYNAMIC(dest))
1567                if (source < dest)
1568                        return USE_SOURCE;
1569                return USE_DEST;
1570        if (DYNAMIC(source) && !DYNAMIC(dest))
1571                return USE_DEST;
1572        if (!DYNAMIC(source) && DYNAMIC(dest))
1573                return USE_SOURCE;
1574        /*
1575        if (SERVER(source) && CLIENT(dest))
1576                return USE_SOURCE;
1577       
1578        if (SERVER(dest) && CLIENT(source))
1579                return USE_DEST;
1580        if (ROOT_SERVER(source) && !ROOT_SERVER(dest))
1581                return USE_SOURCE;
1582        if (ROOT_SERVER(dest) && !ROOT_SERVER(source))
1583                return USE_DEST;
1584        */
1585        /* failing that test... */
1586        if (source < dest) {
1587                return USE_SOURCE;
1588        } 
1589        return USE_DEST;
1590       
1591}
1592
1593/* Truncate the packet at the suggested length
1594 * @param packet        the packet opaque pointer
1595 * @param size          the new length of the packet
1596 * @returns the new size of the packet
1597 * @note size and the return size refer to the network-level payload of the
1598 * packet, and do not include any capture headers. For example, to truncate a
1599 * packet after the IP header, set size to sizeof(ethernet_header) +
1600 * sizeof(ip_header)
1601 * @note If the original network-level payload is smaller than size, then the
1602 * original size is returned and the packet is left unchanged.
1603 * @author Daniel Lawson
1604 */
1605size_t trace_set_capture_length(struct libtrace_packet_t *packet, size_t size) {
1606        assert(packet);
1607        assert(packet->size>0 && packet->size<65536);
1608
1609        if (packet->trace->format->set_capture_length) {
1610                int caplen=packet->trace->format->set_capture_length(packet,size);
1611                if (caplen!=-1) {
1612                        packet->size=trace_get_framing_length(packet)+caplen;
1613                }
1614                return caplen;
1615        }
1616
1617        return -1;
1618}
1619
1620const char * trace_parse_uri(const char *uri, char **format) {
1621        const char *uridata = 0;
1622       
1623        if((uridata = strchr(uri,':')) == NULL) {
1624                /* badly formed URI - needs a : */
1625                return 0;
1626        }
1627
1628        if ((uridata - uri) > URI_PROTO_LINE) {
1629                /* badly formed URI - uri type is too long */
1630                return 0;
1631        }
1632
1633        *format=xstrndup(uri, (uridata - uri));
1634
1635        /* push uridata past the delimiter */
1636        uridata++;
1637       
1638        return uridata;
1639}
1640
1641enum base_format_t trace_get_format(struct libtrace_packet_t *packet) 
1642{
1643        assert(packet);
1644
1645        return packet->trace->format->type;
1646}
1647       
1648libtrace_err_t trace_get_err(libtrace_t *trace)
1649{
1650        libtrace_err_t err = trace->err;
1651        trace->err.err_num = 0; /* "OK" */
1652        trace->err.problem[0]='\0';
1653        return err;
1654}
1655
1656libtrace_err_t trace_get_err_output(libtrace_out_t *trace)
1657{
1658        libtrace_err_t err = trace->err;
1659        trace->err.err_num = 0; /* "OK" */
1660        trace->err.problem[0]='\0';
1661        return err;
1662}
Note: See TracBrowser for help on using the repository browser.