source: lib/trace.c @ d8f02df

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

Cleanup even more warnings (Finding a few bugs where functions don't always
call return!)

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