source: lib/trace.c @ b51edf5

4.0.1-hotfixescachetimestampsdevelopdpdk-ndagetsilivegetfragoffhelplibtrace4ndag_formatpfringrc-4.0.1rc-4.0.2rc-4.0.3rc-4.0.4ringdecrementfixringperformanceringtimestampfixes
Last change on this file since b51edf5 was b51edf5, checked in by Shane Alcock <salcock@…>, 16 years ago

Added RT_KEYCHANGE to rt protocol
Fixed incorrect calculation in trace_get_seconds
rt_read_packet now returns sizeof(rt_header_t) + packet length
trace_get_capture_length no longer asserts for packet->size = 0

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