source: lib/trace.c @ 5b91b48

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

Fixed up erf output
Force trace_create_packet to be called, don't let people cheat.

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