source: lib/format_linux.c @ 9b533c6

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

Converts int and ring to support the batch pread interface

  • Property mode set to 100644
File size: 64.6 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        while (1) {
1346                if (message) {
1347                        struct pollfd pollset[2];
1348                        pollset[0].fd = fd;
1349                        pollset[0].events = POLLIN;
1350                        pollset[0].revents = 0;
1351                        pollset[1].fd = libtrace_message_queue_get_fd(&get_thread_table(libtrace)->messages);
1352                        pollset[1].events = POLLIN;
1353                        pollset[1].revents = 0;
1354                        /* Wait for more data or a message*/
1355                        ret = poll(pollset, 2, -1);
1356                        if (ret < 0) {
1357                                if (errno != EINTR)
1358                                        trace_set_err(libtrace,errno,"poll()");
1359                                return -1;
1360                        }
1361                        // Check for a message otherwise loop
1362                        if (pollset[1].revents)
1363                                return -2;
1364                } else {
1365                        struct pollfd pollset;
1366                        pollset.fd = fd;
1367                        pollset.events = POLLIN;
1368                        pollset.revents = 0;
1369
1370                        /* Wait for more data or a message*/
1371                ret = poll(&pollset, 1, 500);
1372                        if (ret < 0) {
1373                                if (errno != EINTR)
1374                                        trace_set_err(libtrace,errno,"poll()");
1375                                return -1;
1376                } else if (ret == 0) {
1377                        /* Poll timed out - check if we should exit */
1378                        if (libtrace_halt)
1379                                return 0;
1380                        continue;
1381                }
1382
1383                /* TP_STATUS_USER means that we can use the frame.
1384                 * When a slot does not have this flag set, the frame is not
1385                 * ready for consumption.
1386                 */
1387                if (header->tp_status & TP_STATUS_USER)
1388                        break;
1389                }
1390        }
1391
1392        packet->buffer = header;
1393
1394        /* If a snaplen was configured, automatically truncate the packet to
1395         * the desired length.
1396         */
1397        snaplen=LIBTRACE_MIN(
1398                        (int)LIBTRACE_PACKET_BUFSIZE-(int)sizeof(*header),
1399                        (int)FORMAT(libtrace->format_data)->snaplen);
1400       
1401        TO_TP_HDR(packet->buffer)->tp_snaplen = LIBTRACE_MIN((unsigned int)snaplen, TO_TP_HDR(packet->buffer)->tp_len);
1402
1403        /* Move to next buffer */
1404        (*rxring_offset)++;
1405        *rxring_offset %= FORMAT(libtrace->format_data)->req.tp_frame_nr;
1406
1407        /* We just need to get prepare_packet to set all our packet pointers
1408         * appropriately */
1409        if (linuxring_prepare_packet(libtrace, packet, packet->buffer,
1410                                packet->type, 0))
1411                return -1;
1412        return  linuxring_get_framing_length(packet) + 
1413                                linuxring_get_capture_length(packet);
1414
1415}
1416
1417static int linuxring_read_packet(libtrace_t *libtrace, libtrace_packet_t *packet) {
1418        int fd = FORMAT(libtrace->format_data)->fd;
1419        int *rxring_offset = &FORMAT(libtrace->format_data)->rxring_offset;
1420        char *rx_ring = FORMAT(libtrace->format_data)->rx_ring;
1421        return linuxring_read_packet_fd(libtrace, packet, fd, rxring_offset, rx_ring, 0);
1422}
1423
1424static int linuxring_pread_packets(libtrace_t *libtrace,
1425                                   libtrace_thread_t *t,
1426                                   libtrace_packet_t **packets,
1427                                   UNUSED size_t nb_packets) {
1428        //fprintf(stderr, "Thread number is #%d\n", t->perpkt_num);
1429        int fd = PERPKT_FORMAT(t)->fd;
1430        int *rxring_offset = &PERPKT_FORMAT(t)->rxring_offset;
1431        char *rx_ring = PERPKT_FORMAT(t)->rx_ring;
1432        packets[0]->error = linuxring_read_packet_fd(libtrace, packets[0], fd,
1433                                                     rxring_offset, rx_ring, 1);
1434        if (packets[0]->error >= 1)
1435                return 1;
1436        else
1437                return packets[0]->error;
1438}
1439
1440/* Non-blocking read */
1441static libtrace_eventobj_t linuxring_event(libtrace_t *libtrace, libtrace_packet_t *packet) {
1442        struct tpacket2_hdr *header;
1443        libtrace_eventobj_t event = {0,0,0.0,0};
1444
1445        /* We must free the old packet, otherwise select() will instantly return
1446         */
1447        ring_release_frame(libtrace, packet);
1448
1449        /* Fetch the current frame */
1450        header = GET_CURRENT_BUFFER(libtrace);
1451        if(header->tp_status & TP_STATUS_USER){
1452                /* We have a frame waiting */
1453                event.size = trace_read_packet(libtrace, packet);
1454                event.type = TRACE_EVENT_PACKET;
1455        } else {
1456                /* Ok we don't have a packet waiting */
1457                event.type = TRACE_EVENT_IOWAIT;
1458                event.fd = FORMAT(libtrace->format_data)->fd;
1459        }
1460
1461        return event;
1462}
1463
1464
1465static int linuxnative_write_packet(libtrace_out_t *trace, 
1466                libtrace_packet_t *packet) 
1467{
1468        struct sockaddr_ll hdr;
1469        int ret = 0;
1470
1471        if (trace_get_link_type(packet) == TRACE_TYPE_NONDATA)
1472                return 0;
1473
1474        hdr.sll_family = AF_PACKET;
1475        hdr.sll_protocol = 0;
1476        hdr.sll_ifindex = if_nametoindex(trace->uridata);
1477        hdr.sll_hatype = 0;
1478        hdr.sll_pkttype = 0;
1479        hdr.sll_halen = htons(6); /* FIXME */
1480        memcpy(hdr.sll_addr,packet->payload,(size_t)ntohs(hdr.sll_halen));
1481
1482        /* This is pretty easy, just send the payload using sendto() (after
1483         * setting up the sll header properly, of course) */
1484        ret = sendto(DATAOUT(trace)->fd,
1485                        packet->payload,
1486                        trace_get_capture_length(packet),
1487                        0,
1488                        (struct sockaddr*)&hdr, (socklen_t)sizeof(hdr));
1489
1490        if (ret < 0) {
1491                trace_set_err_out(trace, errno, "sendto failed");
1492        }
1493
1494        return ret;
1495}
1496
1497static int linuxring_write_packet(libtrace_out_t *trace, 
1498                libtrace_packet_t *packet)
1499{
1500        struct tpacket2_hdr *header;
1501        struct pollfd pollset;
1502        struct socket_addr;
1503        int ret; 
1504        unsigned max_size;
1505        void * off;
1506
1507        if (trace_get_link_type(packet) == TRACE_TYPE_NONDATA)
1508                return 0;
1509
1510        max_size = DATAOUT(trace)->req.tp_frame_size - 
1511                 - TPACKET_HDRLEN + sizeof(struct sockaddr_ll);
1512
1513        header = (void *) DATAOUT(trace)->tx_ring + 
1514        (DATAOUT(trace)->txring_offset * DATAOUT(trace)->req.tp_frame_size);
1515
1516        while(header->tp_status != TP_STATUS_AVAILABLE){
1517                /* if none available: wait on more data */
1518                pollset.fd = DATAOUT(trace)->fd;
1519                pollset.events = POLLOUT;
1520                pollset.revents = 0;
1521                ret = poll(&pollset, 1, 1000);
1522                if (ret < 0 && errno != EINTR) {
1523                        perror("poll");
1524                        return -1;
1525                }
1526                if(ret == 0) 
1527                        /* Timeout something has gone wrong - maybe the queue is
1528                         * to large so try issue another send command
1529                         */
1530                        ret = sendto(DATAOUT(trace)->fd, 
1531                                NULL, 
1532                                0, 
1533                                0, 
1534                                (void *) &DATAOUT(trace)->sock_hdr, 
1535                                sizeof(DATAOUT(trace)->sock_hdr));
1536                        if (ret < 0) {
1537                                trace_set_err_out(trace, errno, 
1538                                                "sendto after timeout failed");
1539                                return -1;
1540                        }
1541        }
1542       
1543        header->tp_len = trace_get_capture_length(packet);
1544
1545        /* We cannot write the whole packet so just write part of it */
1546        if (header->tp_len > max_size)
1547                header->tp_len = max_size;
1548
1549        /* Fill packet - no sockaddr_ll in header when writing to the TX_RING */
1550        off = ((void *) header) + (TPACKET_HDRLEN - sizeof(struct sockaddr_ll));
1551        memcpy(off, 
1552                (char *) packet->payload, 
1553                header->tp_len);
1554       
1555        /* 'Send it' and increase ring pointer to the next frame */
1556        header->tp_status = TP_STATUS_SEND_REQUEST;
1557        DATAOUT(trace)->txring_offset = (DATAOUT(trace)->txring_offset + 1) % 
1558                                                DATAOUT(trace)->req.tp_frame_nr;
1559
1560        /* Notify kernel there are frames to send */
1561        DATAOUT(trace)->queue ++;
1562        DATAOUT(trace)->queue %= TX_MAX_QUEUE;
1563        if(DATAOUT(trace)->queue == 0){
1564                ret = sendto(DATAOUT(trace)->fd, 
1565                                NULL, 
1566                                0, 
1567                                MSG_DONTWAIT, 
1568                                (void *) &DATAOUT(trace)->sock_hdr, 
1569                                sizeof(DATAOUT(trace)->sock_hdr));
1570                if (ret < 0) {
1571                        trace_set_err_out(trace, errno, "sendto failed");
1572                        return -1;
1573                }
1574        }
1575        return header->tp_len;
1576
1577}
1578#endif /* HAVE_NETPACKET_PACKET_H */
1579
1580static inline libtrace_linktype_t get_libtrace_link_type(uint16_t linktype){
1581        /* Convert the ARPHRD type into an appropriate libtrace link type */
1582        switch (linktype) {
1583                case LIBTRACE_ARPHRD_ETHER:
1584                case LIBTRACE_ARPHRD_LOOPBACK:
1585                        return TRACE_TYPE_ETH;
1586                case LIBTRACE_ARPHRD_PPP:
1587                        return TRACE_TYPE_NONE;
1588                case LIBTRACE_ARPHRD_IEEE80211_RADIOTAP:
1589                        return TRACE_TYPE_80211_RADIO;
1590                case LIBTRACE_ARPHRD_IEEE80211:
1591                        return TRACE_TYPE_80211;
1592                case LIBTRACE_ARPHRD_SIT:
1593                case LIBTRACE_ARPHRD_NONE:
1594                        return TRACE_TYPE_NONE;
1595                default: /* shrug, beyond me! */
1596                        printf("unknown Linux ARPHRD type 0x%04x\n",linktype);
1597                        return (libtrace_linktype_t)~0U;
1598        }
1599}
1600static libtrace_linktype_t linuxnative_get_link_type(const struct libtrace_packet_t *packet) {
1601        uint16_t linktype=(((struct libtrace_linuxnative_header*)(packet->buffer))
1602                                ->hdr.sll_hatype);
1603        return get_libtrace_link_type(linktype);
1604}
1605static libtrace_linktype_t linuxring_get_link_type(const struct libtrace_packet_t *packet) {
1606        uint16_t linktype= GET_SOCKADDR_HDR(packet->buffer)->sll_hatype;
1607        return get_libtrace_link_type(linktype);
1608}
1609
1610static inline libtrace_direction_t get_libtrace_direction(uint8_t pkttype){
1611        switch (pkttype) {
1612                case PACKET_OUTGOING:
1613                case PACKET_LOOPBACK:
1614                        return TRACE_DIR_OUTGOING;
1615                case PACKET_OTHERHOST:
1616                        return TRACE_DIR_OTHER;
1617                default:
1618                        return TRACE_DIR_INCOMING;
1619        }
1620}
1621static libtrace_direction_t linuxnative_get_direction(const struct libtrace_packet_t *packet) {
1622        return get_libtrace_direction(((struct libtrace_linuxnative_header*)(packet->buffer))->hdr.sll_pkttype);
1623}
1624static libtrace_direction_t linuxring_get_direction(const struct libtrace_packet_t *packet) {
1625        return get_libtrace_direction(GET_SOCKADDR_HDR(packet->buffer)->sll_pkttype);
1626}
1627
1628static libtrace_direction_t set_direction(struct sockaddr_ll * skadr, libtrace_direction_t direction){
1629        switch (direction) {
1630                case TRACE_DIR_OUTGOING:
1631                        skadr->sll_pkttype = PACKET_OUTGOING;
1632                        return TRACE_DIR_OUTGOING;
1633                case TRACE_DIR_INCOMING:
1634                        skadr->sll_pkttype = PACKET_HOST;
1635                        return TRACE_DIR_INCOMING;
1636                case TRACE_DIR_OTHER:
1637                        skadr->sll_pkttype = PACKET_OTHERHOST;
1638                        return TRACE_DIR_OTHER;
1639                default:
1640                        return -1;
1641        }
1642}
1643static libtrace_direction_t linuxnative_set_direction(
1644                libtrace_packet_t *packet,
1645                libtrace_direction_t direction) {
1646        return set_direction(&((struct libtrace_linuxnative_header*)(packet->buffer))->hdr, direction);
1647}
1648static libtrace_direction_t linuxring_set_direction(
1649                libtrace_packet_t *packet,
1650                libtrace_direction_t direction) {
1651        return set_direction(GET_SOCKADDR_HDR(packet->buffer), direction);
1652}
1653
1654static struct timespec linuxnative_get_timespec(const libtrace_packet_t *packet) 
1655{
1656        struct libtrace_linuxnative_header *hdr = 
1657                (struct libtrace_linuxnative_header*) packet->buffer;
1658        /* We have to upconvert from timeval to timespec */
1659        if (hdr->timestamptype == TS_TIMEVAL) {
1660                struct timespec ts;
1661                ts.tv_sec = hdr->tv.tv_sec;
1662                ts.tv_nsec = hdr->tv.tv_usec*1000;
1663                return ts;
1664        }
1665        else {
1666                struct timespec ts;
1667                ts.tv_sec = hdr->ts.tv_sec;
1668                ts.tv_nsec = hdr->ts.tv_nsec;
1669                return ts;
1670        }
1671}
1672static struct timespec linuxring_get_timespec(const libtrace_packet_t *packet) 
1673{
1674        struct timespec ts;
1675        ts.tv_sec = TO_TP_HDR(packet->buffer)->tp_sec;
1676        ts.tv_nsec = TO_TP_HDR(packet->buffer)->tp_nsec;
1677        return ts;
1678}
1679
1680
1681static struct timeval linuxnative_get_timeval(const libtrace_packet_t *packet) 
1682{
1683        struct libtrace_linuxnative_header *hdr = 
1684                (struct libtrace_linuxnative_header*) packet->buffer;
1685        /* We have to downconvert from timespec to timeval */
1686        if (hdr->timestamptype == TS_TIMESPEC) {
1687                struct timeval tv;
1688                tv.tv_sec = hdr->ts.tv_sec;
1689                tv.tv_usec = hdr->ts.tv_nsec/1000;
1690                return tv;
1691        }
1692        else {
1693                struct timeval tv;
1694                tv.tv_sec = hdr->tv.tv_sec;
1695                tv.tv_usec = hdr->tv.tv_usec;
1696                return tv;
1697        }
1698}
1699static struct timeval linuxring_get_timeval(const libtrace_packet_t *packet) 
1700{
1701        struct timeval tv;
1702        tv.tv_sec = TO_TP_HDR(packet->buffer)->tp_sec;
1703        tv.tv_usec = TO_TP_HDR(packet->buffer)->tp_nsec / 1000;
1704        return tv;
1705}
1706
1707static int linuxnative_get_capture_length(const libtrace_packet_t *packet)
1708{
1709        return ((struct libtrace_linuxnative_header*)(packet->buffer))->caplen;
1710}
1711
1712static int linuxring_get_capture_length(const libtrace_packet_t *packet)
1713{
1714        return TO_TP_HDR(packet->buffer)->tp_snaplen;
1715}
1716
1717static int linuxnative_get_wire_length(const libtrace_packet_t *packet) 
1718{
1719
1720        int wirelen = ((struct libtrace_linuxnative_header*)(packet->buffer))->wirelen;
1721
1722        /* Include the missing FCS */
1723        if (trace_get_link_type(packet) == TRACE_TYPE_ETH)
1724                wirelen += 4;
1725
1726        return wirelen;
1727}
1728
1729static int linuxring_get_wire_length(const libtrace_packet_t *packet) 
1730{
1731        int wirelen = TO_TP_HDR(packet->buffer)->tp_len;
1732
1733        /* Include the missing FCS */
1734        if (trace_get_link_type(packet) == TRACE_TYPE_ETH)
1735                wirelen += 4;
1736
1737        return wirelen;
1738}
1739
1740static int linuxnative_get_framing_length(UNUSED
1741                const libtrace_packet_t *packet) 
1742{
1743        return sizeof(struct libtrace_linuxnative_header);
1744}
1745
1746static int linuxring_get_framing_length(const libtrace_packet_t *packet)
1747{       
1748        /*
1749         * Need to make frame_length + capture_length = complete capture length
1750         * so include alligment whitespace. So reverse calculate from packet.
1751         */
1752        return (char *) packet->payload - (char *) packet->buffer;
1753}
1754
1755static size_t linuxnative_set_capture_length(libtrace_packet_t *packet, 
1756                size_t size) {
1757
1758        struct libtrace_linuxnative_header *linux_hdr = NULL;
1759        assert(packet);
1760        if (size > trace_get_capture_length(packet)) {
1761                /* We should avoid making a packet larger */
1762                return trace_get_capture_length(packet);
1763        }
1764       
1765        /* Reset the cached capture length */
1766        packet->capture_length = -1;
1767
1768        linux_hdr = (struct libtrace_linuxnative_header *)packet->header;
1769        linux_hdr->caplen = size;
1770        return trace_get_capture_length(packet);
1771}
1772
1773static size_t linuxring_set_capture_length(libtrace_packet_t *packet, 
1774                size_t size) {
1775        assert(packet);
1776        if (size > trace_get_capture_length(packet)) {
1777                /* We should avoid making a packet larger */
1778                return trace_get_capture_length(packet);
1779        }
1780       
1781        /* Reset the cached capture length */
1782        packet->capture_length = -1;
1783
1784        TO_TP_HDR(packet->buffer)->tp_snaplen = size;
1785
1786        return trace_get_capture_length(packet);
1787}
1788
1789static int linuxnative_get_fd(const libtrace_t *trace) {
1790        if (trace->format_data == NULL)
1791                return -1;
1792        return FORMAT(trace->format_data)->fd;
1793}
1794
1795/* Linux doesn't keep track how many packets were seen before filtering
1796 * so we can't tell how many packets were filtered.  Bugger.  So annoying.
1797 *
1798 * Since we tell libtrace that we do support filtering, if we don't declare
1799 * this here as failing, libtrace will happily report for us that it didn't
1800 * filter any packets, so don't lie -- return that we don't know.
1801 */
1802static uint64_t linuxnative_get_filtered_packets(libtrace_t *trace UNUSED) {
1803        return UINT64_MAX;
1804}
1805
1806/* Number of packets that passed filtering */
1807static uint64_t linuxnative_get_captured_packets(libtrace_t *trace) {
1808        struct tpacket_stats stats;
1809
1810        if (trace->format_data == NULL)
1811                return UINT64_MAX;
1812        if (FORMAT(trace->format_data)->fd == -1) {
1813                /* This is probably a 'dead' trace so obviously we can't query
1814                 * the socket for capture counts, can we? */
1815                return UINT64_MAX;
1816        }
1817
1818#ifdef HAVE_NETPACKET_PACKET_H
1819
1820        if ((FORMAT(trace->format_data)->stats_valid & 1)
1821                || FORMAT(trace->format_data)->stats_valid == 0) {
1822                if (FORMAT(trace->format_data)->per_thread) {
1823                        int i;
1824                        FORMAT(trace->format_data)->stats.tp_drops = 0;
1825                        FORMAT(trace->format_data)->stats.tp_packets = 0;
1826                        for (i = 0; i < trace->perpkt_thread_count; ++i) {
1827                                socklen_t len = sizeof(stats);
1828                                getsockopt(FORMAT(trace->format_data)->per_thread[i].fd,
1829                                           SOL_PACKET,
1830                                           PACKET_STATISTICS,
1831                                           &stats,
1832                                           &len);
1833                                FORMAT(trace->format_data)->stats.tp_drops += stats.tp_drops;
1834                                FORMAT(trace->format_data)->stats.tp_packets += stats.tp_packets;
1835                        }
1836                        FORMAT(trace->format_data)->stats_valid |= 1;
1837                } else {
1838                        socklen_t len = sizeof(FORMAT(trace->format_data)->stats);
1839                        getsockopt(FORMAT(trace->format_data)->fd,
1840                                   SOL_PACKET,
1841                                   PACKET_STATISTICS,
1842                                   &FORMAT(trace->format_data)->stats,
1843                                   &len);
1844                        FORMAT(trace->format_data)->stats_valid |= 1;
1845                }
1846        }
1847
1848        return FORMAT(trace->format_data)->stats.tp_packets;
1849#else
1850        return UINT64_MAX;
1851#endif
1852}
1853
1854/* Number of packets that got past filtering and were then dropped because
1855 * of lack of space
1856 */
1857static uint64_t linuxnative_get_dropped_packets(libtrace_t *trace) {
1858        struct tpacket_stats stats;
1859        if (trace->format_data == NULL)
1860                return UINT64_MAX;
1861        if (FORMAT(trace->format_data)->fd == -1) {
1862                /* This is probably a 'dead' trace so obviously we can't query
1863                 * the socket for drop counts, can we? */
1864                return UINT64_MAX;
1865        }
1866
1867#ifdef HAVE_NETPACKET_PACKET_H 
1868        if ((FORMAT(trace->format_data)->stats_valid & 2)
1869                || (FORMAT(trace->format_data)->stats_valid==0)) {
1870                if (FORMAT(trace->format_data)->per_thread) {
1871                        int i;
1872                        FORMAT(trace->format_data)->stats.tp_drops = 0;
1873                        FORMAT(trace->format_data)->stats.tp_packets = 0;
1874                        for (i = 0; i < trace->perpkt_thread_count; ++i) {
1875                                socklen_t len = sizeof(stats);
1876                                getsockopt(FORMAT(trace->format_data)->per_thread[i].fd,
1877                                           SOL_PACKET,
1878                                           PACKET_STATISTICS,
1879                                           &stats,
1880                                           &len);
1881                                FORMAT(trace->format_data)->stats.tp_drops += stats.tp_drops;
1882                                FORMAT(trace->format_data)->stats.tp_packets += stats.tp_packets;
1883                        }
1884                        FORMAT(trace->format_data)->stats_valid |= 2;
1885                } else {
1886                        socklen_t len = sizeof(FORMAT(trace->format_data)->stats);
1887                        getsockopt(FORMAT(trace->format_data)->fd,
1888                                   SOL_PACKET,
1889                                   PACKET_STATISTICS,
1890                                   &FORMAT(trace->format_data)->stats,
1891                                   &len);
1892                        FORMAT(trace->format_data)->stats_valid |= 2;
1893                }
1894        }
1895
1896        return FORMAT(trace->format_data)->stats.tp_drops;
1897#else
1898        return UINT64_MAX;
1899#endif
1900}
1901
1902#ifdef HAVE_NETPACKET_PACKET_H
1903static void linuxnative_help(void) {
1904        printf("linuxnative format module: $Revision: 1793 $\n");
1905        printf("Supported input URIs:\n");
1906        printf("\tint:eth0\n");
1907        printf("\n");
1908        printf("Supported output URIs:\n");
1909        printf("\tint:eth0\n");
1910        printf("\n");
1911        return;
1912}
1913
1914static void linuxring_help(void) {
1915        printf("linuxring format module: $Revision: 1793 $\n");
1916        printf("Supported input URIs:\n");
1917        printf("\tring:eth0\n");
1918        printf("\n");
1919        printf("Supported output URIs:\n");
1920        printf("\tring:eth0\n");
1921        printf("\n");
1922        return;
1923}
1924
1925static struct libtrace_format_t linuxnative = {
1926        "int",
1927        "$Id$",
1928        TRACE_FORMAT_LINUX_NATIVE,
1929        linuxnative_probe_filename,     /* probe filename */
1930        NULL,                           /* probe magic */
1931        linuxnative_init_input,         /* init_input */
1932        linuxnative_config_input,       /* config_input */
1933        linuxnative_start_input,        /* start_input */
1934        linuxnative_pause_input,        /* pause_input */
1935        linuxnative_init_output,        /* init_output */
1936        NULL,                           /* config_output */
1937        linuxnative_start_output,       /* start_ouput */
1938        linuxnative_fin_input,          /* fin_input */
1939        linuxnative_fin_output,         /* fin_output */
1940        linuxnative_read_packet,        /* read_packet */
1941        linuxnative_prepare_packet,     /* prepare_packet */
1942        NULL,                           /* fin_packet */
1943        linuxnative_write_packet,       /* write_packet */
1944        linuxnative_get_link_type,      /* get_link_type */
1945        linuxnative_get_direction,      /* get_direction */
1946        linuxnative_set_direction,      /* set_direction */
1947        NULL,                           /* get_erf_timestamp */
1948        linuxnative_get_timeval,        /* get_timeval */
1949        linuxnative_get_timespec,       /* get_timespec */
1950        NULL,                           /* get_seconds */
1951        NULL,                           /* seek_erf */
1952        NULL,                           /* seek_timeval */
1953        NULL,                           /* seek_seconds */
1954        linuxnative_get_capture_length, /* get_capture_length */
1955        linuxnative_get_wire_length,    /* get_wire_length */
1956        linuxnative_get_framing_length, /* get_framing_length */
1957        linuxnative_set_capture_length, /* set_capture_length */
1958        NULL,                           /* get_received_packets */
1959        linuxnative_get_filtered_packets,/* get_filtered_packets */
1960        linuxnative_get_dropped_packets,/* get_dropped_packets */
1961        linuxnative_get_captured_packets,/* get_captured_packets */
1962        linuxnative_get_fd,             /* get_fd */
1963        trace_event_device,             /* trace_event */
1964        linuxnative_help,               /* help */
1965        NULL,                                   /* next pointer */
1966        {true, -1},              /* Live, no thread limit */
1967        linuxnative_pstart_input,                       /* pstart_input */
1968        linuxnative_pread_packets,                      /* pread_packets */
1969        linuxnative_ppause_input,                       /* ppause */
1970        linuxnative_fin_input,                          /* p_fin */
1971        linuxnative_pconfig_input,                      /* pconfig input */
1972        linux_pregister_thread,
1973        NULL
1974};
1975
1976static struct libtrace_format_t linuxring = {
1977        "ring",
1978        "$Id$",
1979        TRACE_FORMAT_LINUX_RING,
1980        linuxnative_probe_filename,     /* probe filename */
1981        NULL,                           /* probe magic */
1982        linuxring_init_input,           /* init_input */
1983        linuxnative_config_input,       /* config_input */
1984        linuxring_start_input,  /* start_input */
1985        linuxring_pause_input,  /* pause_input */
1986        linuxring_init_output,  /* init_output */
1987        NULL,                           /* config_output */
1988        linuxring_start_output, /* start_ouput */
1989        linuxnative_fin_input,          /* fin_input */
1990        linuxring_fin_output,           /* fin_output */
1991        linuxring_read_packet,  /* read_packet */
1992        linuxring_prepare_packet,       /* prepare_packet */
1993        linuxring_fin_packet,                           /* fin_packet */
1994        linuxring_write_packet, /* write_packet */
1995        linuxring_get_link_type,        /* get_link_type */
1996        linuxring_get_direction,        /* get_direction */
1997        linuxring_set_direction,        /* set_direction */
1998        NULL,                           /* get_erf_timestamp */
1999        linuxring_get_timeval,  /* get_timeval */
2000        linuxring_get_timespec, /* get_timespec */
2001        NULL,                           /* get_seconds */
2002        NULL,                           /* seek_erf */
2003        NULL,                           /* seek_timeval */
2004        NULL,                           /* seek_seconds */
2005        linuxring_get_capture_length,   /* get_capture_length */
2006        linuxring_get_wire_length,      /* get_wire_length */
2007        linuxring_get_framing_length,   /* get_framing_length */
2008        linuxring_set_capture_length,   /* set_capture_length */
2009        NULL,                           /* get_received_packets */
2010        linuxnative_get_filtered_packets,/* get_filtered_packets */
2011        linuxnative_get_dropped_packets,/* get_dropped_packets */
2012        linuxnative_get_captured_packets,/* get_captured_packets */
2013        linuxnative_get_fd,             /* get_fd */
2014        linuxring_event,                /* trace_event */
2015        linuxring_help,         /* help */
2016        NULL,                           /* next pointer */
2017        {true, -1},              /* Live, no thread limit */
2018        linuxnative_pstart_input,                       /* pstart_input */
2019        linuxring_pread_packets,                        /* pread_packets */
2020        linuxnative_ppause_input,                       /* ppause */
2021        linuxnative_fin_input,                          /* p_fin */
2022        linuxnative_pconfig_input,
2023        linux_pregister_thread,
2024        NULL
2025};
2026#else
2027static void linuxnative_help(void) {
2028        printf("linuxnative format module: $Revision: 1793 $\n");
2029        printf("Not supported on this host\n");
2030}
2031static void linuxring_help(void) {
2032        printf("linuxring format module: $Revision: 1793 $\n");
2033        printf("Not supported on this host\n");
2034}
2035
2036static struct libtrace_format_t linuxnative = {
2037        "int",
2038        "$Id$",
2039        TRACE_FORMAT_LINUX_NATIVE,
2040        NULL,                           /* probe filename */
2041        NULL,                           /* probe magic */
2042        NULL,                           /* init_input */
2043        NULL,                           /* config_input */
2044        NULL,                           /* start_input */
2045        NULL,                           /* pause_input */
2046        NULL,                           /* init_output */
2047        NULL,                           /* config_output */
2048        NULL,                           /* start_ouput */
2049        NULL,                           /* fin_input */
2050        NULL,                           /* fin_output */
2051        NULL,                           /* read_packet */
2052        linuxnative_prepare_packet,     /* prepare_packet */
2053        NULL,                           /* fin_packet */
2054        NULL,                           /* write_packet */
2055        linuxnative_get_link_type,      /* get_link_type */
2056        linuxnative_get_direction,      /* get_direction */
2057        linuxnative_set_direction,      /* set_direction */
2058        NULL,                           /* get_erf_timestamp */
2059        linuxnative_get_timeval,        /* get_timeval */
2060        linuxnative_get_timespec,       /* get_timespec */
2061        NULL,                           /* get_seconds */
2062        NULL,                           /* seek_erf */
2063        NULL,                           /* seek_timeval */
2064        NULL,                           /* seek_seconds */
2065        linuxnative_get_capture_length, /* get_capture_length */
2066        linuxnative_get_wire_length,    /* get_wire_length */
2067        linuxnative_get_framing_length, /* get_framing_length */
2068        linuxnative_set_capture_length, /* set_capture_length */
2069        NULL,                           /* get_received_packets */
2070        linuxnative_get_filtered_packets,/* get_filtered_packets */
2071        linuxnative_get_dropped_packets,/* get_dropped_packets */
2072        linuxnative_get_captured_packets,/* get_captured_packets */
2073        linuxnative_get_fd,             /* get_fd */
2074        trace_event_device,             /* trace_event */
2075        linuxnative_help,               /* help */
2076        NULL,                   /* next pointer */
2077        NON_PARALLEL(true)
2078};
2079
2080static struct libtrace_format_t linuxring = {
2081        "ring",
2082        "$Id$",
2083        TRACE_FORMAT_LINUX_RING,
2084        NULL,                           /* probe filename */
2085        NULL,                           /* probe magic */
2086        NULL,                           /* init_input */
2087        NULL,                           /* config_input */
2088        NULL,                           /* start_input */
2089        NULL,                           /* pause_input */
2090        NULL,                           /* init_output */
2091        NULL,                           /* config_output */
2092        NULL,                           /* start_ouput */
2093        NULL,                           /* fin_input */
2094        NULL,                           /* fin_output */
2095        NULL,                           /* read_packet */
2096        linuxring_prepare_packet,       /* prepare_packet */
2097        NULL,                           /* fin_packet */
2098        NULL,                           /* write_packet */
2099        linuxring_get_link_type,        /* get_link_type */
2100        linuxring_get_direction,        /* get_direction */
2101        linuxring_set_direction,        /* set_direction */
2102        NULL,                           /* get_erf_timestamp */
2103        linuxring_get_timeval,          /* get_timeval */
2104        linuxring_get_timespec,         /* get_timespec */
2105        NULL,                           /* get_seconds */
2106        NULL,                           /* seek_erf */
2107        NULL,                           /* seek_timeval */
2108        NULL,                           /* seek_seconds */
2109        linuxring_get_capture_length,   /* get_capture_length */
2110        linuxring_get_wire_length,      /* get_wire_length */
2111        linuxring_get_framing_length,   /* get_framing_length */
2112        linuxring_set_capture_length,   /* set_capture_length */
2113        NULL,                           /* get_received_packets */
2114        linuxnative_get_filtered_packets,/* get_filtered_packets */
2115        linuxnative_get_dropped_packets,/* get_dropped_packets */
2116        linuxnative_get_captured_packets,/* get_captured_packets */
2117        linuxnative_get_fd,             /* get_fd */
2118        NULL,                           /* trace_event */
2119        linuxring_help,                 /* help */
2120        NULL,                   /* next pointer */
2121        NON_PARALLEL(true)
2122};
2123
2124#endif /* HAVE_NETPACKET_PACKET_H */
2125
2126
2127void linuxnative_constructor(void) {
2128        /* TODO: once we're happy with ring:, it would be a good idea to
2129         * swap the order of these calls so that ring: is preferred over
2130         * int: if the user just gives an interface name as an input without
2131         * explicitly choosing a format.
2132         */
2133        register_format(&linuxnative);
2134        register_format(&linuxring);
2135}
Note: See TracBrowser for help on using the repository browser.