source: lib/trace.c @ e4e1635

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

Minor cleanup
fix bug in trace_seek_timeval

  • 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 * UINT_MAX * 1.0)/1000000);
1175        }
1176
1177        return seconds;
1178}
1179
1180size_t trace_get_capture_length(const libtrace_packet_t *packet) {
1181
1182        assert(packet->size>0 && packet->size<65536);
1183
1184        if (packet->trace->format->get_capture_length) {
1185                return packet->trace->format->get_capture_length(packet);
1186        }
1187        return -1;
1188}
1189       
1190/* Get the size of the packet as it was seen on the wire.
1191 * @param packet        a pointer to a libtrace_packet structure
1192 *
1193 * @returns the size of the packet as it was on the wire.
1194 * @author Perry Lorier
1195 * @author Daniel Lawson
1196 * @note Due to the trace being a header capture, or anonymisation this may
1197 * not be the same as the Capture Len.
1198 */ 
1199size_t trace_get_wire_length(const libtrace_packet_t *packet){
1200        assert(packet->size>0 && packet->size<65536);
1201
1202        if (packet->trace->format->get_wire_length) {
1203                return packet->trace->format->get_wire_length(packet);
1204        }
1205        return -1;
1206
1207}
1208
1209/* Get the length of the capture framing headers.
1210 * @param packet        the packet opaque pointer
1211 * @returns the size of the packet as it was on the wire.
1212 * @author Perry Lorier
1213 * @author Daniel Lawson
1214 * @note this length corresponds to the difference between the size of a
1215 * captured packet in memory, and the captured length of the packet
1216 */ 
1217SIMPLE_FUNCTION
1218size_t trace_get_framing_length(const libtrace_packet_t *packet) {
1219        if (packet->trace->format->get_framing_length) {
1220                return packet->trace->format->get_framing_length(packet);
1221        }
1222        return -1;
1223}
1224
1225
1226/* Get the type of the link layer
1227 * @param packet        a pointer to a libtrace_packet structure
1228 * @returns libtrace_linktype_t
1229 * @author Perry Lorier
1230 * @author Daniel Lawson
1231 */
1232libtrace_linktype_t trace_get_link_type(const libtrace_packet_t *packet ) {
1233        if (packet->trace->format->get_link_type) {
1234                return packet->trace->format->get_link_type(packet);
1235        }
1236        return -1;
1237}
1238
1239/* Get the source MAC addres
1240 * @param packet        a pointer to a libtrace_packet structure
1241 * @returns a pointer to the source mac, (or NULL if there is no source MAC)
1242 * @author Perry Lorier
1243 */
1244uint8_t *trace_get_source_mac(const struct libtrace_packet_t *packet) {
1245        void *link = trace_get_link(packet);
1246        struct ieee_802_11_header *wifi = link;
1247        struct libtrace_ether *ethptr = link;
1248        if (!link)
1249                return NULL;
1250        switch (trace_get_link_type(packet)) {
1251                case TRACE_TYPE_80211:
1252                        return (uint8_t*)&wifi->mac2;
1253                case TRACE_TYPE_ETH:
1254                        return (uint8_t*)&ethptr->ether_shost;
1255                default:
1256                        fprintf(stderr,"Not implemented\n");
1257                        assert(0);
1258        }
1259}
1260
1261/* Get the destination MAC addres
1262 * @param packet a libtrace_packet pointer
1263 * @returns a pointer to the destination mac, (or NULL if there is no
1264 * destination MAC)
1265 * @author Perry Lorier
1266 */
1267uint8_t *trace_get_destination_mac(const struct libtrace_packet_t *packet) {
1268        void *link = trace_get_link(packet);
1269        struct ieee_802_11_header *wifi = link;
1270        struct libtrace_ether *ethptr = link;
1271        if (!link)
1272                return NULL;
1273        switch (trace_get_link_type(packet)) {
1274                case TRACE_TYPE_80211:
1275                        return (uint8_t*)&wifi->mac1;
1276                case TRACE_TYPE_ETH:
1277                        return (uint8_t*)&ethptr->ether_dhost;
1278                default:
1279                        fprintf(stderr,"Not implemented\n");
1280                        assert(0);
1281        }
1282}
1283
1284
1285/* process a libtrace event
1286 * @param trace the libtrace opaque pointer
1287 * @param packet the libtrace_packet opaque pointer
1288 * @returns
1289 *  TRACE_EVENT_IOWAIT  Waiting on I/O on fd
1290 *  TRACE_EVENT_SLEEP   Next event in seconds
1291 *  TRACE_EVENT_PACKET  Packet arrived in buffer with size size
1292 *  TRACE_EVENT_TERMINATE Trace terminated (perhaps with an error condition)
1293 * FIXME currently keeps a copy of the packet inside the trace pointer,
1294 * which in turn is stored inside the new packet object...
1295 * @author Perry Lorier
1296 */
1297struct libtrace_eventobj_t trace_event(struct libtrace_t *trace, 
1298                struct libtrace_packet_t *packet) {
1299        struct libtrace_eventobj_t event = {0,0,0.0,0};
1300
1301        if (!trace) {
1302                fprintf(stderr,"You called trace_event() with a NULL trace object!\n");
1303        }
1304        assert(trace);
1305        assert(packet);
1306
1307        /* Store the trace we are reading from into the packet opaque
1308         * structure */
1309        packet->trace = trace;
1310
1311        if (packet->trace->format->trace_event) {
1312                return packet->trace->format->trace_event(trace,packet);
1313        } else {
1314                return event;
1315        }
1316
1317}
1318
1319/* setup a BPF filter
1320 * @param filterstring a char * containing the bpf filter string
1321 * @returns opaque pointer pointer to a libtrace_filter_t object
1322 * @author Daniel Lawson
1323 */
1324struct libtrace_filter_t *trace_bpf_setfilter(const char *filterstring) {
1325#if HAVE_BPF
1326        struct libtrace_filter_t *filter = malloc(sizeof(struct libtrace_filter_t));
1327        filter->filterstring = strdup(filterstring);
1328        filter->flag = 0;
1329        return filter;
1330#else
1331        fprintf(stderr,"This version of libtrace does not have bpf filter support\n");
1332        return 0;
1333#endif
1334}
1335
1336/* compile a bpf filter, now we know what trace it's on
1337 * @internal
1338 *
1339 * @returns -1 on error, 0 on success
1340 */
1341int trace_bpf_compile(libtrace_filter_t *filter,
1342                const libtrace_packet_t *packet ) {
1343#if HAVE_BPF
1344        void *linkptr = 0;
1345        assert(filter);
1346
1347        /* If this isn't a real packet, then fail */
1348        linkptr = trace_get_link(packet);
1349        if (!linkptr) {
1350                trace_set_err(packet->trace,
1351                                TRACE_ERR_BAD_PACKET,"Packet has no payload");
1352                return -1;
1353        }
1354       
1355        if (filter->filterstring && ! filter->flag) {
1356                pcap_t *pcap;
1357                libtrace_linktype_t linktype=trace_get_link_type(packet);
1358                if (linktype==(libtrace_linktype_t)-1) {
1359                        trace_set_err(packet->trace,TRACE_ERR_BAD_PACKET,
1360                                        "Packet has an unknown linktype");
1361                        return -1;
1362                }
1363                if (libtrace_to_pcap_dlt(linktype) == -1) {
1364                        trace_set_err(packet->trace,TRACE_ERR_BAD_PACKET,
1365                                        "Unknown pcap equivilent linktype");
1366                        return -1;
1367                }
1368                pcap=(pcap_t *)pcap_open_dead(
1369                                libtrace_to_pcap_dlt(linktype),
1370                                1500);
1371                /* build filter */
1372                if (pcap_compile( pcap, &filter->filter, filter->filterstring, 
1373                                        1, 0)) {
1374                        pcap_close(pcap);
1375                        trace_set_err(packet->trace,TRACE_ERR_BAD_PACKET,
1376                                        "Packet has no payload");
1377                        return -1;
1378                }
1379                pcap_close(pcap);
1380                filter->flag=1;
1381        }
1382        return 0;
1383#else
1384        assert(!"This should never be called when BPF not enabled");
1385#endif
1386}
1387
1388int trace_bpf_filter(struct libtrace_filter_t *filter,
1389                        const struct libtrace_packet_t *packet) {
1390#if HAVE_BPF
1391        void *linkptr = 0;
1392        int clen = 0;
1393        assert(filter);
1394        assert(packet);
1395        linkptr = trace_get_link(packet);
1396        if (!linkptr) {
1397                return 0;
1398        }
1399
1400        /* We need to compile it now, because before we didn't know what the
1401         * link type was
1402         */
1403        if (trace_bpf_compile(filter,packet)==-1)
1404                return -1;
1405       
1406        clen = trace_get_capture_length(packet);
1407
1408        assert(filter->flag);
1409        return bpf_filter(filter->filter.bf_insns, linkptr, clen, clen);
1410#else
1411        fprintf(stderr,"This version of libtrace does not have bpf filter support\n");
1412        return 0;
1413#endif
1414}
1415
1416/* Set the direction flag, if it has one
1417 * @param packet the packet opaque pointer
1418 * @param direction the new direction (0,1,2,3)
1419 * @returns a signed value containing the direction flag, or -1 if this is not supported
1420 * @author Daniel Lawson
1421 */
1422int8_t trace_set_direction(struct libtrace_packet_t *packet, int8_t direction) {
1423        assert(packet);
1424        assert(packet->size>0 && packet->size<65536);
1425        if (packet->trace->format->set_direction) {
1426                return packet->trace->format->set_direction(packet,direction);
1427        }
1428        return -1;
1429}
1430
1431/* Get the direction flag, if it has one
1432 * @param packet a pointer to a libtrace_packet structure
1433 * @returns a signed value containing the direction flag, or -1 if this is not supported
1434 * The direction is defined as 0 for packets originating locally (ie, outbound)
1435 * and 1 for packets originating remotely (ie, inbound).
1436 * Other values are possible, which might be overloaded to mean special things
1437 * for a special trace.
1438 * @author Daniel Lawson
1439 */
1440int8_t trace_get_direction(const struct libtrace_packet_t *packet) {
1441        assert(packet);
1442        assert(packet->size>0 && packet->size<65536);
1443        if (packet->trace->format->get_direction) {
1444                return packet->trace->format->get_direction(packet);
1445        }
1446        return -1;
1447}
1448
1449struct ports_t {
1450        uint16_t src;
1451        uint16_t dst;
1452};
1453
1454/* Return the client port
1455 */
1456uint16_t trace_get_source_port(const struct libtrace_packet_t *packet)
1457{
1458        struct libtrace_ip *ip = trace_get_ip(packet);
1459        struct ports_t *port;
1460        if (6 != ip->ip_p
1461          && 17 != ip->ip_p)
1462                return 0;
1463        if (0 != (ip->ip_off & SW_IP_OFFMASK))
1464                return 0;
1465
1466        port = (struct ports_t *)((ptrdiff_t)ip + (ip->ip_hl * 4));
1467
1468        return ntohs(port->src);
1469}
1470
1471/* Same as get_source_port except use the destination port */
1472uint16_t trace_get_destination_port(const struct libtrace_packet_t *packet)
1473{
1474        struct libtrace_ip *ip = trace_get_ip(packet);
1475        struct ports_t *port;
1476
1477        if (6 != ip->ip_p
1478          && 17 != ip->ip_p)
1479                return 0;
1480
1481        if (0 != (ip->ip_off & SW_IP_OFFMASK))
1482                return 0;
1483
1484        port = (struct ports_t *)((ptrdiff_t)ip + (ip->ip_hl * 4));
1485
1486        return ntohs(port->dst);
1487}
1488
1489#define ROOT_SERVER(x) ((x) < 512)
1490#define ROOT_CLIENT(x) ((512 <= (x)) && ((x) < 1024))
1491#define NONROOT_SERVER(x) ((x) >= 5000)
1492#define NONROOT_CLIENT(x) ((1024 <= (x)) && ((x) < 5000))
1493#define DYNAMIC(x) ((49152 < (x)) && ((x) < 65535))
1494#define SERVER(x) ROOT_SERVER(x) || NONROOT_SERVER(x)
1495#define CLIENT(x) ROOT_CLIENT(x) || NONROOT_CLIENT(x)
1496
1497/* Attempt to deduce the 'server' port
1498 * @param protocol the IP protocol (eg, 6 or 17 for TCP or UDP)
1499 * @param source the TCP or UDP source port
1500 * @param dest the TCP or UDP destination port
1501 * @returns a hint as to which port is the server port
1502 * @author Daniel Lawson
1503 */
1504int8_t trace_get_server_port(uint8_t protocol __attribute__((unused)), uint16_t source, uint16_t dest) {
1505        /*
1506         * * If the ports are equal, return DEST
1507         * * Check for well-known ports in the given protocol
1508         * * Root server ports: 0 - 511
1509         * * Root client ports: 512 - 1023
1510         * * non-root client ports: 1024 - 4999
1511         * * non-root server ports: 5000+
1512         * * Check for static ranges: 1024 - 49151
1513         * * Check for dynamic ranges: 49152 - 65535
1514         * * flip a coin.
1515         */
1516       
1517        /* equal */
1518        if (source == dest)
1519                return USE_DEST;
1520
1521        /* root server port, 0 - 511 */
1522        if (ROOT_SERVER(source) && ROOT_SERVER(dest)) {
1523                if (source < dest)
1524                        return USE_SOURCE;
1525                return USE_DEST;
1526        }
1527
1528        if (ROOT_SERVER(source) && !ROOT_SERVER(dest))
1529                return USE_SOURCE;
1530        if (!ROOT_SERVER(source) && ROOT_SERVER(dest))
1531                return USE_DEST;
1532
1533        /* non-root server */
1534        if (NONROOT_SERVER(source) && NONROOT_SERVER(dest)) {
1535                if (source < dest)
1536                        return USE_SOURCE;
1537                return USE_DEST;
1538        }
1539        if (NONROOT_SERVER(source) && !NONROOT_SERVER(dest))
1540                return USE_SOURCE;
1541        if (!NONROOT_SERVER(source) && NONROOT_SERVER(dest))
1542                return USE_DEST;
1543
1544        /* root client */
1545        if (ROOT_CLIENT(source) && ROOT_CLIENT(dest)) {
1546                if (source < dest)
1547                        return USE_SOURCE;
1548                return USE_DEST;
1549        }
1550        if (ROOT_CLIENT(source) && !ROOT_CLIENT(dest)) {
1551                /* prefer root-client over nonroot-client */
1552                if (NONROOT_CLIENT(dest))
1553                        return USE_SOURCE;
1554                return USE_DEST;
1555        }
1556        if (!ROOT_CLIENT(source) && ROOT_CLIENT(dest)) {
1557                /* prefer root-client over nonroot-client */
1558                if (NONROOT_CLIENT(source))
1559                        return USE_DEST;
1560                return USE_SOURCE;
1561        }
1562       
1563        /* nonroot client */
1564        if (NONROOT_CLIENT(source) && NONROOT_CLIENT(dest)) {
1565                if (source < dest) 
1566                        return USE_SOURCE;
1567                return USE_DEST;
1568        }
1569        if (NONROOT_CLIENT(source) && !NONROOT_CLIENT(dest))
1570                return USE_DEST;
1571        if (!NONROOT_CLIENT(source) && NONROOT_CLIENT(dest))
1572                return USE_SOURCE;
1573
1574        /* dynamic range */
1575        if (DYNAMIC(source) && DYNAMIC(dest))
1576                if (source < dest)
1577                        return USE_SOURCE;
1578                return USE_DEST;
1579        if (DYNAMIC(source) && !DYNAMIC(dest))
1580                return USE_DEST;
1581        if (!DYNAMIC(source) && DYNAMIC(dest))
1582                return USE_SOURCE;
1583        /*
1584        if (SERVER(source) && CLIENT(dest))
1585                return USE_SOURCE;
1586       
1587        if (SERVER(dest) && CLIENT(source))
1588                return USE_DEST;
1589        if (ROOT_SERVER(source) && !ROOT_SERVER(dest))
1590                return USE_SOURCE;
1591        if (ROOT_SERVER(dest) && !ROOT_SERVER(source))
1592                return USE_DEST;
1593        */
1594        /* failing that test... */
1595        if (source < dest) {
1596                return USE_SOURCE;
1597        } 
1598        return USE_DEST;
1599       
1600}
1601
1602/* Truncate the packet at the suggested length
1603 * @param packet        the packet opaque pointer
1604 * @param size          the new length of the packet
1605 * @returns the new size of the packet
1606 * @note size and the return size refer to the network-level payload of the
1607 * packet, and do not include any capture headers. For example, to truncate a
1608 * packet after the IP header, set size to sizeof(ethernet_header) +
1609 * sizeof(ip_header)
1610 * @note If the original network-level payload is smaller than size, then the
1611 * original size is returned and the packet is left unchanged.
1612 * @author Daniel Lawson
1613 */
1614size_t trace_set_capture_length(struct libtrace_packet_t *packet, size_t size) {
1615        assert(packet);
1616        assert(packet->size>0 && packet->size<65536);
1617
1618        if (packet->trace->format->set_capture_length) {
1619                int caplen=packet->trace->format->set_capture_length(packet,size);
1620                if (caplen!=-1) {
1621                        packet->size=trace_get_framing_length(packet)+caplen;
1622                }
1623                return caplen;
1624        }
1625
1626        return -1;
1627}
1628
1629const char * trace_parse_uri(const char *uri, char **format) {
1630        const char *uridata = 0;
1631       
1632        if((uridata = strchr(uri,':')) == NULL) {
1633                /* badly formed URI - needs a : */
1634                return 0;
1635        }
1636
1637        if ((uridata - uri) > URI_PROTO_LINE) {
1638                /* badly formed URI - uri type is too long */
1639                return 0;
1640        }
1641
1642        *format=xstrndup(uri, (uridata - uri));
1643
1644        /* push uridata past the delimiter */
1645        uridata++;
1646       
1647        return uridata;
1648}
1649
1650enum base_format_t trace_get_format(struct libtrace_packet_t *packet) 
1651{
1652        assert(packet);
1653
1654        return packet->trace->format->type;
1655}
1656       
1657libtrace_err_t trace_get_err(libtrace_t *trace)
1658{
1659        libtrace_err_t err = trace->err;
1660        trace->err.err_num = 0; /* "OK" */
1661        trace->err.problem[0]='\0';
1662        return err;
1663}
1664
1665bool trace_is_err(libtrace_t *trace)
1666{
1667        return trace->err.err_num != 0;
1668}
1669
1670void trace_perror(libtrace_t *trace,const char *msg,...)
1671{
1672        char buf[256];
1673        va_list va;
1674        va_start(va,msg);
1675        vsnprintf(buf,sizeof(buf),msg,va);
1676        va_end(va);
1677        if(trace->err.err_num) {
1678                fprintf(stderr,"%s(%s): %s\n",
1679                                buf,trace->uridata,trace->err.problem);
1680        } else {
1681                fprintf(stderr,"%s(%s): No error\n",
1682                                buf,trace->uridata);
1683        }
1684}
1685
1686libtrace_err_t trace_get_err_output(libtrace_out_t *trace)
1687{
1688        libtrace_err_t err = trace->err;
1689        trace->err.err_num = 0; /* "OK" */
1690        trace->err.problem[0]='\0';
1691        return err;
1692}
1693
1694bool trace_is_err_output(libtrace_out_t *trace)
1695{
1696        return trace->err.err_num != 0;
1697}
1698
1699void trace_perror_output(libtrace_out_t *trace,const char *msg,...)
1700{
1701        char buf[256];
1702        va_list va;
1703        va_start(va,msg);
1704        vsnprintf(buf,sizeof(buf),msg,va);
1705        va_end(va);
1706        if(trace->err.err_num) {
1707                fprintf(stderr,"%s(%s): %s\n",
1708                                buf,trace->uridata,trace->err.problem);
1709        } else {
1710                fprintf(stderr,"%s(%s): No error\n",buf,trace->uridata);
1711        }
1712}
1713
1714int trace_seek_erf_timestamp(libtrace_t *trace, uint64_t ts)
1715{
1716        if (trace->format->seek_erf) {
1717                return trace->format->seek_erf(trace,ts);
1718        }
1719        else {
1720                if (trace->format->seek_timeval) {
1721                        struct timeval tv;
1722#if __BYTE_ORDER == __BIG_ENDIAN
1723                        tv.tv_sec = ts & 0xFFFFFFFF;
1724#elif __BYTE_ORDER == __LITTLE_ENDIAN
1725                        tv.tv_sec = ts >> 32;
1726#else
1727#error "What on earth are you running this on?"
1728#endif
1729                        tv.tv_usec = ((ts&0xFFFFFFFF)*1000000)>>32;
1730                        if (tv.tv_usec >= 1000000) {
1731                                tv.tv_usec -= 1000000;
1732                                tv.tv_sec += 1;
1733                        }
1734                        return trace->format->seek_timeval(trace,tv);
1735                }
1736                if (trace->format->seek_seconds) {
1737                        double seconds = 
1738                                (ts>>32) + ((ts & UINT_MAX)*1.0 / UINT_MAX);
1739                        return trace->format->seek_seconds(trace,seconds);
1740                }
1741                trace_set_err(trace,
1742                                TRACE_ERR_OPTION_UNAVAIL,
1743                                "Feature unimplemented");
1744                return -1;
1745        }
1746}
1747
1748int trace_seek_seconds(libtrace_t *trace, double seconds)
1749{
1750        if (trace->format->seek_seconds) {
1751                return trace->format->seek_seconds(trace,seconds);
1752        }
1753        else {
1754                if (trace->format->seek_timeval) {
1755                        struct timeval tv;
1756                        tv.tv_sec = (uint32_t)seconds;
1757                        tv.tv_usec = (uint32_t)(((seconds - tv.tv_sec) * 1000000)/UINT_MAX);
1758                        return trace->format->seek_timeval(trace,tv);
1759                }
1760                if (trace->format->seek_erf) {
1761                        uint64_t timestamp = 
1762                                ((uint64_t)((uint32_t)seconds) << 32) + \
1763                            (( seconds - (uint32_t)seconds   ) * UINT_MAX);
1764                        return trace->format->seek_erf(trace,timestamp);
1765                }
1766                trace_set_err(trace,
1767                                TRACE_ERR_OPTION_UNAVAIL,
1768                                "Feature unimplemented");
1769                return -1;
1770        }
1771}
1772
1773int trace_seek_timeval(libtrace_t *trace, struct timeval tv)
1774{
1775        if (trace->format->seek_timeval) {
1776                return trace->format->seek_timeval(trace,tv);
1777        }
1778        else {
1779                if (trace->format->seek_erf) {
1780                        uint64_t timestamp = ((((uint64_t)tv.tv_sec) << 32) + \
1781                                (((uint64_t)tv.tv_usec * UINT_MAX)/1000000));
1782                        return trace->format->seek_erf(trace,timestamp);
1783                }
1784                if (trace->format->seek_seconds) {
1785                        double seconds = tv.tv_sec + ((tv.tv_usec * 1.0)/1000000);
1786                        return trace->format->seek_seconds(trace,seconds);
1787                }
1788                trace_set_err(trace,
1789                                TRACE_ERR_OPTION_UNAVAIL,
1790                                "Feature unimplemented");
1791                return -1;
1792        }
1793}
1794
Note: See TracBrowser for help on using the repository browser.