source: lib/format_linux.c @ 706561a

4.0.1-hotfixescachetimestampsdevelopdpdk-ndagetsilivelibtrace4ndag_formatpfringrc-4.0.1rc-4.0.2rc-4.0.3rc-4.0.4ringdecrementfixringperformanceringtimestampfixes
Last change on this file since 706561a was 706561a, checked in by Richard Sanger <rsangerarj@…>, 6 years ago

Fix regression in ring format caused by also calling poll even when data is ready.

  • Property mode set to 100644
File size: 64.4 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#include <fcntl.h>
75
76/* MAX_ORDER is defined in linux/mmzone.h. 10 is default for 2.4 kernel.
77 * max_order will be decreased by one if the ring buffer fails to allocate.
78 * Used to get correct sized buffers from the kernel.
79 */
80#define MAX_ORDER 10
81
82/* Cached page size, the page size shouldn't be changing */
83static int pagesize = 0;
84
85/* Number of frames in the ring used by both TX and TR rings. More frames
86 * hopefully means less packet loss, especially if traffic comes in bursts.
87 */
88#define CONF_RING_FRAMES        0x100
89
90/* The maximum frames allowed to be waiting in the TX_RING before the kernel is
91 * notified to write them out. Make sure this is less than CONF_RING_FRAMES.
92 * Performance doesn't seem to increase any more when setting this above 10.
93 */
94#define TX_MAX_QUEUE            10
95
96/* Get current frame in the ring buffer*/
97#define GET_CURRENT_BUFFER(libtrace) ((void *) FORMAT(libtrace->format_data)->rx_ring + \
98        (FORMAT(libtrace->format_data)->rxring_offset * FORMAT(libtrace->format_data)->req.tp_frame_size))
99
100
101#else   /* HAVE_NETPACKET_PACKET_H */
102/* Need to know what a sockaddr_ll looks like */
103struct sockaddr_ll {
104        uint16_t sll_family;
105        uint16_t sll_protocol;
106        int32_t  sll_ifindex;
107        uint16_t sll_hatype;
108        uint8_t  sll_pkttype;
109        uint8_t  sll_halen;
110        uint8_t  sll_addr[8];
111};
112
113/* Packet types.  */
114
115#define PACKET_HOST             0               /* To us.  */
116#define PACKET_BROADCAST        1               /* To all.  */
117#define PACKET_MULTICAST        2               /* To group.  */
118#define PACKET_OTHERHOST        3               /* To someone else.  */
119#define PACKET_OUTGOING         4               /* Originated by us . */
120#define PACKET_LOOPBACK         5
121#define PACKET_FASTROUTE        6
122
123/* Packet socket options.  */
124
125#define PACKET_ADD_MEMBERSHIP           1
126#define PACKET_DROP_MEMBERSHIP          2
127#define PACKET_RECV_OUTPUT              3
128#define PACKET_RX_RING                  5
129#define PACKET_STATISTICS               6
130
131
132#endif /* HAVE_NETPACKET_PACKET_H */
133
134struct tpacket_stats {
135        unsigned int tp_packets;
136        unsigned int tp_drops;
137};
138
139typedef enum { TS_NONE, TS_TIMEVAL, TS_TIMESPEC } timestamptype_t;
140
141/* linux/if_packet.h defines. They are here rather than including the header
142 * this means that we can interpret a ring frame on a kernel that doesn't
143 * support the format directly.
144 */
145
146
147#define PACKET_RX_RING  5
148#define PACKET_VERSION  10
149#define PACKET_HDRLEN   11
150#define PACKET_TX_RING  13
151#define PACKET_FANOUT   18
152#define TP_STATUS_USER  0x1
153#define TP_STATUS_SEND_REQUEST  0x1
154#define TP_STATUS_AVAILABLE     0x0
155#define TO_TP_HDR(x)    ((struct tpacket2_hdr *) (x))
156#define TPACKET_ALIGNMENT       16
157#define TPACKET_ALIGN(x)        (((x)+TPACKET_ALIGNMENT-1)&~(TPACKET_ALIGNMENT-1))
158#define TPACKET_HDRLEN         (TPACKET_ALIGN(sizeof(struct tpacket2_hdr)) + sizeof(struct sockaddr_ll))
159
160/* Since 3.1 kernel we have packet_fanout support */
161// schedule to socket by skb's rxhash - the implementation is bi-directional
162#define PACKET_FANOUT_HASH              0
163// schedule round robin
164#define PACKET_FANOUT_LB                1
165// schedule to the same socket that received the packet
166#define PACKET_FANOUT_CPU               2
167// Something to do with fragmented packets and hashing problems !! TODO figure out if this needs to be on
168#define PACKET_FANOUT_FLAG_DEFRAG       0x8000
169/* Included but unused by libtrace since Linux 3.10 */
170// if one socket if full roll over to the next
171#define PACKET_FANOUT_ROLLOVER          3
172// This flag makes any other system roll over
173#define PACKET_FANOUT_FLAG_ROLLOVER     0x1000
174/* Included but unused by libtrace since Linux 3.12 */
175// schedule random
176#define PACKET_FANOUT_RND               4
177
178
179enum tpacket_versions {
180        TPACKET_V1,
181        TPACKET_V2
182};
183
184struct tpacket2_hdr {
185        /* Frame status - in use by kernel or libtrace etc. */
186        uint32_t        tp_status;
187        /* Wire length */
188        uint32_t        tp_len;
189        /* Captured length */
190        uint32_t        tp_snaplen;
191        /* Offset in bytes from frame start to the mac (link layer) header */
192        uint16_t        tp_mac;
193        /* Offset in bytes from frame start to the net (network layer) header */
194        uint16_t        tp_net;
195        /* Timestamp */
196        uint32_t        tp_sec;
197        uint32_t        tp_nsec;
198        /* Not used VLAN tag control information */
199        uint16_t        tp_vlan_tci;
200        uint16_t        tp_padding;
201};
202
203struct tpacket_req {
204        unsigned int tp_block_size;  /* Minimal size of contiguous block */
205        unsigned int tp_block_nr;    /* Number of blocks */
206        unsigned int tp_frame_size;  /* Size of frame */
207        unsigned int tp_frame_nr;    /* Total number of frames */
208};
209
210struct linux_per_thread_t {
211        char *rx_ring;
212        int rxring_offset;
213        int fd;
214        // The flag layout should be the same for all (I Hope)
215        // max_order
216} ALIGN_STRUCT(CACHE_LINE_SIZE);
217
218struct linux_format_data_t {
219        /* The file descriptor being used for the capture */
220        int fd;
221        /* The snap length for the capture */
222        int snaplen;
223        /* Flag indicating whether the interface should be placed in
224         * promiscuous mode */
225        int promisc;
226        /* The timestamp format used by the capture */ 
227        timestamptype_t timestamptype;
228        /* A BPF filter that is applied to every captured packet */
229        libtrace_filter_t *filter;
230        /* Statistics for the capture process, e.g. dropped packet counts */
231        struct tpacket_stats stats;
232        /* Flag indicating whether the statistics are current or not */
233        int stats_valid;
234        /* The rx ring mmap location*/
235        char * rx_ring;
236        /* The current frame number within the rx ring */       
237        int rxring_offset;
238        /* The actual format being used - ring vs int */
239        libtrace_rt_types_t format;
240        /* The current ring buffer layout */
241        struct tpacket_req req;
242        /* Used to determine buffer size for the ring buffer */ 
243        uint32_t max_order;
244        /* Used for the parallel case, fanout is the mode */
245        uint16_t fanout_flags;
246        /* The group lets Linux know which sockets to group together
247         * so we use a random here to try avoid collisions */
248        uint16_t fanout_group;
249        /* When running in parallel mode this is malloc'd with an array
250         * file descriptors from packet fanout will use, here we assume/hope
251         * that every ring can get setup the same */
252        struct linux_per_thread_t *per_thread;
253};
254
255
256/* Note that this structure is passed over the wire in rt encapsulation, and
257 * thus we need to be careful with data sizes.  timeval's and timespec's
258 * can also change their size on 32/64 machines.
259 */
260
261/* Format header for encapsulating packets captured using linux native */
262struct libtrace_linuxnative_header {
263        /* Timestamp of the packet, as a timeval */
264        struct {
265                uint32_t tv_sec;
266                uint32_t tv_usec;
267        } tv;
268        /* Timestamp of the packet, as a timespec */
269        struct {
270                uint32_t tv_sec;
271                uint32_t tv_nsec;
272        } ts;
273        /* The timestamp format used by the process that captured this packet */
274        uint8_t timestamptype;
275        /* Wire length */
276        uint32_t wirelen;
277        /* Capture length */
278        uint32_t caplen;
279        /* The linux native header itself */
280        struct sockaddr_ll hdr;
281};
282
283struct linux_output_format_data_t {
284        /* The file descriptor used to write the packets */
285        int fd;
286        /* The tx ring mmap location */
287        char * tx_ring;
288        /* The current frame number within the tx ring */       
289        int txring_offset;
290        /* The current ring buffer layout */
291        struct tpacket_req req;
292        /* Our sockaddr structure, here so we can cache the interface number */
293        struct sockaddr_ll sock_hdr;
294        /* The (maximum) number of packets that haven't been written */
295        int queue;
296        /* The format this trace is using linuxring or linuxnative */
297        libtrace_rt_types_t format;
298        /* Used to determine buffer size for the ring buffer */ 
299        uint32_t max_order;
300};
301
302/* Get the sockaddr_ll structure from a frame */
303#define GET_SOCKADDR_HDR(x)  ((struct sockaddr_ll *) (((char *) (x))\
304        + TPACKET_ALIGN(sizeof(struct tpacket2_hdr))))
305
306#define FORMAT(x) ((struct linux_format_data_t*)(x))
307#define PERPKT_FORMAT(x) ((struct linux_per_thread_t*)(x->format_data))
308#define DATAOUT(x) ((struct linux_output_format_data_t*)((x)->format_data))
309
310/* Get the start of the captured data. I'm not sure if tp_mac (link layer) is
311 * always guaranteed. If it's not there then just use tp_net.
312 */
313#define TP_TRACE_START(mac, net, hdrend) \
314        ((mac) > (hdrend) && (mac) < (net) ? (mac) : (net))
315
316
317#ifdef HAVE_NETPACKET_PACKET_H
318/*
319 * Try figure out the best sizes for the ring buffer. Ensure that:
320 * - max(Block_size) == page_size << max_order
321 * - Frame_size == page_size << x (so that block_size%frame_size == 0)
322 *   This means that there will be no wasted space between blocks
323 * - Frame_size < block_size
324 * - Frame_size is as close as possible to LIBTRACE_PACKET_BUFSIZE, but not
325 *   bigger
326 * - Frame_nr = Block_nr * (frames per block)
327 * - CONF_RING_FRAMES is used a minimum number of frames to hold
328 * - Calculates based on max_order and buf_min
329 */
330static void calculate_buffers(struct tpacket_req * req, int fd, char * uri,
331                uint32_t max_order){
332       
333        struct ifreq ifr;
334        unsigned max_frame = LIBTRACE_PACKET_BUFSIZE;
335        pagesize = getpagesize();
336
337        strcpy(ifr.ifr_name, uri);
338        /* Don't bother trying to set frame size above mtu linux will drop
339         * these anyway.
340         *
341         * Remember, that our frame also has to include a TPACKET header!
342         */
343        if (ioctl(fd, SIOCGIFMTU, (caddr_t) &ifr) >= 0) 
344                max_frame = ifr.ifr_mtu + TPACKET_ALIGN(TPACKET_HDRLEN);
345        if (max_frame > LIBTRACE_PACKET_BUFSIZE)
346                max_frame = LIBTRACE_PACKET_BUFSIZE;
347
348        /* Calculate frame size */
349        req->tp_frame_size = pagesize;
350        while(req->tp_frame_size < max_frame && 
351                        req->tp_frame_size < LIBTRACE_PACKET_BUFSIZE){
352                req->tp_frame_size <<= 1;
353        }
354        if(req->tp_frame_size > LIBTRACE_PACKET_BUFSIZE)
355                req->tp_frame_size >>= 1;
356
357        /* Calculate block size */
358        req->tp_block_size = pagesize << max_order;
359        do{
360                req->tp_block_size >>= 1;
361        } while((CONF_RING_FRAMES * req->tp_frame_size) <= req->tp_block_size);
362        req->tp_block_size <<= 1;
363       
364        /* Calculate number of blocks */
365        req->tp_block_nr = (CONF_RING_FRAMES * req->tp_frame_size) 
366                        / req->tp_block_size;
367        if((CONF_RING_FRAMES * req->tp_frame_size) % req->tp_block_size != 0)
368                req->tp_block_nr++;
369
370        /* Calculate packets such that we use all the space we have to allocated */
371        req->tp_frame_nr = req->tp_block_nr * 
372                        (req->tp_block_size / req->tp_frame_size);
373
374        /*
375        printf("MaxO 0x%x BS 0x%x BN 0x%x FS 0x%x FN 0x%x\n",
376                max_order,
377                req->tp_block_size,
378                req->tp_block_nr,
379                req->tp_frame_size,
380                req->tp_frame_nr);
381        */
382       
383        /* In case we have some silly values*/
384        assert(req->tp_block_size);
385        assert(req->tp_block_nr);
386        assert(req->tp_frame_size);
387        assert(req->tp_frame_nr);
388        assert(req->tp_block_size % req->tp_frame_size == 0);
389}
390
391
392static int linuxnative_probe_filename(const char *filename)
393{
394        /* Is this an interface? */
395        return (if_nametoindex(filename) != 0);
396}
397
398static inline void init_input(libtrace_t *libtrace){
399        libtrace->format_data = (struct linux_format_data_t *)
400                malloc(sizeof(struct linux_format_data_t));
401        FORMAT(libtrace->format_data)->fd = -1;
402        FORMAT(libtrace->format_data)->promisc = -1;
403        FORMAT(libtrace->format_data)->snaplen = LIBTRACE_PACKET_BUFSIZE;
404        FORMAT(libtrace->format_data)->filter = NULL;
405        FORMAT(libtrace->format_data)->stats_valid = 0;
406        FORMAT(libtrace->format_data)->rx_ring = NULL;
407        FORMAT(libtrace->format_data)->rxring_offset = 0;
408        FORMAT(libtrace->format_data)->max_order = MAX_ORDER;
409        FORMAT(libtrace->format_data)->fanout_flags = PACKET_FANOUT_LB; // This might be best or alternatively PACKET_FANOUT_LB
410        // Some examples use pid for the group however that would limit a single
411        // application to use only int/ring format, instead using rand
412        FORMAT(libtrace->format_data)->fanout_group = (uint16_t) rand();
413        FORMAT(libtrace->format_data)->per_thread = NULL;
414}
415static int linuxring_init_input(libtrace_t *libtrace) 
416{       
417        init_input(libtrace);
418        FORMAT(libtrace->format_data)->format = TRACE_RT_DATA_LINUX_RING;
419        return 0;
420}
421static int linuxnative_init_input(libtrace_t *libtrace) 
422{
423        init_input(libtrace);
424        FORMAT(libtrace->format_data)->format = TRACE_RT_DATA_LINUX_NATIVE;
425        return 0;
426}
427
428static inline void init_output(libtrace_out_t *libtrace)
429{
430        libtrace->format_data = (struct linux_output_format_data_t*)
431                malloc(sizeof(struct linux_output_format_data_t));
432        DATAOUT(libtrace)->fd = -1;
433        DATAOUT(libtrace)->tx_ring = NULL;
434        DATAOUT(libtrace)->txring_offset = 0;
435        DATAOUT(libtrace)->queue = 0;
436        DATAOUT(libtrace)->max_order = MAX_ORDER;
437}
438static int linuxnative_init_output(libtrace_out_t *libtrace)
439{
440        init_output(libtrace);
441        DATAOUT(libtrace)->format = TRACE_FORMAT_LINUX_NATIVE;
442        return 0;
443}
444static int linuxring_init_output(libtrace_out_t *libtrace)
445{
446        init_output(libtrace);
447        DATAOUT(libtrace)->format = TRACE_FORMAT_LINUX_RING;
448        return 0;
449}
450
451static int linuxnative_start_input(libtrace_t *libtrace)
452{
453        struct sockaddr_ll addr;
454        int one = 1;
455        memset(&addr,0,sizeof(addr));
456        libtrace_filter_t *filter = FORMAT(libtrace->format_data)->filter;
457       
458        /* Create a raw socket for reading packets on */
459        FORMAT(libtrace->format_data)->fd = 
460                                socket(PF_PACKET, SOCK_RAW, htons(ETH_P_ALL));
461        if (FORMAT(libtrace->format_data)->fd==-1) {
462                trace_set_err(libtrace, errno, "Could not create raw socket");
463                free(libtrace->format_data);
464                libtrace->format_data = NULL;
465                return -1;
466        }
467
468        /* Bind to the capture interface */
469        addr.sll_family = AF_PACKET;
470        addr.sll_protocol = htons(ETH_P_ALL);
471        if (strlen(libtrace->uridata)) {
472                addr.sll_ifindex = if_nametoindex(libtrace->uridata);
473                if (addr.sll_ifindex == 0) {
474                        close(FORMAT(libtrace->format_data)->fd);
475                        trace_set_err(libtrace, TRACE_ERR_INIT_FAILED, "Failed to find interface %s", libtrace->uridata);
476                        free(libtrace->format_data);
477                        libtrace->format_data = NULL;
478                        return -1;
479                }
480        }
481        else {
482                addr.sll_ifindex = 0;
483        }
484        if (bind(FORMAT(libtrace->format_data)->fd,
485                                (struct sockaddr*)&addr,
486                                (socklen_t)sizeof(addr))==-1) {
487                free(libtrace->format_data);
488                libtrace->format_data = NULL;
489                trace_set_err(libtrace, errno, "Failed to bind to interface %s", libtrace->uridata);
490                return -1;
491        }
492
493        /* If promisc hasn't been specified, set it to "true" if we're
494         * capturing on one interface, or "false" if we're capturing on
495         * all interfaces.
496         */ 
497        if (FORMAT(libtrace->format_data)->promisc==-1) {
498                if (addr.sll_ifindex!=0)
499                        FORMAT(libtrace->format_data)->promisc=1;
500                else
501                        FORMAT(libtrace->format_data)->promisc=0;
502        }
503       
504        /* Enable promiscuous mode, if requested */                     
505        if (FORMAT(libtrace->format_data)->promisc) {
506                struct packet_mreq mreq;
507                socklen_t socklen = sizeof(mreq);
508                memset(&mreq,0,sizeof(mreq));
509                mreq.mr_ifindex = addr.sll_ifindex;
510                mreq.mr_type = PACKET_MR_PROMISC;
511                if (setsockopt(FORMAT(libtrace->format_data)->fd,
512                                SOL_PACKET,
513                                PACKET_ADD_MEMBERSHIP,
514                                &mreq,
515                                socklen)==-1) {
516                        perror("setsockopt(PROMISC)");
517                }
518        }
519
520        /* Set the timestamp option on the socket - aim for the most detailed
521         * clock resolution possible */
522#ifdef SO_TIMESTAMPNS
523        if (setsockopt(FORMAT(libtrace->format_data)->fd,
524                        SOL_SOCKET,
525                        SO_TIMESTAMPNS,
526                        &one,
527                        (socklen_t)sizeof(one))!=-1) {
528                FORMAT(libtrace->format_data)->timestamptype = TS_TIMESPEC;
529        }
530        else
531        /* DANGER: This is a dangling else to only do the next setsockopt() if we fail the first! */
532#endif
533        if (setsockopt(FORMAT(libtrace->format_data)->fd,
534                        SOL_SOCKET,
535                        SO_TIMESTAMP,
536                        &one,
537                        (socklen_t)sizeof(one))!=-1) {
538                FORMAT(libtrace->format_data)->timestamptype = TS_TIMEVAL;
539        }
540        else 
541                FORMAT(libtrace->format_data)->timestamptype = TS_NONE;
542
543        /* Push BPF filter into the kernel. At this stage we can safely assume
544         * that the filterstring has been compiled, or the filter was supplied
545         * pre-compiled.
546         */
547        if (filter != NULL) {
548                /* Check if the filter was successfully compiled. If not,
549                 * it is probably a bad filter and we should return an error
550                 * before the caller tries to read any packets */
551                if (filter->flag == 0) {
552                        return -1;
553                }
554               
555                if (setsockopt(FORMAT(libtrace->format_data)->fd,
556                                        SOL_SOCKET,
557                                        SO_ATTACH_FILTER,
558                                        &filter->filter,
559                                        sizeof(filter->filter)) == -1) {
560                        perror("setsockopt(SO_ATTACH_FILTER)");
561                } else { 
562                        /* The socket accepted the filter, so we need to
563                         * consume any buffered packets that were received
564                         * between opening the socket and applying the filter.
565                         */
566                        void *buf = malloc((size_t)LIBTRACE_PACKET_BUFSIZE);
567                        while(recv(FORMAT(libtrace->format_data)->fd,
568                                        buf,
569                                        (size_t) LIBTRACE_PACKET_BUFSIZE,
570                                        MSG_DONTWAIT) != -1) { }
571                        free(buf);
572                }
573        }
574
575        FORMAT(libtrace->format_data)->stats_valid=0;
576                                       
577        return 0;
578}
579static inline int socket_to_packetmmap( char * uridata, int ring_type, 
580                                        int fd, 
581                                        struct tpacket_req * req,
582                                        char ** ring_location,
583                                        uint32_t *max_order,
584                                        char *error){
585        int val;
586
587        /* Switch to TPACKET header version 2, we only try support v2 because v1 had problems */
588
589        val = TPACKET_V2;
590        if (setsockopt(fd, 
591                        SOL_PACKET, 
592                        PACKET_VERSION, 
593                        &val, 
594                        sizeof(val)) == -1){
595                strncpy(error, "TPACKET2 not supported", 2048);
596                return -1;
597        }
598
599        /* Try switch to a ring buffer. If it fails we assume the the kernel 
600         * cannot allocate a block of that size, so decrease max_block and retry.
601         */
602        while(1) {     
603                if (*max_order <= 0) {
604                        strncpy(error,"Cannot allocate enough memory for ring buffer", 2048);
605                        return -1;
606                }
607                calculate_buffers(req, fd, uridata, *max_order);
608                if (setsockopt(fd, 
609                                SOL_PACKET, 
610                                ring_type, 
611                                req, 
612                                sizeof(struct tpacket_req)) == -1) {
613                        if(errno == ENOMEM){
614                                (*max_order)--;
615                        } else {
616                                strncpy(error, "Error setting the ring buffer size", 2048);
617                                return -1;
618                        }
619
620                } else break;
621        }
622       
623        /* Map the ring buffer into userspace */
624        *ring_location = mmap(NULL, 
625                                        req->tp_block_size * req->tp_block_nr, 
626                                        PROT_READ | PROT_WRITE, 
627                                        MAP_SHARED, 
628                                        fd, 0);
629        if(*ring_location == MAP_FAILED){
630                strncpy(error, "Failed to map memory for ring buffer", 2048);
631                return -1;
632        }
633        return 0;
634}
635
636/**
637 * Converts a socket, either packet_mmap or standard raw socket into a
638 * fanout socket.
639 * NOTE: This means we can read from the socket with multiple queues,
640 * each must be setup (identically) and then this called upon them
641 *
642 * @return 0 success, -1 error
643 */
644static inline int socket_to_packet_fanout(int fd, 
645                                        uint16_t fanout_flags,
646                                        uint16_t fanout_group) {
647        int fanout_opt = ((int)fanout_flags << 16) | (int)fanout_group;
648        if (setsockopt(fd, SOL_PACKET, PACKET_FANOUT,
649                        &fanout_opt, sizeof(fanout_opt)) == -1) {
650                return -1;
651        }
652        return 0;
653}
654
655static int linuxnative_ppause_input(libtrace_t *libtrace)
656{
657        int i;
658        int tot = libtrace->perpkt_thread_count;
659        printf("CAlling native pause packet\n");
660       
661        for (i = 0; i < tot; i++) {
662                close(FORMAT(libtrace->format_data)->per_thread[i].fd);
663        }
664       
665        free(FORMAT(libtrace->format_data)->per_thread);
666        FORMAT(libtrace->format_data)->per_thread = NULL;
667        return 0;
668}
669
670static int linuxring_start_input(libtrace_t *libtrace)
671{
672        char error[2048];
673
674        /* We set the socket up the same and then convert it to PACKET_MMAP */
675        if(linuxnative_start_input(libtrace) != 0)
676                return -1;
677
678        strncpy(error, "No known error", 2048);
679
680        /* Make it a packetmmap */
681        if(socket_to_packetmmap(libtrace->uridata, PACKET_RX_RING, 
682                        FORMAT(libtrace->format_data)->fd,
683                        &FORMAT(libtrace->format_data)->req, 
684                        &FORMAT(libtrace->format_data)->rx_ring,
685                        &FORMAT(libtrace->format_data)->max_order,
686                        error) != 0){
687                trace_set_err(libtrace, TRACE_ERR_INIT_FAILED, "Initialisation of packet MMAP failed: %s", error);
688                close(DATAOUT(libtrace)->fd);
689                free(libtrace->format_data);
690                libtrace->format_data = NULL;
691                return -1;
692        }
693
694        return 0;
695}
696
697static int linuxnative_pstart_input(libtrace_t *libtrace) {
698        int i = 0;
699        int tot = libtrace->perpkt_thread_count;
700        int iserror = 0;
701        // We store this here otherwise it will be leaked if the memory doesn't know
702        struct linux_per_thread_t *per_thread = NULL;
703       
704        if (!FORMAT(libtrace->format_data)->per_thread) {
705                //per_thread = calloc(tot, sizeof(struct linux_per_thread_t));
706                posix_memalign((void **)&per_thread, CACHE_LINE_SIZE, tot*sizeof(struct linux_per_thread_t));
707                FORMAT(libtrace->format_data)->per_thread = per_thread;
708        } else {
709                // Whats going on this might not work 100%
710                // We assume all sockets have been closed ;)
711                printf("Pause and then start called again lets hope that perpkt_thread_count hasn't changed\n");
712        }
713       
714        printf("Calling native pstart packet\n");
715        for (i = 0; i < tot; ++i)
716        {
717                if (FORMAT(libtrace->format_data)->format == TRACE_RT_DATA_LINUX_NATIVE) {
718                        if (linuxnative_start_input(libtrace) != 0) {
719                                iserror = 1;
720                                break;
721                        }
722                } else {
723                        // This must be ring
724                        if (linuxring_start_input(libtrace) != 0) {
725                                iserror = 1;
726                                break;
727                        }
728                }
729                if (socket_to_packet_fanout(FORMAT(libtrace->format_data)->fd, FORMAT(libtrace->format_data)->fanout_flags, FORMAT(libtrace->format_data)->fanout_group) != 0)
730                {
731                        iserror = 1;
732                        // Clean up here to keep consistent with every one else
733                        trace_set_err(libtrace, TRACE_ERR_INIT_FAILED, "Converting the fd to a socket fanout failed");
734                        close(FORMAT(libtrace->format_data)->fd);
735                        free(libtrace->format_data);
736                        libtrace->format_data = NULL;
737                        break;
738                }
739                per_thread[i].fd = FORMAT(libtrace->format_data)->fd;
740                if (FORMAT(libtrace->format_data)->format == TRACE_RT_DATA_LINUX_RING) {
741                        per_thread[i].rxring_offset = FORMAT(libtrace->format_data)->rxring_offset;
742                        per_thread[i].rx_ring = FORMAT(libtrace->format_data)->rx_ring;
743                }
744        }
745       
746        // Roll back those that failed - by this point in time the format_data
747        // has been freed
748        if (iserror) {
749                for (i = i - 1; i >= 0; i--) {
750                        close(per_thread[i].fd);
751                }
752                free(per_thread);
753                per_thread = NULL;
754                return -1;
755        }
756       
757        return 0;
758}
759
760static int linux_pregister_thread(libtrace_t *libtrace, libtrace_thread_t *t, bool reading) {
761        fprintf(stderr, "registering thread %d!!\n", t->perpkt_num);
762    if (reading) {
763        if(t->type == THREAD_PERPKT) {
764            t->format_data = &FORMAT(libtrace->format_data)->per_thread[t->perpkt_num];
765        } else {
766            t->format_data = &FORMAT(libtrace->format_data)->per_thread[0];
767        }
768    }
769    return 0;
770}
771
772static int linuxnative_start_output(libtrace_out_t *libtrace)
773{
774        DATAOUT(libtrace)->fd = socket(PF_PACKET, SOCK_RAW, 0);
775        if (DATAOUT(libtrace)->fd==-1) {
776                free(DATAOUT(libtrace));
777                return -1;
778        }
779
780        return 0;
781}
782
783static int linuxring_start_output(libtrace_out_t *libtrace)
784{
785        char error[2048];       
786        /* We set the socket up the same and then convert it to PACKET_MMAP */
787        if(linuxnative_start_output(libtrace) != 0)
788                return -1;
789
790        /* Make it a packetmmap */
791        if(socket_to_packetmmap(libtrace->uridata, PACKET_TX_RING, 
792                        DATAOUT(libtrace)->fd,
793                        &DATAOUT(libtrace)->req, 
794                        &DATAOUT(libtrace)->tx_ring,
795                        &DATAOUT(libtrace)->max_order,
796                        error) != 0){
797                trace_set_err_out(libtrace, TRACE_ERR_INIT_FAILED, "Initialisation of packet MMAP failed: %s", error);
798                close(DATAOUT(libtrace)->fd);
799                free(libtrace->format_data);
800                libtrace->format_data = NULL;
801                return -1;
802        }
803       
804        DATAOUT(libtrace)->sock_hdr.sll_family = AF_PACKET;
805        DATAOUT(libtrace)->sock_hdr.sll_protocol = 0;
806        DATAOUT(libtrace)->sock_hdr.sll_ifindex = 
807                                        if_nametoindex(libtrace->uridata);
808        DATAOUT(libtrace)->sock_hdr.sll_hatype = 0;
809        DATAOUT(libtrace)->sock_hdr.sll_pkttype = 0;
810        DATAOUT(libtrace)->sock_hdr.sll_halen = 0;
811        DATAOUT(libtrace)->queue = 0;   
812
813        return 0;
814}
815
816static int linuxnative_pause_input(libtrace_t *libtrace)
817{
818        close(FORMAT(libtrace->format_data)->fd);
819        FORMAT(libtrace->format_data)->fd=-1;
820
821        return 0;
822}
823
824static int linuxring_pause_input(libtrace_t *libtrace)
825{
826        munmap(FORMAT(libtrace->format_data)->rx_ring, 
827                FORMAT(libtrace->format_data)->req.tp_block_size *
828                        FORMAT(libtrace->format_data)->req.tp_block_nr);
829        FORMAT(libtrace->format_data)->rx_ring = NULL;
830        return linuxnative_pause_input(libtrace);
831}
832
833static int linuxnative_fin_input(libtrace_t *libtrace) 
834{
835        if (libtrace->format_data) {
836                if (FORMAT(libtrace->format_data)->filter != NULL)
837                        free(FORMAT(libtrace->format_data)->filter);
838                free(libtrace->format_data);
839        }
840       
841        return 0;
842}
843
844static int linuxnative_fin_output(libtrace_out_t *libtrace)
845{
846        close(DATAOUT(libtrace)->fd);
847        DATAOUT(libtrace)->fd=-1;
848        free(libtrace->format_data);
849        return 0;
850}
851static int linuxring_fin_output(libtrace_out_t *libtrace)
852{
853        /* Make sure any remaining frames get sent */
854        sendto(DATAOUT(libtrace)->fd, 
855                NULL, 
856                0, 
857                0, 
858                (void *) &DATAOUT(libtrace)->sock_hdr, 
859                sizeof(DATAOUT(libtrace)->sock_hdr));
860
861        /* Unmap our data area */
862        munmap(DATAOUT(libtrace)->tx_ring,
863                DATAOUT(libtrace)->req.tp_block_size * 
864                        DATAOUT(libtrace)->req.tp_block_nr);
865
866        return linuxnative_fin_output(libtrace);
867}
868
869/* Compiles a libtrace BPF filter for use with a linux native socket */
870static int linuxnative_configure_bpf(libtrace_t *libtrace, 
871                libtrace_filter_t *filter) {
872#ifdef HAVE_LIBPCAP
873        struct ifreq ifr;
874        unsigned int arphrd;
875        libtrace_dlt_t dlt;
876        libtrace_filter_t *f;
877        int sock;
878        pcap_t *pcap;
879
880        /* Take a copy of the filter object as it was passed in */
881        f = (libtrace_filter_t *) malloc(sizeof(libtrace_filter_t));
882        memcpy(f, filter, sizeof(libtrace_filter_t));
883       
884        /* If we are passed a filter with "flag" set to zero, then we must
885         * compile the filterstring before continuing. This involves
886         * determining the linktype, passing the filterstring to libpcap to
887         * compile, and saving the result for trace_start() to push into the
888         * kernel.
889         * If flag is set to one, then the filter was probably generated using
890         * trace_create_filter_from_bytecode() and so we don't need to do
891         * anything (we've just copied it above).
892         */
893        if (f->flag == 0) {
894                sock = socket(PF_INET, SOCK_STREAM, 0);
895                memset(&ifr, 0, sizeof(struct ifreq));
896                strncpy(ifr.ifr_name, libtrace->uridata, IF_NAMESIZE);
897                if (ioctl(sock, SIOCGIFHWADDR, &ifr) != 0) {
898                        perror("Can't get HWADDR for interface");
899                        return -1;
900                }
901                close(sock);
902
903                arphrd = ifr.ifr_hwaddr.sa_family;
904                dlt = libtrace_to_pcap_dlt(arphrd_type_to_libtrace(arphrd));
905
906                pcap = pcap_open_dead(dlt, 
907                                FORMAT(libtrace->format_data)->snaplen);
908
909                if (pcap_compile(pcap, &f->filter, f->filterstring, 0, 0) == -1) {
910                        /* Filter didn't compile, set flag to 0 so we can
911                         * detect this when trace_start() is called and
912                         * produce a useful error
913                         */
914                        f->flag = 0;
915                        trace_set_err(libtrace, TRACE_ERR_INIT_FAILED, 
916                                        "Failed to compile BPF filter (%s): %s",
917                                        f->filterstring, pcap_geterr(pcap));
918                } else {
919                        /* Set the "flag" to indicate that the filterstring
920                         * has been compiled
921                         */
922                        f->flag = 1;
923                }
924
925                pcap_close(pcap);
926               
927        }
928       
929        if (FORMAT(libtrace->format_data)->filter != NULL)
930                free(FORMAT(libtrace->format_data)->filter);
931       
932        FORMAT(libtrace->format_data)->filter = f;
933       
934        return 0;
935#else
936        return -1
937#endif
938}
939static int linuxnative_config_input(libtrace_t *libtrace,
940                trace_option_t option,
941                void *data)
942{
943        switch(option) {
944                case TRACE_OPTION_SNAPLEN:
945                        FORMAT(libtrace->format_data)->snaplen=*(int*)data;
946                        return 0;
947                case TRACE_OPTION_PROMISC:
948                        FORMAT(libtrace->format_data)->promisc=*(int*)data;
949                        return 0;
950                case TRACE_OPTION_FILTER:
951                        return linuxnative_configure_bpf(libtrace, 
952                                        (libtrace_filter_t *) data);
953                case TRACE_OPTION_META_FREQ:
954                        /* No meta-data for this format */
955                        break;
956                case TRACE_OPTION_EVENT_REALTIME:
957                        /* Live captures are always going to be in trace time */
958                        break;
959                /* Avoid default: so that future options will cause a warning
960                 * here to remind us to implement it, or flag it as
961                 * unimplementable
962                 */
963        }
964       
965        /* Don't set an error - trace_config will try to deal with the
966         * option and will set an error if it fails */
967        return -1;
968}
969#endif /* HAVE_NETPACKET_PACKET_H */
970
971
972static int linuxnative_pconfig_input(libtrace_t *libtrace,
973                trace_parallel_option_t option,
974                void *data)
975{
976        switch(option) {
977                case TRACE_OPTION_SET_HASHER:
978                        switch (*((enum hasher_types *)data)) {
979                                case HASHER_BALANCE:
980                                        // Do fanout
981                                        FORMAT(libtrace->format_data)->fanout_flags = PACKET_FANOUT_LB;
982                                        // Or we could balance to the CPU
983                                        return 0;
984                                case HASHER_BIDIRECTIONAL:
985                                case HASHER_UNIDIRECTIONAL:
986                                        FORMAT(libtrace->format_data)->fanout_flags = PACKET_FANOUT_HASH;
987                                        return 0;
988                                case HASHER_CUSTOM:
989                                case HASHER_HARDWARE:
990                                        return -1;
991                        }
992                        break;
993                /* Avoid default: so that future options will cause a warning
994                 * here to remind us to implement it, or flag it as
995                 * unimplementable
996                 */
997        }
998       
999        /* Don't set an error - trace_config will try to deal with the
1000         * option and will set an error if it fails */
1001        return -1;
1002}
1003
1004
1005static int linuxnative_prepare_packet(libtrace_t *libtrace UNUSED, 
1006                libtrace_packet_t *packet, void *buffer, 
1007                libtrace_rt_types_t rt_type, uint32_t flags) {
1008
1009        if (packet->buffer != buffer &&
1010                        packet->buf_control == TRACE_CTRL_PACKET) {
1011                free(packet->buffer);
1012        }
1013
1014        if ((flags & TRACE_PREP_OWN_BUFFER) == TRACE_PREP_OWN_BUFFER) {
1015                packet->buf_control = TRACE_CTRL_PACKET;
1016        } else
1017                packet->buf_control = TRACE_CTRL_EXTERNAL;
1018
1019
1020        packet->buffer = buffer;
1021        packet->header = buffer;
1022        packet->payload = (char *)buffer + 
1023                sizeof(struct libtrace_linuxnative_header);
1024        packet->type = rt_type;
1025
1026        /*
1027        if (libtrace->format_data == NULL) {
1028                if (linuxnative_init_input(libtrace))
1029                        return -1;
1030        }
1031        */
1032        return 0;
1033       
1034}
1035
1036static int linuxring_prepare_packet(libtrace_t *libtrace UNUSED, 
1037                libtrace_packet_t *packet, void *buffer, 
1038                libtrace_rt_types_t rt_type, uint32_t flags) {
1039
1040        if (packet->buffer != buffer &&
1041                        packet->buf_control == TRACE_CTRL_PACKET) {
1042                free(packet->buffer);
1043        }
1044
1045        if ((flags & TRACE_PREP_OWN_BUFFER) == TRACE_PREP_OWN_BUFFER) {
1046                packet->buf_control = TRACE_CTRL_PACKET;
1047        } else
1048                packet->buf_control = TRACE_CTRL_EXTERNAL;
1049
1050
1051        packet->buffer = buffer;
1052        packet->header = buffer;
1053        packet->payload = (char *)buffer + 
1054                                        TP_TRACE_START(
1055                                        TO_TP_HDR(packet->header)->tp_mac, 
1056                                        TO_TP_HDR(packet->header)->tp_net, 
1057                                        TPACKET_HDRLEN);
1058        packet->type = rt_type;
1059
1060        /*
1061        if (libtrace->format_data == NULL) {
1062                if (linuxnative_init_input(libtrace))
1063                        return -1;
1064        }
1065        */
1066        return 0;
1067       
1068}
1069
1070#define LIBTRACE_MIN(a,b) ((a)<(b) ? (a) : (b))
1071
1072/* 20 isn't enough on x86_64 */
1073#define CMSG_BUF_SIZE 128
1074
1075#ifdef HAVE_NETPACKET_PACKET_H
1076libtrace_thread_t * get_thread_table(libtrace_t *libtrace) ;
1077inline static int linuxnative_read_packet_fd(libtrace_t *libtrace, libtrace_packet_t *packet, int fd, const int check_queue) 
1078{
1079        struct libtrace_linuxnative_header *hdr;
1080        struct msghdr msghdr;
1081        struct iovec iovec;
1082        unsigned char controlbuf[CMSG_BUF_SIZE];
1083        struct cmsghdr *cmsg;
1084        int snaplen;
1085
1086        uint32_t flags = 0;
1087        fd_set readfds;
1088        struct timeval tout;
1089        int ret;
1090       
1091        if (!packet->buffer || packet->buf_control == TRACE_CTRL_EXTERNAL) {
1092                packet->buffer = malloc((size_t)LIBTRACE_PACKET_BUFSIZE);
1093                if (!packet->buffer) {
1094                        perror("Cannot allocate buffer");
1095                }
1096        }
1097
1098        flags |= TRACE_PREP_OWN_BUFFER;
1099       
1100        packet->type = TRACE_RT_DATA_LINUX_NATIVE;
1101
1102        hdr=(struct libtrace_linuxnative_header*)packet->buffer;
1103        snaplen=LIBTRACE_MIN(
1104                        (int)LIBTRACE_PACKET_BUFSIZE-(int)sizeof(*hdr),
1105                        (int)FORMAT(libtrace->format_data)->snaplen);
1106
1107        /* Prepare the msghdr and iovec for the kernel to write the
1108         * captured packet into. The msghdr will point to the part of our
1109         * buffer reserved for sll header, while the iovec will point at
1110         * the buffer following the sll header. */
1111
1112        msghdr.msg_name = &hdr->hdr;
1113        msghdr.msg_namelen = sizeof(struct sockaddr_ll);
1114
1115        msghdr.msg_iov = &iovec;
1116        msghdr.msg_iovlen = 1;
1117
1118        msghdr.msg_control = &controlbuf;
1119        msghdr.msg_controllen = CMSG_BUF_SIZE;
1120        msghdr.msg_flags = 0;
1121
1122        iovec.iov_base = (void*)(packet->buffer+sizeof(*hdr));
1123        iovec.iov_len = snaplen;
1124       
1125        if (check_queue) {
1126                // Check for a packet - TODO only Linux has MSG_DONTWAIT should use fctl O_NONBLOCK
1127                hdr->wirelen = recvmsg(fd, &msghdr, MSG_DONTWAIT | MSG_TRUNC);
1128                if ((int) hdr->wirelen == -1 && (errno == EAGAIN || errno == EWOULDBLOCK)) {
1129                        // Do message queue check or select
1130                        int ret;
1131                        fd_set rfds;
1132                        FD_ZERO(&rfds);
1133                        FD_SET(fd, &rfds);
1134                        FD_SET(get_thread_table(libtrace)->messages.pipefd[0], &rfds);
1135                        int largestfd = fd > get_thread_table(libtrace)->messages.pipefd[0] ? fd : get_thread_table(libtrace)->messages.pipefd[0];
1136                        do {
1137                                ret = select(largestfd+1, &rfds, NULL, NULL, NULL);
1138                                if (ret == -1 && errno != EINTR)
1139                                        perror("Select() failed");
1140                        }
1141                        while (ret == -1);
1142                       
1143                        assert (ret == 1 || ret == 2); // No timeout 0 is not an option
1144                       
1145                        if (FD_ISSET(get_thread_table(libtrace)->messages.pipefd[0], &rfds)) {
1146                                // Not an error but check the message queue we have something
1147                                return -2;
1148                        }
1149                        // Otherwise we must have a packet
1150                        hdr->wirelen = recvmsg(fd, &msghdr, MSG_TRUNC);
1151                }
1152        } else {
1153        /* Use select to allow us to time out occasionally to check if someone
1154         * has hit Ctrl-C or otherwise wants us to stop reading and return
1155         * so they can exit their program.
1156         */
1157
1158        while (1) {
1159                tout.tv_sec = 0;
1160                tout.tv_usec = 500000;
1161                FD_ZERO(&readfds);
1162                FD_SET(FORMAT(libtrace->format_data)->fd, &readfds);
1163
1164                ret = select(FORMAT(libtrace->format_data)->fd + 1, &readfds,
1165                                NULL, NULL, &tout);
1166                if (ret < 0 && errno != EINTR) {
1167                        trace_set_err(libtrace, errno, "select");
1168                        return -1;
1169                } else if (ret < 0) {
1170                        continue;
1171                } 
1172               
1173                if (FD_ISSET(FORMAT(libtrace->format_data)->fd, &readfds)) {
1174                        /* There's something available for us to read */
1175                        break;
1176                }
1177
1178               
1179                /* If we get here, we timed out -- check if we should halt */
1180                if (libtrace_halt)
1181                        return 0;
1182        }
1183        hdr->wirelen = recvmsg(FORMAT(libtrace->format_data)->fd, &msghdr, MSG_TRUNC);
1184        }
1185
1186                       
1187                       
1188       
1189        if (hdr->wirelen==~0U) {
1190                trace_set_err(libtrace,errno,"recvmsg");
1191                return -1;
1192        }
1193
1194        hdr->caplen=LIBTRACE_MIN((unsigned int)snaplen,(unsigned int)hdr->wirelen);
1195
1196        /* Extract the timestamps from the msghdr and store them in our
1197         * linux native encapsulation, so that we can preserve the formatting
1198         * across multiple architectures */
1199
1200        for (cmsg = CMSG_FIRSTHDR(&msghdr);
1201                        cmsg != NULL;
1202                        cmsg = CMSG_NXTHDR(&msghdr, cmsg)) {
1203                if (cmsg->cmsg_level == SOL_SOCKET
1204                        && cmsg->cmsg_type == SO_TIMESTAMP
1205                        && cmsg->cmsg_len <= CMSG_LEN(sizeof(struct timeval))) {
1206                       
1207                        struct timeval *tv;
1208                        tv = (struct timeval *)CMSG_DATA(cmsg);
1209                       
1210                       
1211                        hdr->tv.tv_sec = tv->tv_sec;
1212                        hdr->tv.tv_usec = tv->tv_usec;
1213                        hdr->timestamptype = TS_TIMEVAL;
1214                        break;
1215                } 
1216#ifdef SO_TIMESTAMPNS
1217                else if (cmsg->cmsg_level == SOL_SOCKET
1218                        && cmsg->cmsg_type == SO_TIMESTAMPNS
1219                        && cmsg->cmsg_len <= CMSG_LEN(sizeof(struct timespec))) {
1220
1221                        struct timespec *tv;
1222                        tv = (struct timespec *)CMSG_DATA(cmsg);
1223
1224                        hdr->ts.tv_sec = tv->tv_sec;
1225                        hdr->ts.tv_nsec = tv->tv_nsec;
1226                        hdr->timestamptype = TS_TIMESPEC;
1227                        break;
1228                }
1229#endif
1230        }
1231
1232        /* Did we not get given a timestamp? Try to get one from the
1233         * file descriptor directly */
1234        if (cmsg == NULL) {
1235                struct timeval tv;
1236                if (ioctl(fd, SIOCGSTAMP,&tv)==0) {
1237                        hdr->tv.tv_sec = tv.tv_sec;
1238                        hdr->tv.tv_usec = tv.tv_usec;
1239                        hdr->timestamptype = TS_TIMEVAL;
1240                }
1241                else {
1242                        hdr->timestamptype = TS_NONE;
1243                }
1244        }
1245
1246        /* Buffer contains all of our packet (including our custom header) so
1247         * we just need to get prepare_packet to set all our packet pointers
1248         * appropriately */
1249       
1250        if (linuxnative_prepare_packet(libtrace, packet, packet->buffer,
1251                                packet->type, flags))
1252                return -1;
1253       
1254        return hdr->wirelen+sizeof(*hdr);
1255}
1256
1257static int linuxnative_read_packet(libtrace_t *libtrace, libtrace_packet_t *packet) 
1258{
1259        int fd = FORMAT(libtrace->format_data)->fd;
1260        return linuxnative_read_packet_fd(libtrace, packet, fd, 0);
1261}
1262
1263static int linuxnative_pread_packets(libtrace_t *libtrace,
1264                                     libtrace_thread_t *t,
1265                                     libtrace_packet_t **packets,
1266                                     UNUSED size_t nb_packets) {
1267        /* For now just read one packet */
1268        int fd = PERPKT_FORMAT(t)->fd;
1269        packets[0]->error = linuxnative_read_packet_fd(libtrace, packets[0],
1270                                                       fd, 1);
1271        if (packets[0]->error >= 1)
1272                return 1;
1273        else
1274                return packets[0]->error;
1275}
1276
1277#define LIBTRACE_BETWEEN(test,a,b) ((test) >= (a) && (test) < (b))
1278static int linuxring_get_capture_length(const libtrace_packet_t *packet);
1279static int linuxring_get_framing_length(const libtrace_packet_t *packet);
1280
1281/* Release a frame back to the kernel or free() if it's a malloc'd buffer
1282 */
1283inline static void ring_release_frame(libtrace_t *libtrace, libtrace_packet_t *packet){
1284        /* Free the old packet */
1285        if(packet->buffer == NULL)
1286                return;
1287
1288        if(packet->buf_control == TRACE_CTRL_PACKET){
1289                free(packet->buffer);
1290                packet->buffer = NULL;
1291        }
1292        if(packet->buf_control == TRACE_CTRL_EXTERNAL) {
1293                struct linux_format_data_t *ftd = FORMAT(libtrace->format_data);
1294               
1295                /* Check it's within our buffer first - consider the pause resume case it might have already been free'd lets hope we get another buffer */
1296                // For now let any one free anything
1297                /*if(LIBTRACE_BETWEEN((char *) packet->buffer,
1298                                (char *) ftd->rx_ring,
1299                                ftd->rx_ring
1300                                + ftd->req.tp_block_size * ftd->req.tp_block_nr)){*/
1301                        TO_TP_HDR(packet->buffer)->tp_status = 0;
1302                        packet->buffer = NULL;
1303                /*}*/
1304        }
1305}
1306
1307/**
1308 * Free any resources being kept for this packet, Note: libtrace
1309 * will ensure all fields are zeroed correctly.
1310 */
1311static void linuxring_fin_packet(libtrace_packet_t *packet)
1312{
1313
1314        if (packet->buffer == NULL)
1315                return;
1316        assert(packet->trace);
1317       
1318        // Started should always match the existence of the rx_ring
1319        assert(!!FORMAT(packet->trace->format_data)->rx_ring == !!packet->trace->started);
1320       
1321        // Our packets are always under our control
1322        assert(packet->buf_control == TRACE_CTRL_EXTERNAL);
1323       
1324        if (FORMAT(packet->trace->format_data)->rx_ring) // If we don't have a ring its already been destroyed or paused
1325                ring_release_frame(packet->trace, packet);
1326        else
1327                packet->buffer = NULL;
1328}
1329
1330inline static int linuxring_read_packet_fd(libtrace_t *libtrace, libtrace_packet_t *packet, int fd, int *rxring_offset, char *rx_ring, int message) {
1331
1332        struct tpacket2_hdr *header;
1333        int ret;
1334        unsigned int snaplen;
1335       
1336        ring_release_frame(libtrace, packet);
1337       
1338        packet->buf_control = TRACE_CTRL_EXTERNAL;
1339        packet->type = TRACE_RT_DATA_LINUX_RING;
1340       
1341        /* Fetch the current frame */
1342        header = ((void*) rx_ring) + *rxring_offset * FORMAT(libtrace->format_data)->req.tp_frame_size; // GET_CURRENT_BUFFER(libtrace);
1343        assert((((unsigned long) header) & (pagesize - 1)) == 0);
1344
1345        /* TP_STATUS_USER means that we can use the frame.
1346         * When a slot does not have this flag set, the frame is not
1347         * ready for consumption.
1348         */
1349        while (!(header->tp_status & TP_STATUS_USER)) {
1350                if (message) {
1351                        struct pollfd pollset[2];
1352                        pollset[0].fd = fd;
1353                        pollset[0].events = POLLIN;
1354                        pollset[0].revents = 0;
1355                        pollset[1].fd = libtrace_message_queue_get_fd(&get_thread_table(libtrace)->messages);
1356                        pollset[1].events = POLLIN;
1357                        pollset[1].revents = 0;
1358                        /* Wait for more data or a message*/
1359                        ret = poll(pollset, 2, -1);
1360                        if (ret < 0) {
1361                                if (errno != EINTR)
1362                                        trace_set_err(libtrace,errno,"poll()");
1363                                return -1;
1364                        }
1365                        /* A message is ready */
1366                        if (pollset[1].revents)
1367                                return -2;
1368                } else {
1369                        struct pollfd pollset;
1370                        pollset.fd = fd;
1371                        pollset.events = POLLIN;
1372                        pollset.revents = 0;
1373
1374                        /* Wait for more data or a message*/
1375                        ret = poll(&pollset, 1, 500);
1376                        if (ret < 0) {
1377                                if (errno != EINTR)
1378                                        trace_set_err(libtrace,errno,"poll()");
1379                                return -1;
1380                        } else if (ret == 0) {
1381                                /* Poll timed out - check if we should exit */
1382                                if (libtrace_halt)
1383                                        return 0;
1384                                continue;
1385                        }
1386                }
1387        }
1388
1389        packet->buffer = header;
1390
1391        /* If a snaplen was configured, automatically truncate the packet to
1392         * the desired length.
1393         */
1394        snaplen=LIBTRACE_MIN(
1395                        (int)LIBTRACE_PACKET_BUFSIZE-(int)sizeof(*header),
1396                        (int)FORMAT(libtrace->format_data)->snaplen);
1397       
1398        TO_TP_HDR(packet->buffer)->tp_snaplen = LIBTRACE_MIN((unsigned int)snaplen, TO_TP_HDR(packet->buffer)->tp_len);
1399
1400        /* Move to next buffer */
1401        (*rxring_offset)++;
1402        *rxring_offset %= FORMAT(libtrace->format_data)->req.tp_frame_nr;
1403
1404        /* We just need to get prepare_packet to set all our packet pointers
1405         * appropriately */
1406        if (linuxring_prepare_packet(libtrace, packet, packet->buffer,
1407                                packet->type, 0))
1408                return -1;
1409        return  linuxring_get_framing_length(packet) + 
1410                                linuxring_get_capture_length(packet);
1411
1412}
1413
1414static int linuxring_read_packet(libtrace_t *libtrace, libtrace_packet_t *packet) {
1415        int fd = FORMAT(libtrace->format_data)->fd;
1416        int *rxring_offset = &FORMAT(libtrace->format_data)->rxring_offset;
1417        char *rx_ring = FORMAT(libtrace->format_data)->rx_ring;
1418        return linuxring_read_packet_fd(libtrace, packet, fd, rxring_offset, rx_ring, 0);
1419}
1420
1421static int linuxring_pread_packets(libtrace_t *libtrace,
1422                                   libtrace_thread_t *t,
1423                                   libtrace_packet_t **packets,
1424                                   UNUSED size_t nb_packets) {
1425        //fprintf(stderr, "Thread number is #%d\n", t->perpkt_num);
1426        int fd = PERPKT_FORMAT(t)->fd;
1427        int *rxring_offset = &PERPKT_FORMAT(t)->rxring_offset;
1428        char *rx_ring = PERPKT_FORMAT(t)->rx_ring;
1429        packets[0]->error = linuxring_read_packet_fd(libtrace, packets[0], fd,
1430                                                     rxring_offset, rx_ring, 1);
1431        if (packets[0]->error >= 1)
1432                return 1;
1433        else
1434                return packets[0]->error;
1435}
1436
1437/* Non-blocking read */
1438static libtrace_eventobj_t linuxring_event(libtrace_t *libtrace, libtrace_packet_t *packet) {
1439        struct tpacket2_hdr *header;
1440        libtrace_eventobj_t event = {0,0,0.0,0};
1441
1442        /* We must free the old packet, otherwise select() will instantly return
1443         */
1444        ring_release_frame(libtrace, packet);
1445
1446        /* Fetch the current frame */
1447        header = GET_CURRENT_BUFFER(libtrace);
1448        if(header->tp_status & TP_STATUS_USER){
1449                /* We have a frame waiting */
1450                event.size = trace_read_packet(libtrace, packet);
1451                event.type = TRACE_EVENT_PACKET;
1452        } else {
1453                /* Ok we don't have a packet waiting */
1454                event.type = TRACE_EVENT_IOWAIT;
1455                event.fd = FORMAT(libtrace->format_data)->fd;
1456        }
1457
1458        return event;
1459}
1460
1461
1462static int linuxnative_write_packet(libtrace_out_t *trace, 
1463                libtrace_packet_t *packet) 
1464{
1465        struct sockaddr_ll hdr;
1466        int ret = 0;
1467
1468        if (trace_get_link_type(packet) == TRACE_TYPE_NONDATA)
1469                return 0;
1470
1471        hdr.sll_family = AF_PACKET;
1472        hdr.sll_protocol = 0;
1473        hdr.sll_ifindex = if_nametoindex(trace->uridata);
1474        hdr.sll_hatype = 0;
1475        hdr.sll_pkttype = 0;
1476        hdr.sll_halen = htons(6); /* FIXME */
1477        memcpy(hdr.sll_addr,packet->payload,(size_t)ntohs(hdr.sll_halen));
1478
1479        /* This is pretty easy, just send the payload using sendto() (after
1480         * setting up the sll header properly, of course) */
1481        ret = sendto(DATAOUT(trace)->fd,
1482                        packet->payload,
1483                        trace_get_capture_length(packet),
1484                        0,
1485                        (struct sockaddr*)&hdr, (socklen_t)sizeof(hdr));
1486
1487        if (ret < 0) {
1488                trace_set_err_out(trace, errno, "sendto failed");
1489        }
1490
1491        return ret;
1492}
1493
1494static int linuxring_write_packet(libtrace_out_t *trace, 
1495                libtrace_packet_t *packet)
1496{
1497        struct tpacket2_hdr *header;
1498        struct pollfd pollset;
1499        struct socket_addr;
1500        int ret; 
1501        unsigned max_size;
1502        void * off;
1503
1504        if (trace_get_link_type(packet) == TRACE_TYPE_NONDATA)
1505                return 0;
1506
1507        max_size = DATAOUT(trace)->req.tp_frame_size - 
1508                 - TPACKET_HDRLEN + sizeof(struct sockaddr_ll);
1509
1510        header = (void *) DATAOUT(trace)->tx_ring + 
1511        (DATAOUT(trace)->txring_offset * DATAOUT(trace)->req.tp_frame_size);
1512
1513        while(header->tp_status != TP_STATUS_AVAILABLE){
1514                /* if none available: wait on more data */
1515                pollset.fd = DATAOUT(trace)->fd;
1516                pollset.events = POLLOUT;
1517                pollset.revents = 0;
1518                ret = poll(&pollset, 1, 1000);
1519                if (ret < 0 && errno != EINTR) {
1520                        perror("poll");
1521                        return -1;
1522                }
1523                if(ret == 0) 
1524                        /* Timeout something has gone wrong - maybe the queue is
1525                         * to large so try issue another send command
1526                         */
1527                        ret = sendto(DATAOUT(trace)->fd, 
1528                                NULL, 
1529                                0, 
1530                                0, 
1531                                (void *) &DATAOUT(trace)->sock_hdr, 
1532                                sizeof(DATAOUT(trace)->sock_hdr));
1533                        if (ret < 0) {
1534                                trace_set_err_out(trace, errno, 
1535                                                "sendto after timeout failed");
1536                                return -1;
1537                        }
1538        }
1539       
1540        header->tp_len = trace_get_capture_length(packet);
1541
1542        /* We cannot write the whole packet so just write part of it */
1543        if (header->tp_len > max_size)
1544                header->tp_len = max_size;
1545
1546        /* Fill packet - no sockaddr_ll in header when writing to the TX_RING */
1547        off = ((void *) header) + (TPACKET_HDRLEN - sizeof(struct sockaddr_ll));
1548        memcpy(off, 
1549                (char *) packet->payload, 
1550                header->tp_len);
1551       
1552        /* 'Send it' and increase ring pointer to the next frame */
1553        header->tp_status = TP_STATUS_SEND_REQUEST;
1554        DATAOUT(trace)->txring_offset = (DATAOUT(trace)->txring_offset + 1) % 
1555                                                DATAOUT(trace)->req.tp_frame_nr;
1556
1557        /* Notify kernel there are frames to send */
1558        DATAOUT(trace)->queue ++;
1559        DATAOUT(trace)->queue %= TX_MAX_QUEUE;
1560        if(DATAOUT(trace)->queue == 0){
1561                ret = sendto(DATAOUT(trace)->fd, 
1562                                NULL, 
1563                                0, 
1564                                MSG_DONTWAIT, 
1565                                (void *) &DATAOUT(trace)->sock_hdr, 
1566                                sizeof(DATAOUT(trace)->sock_hdr));
1567                if (ret < 0) {
1568                        trace_set_err_out(trace, errno, "sendto failed");
1569                        return -1;
1570                }
1571        }
1572        return header->tp_len;
1573
1574}
1575#endif /* HAVE_NETPACKET_PACKET_H */
1576
1577static inline libtrace_linktype_t get_libtrace_link_type(uint16_t linktype){
1578        /* Convert the ARPHRD type into an appropriate libtrace link type */
1579        switch (linktype) {
1580                case LIBTRACE_ARPHRD_ETHER:
1581                case LIBTRACE_ARPHRD_LOOPBACK:
1582                        return TRACE_TYPE_ETH;
1583                case LIBTRACE_ARPHRD_PPP:
1584                        return TRACE_TYPE_NONE;
1585                case LIBTRACE_ARPHRD_IEEE80211_RADIOTAP:
1586                        return TRACE_TYPE_80211_RADIO;
1587                case LIBTRACE_ARPHRD_IEEE80211:
1588                        return TRACE_TYPE_80211;
1589                case LIBTRACE_ARPHRD_SIT:
1590                case LIBTRACE_ARPHRD_NONE:
1591                        return TRACE_TYPE_NONE;
1592                default: /* shrug, beyond me! */
1593                        printf("unknown Linux ARPHRD type 0x%04x\n",linktype);
1594                        return (libtrace_linktype_t)~0U;
1595        }
1596}
1597static libtrace_linktype_t linuxnative_get_link_type(const struct libtrace_packet_t *packet) {
1598        uint16_t linktype=(((struct libtrace_linuxnative_header*)(packet->buffer))
1599                                ->hdr.sll_hatype);
1600        return get_libtrace_link_type(linktype);
1601}
1602static libtrace_linktype_t linuxring_get_link_type(const struct libtrace_packet_t *packet) {
1603        uint16_t linktype= GET_SOCKADDR_HDR(packet->buffer)->sll_hatype;
1604        return get_libtrace_link_type(linktype);
1605}
1606
1607static inline libtrace_direction_t get_libtrace_direction(uint8_t pkttype){
1608        switch (pkttype) {
1609                case PACKET_OUTGOING:
1610                case PACKET_LOOPBACK:
1611                        return TRACE_DIR_OUTGOING;
1612                case PACKET_OTHERHOST:
1613                        return TRACE_DIR_OTHER;
1614                default:
1615                        return TRACE_DIR_INCOMING;
1616        }
1617}
1618static libtrace_direction_t linuxnative_get_direction(const struct libtrace_packet_t *packet) {
1619        return get_libtrace_direction(((struct libtrace_linuxnative_header*)(packet->buffer))->hdr.sll_pkttype);
1620}
1621static libtrace_direction_t linuxring_get_direction(const struct libtrace_packet_t *packet) {
1622        return get_libtrace_direction(GET_SOCKADDR_HDR(packet->buffer)->sll_pkttype);
1623}
1624
1625static libtrace_direction_t set_direction(struct sockaddr_ll * skadr, libtrace_direction_t direction){
1626        switch (direction) {
1627                case TRACE_DIR_OUTGOING:
1628                        skadr->sll_pkttype = PACKET_OUTGOING;
1629                        return TRACE_DIR_OUTGOING;
1630                case TRACE_DIR_INCOMING:
1631                        skadr->sll_pkttype = PACKET_HOST;
1632                        return TRACE_DIR_INCOMING;
1633                case TRACE_DIR_OTHER:
1634                        skadr->sll_pkttype = PACKET_OTHERHOST;
1635                        return TRACE_DIR_OTHER;
1636                default:
1637                        return -1;
1638        }
1639}
1640static libtrace_direction_t linuxnative_set_direction(
1641                libtrace_packet_t *packet,
1642                libtrace_direction_t direction) {
1643        return set_direction(&((struct libtrace_linuxnative_header*)(packet->buffer))->hdr, direction);
1644}
1645static libtrace_direction_t linuxring_set_direction(
1646                libtrace_packet_t *packet,
1647                libtrace_direction_t direction) {
1648        return set_direction(GET_SOCKADDR_HDR(packet->buffer), direction);
1649}
1650
1651static struct timespec linuxnative_get_timespec(const libtrace_packet_t *packet) 
1652{
1653        struct libtrace_linuxnative_header *hdr = 
1654                (struct libtrace_linuxnative_header*) packet->buffer;
1655        /* We have to upconvert from timeval to timespec */
1656        if (hdr->timestamptype == TS_TIMEVAL) {
1657                struct timespec ts;
1658                ts.tv_sec = hdr->tv.tv_sec;
1659                ts.tv_nsec = hdr->tv.tv_usec*1000;
1660                return ts;
1661        }
1662        else {
1663                struct timespec ts;
1664                ts.tv_sec = hdr->ts.tv_sec;
1665                ts.tv_nsec = hdr->ts.tv_nsec;
1666                return ts;
1667        }
1668}
1669static struct timespec linuxring_get_timespec(const libtrace_packet_t *packet) 
1670{
1671        struct timespec ts;
1672        ts.tv_sec = TO_TP_HDR(packet->buffer)->tp_sec;
1673        ts.tv_nsec = TO_TP_HDR(packet->buffer)->tp_nsec;
1674        return ts;
1675}
1676
1677
1678static struct timeval linuxnative_get_timeval(const libtrace_packet_t *packet) 
1679{
1680        struct libtrace_linuxnative_header *hdr = 
1681                (struct libtrace_linuxnative_header*) packet->buffer;
1682        /* We have to downconvert from timespec to timeval */
1683        if (hdr->timestamptype == TS_TIMESPEC) {
1684                struct timeval tv;
1685                tv.tv_sec = hdr->ts.tv_sec;
1686                tv.tv_usec = hdr->ts.tv_nsec/1000;
1687                return tv;
1688        }
1689        else {
1690                struct timeval tv;
1691                tv.tv_sec = hdr->tv.tv_sec;
1692                tv.tv_usec = hdr->tv.tv_usec;
1693                return tv;
1694        }
1695}
1696static struct timeval linuxring_get_timeval(const libtrace_packet_t *packet) 
1697{
1698        struct timeval tv;
1699        tv.tv_sec = TO_TP_HDR(packet->buffer)->tp_sec;
1700        tv.tv_usec = TO_TP_HDR(packet->buffer)->tp_nsec / 1000;
1701        return tv;
1702}
1703
1704static int linuxnative_get_capture_length(const libtrace_packet_t *packet)
1705{
1706        return ((struct libtrace_linuxnative_header*)(packet->buffer))->caplen;
1707}
1708
1709static int linuxring_get_capture_length(const libtrace_packet_t *packet)
1710{
1711        return TO_TP_HDR(packet->buffer)->tp_snaplen;
1712}
1713
1714static int linuxnative_get_wire_length(const libtrace_packet_t *packet) 
1715{
1716
1717        int wirelen = ((struct libtrace_linuxnative_header*)(packet->buffer))->wirelen;
1718
1719        /* Include the missing FCS */
1720        if (trace_get_link_type(packet) == TRACE_TYPE_ETH)
1721                wirelen += 4;
1722
1723        return wirelen;
1724}
1725
1726static int linuxring_get_wire_length(const libtrace_packet_t *packet) 
1727{
1728        int wirelen = TO_TP_HDR(packet->buffer)->tp_len;
1729
1730        /* Include the missing FCS */
1731        if (trace_get_link_type(packet) == TRACE_TYPE_ETH)
1732                wirelen += 4;
1733
1734        return wirelen;
1735}
1736
1737static int linuxnative_get_framing_length(UNUSED
1738                const libtrace_packet_t *packet) 
1739{
1740        return sizeof(struct libtrace_linuxnative_header);
1741}
1742
1743static int linuxring_get_framing_length(const libtrace_packet_t *packet)
1744{       
1745        /*
1746         * Need to make frame_length + capture_length = complete capture length
1747         * so include alligment whitespace. So reverse calculate from packet.
1748         */
1749        return (char *) packet->payload - (char *) packet->buffer;
1750}
1751
1752static size_t linuxnative_set_capture_length(libtrace_packet_t *packet, 
1753                size_t size) {
1754
1755        struct libtrace_linuxnative_header *linux_hdr = NULL;
1756        assert(packet);
1757        if (size > trace_get_capture_length(packet)) {
1758                /* We should avoid making a packet larger */
1759                return trace_get_capture_length(packet);
1760        }
1761       
1762        /* Reset the cached capture length */
1763        packet->capture_length = -1;
1764
1765        linux_hdr = (struct libtrace_linuxnative_header *)packet->header;
1766        linux_hdr->caplen = size;
1767        return trace_get_capture_length(packet);
1768}
1769
1770static size_t linuxring_set_capture_length(libtrace_packet_t *packet, 
1771                size_t size) {
1772        assert(packet);
1773        if (size > trace_get_capture_length(packet)) {
1774                /* We should avoid making a packet larger */
1775                return trace_get_capture_length(packet);
1776        }
1777       
1778        /* Reset the cached capture length */
1779        packet->capture_length = -1;
1780
1781        TO_TP_HDR(packet->buffer)->tp_snaplen = size;
1782
1783        return trace_get_capture_length(packet);
1784}
1785
1786static int linuxnative_get_fd(const libtrace_t *trace) {
1787        if (trace->format_data == NULL)
1788                return -1;
1789        return FORMAT(trace->format_data)->fd;
1790}
1791
1792/* Linux doesn't keep track how many packets were seen before filtering
1793 * so we can't tell how many packets were filtered.  Bugger.  So annoying.
1794 *
1795 * Since we tell libtrace that we do support filtering, if we don't declare
1796 * this here as failing, libtrace will happily report for us that it didn't
1797 * filter any packets, so don't lie -- return that we don't know.
1798 */
1799static uint64_t linuxnative_get_filtered_packets(libtrace_t *trace UNUSED) {
1800        return UINT64_MAX;
1801}
1802
1803/* Number of packets that passed filtering */
1804static uint64_t linuxnative_get_captured_packets(libtrace_t *trace) {
1805        struct tpacket_stats stats;
1806
1807        if (trace->format_data == NULL)
1808                return UINT64_MAX;
1809        if (FORMAT(trace->format_data)->fd == -1) {
1810                /* This is probably a 'dead' trace so obviously we can't query
1811                 * the socket for capture counts, can we? */
1812                return UINT64_MAX;
1813        }
1814
1815#ifdef HAVE_NETPACKET_PACKET_H
1816
1817        if ((FORMAT(trace->format_data)->stats_valid & 1)
1818                || FORMAT(trace->format_data)->stats_valid == 0) {
1819                if (FORMAT(trace->format_data)->per_thread) {
1820                        int i;
1821                        FORMAT(trace->format_data)->stats.tp_drops = 0;
1822                        FORMAT(trace->format_data)->stats.tp_packets = 0;
1823                        for (i = 0; i < trace->perpkt_thread_count; ++i) {
1824                                socklen_t len = sizeof(stats);
1825                                getsockopt(FORMAT(trace->format_data)->per_thread[i].fd,
1826                                           SOL_PACKET,
1827                                           PACKET_STATISTICS,
1828                                           &stats,
1829                                           &len);
1830                                FORMAT(trace->format_data)->stats.tp_drops += stats.tp_drops;
1831                                FORMAT(trace->format_data)->stats.tp_packets += stats.tp_packets;
1832                        }
1833                        FORMAT(trace->format_data)->stats_valid |= 1;
1834                } else {
1835                        socklen_t len = sizeof(FORMAT(trace->format_data)->stats);
1836                        getsockopt(FORMAT(trace->format_data)->fd,
1837                                   SOL_PACKET,
1838                                   PACKET_STATISTICS,
1839                                   &FORMAT(trace->format_data)->stats,
1840                                   &len);
1841                        FORMAT(trace->format_data)->stats_valid |= 1;
1842                }
1843        }
1844
1845        return FORMAT(trace->format_data)->stats.tp_packets;
1846#else
1847        return UINT64_MAX;
1848#endif
1849}
1850
1851/* Number of packets that got past filtering and were then dropped because
1852 * of lack of space
1853 */
1854static uint64_t linuxnative_get_dropped_packets(libtrace_t *trace) {
1855        struct tpacket_stats stats;
1856        if (trace->format_data == NULL)
1857                return UINT64_MAX;
1858        if (FORMAT(trace->format_data)->fd == -1) {
1859                /* This is probably a 'dead' trace so obviously we can't query
1860                 * the socket for drop counts, can we? */
1861                return UINT64_MAX;
1862        }
1863
1864#ifdef HAVE_NETPACKET_PACKET_H 
1865        if ((FORMAT(trace->format_data)->stats_valid & 2)
1866                || (FORMAT(trace->format_data)->stats_valid==0)) {
1867                if (FORMAT(trace->format_data)->per_thread) {
1868                        int i;
1869                        FORMAT(trace->format_data)->stats.tp_drops = 0;
1870                        FORMAT(trace->format_data)->stats.tp_packets = 0;
1871                        for (i = 0; i < trace->perpkt_thread_count; ++i) {
1872                                socklen_t len = sizeof(stats);
1873                                getsockopt(FORMAT(trace->format_data)->per_thread[i].fd,
1874                                           SOL_PACKET,
1875                                           PACKET_STATISTICS,
1876                                           &stats,
1877                                           &len);
1878                                FORMAT(trace->format_data)->stats.tp_drops += stats.tp_drops;
1879                                FORMAT(trace->format_data)->stats.tp_packets += stats.tp_packets;
1880                        }
1881                        FORMAT(trace->format_data)->stats_valid |= 2;
1882                } else {
1883                        socklen_t len = sizeof(FORMAT(trace->format_data)->stats);
1884                        getsockopt(FORMAT(trace->format_data)->fd,
1885                                   SOL_PACKET,
1886                                   PACKET_STATISTICS,
1887                                   &FORMAT(trace->format_data)->stats,
1888                                   &len);
1889                        FORMAT(trace->format_data)->stats_valid |= 2;
1890                }
1891        }
1892
1893        return FORMAT(trace->format_data)->stats.tp_drops;
1894#else
1895        return UINT64_MAX;
1896#endif
1897}
1898
1899#ifdef HAVE_NETPACKET_PACKET_H
1900static void linuxnative_help(void) {
1901        printf("linuxnative format module: $Revision: 1793 $\n");
1902        printf("Supported input URIs:\n");
1903        printf("\tint:eth0\n");
1904        printf("\n");
1905        printf("Supported output URIs:\n");
1906        printf("\tint:eth0\n");
1907        printf("\n");
1908        return;
1909}
1910
1911static void linuxring_help(void) {
1912        printf("linuxring format module: $Revision: 1793 $\n");
1913        printf("Supported input URIs:\n");
1914        printf("\tring:eth0\n");
1915        printf("\n");
1916        printf("Supported output URIs:\n");
1917        printf("\tring:eth0\n");
1918        printf("\n");
1919        return;
1920}
1921
1922static struct libtrace_format_t linuxnative = {
1923        "int",
1924        "$Id$",
1925        TRACE_FORMAT_LINUX_NATIVE,
1926        linuxnative_probe_filename,     /* probe filename */
1927        NULL,                           /* probe magic */
1928        linuxnative_init_input,         /* init_input */
1929        linuxnative_config_input,       /* config_input */
1930        linuxnative_start_input,        /* start_input */
1931        linuxnative_pause_input,        /* pause_input */
1932        linuxnative_init_output,        /* init_output */
1933        NULL,                           /* config_output */
1934        linuxnative_start_output,       /* start_ouput */
1935        linuxnative_fin_input,          /* fin_input */
1936        linuxnative_fin_output,         /* fin_output */
1937        linuxnative_read_packet,        /* read_packet */
1938        linuxnative_prepare_packet,     /* prepare_packet */
1939        NULL,                           /* fin_packet */
1940        linuxnative_write_packet,       /* write_packet */
1941        linuxnative_get_link_type,      /* get_link_type */
1942        linuxnative_get_direction,      /* get_direction */
1943        linuxnative_set_direction,      /* set_direction */
1944        NULL,                           /* get_erf_timestamp */
1945        linuxnative_get_timeval,        /* get_timeval */
1946        linuxnative_get_timespec,       /* get_timespec */
1947        NULL,                           /* get_seconds */
1948        NULL,                           /* seek_erf */
1949        NULL,                           /* seek_timeval */
1950        NULL,                           /* seek_seconds */
1951        linuxnative_get_capture_length, /* get_capture_length */
1952        linuxnative_get_wire_length,    /* get_wire_length */
1953        linuxnative_get_framing_length, /* get_framing_length */
1954        linuxnative_set_capture_length, /* set_capture_length */
1955        NULL,                           /* get_received_packets */
1956        linuxnative_get_filtered_packets,/* get_filtered_packets */
1957        linuxnative_get_dropped_packets,/* get_dropped_packets */
1958        linuxnative_get_captured_packets,/* get_captured_packets */
1959        linuxnative_get_fd,             /* get_fd */
1960        trace_event_device,             /* trace_event */
1961        linuxnative_help,               /* help */
1962        NULL,                                   /* next pointer */
1963        {true, -1},              /* Live, no thread limit */
1964        linuxnative_pstart_input,                       /* pstart_input */
1965        linuxnative_pread_packets,                      /* pread_packets */
1966        linuxnative_ppause_input,                       /* ppause */
1967        linuxnative_fin_input,                          /* p_fin */
1968        linuxnative_pconfig_input,                      /* pconfig input */
1969        linux_pregister_thread,
1970        NULL
1971};
1972
1973static struct libtrace_format_t linuxring = {
1974        "ring",
1975        "$Id$",
1976        TRACE_FORMAT_LINUX_RING,
1977        linuxnative_probe_filename,     /* probe filename */
1978        NULL,                           /* probe magic */
1979        linuxring_init_input,           /* init_input */
1980        linuxnative_config_input,       /* config_input */
1981        linuxring_start_input,  /* start_input */
1982        linuxring_pause_input,  /* pause_input */
1983        linuxring_init_output,  /* init_output */
1984        NULL,                           /* config_output */
1985        linuxring_start_output, /* start_ouput */
1986        linuxnative_fin_input,          /* fin_input */
1987        linuxring_fin_output,           /* fin_output */
1988        linuxring_read_packet,  /* read_packet */
1989        linuxring_prepare_packet,       /* prepare_packet */
1990        linuxring_fin_packet,                           /* fin_packet */
1991        linuxring_write_packet, /* write_packet */
1992        linuxring_get_link_type,        /* get_link_type */
1993        linuxring_get_direction,        /* get_direction */
1994        linuxring_set_direction,        /* set_direction */
1995        NULL,                           /* get_erf_timestamp */
1996        linuxring_get_timeval,  /* get_timeval */
1997        linuxring_get_timespec, /* get_timespec */
1998        NULL,                           /* get_seconds */
1999        NULL,                           /* seek_erf */
2000        NULL,                           /* seek_timeval */
2001        NULL,                           /* seek_seconds */
2002        linuxring_get_capture_length,   /* get_capture_length */
2003        linuxring_get_wire_length,      /* get_wire_length */
2004        linuxring_get_framing_length,   /* get_framing_length */
2005        linuxring_set_capture_length,   /* set_capture_length */
2006        NULL,                           /* get_received_packets */
2007        linuxnative_get_filtered_packets,/* get_filtered_packets */
2008        linuxnative_get_dropped_packets,/* get_dropped_packets */
2009        linuxnative_get_captured_packets,/* get_captured_packets */
2010        linuxnative_get_fd,             /* get_fd */
2011        linuxring_event,                /* trace_event */
2012        linuxring_help,         /* help */
2013        NULL,                           /* next pointer */
2014        {true, -1},              /* Live, no thread limit */
2015        linuxnative_pstart_input,                       /* pstart_input */
2016        linuxring_pread_packets,                        /* pread_packets */
2017        linuxnative_ppause_input,                       /* ppause */
2018        linuxnative_fin_input,                          /* p_fin */
2019        linuxnative_pconfig_input,
2020        linux_pregister_thread,
2021        NULL
2022};
2023#else
2024static void linuxnative_help(void) {
2025        printf("linuxnative format module: $Revision: 1793 $\n");
2026        printf("Not supported on this host\n");
2027}
2028static void linuxring_help(void) {
2029        printf("linuxring format module: $Revision: 1793 $\n");
2030        printf("Not supported on this host\n");
2031}
2032
2033static struct libtrace_format_t linuxnative = {
2034        "int",
2035        "$Id$",
2036        TRACE_FORMAT_LINUX_NATIVE,
2037        NULL,                           /* probe filename */
2038        NULL,                           /* probe magic */
2039        NULL,                           /* init_input */
2040        NULL,                           /* config_input */
2041        NULL,                           /* start_input */
2042        NULL,                           /* pause_input */
2043        NULL,                           /* init_output */
2044        NULL,                           /* config_output */
2045        NULL,                           /* start_ouput */
2046        NULL,                           /* fin_input */
2047        NULL,                           /* fin_output */
2048        NULL,                           /* read_packet */
2049        linuxnative_prepare_packet,     /* prepare_packet */
2050        NULL,                           /* fin_packet */
2051        NULL,                           /* write_packet */
2052        linuxnative_get_link_type,      /* get_link_type */
2053        linuxnative_get_direction,      /* get_direction */
2054        linuxnative_set_direction,      /* set_direction */
2055        NULL,                           /* get_erf_timestamp */
2056        linuxnative_get_timeval,        /* get_timeval */
2057        linuxnative_get_timespec,       /* get_timespec */
2058        NULL,                           /* get_seconds */
2059        NULL,                           /* seek_erf */
2060        NULL,                           /* seek_timeval */
2061        NULL,                           /* seek_seconds */
2062        linuxnative_get_capture_length, /* get_capture_length */
2063        linuxnative_get_wire_length,    /* get_wire_length */
2064        linuxnative_get_framing_length, /* get_framing_length */
2065        linuxnative_set_capture_length, /* set_capture_length */
2066        NULL,                           /* get_received_packets */
2067        linuxnative_get_filtered_packets,/* get_filtered_packets */
2068        linuxnative_get_dropped_packets,/* get_dropped_packets */
2069        linuxnative_get_captured_packets,/* get_captured_packets */
2070        linuxnative_get_fd,             /* get_fd */
2071        trace_event_device,             /* trace_event */
2072        linuxnative_help,               /* help */
2073        NULL,                   /* next pointer */
2074        NON_PARALLEL(true)
2075};
2076
2077static struct libtrace_format_t linuxring = {
2078        "ring",
2079        "$Id$",
2080        TRACE_FORMAT_LINUX_RING,
2081        NULL,                           /* probe filename */
2082        NULL,                           /* probe magic */
2083        NULL,                           /* init_input */
2084        NULL,                           /* config_input */
2085        NULL,                           /* start_input */
2086        NULL,                           /* pause_input */
2087        NULL,                           /* init_output */
2088        NULL,                           /* config_output */
2089        NULL,                           /* start_ouput */
2090        NULL,                           /* fin_input */
2091        NULL,                           /* fin_output */
2092        NULL,                           /* read_packet */
2093        linuxring_prepare_packet,       /* prepare_packet */
2094        NULL,                           /* fin_packet */
2095        NULL,                           /* write_packet */
2096        linuxring_get_link_type,        /* get_link_type */
2097        linuxring_get_direction,        /* get_direction */
2098        linuxring_set_direction,        /* set_direction */
2099        NULL,                           /* get_erf_timestamp */
2100        linuxring_get_timeval,          /* get_timeval */
2101        linuxring_get_timespec,         /* get_timespec */
2102        NULL,                           /* get_seconds */
2103        NULL,                           /* seek_erf */
2104        NULL,                           /* seek_timeval */
2105        NULL,                           /* seek_seconds */
2106        linuxring_get_capture_length,   /* get_capture_length */
2107        linuxring_get_wire_length,      /* get_wire_length */
2108        linuxring_get_framing_length,   /* get_framing_length */
2109        linuxring_set_capture_length,   /* set_capture_length */
2110        NULL,                           /* get_received_packets */
2111        linuxnative_get_filtered_packets,/* get_filtered_packets */
2112        linuxnative_get_dropped_packets,/* get_dropped_packets */
2113        linuxnative_get_captured_packets,/* get_captured_packets */
2114        linuxnative_get_fd,             /* get_fd */
2115        NULL,                           /* trace_event */
2116        linuxring_help,                 /* help */
2117        NULL,                   /* next pointer */
2118        NON_PARALLEL(true)
2119};
2120
2121#endif /* HAVE_NETPACKET_PACKET_H */
2122
2123
2124void linuxnative_constructor(void) {
2125        /* TODO: once we're happy with ring:, it would be a good idea to
2126         * swap the order of these calls so that ring: is preferred over
2127         * int: if the user just gives an interface name as an input without
2128         * explicitly choosing a format.
2129         */
2130        register_format(&linuxnative);
2131        register_format(&linuxring);
2132}
Note: See TracBrowser for help on using the repository browser.