net/core/pktgen.c

   1 /*
   2  * Authors:
   3  * Copyright 2001, 2002 by Robert Olsson <robert.olsson@its.uu.se>
   4  *                             Uppsala University and
   5  *                             Swedish University of Agricultural Sciences
   6  *
   7  * Alexey Kuznetsov  <kuznet@ms2.inr.ac.ru>
   8  * Ben Greear <greearb@candelatech.com>
   9  * Jens Låås <jens.laas@data.slu.se>
  10  *
  11  * This program is free software; you can redistribute it and/or
  12  * modify it under the terms of the GNU General Public License
  13  * as published by the Free Software Foundation; either version
  14  * 2 of the License, or (at your option) any later version.
  15  *
  16  *
  17  * A tool for loading the network with preconfigurated packets.
  18  * The tool is implemented as a linux module.  Parameters are output
  19  * device, delay (to hard_xmit), number of packets, and whether
  20  * to use multiple SKBs or just the same one.
  21  * pktgen uses the installed interface's output routine.
  22  *
  23  * Additional hacking by:
  24  *
  25  * Jens.Laas@data.slu.se
  26  * Improved by ANK. 010120.
  27  * Improved by ANK even more. 010212.
  28  * MAC address typo fixed. 010417 --ro
  29  * Integrated.  020301 --DaveM
  30  * Added multiskb option 020301 --DaveM
  31  * Scaling of results. 020417--sigurdur@linpro.no
  32  * Significant re-work of the module:
  33  *   *  Convert to threaded model to more efficiently be able to transmit
  34  *       and receive on multiple interfaces at once.
  35  *   *  Converted many counters to __u64 to allow longer runs.
  36  *   *  Allow configuration of ranges, like min/max IP address, MACs,
  37  *       and UDP-ports, for both source and destination, and can
  38  *       set to use a random distribution or sequentially walk the range.
  39  *   *  Can now change most values after starting.
  40  *   *  Place 12-byte packet in UDP payload with magic number,
  41  *       sequence number, and timestamp.
  42  *   *  Add receiver code that detects dropped pkts, re-ordered pkts, and
  43  *       latencies (with micro-second) precision.
  44  *   *  Add IOCTL interface to easily get counters & configuration.
  45  *   --Ben Greear <greearb@candelatech.com>
  46  *
  47  * Renamed multiskb to clone_skb and cleaned up sending core for two distinct
  48  * skb modes. A clone_skb=0 mode for Ben "ranges" work and a clone_skb != 0
  49  * as a "fastpath" with a configurable number of clones after alloc's.
  50  * clone_skb=0 means all packets are allocated this also means ranges time
  51  * stamps etc can be used. clone_skb=100 means 1 malloc is followed by 100
  52  * clones.
  53  *
  54  * Also moved to /proc/net/pktgen/
  55  * --ro
  56  *
  57  * Sept 10:  Fixed threading/locking.  Lots of bone-headed and more clever
  58  *    mistakes.  Also merged in DaveM's patch in the -pre6 patch.
  59  * --Ben Greear <greearb@candelatech.com>
  60  *
  61  * Integrated to 2.5.x 021029 --Lucio Maciel (luciomaciel@zipmail.com.br)
  62  *
  63  *
  64  * 021124 Finished major redesign and rewrite for new functionality.
  65  * See Documentation/networking/pktgen.txt for how to use this.
  66  *
  67  * The new operation:
  68  * For each CPU one thread/process is created at start. This process checks
  69  * for running devices in the if_list and sends packets until count is 0 it
  70  * also the thread checks the thread->control which is used for inter-process
  71  * communication. controlling process "posts" operations to the threads this
  72  * way. The if_lock should be possible to remove when add/rem_device is merged
  73  * into this too.
  74  *
  75  * By design there should only be *one* "controlling" process. In practice
  76  * multiple write accesses gives unpredictable result. Understood by "write"
  77  * to /proc gives result code thats should be read be the "writer".
  78  * For practical use this should be no problem.
  79  *
  80  * Note when adding devices to a specific CPU there good idea to also assign
  81  * /proc/irq/XX/smp_affinity so TX-interrupts gets bound to the same CPU.
  82  * --ro
  83  *
  84  * Fix refcount off by one if first packet fails, potential null deref,
  85  * memleak 030710- KJP
  86  *
  87  * First "ranges" functionality for ipv6 030726 --ro
  88  *
  89  * Included flow support. 030802 ANK.
  90  *
  91  * Fixed unaligned access on IA-64 Grant Grundler <grundler@parisc-linux.org>
  92  *
  93  * Remove if fix from added Harald Welte <laforge@netfilter.org> 040419
  94  * ia64 compilation fix from  Aron Griffis <aron@hp.com> 040604
  95  *
  96  * New xmit() return, do_div and misc clean up by Stephen Hemminger
  97  * <shemminger@osdl.org> 040923
  98  *
  99  * Randy Dunlap fixed u64 printk compiler waring
 100  *
 101  * Remove FCS from BW calculation.  Lennert Buytenhek <buytenh@wantstofly.org>
 102  * New time handling. Lennert Buytenhek <buytenh@wantstofly.org> 041213
 103  *
 104  * Corrections from Nikolai Malykh (nmalykh@bilim.com)
 105  * Removed unused flags F_SET_SRCMAC & F_SET_SRCIP 041230
 106  *
 107  * interruptible_sleep_on_timeout() replaced Nishanth Aravamudan <nacc@us.ibm.com>
 108  * 050103
 109  *
 110  * MPLS support by Steven Whitehouse <steve@chygwyn.com>
 111  *
 112  * 802.1Q/Q-in-Q support by Francesco Fondelli (FF) <francesco.fondelli@gmail.com>
 113  *
 114  * Fixed src_mac command to set source mac of packet to value specified in
 115  * command by Adit Ranadive <adit.262@gmail.com>
 116  *
 117  */
 118 #include <linux/sys.h>
 119 #include <linux/types.h>
 120 #include <linux/module.h>
 121 #include <linux/moduleparam.h>
 122 #include <linux/kernel.h>
 123 #include <linux/mutex.h>
 124 #include <linux/sched.h>
 125 #include <linux/slab.h>
 126 #include <linux/vmalloc.h>
 127 #include <linux/unistd.h>
 128 #include <linux/string.h>
 129 #include <linux/ptrace.h>
 130 #include <linux/errno.h>
 131 #include <linux/ioport.h>
 132 #include <linux/interrupt.h>
 133 #include <linux/capability.h>
 134 #include <linux/freezer.h>
 135 #include <linux/delay.h>
 136 #include <linux/timer.h>
 137 #include <linux/list.h>
 138 #include <linux/init.h>
 139 #include <linux/skbuff.h>
 140 #include <linux/netdevice.h>
 141 #include <linux/inet.h>
 142 #include <linux/inetdevice.h>
 143 #include <linux/rtnetlink.h>
 144 #include <linux/if_arp.h>
 145 #include <linux/if_vlan.h>
 146 #include <linux/in.h>
 147 #include <linux/ip.h>
 148 #include <linux/ipv6.h>
 149 #include <linux/udp.h>
 150 #include <linux/proc_fs.h>
 151 #include <linux/seq_file.h>
 152 #include <linux/wait.h>
 153 #include <linux/etherdevice.h>
 154 #include <linux/kthread.h>
 155 #include <net/net_namespace.h>
 156 #include <net/checksum.h>
 157 #include <net/ipv6.h>
 158 #include <net/addrconf.h>
 159 #ifdef CONFIG_XFRM
 160 #include <net/xfrm.h>
 161 #endif
 162 #include <asm/byteorder.h>
 163 #include <linux/rcupdate.h>
 164 #include <linux/bitops.h>
 165 #include <asm/io.h>
 166 #include <asm/dma.h>
 167 #include <asm/uaccess.h>
 168 #include <asm/div64.h>          /* do_div */
 169 #include <asm/timex.h>
 170
 171 #define VERSION  "pktgen v2.70: Packet Generator for packet performance testing.\n"
 172
 173 #define IP_NAME_SZ 32
 174 #define MAX_MPLS_LABELS 16 /* This is the max label stack depth */
 175 #define MPLS_STACK_BOTTOM htonl(0x00000100)
 176
 177 /* Device flag bits */
 178 #define F_IPSRC_RND   (1<<0)    /* IP-Src Random  */
 179 #define F_IPDST_RND   (1<<1)    /* IP-Dst Random  */
 180 #define F_UDPSRC_RND  (1<<2)    /* UDP-Src Random */
 181 #define F_UDPDST_RND  (1<<3)    /* UDP-Dst Random */
 182 #define F_MACSRC_RND  (1<<4)    /* MAC-Src Random */
 183 #define F_MACDST_RND  (1<<5)    /* MAC-Dst Random */
 184 #define F_TXSIZE_RND  (1<<6)    /* Transmit size is random */
 185 #define F_IPV6        (1<<7)    /* Interface in IPV6 Mode */
 186 #define F_MPLS_RND    (1<<8)    /* Random MPLS labels */
 187 #define F_VID_RND     (1<<9)    /* Random VLAN ID */
 188 #define F_SVID_RND    (1<<10)   /* Random SVLAN ID */
 189 #define F_FLOW_SEQ    (1<<11)   /* Sequential flows */
 190 #define F_IPSEC_ON    (1<<12)   /* ipsec on for flows */
 191 #define F_QUEUE_MAP_RND (1<<13) /* queue map Random */
 192 #define F_QUEUE_MAP_CPU (1<<14) /* queue map mirrors smp_processor_id() */
 193
 194 /* Thread control flag bits */
 195 #define T_TERMINATE   (1<<0)
 196 #define T_STOP        (1<<1)    /* Stop run */
 197 #define T_RUN         (1<<2)    /* Start run */
 198 #define T_REMDEVALL   (1<<3)    /* Remove all devs */
 199 #define T_REMDEV      (1<<4)    /* Remove one dev */
 200
 201 /* If lock -- can be removed after some work */
 202 #define   if_lock(t)           spin_lock(&(t->if_lock));
 203 #define   if_unlock(t)           spin_unlock(&(t->if_lock));
 204
 205 /* Used to help with determining the pkts on receive */
 206 #define PKTGEN_MAGIC 0xbe9be955
 207 #define PG_PROC_DIR "pktgen"
 208 #define PGCTRL      "pgctrl"
 209 static struct proc_dir_entry *pg_proc_dir = NULL;
 210
 211 #define MAX_CFLOWS  65536
 212
 213 #define VLAN_TAG_SIZE(x) ((x)->vlan_id == 0xffff ? 0 : 4)
 214 #define SVLAN_TAG_SIZE(x) ((x)->svlan_id == 0xffff ? 0 : 4)
 215
 216 struct flow_state {
 217         __be32 cur_daddr;
 218         int count;
 219 #ifdef CONFIG_XFRM
 220         struct xfrm_state *x;
 221 #endif
 222         __u32 flags;
 223 };
 224
 225 /* flow flag bits */
 226 #define F_INIT   (1<<0)         /* flow has been initialized */
 227
 228 struct pktgen_dev {
 229         /*
 230          * Try to keep frequent/infrequent used vars. separated.
 231          */
 232         struct proc_dir_entry *entry;   /* proc file */
 233         struct pktgen_thread *pg_thread;/* the owner */
 234         struct list_head list;          /* Used for chaining in the thread's run-queue */
 235
 236         int running;            /* if this changes to false, the test will stop */
 237
 238         /* If min != max, then we will either do a linear iteration, or
 239          * we will do a random selection from within the range.
 240          */
 241         __u32 flags;
 242         int removal_mark;       /* non-zero => the device is marked for
 243                                  * removal by worker thread */
 244
 245         int min_pkt_size;       /* = ETH_ZLEN; */
 246         int max_pkt_size;       /* = ETH_ZLEN; */
 247         int pkt_overhead;       /* overhead for MPLS, VLANs, IPSEC etc */
 248         int nfrags;
 249         __u32 delay_us;         /* Default delay */
 250         __u32 delay_ns;
 251         __u64 count;            /* Default No packets to send */
 252         __u64 sofar;            /* How many pkts we've sent so far */
 253         __u64 tx_bytes;         /* How many bytes we've transmitted */
 254         __u64 errors;           /* Errors when trying to transmit, pkts will be re-sent */
 255
 256         /* runtime counters relating to clone_skb */
 257         __u64 next_tx_us;       /* timestamp of when to tx next */
 258         __u32 next_tx_ns;
 259
 260         __u64 allocated_skbs;
 261         __u32 clone_count;
 262         int last_ok;            /* Was last skb sent?
 263                                  * Or a failed transmit of some sort?  This will keep
 264                                  * sequence numbers in order, for example.
 265                                  */
 266         __u64 started_at;       /* micro-seconds */
 267         __u64 stopped_at;       /* micro-seconds */
 268         __u64 idle_acc;         /* micro-seconds */
 269         __u32 seq_num;
 270
 271         int clone_skb;          /* Use multiple SKBs during packet gen.  If this number
 272                                  * is greater than 1, then that many copies of the same
 273                                  * packet will be sent before a new packet is allocated.
 274                                  * For instance, if you want to send 1024 identical packets
 275                                  * before creating a new packet, set clone_skb to 1024.
 276                                  */
 277
 278         char dst_min[IP_NAME_SZ];       /* IP, ie 1.2.3.4 */
 279         char dst_max[IP_NAME_SZ];       /* IP, ie 1.2.3.4 */
 280         char src_min[IP_NAME_SZ];       /* IP, ie 1.2.3.4 */
 281         char src_max[IP_NAME_SZ];       /* IP, ie 1.2.3.4 */
 282
 283         struct in6_addr in6_saddr;
 284         struct in6_addr in6_daddr;
 285         struct in6_addr cur_in6_daddr;
 286         struct in6_addr cur_in6_saddr;
 287         /* For ranges */
 288         struct in6_addr min_in6_daddr;
 289         struct in6_addr max_in6_daddr;
 290         struct in6_addr min_in6_saddr;
 291         struct in6_addr max_in6_saddr;
 292
 293         /* If we're doing ranges, random or incremental, then this
 294          * defines the min/max for those ranges.
 295          */
 296         __be32 saddr_min;       /* inclusive, source IP address */
 297         __be32 saddr_max;       /* exclusive, source IP address */
 298         __be32 daddr_min;       /* inclusive, dest IP address */
 299         __be32 daddr_max;       /* exclusive, dest IP address */
 300
 301         __u16 udp_src_min;      /* inclusive, source UDP port */
 302         __u16 udp_src_max;      /* exclusive, source UDP port */
 303         __u16 udp_dst_min;      /* inclusive, dest UDP port */
 304         __u16 udp_dst_max;      /* exclusive, dest UDP port */
 305
 306         /* DSCP + ECN */
 307         __u8 tos;            /* six most significant bits of (former) IPv4 TOS are for dscp codepoint */
 308         __u8 traffic_class;  /* ditto for the (former) Traffic Class in IPv6 (see RFC 3260, sec. 4) */
 309
 310         /* MPLS */
 311         unsigned nr_labels;     /* Depth of stack, 0 = no MPLS */
 312         __be32 labels[MAX_MPLS_LABELS];
 313
 314         /* VLAN/SVLAN (802.1Q/Q-in-Q) */
 315         __u8  vlan_p;
 316         __u8  vlan_cfi;
 317         __u16 vlan_id;  /* 0xffff means no vlan tag */
 318
 319         __u8  svlan_p;
 320         __u8  svlan_cfi;
 321         __u16 svlan_id; /* 0xffff means no svlan tag */
 322
 323         __u32 src_mac_count;    /* How many MACs to iterate through */
 324         __u32 dst_mac_count;    /* How many MACs to iterate through */
 325
 326         unsigned char dst_mac[ETH_ALEN];
 327         unsigned char src_mac[ETH_ALEN];
 328
 329         __u32 cur_dst_mac_offset;
 330         __u32 cur_src_mac_offset;
 331         __be32 cur_saddr;
 332         __be32 cur_daddr;
 333         __u16 cur_udp_dst;
 334         __u16 cur_udp_src;
 335         __u16 cur_queue_map;
 336         __u32 cur_pkt_size;
 337
 338         __u8 hh[14];
 339         /* = {
 340            0x00, 0x80, 0xC8, 0x79, 0xB3, 0xCB,
 341
 342            We fill in SRC address later
 343            0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
 344            0x08, 0x00
 345            };
 346          */
 347         __u16 pad;              /* pad out the hh struct to an even 16 bytes */
 348
 349         struct sk_buff *skb;    /* skb we are to transmit next, mainly used for when we
 350                                  * are transmitting the same one multiple times
 351                                  */
 352         struct net_device *odev;        /* The out-going device.  Note that the device should
 353                                          * have it's pg_info pointer pointing back to this
 354                                          * device.  This will be set when the user specifies
 355                                          * the out-going device name (not when the inject is
 356                                          * started as it used to do.)
 357                                          */
 358         struct flow_state *flows;
 359         unsigned cflows;        /* Concurrent flows (config) */
 360         unsigned lflow;         /* Flow length  (config) */
 361         unsigned nflows;        /* accumulated flows (stats) */
 362         unsigned curfl;         /* current sequenced flow (state)*/
 363
 364         u16 queue_map_min;
 365         u16 queue_map_max;
 366
 367 #ifdef CONFIG_XFRM
 368         __u8    ipsmode;                /* IPSEC mode (config) */
 369         __u8    ipsproto;               /* IPSEC type (config) */
 370 #endif
 371         char result[512];
 372 };
 373
 374 struct pktgen_hdr {
 375         __be32 pgh_magic;
 376         __be32 seq_num;
 377         __be32 tv_sec;
 378         __be32 tv_usec;
 379 };
 380
 381 struct pktgen_thread {
 382         spinlock_t if_lock;
 383         struct list_head if_list;       /* All device here */
 384         struct list_head th_list;
 385         struct task_struct *tsk;
 386         char result[512];
 387
 388         /* Field for thread to receive "posted" events terminate, stop ifs etc. */
 389
 390         u32 control;
 391         int cpu;
 392
 393         wait_queue_head_t queue;
 394         struct completion start_done;
 395 };
 396
 397 #define REMOVE 1
 398 #define FIND   0
 399
 400 /** Convert to micro-seconds */
 401 static inline __u64 tv_to_us(const struct timeval *tv)
 402 {
 403         __u64 us = tv->tv_usec;
 404         us += (__u64) tv->tv_sec * (__u64) 1000000;
 405         return us;
 406 }
 407
 408 static __u64 getCurUs(void)
 409 {
 410         struct timeval tv;
 411         do_gettimeofday(&tv);
 412         return tv_to_us(&tv);
 413 }
 414
 415 /* old include end */
 416
 417 static char version[] __initdata = VERSION;
 418
 419 static int pktgen_remove_device(struct pktgen_thread *t, struct pktgen_dev *i);
 420 static int pktgen_add_device(struct pktgen_thread *t, const char *ifname);
 421 static struct pktgen_dev *pktgen_find_dev(struct pktgen_thread *t,
 422                                           const char *ifname);
 423 static int pktgen_device_event(struct notifier_block *, unsigned long, void *);
 424 static void pktgen_run_all_threads(void);
 425 static void pktgen_stop_all_threads_ifs(void);
 426 static int pktgen_stop_device(struct pktgen_dev *pkt_dev);
 427 static void pktgen_stop(struct pktgen_thread *t);
 428 static void pktgen_clear_counters(struct pktgen_dev *pkt_dev);
 429
 430 static unsigned int scan_ip6(const char *s, char ip[16]);
 431 static unsigned int fmt_ip6(char *s, const char ip[16]);
 432
 433 /* Module parameters, defaults. */
 434 static int pg_count_d = 1000;   /* 1000 pkts by default */
 435 static int pg_delay_d;
 436 static int pg_clone_skb_d;
 437 static int debug;
 438
 439 static DEFINE_MUTEX(pktgen_thread_lock);
 440 static LIST_HEAD(pktgen_threads);
 441
 442 static struct notifier_block pktgen_notifier_block = {
 443         .notifier_call = pktgen_device_event,
 444 };
 445
 446 /*
 447  * /proc handling functions
 448  *
 449  */
 450
 451 static int pgctrl_show(struct seq_file *seq, void *v)
 452 {
 453         seq_puts(seq, VERSION);
 454         return 0;
 455 }
 456
 457 static ssize_t pgctrl_write(struct file *file, const char __user * buf,
 458                             size_t count, loff_t * ppos)
 459 {
 460         int err = 0;
 461         char data[128];
 462
 463         if (!capable(CAP_NET_ADMIN)) {
 464                 err = -EPERM;
 465                 goto out;
 466         }
 467
 468         if (count > sizeof(data))
 469                 count = sizeof(data);
 470
 471         if (copy_from_user(data, buf, count)) {
 472                 err = -EFAULT;
 473                 goto out;
 474         }
 475         data[count - 1] = 0;    /* Make string */
 476
 477         if (!strcmp(data, "stop"))
 478                 pktgen_stop_all_threads_ifs();
 479
 480         else if (!strcmp(data, "start"))
 481                 pktgen_run_all_threads();
 482
 483         else
 484                 printk(KERN_WARNING "pktgen: Unknown command: %s\n", data);
 485
 486         err = count;
 487
 488 out:
 489         return err;
 490 }
 491
 492 static int pgctrl_open(struct inode *inode, struct file *file)
 493 {
 494         return single_open(file, pgctrl_show, PDE(inode)->data);
 495 }
 496
 497 static const struct file_operations pktgen_fops = {
 498         .owner   = THIS_MODULE,
 499         .open    = pgctrl_open,
 500         .read    = seq_read,
 501         .llseek  = seq_lseek,
 502         .write   = pgctrl_write,
 503         .release = single_release,
 504 };
 505
 506 static int pktgen_if_show(struct seq_file *seq, void *v)
 507 {
 508         struct pktgen_dev *pkt_dev = seq->private;
 509         __u64 sa;
 510         __u64 stopped;
 511         __u64 now = getCurUs();
 512         DECLARE_MAC_BUF(mac);
 513
 514         seq_printf(seq,
 515                    "Params: count %llu  min_pkt_size: %u  max_pkt_size: %u\n",
 516                    (unsigned long long)pkt_dev->count, pkt_dev->min_pkt_size,
 517                    pkt_dev->max_pkt_size);
 518
 519         seq_printf(seq,
 520                    "     frags: %d  delay: %u  clone_skb: %d  ifname: %s\n",
 521                    pkt_dev->nfrags,
 522                    1000 * pkt_dev->delay_us + pkt_dev->delay_ns,
 523                    pkt_dev->clone_skb, pkt_dev->odev->name);
 524
 525         seq_printf(seq, "     flows: %u flowlen: %u\n", pkt_dev->cflows,
 526                    pkt_dev->lflow);
 527
 528         seq_printf(seq,
 529                    "     queue_map_min: %u  queue_map_max: %u\n",
 530                    pkt_dev->queue_map_min,
 531                    pkt_dev->queue_map_max);
 532
 533         if (pkt_dev->flags & F_IPV6) {
 534                 char b1[128], b2[128], b3[128];
 535                 fmt_ip6(b1, pkt_dev->in6_saddr.s6_addr);
 536                 fmt_ip6(b2, pkt_dev->min_in6_saddr.s6_addr);
 537                 fmt_ip6(b3, pkt_dev->max_in6_saddr.s6_addr);
 538                 seq_printf(seq,
 539                            "     saddr: %s  min_saddr: %s  max_saddr: %s\n", b1,
 540                            b2, b3);
 541
 542                 fmt_ip6(b1, pkt_dev->in6_daddr.s6_addr);
 543                 fmt_ip6(b2, pkt_dev->min_in6_daddr.s6_addr);
 544                 fmt_ip6(b3, pkt_dev->max_in6_daddr.s6_addr);
 545                 seq_printf(seq,
 546                            "     daddr: %s  min_daddr: %s  max_daddr: %s\n", b1,
 547                            b2, b3);
 548
 549         } else
 550                 seq_printf(seq,
 551                            "     dst_min: %s  dst_max: %s\n     src_min: %s  src_max: %s\n",
 552                            pkt_dev->dst_min, pkt_dev->dst_max, pkt_dev->src_min,
 553                            pkt_dev->src_max);
 554
 555         seq_puts(seq, "     src_mac: ");
 556
 557         seq_printf(seq, "%s ",
 558                    print_mac(mac, is_zero_ether_addr(pkt_dev->src_mac) ?
 559                              pkt_dev->odev->dev_addr : pkt_dev->src_mac));
 560
 561         seq_printf(seq, "dst_mac: ");
 562         seq_printf(seq, "%s\n", print_mac(mac, pkt_dev->dst_mac));
 563
 564         seq_printf(seq,
 565                    "     udp_src_min: %d  udp_src_max: %d  udp_dst_min: %d  udp_dst_max: %d\n",
 566                    pkt_dev->udp_src_min, pkt_dev->udp_src_max,
 567                    pkt_dev->udp_dst_min, pkt_dev->udp_dst_max);
 568
 569         seq_printf(seq,
 570                    "     src_mac_count: %d  dst_mac_count: %d\n",
 571                    pkt_dev->src_mac_count, pkt_dev->dst_mac_count);
 572
 573         if (pkt_dev->nr_labels) {
 574                 unsigned i;
 575                 seq_printf(seq, "     mpls: ");
 576                 for (i = 0; i < pkt_dev->nr_labels; i++)
 577                         seq_printf(seq, "%08x%s", ntohl(pkt_dev->labels[i]),
 578                                    i == pkt_dev->nr_labels-1 ? "\n" : ", ");
 579         }
 580
 581         if (pkt_dev->vlan_id != 0xffff) {
 582                 seq_printf(seq, "     vlan_id: %u  vlan_p: %u  vlan_cfi: %u\n",
 583                            pkt_dev->vlan_id, pkt_dev->vlan_p, pkt_dev->vlan_cfi);
 584         }
 585
 586         if (pkt_dev->svlan_id != 0xffff) {
 587                 seq_printf(seq, "     svlan_id: %u  vlan_p: %u  vlan_cfi: %u\n",
 588                            pkt_dev->svlan_id, pkt_dev->svlan_p, pkt_dev->svlan_cfi);
 589         }
 590
 591         if (pkt_dev->tos) {
 592                 seq_printf(seq, "     tos: 0x%02x\n", pkt_dev->tos);
 593         }
 594
 595         if (pkt_dev->traffic_class) {
 596                 seq_printf(seq, "     traffic_class: 0x%02x\n", pkt_dev->traffic_class);
 597         }
 598
 599         seq_printf(seq, "     Flags: ");
 600
 601         if (pkt_dev->flags & F_IPV6)
 602                 seq_printf(seq, "IPV6  ");
 603
 604         if (pkt_dev->flags & F_IPSRC_RND)
 605                 seq_printf(seq, "IPSRC_RND  ");
 606
 607         if (pkt_dev->flags & F_IPDST_RND)
 608                 seq_printf(seq, "IPDST_RND  ");
 609
 610         if (pkt_dev->flags & F_TXSIZE_RND)
 611                 seq_printf(seq, "TXSIZE_RND  ");
 612
 613         if (pkt_dev->flags & F_UDPSRC_RND)
 614                 seq_printf(seq, "UDPSRC_RND  ");
 615
 616         if (pkt_dev->flags & F_UDPDST_RND)
 617                 seq_printf(seq, "UDPDST_RND  ");
 618
 619         if (pkt_dev->flags & F_MPLS_RND)
 620                 seq_printf(seq,  "MPLS_RND  ");
 621
 622         if (pkt_dev->flags & F_QUEUE_MAP_RND)
 623                 seq_printf(seq,  "QUEUE_MAP_RND  ");
 624
 625         if (pkt_dev->flags & F_QUEUE_MAP_CPU)
 626                 seq_printf(seq,  "QUEUE_MAP_CPU  ");
 627
 628         if (pkt_dev->cflows) {
 629                 if (pkt_dev->flags & F_FLOW_SEQ)
 630                         seq_printf(seq,  "FLOW_SEQ  "); /*in sequence flows*/
 631                 else
 632                         seq_printf(seq,  "FLOW_RND  ");
 633         }
 634
 635 #ifdef CONFIG_XFRM
 636         if (pkt_dev->flags & F_IPSEC_ON)
 637                 seq_printf(seq,  "IPSEC  ");
 638 #endif
 639
 640         if (pkt_dev->flags & F_MACSRC_RND)
 641                 seq_printf(seq, "MACSRC_RND  ");
 642
 643         if (pkt_dev->flags & F_MACDST_RND)
 644                 seq_printf(seq, "MACDST_RND  ");
 645
 646         if (pkt_dev->flags & F_VID_RND)
 647                 seq_printf(seq, "VID_RND  ");
 648
 649         if (pkt_dev->flags & F_SVID_RND)
 650                 seq_printf(seq, "SVID_RND  ");
 651
 652         seq_puts(seq, "\n");
 653
 654         sa = pkt_dev->started_at;
 655         stopped = pkt_dev->stopped_at;
 656         if (pkt_dev->running)
 657                 stopped = now;  /* not really stopped, more like last-running-at */
 658
 659         seq_printf(seq,
 660                    "Current:\n     pkts-sofar: %llu  errors: %llu\n     started: %lluus  stopped: %lluus idle: %lluus\n",
 661                    (unsigned long long)pkt_dev->sofar,
 662                    (unsigned long long)pkt_dev->errors, (unsigned long long)sa,
 663                    (unsigned long long)stopped,
 664                    (unsigned long long)pkt_dev->idle_acc);
 665
 666         seq_printf(seq,
 667                    "     seq_num: %d  cur_dst_mac_offset: %d  cur_src_mac_offset: %d\n",
 668                    pkt_dev->seq_num, pkt_dev->cur_dst_mac_offset,
 669                    pkt_dev->cur_src_mac_offset);
 670
 671         if (pkt_dev->flags & F_IPV6) {
 672                 char b1[128], b2[128];
 673                 fmt_ip6(b1, pkt_dev->cur_in6_daddr.s6_addr);
 674                 fmt_ip6(b2, pkt_dev->cur_in6_saddr.s6_addr);
 675                 seq_printf(seq, "     cur_saddr: %s  cur_daddr: %s\n", b2, b1);
 676         } else
 677                 seq_printf(seq, "     cur_saddr: 0x%x  cur_daddr: 0x%x\n",
 678                            pkt_dev->cur_saddr, pkt_dev->cur_daddr);
 679
 680         seq_printf(seq, "     cur_udp_dst: %d  cur_udp_src: %d\n",
 681                    pkt_dev->cur_udp_dst, pkt_dev->cur_udp_src);
 682
 683         seq_printf(seq, "     cur_queue_map: %u\n", pkt_dev->cur_queue_map);
 684
 685         seq_printf(seq, "     flows: %u\n", pkt_dev->nflows);
 686
 687         if (pkt_dev->result[0])
 688                 seq_printf(seq, "Result: %s\n", pkt_dev->result);
 689         else
 690                 seq_printf(seq, "Result: Idle\n");
 691
 692         return 0;
 693 }
 694
 695
 696 static int hex32_arg(const char __user *user_buffer, unsigned long maxlen, __u32 *num)
 697 {
 698         int i = 0;
 699         *num = 0;
 700
 701         for (; i < maxlen; i++) {
 702                 char c;
 703                 *num <<= 4;
 704                 if (get_user(c, &user_buffer[i]))
 705                         return -EFAULT;
 706                 if ((c >= '0') && (c <= '9'))
 707                         *num |= c - '0';
 708                 else if ((c >= 'a') && (c <= 'f'))
 709                         *num |= c - 'a' + 10;
 710                 else if ((c >= 'A') && (c <= 'F'))
 711                         *num |= c - 'A' + 10;
 712                 else
 713                         break;
 714         }
 715         return i;
 716 }
 717
 718 static int count_trail_chars(const char __user * user_buffer,
 719                              unsigned int maxlen)
 720 {
 721         int i;
 722
 723         for (i = 0; i < maxlen; i++) {
 724                 char c;
 725                 if (get_user(c, &user_buffer[i]))
 726                         return -EFAULT;
 727                 switch (c) {
 728                 case '\"':
 729                 case '\n':
 730                 case '\r':
 731                 case '\t':
 732                 case ' ':
 733                 case '=':
 734                         break;
 735                 default:
 736                         goto done;
 737                 }
 738         }
 739 done:
 740         return i;
 741 }
 742
 743 static unsigned long num_arg(const char __user * user_buffer,
 744                              unsigned long maxlen, unsigned long *num)
 745 {
 746         int i = 0;
 747         *num = 0;
 748
 749         for (; i < maxlen; i++) {
 750                 char c;
 751                 if (get_user(c, &user_buffer[i]))
 752                         return -EFAULT;
 753                 if ((c >= '0') && (c <= '9')) {
 754                         *num *= 10;
 755                         *num += c - '0';
 756                 } else
 757                         break;
 758         }
 759         return i;
 760 }
 761
 762 static int strn_len(const char __user * user_buffer, unsigned int maxlen)
 763 {
 764         int i = 0;
 765
 766         for (; i < maxlen; i++) {
 767                 char c;
 768                 if (get_user(c, &user_buffer[i]))
 769                         return -EFAULT;
 770                 switch (c) {
 771                 case '\"':
 772                 case '\n':
 773                 case '\r':
 774                 case '\t':
 775                 case ' ':
 776                         goto done_str;
 777                         break;
 778                 default:
 779                         break;
 780                 }
 781         }
 782 done_str:
 783         return i;
 784 }
 785
 786 static ssize_t get_labels(const char __user *buffer, struct pktgen_dev *pkt_dev)
 787 {
 788         unsigned n = 0;
 789         char c;
 790         ssize_t i = 0;
 791         int len;
 792
 793         pkt_dev->nr_labels = 0;
 794         do {
 795                 __u32 tmp;
 796                 len = hex32_arg(&buffer[i], 8, &tmp);
 797                 if (len <= 0)
 798                         return len;
 799                 pkt_dev->labels[n] = htonl(tmp);
 800                 if (pkt_dev->labels[n] & MPLS_STACK_BOTTOM)
 801                         pkt_dev->flags |= F_MPLS_RND;
 802                 i += len;
 803                 if (get_user(c, &buffer[i]))
 804                         return -EFAULT;
 805                 i++;
 806                 n++;
 807                 if (n >= MAX_MPLS_LABELS)
 808                         return -E2BIG;
 809         } while (c == ',');
 810
 811         pkt_dev->nr_labels = n;
 812         return i;
 813 }
 814
 815 static ssize_t pktgen_if_write(struct file *file,
 816                                const char __user * user_buffer, size_t count,
 817                                loff_t * offset)
 818 {
 819         struct seq_file *seq = (struct seq_file *)file->private_data;
 820         struct pktgen_dev *pkt_dev = seq->private;
 821         int i = 0, max, len;
 822         char name[16], valstr[32];
 823         unsigned long value = 0;
 824         char *pg_result = NULL;
 825         int tmp = 0;
 826         char buf[128];
 827
 828         pg_result = &(pkt_dev->result[0]);
 829
 830         if (count < 1) {
 831                 printk(KERN_WARNING "pktgen: wrong command format\n");
 832                 return -EINVAL;
 833         }
 834
 835         max = count - i;
 836         tmp = count_trail_chars(&user_buffer[i], max);
 837         if (tmp < 0) {
 838                 printk(KERN_WARNING "pktgen: illegal format\n");
 839                 return tmp;
 840         }
 841         i += tmp;
 842
 843         /* Read variable name */
 844
 845         len = strn_len(&user_buffer[i], sizeof(name) - 1);
 846         if (len < 0) {
 847                 return len;
 848         }
 849         memset(name, 0, sizeof(name));
 850         if (copy_from_user(name, &user_buffer[i], len))
 851                 return -EFAULT;
 852         i += len;
 853
 854         max = count - i;
 855         len = count_trail_chars(&user_buffer[i], max);
 856         if (len < 0)
 857                 return len;
 858
 859         i += len;
 860
 861         if (debug) {
 862                 char tb[count + 1];
 863                 if (copy_from_user(tb, user_buffer, count))
 864                         return -EFAULT;
 865                 tb[count] = 0;
 866                 printk(KERN_DEBUG "pktgen: %s,%lu  buffer -:%s:-\n", name,
 867                        (unsigned long)count, tb);
 868         }
 869
 870         if (!strcmp(name, "min_pkt_size")) {
 871                 len = num_arg(&user_buffer[i], 10, &value);
 872                 if (len < 0) {
 873                         return len;
 874                 }
 875                 i += len;
 876                 if (value < 14 + 20 + 8)
 877                         value = 14 + 20 + 8;
 878                 if (value != pkt_dev->min_pkt_size) {
 879                         pkt_dev->min_pkt_size = value;
 880                         pkt_dev->cur_pkt_size = value;
 881                 }
 882                 sprintf(pg_result, "OK: min_pkt_size=%u",
 883                         pkt_dev->min_pkt_size);
 884                 return count;
 885         }
 886
 887         if (!strcmp(name, "max_pkt_size")) {
 888                 len = num_arg(&user_buffer[i], 10, &value);
 889                 if (len < 0) {
 890                         return len;
 891                 }
 892                 i += len;
 893                 if (value < 14 + 20 + 8)
 894                         value = 14 + 20 + 8;
 895                 if (value != pkt_dev->max_pkt_size) {
 896                         pkt_dev->max_pkt_size = value;
 897                         pkt_dev->cur_pkt_size = value;
 898                 }
 899                 sprintf(pg_result, "OK: max_pkt_size=%u",
 900                         pkt_dev->max_pkt_size);
 901                 return count;
 902         }
 903
 904         /* Shortcut for min = max */
 905
 906         if (!strcmp(name, "pkt_size")) {
 907                 len = num_arg(&user_buffer[i], 10, &value);
 908                 if (len < 0) {
 909                         return len;
 910                 }
 911                 i += len;
 912                 if (value < 14 + 20 + 8)
 913                         value = 14 + 20 + 8;
 914                 if (value != pkt_dev->min_pkt_size) {
 915                         pkt_dev->min_pkt_size = value;
 916                         pkt_dev->max_pkt_size = value;
 917                         pkt_dev->cur_pkt_size = value;
 918                 }
 919                 sprintf(pg_result, "OK: pkt_size=%u", pkt_dev->min_pkt_size);
 920                 return count;
 921         }
 922
 923         if (!strcmp(name, "debug")) {
 924                 len = num_arg(&user_buffer[i], 10, &value);
 925                 if (len < 0) {
 926                         return len;
 927                 }
 928                 i += len;
 929                 debug = value;
 930                 sprintf(pg_result, "OK: debug=%u", debug);
 931                 return count;
 932         }
 933
 934         if (!strcmp(name, "frags")) {
 935                 len = num_arg(&user_buffer[i], 10, &value);
 936                 if (len < 0) {
 937                         return len;
 938                 }
 939                 i += len;
 940                 pkt_dev->nfrags = value;
 941                 sprintf(pg_result, "OK: frags=%u", pkt_dev->nfrags);
 942                 return count;
 943         }
 944         if (!strcmp(name, "delay")) {
 945                 len = num_arg(&user_buffer[i], 10, &value);
 946                 if (len < 0) {
 947                         return len;
 948                 }
 949                 i += len;
 950                 if (value == 0x7FFFFFFF) {
 951                         pkt_dev->delay_us = 0x7FFFFFFF;
 952                         pkt_dev->delay_ns = 0;
 953                 } else {
 954                         pkt_dev->delay_us = value / 1000;
 955                         pkt_dev->delay_ns = value % 1000;
 956                 }
 957                 sprintf(pg_result, "OK: delay=%u",
 958                         1000 * pkt_dev->delay_us + pkt_dev->delay_ns);
 959                 return count;
 960         }
 961         if (!strcmp(name, "udp_src_min")) {
 962                 len = num_arg(&user_buffer[i], 10, &value);
 963                 if (len < 0) {
 964                         return len;
 965                 }
 966                 i += len;
 967                 if (value != pkt_dev->udp_src_min) {
 968                         pkt_dev->udp_src_min = value;
 969                         pkt_dev->cur_udp_src = value;
 970                 }
 971                 sprintf(pg_result, "OK: udp_src_min=%u", pkt_dev->udp_src_min);
 972                 return count;
 973         }
 974         if (!strcmp(name, "udp_dst_min")) {
 975                 len = num_arg(&user_buffer[i], 10, &value);
 976                 if (len < 0) {
 977                         return len;
 978                 }
 979                 i += len;
 980                 if (value != pkt_dev->udp_dst_min) {
 981                         pkt_dev->udp_dst_min = value;
 982                         pkt_dev->cur_udp_dst = value;
 983                 }
 984                 sprintf(pg_result, "OK: udp_dst_min=%u", pkt_dev->udp_dst_min);
 985                 return count;
 986         }
 987         if (!strcmp(name, "udp_src_max")) {
 988                 len = num_arg(&user_buffer[i], 10, &value);
 989                 if (len < 0) {
 990                         return len;
 991                 }
 992                 i += len;
 993                 if (value != pkt_dev->udp_src_max) {
 994                         pkt_dev->udp_src_max = value;
 995                         pkt_dev->cur_udp_src = value;
 996                 }
 997                 sprintf(pg_result, "OK: udp_src_max=%u", pkt_dev->udp_src_max);
 998                 return count;
 999         }
1000         if (!strcmp(name, "udp_dst_max")) {
1001                 len = num_arg(&user_buffer[i], 10, &value);
1002                 if (len < 0) {
1003                         return len;
1004                 }
1005                 i += len;
1006                 if (value != pkt_dev->udp_dst_max) {
1007                         pkt_dev->udp_dst_max = value;
1008                         pkt_dev->cur_udp_dst = value;
1009                 }
1010                 sprintf(pg_result, "OK: udp_dst_max=%u", pkt_dev->udp_dst_max);
1011                 return count;
1012         }
1013         if (!strcmp(name, "clone_skb")) {
1014                 len = num_arg(&user_buffer[i], 10, &value);
1015                 if (len < 0) {
1016                         return len;
1017                 }
1018                 i += len;
1019                 pkt_dev->clone_skb = value;
1020
1021                 sprintf(pg_result, "OK: clone_skb=%d", pkt_dev->clone_skb);
1022                 return count;
1023         }
1024         if (!strcmp(name, "count")) {
1025                 len = num_arg(&user_buffer[i], 10, &value);
1026                 if (len < 0) {
1027                         return len;
1028                 }
1029                 i += len;
1030                 pkt_dev->count = value;
1031                 sprintf(pg_result, "OK: count=%llu",
1032                         (unsigned long long)pkt_dev->count);
1033                 return count;
1034         }
1035         if (!strcmp(name, "src_mac_count")) {
1036                 len = num_arg(&user_buffer[i], 10, &value);
1037                 if (len < 0) {
1038                         return len;
1039                 }
1040                 i += len;
1041                 if (pkt_dev->src_mac_count != value) {
1042                         pkt_dev->src_mac_count = value;
1043                         pkt_dev->cur_src_mac_offset = 0;
1044                 }
1045                 sprintf(pg_result, "OK: src_mac_count=%d",
1046                         pkt_dev->src_mac_count);
1047                 return count;
1048         }
1049         if (!strcmp(name, "dst_mac_count")) {
1050                 len = num_arg(&user_buffer[i], 10, &value);
1051                 if (len < 0) {
1052                         return len;
1053                 }
1054                 i += len;
1055                 if (pkt_dev->dst_mac_count != value) {
1056                         pkt_dev->dst_mac_count = value;
1057                         pkt_dev->cur_dst_mac_offset = 0;
1058                 }
1059                 sprintf(pg_result, "OK: dst_mac_count=%d",
1060                         pkt_dev->dst_mac_count);
1061                 return count;
1062         }
1063         if (!strcmp(name, "flag")) {
1064                 char f[32];
1065                 memset(f, 0, 32);
1066                 len = strn_len(&user_buffer[i], sizeof(f) - 1);
1067                 if (len < 0) {
1068                         return len;
1069                 }
1070                 if (copy_from_user(f, &user_buffer[i], len))
1071                         return -EFAULT;
1072                 i += len;
1073                 if (strcmp(f, "IPSRC_RND") == 0)
1074                         pkt_dev->flags |= F_IPSRC_RND;
1075
1076                 else if (strcmp(f, "!IPSRC_RND") == 0)
1077                         pkt_dev->flags &= ~F_IPSRC_RND;
1078
1079                 else if (strcmp(f, "TXSIZE_RND") == 0)
1080                         pkt_dev->flags |= F_TXSIZE_RND;
1081
1082                 else if (strcmp(f, "!TXSIZE_RND") == 0)
1083                         pkt_dev->flags &= ~F_TXSIZE_RND;
1084
1085                 else if (strcmp(f, "IPDST_RND") == 0)
1086                         pkt_dev->flags |= F_IPDST_RND;
1087
1088                 else if (strcmp(f, "!IPDST_RND") == 0)
1089                         pkt_dev->flags &= ~F_IPDST_RND;
1090
1091                 else if (strcmp(f, "UDPSRC_RND") == 0)
1092                         pkt_dev->flags |= F_UDPSRC_RND;
1093
1094                 else if (strcmp(f, "!UDPSRC_RND") == 0)
1095                         pkt_dev->flags &= ~F_UDPSRC_RND;
1096
1097                 else if (strcmp(f, "UDPDST_RND") == 0)
1098                         pkt_dev->flags |= F_UDPDST_RND;
1099
1100                 else if (strcmp(f, "!UDPDST_RND") == 0)
1101                         pkt_dev->flags &= ~F_UDPDST_RND;
1102
1103                 else if (strcmp(f, "MACSRC_RND") == 0)
1104                         pkt_dev->flags |= F_MACSRC_RND;
1105
1106                 else if (strcmp(f, "!MACSRC_RND") == 0)
1107                         pkt_dev->flags &= ~F_MACSRC_RND;
1108
1109                 else if (strcmp(f, "MACDST_RND") == 0)
1110                         pkt_dev->flags |= F_MACDST_RND;
1111
1112                 else if (strcmp(f, "!MACDST_RND") == 0)
1113                         pkt_dev->flags &= ~F_MACDST_RND;
1114
1115                 else if (strcmp(f, "MPLS_RND") == 0)
1116                         pkt_dev->flags |= F_MPLS_RND;
1117
1118                 else if (strcmp(f, "!MPLS_RND") == 0)
1119                         pkt_dev->flags &= ~F_MPLS_RND;
1120
1121                 else if (strcmp(f, "VID_RND") == 0)
1122                         pkt_dev->flags |= F_VID_RND;
1123
1124                 else if (strcmp(f, "!VID_RND") == 0)
1125                         pkt_dev->flags &= ~F_VID_RND;
1126
1127                 else if (strcmp(f, "SVID_RND") == 0)
1128                         pkt_dev->flags |= F_SVID_RND;
1129
1130                 else if (strcmp(f, "!SVID_RND") == 0)
1131                         pkt_dev->flags &= ~F_SVID_RND;
1132
1133                 else if (strcmp(f, "FLOW_SEQ") == 0)
1134                         pkt_dev->flags |= F_FLOW_SEQ;
1135
1136                 else if (strcmp(f, "QUEUE_MAP_RND") == 0)
1137                         pkt_dev->flags |= F_QUEUE_MAP_RND;
1138
1139                 else if (strcmp(f, "!QUEUE_MAP_RND") == 0)
1140                         pkt_dev->flags &= ~F_QUEUE_MAP_RND;
1141
1142                 else if (strcmp(f, "QUEUE_MAP_CPU") == 0)
1143                         pkt_dev->flags |= F_QUEUE_MAP_CPU;
1144
1145                 else if (strcmp(f, "!QUEUE_MAP_CPU") == 0)
1146                         pkt_dev->flags &= ~F_QUEUE_MAP_CPU;
1147 #ifdef CONFIG_XFRM
1148                 else if (strcmp(f, "IPSEC") == 0)
1149                         pkt_dev->flags |= F_IPSEC_ON;
1150 #endif
1151
1152                 else if (strcmp(f, "!IPV6") == 0)
1153                         pkt_dev->flags &= ~F_IPV6;
1154
1155                 else {
1156                         sprintf(pg_result,
1157                                 "Flag -:%s:- unknown\nAvailable flags, (prepend ! to un-set flag):\n%s",
1158                                 f,
1159                                 "IPSRC_RND, IPDST_RND, UDPSRC_RND, UDPDST_RND, "
1160                                 "MACSRC_RND, MACDST_RND, TXSIZE_RND, IPV6, MPLS_RND, VID_RND, SVID_RND, FLOW_SEQ, IPSEC\n");
1161                         return count;
1162                 }
1163                 sprintf(pg_result, "OK: flags=0x%x", pkt_dev->flags);
1164                 return count;
1165         }
1166         if (!strcmp(name, "dst_min") || !strcmp(name, "dst")) {
1167                 len = strn_len(&user_buffer[i], sizeof(pkt_dev->dst_min) - 1);
1168                 if (len < 0) {
1169                         return len;
1170                 }
1171
1172                 if (copy_from_user(buf, &user_buffer[i], len))
1173                         return -EFAULT;
1174                 buf[len] = 0;
1175                 if (strcmp(buf, pkt_dev->dst_min) != 0) {
1176                         memset(pkt_dev->dst_min, 0, sizeof(pkt_dev->dst_min));
1177                         strncpy(pkt_dev->dst_min, buf, len);
1178                         pkt_dev->daddr_min = in_aton(pkt_dev->dst_min);
1179                         pkt_dev->cur_daddr = pkt_dev->daddr_min;
1180                 }
1181                 if (debug)
1182                         printk(KERN_DEBUG "pktgen: dst_min set to: %s\n",
1183                                pkt_dev->dst_min);
1184                 i += len;
1185                 sprintf(pg_result, "OK: dst_min=%s", pkt_dev->dst_min);
1186                 return count;
1187         }
1188         if (!strcmp(name, "dst_max")) {
1189                 len = strn_len(&user_buffer[i], sizeof(pkt_dev->dst_max) - 1);
1190                 if (len < 0) {
1191                         return len;
1192                 }
1193
1194                 if (copy_from_user(buf, &user_buffer[i], len))
1195                         return -EFAULT;
1196
1197                 buf[len] = 0;
1198                 if (strcmp(buf, pkt_dev->dst_max) != 0) {
1199                         memset(pkt_dev->dst_max, 0, sizeof(pkt_dev->dst_max));
1200                         strncpy(pkt_dev->dst_max, buf, len);
1201                         pkt_dev->daddr_max = in_aton(pkt_dev->dst_max);
1202                         pkt_dev->cur_daddr = pkt_dev->daddr_max;
1203                 }
1204                 if (debug)
1205                         printk(KERN_DEBUG "pktgen: dst_max set to: %s\n",
1206                                pkt_dev->dst_max);
1207                 i += len;
1208                 sprintf(pg_result, "OK: dst_max=%s", pkt_dev->dst_max);
1209                 return count;
1210         }
1211         if (!strcmp(name, "dst6")) {
1212                 len = strn_len(&user_buffer[i], sizeof(buf) - 1);
1213                 if (len < 0)
1214                         return len;
1215
1216                 pkt_dev->flags |= F_IPV6;
1217
1218                 if (copy_from_user(buf, &user_buffer[i], len))
1219                         return -EFAULT;
1220                 buf[len] = 0;
1221
1222                 scan_ip6(buf, pkt_dev->in6_daddr.s6_addr);
1223                 fmt_ip6(buf, pkt_dev->in6_daddr.s6_addr);
1224
1225                 ipv6_addr_copy(&pkt_dev->cur_in6_daddr, &pkt_dev->in6_daddr);
1226
1227                 if (debug)
1228                         printk(KERN_DEBUG "pktgen: dst6 set to: %s\n", buf);
1229
1230                 i += len;
1231                 sprintf(pg_result, "OK: dst6=%s", buf);
1232                 return count;
1233         }
1234         if (!strcmp(name, "dst6_min")) {
1235                 len = strn_len(&user_buffer[i], sizeof(buf) - 1);
1236                 if (len < 0)
1237                         return len;
1238
1239                 pkt_dev->flags |= F_IPV6;
1240
1241                 if (copy_from_user(buf, &user_buffer[i], len))
1242                         return -EFAULT;
1243                 buf[len] = 0;
1244
1245                 scan_ip6(buf, pkt_dev->min_in6_daddr.s6_addr);
1246                 fmt_ip6(buf, pkt_dev->min_in6_daddr.s6_addr);
1247
1248                 ipv6_addr_copy(&pkt_dev->cur_in6_daddr,
1249                                &pkt_dev->min_in6_daddr);
1250                 if (debug)
1251                         printk(KERN_DEBUG "pktgen: dst6_min set to: %s\n", buf);
1252
1253                 i += len;
1254                 sprintf(pg_result, "OK: dst6_min=%s", buf);
1255                 return count;
1256         }
1257         if (!strcmp(name, "dst6_max")) {
1258                 len = strn_len(&user_buffer[i], sizeof(buf) - 1);
1259                 if (len < 0)
1260                         return len;
1261
1262                 pkt_dev->flags |= F_IPV6;
1263
1264                 if (copy_from_user(buf, &user_buffer[i], len))
1265                         return -EFAULT;
1266                 buf[len] = 0;
1267
1268                 scan_ip6(buf, pkt_dev->max_in6_daddr.s6_addr);
1269                 fmt_ip6(buf, pkt_dev->max_in6_daddr.s6_addr);
1270
1271                 if (debug)
1272                         printk(KERN_DEBUG "pktgen: dst6_max set to: %s\n", buf);
1273
1274                 i += len;
1275                 sprintf(pg_result, "OK: dst6_max=%s", buf);
1276                 return count;
1277         }
1278         if (!strcmp(name, "src6")) {
1279                 len = strn_len(&user_buffer[i], sizeof(buf) - 1);
1280                 if (len < 0)
1281                         return len;
1282
1283                 pkt_dev->flags |= F_IPV6;
1284
1285                 if (copy_from_user(buf, &user_buffer[i], len))
1286                         return -EFAULT;
1287                 buf[len] = 0;
1288
1289                 scan_ip6(buf, pkt_dev->in6_saddr.s6_addr);
1290                 fmt_ip6(buf, pkt_dev->in6_saddr.s6_addr);
1291
1292                 ipv6_addr_copy(&pkt_dev->cur_in6_saddr, &pkt_dev->in6_saddr);
1293
1294                 if (debug)
1295                         printk(KERN_DEBUG "pktgen: src6 set to: %s\n", buf);
1296
1297                 i += len;
1298                 sprintf(pg_result, "OK: src6=%s", buf);
1299                 return count;
1300         }
1301         if (!strcmp(name, "src_min")) {
1302                 len = strn_len(&user_buffer[i], sizeof(pkt_dev->src_min) - 1);
1303                 if (len < 0) {
1304                         return len;
1305                 }
1306                 if (copy_from_user(buf, &user_buffer[i], len))
1307                         return -EFAULT;
1308                 buf[len] = 0;
1309                 if (strcmp(buf, pkt_dev->src_min) != 0) {
1310                         memset(pkt_dev->src_min, 0, sizeof(pkt_dev->src_min));
1311                         strncpy(pkt_dev->src_min, buf, len);
1312                         pkt_dev->saddr_min = in_aton(pkt_dev->src_min);
1313                         pkt_dev->cur_saddr = pkt_dev->saddr_min;
1314                 }
1315                 if (debug)
1316                         printk(KERN_DEBUG "pktgen: src_min set to: %s\n",
1317                                pkt_dev->src_min);
1318                 i += len;
1319                 sprintf(pg_result, "OK: src_min=%s", pkt_dev->src_min);
1320                 return count;
1321         }
1322         if (!strcmp(name, "src_max")) {
1323                 len = strn_len(&user_buffer[i], sizeof(pkt_dev->src_max) - 1);
1324                 if (len < 0) {
1325                         return len;
1326                 }
1327                 if (copy_from_user(buf, &user_buffer[i], len))
1328                         return -EFAULT;
1329                 buf[len] = 0;
1330                 if (strcmp(buf, pkt_dev->src_max) != 0) {
1331                         memset(pkt_dev->src_max, 0, sizeof(pkt_dev->src_max));
1332                         strncpy(pkt_dev->src_max, buf, len);
1333                         pkt_dev->saddr_max = in_aton(pkt_dev->src_max);
1334                         pkt_dev->cur_saddr = pkt_dev->saddr_max;
1335                 }
1336                 if (debug)
1337                         printk(KERN_DEBUG "pktgen: src_max set to: %s\n",
1338                                pkt_dev->src_max);
1339                 i += len;
1340                 sprintf(pg_result, "OK: src_max=%s", pkt_dev->src_max);
1341                 return count;
1342         }
1343         if (!strcmp(name, "dst_mac")) {
1344                 char *v = valstr;
1345                 unsigned char old_dmac[ETH_ALEN];
1346                 unsigned char *m = pkt_dev->dst_mac;
1347                 memcpy(old_dmac, pkt_dev->dst_mac, ETH_ALEN);
1348
1349                 len = strn_len(&user_buffer[i], sizeof(valstr) - 1);
1350                 if (len < 0) {
1351                         return len;
1352                 }
1353                 memset(valstr, 0, sizeof(valstr));
1354                 if (copy_from_user(valstr, &user_buffer[i], len))
1355                         return -EFAULT;
1356                 i += len;
1357
1358                 for (*m = 0; *v && m < pkt_dev->dst_mac + 6; v++) {
1359                         if (*v >= '0' && *v <= '9') {
1360                                 *m *= 16;
1361                                 *m += *v - '0';
1362                         }
1363                         if (*v >= 'A' && *v <= 'F') {
1364                                 *m *= 16;
1365                                 *m += *v - 'A' + 10;
1366                         }
1367                         if (*v >= 'a' && *v <= 'f') {
1368                                 *m *= 16;
1369                                 *m += *v - 'a' + 10;
1370                         }
1371                         if (*v == ':') {
1372                                 m++;
1373                                 *m = 0;
1374                         }
1375                 }
1376
1377                 /* Set up Dest MAC */
1378                 if (compare_ether_addr(old_dmac, pkt_dev->dst_mac))
1379                         memcpy(&(pkt_dev->hh[0]), pkt_dev->dst_mac, ETH_ALEN);
1380
1381                 sprintf(pg_result, "OK: dstmac");
1382                 return count;
1383         }
1384         if (!strcmp(name, "src_mac")) {
1385                 char *v = valstr;
1386                 unsigned char old_smac[ETH_ALEN];
1387                 unsigned char *m = pkt_dev->src_mac;
1388
1389                 memcpy(old_smac, pkt_dev->src_mac, ETH_ALEN);
1390
1391                 len = strn_len(&user_buffer[i], sizeof(valstr) - 1);
1392                 if (len < 0) {
1393                         return len;
1394                 }
1395                 memset(valstr, 0, sizeof(valstr));
1396                 if (copy_from_user(valstr, &user_buffer[i], len))
1397                         return -EFAULT;
1398                 i += len;
1399
1400                 for (*m = 0; *v && m < pkt_dev->src_mac + 6; v++) {
1401                         if (*v >= '0' && *v <= '9') {
1402                                 *m *= 16;
1403                                 *m += *v - '0';
1404                         }
1405                         if (*v >= 'A' && *v <= 'F') {
1406                                 *m *= 16;
1407                                 *m += *v - 'A' + 10;
1408                         }
1409                         if (*v >= 'a' && *v <= 'f') {
1410                                 *m *= 16;
1411                                 *m += *v - 'a' + 10;
1412                         }
1413                         if (*v == ':') {
1414                                 m++;
1415                                 *m = 0;
1416                         }
1417                 }
1418
1419                 /* Set up Src MAC */
1420                 if (compare_ether_addr(old_smac, pkt_dev->src_mac))
1421                         memcpy(&(pkt_dev->hh[6]), pkt_dev->src_mac, ETH_ALEN);
1422
1423                 sprintf(pg_result, "OK: srcmac");
1424                 return count;
1425         }
1426
1427         if (!strcmp(name, "clear_counters")) {
1428                 pktgen_clear_counters(pkt_dev);
1429                 sprintf(pg_result, "OK: Clearing counters.\n");
1430                 return count;
1431         }
1432
1433         if (!strcmp(name, "flows")) {
1434                 len = num_arg(&user_buffer[i], 10, &value);
1435                 if (len < 0) {
1436                         return len;
1437                 }
1438                 i += len;
1439                 if (value > MAX_CFLOWS)
1440                         value = MAX_CFLOWS;
1441
1442                 pkt_dev->cflows = value;
1443                 sprintf(pg_result, "OK: flows=%u", pkt_dev->cflows);
1444                 return count;
1445         }
1446
1447         if (!strcmp(name, "flowlen")) {
1448                 len = num_arg(&user_buffer[i], 10, &value);
1449                 if (len < 0) {
1450                         return len;
1451                 }
1452                 i += len;
1453                 pkt_dev->lflow = value;
1454                 sprintf(pg_result, "OK: flowlen=%u", pkt_dev->lflow);
1455                 return count;
1456         }
1457
1458         if (!strcmp(name, "queue_map_min")) {
1459                 len = num_arg(&user_buffer[i], 5, &value);
1460                 if (len < 0) {
1461                         return len;
1462                 }
1463                 i += len;
1464                 pkt_dev->queue_map_min = value;
1465                 sprintf(pg_result, "OK: queue_map_min=%u", pkt_dev->queue_map_min);
1466                 return count;
1467         }
1468
1469         if (!strcmp(name, "queue_map_max")) {
1470                 len = num_arg(&user_buffer[i], 5, &value);
1471                 if (len < 0) {
1472                         return len;
1473                 }
1474                 i += len;
1475                 pkt_dev->queue_map_max = value;
1476                 sprintf(pg_result, "OK: queue_map_max=%u", pkt_dev->queue_map_max);
1477                 return count;
1478         }
1479
1480         if (!strcmp(name, "mpls")) {
1481                 unsigned n, cnt;
1482
1483                 len = get_labels(&user_buffer[i], pkt_dev);
1484                 if (len < 0)
1485                         return len;
1486                 i += len;
1487                 cnt = sprintf(pg_result, "OK: mpls=");
1488                 for (n = 0; n < pkt_dev->nr_labels; n++)
1489                         cnt += sprintf(pg_result + cnt,
1490                                        "%08x%s", ntohl(pkt_dev->labels[n]),
1491                                        n == pkt_dev->nr_labels-1 ? "" : ",");
1492
1493                 if (pkt_dev->nr_labels && pkt_dev->vlan_id != 0xffff) {
1494                         pkt_dev->vlan_id = 0xffff; /* turn off VLAN/SVLAN */
1495                         pkt_dev->svlan_id = 0xffff;
1496
1497                         if (debug)
1498                                 printk(KERN_DEBUG "pktgen: VLAN/SVLAN auto turned off\n");
1499                 }
1500                 return count;
1501         }
1502
1503         if (!strcmp(name, "vlan_id")) {
1504                 len = num_arg(&user_buffer[i], 4, &value);
1505                 if (len < 0) {
1506                         return len;
1507                 }
1508                 i += len;
1509                 if (value <= 4095) {
1510                         pkt_dev->vlan_id = value;  /* turn on VLAN */
1511
1512                         if (debug)
1513                                 printk(KERN_DEBUG "pktgen: VLAN turned on\n");
1514
1515                         if (debug && pkt_dev->nr_labels)
1516                                 printk(KERN_DEBUG "pktgen: MPLS auto turned off\n");
1517
1518                         pkt_dev->nr_labels = 0;    /* turn off MPLS */
1519                         sprintf(pg_result, "OK: vlan_id=%u", pkt_dev->vlan_id);
1520                 } else {
1521                         pkt_dev->vlan_id = 0xffff; /* turn off VLAN/SVLAN */
1522                         pkt_dev->svlan_id = 0xffff;
1523
1524                         if (debug)
1525                                 printk(KERN_DEBUG "pktgen: VLAN/SVLAN turned off\n");
1526                 }
1527                 return count;
1528         }
1529
1530         if (!strcmp(name, "vlan_p")) {
1531                 len = num_arg(&user_buffer[i], 1, &value);
1532                 if (len < 0) {
1533                         return len;
1534                 }
1535                 i += len;
1536                 if ((value <= 7) && (pkt_dev->vlan_id != 0xffff)) {
1537                         pkt_dev->vlan_p = value;
1538                         sprintf(pg_result, "OK: vlan_p=%u", pkt_dev->vlan_p);
1539                 } else {
1540                         sprintf(pg_result, "ERROR: vlan_p must be 0-7");
1541                 }
1542                 return count;
1543         }
1544
1545         if (!strcmp(name, "vlan_cfi")) {
1546                 len = num_arg(&user_buffer[i], 1, &value);
1547                 if (len < 0) {
1548                         return len;
1549                 }
1550                 i += len;
1551                 if ((value <= 1) && (pkt_dev->vlan_id != 0xffff)) {
1552                         pkt_dev->vlan_cfi = value;
1553                         sprintf(pg_result, "OK: vlan_cfi=%u", pkt_dev->vlan_cfi);
1554                 } else {
1555                         sprintf(pg_result, "ERROR: vlan_cfi must be 0-1");
1556                 }
1557                 return count;
1558         }
1559
1560         if (!strcmp(name, "svlan_id")) {
1561                 len = num_arg(&user_buffer[i], 4, &value);
1562                 if (len < 0) {
1563                         return len;
1564                 }
1565                 i += len;
1566                 if ((value <= 4095) && ((pkt_dev->vlan_id != 0xffff))) {
1567                         pkt_dev->svlan_id = value;  /* turn on SVLAN */
1568
1569                         if (debug)
1570                                 printk(KERN_DEBUG "pktgen: SVLAN turned on\n");
1571
1572                         if (debug && pkt_dev->nr_labels)
1573                                 printk(KERN_DEBUG "pktgen: MPLS auto turned off\n");
1574
1575                         pkt_dev->nr_labels = 0;    /* turn off MPLS */
1576                         sprintf(pg_result, "OK: svlan_id=%u", pkt_dev->svlan_id);
1577                 } else {
1578                         pkt_dev->vlan_id = 0xffff; /* turn off VLAN/SVLAN */
1579                         pkt_dev->svlan_id = 0xffff;
1580
1581                         if (debug)
1582                                 printk(KERN_DEBUG "pktgen: VLAN/SVLAN turned off\n");
1583                 }
1584                 return count;
1585         }
1586
1587         if (!strcmp(name, "svlan_p")) {
1588                 len = num_arg(&user_buffer[i], 1, &value);
1589                 if (len < 0) {
1590                         return len;
1591                 }
1592                 i += len;
1593                 if ((value <= 7) && (pkt_dev->svlan_id != 0xffff)) {
1594                         pkt_dev->svlan_p = value;
1595                         sprintf(pg_result, "OK: svlan_p=%u", pkt_dev->svlan_p);
1596                 } else {
1597                         sprintf(pg_result, "ERROR: svlan_p must be 0-7");
1598                 }
1599                 return count;
1600         }
1601
1602         if (!strcmp(name, "svlan_cfi")) {
1603                 len = num_arg(&user_buffer[i], 1, &value);
1604                 if (len < 0) {
1605                         return len;
1606                 }
1607                 i += len;
1608                 if ((value <= 1) && (pkt_dev->svlan_id != 0xffff)) {
1609                         pkt_dev->svlan_cfi = value;
1610                         sprintf(pg_result, "OK: svlan_cfi=%u", pkt_dev->svlan_cfi);
1611                 } else {
1612                         sprintf(pg_result, "ERROR: svlan_cfi must be 0-1");
1613                 }
1614                 return count;
1615         }
1616
1617         if (!strcmp(name, "tos")) {
1618                 __u32 tmp_value = 0;
1619                 len = hex32_arg(&user_buffer[i], 2, &tmp_value);
1620                 if (len < 0) {
1621                         return len;
1622                 }
1623                 i += len;
1624                 if (len == 2) {
1625                         pkt_dev->tos = tmp_value;
1626                         sprintf(pg_result, "OK: tos=0x%02x", pkt_dev->tos);
1627                 } else {
1628                         sprintf(pg_result, "ERROR: tos must be 00-ff");
1629                 }
1630                 return count;
1631         }
1632
1633         if (!strcmp(name, "traffic_class")) {
1634                 __u32 tmp_value = 0;
1635                 len = hex32_arg(&user_buffer[i], 2, &tmp_value);
1636                 if (len < 0) {
1637                         return len;
1638                 }
1639                 i += len;
1640                 if (len == 2) {
1641                         pkt_dev->traffic_class = tmp_value;
1642                         sprintf(pg_result, "OK: traffic_class=0x%02x", pkt_dev->traffic_class);
1643                 } else {
1644                         sprintf(pg_result, "ERROR: traffic_class must be 00-ff");
1645                 }
1646                 return count;
1647         }
1648
1649         sprintf(pkt_dev->result, "No such parameter \"%s\"", name);
1650         return -EINVAL;
1651 }
1652
1653 static int pktgen_if_open(struct inode *inode, struct file *file)
1654 {
1655         return single_open(file, pktgen_if_show, PDE(inode)->data);
1656 }
1657
1658 static const struct file_operations pktgen_if_fops = {
1659         .owner   = THIS_MODULE,
1660         .open    = pktgen_if_open,
1661         .read    = seq_read,
1662         .llseek  = seq_lseek,
1663         .write   = pktgen_if_write,
1664         .release = single_release,
1665 };
1666
1667 static int pktgen_thread_show(struct seq_file *seq, void *v)
1668 {
1669         struct pktgen_thread *t = seq->private;
1670         struct pktgen_dev *pkt_dev;
1671
1672         BUG_ON(!t);
1673
1674         seq_printf(seq, "Running: ");
1675
1676         if_lock(t);
1677         list_for_each_entry(pkt_dev, &t->if_list, list)
1678                 if (pkt_dev->running)
1679                         seq_printf(seq, "%s ", pkt_dev->odev->name);
1680
1681         seq_printf(seq, "\nStopped: ");
1682
1683         list_for_each_entry(pkt_dev, &t->if_list, list)
1684                 if (!pkt_dev->running)
1685                         seq_printf(seq, "%s ", pkt_dev->odev->name);
1686
1687         if (t->result[0])
1688                 seq_printf(seq, "\nResult: %s\n", t->result);
1689         else
1690                 seq_printf(seq, "\nResult: NA\n");
1691
1692         if_unlock(t);
1693
1694         return 0;
1695 }
1696
1697 static ssize_t pktgen_thread_write(struct file *file,
1698                                    const char __user * user_buffer,
1699                                    size_t count, loff_t * offset)
1700 {
1701         struct seq_file *seq = (struct seq_file *)file->private_data;
1702         struct pktgen_thread *t = seq->private;
1703         int i = 0, max, len, ret;
1704         char name[40];
1705         char *pg_result;
1706
1707         if (count < 1) {
1708                 //      sprintf(pg_result, "Wrong command format");
1709                 return -EINVAL;
1710         }
1711
1712         max = count - i;
1713         len = count_trail_chars(&user_buffer[i], max);
1714         if (len < 0)
1715                 return len;
1716
1717         i += len;
1718
1719         /* Read variable name */
1720
1721         len = strn_len(&user_buffer[i], sizeof(name) - 1);
1722         if (len < 0)
1723                 return len;
1724
1725         memset(name, 0, sizeof(name));
1726         if (copy_from_user(name, &user_buffer[i], len))
1727                 return -EFAULT;
1728         i += len;
1729
1730         max = count - i;
1731         len = count_trail_chars(&user_buffer[i], max);
1732         if (len < 0)
1733                 return len;
1734
1735         i += len;
1736
1737         if (debug)
1738                 printk(KERN_DEBUG "pktgen: t=%s, count=%lu\n",
1739                        name, (unsigned long)count);
1740
1741         if (!t) {
1742                 printk(KERN_ERR "pktgen: ERROR: No thread\n");
1743                 ret = -EINVAL;
1744                 goto out;
1745         }
1746
1747         pg_result = &(t->result[0]);
1748
1749         if (!strcmp(name, "add_device")) {
1750                 char f[32];
1751                 memset(f, 0, 32);
1752                 len = strn_len(&user_buffer[i], sizeof(f) - 1);
1753                 if (len < 0) {
1754                         ret = len;
1755                         goto out;
1756                 }
1757                 if (copy_from_user(f, &user_buffer[i], len))
1758                         return -EFAULT;
1759                 i += len;
1760                 mutex_lock(&pktgen_thread_lock);
1761                 pktgen_add_device(t, f);
1762                 mutex_unlock(&pktgen_thread_lock);
1763                 ret = count;
1764                 sprintf(pg_result, "OK: add_device=%s", f);
1765                 goto out;
1766         }
1767
1768         if (!strcmp(name, "rem_device_all")) {
1769                 mutex_lock(&pktgen_thread_lock);
1770                 t->control |= T_REMDEVALL;
1771                 mutex_unlock(&pktgen_thread_lock);
1772                 schedule_timeout_interruptible(msecs_to_jiffies(125));  /* Propagate thread->control  */
1773                 ret = count;
1774                 sprintf(pg_result, "OK: rem_device_all");
1775                 goto out;
1776         }
1777
1778         if (!strcmp(name, "max_before_softirq")) {
1779                 sprintf(pg_result, "OK: Note! max_before_softirq is obsoleted -- Do not use");
1780                 ret = count;
1781                 goto out;
1782         }
1783
1784         ret = -EINVAL;
1785 out:
1786         return ret;
1787 }
1788
1789 static int pktgen_thread_open(struct inode *inode, struct file *file)
1790 {
1791         return single_open(file, pktgen_thread_show, PDE(inode)->data);
1792 }
1793
1794 static const struct file_operations pktgen_thread_fops = {
1795         .owner   = THIS_MODULE,
1796         .open    = pktgen_thread_open,
1797         .read    = seq_read,
1798         .llseek  = seq_lseek,
1799         .write   = pktgen_thread_write,
1800         .release = single_release,
1801 };
1802
1803 /* Think find or remove for NN */
1804 static struct pktgen_dev *__pktgen_NN_threads(const char *ifname, int remove)
1805 {
1806         struct pktgen_thread *t;
1807         struct pktgen_dev *pkt_dev = NULL;
1808
1809         list_for_each_entry(t, &pktgen_threads, th_list) {
1810                 pkt_dev = pktgen_find_dev(t, ifname);
1811                 if (pkt_dev) {
1812                         if (remove) {
1813                                 if_lock(t);
1814                                 pkt_dev->removal_mark = 1;
1815                                 t->control |= T_REMDEV;
1816                                 if_unlock(t);
1817                         }
1818                         break;
1819                 }
1820         }
1821         return pkt_dev;
1822 }
1823
1824 /*
1825  * mark a device for removal
1826  */
1827 static void pktgen_mark_device(const char *ifname)
1828 {
1829         struct pktgen_dev *pkt_dev = NULL;
1830         const int max_tries = 10, msec_per_try = 125;
1831         int i = 0;
1832
1833         mutex_lock(&pktgen_thread_lock);
1834         pr_debug("pktgen: pktgen_mark_device marking %s for removal\n", ifname);
1835
1836         while (1) {
1837
1838                 pkt_dev = __pktgen_NN_threads(ifname, REMOVE);
1839                 if (pkt_dev == NULL)
1840                         break;  /* success */
1841
1842                 mutex_unlock(&pktgen_thread_lock);
1843                 pr_debug("pktgen: pktgen_mark_device waiting for %s "
1844                                 "to disappear....\n", ifname);
1845                 schedule_timeout_interruptible(msecs_to_jiffies(msec_per_try));
1846                 mutex_lock(&pktgen_thread_lock);
1847
1848                 if (++i >= max_tries) {
1849                         printk(KERN_ERR "pktgen_mark_device: timed out after "
1850                                "waiting %d msec for device %s to be removed\n",
1851                                msec_per_try * i, ifname);
1852                         break;
1853                 }
1854
1855         }
1856
1857         mutex_unlock(&pktgen_thread_lock);
1858 }
1859
1860 static void pktgen_change_name(struct net_device *dev)
1861 {
1862         struct pktgen_thread *t;
1863
1864         list_for_each_entry(t, &pktgen_threads, th_list) {
1865                 struct pktgen_dev *pkt_dev;
1866
1867                 list_for_each_entry(pkt_dev, &t->if_list, list) {
1868                         if (pkt_dev->odev != dev)
1869                                 continue;
1870
1871                         remove_proc_entry(pkt_dev->entry->name, pg_proc_dir);
1872
1873                         pkt_dev->entry = create_proc_entry(dev->name, 0600,
1874                                                            pg_proc_dir);
1875                         if (!pkt_dev->entry)
1876                                 printk(KERN_ERR "pktgen: can't move proc "
1877                                        " entry for '%s'\n", dev->name);
1878                         break;
1879                 }
1880         }
1881 }
1882
1883 static int pktgen_device_event(struct notifier_block *unused,
1884                                unsigned long event, void *ptr)
1885 {
1886         struct net_device *dev = ptr;
1887
1888         if (!net_eq(dev_net(dev), &init_net))
1889                 return NOTIFY_DONE;
1890
1891         /* It is OK that we do not hold the group lock right now,
1892          * as we run under the RTNL lock.
1893          */
1894
1895         switch (event) {
1896         case NETDEV_CHANGENAME:
1897                 pktgen_change_name(dev);
1898                 break;
1899
1900         case NETDEV_UNREGISTER:
1901                 pktgen_mark_device(dev->name);
1902                 break;
1903         }
1904
1905         return NOTIFY_DONE;
1906 }
1907
1908 static struct net_device *pktgen_dev_get_by_name(struct pktgen_dev *pkt_dev, const char *ifname)
1909 {
1910         char b[IFNAMSIZ+5];
1911         int i = 0;
1912
1913         for(i=0; ifname[i] != '@'; i++) {
1914                 if(i == IFNAMSIZ)
1915                         break;
1916
1917                 b[i] = ifname[i];
1918         }
1919         b[i] = 0;
1920
1921         return dev_get_by_name(&init_net, b);
1922 }
1923
1924
1925 /* Associate pktgen_dev with a device. */
1926
1927 static int pktgen_setup_dev(struct pktgen_dev *pkt_dev, const char *ifname)
1928 {
1929         struct net_device *odev;
1930         int err;
1931
1932         /* Clean old setups */
1933         if (pkt_dev->odev) {
1934                 dev_put(pkt_dev->odev);
1935                 pkt_dev->odev = NULL;
1936         }
1937
1938         odev = pktgen_dev_get_by_name(pkt_dev, ifname);
1939         if (!odev) {
1940                 printk(KERN_ERR "pktgen: no such netdevice: \"%s\"\n", ifname);
1941                 return -ENODEV;
1942         }
1943
1944         if (odev->type != ARPHRD_ETHER) {
1945                 printk(KERN_ERR "pktgen: not an ethernet device: \"%s\"\n", ifname);
1946                 err = -EINVAL;
1947         } else if (!netif_running(odev)) {
1948                 printk(KERN_ERR "pktgen: device is down: \"%s\"\n", ifname);
1949                 err = -ENETDOWN;
1950         } else {
1951                 pkt_dev->odev = odev;
1952                 return 0;
1953         }
1954
1955         dev_put(odev);
1956         return err;
1957 }
1958
1959 /* Read pkt_dev from the interface and set up internal pktgen_dev
1960  * structure to have the right information to create/send packets
1961  */
1962 static void pktgen_setup_inject(struct pktgen_dev *pkt_dev)
1963 {
1964         int ntxq;
1965
1966         if (!pkt_dev->odev) {
1967                 printk(KERN_ERR "pktgen: ERROR: pkt_dev->odev == NULL in "
1968                        "setup_inject.\n");
1969                 sprintf(pkt_dev->result,
1970                         "ERROR: pkt_dev->odev == NULL in setup_inject.\n");
1971                 return;
1972         }
1973
1974         /* make sure that we don't pick a non-existing transmit queue */
1975         ntxq = pkt_dev->odev->real_num_tx_queues;
1976
1977         if (ntxq <= pkt_dev->queue_map_min) {
1978                 printk(KERN_WARNING "pktgen: WARNING: Requested "
1979                        "queue_map_min (zero-based) (%d) exceeds valid range "
1980                        "[0 - %d] for (%d) queues on %s, resetting\n",
1981                        pkt_dev->queue_map_min, (ntxq ?: 1)- 1, ntxq,
1982                        pkt_dev->odev->name);
1983                 pkt_dev->queue_map_min = ntxq - 1;
1984         }
1985         if (pkt_dev->queue_map_max >= ntxq) {
1986                 printk(KERN_WARNING "pktgen: WARNING: Requested "
1987                        "queue_map_max (zero-based) (%d) exceeds valid range "
1988                        "[0 - %d] for (%d) queues on %s, resetting\n",
1989                        pkt_dev->queue_map_max, (ntxq ?: 1)- 1, ntxq,
1990                        pkt_dev->odev->name);
1991                 pkt_dev->queue_map_max = ntxq - 1;
1992         }
1993
1994         /* Default to the interface's mac if not explicitly set. */
1995
1996         if (is_zero_ether_addr(pkt_dev->src_mac))
1997                 memcpy(&(pkt_dev->hh[6]), pkt_dev->odev->dev_addr, ETH_ALEN);
1998
1999         /* Set up Dest MAC */
2000         memcpy(&(pkt_dev->hh[0]), pkt_dev->dst_mac, ETH_ALEN);
2001
2002         /* Set up pkt size */
2003         pkt_dev->cur_pkt_size = pkt_dev->min_pkt_size;
2004
2005         if (pkt_dev->flags & F_IPV6) {
2006                 /*
2007                  * Skip this automatic address setting until locks or functions
2008                  * gets exported
2009                  */
2010
2011 #ifdef NOTNOW
2012                 int i, set = 0, err = 1;
2013                 struct inet6_dev *idev;
2014
2015                 for (i = 0; i < IN6_ADDR_HSIZE; i++)
2016                         if (pkt_dev->cur_in6_saddr.s6_addr[i]) {
2017                                 set = 1;
2018                                 break;
2019                         }
2020
2021                 if (!set) {
2022
2023                         /*
2024                          * Use linklevel address if unconfigured.
2025                          *
2026                          * use ipv6_get_lladdr if/when it's get exported
2027                          */
2028
2029                         rcu_read_lock();
2030                         if ((idev = __in6_dev_get(pkt_dev->odev)) != NULL) {
2031                                 struct inet6_ifaddr *ifp;
2032
2033                                 read_lock_bh(&idev->lock);
2034                                 for (ifp = idev->addr_list; ifp;
2035                                      ifp = ifp->if_next) {
2036                                         if (ifp->scope == IFA_LINK
2037                                             && !(ifp->
2038                                                  flags & IFA_F_TENTATIVE)) {
2039                                                 ipv6_addr_copy(&pkt_dev->
2040                                                                cur_in6_saddr,
2041                                                                &ifp->addr);
2042                                                 err = 0;
2043                                                 break;
2044                                         }
2045                                 }
2046                                 read_unlock_bh(&idev->lock);
2047                         }
2048                         rcu_read_unlock();
2049                         if (err)
2050                                 printk(KERN_ERR "pktgen: ERROR: IPv6 link "
2051                                        "address not availble.\n");
2052                 }
2053 #endif
2054         } else {
2055                 pkt_dev->saddr_min = 0;
2056                 pkt_dev->saddr_max = 0;
2057                 if (strlen(pkt_dev->src_min) == 0) {
2058
2059                         struct in_device *in_dev;
2060
2061                         rcu_read_lock();
2062                         in_dev = __in_dev_get_rcu(pkt_dev->odev);
2063                         if (in_dev) {
2064                                 if (in_dev->ifa_list) {
2065                                         pkt_dev->saddr_min =
2066                                             in_dev->ifa_list->ifa_address;
2067                                         pkt_dev->saddr_max = pkt_dev->saddr_min;
2068                                 }
2069                         }
2070                         rcu_read_unlock();
2071                 } else {
2072                         pkt_dev->saddr_min = in_aton(pkt_dev->src_min);
2073                         pkt_dev->saddr_max = in_aton(pkt_dev->src_max);
2074                 }
2075
2076                 pkt_dev->daddr_min = in_aton(pkt_dev->dst_min);
2077                 pkt_dev->daddr_max = in_aton(pkt_dev->dst_max);
2078         }
2079         /* Initialize current values. */
2080         pkt_dev->cur_dst_mac_offset = 0;
2081         pkt_dev->cur_src_mac_offset = 0;
2082         pkt_dev->cur_saddr = pkt_dev->saddr_min;
2083         pkt_dev->cur_daddr = pkt_dev->daddr_min;
2084         pkt_dev->cur_udp_dst = pkt_dev->udp_dst_min;
2085         pkt_dev->cur_udp_src = pkt_dev->udp_src_min;
2086         pkt_dev->nflows = 0;
2087 }
2088
2089 static void spin(struct pktgen_dev *pkt_dev, __u64 spin_until_us)
2090 {
2091         __u64 start;
2092         __u64 now;
2093
2094         start = now = getCurUs();
2095         while (now < spin_until_us) {
2096                 /* TODO: optimize sleeping behavior */
2097                 if (spin_until_us - now > jiffies_to_usecs(1) + 1)
2098                         schedule_timeout_interruptible(1);
2099                 else if (spin_until_us - now > 100) {
2100                         if (!pkt_dev->running)
2101                                 return;
2102                         if (need_resched())
2103                                 schedule();
2104                 }
2105
2106                 now = getCurUs();
2107         }
2108
2109         pkt_dev->idle_acc += now - start;
2110 }
2111
2112 static inline void set_pkt_overhead(struct pktgen_dev *pkt_dev)
2113 {
2114         pkt_dev->pkt_overhead = 0;
2115         pkt_dev->pkt_overhead += pkt_dev->nr_labels*sizeof(u32);
2116         pkt_dev->pkt_overhead += VLAN_TAG_SIZE(pkt_dev);
2117         pkt_dev->pkt_overhead += SVLAN_TAG_SIZE(pkt_dev);
2118 }
2119
2120 static inline int f_seen(struct pktgen_dev *pkt_dev, int flow)
2121 {
2122
2123         if (pkt_dev->flows[flow].flags & F_INIT)
2124                 return 1;
2125         else
2126                 return 0;
2127 }
2128
2129 static inline int f_pick(struct pktgen_dev *pkt_dev)
2130 {
2131         int flow = pkt_dev->curfl;
2132
2133         if (pkt_dev->flags & F_FLOW_SEQ) {
2134                 if (pkt_dev->flows[flow].count >= pkt_dev->lflow) {
2135                         /* reset time */
2136                         pkt_dev->flows[flow].count = 0;
2137                         pkt_dev->flows[flow].flags = 0;
2138                         pkt_dev->curfl += 1;
2139                         if (pkt_dev->curfl >= pkt_dev->cflows)
2140                                 pkt_dev->curfl = 0; /*reset */
2141                 }
2142         } else {
2143                 flow = random32() % pkt_dev->cflows;
2144                 pkt_dev->curfl = flow;
2145
2146                 if (pkt_dev->flows[flow].count > pkt_dev->lflow) {
2147                         pkt_dev->flows[flow].count = 0;
2148                         pkt_dev->flows[flow].flags = 0;
2149                 }
2150         }
2151
2152         return pkt_dev->curfl;
2153 }
2154
2155
2156 #ifdef CONFIG_XFRM
2157 /* If there was already an IPSEC SA, we keep it as is, else
2158  * we go look for it ...
2159 */
2160 static void get_ipsec_sa(struct pktgen_dev *pkt_dev, int flow)
2161 {
2162         struct xfrm_state *x = pkt_dev->flows[flow].x;
2163         if (!x) {
2164                 /*slow path: we dont already have xfrm_state*/
2165                 x = xfrm_stateonly_find((xfrm_address_t *)&pkt_dev->cur_daddr,
2166                                         (xfrm_address_t *)&pkt_dev->cur_saddr,
2167                                         AF_INET,
2168                                         pkt_dev->ipsmode,
2169                                         pkt_dev->ipsproto, 0);
2170                 if (x) {
2171                         pkt_dev->flows[flow].x = x;
2172                         set_pkt_overhead(pkt_dev);
2173                         pkt_dev->pkt_overhead+=x->props.header_len;
2174                 }
2175
2176         }
2177 }
2178 #endif
2179 static void set_cur_queue_map(struct pktgen_dev *pkt_dev)
2180 {
2181
2182         if (pkt_dev->flags & F_QUEUE_MAP_CPU)
2183                 pkt_dev->cur_queue_map = smp_processor_id();
2184
2185         else if (pkt_dev->queue_map_min < pkt_dev->queue_map_max) {
2186                 __u16 t;
2187                 if (pkt_dev->flags & F_QUEUE_MAP_RND) {
2188                         t = random32() %
2189                                 (pkt_dev->queue_map_max -
2190                                  pkt_dev->queue_map_min + 1)
2191                                 + pkt_dev->queue_map_min;
2192                 } else {
2193                         t = pkt_dev->cur_queue_map + 1;
2194                         if (t > pkt_dev->queue_map_max)
2195                                 t = pkt_dev->queue_map_min;
2196                 }
2197                 pkt_dev->cur_queue_map = t;
2198         }
2199         pkt_dev->cur_queue_map  = pkt_dev->cur_queue_map % pkt_dev->odev->real_num_tx_queues;
2200 }
2201
2202 /* Increment/randomize headers according to flags and current values
2203  * for IP src/dest, UDP src/dst port, MAC-Addr src/dst
2204  */
2205 static void mod_cur_headers(struct pktgen_dev *pkt_dev)
2206 {
2207         __u32 imn;
2208         __u32 imx;
2209         int flow = 0;
2210
2211         if (pkt_dev->cflows)
2212                 flow = f_pick(pkt_dev);
2213
2214         /*  Deal with source MAC */
2215         if (pkt_dev->src_mac_count > 1) {
2216                 __u32 mc;
2217                 __u32 tmp;
2218
2219                 if (pkt_dev->flags & F_MACSRC_RND)
2220                         mc = random32() % pkt_dev->src_mac_count;
2221                 else {
2222                         mc = pkt_dev->cur_src_mac_offset++;
2223                         if (pkt_dev->cur_src_mac_offset >=
2224                             pkt_dev->src_mac_count)
2225                                 pkt_dev->cur_src_mac_offset = 0;
2226                 }
2227
2228                 tmp = pkt_dev->src_mac[5] + (mc & 0xFF);
2229                 pkt_dev->hh[11] = tmp;
2230                 tmp = (pkt_dev->src_mac[4] + ((mc >> 8) & 0xFF) + (tmp >> 8));
2231                 pkt_dev->hh[10] = tmp;
2232                 tmp = (pkt_dev->src_mac[3] + ((mc >> 16) & 0xFF) + (tmp >> 8));
2233                 pkt_dev->hh[9] = tmp;
2234                 tmp = (pkt_dev->src_mac[2] + ((mc >> 24) & 0xFF) + (tmp >> 8));
2235                 pkt_dev->hh[8] = tmp;
2236                 tmp = (pkt_dev->src_mac[1] + (tmp >> 8));
2237                 pkt_dev->hh[7] = tmp;
2238         }
2239
2240         /*  Deal with Destination MAC */
2241         if (pkt_dev->dst_mac_count > 1) {
2242                 __u32 mc;
2243                 __u32 tmp;
2244
2245                 if (pkt_dev->flags & F_MACDST_RND)
2246                         mc = random32() % pkt_dev->dst_mac_count;
2247
2248                 else {
2249                         mc = pkt_dev->cur_dst_mac_offset++;
2250                         if (pkt_dev->cur_dst_mac_offset >=
2251                             pkt_dev->dst_mac_count) {
2252                                 pkt_dev->cur_dst_mac_offset = 0;
2253                         }
2254                 }
2255
2256                 tmp = pkt_dev->dst_mac[5] + (mc & 0xFF);
2257                 pkt_dev->hh[5] = tmp;
2258                 tmp = (pkt_dev->dst_mac[4] + ((mc >> 8) & 0xFF) + (tmp >> 8));
2259                 pkt_dev->hh[4] = tmp;
2260                 tmp = (pkt_dev->dst_mac[3] + ((mc >> 16) & 0xFF) + (tmp >> 8));
2261                 pkt_dev->hh[3] = tmp;
2262                 tmp = (pkt_dev->dst_mac[2] + ((mc >> 24) & 0xFF) + (tmp >> 8));
2263                 pkt_dev->hh[2] = tmp;
2264                 tmp = (pkt_dev->dst_mac[1] + (tmp >> 8));
2265                 pkt_dev->hh[1] = tmp;
2266         }
2267
2268         if (pkt_dev->flags & F_MPLS_RND) {
2269                 unsigned i;
2270                 for (i = 0; i < pkt_dev->nr_labels; i++)
2271                         if (pkt_dev->labels[i] & MPLS_STACK_BOTTOM)
2272                                 pkt_dev->labels[i] = MPLS_STACK_BOTTOM |
2273                                              ((__force __be32)random32() &
2274                                                       htonl(0x000fffff));
2275         }
2276
2277         if ((pkt_dev->flags & F_VID_RND) && (pkt_dev->vlan_id != 0xffff)) {
2278                 pkt_dev->vlan_id = random32() & (4096-1);
2279         }
2280
2281         if ((pkt_dev->flags & F_SVID_RND) && (pkt_dev->svlan_id != 0xffff)) {
2282                 pkt_dev->svlan_id = random32() & (4096 - 1);
2283         }
2284
2285         if (pkt_dev->udp_src_min < pkt_dev->udp_src_max) {
2286                 if (pkt_dev->flags & F_UDPSRC_RND)
2287                         pkt_dev->cur_udp_src = random32() %
2288                                 (pkt_dev->udp_src_max - pkt_dev->udp_src_min)
2289                                 + pkt_dev->udp_src_min;
2290
2291                 else {
2292                         pkt_dev->cur_udp_src++;
2293                         if (pkt_dev->cur_udp_src >= pkt_dev->udp_src_max)
2294                                 pkt_dev->cur_udp_src = pkt_dev->udp_src_min;
2295                 }
2296         }
2297
2298         if (pkt_dev->udp_dst_min < pkt_dev->udp_dst_max) {
2299                 if (pkt_dev->flags & F_UDPDST_RND) {
2300                         pkt_dev->cur_udp_dst = random32() %
2301                                 (pkt_dev->udp_dst_max - pkt_dev->udp_dst_min)
2302                                 + pkt_dev->udp_dst_min;
2303                 } else {
2304                         pkt_dev->cur_udp_dst++;
2305                         if (pkt_dev->cur_udp_dst >= pkt_dev->udp_dst_max)
2306                                 pkt_dev->cur_udp_dst = pkt_dev->udp_dst_min;
2307                 }
2308         }
2309
2310         if (!(pkt_dev->flags & F_IPV6)) {
2311
2312                 if ((imn = ntohl(pkt_dev->saddr_min)) < (imx =
2313                                                          ntohl(pkt_dev->
2314                                                                saddr_max))) {
2315                         __u32 t;
2316                         if (pkt_dev->flags & F_IPSRC_RND)
2317                                 t = random32() % (imx - imn) + imn;
2318                         else {
2319                                 t = ntohl(pkt_dev->cur_saddr);
2320                                 t++;
2321                                 if (t > imx) {
2322                                         t = imn;
2323                                 }
2324                         }
2325                         pkt_dev->cur_saddr = htonl(t);
2326                 }
2327
2328                 if (pkt_dev->cflows && f_seen(pkt_dev, flow)) {
2329                         pkt_dev->cur_daddr = pkt_dev->flows[flow].cur_daddr;
2330                 } else {
2331                         imn = ntohl(pkt_dev->daddr_min);
2332                         imx = ntohl(pkt_dev->daddr_max);
2333                         if (imn < imx) {
2334                                 __u32 t;
2335                                 __be32 s;
2336                                 if (pkt_dev->flags & F_IPDST_RND) {
2337
2338                                         t = random32() % (imx - imn) + imn;
2339                                         s = htonl(t);
2340
2341                                         while (ipv4_is_loopback(s) ||
2342                                                ipv4_is_multicast(s) ||
2343                                                ipv4_is_lbcast(s) ||
2344                                                ipv4_is_zeronet(s) ||
2345                                                ipv4_is_local_multicast(s)) {
2346                                                 t = random32() % (imx - imn) + imn;
2347                                                 s = htonl(t);
2348                                         }
2349                                         pkt_dev->cur_daddr = s;
2350                                 } else {
2351                                         t = ntohl(pkt_dev->cur_daddr);
2352                                         t++;
2353                                         if (t > imx) {
2354                                                 t = imn;
2355                                         }
2356                                         pkt_dev->cur_daddr = htonl(t);
2357                                 }
2358                         }
2359                         if (pkt_dev->cflows) {
2360                                 pkt_dev->flows[flow].flags |= F_INIT;
2361                                 pkt_dev->flows[flow].cur_daddr =
2362                                     pkt_dev->cur_daddr;
2363 #ifdef CONFIG_XFRM
2364                                 if (pkt_dev->flags & F_IPSEC_ON)
2365                                         get_ipsec_sa(pkt_dev, flow);
2366 #endif
2367                                 pkt_dev->nflows++;
2368                         }
2369                 }
2370         } else {                /* IPV6 * */
2371
2372                 if (pkt_dev->min_in6_daddr.s6_addr32[0] == 0 &&
2373                     pkt_dev->min_in6_daddr.s6_addr32[1] == 0 &&
2374                     pkt_dev->min_in6_daddr.s6_addr32[2] == 0 &&
2375                     pkt_dev->min_in6_daddr.s6_addr32[3] == 0) ;
2376                 else {
2377                         int i;
2378
2379                         /* Only random destinations yet */
2380
2381                         for (i = 0; i < 4; i++) {
2382                                 pkt_dev->cur_in6_daddr.s6_addr32[i] =
2383                                     (((__force __be32)random32() |
2384                                       pkt_dev->min_in6_daddr.s6_addr32[i]) &
2385                                      pkt_dev->max_in6_daddr.s6_addr32[i]);
2386                         }
2387                 }
2388         }
2389
2390         if (pkt_dev->min_pkt_size < pkt_dev->max_pkt_size) {
2391                 __u32 t;
2392                 if (pkt_dev->flags & F_TXSIZE_RND) {
2393                         t = random32() %
2394                                 (pkt_dev->max_pkt_size - pkt_dev->min_pkt_size)
2395                                 + pkt_dev->min_pkt_size;
2396                 } else {
2397                         t = pkt_dev->cur_pkt_size + 1;
2398                         if (t > pkt_dev->max_pkt_size)
2399                                 t = pkt_dev->min_pkt_size;
2400                 }
2401                 pkt_dev->cur_pkt_size = t;
2402         }
2403
2404         set_cur_queue_map(pkt_dev);
2405
2406         pkt_dev->flows[flow].count++;
2407 }
2408
2409
2410 #ifdef CONFIG_XFRM
2411 static int pktgen_output_ipsec(struct sk_buff *skb, struct pktgen_dev *pkt_dev)
2412 {
2413         struct xfrm_state *x = pkt_dev->flows[pkt_dev->curfl].x;
2414         int err = 0;
2415         struct iphdr *iph;
2416
2417         if (!x)
2418                 return 0;
2419         /* XXX: we dont support tunnel mode for now until
2420          * we resolve the dst issue */
2421         if (x->props.mode != XFRM_MODE_TRANSPORT)
2422                 return 0;
2423
2424         spin_lock(&x->lock);
2425         iph = ip_hdr(skb);
2426
2427         err = x->outer_mode->output(x, skb);
2428         if (err)
2429                 goto error;
2430         err = x->type->output(x, skb);
2431         if (err)
2432                 goto error;
2433
2434         x->curlft.bytes +=skb->len;
2435         x->curlft.packets++;
2436 error:
2437         spin_unlock(&x->lock);
2438         return err;
2439 }
2440
2441 static inline void free_SAs(struct pktgen_dev *pkt_dev)
2442 {
2443         if (pkt_dev->cflows) {
2444                 /* let go of the SAs if we have them */
2445                 int i = 0;
2446                 for (;  i < pkt_dev->nflows; i++){
2447                         struct xfrm_state *x = pkt_dev->flows[i].x;
2448                         if (x) {
2449                                 xfrm_state_put(x);
2450                                 pkt_dev->flows[i].x = NULL;
2451                         }
2452                 }
2453         }
2454 }
2455
2456 static inline int process_ipsec(struct pktgen_dev *pkt_dev,
2457                               struct sk_buff *skb, __be16 protocol)
2458 {
2459         if (pkt_dev->flags & F_IPSEC_ON) {
2460                 struct xfrm_state *x = pkt_dev->flows[pkt_dev->curfl].x;
2461                 int nhead = 0;
2462                 if (x) {
2463                         int ret;
2464                         __u8 *eth;
2465                         nhead = x->props.header_len - skb_headroom(skb);
2466                         if (nhead >0) {
2467                                 ret = pskb_expand_head(skb, nhead, 0, GFP_ATOMIC);
2468                                 if (ret < 0) {
2469                                         printk(KERN_ERR "Error expanding "
2470                                                "ipsec packet %d\n",ret);
2471                                         goto err;
2472                                 }
2473                         }
2474
2475                         /* ipsec is not expecting ll header */
2476                         skb_pull(skb, ETH_HLEN);
2477                         ret = pktgen_output_ipsec(skb, pkt_dev);
2478                         if (ret) {
2479                                 printk(KERN_ERR "Error creating ipsec "
2480                                        "packet %d\n",ret);
2481                                 goto err;
2482                         }
2483                         /* restore ll */
2484                         eth = (__u8 *) skb_push(skb, ETH_HLEN);
2485                         memcpy(eth, pkt_dev->hh, 12);
2486                         *(u16 *) & eth[12] = protocol;
2487                 }
2488         }
2489         return 1;
2490 err:
2491         kfree_skb(skb);
2492         return 0;
2493 }
2494 #endif
2495
2496 static void mpls_push(__be32 *mpls, struct pktgen_dev *pkt_dev)
2497 {
2498         unsigned i;
2499         for (i = 0; i < pkt_dev->nr_labels; i++) {
2500                 *mpls++ = pkt_dev->labels[i] & ~MPLS_STACK_BOTTOM;
2501         }
2502         mpls--;
2503         *mpls |= MPLS_STACK_BOTTOM;
2504 }
2505
2506 static inline __be16 build_tci(unsigned int id, unsigned int cfi,
2507                                unsigned int prio)
2508 {
2509         return htons(id | (cfi << 12) | (prio << 13));
2510 }
2511
2512 static struct sk_buff *fill_packet_ipv4(struct net_device *odev,
2513                                         struct pktgen_dev *pkt_dev)
2514 {
2515         struct sk_buff *skb = NULL;
2516         __u8 *eth;
2517         struct udphdr *udph;
2518         int datalen, iplen;
2519         struct iphdr *iph;
2520         struct pktgen_hdr *pgh = NULL;
2521         __be16 protocol = htons(ETH_P_IP);
2522         __be32 *mpls;
2523         __be16 *vlan_tci = NULL;                 /* Encapsulates priority and VLAN ID */
2524         __be16 *vlan_encapsulated_proto = NULL;  /* packet type ID field (or len) for VLAN tag */
2525         __be16 *svlan_tci = NULL;                /* Encapsulates priority and SVLAN ID */
2526         __be16 *svlan_encapsulated_proto = NULL; /* packet type ID field (or len) for SVLAN tag */
2527         u16 queue_map;
2528
2529         if (pkt_dev->nr_labels)
2530                 protocol = htons(ETH_P_MPLS_UC);
2531
2532         if (pkt_dev->vlan_id != 0xffff)
2533                 protocol = htons(ETH_P_8021Q);
2534
2535         /* Update any of the values, used when we're incrementing various
2536          * fields.
2537          */
2538         queue_map = pkt_dev->cur_queue_map;
2539         mod_cur_headers(pkt_dev);
2540
2541         datalen = (odev->hard_header_len + 16) & ~0xf;
2542         skb = alloc_skb(pkt_dev->cur_pkt_size + 64 + datalen +
2543                         pkt_dev->pkt_overhead, GFP_ATOMIC);
2544         if (!skb) {
2545                 sprintf(pkt_dev->result, "No memory");
2546                 return NULL;
2547         }
2548
2549         skb_reserve(skb, datalen);
2550
2551         /*  Reserve for ethernet and IP header  */
2552         eth = (__u8 *) skb_push(skb, 14);
2553         mpls = (__be32 *)skb_put(skb, pkt_dev->nr_labels*sizeof(__u32));
2554         if (pkt_dev->nr_labels)
2555                 mpls_push(mpls, pkt_dev);
2556
2557         if (pkt_dev->vlan_id != 0xffff) {
2558                 if (pkt_dev->svlan_id != 0xffff) {
2559                         svlan_tci = (__be16 *)skb_put(skb, sizeof(__be16));
2560                         *svlan_tci = build_tci(pkt_dev->svlan_id,
2561                                                pkt_dev->svlan_cfi,
2562                                                pkt_dev->svlan_p);
2563                         svlan_encapsulated_proto = (__be16 *)skb_put(skb, sizeof(__be16));
2564                         *svlan_encapsulated_proto = htons(ETH_P_8021Q);
2565                 }
2566                 vlan_tci = (__be16 *)skb_put(skb, sizeof(__be16));
2567                 *vlan_tci = build_tci(pkt_dev->vlan_id,
2568                                       pkt_dev->vlan_cfi,
2569                                       pkt_dev->vlan_p);
2570                 vlan_encapsulated_proto = (__be16 *)skb_put(skb, sizeof(__be16));
2571                 *vlan_encapsulated_proto = htons(ETH_P_IP);
2572         }
2573
2574         skb->network_header = skb->tail;
2575         skb->transport_header = skb->network_header + sizeof(struct iphdr);
2576         skb_put(skb, sizeof(struct iphdr) + sizeof(struct udphdr));
2577         skb_set_queue_mapping(skb, queue_map);
2578         iph = ip_hdr(skb);
2579         udph = udp_hdr(skb);
2580
2581         memcpy(eth, pkt_dev->hh, 12);
2582         *(__be16 *) & eth[12] = protocol;
2583
2584         /* Eth + IPh + UDPh + mpls */
2585         datalen = pkt_dev->cur_pkt_size - 14 - 20 - 8 -
2586                   pkt_dev->pkt_overhead;
2587         if (datalen < sizeof(struct pktgen_hdr))
2588                 datalen = sizeof(struct pktgen_hdr);
2589
2590         udph->source = htons(pkt_dev->cur_udp_src);
2591         udph->dest = htons(pkt_dev->cur_udp_dst);
2592         udph->len = htons(datalen + 8); /* DATA + udphdr */
2593         udph->check = 0;        /* No checksum */
2594
2595         iph->ihl = 5;
2596         iph->version = 4;
2597         iph->ttl = 32;
2598         iph->tos = pkt_dev->tos;
2599         iph->protocol = IPPROTO_UDP;    /* UDP */
2600         iph->saddr = pkt_dev->cur_saddr;
2601         iph->daddr = pkt_dev->cur_daddr;
2602         iph->frag_off = 0;
2603         iplen = 20 + 8 + datalen;
2604         iph->tot_len = htons(iplen);
2605         iph->check = 0;
2606         iph->check = ip_fast_csum((void *)iph, iph->ihl);
2607         skb->protocol = protocol;
2608         skb->mac_header = (skb->network_header - ETH_HLEN -
2609                            pkt_dev->pkt_overhead);
2610         skb->dev = odev;
2611         skb->pkt_type = PACKET_HOST;
2612
2613         if (pkt_dev->nfrags <= 0)
2614                 pgh = (struct pktgen_hdr *)skb_put(skb, datalen);
2615         else {
2616                 int frags = pkt_dev->nfrags;
2617                 int i;
2618
2619                 pgh = (struct pktgen_hdr *)(((char *)(udph)) + 8);
2620
2621                 if (frags > MAX_SKB_FRAGS)
2622                         frags = MAX_SKB_FRAGS;
2623                 if (datalen > frags * PAGE_SIZE) {
2624                         skb_put(skb, datalen - frags * PAGE_SIZE);
2625                         datalen = frags * PAGE_SIZE;
2626                 }
2627
2628                 i = 0;
2629                 while (datalen > 0) {
2630                         struct page *page = alloc_pages(GFP_KERNEL, 0);
2631                         skb_shinfo(skb)->frags[i].page = page;
2632                         skb_shinfo(skb)->frags[i].page_offset = 0;
2633                         skb_shinfo(skb)->frags[i].size =
2634                             (datalen < PAGE_SIZE ? datalen : PAGE_SIZE);
2635                         datalen -= skb_shinfo(skb)->frags[i].size;
2636                         skb->len += skb_shinfo(skb)->frags[i].size;
2637                         skb->data_len += skb_shinfo(skb)->frags[i].size;
2638                         i++;
2639                         skb_shinfo(skb)->nr_frags = i;
2640                 }
2641
2642                 while (i < frags) {
2643                         int rem;
2644
2645                         if (i == 0)
2646                                 break;
2647
2648                         rem = skb_shinfo(skb)->frags[i - 1].size / 2;
2649                         if (rem == 0)
2650                                 break;
2651
2652                         skb_shinfo(skb)->frags[i - 1].size -= rem;
2653
2654                         skb_shinfo(skb)->frags[i] =
2655                             skb_shinfo(skb)->frags[i - 1];
2656                         get_page(skb_shinfo(skb)->frags[i].page);
2657                         skb_shinfo(skb)->frags[i].page =
2658                             skb_shinfo(skb)->frags[i - 1].page;
2659                         skb_shinfo(skb)->frags[i].page_offset +=
2660                             skb_shinfo(skb)->frags[i - 1].size;
2661                         skb_shinfo(skb)->frags[i].size = rem;
2662                         i++;
2663                         skb_shinfo(skb)->nr_frags = i;
2664                 }
2665         }
2666
2667         /* Stamp the time, and sequence number, convert them to network byte order */
2668
2669         if (pgh) {
2670                 struct timeval timestamp;
2671
2672                 pgh->pgh_magic = htonl(PKTGEN_MAGIC);
2673                 pgh->seq_num = htonl(pkt_dev->seq_num);
2674
2675                 do_gettimeofday(&timestamp);
2676                 pgh->tv_sec = htonl(timestamp.tv_sec);
2677                 pgh->tv_usec = htonl(timestamp.tv_usec);
2678         }
2679
2680 #ifdef CONFIG_XFRM
2681         if (!process_ipsec(pkt_dev, skb, protocol))
2682                 return NULL;
2683 #endif
2684
2685         return skb;
2686 }
2687
2688 /*
2689  * scan_ip6, fmt_ip taken from dietlibc-0.21
2690  * Author Felix von Leitner <felix-dietlibc@fefe.de>
2691  *
2692  * Slightly modified for kernel.
2693  * Should be candidate for net/ipv4/utils.c
2694  * --ro
2695  */
2696
2697 static unsigned int scan_ip6(const char *s, char ip[16])
2698 {
2699         unsigned int i;
2700         unsigned int len = 0;
2701         unsigned long u;
2702         char suffix[16];
2703         unsigned int prefixlen = 0;
2704         unsigned int suffixlen = 0;
2705         __be32 tmp;
2706         char *pos;
2707
2708         for (i = 0; i < 16; i++)
2709                 ip[i] = 0;
2710
2711         for (;;) {
2712                 if (*s == ':') {
2713                         len++;
2714                         if (s[1] == ':') {      /* Found "::", skip to part 2 */
2715                                 s += 2;
2716                                 len++;
2717                                 break;
2718                         }
2719                         s++;
2720                 }
2721
2722                 u = simple_strtoul(s, &pos, 16);
2723                 i = pos - s;
2724                 if (!i)
2725                         return 0;
2726                 if (prefixlen == 12 && s[i] == '.') {
2727
2728                         /* the last 4 bytes may be written as IPv4 address */
2729
2730                         tmp = in_aton(s);
2731                         memcpy((struct in_addr *)(ip + 12), &tmp, sizeof(tmp));
2732                         return i + len;
2733                 }
2734                 ip[prefixlen++] = (u >> 8);
2735                 ip[prefixlen++] = (u & 255);
2736                 s += i;
2737                 len += i;
2738                 if (prefixlen == 16)
2739                         return len;
2740         }
2741
2742 /* part 2, after "::" */
2743         for (;;) {
2744                 if (*s == ':') {
2745                         if (suffixlen == 0)
2746                                 break;
2747                         s++;
2748                         len++;
2749                 } else if (suffixlen != 0)
2750                         break;
2751
2752                 u = simple_strtol(s, &pos, 16);
2753                 i = pos - s;
2754                 if (!i) {
2755                         if (*s)
2756                                 len--;
2757                         break;
2758                 }
2759                 if (suffixlen + prefixlen <= 12 && s[i] == '.') {
2760                         tmp = in_aton(s);
2761                         memcpy((struct in_addr *)(suffix + suffixlen), &tmp,
2762                                sizeof(tmp));
2763                         suffixlen += 4;
2764                         len += strlen(s);
2765                         break;
2766                 }
2767                 suffix[suffixlen++] = (u >> 8);
2768                 suffix[suffixlen++] = (u & 255);
2769                 s += i;
2770                 len += i;
2771                 if (prefixlen + suffixlen == 16)
2772                         break;
2773         }
2774         for (i = 0; i < suffixlen; i++)
2775                 ip[16 - suffixlen + i] = suffix[i];
2776         return len;
2777 }
2778
2779 static char tohex(char hexdigit)
2780 {
2781         return hexdigit > 9 ? hexdigit + 'a' - 10 : hexdigit + '0';
2782 }
2783
2784 static int fmt_xlong(char *s, unsigned int i)
2785 {
2786         char *bak = s;
2787         *s = tohex((i >> 12) & 0xf);
2788         if (s != bak || *s != '0')
2789                 ++s;
2790         *s = tohex((i >> 8) & 0xf);
2791         if (s != bak || *s != '0')
2792                 ++s;
2793         *s = tohex((i >> 4) & 0xf);
2794         if (s != bak || *s != '0')
2795                 ++s;
2796         *s = tohex(i & 0xf);
2797         return s - bak + 1;
2798 }
2799
2800 static unsigned int fmt_ip6(char *s, const char ip[16])
2801 {
2802         unsigned int len;
2803         unsigned int i;
2804         unsigned int temp;
2805         unsigned int compressing;
2806         int j;
2807
2808         len = 0;
2809         compressing = 0;
2810         for (j = 0; j < 16; j += 2) {
2811
2812 #ifdef V4MAPPEDPREFIX
2813                 if (j == 12 && !memcmp(ip, V4mappedprefix, 12)) {
2814                         inet_ntoa_r(*(struct in_addr *)(ip + 12), s);
2815                         temp = strlen(s);
2816                         return len + temp;
2817                 }
2818 #endif
2819                 temp = ((unsigned long)(unsigned char)ip[j] << 8) +
2820                     (unsigned long)(unsigned char)ip[j + 1];
2821                 if (temp == 0) {
2822                         if (!compressing) {
2823                                 compressing = 1;
2824                                 if (j == 0) {
2825                                         *s++ = ':';
2826                                         ++len;
2827                                 }
2828                         }
2829                 } else {
2830                         if (compressing) {
2831                                 compressing = 0;
2832                                 *s++ = ':';
2833                                 ++len;
2834                         }
2835                         i = fmt_xlong(s, temp);
2836                         len += i;
2837                         s += i;
2838                         if (j < 14) {
2839                                 *s++ = ':';
2840                                 ++len;
2841                         }
2842                 }
2843         }
2844         if (compressing) {
2845                 *s++ = ':';
2846                 ++len;
2847         }
2848         *s = 0;
2849         return len;
2850 }
2851
2852 static struct sk_buff *fill_packet_ipv6(struct net_device *odev,
2853                                         struct pktgen_dev *pkt_dev)
2854 {
2855         struct sk_buff *skb = NULL;
2856         __u8 *eth;
2857         struct udphdr *udph;
2858         int datalen;
2859         struct ipv6hdr *iph;
2860         struct pktgen_hdr *pgh = NULL;
2861         __be16 protocol = htons(ETH_P_IPV6);
2862         __be32 *mpls;
2863         __be16 *vlan_tci = NULL;                 /* Encapsulates priority and VLAN ID */
2864         __be16 *vlan_encapsulated_proto = NULL;  /* packet type ID field (or len) for VLAN tag */
2865         __be16 *svlan_tci = NULL;                /* Encapsulates priority and SVLAN ID */
2866         __be16 *svlan_encapsulated_proto = NULL; /* packet type ID field (or len) for SVLAN tag */
2867         u16 queue_map;
2868
2869         if (pkt_dev->nr_labels)
2870                 protocol = htons(ETH_P_MPLS_UC);
2871
2872         if (pkt_dev->vlan_id != 0xffff)
2873                 protocol = htons(ETH_P_8021Q);
2874
2875         /* Update any of the values, used when we're incrementing various
2876          * fields.
2877          */
2878         queue_map = pkt_dev->cur_queue_map;
2879         mod_cur_headers(pkt_dev);
2880
2881         skb = alloc_skb(pkt_dev->cur_pkt_size + 64 + 16 +
2882                         pkt_dev->pkt_overhead, GFP_ATOMIC);
2883         if (!skb) {
2884                 sprintf(pkt_dev->result, "No memory");
2885                 return NULL;
2886         }
2887
2888         skb_reserve(skb, 16);
2889
2890         /*  Reserve for ethernet and IP header  */
2891         eth = (__u8 *) skb_push(skb, 14);
2892         mpls = (__be32 *)skb_put(skb, pkt_dev->nr_labels*sizeof(__u32));
2893         if (pkt_dev->nr_labels)
2894                 mpls_push(mpls, pkt_dev);
2895
2896         if (pkt_dev->vlan_id != 0xffff) {
2897                 if (pkt_dev->svlan_id != 0xffff) {
2898                         svlan_tci = (__be16 *)skb_put(skb, sizeof(__be16));
2899                         *svlan_tci = build_tci(pkt_dev->svlan_id,
2900                                                pkt_dev->svlan_cfi,
2901                                                pkt_dev->svlan_p);
2902                         svlan_encapsulated_proto = (__be16 *)skb_put(skb, sizeof(__be16));
2903                         *svlan_encapsulated_proto = htons(ETH_P_8021Q);
2904                 }
2905                 vlan_tci = (__be16 *)skb_put(skb, sizeof(__be16));
2906                 *vlan_tci = build_tci(pkt_dev->vlan_id,
2907                                       pkt_dev->vlan_cfi,
2908                                       pkt_dev->vlan_p);
2909                 vlan_encapsulated_proto = (__be16 *)skb_put(skb, sizeof(__be16));
2910                 *vlan_encapsulated_proto = htons(ETH_P_IPV6);
2911         }
2912
2913         skb->network_header = skb->tail;
2914         skb->transport_header = skb->network_header + sizeof(struct ipv6hdr);
2915         skb_put(skb, sizeof(struct ipv6hdr) + sizeof(struct udphdr));
2916         skb_set_queue_mapping(skb, queue_map);
2917         iph = ipv6_hdr(skb);
2918         udph = udp_hdr(skb);
2919
2920         memcpy(eth, pkt_dev->hh, 12);
2921         *(__be16 *) & eth[12] = protocol;
2922
2923         /* Eth + IPh + UDPh + mpls */
2924         datalen = pkt_dev->cur_pkt_size - 14 -
2925                   sizeof(struct ipv6hdr) - sizeof(struct udphdr) -
2926                   pkt_dev->pkt_overhead;
2927
2928         if (datalen < sizeof(struct pktgen_hdr)) {
2929                 datalen = sizeof(struct pktgen_hdr);
2930                 if (net_ratelimit())
2931                         printk(KERN_INFO "pktgen: increased datalen to %d\n",
2932                                datalen);
2933         }
2934
2935         udph->source = htons(pkt_dev->cur_udp_src);
2936         udph->dest = htons(pkt_dev->cur_udp_dst);
2937         udph->len = htons(datalen + sizeof(struct udphdr));
2938         udph->check = 0;        /* No checksum */
2939
2940         *(__be32 *) iph = htonl(0x60000000);    /* Version + flow */
2941
2942         if (pkt_dev->traffic_class) {
2943                 /* Version + traffic class + flow (0) */
2944                 *(__be32 *)iph |= htonl(0x60000000 | (pkt_dev->traffic_class << 20));
2945         }
2946
2947         iph->hop_limit = 32;
2948
2949         iph->payload_len = htons(sizeof(struct udphdr) + datalen);
2950         iph->nexthdr = IPPROTO_UDP;
2951
2952         ipv6_addr_copy(&iph->daddr, &pkt_dev->cur_in6_daddr);
2953         ipv6_addr_copy(&iph->saddr, &pkt_dev->cur_in6_saddr);
2954
2955         skb->mac_header = (skb->network_header - ETH_HLEN -
2956                            pkt_dev->pkt_overhead);
2957         skb->protocol = protocol;
2958         skb->dev = odev;
2959         skb->pkt_type = PACKET_HOST;
2960
2961         if (pkt_dev->nfrags <= 0)
2962                 pgh = (struct pktgen_hdr *)skb_put(skb, datalen);
2963         else {
2964                 int frags = pkt_dev->nfrags;
2965                 int i;
2966
2967                 pgh = (struct pktgen_hdr *)(((char *)(udph)) + 8);
2968
2969                 if (frags > MAX_SKB_FRAGS)
2970                         frags = MAX_SKB_FRAGS;
2971                 if (datalen > frags * PAGE_SIZE) {
2972                         skb_put(skb, datalen - frags * PAGE_SIZE);
2973                         datalen = frags * PAGE_SIZE;
2974                 }
2975
2976                 i = 0;
2977                 while (datalen > 0) {
2978                         struct page *page = alloc_pages(GFP_KERNEL, 0);
2979                         skb_shinfo(skb)->frags[i].page = page;
2980                         skb_shinfo(skb)->frags[i].page_offset = 0;
2981                         skb_shinfo(skb)->frags[i].size =
2982                             (datalen < PAGE_SIZE ? datalen : PAGE_SIZE);
2983                         datalen -= skb_shinfo(skb)->frags[i].size;
2984                         skb->len += skb_shinfo(skb)->frags[i].size;
2985                         skb->data_len += skb_shinfo(skb)->frags[i].size;
2986                         i++;
2987                         skb_shinfo(skb)->nr_frags = i;
2988                 }
2989
2990                 while (i < frags) {
2991                         int rem;
2992
2993                         if (i == 0)
2994                                 break;
2995
2996                         rem = skb_shinfo(skb)->frags[i - 1].size / 2;
2997                         if (rem == 0)
2998                                 break;
2999
3000                         skb_shinfo(skb)->frags[i - 1].size -= rem;
3001
3002                         skb_shinfo(skb)->frags[i] =
3003                             skb_shinfo(skb)->frags[i - 1];
3004                         get_page(skb_shinfo(skb)->frags[i].page);
3005                         skb_shinfo(skb)->frags[i].page =
3006                             skb_shinfo(skb)->frags[i - 1].page;
3007                         skb_shinfo(skb)->frags[i].page_offset +=
3008                             skb_shinfo(skb)->frags[i - 1].size;
3009                         skb_shinfo(skb)->frags[i].size = rem;
3010                         i++;
3011                         skb_shinfo(skb)->nr_frags = i;
3012                 }
3013         }
3014
3015         /* Stamp the time, and sequence number, convert them to network byte order */
3016         /* should we update cloned packets too ? */
3017         if (pgh) {
3018                 struct timeval timestamp;
3019
3020                 pgh->pgh_magic = htonl(PKTGEN_MAGIC);
3021                 pgh->seq_num = htonl(pkt_dev->seq_num);
3022
3023                 do_gettimeofday(&timestamp);
3024                 pgh->tv_sec = htonl(timestamp.tv_sec);
3025                 pgh->tv_usec = htonl(timestamp.tv_usec);
3026         }
3027         /* pkt_dev->seq_num++; FF: you really mean this? */
3028
3029         return skb;
3030 }
3031
3032 static inline struct sk_buff *fill_packet(struct net_device *odev,
3033                                           struct pktgen_dev *pkt_dev)
3034 {
3035         if (pkt_dev->flags & F_IPV6)
3036                 return fill_packet_ipv6(odev, pkt_dev);
3037         else
3038                 return fill_packet_ipv4(odev, pkt_dev);
3039 }
3040
3041 static void pktgen_clear_counters(struct pktgen_dev *pkt_dev)
3042 {
3043         pkt_dev->seq_num = 1;
3044         pkt_dev->idle_acc = 0;
3045         pkt_dev->sofar = 0;
3046         pkt_dev->tx_bytes = 0;
3047         pkt_dev->errors = 0;
3048 }
3049
3050 /* Set up structure for sending pkts, clear counters */
3051
3052 static void pktgen_run(struct pktgen_thread *t)
3053 {
3054         struct pktgen_dev *pkt_dev;
3055         int started = 0;
3056
3057         pr_debug("pktgen: entering pktgen_run. %p\n", t);
3058
3059         if_lock(t);
3060         list_for_each_entry(pkt_dev, &t->if_list, list) {
3061
3062                 /*
3063                  * setup odev and create initial packet.
3064                  */
3065                 pktgen_setup_inject(pkt_dev);
3066
3067                 if (pkt_dev->odev) {
3068                         pktgen_clear_counters(pkt_dev);
3069                         pkt_dev->running = 1;   /* Cranke yeself! */
3070                         pkt_dev->skb = NULL;
3071                         pkt_dev->started_at = getCurUs();
3072                         pkt_dev->next_tx_us = getCurUs();       /* Transmit immediately */
3073                         pkt_dev->next_tx_ns = 0;
3074                         set_pkt_overhead(pkt_dev);
3075
3076                         strcpy(pkt_dev->result, "Starting");
3077                         started++;
3078                 } else
3079                         strcpy(pkt_dev->result, "Error starting");
3080         }
3081         if_unlock(t);
3082         if (started)
3083                 t->control &= ~(T_STOP);
3084 }
3085
3086 static void pktgen_stop_all_threads_ifs(void)
3087 {
3088         struct pktgen_thread *t;
3089
3090         pr_debug("pktgen: entering pktgen_stop_all_threads_ifs.\n");
3091
3092         mutex_lock(&pktgen_thread_lock);
3093
3094         list_for_each_entry(t, &pktgen_threads, th_list)
3095                 t->control |= T_STOP;
3096
3097         mutex_unlock(&pktgen_thread_lock);
3098 }
3099
3100 static int thread_is_running(struct pktgen_thread *t)
3101 {
3102         struct pktgen_dev *pkt_dev;
3103         int res = 0;
3104
3105         list_for_each_entry(pkt_dev, &t->if_list, list)
3106                 if (pkt_dev->running) {
3107                         res = 1;
3108                         break;
3109                 }
3110         return res;
3111 }
3112
3113 static int pktgen_wait_thread_run(struct pktgen_thread *t)
3114 {
3115         if_lock(t);
3116
3117         while (thread_is_running(t)) {
3118
3119                 if_unlock(t);
3120
3121                 msleep_interruptible(100);
3122
3123                 if (signal_pending(current))
3124                         goto signal;
3125                 if_lock(t);
3126         }
3127         if_unlock(t);
3128         return 1;
3129 signal:
3130         return 0;
3131 }
3132
3133 static int pktgen_wait_all_threads_run(void)
3134 {
3135         struct pktgen_thread *t;
3136         int sig = 1;
3137
3138         mutex_lock(&pktgen_thread_lock);
3139
3140         list_for_each_entry(t, &pktgen_threads, th_list) {
3141                 sig = pktgen_wait_thread_run(t);
3142                 if (sig == 0)
3143                         break;
3144         }
3145
3146         if (sig == 0)
3147                 list_for_each_entry(t, &pktgen_threads, th_list)
3148                         t->control |= (T_STOP);
3149
3150         mutex_unlock(&pktgen_thread_lock);
3151         return sig;
3152 }
3153
3154 static void pktgen_run_all_threads(void)
3155 {
3156         struct pktgen_thread *t;
3157
3158         pr_debug("pktgen: entering pktgen_run_all_threads.\n");
3159
3160         mutex_lock(&pktgen_thread_lock);
3161
3162         list_for_each_entry(t, &pktgen_threads, th_list)
3163                 t->control |= (T_RUN);
3164
3165         mutex_unlock(&pktgen_thread_lock);
3166
3167         schedule_timeout_interruptible(msecs_to_jiffies(125));  /* Propagate thread->control  */
3168
3169         pktgen_wait_all_threads_run();
3170 }
3171
3172 static void show_results(struct pktgen_dev *pkt_dev, int nr_frags)
3173 {
3174         __u64 total_us, bps, mbps, pps, idle;
3175         char *p = pkt_dev->result;
3176
3177         total_us = pkt_dev->stopped_at - pkt_dev->started_at;
3178
3179         idle = pkt_dev->idle_acc;
3180
3181         p += sprintf(p, "OK: %llu(c%llu+d%llu) usec, %llu (%dbyte,%dfrags)\n",
3182                      (unsigned long long)total_us,
3183                      (unsigned long long)(total_us - idle),
3184                      (unsigned long long)idle,
3185                      (unsigned long long)pkt_dev->sofar,
3186                      pkt_dev->cur_pkt_size, nr_frags);
3187
3188         pps = pkt_dev->sofar * USEC_PER_SEC;
3189
3190         while ((total_us >> 32) != 0) {
3191                 pps >>= 1;
3192                 total_us >>= 1;
3193         }
3194
3195         do_div(pps, total_us);
3196
3197         bps = pps * 8 * pkt_dev->cur_pkt_size;
3198
3199         mbps = bps;
3200         do_div(mbps, 1000000);
3201         p += sprintf(p, "  %llupps %lluMb/sec (%llubps) errors: %llu",
3202                      (unsigned long long)pps,
3203                      (unsigned long long)mbps,
3204                      (unsigned long long)bps,
3205                      (unsigned long long)pkt_dev->errors);
3206 }
3207
3208 /* Set stopped-at timer, remove from running list, do counters & statistics */
3209
3210 static int pktgen_stop_device(struct pktgen_dev *pkt_dev)
3211 {
3212         int nr_frags = pkt_dev->skb ? skb_shinfo(pkt_dev->skb)->nr_frags : -1;
3213
3214         if (!pkt_dev->running) {
3215                 printk(KERN_WARNING "pktgen: interface: %s is already "
3216                        "stopped\n", pkt_dev->odev->name);
3217                 return -EINVAL;
3218         }
3219
3220         pkt_dev->stopped_at = getCurUs();
3221         pkt_dev->running = 0;
3222
3223         show_results(pkt_dev, nr_frags);
3224
3225         return 0;
3226 }
3227
3228 static struct pktgen_dev *next_to_run(struct pktgen_thread *t)
3229 {
3230         struct pktgen_dev *pkt_dev, *best = NULL;
3231
3232         if_lock(t);
3233
3234         list_for_each_entry(pkt_dev, &t->if_list, list) {
3235                 if (!pkt_dev->running)
3236                         continue;
3237                 if (best == NULL)
3238                         best = pkt_dev;
3239                 else if (pkt_dev->next_tx_us < best->next_tx_us)
3240                         best = pkt_dev;
3241         }
3242         if_unlock(t);
3243         return best;
3244 }
3245
3246 static void pktgen_stop(struct pktgen_thread *t)
3247 {
3248         struct pktgen_dev *pkt_dev;
3249
3250         pr_debug("pktgen: entering pktgen_stop\n");
3251
3252         if_lock(t);
3253
3254         list_for_each_entry(pkt_dev, &t->if_list, list) {
3255                 pktgen_stop_device(pkt_dev);
3256                 if (pkt_dev->skb)
3257                         kfree_skb(pkt_dev->skb);
3258
3259                 pkt_dev->skb = NULL;
3260         }
3261
3262         if_unlock(t);
3263 }
3264
3265 /*
3266  * one of our devices needs to be removed - find it
3267  * and remove it
3268  */
3269 static void pktgen_rem_one_if(struct pktgen_thread *t)
3270 {
3271         struct list_head *q, *n;
3272         struct pktgen_dev *cur;
3273
3274         pr_debug("pktgen: entering pktgen_rem_one_if\n");
3275
3276         if_lock(t);
3277
3278         list_for_each_safe(q, n, &t->if_list) {
3279                 cur = list_entry(q, struct pktgen_dev, list);
3280
3281                 if (!cur->removal_mark)
3282                         continue;
3283
3284                 if (cur->skb)
3285                         kfree_skb(cur->skb);
3286                 cur->skb = NULL;
3287
3288                 pktgen_remove_device(t, cur);
3289
3290                 break;
3291         }
3292
3293         if_unlock(t);
3294 }
3295
3296 static void pktgen_rem_all_ifs(struct pktgen_thread *t)
3297 {
3298         struct list_head *q, *n;
3299         struct pktgen_dev *cur;
3300
3301         /* Remove all devices, free mem */
3302
3303         pr_debug("pktgen: entering pktgen_rem_all_ifs\n");
3304         if_lock(t);
3305
3306         list_for_each_safe(q, n, &t->if_list) {
3307                 cur = list_entry(q, struct pktgen_dev, list);
3308
3309                 if (cur->skb)
3310                         kfree_skb(cur->skb);
3311                 cur->skb = NULL;
3312
3313                 pktgen_remove_device(t, cur);
3314         }
3315
3316         if_unlock(t);
3317 }
3318
3319 static void pktgen_rem_thread(struct pktgen_thread *t)
3320 {
3321         /* Remove from the thread list */
3322
3323         remove_proc_entry(t->tsk->comm, pg_proc_dir);
3324
3325         mutex_lock(&pktgen_thread_lock);
3326
3327         list_del(&t->th_list);
3328
3329         mutex_unlock(&pktgen_thread_lock);
3330 }
3331
3332 static __inline__ void pktgen_xmit(struct pktgen_dev *pkt_dev)
3333 {
3334         struct net_device *odev = NULL;
3335         struct netdev_queue *txq;
3336         __u64 idle_start = 0;
3337         u16 queue_map;
3338         int ret;
3339
3340         odev = pkt_dev->odev;
3341
3342         if (pkt_dev->delay_us || pkt_dev->delay_ns) {
3343                 u64 now;
3344
3345                 now = getCurUs();
3346                 if (now < pkt_dev->next_tx_us)
3347                         spin(pkt_dev, pkt_dev->next_tx_us);
3348
3349                 /* This is max DELAY, this has special meaning of
3350                  * "never transmit"
3351                  */
3352                 if (pkt_dev->delay_us == 0x7FFFFFFF) {
3353                         pkt_dev->next_tx_us = getCurUs() + pkt_dev->delay_us;
3354                         pkt_dev->next_tx_ns = pkt_dev->delay_ns;
3355                         goto out;
3356                 }
3357         }
3358
3359         if (!pkt_dev->skb) {
3360                 set_cur_queue_map(pkt_dev);
3361                 queue_map = pkt_dev->cur_queue_map;
3362         } else {
3363                 queue_map = skb_get_queue_mapping(pkt_dev->skb);
3364         }
3365
3366         txq = netdev_get_tx_queue(odev, queue_map);
3367         if (netif_tx_queue_stopped(txq) ||
3368             netif_tx_queue_frozen(txq) ||
3369             need_resched()) {
3370                 idle_start = getCurUs();
3371
3372                 if (!netif_running(odev)) {
3373                         pktgen_stop_device(pkt_dev);
3374                         if (pkt_dev->skb)
3375                                 kfree_skb(pkt_dev->skb);
3376                         pkt_dev->skb = NULL;
3377                         goto out;
3378                 }
3379                 if (need_resched())
3380                         schedule();
3381
3382                 pkt_dev->idle_acc += getCurUs() - idle_start;
3383
3384                 if (netif_tx_queue_stopped(txq) ||
3385                     netif_tx_queue_frozen(txq)) {
3386                         pkt_dev->next_tx_us = getCurUs();       /* TODO */
3387                         pkt_dev->next_tx_ns = 0;
3388                         goto out;       /* Try the next interface */
3389                 }
3390         }
3391
3392         if (pkt_dev->last_ok || !pkt_dev->skb) {
3393                 if ((++pkt_dev->clone_count >= pkt_dev->clone_skb)
3394                     || (!pkt_dev->skb)) {
3395                         /* build a new pkt */
3396                         if (pkt_dev->skb)
3397                                 kfree_skb(pkt_dev->skb);
3398
3399                         pkt_dev->skb = fill_packet(odev, pkt_dev);
3400                         if (pkt_dev->skb == NULL) {
3401                                 printk(KERN_ERR "pktgen: ERROR: couldn't "
3402                                        "allocate skb in fill_packet.\n");
3403                                 schedule();
3404                                 pkt_dev->clone_count--; /* back out increment, OOM */
3405                                 goto out;
3406                         }
3407                         pkt_dev->allocated_skbs++;
3408                         pkt_dev->clone_count = 0;       /* reset counter */
3409                 }
3410         }
3411
3412         /* fill_packet() might have changed the queue */
3413         queue_map = skb_get_queue_mapping(pkt_dev->skb);
3414         txq = netdev_get_tx_queue(odev, queue_map);
3415
3416         __netif_tx_lock_bh(txq);
3417         if (!netif_tx_queue_stopped(txq) &&
3418             !netif_tx_queue_frozen(txq)) {
3419
3420                 atomic_inc(&(pkt_dev->skb->users));
3421               retry_now:
3422                 ret = odev->hard_start_xmit(pkt_dev->skb, odev);
3423                 if (likely(ret == NETDEV_TX_OK)) {
3424                         pkt_dev->last_ok = 1;
3425                         pkt_dev->sofar++;
3426                         pkt_dev->seq_num++;
3427                         pkt_dev->tx_bytes += pkt_dev->cur_pkt_size;
3428
3429                 } else if (ret == NETDEV_TX_LOCKED
3430                            && (odev->features & NETIF_F_LLTX)) {
3431                         cpu_relax();
3432                         goto retry_now;
3433                 } else {        /* Retry it next time */
3434
3435                         atomic_dec(&(pkt_dev->skb->users));
3436
3437                         if (debug && net_ratelimit())
3438                                 printk(KERN_INFO "pktgen: Hard xmit error\n");
3439
3440                         pkt_dev->errors++;
3441                         pkt_dev->last_ok = 0;
3442                 }
3443
3444                 pkt_dev->next_tx_us = getCurUs();
3445                 pkt_dev->next_tx_ns = 0;
3446
3447                 pkt_dev->next_tx_us += pkt_dev->delay_us;
3448                 pkt_dev->next_tx_ns += pkt_dev->delay_ns;
3449
3450                 if (pkt_dev->next_tx_ns > 1000) {
3451                         pkt_dev->next_tx_us++;
3452                         pkt_dev->next_tx_ns -= 1000;
3453                 }
3454         }
3455
3456         else {                  /* Retry it next time */
3457                 pkt_dev->last_ok = 0;
3458                 pkt_dev->next_tx_us = getCurUs();       /* TODO */
3459                 pkt_dev->next_tx_ns = 0;
3460         }
3461
3462         __netif_tx_unlock_bh(txq);
3463
3464         /* If pkt_dev->count is zero, then run forever */
3465         if ((pkt_dev->count != 0) && (pkt_dev->sofar >= pkt_dev->count)) {
3466                 if (atomic_read(&(pkt_dev->skb->users)) != 1) {
3467                         idle_start = getCurUs();
3468                         while (atomic_read(&(pkt_dev->skb->users)) != 1) {
3469                                 if (signal_pending(current)) {
3470                                         break;
3471                                 }
3472                                 schedule();
3473                         }
3474                         pkt_dev->idle_acc += getCurUs() - idle_start;
3475                 }
3476
3477                 /* Done with this */
3478                 pktgen_stop_device(pkt_dev);
3479                 if (pkt_dev->skb)
3480                         kfree_skb(pkt_dev->skb);
3481                 pkt_dev->skb = NULL;
3482         }
3483 out:;
3484 }
3485
3486 /*
3487  * Main loop of the thread goes here
3488  */
3489
3490 static int pktgen_thread_worker(void *arg)
3491 {
3492         DEFINE_WAIT(wait);
3493         struct pktgen_thread *t = arg;
3494         struct pktgen_dev *pkt_dev = NULL;
3495         int cpu = t->cpu;
3496
3497         BUG_ON(smp_processor_id() != cpu);
3498
3499         init_waitqueue_head(&t->queue);
3500         complete(&t->start_done);
3501
3502         pr_debug("pktgen: starting pktgen/%d:  pid=%d\n", cpu, task_pid_nr(current));
3503
3504         set_current_state(TASK_INTERRUPTIBLE);
3505
3506         set_freezable();
3507
3508         while (!kthread_should_stop()) {
3509                 pkt_dev = next_to_run(t);
3510
3511                 if (!pkt_dev &&
3512                     (t->control & (T_STOP | T_RUN | T_REMDEVALL | T_REMDEV))
3513                     == 0) {
3514                         prepare_to_wait(&(t->queue), &wait,
3515                                         TASK_INTERRUPTIBLE);
3516                         schedule_timeout(HZ / 10);
3517                         finish_wait(&(t->queue), &wait);
3518                 }
3519
3520                 __set_current_state(TASK_RUNNING);
3521
3522                 if (pkt_dev)
3523                         pktgen_xmit(pkt_dev);
3524
3525                 if (t->control & T_STOP) {
3526                         pktgen_stop(t);
3527                         t->control &= ~(T_STOP);
3528                 }
3529
3530                 if (t->control & T_RUN) {
3531                         pktgen_run(t);
3532                         t->control &= ~(T_RUN);
3533                 }
3534
3535                 if (t->control & T_REMDEVALL) {
3536                         pktgen_rem_all_ifs(t);
3537                         t->control &= ~(T_REMDEVALL);
3538                 }
3539
3540                 if (t->control & T_REMDEV) {
3541                         pktgen_rem_one_if(t);
3542                         t->control &= ~(T_REMDEV);
3543                 }
3544
3545                 try_to_freeze();
3546
3547                 set_current_state(TASK_INTERRUPTIBLE);
3548         }
3549
3550         pr_debug("pktgen: %s stopping all device\n", t->tsk->comm);
3551         pktgen_stop(t);
3552
3553         pr_debug("pktgen: %s removing all device\n", t->tsk->comm);
3554         pktgen_rem_all_ifs(t);
3555
3556         pr_debug("pktgen: %s removing thread.\n", t->tsk->comm);
3557         pktgen_rem_thread(t);
3558
3559         return 0;
3560 }
3561
3562 static struct pktgen_dev *pktgen_find_dev(struct pktgen_thread *t,
3563                                           const char *ifname)
3564 {
3565         struct pktgen_dev *p, *pkt_dev = NULL;
3566         if_lock(t);
3567
3568         list_for_each_entry(p, &t->if_list, list)
3569                 if (strncmp(p->odev->name, ifname, IFNAMSIZ) == 0) {
3570                         pkt_dev = p;
3571                         break;
3572                 }
3573
3574         if_unlock(t);
3575         pr_debug("pktgen: find_dev(%s) returning %p\n", ifname, pkt_dev);
3576         return pkt_dev;
3577 }
3578
3579 /*
3580  * Adds a dev at front of if_list.
3581  */
3582
3583 static int add_dev_to_thread(struct pktgen_thread *t,
3584                              struct pktgen_dev *pkt_dev)
3585 {
3586         int rv = 0;
3587
3588         if_lock(t);
3589
3590         if (pkt_dev->pg_thread) {
3591                 printk(KERN_ERR "pktgen: ERROR: already assigned "
3592                        "to a thread.\n");
3593                 rv = -EBUSY;
3594                 goto out;
3595         }
3596
3597         list_add(&pkt_dev->list, &t->if_list);
3598         pkt_dev->pg_thread = t;
3599         pkt_dev->running = 0;
3600
3601 out:
3602         if_unlock(t);
3603         return rv;
3604 }
3605
3606 /* Called under thread lock */
3607
3608 static int pktgen_add_device(struct pktgen_thread *t, const char *ifname)
3609 {
3610         struct pktgen_dev *pkt_dev;
3611         int err;
3612
3613         /* We don't allow a device to be on several threads */
3614
3615         pkt_dev = __pktgen_NN_threads(ifname, FIND);
3616         if (pkt_dev) {
3617                 printk(KERN_ERR "pktgen: ERROR: interface already used.\n");
3618                 return -EBUSY;
3619         }
3620
3621         pkt_dev = kzalloc(sizeof(struct pktgen_dev), GFP_KERNEL);
3622         if (!pkt_dev)
3623                 return -ENOMEM;
3624
3625         pkt_dev->flows = vmalloc(MAX_CFLOWS * sizeof(struct flow_state));
3626         if (pkt_dev->flows == NULL) {
3627                 kfree(pkt_dev);
3628                 return -ENOMEM;
3629         }
3630         memset(pkt_dev->flows, 0, MAX_CFLOWS * sizeof(struct flow_state));
3631
3632         pkt_dev->removal_mark = 0;
3633         pkt_dev->min_pkt_size = ETH_ZLEN;
3634         pkt_dev->max_pkt_size = ETH_ZLEN;
3635         pkt_dev->nfrags = 0;
3636         pkt_dev->clone_skb = pg_clone_skb_d;
3637         pkt_dev->delay_us = pg_delay_d / 1000;
3638         pkt_dev->delay_ns = pg_delay_d % 1000;
3639         pkt_dev->count = pg_count_d;
3640         pkt_dev->sofar = 0;
3641         pkt_dev->udp_src_min = 9;       /* sink port */
3642         pkt_dev->udp_src_max = 9;
3643         pkt_dev->udp_dst_min = 9;
3644         pkt_dev->udp_dst_max = 9;
3645
3646         pkt_dev->vlan_p = 0;
3647         pkt_dev->vlan_cfi = 0;
3648         pkt_dev->vlan_id = 0xffff;
3649         pkt_dev->svlan_p = 0;
3650         pkt_dev->svlan_cfi = 0;
3651         pkt_dev->svlan_id = 0xffff;
3652
3653         err = pktgen_setup_dev(pkt_dev, ifname);
3654         if (err)
3655                 goto out1;
3656
3657         pkt_dev->entry = proc_create_data(ifname, 0600, pg_proc_dir,
3658                                           &pktgen_if_fops, pkt_dev);
3659         if (!pkt_dev->entry) {
3660                 printk(KERN_ERR "pktgen: cannot create %s/%s procfs entry.\n",
3661                        PG_PROC_DIR, ifname);
3662                 err = -EINVAL;
3663                 goto out2;
3664         }
3665 #ifdef CONFIG_XFRM
3666         pkt_dev->ipsmode = XFRM_MODE_TRANSPORT;
3667         pkt_dev->ipsproto = IPPROTO_ESP;
3668 #endif
3669
3670         return add_dev_to_thread(t, pkt_dev);
3671 out2:
3672         dev_put(pkt_dev->odev);
3673 out1:
3674 #ifdef CONFIG_XFRM
3675         free_SAs(pkt_dev);
3676 #endif
3677         if (pkt_dev->flows)
3678                 vfree(pkt_dev->flows);
3679         kfree(pkt_dev);
3680         return err;
3681 }
3682
3683 static int __init pktgen_create_thread(int cpu)
3684 {
3685         struct pktgen_thread *t;
3686         struct proc_dir_entry *pe;
3687         struct task_struct *p;
3688
3689         t = kzalloc(sizeof(struct pktgen_thread), GFP_KERNEL);
3690         if (!t) {
3691                 printk(KERN_ERR "pktgen: ERROR: out of memory, can't "
3692                        "create new thread.\n");
3693                 return -ENOMEM;
3694         }
3695
3696         spin_lock_init(&t->if_lock);
3697         t->cpu = cpu;
3698
3699         INIT_LIST_HEAD(&t->if_list);
3700
3701         list_add_tail(&t->th_list, &pktgen_threads);
3702         init_completion(&t->start_done);
3703
3704         p = kthread_create(pktgen_thread_worker, t, "kpktgend_%d", cpu);
3705         if (IS_ERR(p)) {
3706                 printk(KERN_ERR "pktgen: kernel_thread() failed "
3707                        "for cpu %d\n", t->cpu);
3708                 list_del(&t->th_list);
3709                 kfree(t);
3710                 return PTR_ERR(p);
3711         }
3712         kthread_bind(p, cpu);
3713         t->tsk = p;
3714
3715         pe = proc_create_data(t->tsk->comm, 0600, pg_proc_dir,
3716                               &pktgen_thread_fops, t);
3717         if (!pe) {
3718                 printk(KERN_ERR "pktgen: cannot create %s/%s procfs entry.\n",
3719                        PG_PROC_DIR, t->tsk->comm);
3720                 kthread_stop(p);
3721                 list_del(&t->th_list);
3722                 kfree(t);
3723                 return -EINVAL;
3724         }
3725
3726         wake_up_process(p);
3727         wait_for_completion(&t->start_done);
3728
3729         return 0;
3730 }
3731
3732 /*
3733  * Removes a device from the thread if_list.
3734  */
3735 static void _rem_dev_from_if_list(struct pktgen_thread *t,
3736                                   struct pktgen_dev *pkt_dev)
3737 {
3738         struct list_head *q, *n;
3739         struct pktgen_dev *p;
3740
3741         list_for_each_safe(q, n, &t->if_list) {
3742                 p = list_entry(q, struct pktgen_dev, list);
3743                 if (p == pkt_dev)
3744                         list_del(&p->list);
3745         }
3746 }
3747
3748 static int pktgen_remove_device(struct pktgen_thread *t,
3749                                 struct pktgen_dev *pkt_dev)
3750 {
3751
3752         pr_debug("pktgen: remove_device pkt_dev=%p\n", pkt_dev);
3753
3754         if (pkt_dev->running) {
3755                 printk(KERN_WARNING "pktgen: WARNING: trying to remove a "
3756                        "running interface, stopping it now.\n");
3757                 pktgen_stop_device(pkt_dev);
3758         }
3759
3760         /* Dis-associate from the interface */
3761
3762         if (pkt_dev->odev) {
3763                 dev_put(pkt_dev->odev);
3764                 pkt_dev->odev = NULL;
3765         }
3766
3767         /* And update the thread if_list */
3768
3769         _rem_dev_from_if_list(t, pkt_dev);
3770
3771         if (pkt_dev->entry)
3772                 remove_proc_entry(pkt_dev->entry->name, pg_proc_dir);
3773
3774 #ifdef CONFIG_XFRM
3775         free_SAs(pkt_dev);
3776 #endif
3777         if (pkt_dev->flows)
3778                 vfree(pkt_dev->flows);
3779         kfree(pkt_dev);
3780         return 0;
3781 }
3782
3783 static int __init pg_init(void)
3784 {
3785         int cpu;
3786         struct proc_dir_entry *pe;
3787
3788         printk(KERN_INFO "%s", version);
3789
3790         pg_proc_dir = proc_mkdir(PG_PROC_DIR, init_net.proc_net);
3791         if (!pg_proc_dir)
3792                 return -ENODEV;
3793         pg_proc_dir->owner = THIS_MODULE;
3794
3795         pe = proc_create(PGCTRL, 0600, pg_proc_dir, &pktgen_fops);
3796         if (pe == NULL) {
3797                 printk(KERN_ERR "pktgen: ERROR: cannot create %s "
3798                        "procfs entry.\n", PGCTRL);
3799                 proc_net_remove(&init_net, PG_PROC_DIR);
3800                 return -EINVAL;
3801         }
3802
3803         /* Register us to receive netdevice events */
3804         register_netdevice_notifier(&pktgen_notifier_block);
3805
3806         for_each_online_cpu(cpu) {
3807                 int err;
3808
3809                 err = pktgen_create_thread(cpu);
3810                 if (err)
3811                         printk(KERN_WARNING "pktgen: WARNING: Cannot create "
3812                                "thread for cpu %d (%d)\n", cpu, err);
3813         }
3814
3815         if (list_empty(&pktgen_threads)) {
3816                 printk(KERN_ERR "pktgen: ERROR: Initialization failed for "
3817                        "all threads\n");
3818                 unregister_netdevice_notifier(&pktgen_notifier_block);
3819                 remove_proc_entry(PGCTRL, pg_proc_dir);
3820                 proc_net_remove(&init_net, PG_PROC_DIR);
3821                 return -ENODEV;
3822         }
3823
3824         return 0;
3825 }
3826
3827 static void __exit pg_cleanup(void)
3828 {
3829         struct pktgen_thread *t;
3830         struct list_head *q, *n;
3831         wait_queue_head_t queue;
3832         init_waitqueue_head(&queue);
3833
3834         /* Stop all interfaces & threads */
3835
3836         list_for_each_safe(q, n, &pktgen_threads) {
3837                 t = list_entry(q, struct pktgen_thread, th_list);
3838                 kthread_stop(t->tsk);
3839                 kfree(t);
3840         }
3841
3842         /* Un-register us from receiving netdevice events */
3843         unregister_netdevice_notifier(&pktgen_notifier_block);
3844
3845         /* Clean up proc file system */
3846         remove_proc_entry(PGCTRL, pg_proc_dir);
3847         proc_net_remove(&init_net, PG_PROC_DIR);
3848 }
3849
3850 module_init(pg_init);
3851 module_exit(pg_cleanup);
3852
3853 MODULE_AUTHOR("Robert Olsson <robert.olsson@its.uu.se");
3854 MODULE_DESCRIPTION("Packet Generator tool");
3855 MODULE_LICENSE("GPL");
3856 module_param(pg_count_d, int, 0);
3857 module_param(pg_delay_d, int, 0);
3858 module_param(pg_clone_skb_d, int, 0);
3859 module_param(debug, int, 0);