source: lib/format_linux.c @ 0801187

4.0.1-hotfixescachetimestampsdevelopdpdk-ndagetsilivegetfragoffhelplibtrace4ndag_formatpfringrc-4.0.1rc-4.0.2rc-4.0.3rc-4.0.4ringdecrementfixringperformanceringtimestampfixes
Last change on this file since 0801187 was 0801187, checked in by Shane Alcock <salcock@…>, 9 years ago
  • Fixed bug where trace_event on int: formats was not actually working - turns out I had enabled that functionality in the wrong linuxnative struct :(
  • Property mode set to 100644
File size: 49.2 KB
Line 
1/*
2 * This file is part of libtrace
3 *
4 * Copyright (c) 2007,2008,2009,2010 The University of Waikato, Hamilton,
5 * New Zealand.
6 *
7 * Authors: Daniel Lawson
8 *          Perry Lorier
9 *          Shane Alcock
10 *          Richard Sanger
11 *         
12 * All rights reserved.
13 *
14 * This code has been developed by the University of Waikato WAND
15 * research group. For further information please see http://www.wand.net.nz/
16 *
17 * libtrace is free software; you can redistribute it and/or modify
18 * it under the terms of the GNU General Public License as published by
19 * the Free Software Foundation; either version 2 of the License, or
20 * (at your option) any later version.
21 *
22 * libtrace is distributed in the hope that it will be useful,
23 * but WITHOUT ANY WARRANTY; without even the implied warranty of
24 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
25 * GNU General Public License for more details.
26 *
27 * You should have received a copy of the GNU General Public License
28 * along with libtrace; if not, write to the Free Software
29 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
30 *
31 * $Id$
32 *
33 */
34
35/* This format module deals with using the Linux Native capture format.
36 *
37 * Linux Native is a LIVE capture format.
38 *
39 * This format also supports writing which will write packets out to the
40 * network as a form of packet replay. This should not be confused with the
41 * RT protocol which is intended to transfer captured packet records between
42 * RT-speaking programs.
43 */
44
45#include "config.h"
46#include "libtrace.h"
47#include "libtrace_int.h"
48#include "format_helper.h"
49#include "libtrace_arphrd.h"
50#include <stdlib.h>
51#include <errno.h>
52#include <unistd.h>
53#include <string.h>
54#include <assert.h>
55
56#ifdef HAVE_INTTYPES_H
57#  include <inttypes.h>
58#else
59# error "Can't find inttypes.h"
60#endif
61
62#ifdef HAVE_NETPACKET_PACKET_H
63
64#include <sys/socket.h>
65#include <netpacket/packet.h>
66#include <net/ethernet.h>
67#include <net/if_arp.h>
68
69#include <net/if.h>
70#include <sys/ioctl.h>
71#include <poll.h>
72#include <sys/mman.h>
73
74/* MAX_ORDER is defined in linux/mmzone.h. 10 is default for 2.4 kernel.
75 * max_order will be decreased by one if the ring buffer fails to allocate.
76 * Used to get correct sized buffers from the kernel.
77 */
78#define MAX_ORDER 10
79
80/* Cached page size, the page size shouldn't be changing */
81static int pagesize = 0;
82
83/* Number of frames in the ring used by both TX and TR rings. More frames
84 * hopefully means less packet loss, especially if traffic comes in bursts.
85 */
86#define CONF_RING_FRAMES        0x100
87
88/* The maximum frames allowed to be waiting in the TX_RING before the kernel is
89 * notified to write them out. Make sure this is less than CONF_RING_FRAMES.
90 * Performance doesn't seem to increase any more when setting this above 10.
91 */
92#define TX_MAX_QUEUE            10
93
94/* Get current frame in the ring buffer*/
95#define GET_CURRENT_BUFFER(libtrace) ((void *) FORMAT(libtrace->format_data)->rx_ring + \
96        (FORMAT(libtrace->format_data)->rxring_offset * FORMAT(libtrace->format_data)->req.tp_frame_size))
97
98
99#else   /* HAVE_NETPACKET_PACKET_H */
100/* Need to know what a sockaddr_ll looks like */
101struct sockaddr_ll {
102        uint16_t sll_family;
103        uint16_t sll_protocol;
104        int32_t  sll_ifindex;
105        uint16_t sll_hatype;
106        uint8_t  sll_pkttype;
107        uint8_t  sll_halen;
108        uint8_t  sll_addr[8];
109};
110
111/* Packet types.  */
112
113#define PACKET_HOST             0               /* To us.  */
114#define PACKET_BROADCAST        1               /* To all.  */
115#define PACKET_MULTICAST        2               /* To group.  */
116#define PACKET_OTHERHOST        3               /* To someone else.  */
117#define PACKET_OUTGOING         4               /* Originated by us . */
118#define PACKET_LOOPBACK         5
119#define PACKET_FASTROUTE        6
120
121/* Packet socket options.  */
122
123#define PACKET_ADD_MEMBERSHIP           1
124#define PACKET_DROP_MEMBERSHIP          2
125#define PACKET_RECV_OUTPUT              3
126#define PACKET_RX_RING                  5
127#define PACKET_STATISTICS               6
128
129
130#endif /* HAVE_NETPACKET_PACKET_H */
131
132struct tpacket_stats {
133        unsigned int tp_packets;
134        unsigned int tp_drops;
135};
136
137typedef enum { TS_NONE, TS_TIMEVAL, TS_TIMESPEC } timestamptype_t;
138
139/* linux/if_packet.h defines. They are here rather than including the header
140 * this means that we can interpret a ring frame on a kernel that doesn't
141 * support the format directly.
142 */
143
144
145#define PACKET_RX_RING  5
146#define PACKET_VERSION  10
147#define PACKET_HDRLEN   11
148#define PACKET_TX_RING  13
149#define TP_STATUS_USER  0x1
150#define TP_STATUS_SEND_REQUEST  0x1
151#define TP_STATUS_AVAILABLE     0x0
152#define TO_TP_HDR(x)    ((struct tpacket2_hdr *) (x))
153#define TPACKET_ALIGNMENT       16
154#define TPACKET_ALIGN(x)        (((x)+TPACKET_ALIGNMENT-1)&~(TPACKET_ALIGNMENT-1))
155#define TPACKET_HDRLEN         (TPACKET_ALIGN(sizeof(struct tpacket2_hdr)) + sizeof(struct sockaddr_ll))
156
157enum tpacket_versions {
158        TPACKET_V1,
159        TPACKET_V2
160};
161
162struct tpacket2_hdr {
163        /* Frame status - in use by kernel or libtrace etc. */
164        uint32_t        tp_status;
165        /* Wire length */
166        uint32_t        tp_len;
167        /* Captured length */
168        uint32_t        tp_snaplen;
169        /* Offset in bytes from frame start to the mac (link layer) header */
170        uint16_t        tp_mac;
171        /* Offset in bytes from frame start to the net (network layer) header */
172        uint16_t        tp_net;
173        /* Timestamp */
174        uint32_t        tp_sec;
175        uint32_t        tp_nsec;
176        /* Not used VLAN tag control information */
177        uint16_t        tp_vlan_tci;
178        uint16_t        tp_padding;
179};
180
181struct tpacket_req {
182        unsigned int tp_block_size;  /* Minimal size of contiguous block */
183        unsigned int tp_block_nr;    /* Number of blocks */
184        unsigned int tp_frame_size;  /* Size of frame */
185        unsigned int tp_frame_nr;    /* Total number of frames */
186};
187
188struct linux_format_data_t {
189        /* The file descriptor being used for the capture */
190        int fd;
191        /* The snap length for the capture */
192        int snaplen;
193        /* Flag indicating whether the interface should be placed in
194         * promiscuous mode */
195        int promisc;
196        /* The timestamp format used by the capture */ 
197        timestamptype_t timestamptype;
198        /* A BPF filter that is applied to every captured packet */
199        libtrace_filter_t *filter;
200        /* Statistics for the capture process, e.g. dropped packet counts */
201        struct tpacket_stats stats;
202        /* Flag indicating whether the statistics are current or not */
203        int stats_valid;
204        /* The rx ring mmap location*/
205        char * rx_ring;
206        /* The current frame number within the rx ring */       
207        int rxring_offset;
208        /* The actual format being used - ring vs int */
209        libtrace_rt_types_t format;
210        /* The current ring buffer layout */
211        struct tpacket_req req;
212        /* Used to determine buffer size for the ring buffer */ 
213        uint32_t max_order;
214};
215
216
217/* Note that this structure is passed over the wire in rt encapsulation, and
218 * thus we need to be careful with data sizes.  timeval's and timespec's
219 * can also change their size on 32/64 machines.
220 */
221
222/* Format header for encapsulating packets captured using linux native */
223struct libtrace_linuxnative_header {
224        /* Timestamp of the packet, as a timeval */
225        struct {
226                uint32_t tv_sec;
227                uint32_t tv_usec;
228        } tv;
229        /* Timestamp of the packet, as a timespec */
230        struct {
231                uint32_t tv_sec;
232                uint32_t tv_nsec;
233        } ts;
234        /* The timestamp format used by the process that captured this packet */
235        uint8_t timestamptype;
236        /* Wire length */
237        uint32_t wirelen;
238        /* Capture length */
239        uint32_t caplen;
240        /* The linux native header itself */
241        struct sockaddr_ll hdr;
242};
243
244struct linux_output_format_data_t {
245        /* The file descriptor used to write the packets */
246        int fd;
247        /* The tx ring mmap location */
248        char * tx_ring;
249        /* The current frame number within the tx ring */       
250        int txring_offset;
251        /* The current ring buffer layout */
252        struct tpacket_req req;
253        /* Our sockaddr structure, here so we can cache the interface number */
254        struct sockaddr_ll sock_hdr;
255        /* The (maximum) number of packets that haven't been written */
256        int queue;
257        /* The format this trace is using linuxring or linuxnative */
258        libtrace_rt_types_t format;
259        /* Used to determine buffer size for the ring buffer */ 
260        uint32_t max_order;
261};
262
263/* Get the sockaddr_ll structure from a frame */
264#define GET_SOCKADDR_HDR(x)  ((struct sockaddr_ll *) (((char *) (x))\
265        + TPACKET_ALIGN(sizeof(struct tpacket2_hdr))))
266
267#define FORMAT(x) ((struct linux_format_data_t*)(x))
268#define DATAOUT(x) ((struct linux_output_format_data_t*)((x)->format_data))
269
270/* Get the start of the captured data. I'm not sure if tp_mac (link layer) is
271 * always guaranteed. If it's not there then just use tp_net.
272 */
273#define TP_TRACE_START(mac, net, hdrend) \
274        ((mac) > (hdrend) && (mac) < (net) ? (mac) : (net))
275
276
277#ifdef HAVE_NETPACKET_PACKET_H
278/*
279 * Try figure out the best sizes for the ring buffer. Ensure that:
280 * - max(Block_size) == page_size << max_order
281 * - Frame_size == page_size << x (so that block_size%frame_size == 0)
282 *   This means that there will be no wasted space between blocks
283 * - Frame_size < block_size
284 * - Frame_size is as close as possible to LIBTRACE_PACKET_BUFSIZE, but not
285 *   bigger
286 * - Frame_nr = Block_nr * (frames per block)
287 * - CONF_RING_FRAMES is used a minimum number of frames to hold
288 * - Calculates based on max_order and buf_min
289 */
290static void calculate_buffers(struct tpacket_req * req, int fd, char * uri,
291                uint32_t max_order){
292       
293        struct ifreq ifr;
294        unsigned max_frame = LIBTRACE_PACKET_BUFSIZE;
295        pagesize = getpagesize();
296
297        strcpy(ifr.ifr_name, uri);
298        /* Don't bother trying to set frame size above mtu linux will drop
299         * these anyway.
300         *
301         * Remember, that our frame also has to include a TPACKET header!
302         */
303        if (ioctl(fd, SIOCGIFMTU, (caddr_t) &ifr) >= 0) 
304                max_frame = ifr.ifr_mtu + TPACKET_ALIGN(TPACKET_HDRLEN);
305        if (max_frame > LIBTRACE_PACKET_BUFSIZE)
306                max_frame = LIBTRACE_PACKET_BUFSIZE;
307
308        /* Calculate frame size */
309        req->tp_frame_size = pagesize;
310        while(req->tp_frame_size < max_frame && 
311                        req->tp_frame_size < LIBTRACE_PACKET_BUFSIZE){
312                req->tp_frame_size <<= 1;
313        }
314        if(req->tp_frame_size > LIBTRACE_PACKET_BUFSIZE)
315                req->tp_frame_size >>= 1;
316
317        /* Calculate block size */
318        req->tp_block_size = pagesize << max_order;
319        do{
320                req->tp_block_size >>= 1;
321        } while((CONF_RING_FRAMES * req->tp_frame_size) <= req->tp_block_size);
322        req->tp_block_size <<= 1;
323       
324        /* Calculate number of blocks */
325        req->tp_block_nr = (CONF_RING_FRAMES * req->tp_frame_size) 
326                        / req->tp_block_size;
327        if((CONF_RING_FRAMES * req->tp_frame_size) % req->tp_block_size != 0)
328                req->tp_block_nr++;
329
330        /* Calculate packets such that we use all the space we have to allocated */
331        req->tp_frame_nr = req->tp_block_nr * 
332                        (req->tp_block_size / req->tp_frame_size);
333
334        /*
335        printf("MaxO 0x%x BS 0x%x BN 0x%x FS 0x%x FN 0x%x\n",
336                max_order,
337                req->tp_block_size,
338                req->tp_block_nr,
339                req->tp_frame_size,
340                req->tp_frame_nr);
341        */
342       
343        /* In case we have some silly values*/
344        assert(req->tp_block_size);
345        assert(req->tp_block_nr);
346        assert(req->tp_frame_size);
347        assert(req->tp_frame_nr);
348        assert(req->tp_block_size % req->tp_frame_size == 0);
349}
350
351
352static int linuxnative_probe_filename(const char *filename)
353{
354        /* Is this an interface? */
355        return (if_nametoindex(filename) != 0);
356}
357
358static inline void init_input(libtrace_t *libtrace){
359        libtrace->format_data = (struct linux_format_data_t *)
360                malloc(sizeof(struct linux_format_data_t));
361        FORMAT(libtrace->format_data)->fd = -1;
362        FORMAT(libtrace->format_data)->promisc = -1;
363        FORMAT(libtrace->format_data)->snaplen = LIBTRACE_PACKET_BUFSIZE;
364        FORMAT(libtrace->format_data)->filter = NULL;
365        FORMAT(libtrace->format_data)->stats_valid = 0;
366        FORMAT(libtrace->format_data)->rx_ring = NULL;
367        FORMAT(libtrace->format_data)->rxring_offset = 0;
368        FORMAT(libtrace->format_data)->max_order = MAX_ORDER;
369}
370static int linuxring_init_input(libtrace_t *libtrace) 
371{       
372        init_input(libtrace);
373        FORMAT(libtrace->format_data)->format = TRACE_FORMAT_LINUX_RING;
374        return 0;
375}
376static int linuxnative_init_input(libtrace_t *libtrace) 
377{
378        init_input(libtrace);
379        FORMAT(libtrace->format_data)->format = TRACE_FORMAT_LINUX_NATIVE;
380        return 0;
381}
382
383static inline void init_output(libtrace_out_t *libtrace)
384{
385        libtrace->format_data = (struct linux_output_format_data_t*)
386                malloc(sizeof(struct linux_output_format_data_t));
387        DATAOUT(libtrace)->fd = -1;
388        DATAOUT(libtrace)->tx_ring = NULL;
389        DATAOUT(libtrace)->txring_offset = 0;
390        DATAOUT(libtrace)->queue = 0;
391        DATAOUT(libtrace)->max_order = MAX_ORDER;
392}
393static int linuxnative_init_output(libtrace_out_t *libtrace)
394{
395        init_output(libtrace);
396        DATAOUT(libtrace)->format = TRACE_FORMAT_LINUX_NATIVE;
397        return 0;
398}
399static int linuxring_init_output(libtrace_out_t *libtrace)
400{
401        init_output(libtrace);
402        DATAOUT(libtrace)->format = TRACE_FORMAT_LINUX_RING;
403        return 0;
404}
405
406static int linuxnative_start_input(libtrace_t *libtrace)
407{
408        struct sockaddr_ll addr;
409        int one = 1;
410        memset(&addr,0,sizeof(addr));
411        libtrace_filter_t *filter = FORMAT(libtrace->format_data)->filter;
412       
413        /* Create a raw socket for reading packets on */
414        FORMAT(libtrace->format_data)->fd = 
415                                socket(PF_PACKET, SOCK_RAW, htons(ETH_P_ALL));
416        if (FORMAT(libtrace->format_data)->fd==-1) {
417                trace_set_err(libtrace, errno, "Could not create raw socket");
418                free(libtrace->format_data);
419                libtrace->format_data = NULL;
420                return -1;
421        }
422
423        /* Bind to the capture interface */
424        addr.sll_family = AF_PACKET;
425        addr.sll_protocol = htons(ETH_P_ALL);
426        if (strlen(libtrace->uridata)) {
427                addr.sll_ifindex = if_nametoindex(libtrace->uridata);
428                if (addr.sll_ifindex == 0) {
429                        close(FORMAT(libtrace->format_data)->fd);
430                        trace_set_err(libtrace, TRACE_ERR_INIT_FAILED, "Failed to find interface %s", libtrace->uridata);
431                        free(libtrace->format_data);
432                        libtrace->format_data = NULL;
433                        return -1;
434                }
435        }
436        else {
437                addr.sll_ifindex = 0;
438        }
439        if (bind(FORMAT(libtrace->format_data)->fd,
440                                (struct sockaddr*)&addr,
441                                (socklen_t)sizeof(addr))==-1) {
442                free(libtrace->format_data);
443                libtrace->format_data = NULL;
444                trace_set_err(libtrace, errno, "Failed to bind to interface %s", libtrace->uridata);
445                return -1;
446        }
447
448        /* If promisc hasn't been specified, set it to "true" if we're
449         * capturing on one interface, or "false" if we're capturing on
450         * all interfaces.
451         */ 
452        if (FORMAT(libtrace->format_data)->promisc==-1) {
453                if (addr.sll_ifindex!=0)
454                        FORMAT(libtrace->format_data)->promisc=1;
455                else
456                        FORMAT(libtrace->format_data)->promisc=0;
457        }
458       
459        /* Enable promiscuous mode, if requested */                     
460        if (FORMAT(libtrace->format_data)->promisc) {
461                struct packet_mreq mreq;
462                socklen_t socklen = sizeof(mreq);
463                memset(&mreq,0,sizeof(mreq));
464                mreq.mr_ifindex = addr.sll_ifindex;
465                mreq.mr_type = PACKET_MR_PROMISC;
466                if (setsockopt(FORMAT(libtrace->format_data)->fd,
467                                SOL_PACKET,
468                                PACKET_ADD_MEMBERSHIP,
469                                &mreq,
470                                socklen)==-1) {
471                        perror("setsockopt(PROMISC)");
472                }
473        }
474
475        /* Set the timestamp option on the socket - aim for the most detailed
476         * clock resolution possible */
477#ifdef SO_TIMESTAMPNS
478        if (setsockopt(FORMAT(libtrace->format_data)->fd,
479                        SOL_SOCKET,
480                        SO_TIMESTAMPNS,
481                        &one,
482                        (socklen_t)sizeof(one))!=-1) {
483                FORMAT(libtrace->format_data)->timestamptype = TS_TIMESPEC;
484        }
485        else
486        /* DANGER: This is a dangling else to only do the next setsockopt() if we fail the first! */
487#endif
488        if (setsockopt(FORMAT(libtrace->format_data)->fd,
489                        SOL_SOCKET,
490                        SO_TIMESTAMP,
491                        &one,
492                        (socklen_t)sizeof(one))!=-1) {
493                FORMAT(libtrace->format_data)->timestamptype = TS_TIMEVAL;
494        }
495        else 
496                FORMAT(libtrace->format_data)->timestamptype = TS_NONE;
497
498        /* Push BPF filter into the kernel. At this stage we can safely assume
499         * that the filterstring has been compiled, or the filter was supplied
500         * pre-compiled.
501         */
502        if (filter != NULL) {
503                assert(filter->flag == 1);
504                if (setsockopt(FORMAT(libtrace->format_data)->fd,
505                                        SOL_SOCKET,
506                                        SO_ATTACH_FILTER,
507                                        &filter->filter,
508                                        sizeof(filter->filter)) == -1) {
509                        perror("setsockopt(SO_ATTACH_FILTER)");
510                } else { 
511                        /* The socket accepted the filter, so we need to
512                         * consume any buffered packets that were received
513                         * between opening the socket and applying the filter.
514                         */
515                        void *buf = malloc((size_t)LIBTRACE_PACKET_BUFSIZE);
516                        while(recv(FORMAT(libtrace->format_data)->fd,
517                                        buf,
518                                        (size_t) LIBTRACE_PACKET_BUFSIZE,
519                                        MSG_DONTWAIT) != -1) { }
520                        free(buf);
521                }
522        }
523
524        FORMAT(libtrace->format_data)->stats_valid=0;
525                                       
526        return 0;
527}
528static inline int socket_to_packetmmap( char * uridata, int ring_type, 
529                                        int fd, 
530                                        struct tpacket_req * req,
531                                        char ** ring_location,
532                                        uint32_t *max_order,
533                                        char *error){
534        int val;
535
536        /* Switch to TPACKET header version 2, we only try support v2 because v1 had problems */
537
538        val = TPACKET_V2;
539        if (setsockopt(fd, 
540                        SOL_PACKET, 
541                        PACKET_VERSION, 
542                        &val, 
543                        sizeof(val)) == -1){
544                strncpy(error, "TPACKET2 not supported", 2048);
545                return -1;
546        }
547
548        /* Try switch to a ring buffer. If it fails we assume the the kernel 
549         * cannot allocate a block of that size, so decrease max_block and retry.
550         */
551        while(1) {     
552                if (*max_order <= 0) {
553                        strncpy(error,"Cannot allocate enough memory for ring buffer", 2048);
554                        return -1;
555                }
556                calculate_buffers(req, fd, uridata, *max_order);
557                if (setsockopt(fd, 
558                                SOL_PACKET, 
559                                ring_type, 
560                                req, 
561                                sizeof(struct tpacket_req)) == -1) {
562                        if(errno == ENOMEM){
563                                (*max_order)--;
564                        } else {
565                                strncpy(error, "Error setting the ring buffer size", 2048);
566                                return -1;
567                        }
568
569                } else break;
570        }
571       
572        /* Map the ring buffer into userspace */
573        *ring_location = mmap(NULL, 
574                                        req->tp_block_size * req->tp_block_nr, 
575                                        PROT_READ | PROT_WRITE, 
576                                        MAP_SHARED, 
577                                        fd, 0);
578        if(*ring_location == MAP_FAILED){
579                strncpy(error, "Failed to map memory for ring buffer", 2048);
580                return -1;
581        }
582        return 0;
583}
584static int linuxring_start_input(libtrace_t *libtrace){
585
586        char error[2048];       
587
588        /* We set the socket up the same and then convert it to PACKET_MMAP */
589        if(linuxnative_start_input(libtrace) != 0)
590                return -1;
591
592        /* Make it a packetmmap */
593        if(socket_to_packetmmap(libtrace->uridata, PACKET_RX_RING, 
594                        FORMAT(libtrace->format_data)->fd,
595                        &FORMAT(libtrace->format_data)->req, 
596                        &FORMAT(libtrace->format_data)->rx_ring,
597                        &FORMAT(libtrace->format_data)->max_order,
598                        error) != 0){
599                trace_set_err(libtrace, TRACE_ERR_INIT_FAILED, error);
600                close(DATAOUT(libtrace)->fd);
601                free(libtrace->format_data);
602                libtrace->format_data = NULL;
603                return -1;
604        }
605
606        return 0;
607}
608
609static int linuxnative_start_output(libtrace_out_t *libtrace)
610{
611        DATAOUT(libtrace)->fd = socket(PF_PACKET, SOCK_RAW, 0);
612        if (DATAOUT(libtrace)->fd==-1) {
613                free(DATAOUT(libtrace));
614                return -1;
615        }       
616
617        return 0;
618}
619
620static int linuxring_start_output(libtrace_out_t *libtrace)
621{
622        char error[2048];       
623        /* We set the socket up the same and then convert it to PACKET_MMAP */
624        if(linuxnative_start_output(libtrace) != 0)
625                return -1;
626
627        /* Make it a packetmmap */
628        if(socket_to_packetmmap(libtrace->uridata, PACKET_TX_RING, 
629                        DATAOUT(libtrace)->fd,
630                        &DATAOUT(libtrace)->req, 
631                        &DATAOUT(libtrace)->tx_ring,
632                        &DATAOUT(libtrace)->max_order,
633                        error) != 0){
634                trace_set_err_out(libtrace, TRACE_ERR_INIT_FAILED, error);
635                close(DATAOUT(libtrace)->fd);
636                free(libtrace->format_data);
637                libtrace->format_data = NULL;
638                return -1;
639        }
640       
641        DATAOUT(libtrace)->sock_hdr.sll_family = AF_PACKET;
642        DATAOUT(libtrace)->sock_hdr.sll_protocol = 0;
643        DATAOUT(libtrace)->sock_hdr.sll_ifindex = 
644                                        if_nametoindex(libtrace->uridata);
645        DATAOUT(libtrace)->sock_hdr.sll_hatype = 0;
646        DATAOUT(libtrace)->sock_hdr.sll_pkttype = 0;
647        DATAOUT(libtrace)->sock_hdr.sll_halen = 0;
648        DATAOUT(libtrace)->queue = 0;   
649
650        return 0;
651}
652
653static int linuxnative_pause_input(libtrace_t *libtrace)
654{
655        close(FORMAT(libtrace->format_data)->fd);
656        FORMAT(libtrace->format_data)->fd=-1;
657
658        return 0;
659}
660static int linuxring_pause_input(libtrace_t *libtrace)
661{
662        munmap(FORMAT(libtrace->format_data)->rx_ring, 
663                FORMAT(libtrace->format_data)->req.tp_block_size *
664                        FORMAT(libtrace->format_data)->req.tp_block_nr);
665        FORMAT(libtrace->format_data)->rx_ring = NULL;
666        return linuxnative_pause_input(libtrace);
667}
668
669static int linuxnative_fin_input(libtrace_t *libtrace) 
670{
671        if (libtrace->format_data) {
672                if (FORMAT(libtrace->format_data)->filter != NULL)
673                        free(FORMAT(libtrace->format_data)->filter);
674                free(libtrace->format_data);
675        }
676       
677        return 0;
678}
679
680static int linuxnative_fin_output(libtrace_out_t *libtrace)
681{
682        close(DATAOUT(libtrace)->fd);
683        DATAOUT(libtrace)->fd=-1;
684        free(libtrace->format_data);
685        return 0;
686}
687static int linuxring_fin_output(libtrace_out_t *libtrace)
688{
689        /* Make sure any remaining frames get sent */
690        sendto(DATAOUT(libtrace)->fd, 
691                NULL, 
692                0, 
693                0, 
694                (void *) &DATAOUT(libtrace)->sock_hdr, 
695                sizeof(DATAOUT(libtrace)->sock_hdr));
696
697        /* Unmap our data area */
698        munmap(DATAOUT(libtrace)->tx_ring,
699                DATAOUT(libtrace)->req.tp_block_size * 
700                        DATAOUT(libtrace)->req.tp_block_nr);
701
702        return linuxnative_fin_output(libtrace);
703}
704
705/* Compiles a libtrace BPF filter for use with a linux native socket */
706static int linuxnative_configure_bpf(libtrace_t *libtrace, 
707                libtrace_filter_t *filter) {
708#ifdef HAVE_LIBPCAP
709        struct ifreq ifr;
710        unsigned int arphrd;
711        libtrace_dlt_t dlt;
712        libtrace_filter_t *f;
713        int sock;
714        pcap_t *pcap;
715
716        /* Take a copy of the filter object as it was passed in */
717        f = (libtrace_filter_t *) malloc(sizeof(libtrace_filter_t));
718        memcpy(f, filter, sizeof(libtrace_filter_t));
719       
720        /* If we are passed a filter with "flag" set to zero, then we must
721         * compile the filterstring before continuing. This involves
722         * determining the linktype, passing the filterstring to libpcap to
723         * compile, and saving the result for trace_start() to push into the
724         * kernel.
725         * If flag is set to one, then the filter was probably generated using
726         * trace_create_filter_from_bytecode() and so we don't need to do
727         * anything (we've just copied it above).
728         */
729        if (f->flag == 0) {
730                sock = socket(PF_INET, SOCK_STREAM, 0);
731                memset(&ifr, 0, sizeof(struct ifreq));
732                strncpy(ifr.ifr_name, libtrace->uridata, IF_NAMESIZE);
733                if (ioctl(sock, SIOCGIFHWADDR, &ifr) != 0) {
734                        perror("Can't get HWADDR for interface");
735                        return -1;
736                }
737                close(sock);
738
739                arphrd = ifr.ifr_hwaddr.sa_family;
740                dlt = libtrace_to_pcap_dlt(arphrd_type_to_libtrace(arphrd));
741
742                pcap = pcap_open_dead(dlt, 
743                                FORMAT(libtrace->format_data)->snaplen);
744
745                if (pcap_compile(pcap, &f->filter, f->filterstring, 0, 0) == -1) {
746                        perror("PCAP failed to compile the filterstring");
747                        return -1;
748                }
749
750                pcap_close(pcap);
751               
752                /* Set the "flag" to indicate that the filterstring has been
753                 * compiled
754                 */
755                f->flag = 1;
756        }
757       
758        if (FORMAT(libtrace->format_data)->filter != NULL)
759                free(FORMAT(libtrace->format_data)->filter);
760       
761        FORMAT(libtrace->format_data)->filter = f;
762       
763        return 0;
764#else
765        return -1
766#endif
767}
768static int linuxnative_config_input(libtrace_t *libtrace,
769                trace_option_t option,
770                void *data)
771{
772        switch(option) {
773                case TRACE_OPTION_SNAPLEN:
774                        FORMAT(libtrace->format_data)->snaplen=*(int*)data;
775                        return 0;
776                case TRACE_OPTION_PROMISC:
777                        FORMAT(libtrace->format_data)->promisc=*(int*)data;
778                        return 0;
779                case TRACE_OPTION_FILTER:
780                        return linuxnative_configure_bpf(libtrace, 
781                                        (libtrace_filter_t *) data);
782                case TRACE_OPTION_META_FREQ:
783                        /* No meta-data for this format */
784                        break;
785                case TRACE_OPTION_EVENT_REALTIME:
786                        /* Live captures are always going to be in trace time */
787                        break;
788                /* Avoid default: so that future options will cause a warning
789                 * here to remind us to implement it, or flag it as
790                 * unimplementable
791                 */
792        }
793       
794        /* Don't set an error - trace_config will try to deal with the
795         * option and will set an error if it fails */
796        return -1;
797}
798#endif /* HAVE_NETPACKET_PACKET_H */
799
800static int linuxnative_prepare_packet(libtrace_t *libtrace UNUSED, 
801                libtrace_packet_t *packet, void *buffer, 
802                libtrace_rt_types_t rt_type, uint32_t flags) {
803
804        if (packet->buffer != buffer &&
805                        packet->buf_control == TRACE_CTRL_PACKET) {
806                free(packet->buffer);
807        }
808
809        if ((flags & TRACE_PREP_OWN_BUFFER) == TRACE_PREP_OWN_BUFFER) {
810                packet->buf_control = TRACE_CTRL_PACKET;
811        } else
812                packet->buf_control = TRACE_CTRL_EXTERNAL;
813
814
815        packet->buffer = buffer;
816        packet->header = buffer;
817        packet->payload = (char *)buffer + 
818                sizeof(struct libtrace_linuxnative_header);
819        packet->type = rt_type;
820
821        /*
822        if (libtrace->format_data == NULL) {
823                if (linuxnative_init_input(libtrace))
824                        return -1;
825        }
826        */
827        return 0;
828       
829}
830
831static int linuxring_prepare_packet(libtrace_t *libtrace UNUSED, 
832                libtrace_packet_t *packet, void *buffer, 
833                libtrace_rt_types_t rt_type, uint32_t flags) {
834
835        if (packet->buffer != buffer &&
836                        packet->buf_control == TRACE_CTRL_PACKET) {
837                free(packet->buffer);
838        }
839
840        if ((flags & TRACE_PREP_OWN_BUFFER) == TRACE_PREP_OWN_BUFFER) {
841                packet->buf_control = TRACE_CTRL_PACKET;
842        } else
843                packet->buf_control = TRACE_CTRL_EXTERNAL;
844
845
846        packet->buffer = buffer;
847        packet->header = buffer;
848        packet->payload = (char *)buffer + 
849                                        TP_TRACE_START(
850                                        TO_TP_HDR(packet->header)->tp_mac, 
851                                        TO_TP_HDR(packet->header)->tp_net, 
852                                        TPACKET_HDRLEN);
853        packet->type = rt_type;
854
855        /*
856        if (libtrace->format_data == NULL) {
857                if (linuxnative_init_input(libtrace))
858                        return -1;
859        }
860        */
861        return 0;
862       
863}
864
865#define LIBTRACE_MIN(a,b) ((a)<(b) ? (a) : (b))
866
867/* 20 isn't enough on x86_64 */
868#define CMSG_BUF_SIZE 128
869
870#ifdef HAVE_NETPACKET_PACKET_H
871static int linuxnative_read_packet(libtrace_t *libtrace, libtrace_packet_t *packet) 
872{
873        struct libtrace_linuxnative_header *hdr;
874        struct msghdr msghdr;
875        struct iovec iovec;
876        unsigned char controlbuf[CMSG_BUF_SIZE];
877        struct cmsghdr *cmsg;
878        int snaplen;
879        uint32_t flags = 0;
880       
881        if (!packet->buffer || packet->buf_control == TRACE_CTRL_EXTERNAL) {
882                packet->buffer = malloc((size_t)LIBTRACE_PACKET_BUFSIZE);
883                if (!packet->buffer) {
884                        perror("Cannot allocate buffer");
885                }
886        }
887
888        flags |= TRACE_PREP_OWN_BUFFER;
889       
890        packet->type = TRACE_RT_DATA_LINUX_NATIVE;
891
892        hdr=(struct libtrace_linuxnative_header*)packet->buffer;
893        snaplen=LIBTRACE_MIN(
894                        (int)LIBTRACE_PACKET_BUFSIZE-(int)sizeof(*hdr),
895                        (int)FORMAT(libtrace->format_data)->snaplen);
896
897        /* Prepare the msghdr and iovec for the kernel to write the
898         * captured packet into. The msghdr will point to the part of our
899         * buffer reserved for sll header, while the iovec will point at
900         * the buffer following the sll header. */
901
902        msghdr.msg_name = &hdr->hdr;
903        msghdr.msg_namelen = sizeof(struct sockaddr_ll);
904
905        msghdr.msg_iov = &iovec;
906        msghdr.msg_iovlen = 1;
907
908        msghdr.msg_control = &controlbuf;
909        msghdr.msg_controllen = CMSG_BUF_SIZE;
910        msghdr.msg_flags = 0;
911
912        iovec.iov_base = (void*)(packet->buffer+sizeof(*hdr));
913        iovec.iov_len = snaplen;
914
915        hdr->wirelen = recvmsg(FORMAT(libtrace->format_data)->fd, &msghdr, 0);
916
917        if (hdr->wirelen==~0U) {
918                trace_set_err(libtrace,errno,"recvmsg");
919                return -1;
920        }
921
922        hdr->caplen=LIBTRACE_MIN((unsigned int)snaplen,(unsigned int)hdr->wirelen);
923
924        /* Extract the timestamps from the msghdr and store them in our
925         * linux native encapsulation, so that we can preserve the formatting
926         * across multiple architectures */
927
928        for (cmsg = CMSG_FIRSTHDR(&msghdr);
929                        cmsg != NULL;
930                        cmsg = CMSG_NXTHDR(&msghdr, cmsg)) {
931                if (cmsg->cmsg_level == SOL_SOCKET
932                        && cmsg->cmsg_type == SO_TIMESTAMP
933                        && cmsg->cmsg_len <= CMSG_LEN(sizeof(struct timeval))) {
934                       
935                        struct timeval *tv;
936                        tv = (struct timeval *)CMSG_DATA(cmsg);
937                       
938                       
939                        hdr->tv.tv_sec = tv->tv_sec;
940                        hdr->tv.tv_usec = tv->tv_usec;
941                        hdr->timestamptype = TS_TIMEVAL;
942                        break;
943                } 
944#ifdef SO_TIMESTAMPNS
945                else if (cmsg->cmsg_level == SOL_SOCKET
946                        && cmsg->cmsg_type == SO_TIMESTAMPNS
947                        && cmsg->cmsg_len <= CMSG_LEN(sizeof(struct timespec))) {
948
949                        struct timespec *tv;
950                        tv = (struct timespec *)CMSG_DATA(cmsg);
951
952                        hdr->ts.tv_sec = tv->tv_sec;
953                        hdr->ts.tv_nsec = tv->tv_nsec;
954                        hdr->timestamptype = TS_TIMESPEC;
955                        break;
956                }
957#endif
958        }
959
960        /* Did we not get given a timestamp? Try to get one from the
961         * file descriptor directly */
962        if (cmsg == NULL) {
963                struct timeval tv;
964                if (ioctl(FORMAT(libtrace->format_data)->fd, 
965                                  SIOCGSTAMP,&tv)==0) {
966                        hdr->tv.tv_sec = tv.tv_sec;
967                        hdr->tv.tv_usec = tv.tv_usec;
968                        hdr->timestamptype = TS_TIMEVAL;
969                }
970                else {
971                        hdr->timestamptype = TS_NONE;
972                }
973        }
974
975        /* Buffer contains all of our packet (including our custom header) so
976         * we just need to get prepare_packet to set all our packet pointers
977         * appropriately */
978       
979        if (linuxnative_prepare_packet(libtrace, packet, packet->buffer,
980                                packet->type, flags))
981                return -1;
982       
983        return hdr->wirelen+sizeof(*hdr);
984}
985
986#define LIBTRACE_BETWEEN(test,a,b) ((test) >= (a) && (test) < (b))
987static int linuxring_get_capture_length(const libtrace_packet_t *packet);
988static int linuxring_get_framing_length(const libtrace_packet_t *packet);
989
990/* Release a frame back to the kernel or free() if it's a malloc'd buffer
991 */
992inline static void ring_release_frame(libtrace_t *libtrace, libtrace_packet_t *packet ){
993        /* Free the old packet */
994        if(packet->buffer == NULL)
995                return;
996
997        if(packet->buf_control == TRACE_CTRL_PACKET){
998                free(packet->buffer);
999                packet->buffer = NULL;
1000        }
1001        if(packet->buf_control == TRACE_CTRL_EXTERNAL) {
1002                struct linux_format_data_t *ftd = FORMAT(libtrace->format_data);
1003               
1004                /* Check it's within our buffer first */
1005                if(LIBTRACE_BETWEEN((char *) packet->buffer, 
1006                                (char *) ftd->rx_ring,
1007                                ftd->rx_ring
1008                                + ftd->req.tp_block_size * ftd->req.tp_block_nr)){
1009                        TO_TP_HDR(packet->buffer)->tp_status = 0;
1010                        packet->buffer = NULL;
1011                }
1012        }
1013}
1014
1015static int linuxring_read_packet(libtrace_t *libtrace, libtrace_packet_t *packet) {
1016
1017        struct tpacket2_hdr *header;
1018        struct pollfd pollset; 
1019        int ret;
1020       
1021        ring_release_frame(libtrace, packet);
1022       
1023        packet->buf_control = TRACE_CTRL_EXTERNAL;
1024        packet->type = TRACE_RT_DATA_LINUX_RING;
1025       
1026        /* Fetch the current frame */
1027        header = GET_CURRENT_BUFFER(libtrace);
1028        assert((((unsigned long) header) & (pagesize - 1)) == 0);
1029
1030        /* TP_STATUS_USER means that we can use the frame.
1031         * When a slot does not have this flag set, the frame is not
1032         * ready for consumption.
1033         */
1034        while (!(header->tp_status & TP_STATUS_USER)) {
1035                pollset.fd = FORMAT(libtrace->format_data)->fd;
1036                pollset.events = POLLIN;
1037                pollset.revents = 0;
1038                /* Wait for more data */
1039                ret = poll(&pollset, 1, -1);
1040                if (ret < 0) {
1041                        if (errno != EINTR)
1042                                trace_set_err(libtrace,errno,"poll()");
1043                        return -1;
1044                }
1045        }
1046
1047        packet->buffer = header;
1048
1049        /* Move to next buffer */
1050        FORMAT(libtrace->format_data)->rxring_offset++;
1051        FORMAT(libtrace->format_data)->rxring_offset %= FORMAT(libtrace->format_data)->req.tp_frame_nr;
1052
1053        /* We just need to get prepare_packet to set all our packet pointers
1054         * appropriately */
1055        if (linuxring_prepare_packet(libtrace, packet, packet->buffer,
1056                                packet->type, 0))
1057                return -1;
1058        return  linuxring_get_framing_length(packet) + 
1059                                linuxring_get_capture_length(packet);
1060
1061}
1062
1063/* Non-blocking read */
1064static libtrace_eventobj_t linuxring_event(libtrace_t *libtrace, libtrace_packet_t *packet) {
1065        struct tpacket2_hdr *header;
1066        libtrace_eventobj_t event = {0,0,0.0,0};
1067
1068        /* We must free the old packet, otherwise select() will instantly return
1069         */
1070        ring_release_frame(libtrace, packet);
1071
1072        /* Fetch the current frame */
1073        header = GET_CURRENT_BUFFER(libtrace);
1074        if(header->tp_status & TP_STATUS_USER){
1075                /* We have a frame waiting */
1076                event.size = linuxring_read_packet(libtrace, packet);
1077                event.type = TRACE_EVENT_PACKET;
1078        } else {
1079                /* Ok we don't have a packet waiting */
1080                event.type = TRACE_EVENT_IOWAIT;
1081                event.fd = FORMAT(libtrace->format_data)->fd;
1082        }
1083
1084        return event;
1085}
1086
1087
1088static int linuxnative_write_packet(libtrace_out_t *trace, 
1089                libtrace_packet_t *packet) 
1090{
1091        struct sockaddr_ll hdr;
1092        int ret = 0;
1093
1094        if (trace_get_link_type(packet) == TRACE_TYPE_NONDATA)
1095                return 0;
1096
1097        hdr.sll_family = AF_PACKET;
1098        hdr.sll_protocol = 0;
1099        hdr.sll_ifindex = if_nametoindex(trace->uridata);
1100        hdr.sll_hatype = 0;
1101        hdr.sll_pkttype = 0;
1102        hdr.sll_halen = htons(6); /* FIXME */
1103        memcpy(hdr.sll_addr,packet->payload,(size_t)ntohs(hdr.sll_halen));
1104
1105        /* This is pretty easy, just send the payload using sendto() (after
1106         * setting up the sll header properly, of course) */
1107        ret = sendto(DATAOUT(trace)->fd,
1108                        packet->payload,
1109                        trace_get_capture_length(packet),
1110                        0,
1111                        (struct sockaddr*)&hdr, (socklen_t)sizeof(hdr));
1112
1113        if (ret < 0) {
1114                trace_set_err_out(trace, errno, "sendto failed");
1115        }
1116
1117        return ret;
1118
1119}
1120static int linuxring_write_packet(libtrace_out_t *trace, 
1121                libtrace_packet_t *packet)
1122{
1123        struct tpacket2_hdr *header;
1124        struct pollfd pollset;
1125        struct socket_addr;
1126        int ret; 
1127        unsigned max_size;
1128        void * off;
1129
1130        if (trace_get_link_type(packet) == TRACE_TYPE_NONDATA)
1131                return 0;
1132
1133        max_size = DATAOUT(trace)->req.tp_frame_size - 
1134                 - TPACKET_HDRLEN + sizeof(struct sockaddr_ll);
1135
1136        header = (void *) DATAOUT(trace)->tx_ring + 
1137        (DATAOUT(trace)->txring_offset * DATAOUT(trace)->req.tp_frame_size);
1138
1139        while(header->tp_status != TP_STATUS_AVAILABLE){
1140                /* if none available: wait on more data */
1141                pollset.fd = DATAOUT(trace)->fd;
1142                pollset.events = POLLOUT;
1143                pollset.revents = 0;
1144                ret = poll(&pollset, 1, 1000);
1145                if (ret < 0 && errno != EINTR) {
1146                        perror("poll");
1147                        return -1;
1148                }
1149                if(ret == 0) 
1150                        /* Timeout something has gone wrong - maybe the queue is
1151                         * to large so try issue another send command
1152                         */
1153                        ret = sendto(DATAOUT(trace)->fd, 
1154                                NULL, 
1155                                0, 
1156                                0, 
1157                                (void *) &DATAOUT(trace)->sock_hdr, 
1158                                sizeof(DATAOUT(trace)->sock_hdr));
1159                        if (ret < 0) {
1160                                trace_set_err_out(trace, errno, 
1161                                                "sendto after timeout failed");
1162                                return -1;
1163                        }
1164        }
1165       
1166        header->tp_len = trace_get_capture_length(packet);
1167
1168        /* We cannot write the whole packet so just write part of it */
1169        if (header->tp_len > max_size)
1170                header->tp_len = max_size;
1171
1172        /* Fill packet - no sockaddr_ll in header when writing to the TX_RING */
1173        off = ((void *) header) + (TPACKET_HDRLEN - sizeof(struct sockaddr_ll));
1174        memcpy(off, 
1175                (char *) packet->payload, 
1176                header->tp_len);
1177       
1178        /* 'Send it' and increase ring pointer to the next frame */
1179        header->tp_status = TP_STATUS_SEND_REQUEST;
1180        DATAOUT(trace)->txring_offset = (DATAOUT(trace)->txring_offset + 1) % 
1181                                                DATAOUT(trace)->req.tp_frame_nr;
1182
1183        /* Notify kernel there are frames to send */
1184        DATAOUT(trace)->queue ++;
1185        DATAOUT(trace)->queue %= TX_MAX_QUEUE;
1186        if(DATAOUT(trace)->queue == 0){
1187                ret = sendto(DATAOUT(trace)->fd, 
1188                                NULL, 
1189                                0, 
1190                                MSG_DONTWAIT, 
1191                                (void *) &DATAOUT(trace)->sock_hdr, 
1192                                sizeof(DATAOUT(trace)->sock_hdr));
1193                if (ret < 0) {
1194                        trace_set_err_out(trace, errno, "sendto failed");
1195                        return -1;
1196                }
1197        }
1198        return header->tp_len;
1199
1200}
1201#endif /* HAVE_NETPACKET_PACKET_H */
1202
1203static inline libtrace_linktype_t get_libtrace_link_type(uint16_t linktype){
1204        /* Convert the ARPHRD type into an appropriate libtrace link type */
1205        switch (linktype) {
1206                case LIBTRACE_ARPHRD_ETHER:
1207                case LIBTRACE_ARPHRD_LOOPBACK:
1208                        return TRACE_TYPE_ETH;
1209                case LIBTRACE_ARPHRD_PPP:
1210                        return TRACE_TYPE_NONE;
1211                case LIBTRACE_ARPHRD_IEEE80211_RADIOTAP:
1212                        return TRACE_TYPE_80211_RADIO;
1213                case LIBTRACE_ARPHRD_IEEE80211:
1214                        return TRACE_TYPE_80211;
1215                case LIBTRACE_ARPHRD_SIT:
1216                case LIBTRACE_ARPHRD_NONE:
1217                        return TRACE_TYPE_NONE;
1218                default: /* shrug, beyond me! */
1219                        printf("unknown Linux ARPHRD type 0x%04x\n",linktype);
1220                        return (libtrace_linktype_t)~0U;
1221        }
1222}
1223static libtrace_linktype_t linuxnative_get_link_type(const struct libtrace_packet_t *packet) {
1224        uint16_t linktype=(((struct libtrace_linuxnative_header*)(packet->buffer))
1225                                ->hdr.sll_hatype);
1226        return get_libtrace_link_type(linktype);
1227}
1228static libtrace_linktype_t linuxring_get_link_type(const struct libtrace_packet_t *packet) {
1229        uint16_t linktype= GET_SOCKADDR_HDR(packet->buffer)->sll_hatype;
1230        return get_libtrace_link_type(linktype);
1231}
1232
1233static inline libtrace_direction_t get_libtrace_direction(uint8_t pkttype){
1234        switch (pkttype) {
1235                case PACKET_OUTGOING:
1236                case PACKET_LOOPBACK:
1237                        return TRACE_DIR_OUTGOING;
1238                default:
1239                        return TRACE_DIR_INCOMING;
1240        }
1241}
1242static libtrace_direction_t linuxnative_get_direction(const struct libtrace_packet_t *packet) {
1243        return get_libtrace_direction(((struct libtrace_linuxnative_header*)(packet->buffer))->hdr.sll_pkttype);
1244}
1245static libtrace_direction_t linuxring_get_direction(const struct libtrace_packet_t *packet) {
1246        return get_libtrace_direction(GET_SOCKADDR_HDR(packet->buffer)->sll_pkttype);
1247}
1248
1249static libtrace_direction_t set_direction(struct sockaddr_ll * skadr, libtrace_direction_t direction){
1250        switch (direction) {
1251                case TRACE_DIR_OUTGOING:
1252                        skadr->sll_pkttype = PACKET_OUTGOING;
1253                        return TRACE_DIR_OUTGOING;
1254                case TRACE_DIR_INCOMING:
1255                        skadr->sll_pkttype = PACKET_HOST;
1256                        return TRACE_DIR_INCOMING;
1257                default:
1258                        return -1;
1259        }
1260}
1261static libtrace_direction_t linuxnative_set_direction(
1262                libtrace_packet_t *packet,
1263                libtrace_direction_t direction) {
1264        return set_direction(&((struct libtrace_linuxnative_header*)(packet->buffer))->hdr, direction);
1265}
1266static libtrace_direction_t linuxring_set_direction(
1267                libtrace_packet_t *packet,
1268                libtrace_direction_t direction) {
1269        return set_direction(GET_SOCKADDR_HDR(packet->buffer), direction);
1270}
1271
1272static struct timespec linuxnative_get_timespec(const libtrace_packet_t *packet) 
1273{
1274        struct libtrace_linuxnative_header *hdr = 
1275                (struct libtrace_linuxnative_header*) packet->buffer;
1276        /* We have to upconvert from timeval to timespec */
1277        if (hdr->timestamptype == TS_TIMEVAL) {
1278                struct timespec ts;
1279                ts.tv_sec = hdr->tv.tv_sec;
1280                ts.tv_nsec = hdr->tv.tv_usec*1000;
1281                return ts;
1282        }
1283        else {
1284                struct timespec ts;
1285                ts.tv_sec = hdr->ts.tv_sec;
1286                ts.tv_nsec = hdr->ts.tv_nsec;
1287                return ts;
1288        }
1289}
1290static struct timespec linuxring_get_timespec(const libtrace_packet_t *packet) 
1291{
1292        struct timespec ts;
1293        ts.tv_sec = TO_TP_HDR(packet->buffer)->tp_sec;
1294        ts.tv_nsec = TO_TP_HDR(packet->buffer)->tp_nsec;
1295        return ts;
1296}
1297
1298
1299static struct timeval linuxnative_get_timeval(const libtrace_packet_t *packet) 
1300{
1301        struct libtrace_linuxnative_header *hdr = 
1302                (struct libtrace_linuxnative_header*) packet->buffer;
1303        /* We have to downconvert from timespec to timeval */
1304        if (hdr->timestamptype == TS_TIMESPEC) {
1305                struct timeval tv;
1306                tv.tv_sec = hdr->ts.tv_sec;
1307                tv.tv_usec = hdr->ts.tv_nsec/1000;
1308                return tv;
1309        }
1310        else {
1311                struct timeval tv;
1312                tv.tv_sec = hdr->tv.tv_sec;
1313                tv.tv_usec = hdr->tv.tv_usec;
1314                return tv;
1315        }
1316}
1317static struct timeval linuxring_get_timeval(const libtrace_packet_t *packet) 
1318{
1319        struct timeval tv;
1320        tv.tv_sec = TO_TP_HDR(packet->buffer)->tp_sec;
1321        tv.tv_usec = TO_TP_HDR(packet->buffer)->tp_nsec / 1000;
1322        return tv;
1323}
1324
1325static int linuxnative_get_capture_length(const libtrace_packet_t *packet)
1326{
1327        return ((struct libtrace_linuxnative_header*)(packet->buffer))->caplen;
1328}
1329
1330static int linuxring_get_capture_length(const libtrace_packet_t *packet)
1331{
1332        return TO_TP_HDR(packet->buffer)->tp_snaplen;
1333}
1334
1335static int linuxnative_get_wire_length(const libtrace_packet_t *packet) 
1336{
1337
1338        int wirelen = ((struct libtrace_linuxnative_header*)(packet->buffer))->wirelen;
1339
1340        /* Include the missing FCS */
1341        if (trace_get_link_type(packet) == TRACE_TYPE_ETH)
1342                wirelen += 4;
1343
1344        return wirelen;
1345}
1346
1347static int linuxring_get_wire_length(const libtrace_packet_t *packet) 
1348{
1349        int wirelen = TO_TP_HDR(packet->buffer)->tp_len;
1350
1351        /* Include the missing FCS */
1352        if (trace_get_link_type(packet) == TRACE_TYPE_ETH)
1353                wirelen += 4;
1354
1355        return wirelen;
1356}
1357
1358static int linuxnative_get_framing_length(UNUSED
1359                const libtrace_packet_t *packet) 
1360{
1361        return sizeof(struct libtrace_linuxnative_header);
1362}
1363
1364static int linuxring_get_framing_length(const libtrace_packet_t *packet)
1365{       
1366        /*
1367         * Need to make frame_length + capture_length = complete capture length
1368         * so include alligment whitespace. So reverse calculate from packet.
1369         */
1370        return (char *) packet->payload - (char *) packet->buffer;
1371}
1372
1373static size_t linuxnative_set_capture_length(libtrace_packet_t *packet, 
1374                size_t size) {
1375
1376        struct libtrace_linuxnative_header *linux_hdr = NULL;
1377        assert(packet);
1378        if (size > trace_get_capture_length(packet)) {
1379                /* We should avoid making a packet larger */
1380                return trace_get_capture_length(packet);
1381        }
1382       
1383        /* Reset the cached capture length */
1384        packet->capture_length = -1;
1385
1386        linux_hdr = (struct libtrace_linuxnative_header *)packet->header;
1387        linux_hdr->caplen = size;
1388        return trace_get_capture_length(packet);
1389}
1390
1391static size_t linuxring_set_capture_length(libtrace_packet_t *packet, 
1392                size_t size) {
1393        assert(packet);
1394        if (size > trace_get_capture_length(packet)) {
1395                /* We should avoid making a packet larger */
1396                return trace_get_capture_length(packet);
1397        }
1398       
1399        /* Reset the cached capture length */
1400        packet->capture_length = -1;
1401
1402        TO_TP_HDR(packet->buffer)->tp_len = size;
1403
1404        return trace_get_capture_length(packet);
1405}
1406
1407static int linuxnative_get_fd(const libtrace_t *trace) {
1408        if (trace->format_data == NULL)
1409                return -1;
1410        return FORMAT(trace->format_data)->fd;
1411}
1412
1413/* Linux doesn't keep track how many packets were seen before filtering
1414 * so we can't tell how many packets were filtered.  Bugger.  So annoying.
1415 *
1416 * Since we tell libtrace that we do support filtering, if we don't declare
1417 * this here as failing, libtrace will happily report for us that it didn't
1418 * filter any packets, so don't lie -- return that we don't know.
1419 */
1420static uint64_t linuxnative_get_filtered_packets(libtrace_t *trace UNUSED) {
1421        return UINT64_MAX;
1422}
1423
1424/* Number of packets that passed filtering */
1425static uint64_t linuxnative_get_captured_packets(libtrace_t *trace) {
1426        if (trace->format_data == NULL)
1427                return UINT64_MAX;
1428        if (FORMAT(trace->format_data)->fd == -1) {
1429                /* This is probably a 'dead' trace so obviously we can't query
1430                 * the socket for capture counts, can we? */
1431                return UINT64_MAX;
1432        }
1433
1434#ifdef HAVE_NETPACKET_PACKET_H 
1435        if ((FORMAT(trace->format_data)->stats_valid & 1) 
1436                        || FORMAT(trace->format_data)->stats_valid == 0) {
1437                socklen_t len = sizeof(FORMAT(trace->format_data)->stats);
1438                getsockopt(FORMAT(trace->format_data)->fd, 
1439                                SOL_PACKET,
1440                                PACKET_STATISTICS,
1441                                &FORMAT(trace->format_data)->stats,
1442                                &len);
1443                FORMAT(trace->format_data)->stats_valid |= 1;
1444        }
1445
1446        return FORMAT(trace->format_data)->stats.tp_packets;
1447#else
1448        return UINT64_MAX;
1449#endif
1450}
1451
1452/* Number of packets that got past filtering and were then dropped because
1453 * of lack of space
1454 */
1455static uint64_t linuxnative_get_dropped_packets(libtrace_t *trace) {
1456        if (trace->format_data == NULL)
1457                return UINT64_MAX;
1458        if (FORMAT(trace->format_data)->fd == -1) {
1459                /* This is probably a 'dead' trace so obviously we can't query
1460                 * the socket for drop counts, can we? */
1461                return UINT64_MAX;
1462        }
1463       
1464#ifdef HAVE_NETPACKET_PACKET_H 
1465        if ((FORMAT(trace->format_data)->stats_valid & 2)
1466                        || (FORMAT(trace->format_data)->stats_valid==0)) {
1467                socklen_t len = sizeof(FORMAT(trace->format_data)->stats);
1468                getsockopt(FORMAT(trace->format_data)->fd, 
1469                                SOL_PACKET,
1470                                PACKET_STATISTICS,
1471                                &FORMAT(trace->format_data)->stats,
1472                                &len);
1473                FORMAT(trace->format_data)->stats_valid |= 2;
1474        }
1475
1476        return FORMAT(trace->format_data)->stats.tp_drops;
1477#else
1478        return UINT64_MAX;
1479#endif
1480}
1481
1482#ifdef HAVE_NETPACKET_PACKET_H
1483static void linuxnative_help(void) {
1484        printf("linuxnative format module: $Revision$\n");
1485        printf("Supported input URIs:\n");
1486        printf("\tint:eth0\n");
1487        printf("\n");
1488        printf("Supported output URIs:\n");
1489        printf("\tint:eth0\n");
1490        printf("\n");
1491        return;
1492}
1493
1494static void linuxring_help(void) {
1495        printf("linuxring format module: $Revision$\n");
1496        printf("Supported input URIs:\n");
1497        printf("\tring:eth0\n");
1498        printf("\n");
1499        printf("Supported output URIs:\n");
1500        printf("\tring:eth0\n");
1501        printf("\n");
1502        return;
1503}
1504
1505static struct libtrace_format_t linuxnative = {
1506        "int",
1507        "$Id$",
1508        TRACE_FORMAT_LINUX_NATIVE,
1509        linuxnative_probe_filename,     /* probe filename */
1510        NULL,                           /* probe magic */
1511        linuxnative_init_input,         /* init_input */
1512        linuxnative_config_input,       /* config_input */
1513        linuxnative_start_input,        /* start_input */
1514        linuxnative_pause_input,        /* pause_input */
1515        linuxnative_init_output,        /* init_output */
1516        NULL,                           /* config_output */
1517        linuxnative_start_output,       /* start_ouput */
1518        linuxnative_fin_input,          /* fin_input */
1519        linuxnative_fin_output,         /* fin_output */
1520        linuxnative_read_packet,        /* read_packet */
1521        linuxnative_prepare_packet,     /* prepare_packet */
1522        NULL,                           /* fin_packet */
1523        linuxnative_write_packet,       /* write_packet */
1524        linuxnative_get_link_type,      /* get_link_type */
1525        linuxnative_get_direction,      /* get_direction */
1526        linuxnative_set_direction,      /* set_direction */
1527        NULL,                           /* get_erf_timestamp */
1528        linuxnative_get_timeval,        /* get_timeval */
1529        linuxnative_get_timespec,       /* get_timespec */
1530        NULL,                           /* get_seconds */
1531        NULL,                           /* seek_erf */
1532        NULL,                           /* seek_timeval */
1533        NULL,                           /* seek_seconds */
1534        linuxnative_get_capture_length, /* get_capture_length */
1535        linuxnative_get_wire_length,    /* get_wire_length */
1536        linuxnative_get_framing_length, /* get_framing_length */
1537        linuxnative_set_capture_length, /* set_capture_length */
1538        NULL,                           /* get_received_packets */
1539        linuxnative_get_filtered_packets,/* get_filtered_packets */
1540        linuxnative_get_dropped_packets,/* get_dropped_packets */
1541        linuxnative_get_captured_packets,/* get_captured_packets */
1542        linuxnative_get_fd,             /* get_fd */
1543        trace_event_device,             /* trace_event */
1544        linuxnative_help,               /* help */
1545        NULL
1546};
1547
1548static struct libtrace_format_t linuxring = {
1549        "ring",
1550        "$Id$",
1551        TRACE_FORMAT_LINUX_RING,
1552        linuxnative_probe_filename,     /* probe filename */
1553        NULL,                           /* probe magic */
1554        linuxring_init_input,           /* init_input */
1555        linuxnative_config_input,       /* config_input */
1556        linuxring_start_input,  /* start_input */
1557        linuxring_pause_input,  /* pause_input */
1558        linuxring_init_output,  /* init_output */
1559        NULL,                           /* config_output */
1560        linuxring_start_output, /* start_ouput */
1561        linuxnative_fin_input,          /* fin_input */
1562        linuxring_fin_output,           /* fin_output */
1563        linuxring_read_packet,  /* read_packet */
1564        linuxring_prepare_packet,       /* prepare_packet */
1565        NULL,                           /* fin_packet */
1566        linuxring_write_packet, /* write_packet */
1567        linuxring_get_link_type,        /* get_link_type */
1568        linuxring_get_direction,        /* get_direction */
1569        linuxring_set_direction,        /* set_direction */
1570        NULL,                           /* get_erf_timestamp */
1571        linuxring_get_timeval,  /* get_timeval */
1572        linuxring_get_timespec, /* get_timespec */
1573        NULL,                           /* get_seconds */
1574        NULL,                           /* seek_erf */
1575        NULL,                           /* seek_timeval */
1576        NULL,                           /* seek_seconds */
1577        linuxring_get_capture_length,   /* get_capture_length */
1578        linuxring_get_wire_length,      /* get_wire_length */
1579        linuxring_get_framing_length,   /* get_framing_length */
1580        linuxring_set_capture_length,   /* set_capture_length */
1581        NULL,                           /* get_received_packets */
1582        linuxnative_get_filtered_packets,/* get_filtered_packets */
1583        linuxnative_get_dropped_packets,/* get_dropped_packets */
1584        linuxnative_get_captured_packets,/* get_captured_packets */
1585        linuxnative_get_fd,             /* get_fd */
1586        linuxring_event,                /* trace_event */
1587        linuxring_help,         /* help */
1588        NULL
1589};
1590#else
1591static void linuxnative_help(void) {
1592        printf("linuxnative format module: $Revision$\n");
1593        printf("Not supported on this host\n");
1594}
1595static void linuxring_help(void) {
1596        printf("linuxring format module: $Revision$\n");
1597        printf("Not supported on this host\n");
1598}
1599
1600static struct libtrace_format_t linuxnative = {
1601        "int",
1602        "$Id$",
1603        TRACE_FORMAT_LINUX_NATIVE,
1604        NULL,                           /* probe filename */
1605        NULL,                           /* probe magic */
1606        NULL,                           /* init_input */
1607        NULL,                           /* config_input */
1608        NULL,                           /* start_input */
1609        NULL,                           /* pause_input */
1610        NULL,                           /* init_output */
1611        NULL,                           /* config_output */
1612        NULL,                           /* start_ouput */
1613        NULL,                           /* fin_input */
1614        NULL,                           /* fin_output */
1615        NULL,                           /* read_packet */
1616        linuxnative_prepare_packet,     /* prepare_packet */
1617        NULL,                           /* fin_packet */
1618        NULL,                           /* write_packet */
1619        linuxnative_get_link_type,      /* get_link_type */
1620        linuxnative_get_direction,      /* get_direction */
1621        linuxnative_set_direction,      /* set_direction */
1622        NULL,                           /* get_erf_timestamp */
1623        linuxnative_get_timeval,        /* get_timeval */
1624        linuxnative_get_timespec,       /* get_timespec */
1625        NULL,                           /* get_seconds */
1626        NULL,                           /* seek_erf */
1627        NULL,                           /* seek_timeval */
1628        NULL,                           /* seek_seconds */
1629        linuxnative_get_capture_length, /* get_capture_length */
1630        linuxnative_get_wire_length,    /* get_wire_length */
1631        linuxnative_get_framing_length, /* get_framing_length */
1632        linuxnative_set_capture_length, /* set_capture_length */
1633        NULL,                           /* get_received_packets */
1634        linuxnative_get_filtered_packets,/* get_filtered_packets */
1635        linuxnative_get_dropped_packets,/* get_dropped_packets */
1636        linuxnative_get_captured_packets,/* get_captured_packets */
1637        linuxnative_get_fd,             /* get_fd */
1638        trace_event_device,             /* trace_event */
1639        linuxnative_help,               /* help */
1640        NULL
1641};
1642
1643static struct libtrace_format_t linuxring = {
1644        "ring",
1645        "$Id$",
1646        TRACE_FORMAT_LINUX_RING,
1647        NULL,                           /* probe filename */
1648        NULL,                           /* probe magic */
1649        NULL,                           /* init_input */
1650        NULL,                           /* config_input */
1651        NULL,                           /* start_input */
1652        NULL,                           /* pause_input */
1653        NULL,                           /* init_output */
1654        NULL,                           /* config_output */
1655        NULL,                           /* start_ouput */
1656        NULL,                           /* fin_input */
1657        NULL,                           /* fin_output */
1658        NULL,                           /* read_packet */
1659        linuxring_prepare_packet,       /* prepare_packet */
1660        NULL,                           /* fin_packet */
1661        NULL,                           /* write_packet */
1662        linuxring_get_link_type,        /* get_link_type */
1663        linuxring_get_direction,        /* get_direction */
1664        linuxring_set_direction,        /* set_direction */
1665        NULL,                           /* get_erf_timestamp */
1666        linuxring_get_timeval,          /* get_timeval */
1667        linuxring_get_timespec,         /* get_timespec */
1668        NULL,                           /* get_seconds */
1669        NULL,                           /* seek_erf */
1670        NULL,                           /* seek_timeval */
1671        NULL,                           /* seek_seconds */
1672        linuxring_get_capture_length,   /* get_capture_length */
1673        linuxring_get_wire_length,      /* get_wire_length */
1674        linuxring_get_framing_length,   /* get_framing_length */
1675        linuxring_set_capture_length,   /* set_capture_length */
1676        NULL,                           /* get_received_packets */
1677        linuxnative_get_filtered_packets,/* get_filtered_packets */
1678        linuxnative_get_dropped_packets,/* get_dropped_packets */
1679        linuxnative_get_captured_packets,/* get_captured_packets */
1680        linuxnative_get_fd,             /* get_fd */
1681        NULL,                           /* trace_event */
1682        linuxring_help,                 /* help */
1683        NULL
1684};
1685
1686#endif /* HAVE_NETPACKET_PACKET_H */
1687
1688
1689void linuxnative_constructor(void) {
1690        /* TODO: once we're happy with ring:, it would be a good idea to
1691         * swap the order of these calls so that ring: is preferred over
1692         * int: if the user just gives an interface name as an input without
1693         * explicitly choosing a format.
1694         */
1695        register_format(&linuxnative);
1696        register_format(&linuxring);
1697}
Note: See TracBrowser for help on using the repository browser.