source: lib/trace.c @ 5e85c23

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

Split DAG format into it's own source files - one for DAG2.4 and another for DAG2.5.

  • Property mode set to 100644
File size: 38.4 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 <stdio.h>
48#include <stdlib.h>
49#include <string.h>
50#include <sys/stat.h>
51#include <sys/types.h>
52#include <sys/socket.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#ifdef HAVE_NET_IF_ARP_H
64#  include <net/if_arp.h>
65#endif
66
67#ifdef HAVE_NET_IF_H
68#  include <net/if.h>
69#endif
70
71#ifdef HAVE_NETINET_IN_H
72#  include <netinet/in.h>
73#endif
74
75#ifdef HAVE_NET_ETHERNET_H
76#  include <net/ethernet.h>
77#endif
78
79#ifdef HAVE_NETINET_IF_ETHER_H
80#  include <netinet/if_ether.h>
81#endif
82
83#include <time.h>
84
85#include "libtrace.h"
86#include "libtrace_int.h"
87
88#ifdef HAVE_PCAP_BPF_H
89#  include <pcap-bpf.h>
90#else
91#  ifdef HAVE_NET_BPF_H
92#    include <net/bpf.h>
93#  endif
94#endif
95
96
97#include "libtrace_int.h"
98#include "format_helper.h"
99#include "rt_protocol.h"
100
101#define MAXOPTS 1024
102
103
104static struct libtrace_format_t *formats_list = NULL;
105
106/* strncpy is not assured to copy the final \0, so we
107 * will use our own one that does
108 */
109static void xstrncpy(char *dest, const char *src, size_t n)
110{
111        strncpy(dest,src,n);
112        dest[n]='\0';
113}
114 
115static char *xstrndup(const char *src,size_t n)
116{       
117        char *ret=(char*)malloc(n+1);
118        if (ret==NULL) {
119                fprintf(stderr,"Out of memory");
120                exit(EXIT_FAILURE);
121        }
122        xstrncpy(ret,src,n);
123        return ret;
124}
125
126void register_format(struct libtrace_format_t *f) {
127        assert(f->next==NULL);
128        f->next=formats_list;
129        formats_list=f;
130        /* Now, verify things
131         * This #if can be changed to a 1 to output warnings about inconsistant
132         * functions being provided by format modules.  This generally is very
133         * noisy, as almost all modules don't implement one or more functions
134         * for various reasons.  This is very useful when checking a new
135         * format module is sane.
136         */ 
137#if 0
138        if (f->init_input) {
139#define REQUIRE(x) \
140                if (!f->x) \
141                        fprintf(stderr,"%s: Input format should provide " #x "\n",f->name)
142                REQUIRE(read_packet);
143                REQUIRE(start_input);
144                REQUIRE(fin_input);
145                REQUIRE(get_link_type);
146                REQUIRE(get_capture_length);
147                REQUIRE(get_wire_length);
148                REQUIRE(get_framing_length);
149                REQUIRE(trace_event);
150                if (!f->get_erf_timestamp
151                        && !f->get_seconds
152                        && !f->get_timeval) {
153                        fprintf(stderr,"%s: A trace format capable of input, should provide at least one of\n"
154"get_erf_timestamp, get_seconds or trace_timeval\n",f->name);
155                }
156                if (f->trace_event!=trace_event_trace) {
157                        /* Theres nothing that a trace file could optimise with
158                         * config_input
159                         */
160                        REQUIRE(pause_input);
161                        REQUIRE(config_input);
162                        REQUIRE(get_fd);
163                }
164                else {
165                        if (f->get_fd) {
166                                fprintf(stderr,"%s: Unnecessary get_fd\n",
167                                                f->name);
168                        }
169                }
170#undef REQUIRE
171        }
172        else {
173#define REQUIRE(x) \
174                if (f->x) \
175                        fprintf(stderr,"%s: Non Input format shouldn't need " #x "\n",f->name)
176                REQUIRE(read_packet);
177                REQUIRE(start_input);
178                REQUIRE(pause_input);
179                REQUIRE(fin_input);
180                REQUIRE(get_link_type);
181                REQUIRE(get_capture_length);
182                REQUIRE(get_wire_length);
183                REQUIRE(get_framing_length);
184                REQUIRE(trace_event);
185                REQUIRE(get_seconds);
186                REQUIRE(get_timeval);
187                REQUIRE(get_erf_timestamp);
188#undef REQUIRE
189        }
190        if (f->init_output) {
191#define REQUIRE(x) \
192                if (!f->x) \
193                        fprintf(stderr,"%s: Output format should provide " #x "\n",f->name)
194                REQUIRE(write_packet);
195                REQUIRE(start_output);
196                REQUIRE(config_output);
197                REQUIRE(fin_output);
198#undef REQUIRE
199        }
200        else {
201#define REQUIRE(x) \
202                if (f->x) \
203                        fprintf(stderr,"%s: Non Output format shouldn't need " #x "\n",f->name)
204                REQUIRE(write_packet);
205                REQUIRE(start_output);
206                REQUIRE(config_output);
207                REQUIRE(fin_output);
208#undef REQUIRE
209        }
210#endif
211}
212
213/* call all the constructors if they haven't yet all been called */
214static void trace_init(void)
215{
216        if (!formats_list) {
217                duck_constructor();
218                erf_constructor();
219                legacy_constructor();
220#ifdef HAVE_NETPACKET_PACKET_H
221                linuxnative_constructor();
222#endif
223#ifdef HAVE_LIBPCAP
224                pcap_constructor();
225#endif
226#if HAVE_BIOCSETIF
227                bpf_constructor();
228#endif
229                pcapfile_constructor();
230                rt_constructor();
231                wag_constructor();
232#ifdef HAVE_DAG
233                dag_constructor();
234#endif
235        }
236}
237
238/* Prints help information for libtrace
239 *
240 * Function prints out some basic help information regarding libtrace,
241 * and then prints out the help() function registered with each input module
242 */
243DLLEXPORT void trace_help() {
244        struct libtrace_format_t *tmp;
245        trace_init();
246        printf("libtrace %s\n\n",PACKAGE_VERSION);
247        printf("Following this are a list of the format modules supported in this build of libtrace\n\n");
248        for(tmp=formats_list;tmp;tmp=tmp->next) {
249                if (tmp->help)
250                        tmp->help();
251        }
252}
253
254#define RP_BUFSIZE 65536
255#define URI_PROTO_LINE 16
256
257
258/* Create a trace file from a URI
259 *
260 * @params char * containing a valid libtrace URI
261 * @returns opaque pointer to a libtrace_t
262 *
263 * Valid URI's are:
264 *  erf:/path/to/erf/file
265 *  erf:/path/to/erf/file.gz
266 *  erf:/path/to/rtclient/socket
267 *  erf:-                       (stdin)
268 *  dag:/dev/dagcard
269 *  pcapint:pcapinterface               (eg: pcapint:eth0)
270 *  pcap:/path/to/pcap/file
271 *  pcap:-
272 *  rtclient:hostname
273 *  rtclient:hostname:port
274 *  wag:-
275 *  wag:/path/to/wag/file
276 *  wag:/path/to/wag/file.gz
277 *  wag:/path/to/wag/socket
278 *
279 * If an error occured when attempting to open a trace, NULL is returned
280 * and an error is output to stdout.
281 */
282DLLEXPORT libtrace_t *trace_create(const char *uri) {
283        libtrace_t *libtrace = 
284                        (libtrace_t *)malloc(sizeof(libtrace_t));
285        char *scan = 0;
286        const char *uridata = 0;                 
287        struct libtrace_format_t *tmp;
288
289        trace_init();
290
291        assert(uri && "Passing NULL to trace_create makes me a very sad program");
292
293        if (!libtrace) {
294                /* Out of memory */
295                return NULL;
296        }
297       
298        libtrace->err.err_num = TRACE_ERR_NOERROR;
299        libtrace->format=NULL;
300       
301        /* parse the URI to determine what sort of event we are dealing with */
302        if ((uridata = trace_parse_uri(uri, &scan)) == 0) {
303                trace_set_err(libtrace,TRACE_ERR_BAD_FORMAT,"Bad uri format (%s)",uri);
304                return libtrace;
305        }
306       
307        libtrace->event.tdelta = 0.0;
308        libtrace->event.packet = NULL;
309        libtrace->event.psize = 0;
310        libtrace->event.trace_last_ts = 0.0;
311        libtrace->filter = NULL;
312        libtrace->snaplen = 0;
313        libtrace->started=false;
314
315        for (tmp=formats_list;tmp;tmp=tmp->next) {
316                if (strlen(scan) == strlen(tmp->name) &&
317                                strncasecmp(scan, tmp->name, strlen(scan)) == 0
318                                ) {
319                        libtrace->format=tmp;
320                        break;
321                }
322        }
323        if (libtrace->format == 0) {
324                trace_set_err(libtrace, TRACE_ERR_BAD_FORMAT,
325                                "Unknown format (%s)",scan);
326                return libtrace;
327        }
328
329        libtrace->uridata = strdup(uridata);
330        /* libtrace->format now contains the type of uri
331         * libtrace->uridata contains the appropriate data for this
332         */
333       
334        if (libtrace->format->init_input) {
335                int err=libtrace->format->init_input(libtrace);
336                assert (err==-1 || err==0);
337                if (err==-1) {
338                        /* init_input should call trace_set_err to set
339                         * the error message
340                         */
341                        return libtrace;
342                }
343        } else {
344                trace_set_err(libtrace,TRACE_ERR_UNSUPPORTED,
345                                "Format does not support input (%s)",scan);
346                return libtrace;
347        }
348       
349
350        free(scan);
351        libtrace->err.err_num=TRACE_ERR_NOERROR;
352        libtrace->err.problem[0]='\0';
353        return libtrace;
354}
355
356/* Creates a "dummy" trace file that has only the format type set.
357 *
358 * @returns opaque pointer to a (sparsely initialised) libtrace_t
359 *
360 * IMPORTANT: Do not attempt to call trace_read_packet or other such functions
361 * with the dummy trace. Its intended purpose is to act as a packet->trace for
362 * libtrace_packet_t's that are not associated with a libtrace_t structure.
363 */
364DLLEXPORT libtrace_t * trace_create_dead (const char *uri) {
365        libtrace_t *libtrace = (libtrace_t *) malloc(sizeof(libtrace_t));
366        char *scan = (char *)calloc(sizeof(char),URI_PROTO_LINE);
367        char *uridata;
368        struct libtrace_format_t *tmp;
369
370        trace_init();
371       
372        libtrace->err.err_num = TRACE_ERR_NOERROR;
373
374        if((uridata = strchr(uri,':')) == NULL) {
375                xstrncpy(scan, uri, strlen(uri));
376        } else {
377                xstrncpy(scan,uri, (uridata - uri));
378        }
379       
380        libtrace->format = 0;   
381       
382        for(tmp=formats_list;tmp;tmp=tmp->next) {
383                if (strlen(scan) == strlen(tmp->name) &&
384                                !strncasecmp(scan,
385                                        tmp->name,
386                                        strlen(scan))) {
387                                libtrace->format=tmp;
388                                break;
389                                }
390        }
391        if (libtrace->format == 0) {
392                trace_set_err(libtrace,TRACE_ERR_BAD_FORMAT,
393                                "Unknown format (%s)",scan);
394        }
395
396        libtrace->format_data = NULL;
397        free(scan);
398        return libtrace;
399
400}
401
402/* Creates a trace output file from a URI.
403 *
404 * @param uri   the uri string describing the output format and destination
405 * @returns opaque pointer to a libtrace_output_t
406 *
407 *  If an error occured when attempting to open the output trace, NULL is
408 *  returned and trace_errno is set.
409 */
410       
411DLLEXPORT libtrace_out_t *trace_create_output(const char *uri) {
412        libtrace_out_t *libtrace = 
413                        (libtrace_out_t*)malloc(sizeof(libtrace_out_t));
414       
415        char *scan = 0;
416        const char *uridata = 0;
417        struct libtrace_format_t *tmp;
418
419        trace_init();
420
421        libtrace->err.err_num = TRACE_ERR_NOERROR;
422        strcpy(libtrace->err.problem,"Error message set\n");
423       
424        /* parse the URI to determine what sort of event we are dealing with */
425
426        if ((uridata = trace_parse_uri(uri, &scan)) == 0) {
427                trace_set_err_out(libtrace,TRACE_ERR_BAD_FORMAT,
428                                "Bad uri format (%s)",uri);
429                return libtrace;
430        }
431       
432        libtrace->format = NULL;
433        for(tmp=formats_list;tmp;tmp=tmp->next) {
434                if (strlen(scan) == strlen(tmp->name) &&
435                                !strncasecmp(scan,
436                                        tmp->name,
437                                        strlen(scan))) {
438                                libtrace->format=tmp;
439                                break;
440                                }
441        }
442        if (libtrace->format == NULL) {
443                trace_set_err_out(libtrace,TRACE_ERR_BAD_FORMAT,
444                                "Unknown output format (%s)",scan);
445                return libtrace;
446        }
447        libtrace->uridata = strdup(uridata);
448
449
450        /* libtrace->format now contains the type of uri
451         * libtrace->uridata contains the appropriate data for this
452         */
453
454        if (libtrace->format->init_output) {
455                /* 0 on success, -1 on failure */
456                switch(libtrace->format->init_output(libtrace)) {
457                        case -1: /* failure */
458                                return libtrace;
459                        case 0: /* success */
460                                break;
461                        default:
462                                assert(!"init_output() should return -1 for failure, or 0 for success");
463                }
464        } else {
465                trace_set_err_out(libtrace,TRACE_ERR_UNSUPPORTED,
466                                "Format does not support writing (%s)",scan);
467                return libtrace;
468        }
469
470
471        free(scan);
472        libtrace->started=false;
473        return libtrace;
474}
475
476/* Start a trace
477 * @param libtrace      the input trace to start
478 * @returns 0 on success
479 *
480 * This does the work associated with actually starting up
481 * the trace.  it may fail.
482 */
483DLLEXPORT int trace_start(libtrace_t *libtrace)
484{
485        assert(libtrace);
486        assert(!trace_is_err(libtrace) && "Please use trace_is_err to check for errors after calling trace_create!");
487        if (libtrace->format->start_input) {
488                int ret=libtrace->format->start_input(libtrace);
489                if (ret < 0) {
490                        return ret;
491                }
492        }
493
494        libtrace->started=true;
495        return 0;
496}
497
498DLLEXPORT int trace_start_output(libtrace_out_t *libtrace) 
499{
500        assert(libtrace);
501        if (libtrace->format->start_output) {
502                int ret=libtrace->format->start_output(libtrace);
503                if (ret < 0) {
504                        return ret;
505                }
506        }
507
508        libtrace->started=true;
509        return 0;
510}
511
512DLLEXPORT int trace_pause(libtrace_t *libtrace)
513{
514        assert(libtrace);
515        assert(libtrace->started && "BUG: Called trace_pause without calling trace_start first");
516        if (libtrace->format->pause_input)
517                libtrace->format->pause_input(libtrace);
518        libtrace->started=false;
519        return 0;
520}
521
522DLLEXPORT int trace_config(libtrace_t *libtrace,
523                trace_option_t option,
524                void *value)
525{
526        int ret;
527        if (libtrace->format->config_input) {
528                ret=libtrace->format->config_input(libtrace,option,value);
529                if (ret==0)
530                        return 0;
531        }
532        switch(option) {
533                case TRACE_OPTION_SNAPLEN:
534                        libtrace->snaplen=*(int*)value;
535                        return 0;
536                case TRACE_OPTION_FILTER:
537                        libtrace->filter=(libtrace_filter_t *)value;
538                        return 0;
539                case TRACE_OPTION_PROMISC:
540                        trace_set_err(libtrace,TRACE_ERR_OPTION_UNAVAIL,
541                                "Promisc mode is not supported by this format module");
542                        return -1;
543                case TRACE_META_FREQ:
544                        trace_set_err(libtrace, TRACE_ERR_OPTION_UNAVAIL,
545                                "This format does not support meta-data gathering");
546                        return -1;
547        }
548        trace_set_err(libtrace,TRACE_ERR_UNKNOWN_OPTION,
549                "Unknown option %i", option);
550        return -1;
551}
552
553/* Parses an output options string and calls the appropriate function to deal with output options.
554 *
555 * @param libtrace      the output trace object to apply the options to
556 * @param options       the options string
557 * @returns -1 if option configuration failed, 0 otherwise
558 *
559 * @author Shane Alcock
560 */
561DLLEXPORT int trace_config_output(libtrace_out_t *libtrace, 
562                trace_option_output_t option,
563                void *value) {
564        if (libtrace->format->config_output) {
565                return libtrace->format->config_output(libtrace, option, value);
566        }
567        return -1;
568}
569
570/* Close a trace file, freeing up any resources it may have been using
571 *
572 */
573DLLEXPORT void trace_destroy(libtrace_t *libtrace) {
574        assert(libtrace);
575        if (libtrace->format) {
576                if (libtrace->started && libtrace->format->pause_input)
577                        libtrace->format->pause_input(libtrace);
578                libtrace->format->fin_input(libtrace);
579        }
580        /* need to free things! */
581        if (libtrace->uridata)
582                free(libtrace->uridata);
583        free(libtrace);
584}
585
586
587DLLEXPORT void trace_destroy_dead(libtrace_t *libtrace) {
588        assert(libtrace);
589        free(libtrace);
590}
591/* Close an output trace file, freeing up any resources it may have been using
592 *
593 * @param libtrace      the output trace file to be destroyed
594 *
595 * @author Shane Alcock
596 * */
597DLLEXPORT void trace_destroy_output(libtrace_out_t *libtrace) 
598{
599        assert(libtrace);
600        libtrace->format->fin_output(libtrace);
601        free(libtrace->uridata);
602        free(libtrace);
603}
604
605DLLEXPORT libtrace_packet_t *trace_create_packet(void) 
606{
607        libtrace_packet_t *packet = 
608                (libtrace_packet_t*)calloc(1,sizeof(libtrace_packet_t));
609        packet->buf_control=TRACE_CTRL_PACKET;
610        return packet;
611}
612
613DLLEXPORT libtrace_packet_t *trace_copy_packet(const libtrace_packet_t *packet) {
614        libtrace_packet_t *dest = 
615                (libtrace_packet_t *)malloc(sizeof(libtrace_packet_t));
616        dest->trace=packet->trace;
617        dest->buffer=malloc(
618                        trace_get_framing_length(packet)
619                        +trace_get_capture_length(packet));
620        dest->header=dest->buffer;
621        dest->payload=(void*)
622                ((char*)dest->buffer+trace_get_framing_length(packet));
623        dest->type=packet->type;
624        dest->buf_control=TRACE_CTRL_PACKET;
625        memcpy(dest->header,packet->header,trace_get_framing_length(packet));
626        memcpy(dest->payload,packet->payload,trace_get_capture_length(packet));
627
628        return dest;
629}
630
631/** Destroy a packet object
632 *
633 * sideeffect: sets packet to NULL
634 */
635DLLEXPORT void trace_destroy_packet(libtrace_packet_t *packet) {
636        if (packet->buf_control == TRACE_CTRL_PACKET) {
637                free(packet->buffer);
638        }
639        packet->buf_control=(buf_control_t)'\0'; 
640                                /* an "bad" value to force an assert
641                                 * if this packet is ever reused
642                                 */
643        free(packet);
644}       
645
646/* Read one packet from the trace into buffer
647 *
648 * @param libtrace      the libtrace opaque pointer
649 * @param packet        the packet opaque pointer
650 * @returns 0 on EOF, negative value on error
651 *
652 */
653DLLEXPORT int trace_read_packet(libtrace_t *libtrace, libtrace_packet_t *packet) {
654
655        assert(libtrace && "You called trace_read_packet() with a NULL libtrace parameter!\n");
656        assert(libtrace->started && "BUG: You must call libtrace_start() before trace_read_packet()\n");
657        assert(packet);
658        assert((packet->buf_control==TRACE_CTRL_PACKET || packet->buf_control==TRACE_CTRL_EXTERNAL)&&
659                "BUG: You must allocate a packet using packet_create()");
660     
661        /* Store the trace we are reading from into the packet opaque
662         * structure */
663        packet->trace = libtrace;
664
665        if (libtrace->format->read_packet) {
666                do {
667                        size_t ret;
668                        ret=libtrace->format->read_packet(libtrace,packet);
669                        if (ret==(size_t)-1 || ret==0) {
670                                return ret;
671                        }
672                        if (libtrace->filter) {
673                                /* If the filter doesn't match, read another
674                                 * packet
675                                 */
676                                if (!trace_apply_filter(libtrace->filter,packet)){
677                                        continue;
678                                }
679                        }
680                        if (libtrace->snaplen>0) {
681                                /* Snap the packet */
682                                trace_set_capture_length(packet,
683                                                libtrace->snaplen);
684                        }
685                        return ret;
686                } while(1);
687        }
688        trace_set_err(libtrace,TRACE_ERR_UNSUPPORTED,"This format does not support reading packets\n");
689        return ~0U;
690}
691
692/* Writes a packet to the specified output
693 *
694 * @param libtrace      describes the output format, destination, etc.
695 * @param packet        the packet to be written out
696 * @returns the number of bytes written, -1 if write failed
697 *
698 * @author Shane Alcock
699 * */
700DLLEXPORT int trace_write_packet(libtrace_out_t *libtrace, libtrace_packet_t *packet) {
701        assert(libtrace);
702        assert(packet); 
703        /* Verify the packet is valid */
704        assert(libtrace->started);
705
706        if (libtrace->format->write_packet) {
707                return libtrace->format->write_packet(libtrace, packet);
708        }
709        trace_set_err_out(libtrace,TRACE_ERR_UNSUPPORTED,
710                "This format does not support writing packets");
711        return -1;
712}
713
714DLLEXPORT void *trace_get_link(const libtrace_packet_t *packet) {
715        return (void *)packet->payload;
716}
717
718/* Get the current time in DAG time format
719 * @param packet        a pointer to a libtrace_packet structure
720 * @returns a 64 bit timestamp in DAG ERF format (upper 32 bits are the seconds
721 * past 1970-01-01, the lower 32bits are partial seconds)
722 * @author Daniel Lawson
723 */ 
724DLLEXPORT uint64_t trace_get_erf_timestamp(const libtrace_packet_t *packet) {
725        uint64_t timestamp = 0;
726        double seconds = 0.0;
727        struct timeval ts;
728
729        if (packet->trace->format->get_erf_timestamp) {
730                /* timestamp -> timestamp */
731                timestamp = packet->trace->format->get_erf_timestamp(packet);
732        } else if (packet->trace->format->get_timeval) {
733                /* timeval -> timestamp */
734                ts = packet->trace->format->get_timeval(packet);
735                timestamp = ((((uint64_t)ts.tv_sec) << 32) + \
736                                (((uint64_t)ts.tv_usec * UINT_MAX)/1000000));
737        } else if (packet->trace->format->get_seconds) {
738                /* seconds -> timestamp */
739                seconds = packet->trace->format->get_seconds(packet);
740                timestamp = ((uint64_t)((uint32_t)seconds) << 32) + \
741                      (uint64_t)(( seconds - (uint32_t)seconds   ) * UINT_MAX);
742        }
743        return timestamp;
744}
745
746/* Get the current time in struct timeval
747 * @param packet        a pointer to a libtrace_packet structure
748 *
749 * @returns time that this packet was seen in a struct timeval
750 * @author Daniel Lawson
751 * @author Perry Lorier
752 */ 
753DLLEXPORT struct timeval trace_get_timeval(const libtrace_packet_t *packet) {
754        struct timeval tv;
755        uint64_t ts = 0;
756        double seconds = 0.0;
757        if (packet->trace->format->get_timeval) {
758                /* timeval -> timeval */
759                tv = packet->trace->format->get_timeval(packet);
760        } else if (packet->trace->format->get_erf_timestamp) {
761                /* timestamp -> timeval */
762                ts = packet->trace->format->get_erf_timestamp(packet);
763#if __BYTE_ORDER == __BIG_ENDIAN
764                tv.tv_sec = ts & 0xFFFFFFFF;
765#elif __BYTE_ORDER == __LITTLE_ENDIAN
766                tv.tv_sec = ts >> 32;
767#else
768#error "What on earth are you running this on?"
769#endif
770                tv.tv_usec = ((ts&0xFFFFFFFF)*1000000)>>32;
771                if (tv.tv_usec >= 1000000) {
772                        tv.tv_usec -= 1000000;
773                        tv.tv_sec += 1;
774                }
775        } else if (packet->trace->format->get_seconds) {
776                /* seconds -> timeval */
777                seconds = packet->trace->format->get_seconds(packet);
778                tv.tv_sec = (uint32_t)seconds;
779                tv.tv_usec = (uint32_t)(((seconds - tv.tv_sec) * 1000000)/UINT_MAX);
780        }
781        else {
782                tv.tv_sec=-1;
783                tv.tv_usec=-1;
784        }
785
786        return tv;
787}
788
789/* Get the current time in floating point seconds
790 * @param packet        a pointer to a libtrace_packet structure
791 * @returns time that this packet was seen in 64bit floating point seconds
792 * @author Perry Lorier
793 */ 
794DLLEXPORT double trace_get_seconds(const libtrace_packet_t *packet) {
795        double seconds = 0.0;
796        uint64_t ts = 0;
797        struct timeval tv;
798
799        if (packet->trace->format->get_seconds) {
800                /* seconds->seconds */
801                seconds = packet->trace->format->get_seconds(packet);
802        } else if (packet->trace->format->get_erf_timestamp) {
803                /* timestamp -> seconds */
804                ts = packet->trace->format->get_erf_timestamp(packet);
805                seconds =  (ts>>32) + ((ts & UINT_MAX)*1.0 / UINT_MAX);
806        } else if (packet->trace->format->get_timeval) {
807                /* timeval -> seconds */
808                tv = packet->trace->format->get_timeval(packet);
809                seconds = tv.tv_sec + ((tv.tv_usec * 1.0) / 1000000);
810        }
811
812        return seconds;
813}
814
815DLLEXPORT size_t trace_get_capture_length(const libtrace_packet_t *packet) 
816{
817        if (packet->trace->format->get_capture_length) {
818                return packet->trace->format->get_capture_length(packet);
819        }
820        return ~0U;
821}
822       
823/* Get the size of the packet as it was seen on the wire.
824 * @param packet        a pointer to a libtrace_packet structure
825 *
826 * @returns the size of the packet as it was on the wire.
827 * @author Perry Lorier
828 * @author Daniel Lawson
829 * @note Due to the trace being a header capture, or anonymisation this may
830 * not be the same as the Capture Len.
831 */ 
832DLLEXPORT size_t trace_get_wire_length(const libtrace_packet_t *packet){
833        if (packet->trace->format->get_wire_length) {
834                return packet->trace->format->get_wire_length(packet);
835        }
836        return ~0U;
837
838}
839
840/* Get the length of the capture framing headers.
841 * @param packet        the packet opaque pointer
842 * @returns the size of the packet as it was on the wire.
843 * @author Perry Lorier
844 * @author Daniel Lawson
845 * @note this length corresponds to the difference between the size of a
846 * captured packet in memory, and the captured length of the packet
847 */ 
848DLLEXPORT SIMPLE_FUNCTION
849size_t trace_get_framing_length(const libtrace_packet_t *packet) {
850        if (packet->trace->format->get_framing_length) {
851                return packet->trace->format->get_framing_length(packet);
852        }
853        return ~0U;
854}
855
856
857/* Get the type of the link layer
858 * @param packet        a pointer to a libtrace_packet structure
859 * @returns libtrace_linktype_t
860 * @author Perry Lorier
861 * @author Daniel Lawson
862 */
863DLLEXPORT libtrace_linktype_t trace_get_link_type(const libtrace_packet_t *packet ) {
864        if (packet->trace->format->get_link_type) {
865                return packet->trace->format->get_link_type(packet);
866        }
867        return (libtrace_linktype_t)-1;
868}
869
870/* process a libtrace event
871 * @param trace the libtrace opaque pointer
872 * @param packet the libtrace_packet opaque pointer
873 * @returns
874 *  TRACE_EVENT_IOWAIT  Waiting on I/O on fd
875 *  TRACE_EVENT_SLEEP   Next event in seconds
876 *  TRACE_EVENT_PACKET  Packet arrived in buffer with size size
877 *  TRACE_EVENT_TERMINATE Trace terminated (perhaps with an error condition)
878 * FIXME currently keeps a copy of the packet inside the trace pointer,
879 * which in turn is stored inside the new packet object...
880 * @author Perry Lorier
881 */
882DLLEXPORT libtrace_eventobj_t trace_event(libtrace_t *trace, 
883                libtrace_packet_t *packet) {
884        libtrace_eventobj_t event = {TRACE_EVENT_IOWAIT,0,0.0,0};
885
886        if (!trace) {
887                fprintf(stderr,"You called trace_event() with a NULL trace object!\n");
888        }
889        assert(trace);
890        assert(packet);
891
892        /* Store the trace we are reading from into the packet opaque
893         * structure */
894        packet->trace = trace;
895
896        if (packet->trace->format->trace_event) {
897                return packet->trace->format->trace_event(trace,packet);
898        } else {
899                return event;
900        }
901
902}
903
904/* setup a BPF filter
905 * @param filterstring a char * containing the bpf filter string
906 * @returns opaque pointer pointer to a libtrace_filter_t object
907 * @author Daniel Lawson
908 */
909DLLEXPORT libtrace_filter_t *trace_create_filter(const char *filterstring) {
910#ifdef HAVE_BPF
911        libtrace_filter_t *filter = (libtrace_filter_t*)
912                                malloc(sizeof(libtrace_filter_t));
913        filter->filterstring = strdup(filterstring);
914        filter->flag = 0;
915        return filter;
916#else
917        fprintf(stderr,"This version of libtrace does not have bpf filter support\n");
918        return NULL;
919#endif
920}
921
922DLLEXPORT void trace_destroy_filter(libtrace_filter_t *filter)
923{
924#ifdef HAVE_BPF
925        free(filter->filterstring);
926        if (filter->flag)
927                pcap_freecode(&filter->filter);
928        free(filter);
929#else
930
931#endif
932}
933
934/* compile a bpf filter, now we know what trace it's on
935 * @internal
936 *
937 * @returns -1 on error, 0 on success
938 */
939int trace_bpf_compile(libtrace_filter_t *filter,
940                const libtrace_packet_t *packet ) {
941#ifdef HAVE_BPF
942        void *linkptr = 0;
943        assert(filter);
944
945        /* If this isn't a real packet, then fail */
946        linkptr = trace_get_link(packet);
947        if (!linkptr) {
948                trace_set_err(packet->trace,
949                                TRACE_ERR_BAD_PACKET,"Packet has no payload");
950                return -1;
951        }
952       
953        if (filter->filterstring && ! filter->flag) {
954                pcap_t *pcap;
955                libtrace_linktype_t linktype=trace_get_link_type(packet);
956                if (linktype==(libtrace_linktype_t)-1) {
957                        trace_set_err(packet->trace,
958                                        TRACE_ERR_BAD_PACKET,
959                                        "Packet has an unknown linktype");
960                        return -1;
961                }
962                if (libtrace_to_pcap_dlt(linktype) == ~1U) {
963                        trace_set_err(packet->trace,TRACE_ERR_BAD_PACKET,
964                                        "Unknown pcap equivilent linktype");
965                        return -1;
966                }
967                pcap=(pcap_t *)pcap_open_dead(
968                                libtrace_to_pcap_dlt(linktype),
969                                1500);
970                /* build filter */
971                if (pcap_compile( pcap, &filter->filter, filter->filterstring, 
972                                        1, 0)) {
973                        pcap_close(pcap);
974                        trace_set_err(packet->trace,TRACE_ERR_BAD_PACKET,
975                                        "Packet has no payload");
976                        return -1;
977                }
978                pcap_close(pcap);
979                filter->flag=1;
980        }
981        return 0;
982#else
983        assert(!"This should never be called when BPF not enabled");
984        trace_set_err(packet->trace,TRACE_ERR_OPTION_UNAVAIL,
985                                "Feature unavailable");
986        return -1;
987#endif
988}
989
990DLLEXPORT int trace_apply_filter(libtrace_filter_t *filter,
991                        const libtrace_packet_t *packet) {
992#ifdef HAVE_BPF
993        void *linkptr = 0;
994        unsigned int clen = 0;
995        bool free_packet_needed = false;
996        int ret;
997        libtrace_packet_t *packet_copy = packet;
998
999        assert(filter);
1000        assert(packet);
1001
1002        if (libtrace_to_pcap_dlt(trace_get_link_type(packet))==~0U) {
1003                /* Copy the packet, as we don't want to trash the one we
1004                 * were passed in
1005                 */
1006                packet_copy=trace_copy_packet(packet);
1007                free_packet_needed=true;
1008                while (libtrace_to_pcap_dlt(trace_get_link_type(packet_copy))==
1009                                ~0U) {
1010                        if (!demote_packet(packet_copy)) {
1011                                trace_set_err(packet->trace, 
1012                                                TRACE_ERR_NO_CONVERSION,
1013                                                "pcap does not support this format");
1014                                if (free_packet_needed) {
1015                                        trace_destroy_packet(packet_copy);
1016                                }
1017                                return -1;
1018                        }
1019                }
1020        }
1021       
1022        linkptr = trace_get_link(packet_copy);
1023        if (!linkptr) {
1024                if (free_packet_needed) {
1025                        trace_destroy_packet(packet_copy);
1026                }
1027                return 0;
1028        }
1029
1030        /* We need to compile it now, because before we didn't know what the
1031         * link type was
1032         */
1033        if (trace_bpf_compile(filter,packet_copy)==-1) {
1034                if (free_packet_needed) {
1035                        trace_destroy_packet(packet_copy);
1036                }
1037                return -1;
1038        }
1039
1040        clen = trace_get_capture_length(packet_copy);
1041
1042        assert(filter->flag);
1043        ret=bpf_filter(filter->filter.bf_insns,(u_char*)linkptr,clen,clen);
1044        if (free_packet_needed) {
1045                trace_destroy_packet(packet_copy);
1046        }
1047        return ret;
1048#else
1049        fprintf(stderr,"This version of libtrace does not have bpf filter support\n");
1050        return 0;
1051#endif
1052}
1053
1054/* Set the direction flag, if it has one
1055 * @param packet the packet opaque pointer
1056 * @param direction the new direction (0,1,2,3)
1057 * @returns a signed value containing the direction flag, or -1 if this is not supported
1058 */
1059DLLEXPORT libtrace_direction_t trace_set_direction(libtrace_packet_t *packet, 
1060                libtrace_direction_t direction) 
1061{
1062        assert(packet);
1063        if (packet->trace->format->set_direction) {
1064                return packet->trace->format->set_direction(packet,direction);
1065        }
1066        return (libtrace_direction_t)~0U;
1067}
1068
1069/* Get the direction flag, if it has one
1070 * @param packet a pointer to a libtrace_packet structure
1071 * @returns a signed value containing the direction flag, or -1 if this is not supported
1072 * The direction is defined as 0 for packets originating locally (ie, outbound)
1073 * and 1 for packets originating remotely (ie, inbound).
1074 * Other values are possible, which might be overloaded to mean special things
1075 * for a special trace.
1076 * @author Daniel Lawson
1077 */
1078DLLEXPORT libtrace_direction_t trace_get_direction(const libtrace_packet_t *packet) 
1079{
1080        assert(packet);
1081        if (packet->trace->format->get_direction) {
1082                return packet->trace->format->get_direction(packet);
1083        }
1084        return (libtrace_direction_t)~0U;
1085}
1086
1087#define ROOT_SERVER(x) ((x) < 512)
1088#define ROOT_CLIENT(x) ((512 <= (x)) && ((x) < 1024))
1089#define NONROOT_SERVER(x) ((x) >= 5000)
1090#define NONROOT_CLIENT(x) ((1024 <= (x)) && ((x) < 5000))
1091#define DYNAMIC(x) ((49152 < (x)) && ((x) < 65535))
1092#define SERVER(x) ROOT_SERVER(x) || NONROOT_SERVER(x)
1093#define CLIENT(x) ROOT_CLIENT(x) || NONROOT_CLIENT(x)
1094
1095/* Attempt to deduce the 'server' port
1096 * @param protocol the IP protocol (eg, 6 or 17 for TCP or UDP)
1097 * @param source the TCP or UDP source port
1098 * @param dest the TCP or UDP destination port
1099 * @returns a hint as to which port is the server port
1100 */
1101DLLEXPORT int8_t trace_get_server_port(UNUSED uint8_t protocol, 
1102                uint16_t source, uint16_t dest) 
1103{
1104        /*
1105         * * If the ports are equal, return DEST
1106         * * Check for well-known ports in the given protocol
1107         * * Root server ports: 0 - 511
1108         * * Root client ports: 512 - 1023
1109         * * non-root client ports: 1024 - 4999
1110         * * non-root server ports: 5000+
1111         * * Check for static ranges: 1024 - 49151
1112         * * Check for dynamic ranges: 49152 - 65535
1113         * * flip a coin.
1114         */
1115       
1116        /* equal */
1117        if (source == dest)
1118                return USE_DEST;
1119
1120        /* root server port, 0 - 511 */
1121        if (ROOT_SERVER(source) && ROOT_SERVER(dest)) {
1122                if (source < dest)
1123                        return USE_SOURCE;
1124                return USE_DEST;
1125        }
1126
1127        if (ROOT_SERVER(source) && !ROOT_SERVER(dest))
1128                return USE_SOURCE;
1129        if (!ROOT_SERVER(source) && ROOT_SERVER(dest))
1130                return USE_DEST;
1131
1132        /* non-root server */
1133        if (NONROOT_SERVER(source) && NONROOT_SERVER(dest)) {
1134                if (source < dest)
1135                        return USE_SOURCE;
1136                return USE_DEST;
1137        }
1138        if (NONROOT_SERVER(source) && !NONROOT_SERVER(dest))
1139                return USE_SOURCE;
1140        if (!NONROOT_SERVER(source) && NONROOT_SERVER(dest))
1141                return USE_DEST;
1142
1143        /* root client */
1144        if (ROOT_CLIENT(source) && ROOT_CLIENT(dest)) {
1145                if (source < dest)
1146                        return USE_SOURCE;
1147                return USE_DEST;
1148        }
1149        if (ROOT_CLIENT(source) && !ROOT_CLIENT(dest)) {
1150                /* prefer root-client over nonroot-client */
1151                if (NONROOT_CLIENT(dest))
1152                        return USE_SOURCE;
1153                return USE_DEST;
1154        }
1155        if (!ROOT_CLIENT(source) && ROOT_CLIENT(dest)) {
1156                /* prefer root-client over nonroot-client */
1157                if (NONROOT_CLIENT(source))
1158                        return USE_DEST;
1159                return USE_SOURCE;
1160        }
1161       
1162        /* nonroot client */
1163        if (NONROOT_CLIENT(source) && NONROOT_CLIENT(dest)) {
1164                if (source < dest) 
1165                        return USE_SOURCE;
1166                return USE_DEST;
1167        }
1168        if (NONROOT_CLIENT(source) && !NONROOT_CLIENT(dest))
1169                return USE_DEST;
1170        if (!NONROOT_CLIENT(source) && NONROOT_CLIENT(dest))
1171                return USE_SOURCE;
1172
1173        /* dynamic range */
1174        if (DYNAMIC(source) && DYNAMIC(dest))
1175                if (source < dest)
1176                        return USE_SOURCE;
1177                return USE_DEST;
1178        if (DYNAMIC(source) && !DYNAMIC(dest))
1179                return USE_DEST;
1180        if (!DYNAMIC(source) && DYNAMIC(dest))
1181                return USE_SOURCE;
1182        /*
1183        if (SERVER(source) && CLIENT(dest))
1184                return USE_SOURCE;
1185       
1186        if (SERVER(dest) && CLIENT(source))
1187                return USE_DEST;
1188        if (ROOT_SERVER(source) && !ROOT_SERVER(dest))
1189                return USE_SOURCE;
1190        if (ROOT_SERVER(dest) && !ROOT_SERVER(source))
1191                return USE_DEST;
1192        */
1193        /* failing that test... */
1194        if (source < dest) {
1195                return USE_SOURCE;
1196        } 
1197        return USE_DEST;
1198       
1199}
1200
1201/* Truncate the packet at the suggested length
1202 * @param packet        the packet opaque pointer
1203 * @param size          the new length of the packet
1204 * @returns the new size of the packet
1205 * @note size and the return size refer to the network-level payload of the
1206 * packet, and do not include any capture headers. For example, to truncate a
1207 * packet after the IP header, set size to sizeof(ethernet_header) +
1208 * sizeof(ip_header)
1209 * @note If the original network-level payload is smaller than size, then the
1210 * original size is returned and the packet is left unchanged.
1211 * @author Daniel Lawson
1212 */
1213DLLEXPORT size_t trace_set_capture_length(libtrace_packet_t *packet, size_t size) {
1214        assert(packet);
1215
1216        if (packet->trace->format->set_capture_length) {
1217                return packet->trace->format->set_capture_length(packet,size);
1218        }
1219
1220        return ~0U;
1221}
1222
1223DLLEXPORT const char * trace_parse_uri(const char *uri, char **format) {
1224        const char *uridata = 0;
1225       
1226        if((uridata = strchr(uri,':')) == NULL) {
1227                /* badly formed URI - needs a : */
1228                return 0;
1229        }
1230
1231        if ((uridata - uri) > URI_PROTO_LINE) {
1232                /* badly formed URI - uri type is too long */
1233                return 0;
1234        }
1235
1236        *format=xstrndup(uri, (uridata - uri));
1237
1238        /* push uridata past the delimiter */
1239        uridata++;
1240       
1241        return uridata;
1242}
1243
1244enum base_format_t trace_get_format(libtrace_packet_t *packet) 
1245{
1246        assert(packet);
1247
1248        return packet->trace->format->type;
1249}
1250       
1251DLLEXPORT libtrace_err_t trace_get_err(libtrace_t *trace)
1252{
1253        libtrace_err_t err = trace->err;
1254        trace->err.err_num = 0; /* "OK" */
1255        trace->err.problem[0]='\0';
1256        return err;
1257}
1258
1259DLLEXPORT bool trace_is_err(libtrace_t *trace)
1260{
1261        return trace->err.err_num != 0;
1262}
1263
1264DLLEXPORT void trace_perror(libtrace_t *trace,const char *msg,...)
1265{
1266        char buf[256];
1267        va_list va;
1268        va_start(va,msg);
1269        vsnprintf(buf,sizeof(buf),msg,va);
1270        va_end(va);
1271        if(trace->err.err_num) {
1272                fprintf(stderr,"%s(%s): %s\n",
1273                                buf,trace->uridata,trace->err.problem);
1274        } else {
1275                fprintf(stderr,"%s(%s): No error\n",
1276                                buf,trace->uridata);
1277        }
1278        trace->err.err_num = 0; /* "OK" */
1279        trace->err.problem[0]='\0';
1280}
1281
1282DLLEXPORT libtrace_err_t trace_get_err_output(libtrace_out_t *trace)
1283{
1284        libtrace_err_t err = trace->err;
1285        trace->err.err_num = TRACE_ERR_NOERROR; /* "OK" */
1286        trace->err.problem[0]='\0';
1287        return err;
1288}
1289
1290DLLEXPORT bool trace_is_err_output(libtrace_out_t *trace)
1291{
1292        return trace->err.err_num != 0;
1293}
1294
1295DLLEXPORT void trace_perror_output(libtrace_out_t *trace,const char *msg,...)
1296{
1297        char buf[256];
1298        va_list va;
1299        va_start(va,msg);
1300        vsnprintf(buf,sizeof(buf),msg,va);
1301        va_end(va);
1302        if(trace->err.err_num) {
1303                fprintf(stderr,"%s(%s): %s\n",
1304                                buf,trace->uridata,trace->err.problem);
1305        } else {
1306                fprintf(stderr,"%s(%s): No error\n",buf,trace->uridata);
1307        }
1308        trace->err.err_num = TRACE_ERR_NOERROR; /* "OK" */
1309        trace->err.problem[0]='\0';
1310}
1311
1312DLLEXPORT int trace_seek_erf_timestamp(libtrace_t *trace, uint64_t ts)
1313{
1314        if (trace->format->seek_erf) {
1315                return trace->format->seek_erf(trace,ts);
1316        }
1317        else {
1318                if (trace->format->seek_timeval) {
1319                        struct timeval tv;
1320#if __BYTE_ORDER == __BIG_ENDIAN
1321                        tv.tv_sec = ts & 0xFFFFFFFF;
1322#elif __BYTE_ORDER == __LITTLE_ENDIAN
1323                        tv.tv_sec = ts >> 32;
1324#else
1325#error "What on earth are you running this on?"
1326#endif
1327                        tv.tv_usec = ((ts&0xFFFFFFFF)*1000000)>>32;
1328                        if (tv.tv_usec >= 1000000) {
1329                                tv.tv_usec -= 1000000;
1330                                tv.tv_sec += 1;
1331                        }
1332                        return trace->format->seek_timeval(trace,tv);
1333                }
1334                if (trace->format->seek_seconds) {
1335                        double seconds = 
1336                                (ts>>32) + ((ts & UINT_MAX)*1.0 / UINT_MAX);
1337                        return trace->format->seek_seconds(trace,seconds);
1338                }
1339                trace_set_err(trace,
1340                                TRACE_ERR_OPTION_UNAVAIL,
1341                                "Feature unimplemented");
1342                return -1;
1343        }
1344}
1345
1346DLLEXPORT int trace_seek_seconds(libtrace_t *trace, double seconds)
1347{
1348        if (trace->format->seek_seconds) {
1349                return trace->format->seek_seconds(trace,seconds);
1350        }
1351        else {
1352                if (trace->format->seek_timeval) {
1353                        struct timeval tv;
1354                        tv.tv_sec = (uint32_t)seconds;
1355                        tv.tv_usec = (uint32_t)(((seconds - tv.tv_sec) * 1000000)/UINT_MAX);
1356                        return trace->format->seek_timeval(trace,tv);
1357                }
1358                if (trace->format->seek_erf) {
1359                        uint64_t timestamp = 
1360                                ((uint64_t)((uint32_t)seconds) << 32) + \
1361                            (uint64_t)(( seconds - (uint32_t)seconds   ) * UINT_MAX);
1362                        return trace->format->seek_erf(trace,timestamp);
1363                }
1364                trace_set_err(trace,
1365                                TRACE_ERR_OPTION_UNAVAIL,
1366                                "Feature unimplemented");
1367                return -1;
1368        }
1369}
1370
1371DLLEXPORT int trace_seek_timeval(libtrace_t *trace, struct timeval tv)
1372{
1373        if (trace->format->seek_timeval) {
1374                return trace->format->seek_timeval(trace,tv);
1375        }
1376        else {
1377                if (trace->format->seek_erf) {
1378                        uint64_t timestamp = ((((uint64_t)tv.tv_sec) << 32) + \
1379                                (((uint64_t)tv.tv_usec * UINT_MAX)/1000000));
1380                        return trace->format->seek_erf(trace,timestamp);
1381                }
1382                if (trace->format->seek_seconds) {
1383                        double seconds = tv.tv_sec + ((tv.tv_usec * 1.0)/1000000);
1384                        return trace->format->seek_seconds(trace,seconds);
1385                }
1386                trace_set_err(trace,
1387                                TRACE_ERR_OPTION_UNAVAIL,
1388                                "Feature unimplemented");
1389                return -1;
1390        }
1391}
1392
1393DLLEXPORT char *trace_ether_ntoa(const uint8_t *addr, char *buf)
1394{
1395        char *buf2 = buf;
1396        char staticbuf[18]={0,};
1397        if (!buf2)
1398                buf2=staticbuf;
1399        snprintf(buf2,18,"%02x:%02x:%02x:%02x:%02x:%02x",
1400                        addr[0],addr[1],addr[2],
1401                        addr[3],addr[4],addr[5]);
1402        return buf2;
1403}
1404
1405DLLEXPORT uint8_t *trace_ether_aton(const char *buf, uint8_t *addr)
1406{
1407        uint8_t *buf2 = addr;
1408        unsigned int tmp[6];
1409        static uint8_t staticaddr[6];
1410        if (!buf2)
1411                buf2=staticaddr;
1412        sscanf(buf,"%x:%x:%x:%x:%x:%x",
1413                        &tmp[0],&tmp[1],&tmp[2],
1414                        &tmp[3],&tmp[4],&tmp[5]);
1415        buf2[0]=tmp[0]; buf2[1]=tmp[1]; buf2[2]=tmp[2];
1416        buf2[3]=tmp[3]; buf2[4]=tmp[4]; buf2[5]=tmp[5];
1417        return buf2;
1418}
1419
1420DLLEXPORT
1421void trace_construct_packet(libtrace_packet_t *packet,
1422                libtrace_linktype_t linktype,
1423                const void *data,
1424                uint16_t len)
1425{
1426        size_t size;
1427        static libtrace_t *deadtrace=NULL;
1428        libtrace_pcapfile_pkt_hdr_t hdr;
1429        struct timeval tv;
1430        if (NULL == deadtrace) deadtrace=trace_create_dead("pcapfile");
1431        gettimeofday(&tv,NULL);
1432        hdr.ts_sec=tv.tv_sec;
1433        hdr.ts_usec=tv.tv_usec;
1434        hdr.caplen=len;
1435        hdr.wirelen=len;
1436
1437        packet->trace=deadtrace;
1438        size=len+sizeof(hdr);
1439        if (packet->buf_control==TRACE_CTRL_PACKET) {
1440                packet->buffer=realloc(packet->buffer,size);
1441        }
1442        else {
1443                packet->buffer=malloc(size);
1444        }
1445        packet->buf_control=TRACE_CTRL_PACKET;
1446        packet->header=packet->buffer;
1447        packet->payload=(void*)((char*)packet->buffer+sizeof(hdr));
1448        memcpy(packet->header,&hdr,sizeof(hdr));
1449        memcpy(packet->payload,data,len);
1450        packet->type=pcap_dlt_to_rt(libtrace_to_pcap_dlt(linktype));
1451}
Note: See TracBrowser for help on using the repository browser.