xref: /linux/net/core/pktgen.c (revision f24e9f586b377749dff37554696cf3a105540c94)
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  */
113 #include <linux/sys.h>
114 #include <linux/types.h>
115 #include <linux/module.h>
116 #include <linux/moduleparam.h>
117 #include <linux/kernel.h>
118 #include <linux/smp_lock.h>
119 #include <linux/mutex.h>
120 #include <linux/sched.h>
121 #include <linux/slab.h>
122 #include <linux/vmalloc.h>
123 #include <linux/unistd.h>
124 #include <linux/string.h>
125 #include <linux/ptrace.h>
126 #include <linux/errno.h>
127 #include <linux/ioport.h>
128 #include <linux/interrupt.h>
129 #include <linux/capability.h>
130 #include <linux/delay.h>
131 #include <linux/timer.h>
132 #include <linux/list.h>
133 #include <linux/init.h>
134 #include <linux/skbuff.h>
135 #include <linux/netdevice.h>
136 #include <linux/inet.h>
137 #include <linux/inetdevice.h>
138 #include <linux/rtnetlink.h>
139 #include <linux/if_arp.h>
140 #include <linux/in.h>
141 #include <linux/ip.h>
142 #include <linux/ipv6.h>
143 #include <linux/udp.h>
144 #include <linux/proc_fs.h>
145 #include <linux/seq_file.h>
146 #include <linux/wait.h>
147 #include <linux/etherdevice.h>
148 #include <net/checksum.h>
149 #include <net/ipv6.h>
150 #include <net/addrconf.h>
151 #include <asm/byteorder.h>
152 #include <linux/rcupdate.h>
153 #include <asm/bitops.h>
154 #include <asm/io.h>
155 #include <asm/dma.h>
156 #include <asm/uaccess.h>
157 #include <asm/div64.h>		/* do_div */
158 #include <asm/timex.h>
159 
160 #define VERSION  "pktgen v2.67: Packet Generator for packet performance testing.\n"
161 
162 /* #define PG_DEBUG(a) a */
163 #define PG_DEBUG(a)
164 
165 /* The buckets are exponential in 'width' */
166 #define LAT_BUCKETS_MAX 32
167 #define IP_NAME_SZ 32
168 #define MAX_MPLS_LABELS 16 /* This is the max label stack depth */
169 #define MPLS_STACK_BOTTOM __constant_htonl(0x00000100)
170 
171 /* Device flag bits */
172 #define F_IPSRC_RND   (1<<0)	/* IP-Src Random  */
173 #define F_IPDST_RND   (1<<1)	/* IP-Dst Random  */
174 #define F_UDPSRC_RND  (1<<2)	/* UDP-Src Random */
175 #define F_UDPDST_RND  (1<<3)	/* UDP-Dst Random */
176 #define F_MACSRC_RND  (1<<4)	/* MAC-Src Random */
177 #define F_MACDST_RND  (1<<5)	/* MAC-Dst Random */
178 #define F_TXSIZE_RND  (1<<6)	/* Transmit size is random */
179 #define F_IPV6        (1<<7)	/* Interface in IPV6 Mode */
180 #define F_MPLS_RND    (1<<8)	/* Random MPLS labels */
181 
182 /* Thread control flag bits */
183 #define T_TERMINATE   (1<<0)
184 #define T_STOP        (1<<1)	/* Stop run */
185 #define T_RUN         (1<<2)	/* Start run */
186 #define T_REMDEVALL   (1<<3)	/* Remove all devs */
187 #define T_REMDEV      (1<<4)	/* Remove one dev */
188 
189 /* If lock -- can be removed after some work */
190 #define   if_lock(t)           spin_lock(&(t->if_lock));
191 #define   if_unlock(t)           spin_unlock(&(t->if_lock));
192 
193 /* Used to help with determining the pkts on receive */
194 #define PKTGEN_MAGIC 0xbe9be955
195 #define PG_PROC_DIR "pktgen"
196 #define PGCTRL	    "pgctrl"
197 static struct proc_dir_entry *pg_proc_dir = NULL;
198 
199 #define MAX_CFLOWS  65536
200 
201 struct flow_state {
202 	__u32 cur_daddr;
203 	int count;
204 };
205 
206 struct pktgen_dev {
207 
208 	/*
209 	 * Try to keep frequent/infrequent used vars. separated.
210 	 */
211 
212 	char ifname[IFNAMSIZ];
213 	char result[512];
214 
215 	struct pktgen_thread *pg_thread;	/* the owner */
216 	struct list_head list;		/* Used for chaining in the thread's run-queue */
217 
218 	int running;		/* if this changes to false, the test will stop */
219 
220 	/* If min != max, then we will either do a linear iteration, or
221 	 * we will do a random selection from within the range.
222 	 */
223 	__u32 flags;
224 	int removal_mark;	/* non-zero => the device is marked for
225 				 * removal by worker thread */
226 
227 	int min_pkt_size;	/* = ETH_ZLEN; */
228 	int max_pkt_size;	/* = ETH_ZLEN; */
229 	int nfrags;
230 	__u32 delay_us;		/* Default delay */
231 	__u32 delay_ns;
232 	__u64 count;		/* Default No packets to send */
233 	__u64 sofar;		/* How many pkts we've sent so far */
234 	__u64 tx_bytes;		/* How many bytes we've transmitted */
235 	__u64 errors;		/* Errors when trying to transmit, pkts will be re-sent */
236 
237 	/* runtime counters relating to clone_skb */
238 	__u64 next_tx_us;	/* timestamp of when to tx next */
239 	__u32 next_tx_ns;
240 
241 	__u64 allocated_skbs;
242 	__u32 clone_count;
243 	int last_ok;		/* Was last skb sent?
244 				 * Or a failed transmit of some sort?  This will keep
245 				 * sequence numbers in order, for example.
246 				 */
247 	__u64 started_at;	/* micro-seconds */
248 	__u64 stopped_at;	/* micro-seconds */
249 	__u64 idle_acc;		/* micro-seconds */
250 	__u32 seq_num;
251 
252 	int clone_skb;		/* Use multiple SKBs during packet gen.  If this number
253 				 * is greater than 1, then that many copies of the same
254 				 * packet will be sent before a new packet is allocated.
255 				 * For instance, if you want to send 1024 identical packets
256 				 * before creating a new packet, set clone_skb to 1024.
257 				 */
258 
259 	char dst_min[IP_NAME_SZ];	/* IP, ie 1.2.3.4 */
260 	char dst_max[IP_NAME_SZ];	/* IP, ie 1.2.3.4 */
261 	char src_min[IP_NAME_SZ];	/* IP, ie 1.2.3.4 */
262 	char src_max[IP_NAME_SZ];	/* IP, ie 1.2.3.4 */
263 
264 	struct in6_addr in6_saddr;
265 	struct in6_addr in6_daddr;
266 	struct in6_addr cur_in6_daddr;
267 	struct in6_addr cur_in6_saddr;
268 	/* For ranges */
269 	struct in6_addr min_in6_daddr;
270 	struct in6_addr max_in6_daddr;
271 	struct in6_addr min_in6_saddr;
272 	struct in6_addr max_in6_saddr;
273 
274 	/* If we're doing ranges, random or incremental, then this
275 	 * defines the min/max for those ranges.
276 	 */
277 	__u32 saddr_min;	/* inclusive, source IP address */
278 	__u32 saddr_max;	/* exclusive, source IP address */
279 	__u32 daddr_min;	/* inclusive, dest IP address */
280 	__u32 daddr_max;	/* exclusive, dest IP address */
281 
282 	__u16 udp_src_min;	/* inclusive, source UDP port */
283 	__u16 udp_src_max;	/* exclusive, source UDP port */
284 	__u16 udp_dst_min;	/* inclusive, dest UDP port */
285 	__u16 udp_dst_max;	/* exclusive, dest UDP port */
286 
287 	/* MPLS */
288 	unsigned nr_labels;	/* Depth of stack, 0 = no MPLS */
289 	__be32 labels[MAX_MPLS_LABELS];
290 
291 	__u32 src_mac_count;	/* How many MACs to iterate through */
292 	__u32 dst_mac_count;	/* How many MACs to iterate through */
293 
294 	unsigned char dst_mac[ETH_ALEN];
295 	unsigned char src_mac[ETH_ALEN];
296 
297 	__u32 cur_dst_mac_offset;
298 	__u32 cur_src_mac_offset;
299 	__u32 cur_saddr;
300 	__u32 cur_daddr;
301 	__u16 cur_udp_dst;
302 	__u16 cur_udp_src;
303 	__u32 cur_pkt_size;
304 
305 	__u8 hh[14];
306 	/* = {
307 	   0x00, 0x80, 0xC8, 0x79, 0xB3, 0xCB,
308 
309 	   We fill in SRC address later
310 	   0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
311 	   0x08, 0x00
312 	   };
313 	 */
314 	__u16 pad;		/* pad out the hh struct to an even 16 bytes */
315 
316 	struct sk_buff *skb;	/* skb we are to transmit next, mainly used for when we
317 				 * are transmitting the same one multiple times
318 				 */
319 	struct net_device *odev;	/* The out-going device.  Note that the device should
320 					 * have it's pg_info pointer pointing back to this
321 					 * device.  This will be set when the user specifies
322 					 * the out-going device name (not when the inject is
323 					 * started as it used to do.)
324 					 */
325 	struct flow_state *flows;
326 	unsigned cflows;	/* Concurrent flows (config) */
327 	unsigned lflow;		/* Flow length  (config) */
328 	unsigned nflows;	/* accumulated flows (stats) */
329 };
330 
331 struct pktgen_hdr {
332 	__u32 pgh_magic;
333 	__u32 seq_num;
334 	__u32 tv_sec;
335 	__u32 tv_usec;
336 };
337 
338 struct pktgen_thread {
339 	spinlock_t if_lock;
340 	struct list_head if_list;	/* All device here */
341 	struct list_head th_list;
342 	int removed;
343 	char name[32];
344 	char result[512];
345 	u32 max_before_softirq;	/* We'll call do_softirq to prevent starvation. */
346 
347 	/* Field for thread to receive "posted" events terminate, stop ifs etc. */
348 
349 	u32 control;
350 	int pid;
351 	int cpu;
352 
353 	wait_queue_head_t queue;
354 };
355 
356 #define REMOVE 1
357 #define FIND   0
358 
359 /*  This code works around the fact that do_div cannot handle two 64-bit
360     numbers, and regular 64-bit division doesn't work on x86 kernels.
361     --Ben
362 */
363 
364 #define PG_DIV 0
365 
366 /* This was emailed to LMKL by: Chris Caputo <ccaputo@alt.net>
367  * Function copied/adapted/optimized from:
368  *
369  *  nemesis.sourceforge.net/browse/lib/static/intmath/ix86/intmath.c.html
370  *
371  * Copyright 1994, University of Cambridge Computer Laboratory
372  * All Rights Reserved.
373  *
374  */
375 static inline s64 divremdi3(s64 x, s64 y, int type)
376 {
377 	u64 a = (x < 0) ? -x : x;
378 	u64 b = (y < 0) ? -y : y;
379 	u64 res = 0, d = 1;
380 
381 	if (b > 0) {
382 		while (b < a) {
383 			b <<= 1;
384 			d <<= 1;
385 		}
386 	}
387 
388 	do {
389 		if (a >= b) {
390 			a -= b;
391 			res += d;
392 		}
393 		b >>= 1;
394 		d >>= 1;
395 	}
396 	while (d);
397 
398 	if (PG_DIV == type) {
399 		return (((x ^ y) & (1ll << 63)) == 0) ? res : -(s64) res;
400 	} else {
401 		return ((x & (1ll << 63)) == 0) ? a : -(s64) a;
402 	}
403 }
404 
405 /* End of hacks to deal with 64-bit math on x86 */
406 
407 /** Convert to milliseconds */
408 static inline __u64 tv_to_ms(const struct timeval *tv)
409 {
410 	__u64 ms = tv->tv_usec / 1000;
411 	ms += (__u64) tv->tv_sec * (__u64) 1000;
412 	return ms;
413 }
414 
415 /** Convert to micro-seconds */
416 static inline __u64 tv_to_us(const struct timeval *tv)
417 {
418 	__u64 us = tv->tv_usec;
419 	us += (__u64) tv->tv_sec * (__u64) 1000000;
420 	return us;
421 }
422 
423 static inline __u64 pg_div(__u64 n, __u32 base)
424 {
425 	__u64 tmp = n;
426 	do_div(tmp, base);
427 	/* printk("pktgen: pg_div, n: %llu  base: %d  rv: %llu\n",
428 	   n, base, tmp); */
429 	return tmp;
430 }
431 
432 static inline __u64 pg_div64(__u64 n, __u64 base)
433 {
434 	__u64 tmp = n;
435 /*
436  * How do we know if the architecture we are running on
437  * supports division with 64 bit base?
438  *
439  */
440 #if defined(__sparc_v9__) || defined(__powerpc64__) || defined(__alpha__) || defined(__x86_64__) || defined(__ia64__)
441 
442 	do_div(tmp, base);
443 #else
444 	tmp = divremdi3(n, base, PG_DIV);
445 #endif
446 	return tmp;
447 }
448 
449 static inline u32 pktgen_random(void)
450 {
451 #if 0
452 	__u32 n;
453 	get_random_bytes(&n, 4);
454 	return n;
455 #else
456 	return net_random();
457 #endif
458 }
459 
460 static inline __u64 getCurMs(void)
461 {
462 	struct timeval tv;
463 	do_gettimeofday(&tv);
464 	return tv_to_ms(&tv);
465 }
466 
467 static inline __u64 getCurUs(void)
468 {
469 	struct timeval tv;
470 	do_gettimeofday(&tv);
471 	return tv_to_us(&tv);
472 }
473 
474 static inline __u64 tv_diff(const struct timeval *a, const struct timeval *b)
475 {
476 	return tv_to_us(a) - tv_to_us(b);
477 }
478 
479 /* old include end */
480 
481 static char version[] __initdata = VERSION;
482 
483 static int pktgen_remove_device(struct pktgen_thread *t, struct pktgen_dev *i);
484 static int pktgen_add_device(struct pktgen_thread *t, const char *ifname);
485 static struct pktgen_dev *pktgen_find_dev(struct pktgen_thread *t,
486 					  const char *ifname);
487 static int pktgen_device_event(struct notifier_block *, unsigned long, void *);
488 static void pktgen_run_all_threads(void);
489 static void pktgen_stop_all_threads_ifs(void);
490 static int pktgen_stop_device(struct pktgen_dev *pkt_dev);
491 static void pktgen_stop(struct pktgen_thread *t);
492 static void pktgen_clear_counters(struct pktgen_dev *pkt_dev);
493 static int pktgen_mark_device(const char *ifname);
494 static unsigned int scan_ip6(const char *s, char ip[16]);
495 static unsigned int fmt_ip6(char *s, const char ip[16]);
496 
497 /* Module parameters, defaults. */
498 static int pg_count_d = 1000;	/* 1000 pkts by default */
499 static int pg_delay_d;
500 static int pg_clone_skb_d;
501 static int debug;
502 
503 static DEFINE_MUTEX(pktgen_thread_lock);
504 static LIST_HEAD(pktgen_threads);
505 
506 static struct notifier_block pktgen_notifier_block = {
507 	.notifier_call = pktgen_device_event,
508 };
509 
510 /*
511  * /proc handling functions
512  *
513  */
514 
515 static int pgctrl_show(struct seq_file *seq, void *v)
516 {
517 	seq_puts(seq, VERSION);
518 	return 0;
519 }
520 
521 static ssize_t pgctrl_write(struct file *file, const char __user * buf,
522 			    size_t count, loff_t * ppos)
523 {
524 	int err = 0;
525 	char data[128];
526 
527 	if (!capable(CAP_NET_ADMIN)) {
528 		err = -EPERM;
529 		goto out;
530 	}
531 
532 	if (count > sizeof(data))
533 		count = sizeof(data);
534 
535 	if (copy_from_user(data, buf, count)) {
536 		err = -EFAULT;
537 		goto out;
538 	}
539 	data[count - 1] = 0;	/* Make string */
540 
541 	if (!strcmp(data, "stop"))
542 		pktgen_stop_all_threads_ifs();
543 
544 	else if (!strcmp(data, "start"))
545 		pktgen_run_all_threads();
546 
547 	else
548 		printk("pktgen: Unknown command: %s\n", data);
549 
550 	err = count;
551 
552 out:
553 	return err;
554 }
555 
556 static int pgctrl_open(struct inode *inode, struct file *file)
557 {
558 	return single_open(file, pgctrl_show, PDE(inode)->data);
559 }
560 
561 static struct file_operations pktgen_fops = {
562 	.owner   = THIS_MODULE,
563 	.open    = pgctrl_open,
564 	.read    = seq_read,
565 	.llseek  = seq_lseek,
566 	.write   = pgctrl_write,
567 	.release = single_release,
568 };
569 
570 static int pktgen_if_show(struct seq_file *seq, void *v)
571 {
572 	int i;
573 	struct pktgen_dev *pkt_dev = seq->private;
574 	__u64 sa;
575 	__u64 stopped;
576 	__u64 now = getCurUs();
577 
578 	seq_printf(seq,
579 		   "Params: count %llu  min_pkt_size: %u  max_pkt_size: %u\n",
580 		   (unsigned long long)pkt_dev->count, pkt_dev->min_pkt_size,
581 		   pkt_dev->max_pkt_size);
582 
583 	seq_printf(seq,
584 		   "     frags: %d  delay: %u  clone_skb: %d  ifname: %s\n",
585 		   pkt_dev->nfrags,
586 		   1000 * pkt_dev->delay_us + pkt_dev->delay_ns,
587 		   pkt_dev->clone_skb, pkt_dev->ifname);
588 
589 	seq_printf(seq, "     flows: %u flowlen: %u\n", pkt_dev->cflows,
590 		   pkt_dev->lflow);
591 
592 	if (pkt_dev->flags & F_IPV6) {
593 		char b1[128], b2[128], b3[128];
594 		fmt_ip6(b1, pkt_dev->in6_saddr.s6_addr);
595 		fmt_ip6(b2, pkt_dev->min_in6_saddr.s6_addr);
596 		fmt_ip6(b3, pkt_dev->max_in6_saddr.s6_addr);
597 		seq_printf(seq,
598 			   "     saddr: %s  min_saddr: %s  max_saddr: %s\n", b1,
599 			   b2, b3);
600 
601 		fmt_ip6(b1, pkt_dev->in6_daddr.s6_addr);
602 		fmt_ip6(b2, pkt_dev->min_in6_daddr.s6_addr);
603 		fmt_ip6(b3, pkt_dev->max_in6_daddr.s6_addr);
604 		seq_printf(seq,
605 			   "     daddr: %s  min_daddr: %s  max_daddr: %s\n", b1,
606 			   b2, b3);
607 
608 	} else
609 		seq_printf(seq,
610 			   "     dst_min: %s  dst_max: %s\n     src_min: %s  src_max: %s\n",
611 			   pkt_dev->dst_min, pkt_dev->dst_max, pkt_dev->src_min,
612 			   pkt_dev->src_max);
613 
614 	seq_puts(seq, "     src_mac: ");
615 
616 	if (is_zero_ether_addr(pkt_dev->src_mac))
617 		for (i = 0; i < 6; i++)
618 			seq_printf(seq, "%02X%s", pkt_dev->odev->dev_addr[i],
619 				   i == 5 ? "  " : ":");
620 	else
621 		for (i = 0; i < 6; i++)
622 			seq_printf(seq, "%02X%s", pkt_dev->src_mac[i],
623 				   i == 5 ? "  " : ":");
624 
625 	seq_printf(seq, "dst_mac: ");
626 	for (i = 0; i < 6; i++)
627 		seq_printf(seq, "%02X%s", pkt_dev->dst_mac[i],
628 			   i == 5 ? "\n" : ":");
629 
630 	seq_printf(seq,
631 		   "     udp_src_min: %d  udp_src_max: %d  udp_dst_min: %d  udp_dst_max: %d\n",
632 		   pkt_dev->udp_src_min, pkt_dev->udp_src_max,
633 		   pkt_dev->udp_dst_min, pkt_dev->udp_dst_max);
634 
635 	seq_printf(seq,
636 		   "     src_mac_count: %d  dst_mac_count: %d\n",
637 		   pkt_dev->src_mac_count, pkt_dev->dst_mac_count);
638 
639 	if (pkt_dev->nr_labels) {
640 		unsigned i;
641 		seq_printf(seq, "     mpls: ");
642 		for(i = 0; i < pkt_dev->nr_labels; i++)
643 			seq_printf(seq, "%08x%s", ntohl(pkt_dev->labels[i]),
644 				   i == pkt_dev->nr_labels-1 ? "\n" : ", ");
645 	}
646 
647 	seq_printf(seq, "     Flags: ");
648 
649 	if (pkt_dev->flags & F_IPV6)
650 		seq_printf(seq, "IPV6  ");
651 
652 	if (pkt_dev->flags & F_IPSRC_RND)
653 		seq_printf(seq, "IPSRC_RND  ");
654 
655 	if (pkt_dev->flags & F_IPDST_RND)
656 		seq_printf(seq, "IPDST_RND  ");
657 
658 	if (pkt_dev->flags & F_TXSIZE_RND)
659 		seq_printf(seq, "TXSIZE_RND  ");
660 
661 	if (pkt_dev->flags & F_UDPSRC_RND)
662 		seq_printf(seq, "UDPSRC_RND  ");
663 
664 	if (pkt_dev->flags & F_UDPDST_RND)
665 		seq_printf(seq, "UDPDST_RND  ");
666 
667 	if (pkt_dev->flags & F_MPLS_RND)
668 		seq_printf(seq,  "MPLS_RND  ");
669 
670 	if (pkt_dev->flags & F_MACSRC_RND)
671 		seq_printf(seq, "MACSRC_RND  ");
672 
673 	if (pkt_dev->flags & F_MACDST_RND)
674 		seq_printf(seq, "MACDST_RND  ");
675 
676 	seq_puts(seq, "\n");
677 
678 	sa = pkt_dev->started_at;
679 	stopped = pkt_dev->stopped_at;
680 	if (pkt_dev->running)
681 		stopped = now;	/* not really stopped, more like last-running-at */
682 
683 	seq_printf(seq,
684 		   "Current:\n     pkts-sofar: %llu  errors: %llu\n     started: %lluus  stopped: %lluus idle: %lluus\n",
685 		   (unsigned long long)pkt_dev->sofar,
686 		   (unsigned long long)pkt_dev->errors, (unsigned long long)sa,
687 		   (unsigned long long)stopped,
688 		   (unsigned long long)pkt_dev->idle_acc);
689 
690 	seq_printf(seq,
691 		   "     seq_num: %d  cur_dst_mac_offset: %d  cur_src_mac_offset: %d\n",
692 		   pkt_dev->seq_num, pkt_dev->cur_dst_mac_offset,
693 		   pkt_dev->cur_src_mac_offset);
694 
695 	if (pkt_dev->flags & F_IPV6) {
696 		char b1[128], b2[128];
697 		fmt_ip6(b1, pkt_dev->cur_in6_daddr.s6_addr);
698 		fmt_ip6(b2, pkt_dev->cur_in6_saddr.s6_addr);
699 		seq_printf(seq, "     cur_saddr: %s  cur_daddr: %s\n", b2, b1);
700 	} else
701 		seq_printf(seq, "     cur_saddr: 0x%x  cur_daddr: 0x%x\n",
702 			   pkt_dev->cur_saddr, pkt_dev->cur_daddr);
703 
704 	seq_printf(seq, "     cur_udp_dst: %d  cur_udp_src: %d\n",
705 		   pkt_dev->cur_udp_dst, pkt_dev->cur_udp_src);
706 
707 	seq_printf(seq, "     flows: %u\n", pkt_dev->nflows);
708 
709 	if (pkt_dev->result[0])
710 		seq_printf(seq, "Result: %s\n", pkt_dev->result);
711 	else
712 		seq_printf(seq, "Result: Idle\n");
713 
714 	return 0;
715 }
716 
717 
718 static int hex32_arg(const char __user *user_buffer, __u32 *num)
719 {
720 	int i = 0;
721 	*num = 0;
722 
723 	for(; i < 8; i++) {
724 		char c;
725 		*num <<= 4;
726 		if (get_user(c, &user_buffer[i]))
727 			return -EFAULT;
728 		if ((c >= '0') && (c <= '9'))
729 			*num |= c - '0';
730 		else if ((c >= 'a') && (c <= 'f'))
731 			*num |= c - 'a' + 10;
732 		else if ((c >= 'A') && (c <= 'F'))
733 			*num |= c - 'A' + 10;
734 		else
735 			break;
736 	}
737 	return i;
738 }
739 
740 static int count_trail_chars(const char __user * user_buffer,
741 			     unsigned int maxlen)
742 {
743 	int i;
744 
745 	for (i = 0; i < maxlen; i++) {
746 		char c;
747 		if (get_user(c, &user_buffer[i]))
748 			return -EFAULT;
749 		switch (c) {
750 		case '\"':
751 		case '\n':
752 		case '\r':
753 		case '\t':
754 		case ' ':
755 		case '=':
756 			break;
757 		default:
758 			goto done;
759 		};
760 	}
761 done:
762 	return i;
763 }
764 
765 static unsigned long num_arg(const char __user * user_buffer,
766 			     unsigned long maxlen, unsigned long *num)
767 {
768 	int i = 0;
769 	*num = 0;
770 
771 	for (; i < maxlen; i++) {
772 		char c;
773 		if (get_user(c, &user_buffer[i]))
774 			return -EFAULT;
775 		if ((c >= '0') && (c <= '9')) {
776 			*num *= 10;
777 			*num += c - '0';
778 		} else
779 			break;
780 	}
781 	return i;
782 }
783 
784 static int strn_len(const char __user * user_buffer, unsigned int maxlen)
785 {
786 	int i = 0;
787 
788 	for (; i < maxlen; i++) {
789 		char c;
790 		if (get_user(c, &user_buffer[i]))
791 			return -EFAULT;
792 		switch (c) {
793 		case '\"':
794 		case '\n':
795 		case '\r':
796 		case '\t':
797 		case ' ':
798 			goto done_str;
799 			break;
800 		default:
801 			break;
802 		};
803 	}
804 done_str:
805 	return i;
806 }
807 
808 static ssize_t get_labels(const char __user *buffer, struct pktgen_dev *pkt_dev)
809 {
810 	unsigned n = 0;
811 	char c;
812 	ssize_t i = 0;
813 	int len;
814 
815 	pkt_dev->nr_labels = 0;
816 	do {
817 		__u32 tmp;
818 		len = hex32_arg(&buffer[i], &tmp);
819 		if (len <= 0)
820 			return len;
821 		pkt_dev->labels[n] = htonl(tmp);
822 		if (pkt_dev->labels[n] & MPLS_STACK_BOTTOM)
823 			pkt_dev->flags |= F_MPLS_RND;
824 		i += len;
825 		if (get_user(c, &buffer[i]))
826 			return -EFAULT;
827 		i++;
828 		n++;
829 		if (n >= MAX_MPLS_LABELS)
830 			return -E2BIG;
831 	} while(c == ',');
832 
833 	pkt_dev->nr_labels = n;
834 	return i;
835 }
836 
837 static ssize_t pktgen_if_write(struct file *file,
838 			       const char __user * user_buffer, size_t count,
839 			       loff_t * offset)
840 {
841 	struct seq_file *seq = (struct seq_file *)file->private_data;
842 	struct pktgen_dev *pkt_dev = seq->private;
843 	int i = 0, max, len;
844 	char name[16], valstr[32];
845 	unsigned long value = 0;
846 	char *pg_result = NULL;
847 	int tmp = 0;
848 	char buf[128];
849 
850 	pg_result = &(pkt_dev->result[0]);
851 
852 	if (count < 1) {
853 		printk("pktgen: wrong command format\n");
854 		return -EINVAL;
855 	}
856 
857 	max = count - i;
858 	tmp = count_trail_chars(&user_buffer[i], max);
859 	if (tmp < 0) {
860 		printk("pktgen: illegal format\n");
861 		return tmp;
862 	}
863 	i += tmp;
864 
865 	/* Read variable name */
866 
867 	len = strn_len(&user_buffer[i], sizeof(name) - 1);
868 	if (len < 0) {
869 		return len;
870 	}
871 	memset(name, 0, sizeof(name));
872 	if (copy_from_user(name, &user_buffer[i], len))
873 		return -EFAULT;
874 	i += len;
875 
876 	max = count - i;
877 	len = count_trail_chars(&user_buffer[i], max);
878 	if (len < 0)
879 		return len;
880 
881 	i += len;
882 
883 	if (debug) {
884 		char tb[count + 1];
885 		if (copy_from_user(tb, user_buffer, count))
886 			return -EFAULT;
887 		tb[count] = 0;
888 		printk("pktgen: %s,%lu  buffer -:%s:-\n", name,
889 		       (unsigned long)count, tb);
890 	}
891 
892 	if (!strcmp(name, "min_pkt_size")) {
893 		len = num_arg(&user_buffer[i], 10, &value);
894 		if (len < 0) {
895 			return len;
896 		}
897 		i += len;
898 		if (value < 14 + 20 + 8)
899 			value = 14 + 20 + 8;
900 		if (value != pkt_dev->min_pkt_size) {
901 			pkt_dev->min_pkt_size = value;
902 			pkt_dev->cur_pkt_size = value;
903 		}
904 		sprintf(pg_result, "OK: min_pkt_size=%u",
905 			pkt_dev->min_pkt_size);
906 		return count;
907 	}
908 
909 	if (!strcmp(name, "max_pkt_size")) {
910 		len = num_arg(&user_buffer[i], 10, &value);
911 		if (len < 0) {
912 			return len;
913 		}
914 		i += len;
915 		if (value < 14 + 20 + 8)
916 			value = 14 + 20 + 8;
917 		if (value != pkt_dev->max_pkt_size) {
918 			pkt_dev->max_pkt_size = value;
919 			pkt_dev->cur_pkt_size = value;
920 		}
921 		sprintf(pg_result, "OK: max_pkt_size=%u",
922 			pkt_dev->max_pkt_size);
923 		return count;
924 	}
925 
926 	/* Shortcut for min = max */
927 
928 	if (!strcmp(name, "pkt_size")) {
929 		len = num_arg(&user_buffer[i], 10, &value);
930 		if (len < 0) {
931 			return len;
932 		}
933 		i += len;
934 		if (value < 14 + 20 + 8)
935 			value = 14 + 20 + 8;
936 		if (value != pkt_dev->min_pkt_size) {
937 			pkt_dev->min_pkt_size = value;
938 			pkt_dev->max_pkt_size = value;
939 			pkt_dev->cur_pkt_size = value;
940 		}
941 		sprintf(pg_result, "OK: pkt_size=%u", pkt_dev->min_pkt_size);
942 		return count;
943 	}
944 
945 	if (!strcmp(name, "debug")) {
946 		len = num_arg(&user_buffer[i], 10, &value);
947 		if (len < 0) {
948 			return len;
949 		}
950 		i += len;
951 		debug = value;
952 		sprintf(pg_result, "OK: debug=%u", debug);
953 		return count;
954 	}
955 
956 	if (!strcmp(name, "frags")) {
957 		len = num_arg(&user_buffer[i], 10, &value);
958 		if (len < 0) {
959 			return len;
960 		}
961 		i += len;
962 		pkt_dev->nfrags = value;
963 		sprintf(pg_result, "OK: frags=%u", pkt_dev->nfrags);
964 		return count;
965 	}
966 	if (!strcmp(name, "delay")) {
967 		len = num_arg(&user_buffer[i], 10, &value);
968 		if (len < 0) {
969 			return len;
970 		}
971 		i += len;
972 		if (value == 0x7FFFFFFF) {
973 			pkt_dev->delay_us = 0x7FFFFFFF;
974 			pkt_dev->delay_ns = 0;
975 		} else {
976 			pkt_dev->delay_us = value / 1000;
977 			pkt_dev->delay_ns = value % 1000;
978 		}
979 		sprintf(pg_result, "OK: delay=%u",
980 			1000 * pkt_dev->delay_us + pkt_dev->delay_ns);
981 		return count;
982 	}
983 	if (!strcmp(name, "udp_src_min")) {
984 		len = num_arg(&user_buffer[i], 10, &value);
985 		if (len < 0) {
986 			return len;
987 		}
988 		i += len;
989 		if (value != pkt_dev->udp_src_min) {
990 			pkt_dev->udp_src_min = value;
991 			pkt_dev->cur_udp_src = value;
992 		}
993 		sprintf(pg_result, "OK: udp_src_min=%u", pkt_dev->udp_src_min);
994 		return count;
995 	}
996 	if (!strcmp(name, "udp_dst_min")) {
997 		len = num_arg(&user_buffer[i], 10, &value);
998 		if (len < 0) {
999 			return len;
1000 		}
1001 		i += len;
1002 		if (value != pkt_dev->udp_dst_min) {
1003 			pkt_dev->udp_dst_min = value;
1004 			pkt_dev->cur_udp_dst = value;
1005 		}
1006 		sprintf(pg_result, "OK: udp_dst_min=%u", pkt_dev->udp_dst_min);
1007 		return count;
1008 	}
1009 	if (!strcmp(name, "udp_src_max")) {
1010 		len = num_arg(&user_buffer[i], 10, &value);
1011 		if (len < 0) {
1012 			return len;
1013 		}
1014 		i += len;
1015 		if (value != pkt_dev->udp_src_max) {
1016 			pkt_dev->udp_src_max = value;
1017 			pkt_dev->cur_udp_src = value;
1018 		}
1019 		sprintf(pg_result, "OK: udp_src_max=%u", pkt_dev->udp_src_max);
1020 		return count;
1021 	}
1022 	if (!strcmp(name, "udp_dst_max")) {
1023 		len = num_arg(&user_buffer[i], 10, &value);
1024 		if (len < 0) {
1025 			return len;
1026 		}
1027 		i += len;
1028 		if (value != pkt_dev->udp_dst_max) {
1029 			pkt_dev->udp_dst_max = value;
1030 			pkt_dev->cur_udp_dst = value;
1031 		}
1032 		sprintf(pg_result, "OK: udp_dst_max=%u", pkt_dev->udp_dst_max);
1033 		return count;
1034 	}
1035 	if (!strcmp(name, "clone_skb")) {
1036 		len = num_arg(&user_buffer[i], 10, &value);
1037 		if (len < 0) {
1038 			return len;
1039 		}
1040 		i += len;
1041 		pkt_dev->clone_skb = value;
1042 
1043 		sprintf(pg_result, "OK: clone_skb=%d", pkt_dev->clone_skb);
1044 		return count;
1045 	}
1046 	if (!strcmp(name, "count")) {
1047 		len = num_arg(&user_buffer[i], 10, &value);
1048 		if (len < 0) {
1049 			return len;
1050 		}
1051 		i += len;
1052 		pkt_dev->count = value;
1053 		sprintf(pg_result, "OK: count=%llu",
1054 			(unsigned long long)pkt_dev->count);
1055 		return count;
1056 	}
1057 	if (!strcmp(name, "src_mac_count")) {
1058 		len = num_arg(&user_buffer[i], 10, &value);
1059 		if (len < 0) {
1060 			return len;
1061 		}
1062 		i += len;
1063 		if (pkt_dev->src_mac_count != value) {
1064 			pkt_dev->src_mac_count = value;
1065 			pkt_dev->cur_src_mac_offset = 0;
1066 		}
1067 		sprintf(pg_result, "OK: src_mac_count=%d",
1068 			pkt_dev->src_mac_count);
1069 		return count;
1070 	}
1071 	if (!strcmp(name, "dst_mac_count")) {
1072 		len = num_arg(&user_buffer[i], 10, &value);
1073 		if (len < 0) {
1074 			return len;
1075 		}
1076 		i += len;
1077 		if (pkt_dev->dst_mac_count != value) {
1078 			pkt_dev->dst_mac_count = value;
1079 			pkt_dev->cur_dst_mac_offset = 0;
1080 		}
1081 		sprintf(pg_result, "OK: dst_mac_count=%d",
1082 			pkt_dev->dst_mac_count);
1083 		return count;
1084 	}
1085 	if (!strcmp(name, "flag")) {
1086 		char f[32];
1087 		memset(f, 0, 32);
1088 		len = strn_len(&user_buffer[i], sizeof(f) - 1);
1089 		if (len < 0) {
1090 			return len;
1091 		}
1092 		if (copy_from_user(f, &user_buffer[i], len))
1093 			return -EFAULT;
1094 		i += len;
1095 		if (strcmp(f, "IPSRC_RND") == 0)
1096 			pkt_dev->flags |= F_IPSRC_RND;
1097 
1098 		else if (strcmp(f, "!IPSRC_RND") == 0)
1099 			pkt_dev->flags &= ~F_IPSRC_RND;
1100 
1101 		else if (strcmp(f, "TXSIZE_RND") == 0)
1102 			pkt_dev->flags |= F_TXSIZE_RND;
1103 
1104 		else if (strcmp(f, "!TXSIZE_RND") == 0)
1105 			pkt_dev->flags &= ~F_TXSIZE_RND;
1106 
1107 		else if (strcmp(f, "IPDST_RND") == 0)
1108 			pkt_dev->flags |= F_IPDST_RND;
1109 
1110 		else if (strcmp(f, "!IPDST_RND") == 0)
1111 			pkt_dev->flags &= ~F_IPDST_RND;
1112 
1113 		else if (strcmp(f, "UDPSRC_RND") == 0)
1114 			pkt_dev->flags |= F_UDPSRC_RND;
1115 
1116 		else if (strcmp(f, "!UDPSRC_RND") == 0)
1117 			pkt_dev->flags &= ~F_UDPSRC_RND;
1118 
1119 		else if (strcmp(f, "UDPDST_RND") == 0)
1120 			pkt_dev->flags |= F_UDPDST_RND;
1121 
1122 		else if (strcmp(f, "!UDPDST_RND") == 0)
1123 			pkt_dev->flags &= ~F_UDPDST_RND;
1124 
1125 		else if (strcmp(f, "MACSRC_RND") == 0)
1126 			pkt_dev->flags |= F_MACSRC_RND;
1127 
1128 		else if (strcmp(f, "!MACSRC_RND") == 0)
1129 			pkt_dev->flags &= ~F_MACSRC_RND;
1130 
1131 		else if (strcmp(f, "MACDST_RND") == 0)
1132 			pkt_dev->flags |= F_MACDST_RND;
1133 
1134 		else if (strcmp(f, "!MACDST_RND") == 0)
1135 			pkt_dev->flags &= ~F_MACDST_RND;
1136 
1137 		else if (strcmp(f, "MPLS_RND") == 0)
1138 			pkt_dev->flags |= F_MPLS_RND;
1139 
1140 		else if (strcmp(f, "!MPLS_RND") == 0)
1141 			pkt_dev->flags &= ~F_MPLS_RND;
1142 
1143 		else {
1144 			sprintf(pg_result,
1145 				"Flag -:%s:- unknown\nAvailable flags, (prepend ! to un-set flag):\n%s",
1146 				f,
1147 				"IPSRC_RND, IPDST_RND, TXSIZE_RND, UDPSRC_RND, UDPDST_RND, MACSRC_RND, MACDST_RND\n");
1148 			return count;
1149 		}
1150 		sprintf(pg_result, "OK: flags=0x%x", pkt_dev->flags);
1151 		return count;
1152 	}
1153 	if (!strcmp(name, "dst_min") || !strcmp(name, "dst")) {
1154 		len = strn_len(&user_buffer[i], sizeof(pkt_dev->dst_min) - 1);
1155 		if (len < 0) {
1156 			return len;
1157 		}
1158 
1159 		if (copy_from_user(buf, &user_buffer[i], len))
1160 			return -EFAULT;
1161 		buf[len] = 0;
1162 		if (strcmp(buf, pkt_dev->dst_min) != 0) {
1163 			memset(pkt_dev->dst_min, 0, sizeof(pkt_dev->dst_min));
1164 			strncpy(pkt_dev->dst_min, buf, len);
1165 			pkt_dev->daddr_min = in_aton(pkt_dev->dst_min);
1166 			pkt_dev->cur_daddr = pkt_dev->daddr_min;
1167 		}
1168 		if (debug)
1169 			printk("pktgen: dst_min set to: %s\n",
1170 			       pkt_dev->dst_min);
1171 		i += len;
1172 		sprintf(pg_result, "OK: dst_min=%s", pkt_dev->dst_min);
1173 		return count;
1174 	}
1175 	if (!strcmp(name, "dst_max")) {
1176 		len = strn_len(&user_buffer[i], sizeof(pkt_dev->dst_max) - 1);
1177 		if (len < 0) {
1178 			return len;
1179 		}
1180 
1181 		if (copy_from_user(buf, &user_buffer[i], len))
1182 			return -EFAULT;
1183 
1184 		buf[len] = 0;
1185 		if (strcmp(buf, pkt_dev->dst_max) != 0) {
1186 			memset(pkt_dev->dst_max, 0, sizeof(pkt_dev->dst_max));
1187 			strncpy(pkt_dev->dst_max, buf, len);
1188 			pkt_dev->daddr_max = in_aton(pkt_dev->dst_max);
1189 			pkt_dev->cur_daddr = pkt_dev->daddr_max;
1190 		}
1191 		if (debug)
1192 			printk("pktgen: dst_max set to: %s\n",
1193 			       pkt_dev->dst_max);
1194 		i += len;
1195 		sprintf(pg_result, "OK: dst_max=%s", pkt_dev->dst_max);
1196 		return count;
1197 	}
1198 	if (!strcmp(name, "dst6")) {
1199 		len = strn_len(&user_buffer[i], sizeof(buf) - 1);
1200 		if (len < 0)
1201 			return len;
1202 
1203 		pkt_dev->flags |= F_IPV6;
1204 
1205 		if (copy_from_user(buf, &user_buffer[i], len))
1206 			return -EFAULT;
1207 		buf[len] = 0;
1208 
1209 		scan_ip6(buf, pkt_dev->in6_daddr.s6_addr);
1210 		fmt_ip6(buf, pkt_dev->in6_daddr.s6_addr);
1211 
1212 		ipv6_addr_copy(&pkt_dev->cur_in6_daddr, &pkt_dev->in6_daddr);
1213 
1214 		if (debug)
1215 			printk("pktgen: dst6 set to: %s\n", buf);
1216 
1217 		i += len;
1218 		sprintf(pg_result, "OK: dst6=%s", buf);
1219 		return count;
1220 	}
1221 	if (!strcmp(name, "dst6_min")) {
1222 		len = strn_len(&user_buffer[i], sizeof(buf) - 1);
1223 		if (len < 0)
1224 			return len;
1225 
1226 		pkt_dev->flags |= F_IPV6;
1227 
1228 		if (copy_from_user(buf, &user_buffer[i], len))
1229 			return -EFAULT;
1230 		buf[len] = 0;
1231 
1232 		scan_ip6(buf, pkt_dev->min_in6_daddr.s6_addr);
1233 		fmt_ip6(buf, pkt_dev->min_in6_daddr.s6_addr);
1234 
1235 		ipv6_addr_copy(&pkt_dev->cur_in6_daddr,
1236 			       &pkt_dev->min_in6_daddr);
1237 		if (debug)
1238 			printk("pktgen: dst6_min set to: %s\n", buf);
1239 
1240 		i += len;
1241 		sprintf(pg_result, "OK: dst6_min=%s", buf);
1242 		return count;
1243 	}
1244 	if (!strcmp(name, "dst6_max")) {
1245 		len = strn_len(&user_buffer[i], sizeof(buf) - 1);
1246 		if (len < 0)
1247 			return len;
1248 
1249 		pkt_dev->flags |= F_IPV6;
1250 
1251 		if (copy_from_user(buf, &user_buffer[i], len))
1252 			return -EFAULT;
1253 		buf[len] = 0;
1254 
1255 		scan_ip6(buf, pkt_dev->max_in6_daddr.s6_addr);
1256 		fmt_ip6(buf, pkt_dev->max_in6_daddr.s6_addr);
1257 
1258 		if (debug)
1259 			printk("pktgen: dst6_max set to: %s\n", buf);
1260 
1261 		i += len;
1262 		sprintf(pg_result, "OK: dst6_max=%s", buf);
1263 		return count;
1264 	}
1265 	if (!strcmp(name, "src6")) {
1266 		len = strn_len(&user_buffer[i], sizeof(buf) - 1);
1267 		if (len < 0)
1268 			return len;
1269 
1270 		pkt_dev->flags |= F_IPV6;
1271 
1272 		if (copy_from_user(buf, &user_buffer[i], len))
1273 			return -EFAULT;
1274 		buf[len] = 0;
1275 
1276 		scan_ip6(buf, pkt_dev->in6_saddr.s6_addr);
1277 		fmt_ip6(buf, pkt_dev->in6_saddr.s6_addr);
1278 
1279 		ipv6_addr_copy(&pkt_dev->cur_in6_saddr, &pkt_dev->in6_saddr);
1280 
1281 		if (debug)
1282 			printk("pktgen: src6 set to: %s\n", buf);
1283 
1284 		i += len;
1285 		sprintf(pg_result, "OK: src6=%s", buf);
1286 		return count;
1287 	}
1288 	if (!strcmp(name, "src_min")) {
1289 		len = strn_len(&user_buffer[i], sizeof(pkt_dev->src_min) - 1);
1290 		if (len < 0) {
1291 			return len;
1292 		}
1293 		if (copy_from_user(buf, &user_buffer[i], len))
1294 			return -EFAULT;
1295 		buf[len] = 0;
1296 		if (strcmp(buf, pkt_dev->src_min) != 0) {
1297 			memset(pkt_dev->src_min, 0, sizeof(pkt_dev->src_min));
1298 			strncpy(pkt_dev->src_min, buf, len);
1299 			pkt_dev->saddr_min = in_aton(pkt_dev->src_min);
1300 			pkt_dev->cur_saddr = pkt_dev->saddr_min;
1301 		}
1302 		if (debug)
1303 			printk("pktgen: src_min set to: %s\n",
1304 			       pkt_dev->src_min);
1305 		i += len;
1306 		sprintf(pg_result, "OK: src_min=%s", pkt_dev->src_min);
1307 		return count;
1308 	}
1309 	if (!strcmp(name, "src_max")) {
1310 		len = strn_len(&user_buffer[i], sizeof(pkt_dev->src_max) - 1);
1311 		if (len < 0) {
1312 			return len;
1313 		}
1314 		if (copy_from_user(buf, &user_buffer[i], len))
1315 			return -EFAULT;
1316 		buf[len] = 0;
1317 		if (strcmp(buf, pkt_dev->src_max) != 0) {
1318 			memset(pkt_dev->src_max, 0, sizeof(pkt_dev->src_max));
1319 			strncpy(pkt_dev->src_max, buf, len);
1320 			pkt_dev->saddr_max = in_aton(pkt_dev->src_max);
1321 			pkt_dev->cur_saddr = pkt_dev->saddr_max;
1322 		}
1323 		if (debug)
1324 			printk("pktgen: src_max set to: %s\n",
1325 			       pkt_dev->src_max);
1326 		i += len;
1327 		sprintf(pg_result, "OK: src_max=%s", pkt_dev->src_max);
1328 		return count;
1329 	}
1330 	if (!strcmp(name, "dst_mac")) {
1331 		char *v = valstr;
1332 		unsigned char old_dmac[ETH_ALEN];
1333 		unsigned char *m = pkt_dev->dst_mac;
1334 		memcpy(old_dmac, pkt_dev->dst_mac, ETH_ALEN);
1335 
1336 		len = strn_len(&user_buffer[i], sizeof(valstr) - 1);
1337 		if (len < 0) {
1338 			return len;
1339 		}
1340 		memset(valstr, 0, sizeof(valstr));
1341 		if (copy_from_user(valstr, &user_buffer[i], len))
1342 			return -EFAULT;
1343 		i += len;
1344 
1345 		for (*m = 0; *v && m < pkt_dev->dst_mac + 6; v++) {
1346 			if (*v >= '0' && *v <= '9') {
1347 				*m *= 16;
1348 				*m += *v - '0';
1349 			}
1350 			if (*v >= 'A' && *v <= 'F') {
1351 				*m *= 16;
1352 				*m += *v - 'A' + 10;
1353 			}
1354 			if (*v >= 'a' && *v <= 'f') {
1355 				*m *= 16;
1356 				*m += *v - 'a' + 10;
1357 			}
1358 			if (*v == ':') {
1359 				m++;
1360 				*m = 0;
1361 			}
1362 		}
1363 
1364 		/* Set up Dest MAC */
1365 		if (compare_ether_addr(old_dmac, pkt_dev->dst_mac))
1366 			memcpy(&(pkt_dev->hh[0]), pkt_dev->dst_mac, ETH_ALEN);
1367 
1368 		sprintf(pg_result, "OK: dstmac");
1369 		return count;
1370 	}
1371 	if (!strcmp(name, "src_mac")) {
1372 		char *v = valstr;
1373 		unsigned char *m = pkt_dev->src_mac;
1374 
1375 		len = strn_len(&user_buffer[i], sizeof(valstr) - 1);
1376 		if (len < 0) {
1377 			return len;
1378 		}
1379 		memset(valstr, 0, sizeof(valstr));
1380 		if (copy_from_user(valstr, &user_buffer[i], len))
1381 			return -EFAULT;
1382 		i += len;
1383 
1384 		for (*m = 0; *v && m < pkt_dev->src_mac + 6; v++) {
1385 			if (*v >= '0' && *v <= '9') {
1386 				*m *= 16;
1387 				*m += *v - '0';
1388 			}
1389 			if (*v >= 'A' && *v <= 'F') {
1390 				*m *= 16;
1391 				*m += *v - 'A' + 10;
1392 			}
1393 			if (*v >= 'a' && *v <= 'f') {
1394 				*m *= 16;
1395 				*m += *v - 'a' + 10;
1396 			}
1397 			if (*v == ':') {
1398 				m++;
1399 				*m = 0;
1400 			}
1401 		}
1402 
1403 		sprintf(pg_result, "OK: srcmac");
1404 		return count;
1405 	}
1406 
1407 	if (!strcmp(name, "clear_counters")) {
1408 		pktgen_clear_counters(pkt_dev);
1409 		sprintf(pg_result, "OK: Clearing counters.\n");
1410 		return count;
1411 	}
1412 
1413 	if (!strcmp(name, "flows")) {
1414 		len = num_arg(&user_buffer[i], 10, &value);
1415 		if (len < 0) {
1416 			return len;
1417 		}
1418 		i += len;
1419 		if (value > MAX_CFLOWS)
1420 			value = MAX_CFLOWS;
1421 
1422 		pkt_dev->cflows = value;
1423 		sprintf(pg_result, "OK: flows=%u", pkt_dev->cflows);
1424 		return count;
1425 	}
1426 
1427 	if (!strcmp(name, "flowlen")) {
1428 		len = num_arg(&user_buffer[i], 10, &value);
1429 		if (len < 0) {
1430 			return len;
1431 		}
1432 		i += len;
1433 		pkt_dev->lflow = value;
1434 		sprintf(pg_result, "OK: flowlen=%u", pkt_dev->lflow);
1435 		return count;
1436 	}
1437 
1438 	if (!strcmp(name, "mpls")) {
1439 		unsigned n, offset;
1440 		len = get_labels(&user_buffer[i], pkt_dev);
1441 		if (len < 0) { return len; }
1442 		i += len;
1443 		offset = sprintf(pg_result, "OK: mpls=");
1444 		for(n = 0; n < pkt_dev->nr_labels; n++)
1445 			offset += sprintf(pg_result + offset,
1446 					  "%08x%s", ntohl(pkt_dev->labels[n]),
1447 					  n == pkt_dev->nr_labels-1 ? "" : ",");
1448 		return count;
1449 	}
1450 
1451 	sprintf(pkt_dev->result, "No such parameter \"%s\"", name);
1452 	return -EINVAL;
1453 }
1454 
1455 static int pktgen_if_open(struct inode *inode, struct file *file)
1456 {
1457 	return single_open(file, pktgen_if_show, PDE(inode)->data);
1458 }
1459 
1460 static struct file_operations pktgen_if_fops = {
1461 	.owner   = THIS_MODULE,
1462 	.open    = pktgen_if_open,
1463 	.read    = seq_read,
1464 	.llseek  = seq_lseek,
1465 	.write   = pktgen_if_write,
1466 	.release = single_release,
1467 };
1468 
1469 static int pktgen_thread_show(struct seq_file *seq, void *v)
1470 {
1471 	struct pktgen_thread *t = seq->private;
1472 	struct pktgen_dev *pkt_dev;
1473 
1474 	BUG_ON(!t);
1475 
1476 	seq_printf(seq, "Name: %s  max_before_softirq: %d\n",
1477 		   t->name, t->max_before_softirq);
1478 
1479 	seq_printf(seq, "Running: ");
1480 
1481 	if_lock(t);
1482 	list_for_each_entry(pkt_dev, &t->if_list, list)
1483 		if (pkt_dev->running)
1484 			seq_printf(seq, "%s ", pkt_dev->ifname);
1485 
1486 	seq_printf(seq, "\nStopped: ");
1487 
1488 	list_for_each_entry(pkt_dev, &t->if_list, list)
1489 		if (!pkt_dev->running)
1490 			seq_printf(seq, "%s ", pkt_dev->ifname);
1491 
1492 	if (t->result[0])
1493 		seq_printf(seq, "\nResult: %s\n", t->result);
1494 	else
1495 		seq_printf(seq, "\nResult: NA\n");
1496 
1497 	if_unlock(t);
1498 
1499 	return 0;
1500 }
1501 
1502 static ssize_t pktgen_thread_write(struct file *file,
1503 				   const char __user * user_buffer,
1504 				   size_t count, loff_t * offset)
1505 {
1506 	struct seq_file *seq = (struct seq_file *)file->private_data;
1507 	struct pktgen_thread *t = seq->private;
1508 	int i = 0, max, len, ret;
1509 	char name[40];
1510 	char *pg_result;
1511 	unsigned long value = 0;
1512 
1513 	if (count < 1) {
1514 		//      sprintf(pg_result, "Wrong command format");
1515 		return -EINVAL;
1516 	}
1517 
1518 	max = count - i;
1519 	len = count_trail_chars(&user_buffer[i], max);
1520 	if (len < 0)
1521 		return len;
1522 
1523 	i += len;
1524 
1525 	/* Read variable name */
1526 
1527 	len = strn_len(&user_buffer[i], sizeof(name) - 1);
1528 	if (len < 0)
1529 		return len;
1530 
1531 	memset(name, 0, sizeof(name));
1532 	if (copy_from_user(name, &user_buffer[i], len))
1533 		return -EFAULT;
1534 	i += len;
1535 
1536 	max = count - i;
1537 	len = count_trail_chars(&user_buffer[i], max);
1538 	if (len < 0)
1539 		return len;
1540 
1541 	i += len;
1542 
1543 	if (debug)
1544 		printk("pktgen: t=%s, count=%lu\n", name, (unsigned long)count);
1545 
1546 	if (!t) {
1547 		printk("pktgen: ERROR: No thread\n");
1548 		ret = -EINVAL;
1549 		goto out;
1550 	}
1551 
1552 	pg_result = &(t->result[0]);
1553 
1554 	if (!strcmp(name, "add_device")) {
1555 		char f[32];
1556 		memset(f, 0, 32);
1557 		len = strn_len(&user_buffer[i], sizeof(f) - 1);
1558 		if (len < 0) {
1559 			ret = len;
1560 			goto out;
1561 		}
1562 		if (copy_from_user(f, &user_buffer[i], len))
1563 			return -EFAULT;
1564 		i += len;
1565 		mutex_lock(&pktgen_thread_lock);
1566 		pktgen_add_device(t, f);
1567 		mutex_unlock(&pktgen_thread_lock);
1568 		ret = count;
1569 		sprintf(pg_result, "OK: add_device=%s", f);
1570 		goto out;
1571 	}
1572 
1573 	if (!strcmp(name, "rem_device_all")) {
1574 		mutex_lock(&pktgen_thread_lock);
1575 		t->control |= T_REMDEVALL;
1576 		mutex_unlock(&pktgen_thread_lock);
1577 		schedule_timeout_interruptible(msecs_to_jiffies(125));	/* Propagate thread->control  */
1578 		ret = count;
1579 		sprintf(pg_result, "OK: rem_device_all");
1580 		goto out;
1581 	}
1582 
1583 	if (!strcmp(name, "max_before_softirq")) {
1584 		len = num_arg(&user_buffer[i], 10, &value);
1585 		mutex_lock(&pktgen_thread_lock);
1586 		t->max_before_softirq = value;
1587 		mutex_unlock(&pktgen_thread_lock);
1588 		ret = count;
1589 		sprintf(pg_result, "OK: max_before_softirq=%lu", value);
1590 		goto out;
1591 	}
1592 
1593 	ret = -EINVAL;
1594 out:
1595 	return ret;
1596 }
1597 
1598 static int pktgen_thread_open(struct inode *inode, struct file *file)
1599 {
1600 	return single_open(file, pktgen_thread_show, PDE(inode)->data);
1601 }
1602 
1603 static struct file_operations pktgen_thread_fops = {
1604 	.owner   = THIS_MODULE,
1605 	.open    = pktgen_thread_open,
1606 	.read    = seq_read,
1607 	.llseek  = seq_lseek,
1608 	.write   = pktgen_thread_write,
1609 	.release = single_release,
1610 };
1611 
1612 /* Think find or remove for NN */
1613 static struct pktgen_dev *__pktgen_NN_threads(const char *ifname, int remove)
1614 {
1615 	struct pktgen_thread *t;
1616 	struct pktgen_dev *pkt_dev = NULL;
1617 
1618 	list_for_each_entry(t, &pktgen_threads, th_list) {
1619 		pkt_dev = pktgen_find_dev(t, ifname);
1620 		if (pkt_dev) {
1621 			if (remove) {
1622 				if_lock(t);
1623 				pkt_dev->removal_mark = 1;
1624 				t->control |= T_REMDEV;
1625 				if_unlock(t);
1626 			}
1627 			break;
1628 		}
1629 	}
1630 	return pkt_dev;
1631 }
1632 
1633 /*
1634  * mark a device for removal
1635  */
1636 static int pktgen_mark_device(const char *ifname)
1637 {
1638 	struct pktgen_dev *pkt_dev = NULL;
1639 	const int max_tries = 10, msec_per_try = 125;
1640 	int i = 0;
1641 	int ret = 0;
1642 
1643 	mutex_lock(&pktgen_thread_lock);
1644 	PG_DEBUG(printk("pktgen: pktgen_mark_device marking %s for removal\n",
1645 			ifname));
1646 
1647 	while (1) {
1648 
1649 		pkt_dev = __pktgen_NN_threads(ifname, REMOVE);
1650 		if (pkt_dev == NULL)
1651 			break;	/* success */
1652 
1653 		mutex_unlock(&pktgen_thread_lock);
1654 		PG_DEBUG(printk("pktgen: pktgen_mark_device waiting for %s "
1655 				"to disappear....\n", ifname));
1656 		schedule_timeout_interruptible(msecs_to_jiffies(msec_per_try));
1657 		mutex_lock(&pktgen_thread_lock);
1658 
1659 		if (++i >= max_tries) {
1660 			printk("pktgen_mark_device: timed out after waiting "
1661 			       "%d msec for device %s to be removed\n",
1662 			       msec_per_try * i, ifname);
1663 			ret = 1;
1664 			break;
1665 		}
1666 
1667 	}
1668 
1669 	mutex_unlock(&pktgen_thread_lock);
1670 
1671 	return ret;
1672 }
1673 
1674 static int pktgen_device_event(struct notifier_block *unused,
1675 			       unsigned long event, void *ptr)
1676 {
1677 	struct net_device *dev = (struct net_device *)(ptr);
1678 
1679 	/* It is OK that we do not hold the group lock right now,
1680 	 * as we run under the RTNL lock.
1681 	 */
1682 
1683 	switch (event) {
1684 	case NETDEV_CHANGEADDR:
1685 	case NETDEV_GOING_DOWN:
1686 	case NETDEV_DOWN:
1687 	case NETDEV_UP:
1688 		/* Ignore for now */
1689 		break;
1690 
1691 	case NETDEV_UNREGISTER:
1692 		pktgen_mark_device(dev->name);
1693 		break;
1694 	};
1695 
1696 	return NOTIFY_DONE;
1697 }
1698 
1699 /* Associate pktgen_dev with a device. */
1700 
1701 static struct net_device *pktgen_setup_dev(struct pktgen_dev *pkt_dev)
1702 {
1703 	struct net_device *odev;
1704 
1705 	/* Clean old setups */
1706 
1707 	if (pkt_dev->odev) {
1708 		dev_put(pkt_dev->odev);
1709 		pkt_dev->odev = NULL;
1710 	}
1711 
1712 	odev = dev_get_by_name(pkt_dev->ifname);
1713 
1714 	if (!odev) {
1715 		printk("pktgen: no such netdevice: \"%s\"\n", pkt_dev->ifname);
1716 		goto out;
1717 	}
1718 	if (odev->type != ARPHRD_ETHER) {
1719 		printk("pktgen: not an ethernet device: \"%s\"\n",
1720 		       pkt_dev->ifname);
1721 		goto out_put;
1722 	}
1723 	if (!netif_running(odev)) {
1724 		printk("pktgen: device is down: \"%s\"\n", pkt_dev->ifname);
1725 		goto out_put;
1726 	}
1727 	pkt_dev->odev = odev;
1728 
1729 	return pkt_dev->odev;
1730 
1731 out_put:
1732 	dev_put(odev);
1733 out:
1734 	return NULL;
1735 
1736 }
1737 
1738 /* Read pkt_dev from the interface and set up internal pktgen_dev
1739  * structure to have the right information to create/send packets
1740  */
1741 static void pktgen_setup_inject(struct pktgen_dev *pkt_dev)
1742 {
1743 	/* Try once more, just in case it works now. */
1744 	if (!pkt_dev->odev)
1745 		pktgen_setup_dev(pkt_dev);
1746 
1747 	if (!pkt_dev->odev) {
1748 		printk("pktgen: ERROR: pkt_dev->odev == NULL in setup_inject.\n");
1749 		sprintf(pkt_dev->result,
1750 			"ERROR: pkt_dev->odev == NULL in setup_inject.\n");
1751 		return;
1752 	}
1753 
1754 	/* Default to the interface's mac if not explicitly set. */
1755 
1756 	if (is_zero_ether_addr(pkt_dev->src_mac))
1757 		memcpy(&(pkt_dev->hh[6]), pkt_dev->odev->dev_addr, ETH_ALEN);
1758 
1759 	/* Set up Dest MAC */
1760 	memcpy(&(pkt_dev->hh[0]), pkt_dev->dst_mac, ETH_ALEN);
1761 
1762 	/* Set up pkt size */
1763 	pkt_dev->cur_pkt_size = pkt_dev->min_pkt_size;
1764 
1765 	if (pkt_dev->flags & F_IPV6) {
1766 		/*
1767 		 * Skip this automatic address setting until locks or functions
1768 		 * gets exported
1769 		 */
1770 
1771 #ifdef NOTNOW
1772 		int i, set = 0, err = 1;
1773 		struct inet6_dev *idev;
1774 
1775 		for (i = 0; i < IN6_ADDR_HSIZE; i++)
1776 			if (pkt_dev->cur_in6_saddr.s6_addr[i]) {
1777 				set = 1;
1778 				break;
1779 			}
1780 
1781 		if (!set) {
1782 
1783 			/*
1784 			 * Use linklevel address if unconfigured.
1785 			 *
1786 			 * use ipv6_get_lladdr if/when it's get exported
1787 			 */
1788 
1789 			read_lock(&addrconf_lock);
1790 			if ((idev = __in6_dev_get(pkt_dev->odev)) != NULL) {
1791 				struct inet6_ifaddr *ifp;
1792 
1793 				read_lock_bh(&idev->lock);
1794 				for (ifp = idev->addr_list; ifp;
1795 				     ifp = ifp->if_next) {
1796 					if (ifp->scope == IFA_LINK
1797 					    && !(ifp->
1798 						 flags & IFA_F_TENTATIVE)) {
1799 						ipv6_addr_copy(&pkt_dev->
1800 							       cur_in6_saddr,
1801 							       &ifp->addr);
1802 						err = 0;
1803 						break;
1804 					}
1805 				}
1806 				read_unlock_bh(&idev->lock);
1807 			}
1808 			read_unlock(&addrconf_lock);
1809 			if (err)
1810 				printk("pktgen: ERROR: IPv6 link address not availble.\n");
1811 		}
1812 #endif
1813 	} else {
1814 		pkt_dev->saddr_min = 0;
1815 		pkt_dev->saddr_max = 0;
1816 		if (strlen(pkt_dev->src_min) == 0) {
1817 
1818 			struct in_device *in_dev;
1819 
1820 			rcu_read_lock();
1821 			in_dev = __in_dev_get_rcu(pkt_dev->odev);
1822 			if (in_dev) {
1823 				if (in_dev->ifa_list) {
1824 					pkt_dev->saddr_min =
1825 					    in_dev->ifa_list->ifa_address;
1826 					pkt_dev->saddr_max = pkt_dev->saddr_min;
1827 				}
1828 			}
1829 			rcu_read_unlock();
1830 		} else {
1831 			pkt_dev->saddr_min = in_aton(pkt_dev->src_min);
1832 			pkt_dev->saddr_max = in_aton(pkt_dev->src_max);
1833 		}
1834 
1835 		pkt_dev->daddr_min = in_aton(pkt_dev->dst_min);
1836 		pkt_dev->daddr_max = in_aton(pkt_dev->dst_max);
1837 	}
1838 	/* Initialize current values. */
1839 	pkt_dev->cur_dst_mac_offset = 0;
1840 	pkt_dev->cur_src_mac_offset = 0;
1841 	pkt_dev->cur_saddr = pkt_dev->saddr_min;
1842 	pkt_dev->cur_daddr = pkt_dev->daddr_min;
1843 	pkt_dev->cur_udp_dst = pkt_dev->udp_dst_min;
1844 	pkt_dev->cur_udp_src = pkt_dev->udp_src_min;
1845 	pkt_dev->nflows = 0;
1846 }
1847 
1848 static void spin(struct pktgen_dev *pkt_dev, __u64 spin_until_us)
1849 {
1850 	__u64 start;
1851 	__u64 now;
1852 
1853 	start = now = getCurUs();
1854 	printk(KERN_INFO "sleeping for %d\n", (int)(spin_until_us - now));
1855 	while (now < spin_until_us) {
1856 		/* TODO: optimize sleeping behavior */
1857 		if (spin_until_us - now > jiffies_to_usecs(1) + 1)
1858 			schedule_timeout_interruptible(1);
1859 		else if (spin_until_us - now > 100) {
1860 			do_softirq();
1861 			if (!pkt_dev->running)
1862 				return;
1863 			if (need_resched())
1864 				schedule();
1865 		}
1866 
1867 		now = getCurUs();
1868 	}
1869 
1870 	pkt_dev->idle_acc += now - start;
1871 }
1872 
1873 /* Increment/randomize headers according to flags and current values
1874  * for IP src/dest, UDP src/dst port, MAC-Addr src/dst
1875  */
1876 static void mod_cur_headers(struct pktgen_dev *pkt_dev)
1877 {
1878 	__u32 imn;
1879 	__u32 imx;
1880 	int flow = 0;
1881 
1882 	if (pkt_dev->cflows) {
1883 		flow = pktgen_random() % pkt_dev->cflows;
1884 
1885 		if (pkt_dev->flows[flow].count > pkt_dev->lflow)
1886 			pkt_dev->flows[flow].count = 0;
1887 	}
1888 
1889 	/*  Deal with source MAC */
1890 	if (pkt_dev->src_mac_count > 1) {
1891 		__u32 mc;
1892 		__u32 tmp;
1893 
1894 		if (pkt_dev->flags & F_MACSRC_RND)
1895 			mc = pktgen_random() % (pkt_dev->src_mac_count);
1896 		else {
1897 			mc = pkt_dev->cur_src_mac_offset++;
1898 			if (pkt_dev->cur_src_mac_offset >
1899 			    pkt_dev->src_mac_count)
1900 				pkt_dev->cur_src_mac_offset = 0;
1901 		}
1902 
1903 		tmp = pkt_dev->src_mac[5] + (mc & 0xFF);
1904 		pkt_dev->hh[11] = tmp;
1905 		tmp = (pkt_dev->src_mac[4] + ((mc >> 8) & 0xFF) + (tmp >> 8));
1906 		pkt_dev->hh[10] = tmp;
1907 		tmp = (pkt_dev->src_mac[3] + ((mc >> 16) & 0xFF) + (tmp >> 8));
1908 		pkt_dev->hh[9] = tmp;
1909 		tmp = (pkt_dev->src_mac[2] + ((mc >> 24) & 0xFF) + (tmp >> 8));
1910 		pkt_dev->hh[8] = tmp;
1911 		tmp = (pkt_dev->src_mac[1] + (tmp >> 8));
1912 		pkt_dev->hh[7] = tmp;
1913 	}
1914 
1915 	/*  Deal with Destination MAC */
1916 	if (pkt_dev->dst_mac_count > 1) {
1917 		__u32 mc;
1918 		__u32 tmp;
1919 
1920 		if (pkt_dev->flags & F_MACDST_RND)
1921 			mc = pktgen_random() % (pkt_dev->dst_mac_count);
1922 
1923 		else {
1924 			mc = pkt_dev->cur_dst_mac_offset++;
1925 			if (pkt_dev->cur_dst_mac_offset >
1926 			    pkt_dev->dst_mac_count) {
1927 				pkt_dev->cur_dst_mac_offset = 0;
1928 			}
1929 		}
1930 
1931 		tmp = pkt_dev->dst_mac[5] + (mc & 0xFF);
1932 		pkt_dev->hh[5] = tmp;
1933 		tmp = (pkt_dev->dst_mac[4] + ((mc >> 8) & 0xFF) + (tmp >> 8));
1934 		pkt_dev->hh[4] = tmp;
1935 		tmp = (pkt_dev->dst_mac[3] + ((mc >> 16) & 0xFF) + (tmp >> 8));
1936 		pkt_dev->hh[3] = tmp;
1937 		tmp = (pkt_dev->dst_mac[2] + ((mc >> 24) & 0xFF) + (tmp >> 8));
1938 		pkt_dev->hh[2] = tmp;
1939 		tmp = (pkt_dev->dst_mac[1] + (tmp >> 8));
1940 		pkt_dev->hh[1] = tmp;
1941 	}
1942 
1943 	if (pkt_dev->flags & F_MPLS_RND) {
1944 		unsigned i;
1945 		for(i = 0; i < pkt_dev->nr_labels; i++)
1946 			if (pkt_dev->labels[i] & MPLS_STACK_BOTTOM)
1947 				pkt_dev->labels[i] = MPLS_STACK_BOTTOM |
1948 						     (pktgen_random() &
1949 						      htonl(0x000fffff));
1950 	}
1951 
1952 	if (pkt_dev->udp_src_min < pkt_dev->udp_src_max) {
1953 		if (pkt_dev->flags & F_UDPSRC_RND)
1954 			pkt_dev->cur_udp_src =
1955 			    ((pktgen_random() %
1956 			      (pkt_dev->udp_src_max - pkt_dev->udp_src_min)) +
1957 			     pkt_dev->udp_src_min);
1958 
1959 		else {
1960 			pkt_dev->cur_udp_src++;
1961 			if (pkt_dev->cur_udp_src >= pkt_dev->udp_src_max)
1962 				pkt_dev->cur_udp_src = pkt_dev->udp_src_min;
1963 		}
1964 	}
1965 
1966 	if (pkt_dev->udp_dst_min < pkt_dev->udp_dst_max) {
1967 		if (pkt_dev->flags & F_UDPDST_RND) {
1968 			pkt_dev->cur_udp_dst =
1969 			    ((pktgen_random() %
1970 			      (pkt_dev->udp_dst_max - pkt_dev->udp_dst_min)) +
1971 			     pkt_dev->udp_dst_min);
1972 		} else {
1973 			pkt_dev->cur_udp_dst++;
1974 			if (pkt_dev->cur_udp_dst >= pkt_dev->udp_dst_max)
1975 				pkt_dev->cur_udp_dst = pkt_dev->udp_dst_min;
1976 		}
1977 	}
1978 
1979 	if (!(pkt_dev->flags & F_IPV6)) {
1980 
1981 		if ((imn = ntohl(pkt_dev->saddr_min)) < (imx =
1982 							 ntohl(pkt_dev->
1983 							       saddr_max))) {
1984 			__u32 t;
1985 			if (pkt_dev->flags & F_IPSRC_RND)
1986 				t = ((pktgen_random() % (imx - imn)) + imn);
1987 			else {
1988 				t = ntohl(pkt_dev->cur_saddr);
1989 				t++;
1990 				if (t > imx) {
1991 					t = imn;
1992 				}
1993 			}
1994 			pkt_dev->cur_saddr = htonl(t);
1995 		}
1996 
1997 		if (pkt_dev->cflows && pkt_dev->flows[flow].count != 0) {
1998 			pkt_dev->cur_daddr = pkt_dev->flows[flow].cur_daddr;
1999 		} else {
2000 
2001 			if ((imn = ntohl(pkt_dev->daddr_min)) < (imx =
2002 								 ntohl(pkt_dev->
2003 								       daddr_max)))
2004 			{
2005 				__u32 t;
2006 				if (pkt_dev->flags & F_IPDST_RND) {
2007 
2008 					t = ((pktgen_random() % (imx - imn)) +
2009 					     imn);
2010 					t = htonl(t);
2011 
2012 					while (LOOPBACK(t) || MULTICAST(t)
2013 					       || BADCLASS(t) || ZERONET(t)
2014 					       || LOCAL_MCAST(t)) {
2015 						t = ((pktgen_random() %
2016 						      (imx - imn)) + imn);
2017 						t = htonl(t);
2018 					}
2019 					pkt_dev->cur_daddr = t;
2020 				}
2021 
2022 				else {
2023 					t = ntohl(pkt_dev->cur_daddr);
2024 					t++;
2025 					if (t > imx) {
2026 						t = imn;
2027 					}
2028 					pkt_dev->cur_daddr = htonl(t);
2029 				}
2030 			}
2031 			if (pkt_dev->cflows) {
2032 				pkt_dev->flows[flow].cur_daddr =
2033 				    pkt_dev->cur_daddr;
2034 				pkt_dev->nflows++;
2035 			}
2036 		}
2037 	} else {		/* IPV6 * */
2038 
2039 		if (pkt_dev->min_in6_daddr.s6_addr32[0] == 0 &&
2040 		    pkt_dev->min_in6_daddr.s6_addr32[1] == 0 &&
2041 		    pkt_dev->min_in6_daddr.s6_addr32[2] == 0 &&
2042 		    pkt_dev->min_in6_daddr.s6_addr32[3] == 0) ;
2043 		else {
2044 			int i;
2045 
2046 			/* Only random destinations yet */
2047 
2048 			for (i = 0; i < 4; i++) {
2049 				pkt_dev->cur_in6_daddr.s6_addr32[i] =
2050 				    ((pktgen_random() |
2051 				      pkt_dev->min_in6_daddr.s6_addr32[i]) &
2052 				     pkt_dev->max_in6_daddr.s6_addr32[i]);
2053 			}
2054 		}
2055 	}
2056 
2057 	if (pkt_dev->min_pkt_size < pkt_dev->max_pkt_size) {
2058 		__u32 t;
2059 		if (pkt_dev->flags & F_TXSIZE_RND) {
2060 			t = ((pktgen_random() %
2061 			      (pkt_dev->max_pkt_size - pkt_dev->min_pkt_size))
2062 			     + pkt_dev->min_pkt_size);
2063 		} else {
2064 			t = pkt_dev->cur_pkt_size + 1;
2065 			if (t > pkt_dev->max_pkt_size)
2066 				t = pkt_dev->min_pkt_size;
2067 		}
2068 		pkt_dev->cur_pkt_size = t;
2069 	}
2070 
2071 	pkt_dev->flows[flow].count++;
2072 }
2073 
2074 static void mpls_push(__be32 *mpls, struct pktgen_dev *pkt_dev)
2075 {
2076 	unsigned i;
2077 	for(i = 0; i < pkt_dev->nr_labels; i++) {
2078 		*mpls++ = pkt_dev->labels[i] & ~MPLS_STACK_BOTTOM;
2079 	}
2080 	mpls--;
2081 	*mpls |= MPLS_STACK_BOTTOM;
2082 }
2083 
2084 static struct sk_buff *fill_packet_ipv4(struct net_device *odev,
2085 					struct pktgen_dev *pkt_dev)
2086 {
2087 	struct sk_buff *skb = NULL;
2088 	__u8 *eth;
2089 	struct udphdr *udph;
2090 	int datalen, iplen;
2091 	struct iphdr *iph;
2092 	struct pktgen_hdr *pgh = NULL;
2093 	__be16 protocol = __constant_htons(ETH_P_IP);
2094 	__be32 *mpls;
2095 
2096 	if (pkt_dev->nr_labels)
2097 		protocol = __constant_htons(ETH_P_MPLS_UC);
2098 
2099 	/* Update any of the values, used when we're incrementing various
2100 	 * fields.
2101 	 */
2102 	mod_cur_headers(pkt_dev);
2103 
2104 	datalen = (odev->hard_header_len + 16) & ~0xf;
2105 	skb = alloc_skb(pkt_dev->cur_pkt_size + 64 + datalen +
2106 			pkt_dev->nr_labels*sizeof(u32), GFP_ATOMIC);
2107 	if (!skb) {
2108 		sprintf(pkt_dev->result, "No memory");
2109 		return NULL;
2110 	}
2111 
2112 	skb_reserve(skb, datalen);
2113 
2114 	/*  Reserve for ethernet and IP header  */
2115 	eth = (__u8 *) skb_push(skb, 14);
2116 	mpls = (__be32 *)skb_put(skb, pkt_dev->nr_labels*sizeof(__u32));
2117 	if (pkt_dev->nr_labels)
2118 		mpls_push(mpls, pkt_dev);
2119 	iph = (struct iphdr *)skb_put(skb, sizeof(struct iphdr));
2120 	udph = (struct udphdr *)skb_put(skb, sizeof(struct udphdr));
2121 
2122 	memcpy(eth, pkt_dev->hh, 12);
2123 	*(u16 *) & eth[12] = protocol;
2124 
2125 	/* Eth + IPh + UDPh + mpls */
2126 	datalen = pkt_dev->cur_pkt_size - 14 - 20 - 8 -
2127 		  pkt_dev->nr_labels*sizeof(u32);
2128 	if (datalen < sizeof(struct pktgen_hdr))
2129 		datalen = sizeof(struct pktgen_hdr);
2130 
2131 	udph->source = htons(pkt_dev->cur_udp_src);
2132 	udph->dest = htons(pkt_dev->cur_udp_dst);
2133 	udph->len = htons(datalen + 8);	/* DATA + udphdr */
2134 	udph->check = 0;	/* No checksum */
2135 
2136 	iph->ihl = 5;
2137 	iph->version = 4;
2138 	iph->ttl = 32;
2139 	iph->tos = 0;
2140 	iph->protocol = IPPROTO_UDP;	/* UDP */
2141 	iph->saddr = pkt_dev->cur_saddr;
2142 	iph->daddr = pkt_dev->cur_daddr;
2143 	iph->frag_off = 0;
2144 	iplen = 20 + 8 + datalen;
2145 	iph->tot_len = htons(iplen);
2146 	iph->check = 0;
2147 	iph->check = ip_fast_csum((void *)iph, iph->ihl);
2148 	skb->protocol = protocol;
2149 	skb->mac.raw = ((u8 *) iph) - 14 - pkt_dev->nr_labels*sizeof(u32);
2150 	skb->dev = odev;
2151 	skb->pkt_type = PACKET_HOST;
2152 	skb->nh.iph = iph;
2153 	skb->h.uh = udph;
2154 
2155 	if (pkt_dev->nfrags <= 0)
2156 		pgh = (struct pktgen_hdr *)skb_put(skb, datalen);
2157 	else {
2158 		int frags = pkt_dev->nfrags;
2159 		int i;
2160 
2161 		pgh = (struct pktgen_hdr *)(((char *)(udph)) + 8);
2162 
2163 		if (frags > MAX_SKB_FRAGS)
2164 			frags = MAX_SKB_FRAGS;
2165 		if (datalen > frags * PAGE_SIZE) {
2166 			skb_put(skb, datalen - frags * PAGE_SIZE);
2167 			datalen = frags * PAGE_SIZE;
2168 		}
2169 
2170 		i = 0;
2171 		while (datalen > 0) {
2172 			struct page *page = alloc_pages(GFP_KERNEL, 0);
2173 			skb_shinfo(skb)->frags[i].page = page;
2174 			skb_shinfo(skb)->frags[i].page_offset = 0;
2175 			skb_shinfo(skb)->frags[i].size =
2176 			    (datalen < PAGE_SIZE ? datalen : PAGE_SIZE);
2177 			datalen -= skb_shinfo(skb)->frags[i].size;
2178 			skb->len += skb_shinfo(skb)->frags[i].size;
2179 			skb->data_len += skb_shinfo(skb)->frags[i].size;
2180 			i++;
2181 			skb_shinfo(skb)->nr_frags = i;
2182 		}
2183 
2184 		while (i < frags) {
2185 			int rem;
2186 
2187 			if (i == 0)
2188 				break;
2189 
2190 			rem = skb_shinfo(skb)->frags[i - 1].size / 2;
2191 			if (rem == 0)
2192 				break;
2193 
2194 			skb_shinfo(skb)->frags[i - 1].size -= rem;
2195 
2196 			skb_shinfo(skb)->frags[i] =
2197 			    skb_shinfo(skb)->frags[i - 1];
2198 			get_page(skb_shinfo(skb)->frags[i].page);
2199 			skb_shinfo(skb)->frags[i].page =
2200 			    skb_shinfo(skb)->frags[i - 1].page;
2201 			skb_shinfo(skb)->frags[i].page_offset +=
2202 			    skb_shinfo(skb)->frags[i - 1].size;
2203 			skb_shinfo(skb)->frags[i].size = rem;
2204 			i++;
2205 			skb_shinfo(skb)->nr_frags = i;
2206 		}
2207 	}
2208 
2209 	/* Stamp the time, and sequence number, convert them to network byte order */
2210 
2211 	if (pgh) {
2212 		struct timeval timestamp;
2213 
2214 		pgh->pgh_magic = htonl(PKTGEN_MAGIC);
2215 		pgh->seq_num = htonl(pkt_dev->seq_num);
2216 
2217 		do_gettimeofday(&timestamp);
2218 		pgh->tv_sec = htonl(timestamp.tv_sec);
2219 		pgh->tv_usec = htonl(timestamp.tv_usec);
2220 	}
2221 	pkt_dev->seq_num++;
2222 
2223 	return skb;
2224 }
2225 
2226 /*
2227  * scan_ip6, fmt_ip taken from dietlibc-0.21
2228  * Author Felix von Leitner <felix-dietlibc@fefe.de>
2229  *
2230  * Slightly modified for kernel.
2231  * Should be candidate for net/ipv4/utils.c
2232  * --ro
2233  */
2234 
2235 static unsigned int scan_ip6(const char *s, char ip[16])
2236 {
2237 	unsigned int i;
2238 	unsigned int len = 0;
2239 	unsigned long u;
2240 	char suffix[16];
2241 	unsigned int prefixlen = 0;
2242 	unsigned int suffixlen = 0;
2243 	__u32 tmp;
2244 
2245 	for (i = 0; i < 16; i++)
2246 		ip[i] = 0;
2247 
2248 	for (;;) {
2249 		if (*s == ':') {
2250 			len++;
2251 			if (s[1] == ':') {	/* Found "::", skip to part 2 */
2252 				s += 2;
2253 				len++;
2254 				break;
2255 			}
2256 			s++;
2257 		}
2258 		{
2259 			char *tmp;
2260 			u = simple_strtoul(s, &tmp, 16);
2261 			i = tmp - s;
2262 		}
2263 
2264 		if (!i)
2265 			return 0;
2266 		if (prefixlen == 12 && s[i] == '.') {
2267 
2268 			/* the last 4 bytes may be written as IPv4 address */
2269 
2270 			tmp = in_aton(s);
2271 			memcpy((struct in_addr *)(ip + 12), &tmp, sizeof(tmp));
2272 			return i + len;
2273 		}
2274 		ip[prefixlen++] = (u >> 8);
2275 		ip[prefixlen++] = (u & 255);
2276 		s += i;
2277 		len += i;
2278 		if (prefixlen == 16)
2279 			return len;
2280 	}
2281 
2282 /* part 2, after "::" */
2283 	for (;;) {
2284 		if (*s == ':') {
2285 			if (suffixlen == 0)
2286 				break;
2287 			s++;
2288 			len++;
2289 		} else if (suffixlen != 0)
2290 			break;
2291 		{
2292 			char *tmp;
2293 			u = simple_strtol(s, &tmp, 16);
2294 			i = tmp - s;
2295 		}
2296 		if (!i) {
2297 			if (*s)
2298 				len--;
2299 			break;
2300 		}
2301 		if (suffixlen + prefixlen <= 12 && s[i] == '.') {
2302 			tmp = in_aton(s);
2303 			memcpy((struct in_addr *)(suffix + suffixlen), &tmp,
2304 			       sizeof(tmp));
2305 			suffixlen += 4;
2306 			len += strlen(s);
2307 			break;
2308 		}
2309 		suffix[suffixlen++] = (u >> 8);
2310 		suffix[suffixlen++] = (u & 255);
2311 		s += i;
2312 		len += i;
2313 		if (prefixlen + suffixlen == 16)
2314 			break;
2315 	}
2316 	for (i = 0; i < suffixlen; i++)
2317 		ip[16 - suffixlen + i] = suffix[i];
2318 	return len;
2319 }
2320 
2321 static char tohex(char hexdigit)
2322 {
2323 	return hexdigit > 9 ? hexdigit + 'a' - 10 : hexdigit + '0';
2324 }
2325 
2326 static int fmt_xlong(char *s, unsigned int i)
2327 {
2328 	char *bak = s;
2329 	*s = tohex((i >> 12) & 0xf);
2330 	if (s != bak || *s != '0')
2331 		++s;
2332 	*s = tohex((i >> 8) & 0xf);
2333 	if (s != bak || *s != '0')
2334 		++s;
2335 	*s = tohex((i >> 4) & 0xf);
2336 	if (s != bak || *s != '0')
2337 		++s;
2338 	*s = tohex(i & 0xf);
2339 	return s - bak + 1;
2340 }
2341 
2342 static unsigned int fmt_ip6(char *s, const char ip[16])
2343 {
2344 	unsigned int len;
2345 	unsigned int i;
2346 	unsigned int temp;
2347 	unsigned int compressing;
2348 	int j;
2349 
2350 	len = 0;
2351 	compressing = 0;
2352 	for (j = 0; j < 16; j += 2) {
2353 
2354 #ifdef V4MAPPEDPREFIX
2355 		if (j == 12 && !memcmp(ip, V4mappedprefix, 12)) {
2356 			inet_ntoa_r(*(struct in_addr *)(ip + 12), s);
2357 			temp = strlen(s);
2358 			return len + temp;
2359 		}
2360 #endif
2361 		temp = ((unsigned long)(unsigned char)ip[j] << 8) +
2362 		    (unsigned long)(unsigned char)ip[j + 1];
2363 		if (temp == 0) {
2364 			if (!compressing) {
2365 				compressing = 1;
2366 				if (j == 0) {
2367 					*s++ = ':';
2368 					++len;
2369 				}
2370 			}
2371 		} else {
2372 			if (compressing) {
2373 				compressing = 0;
2374 				*s++ = ':';
2375 				++len;
2376 			}
2377 			i = fmt_xlong(s, temp);
2378 			len += i;
2379 			s += i;
2380 			if (j < 14) {
2381 				*s++ = ':';
2382 				++len;
2383 			}
2384 		}
2385 	}
2386 	if (compressing) {
2387 		*s++ = ':';
2388 		++len;
2389 	}
2390 	*s = 0;
2391 	return len;
2392 }
2393 
2394 static struct sk_buff *fill_packet_ipv6(struct net_device *odev,
2395 					struct pktgen_dev *pkt_dev)
2396 {
2397 	struct sk_buff *skb = NULL;
2398 	__u8 *eth;
2399 	struct udphdr *udph;
2400 	int datalen;
2401 	struct ipv6hdr *iph;
2402 	struct pktgen_hdr *pgh = NULL;
2403 	__be16 protocol = __constant_htons(ETH_P_IPV6);
2404 	__be32 *mpls;
2405 
2406 	if (pkt_dev->nr_labels)
2407 		protocol = __constant_htons(ETH_P_MPLS_UC);
2408 
2409 	/* Update any of the values, used when we're incrementing various
2410 	 * fields.
2411 	 */
2412 	mod_cur_headers(pkt_dev);
2413 
2414 	skb = alloc_skb(pkt_dev->cur_pkt_size + 64 + 16 +
2415 			pkt_dev->nr_labels*sizeof(u32), GFP_ATOMIC);
2416 	if (!skb) {
2417 		sprintf(pkt_dev->result, "No memory");
2418 		return NULL;
2419 	}
2420 
2421 	skb_reserve(skb, 16);
2422 
2423 	/*  Reserve for ethernet and IP header  */
2424 	eth = (__u8 *) skb_push(skb, 14);
2425 	mpls = (__be32 *)skb_put(skb, pkt_dev->nr_labels*sizeof(__u32));
2426 	if (pkt_dev->nr_labels)
2427 		mpls_push(mpls, pkt_dev);
2428 	iph = (struct ipv6hdr *)skb_put(skb, sizeof(struct ipv6hdr));
2429 	udph = (struct udphdr *)skb_put(skb, sizeof(struct udphdr));
2430 
2431 	memcpy(eth, pkt_dev->hh, 12);
2432 	*(u16 *) & eth[12] = __constant_htons(ETH_P_IPV6);
2433 
2434 	/* Eth + IPh + UDPh + mpls */
2435 	datalen = pkt_dev->cur_pkt_size - 14 -
2436 		  sizeof(struct ipv6hdr) - sizeof(struct udphdr) -
2437 		  pkt_dev->nr_labels*sizeof(u32);
2438 
2439 	if (datalen < sizeof(struct pktgen_hdr)) {
2440 		datalen = sizeof(struct pktgen_hdr);
2441 		if (net_ratelimit())
2442 			printk(KERN_INFO "pktgen: increased datalen to %d\n",
2443 			       datalen);
2444 	}
2445 
2446 	udph->source = htons(pkt_dev->cur_udp_src);
2447 	udph->dest = htons(pkt_dev->cur_udp_dst);
2448 	udph->len = htons(datalen + sizeof(struct udphdr));
2449 	udph->check = 0;	/* No checksum */
2450 
2451 	*(u32 *) iph = __constant_htonl(0x60000000);	/* Version + flow */
2452 
2453 	iph->hop_limit = 32;
2454 
2455 	iph->payload_len = htons(sizeof(struct udphdr) + datalen);
2456 	iph->nexthdr = IPPROTO_UDP;
2457 
2458 	ipv6_addr_copy(&iph->daddr, &pkt_dev->cur_in6_daddr);
2459 	ipv6_addr_copy(&iph->saddr, &pkt_dev->cur_in6_saddr);
2460 
2461 	skb->mac.raw = ((u8 *) iph) - 14 - pkt_dev->nr_labels*sizeof(u32);
2462 	skb->protocol = protocol;
2463 	skb->dev = odev;
2464 	skb->pkt_type = PACKET_HOST;
2465 	skb->nh.ipv6h = iph;
2466 	skb->h.uh = udph;
2467 
2468 	if (pkt_dev->nfrags <= 0)
2469 		pgh = (struct pktgen_hdr *)skb_put(skb, datalen);
2470 	else {
2471 		int frags = pkt_dev->nfrags;
2472 		int i;
2473 
2474 		pgh = (struct pktgen_hdr *)(((char *)(udph)) + 8);
2475 
2476 		if (frags > MAX_SKB_FRAGS)
2477 			frags = MAX_SKB_FRAGS;
2478 		if (datalen > frags * PAGE_SIZE) {
2479 			skb_put(skb, datalen - frags * PAGE_SIZE);
2480 			datalen = frags * PAGE_SIZE;
2481 		}
2482 
2483 		i = 0;
2484 		while (datalen > 0) {
2485 			struct page *page = alloc_pages(GFP_KERNEL, 0);
2486 			skb_shinfo(skb)->frags[i].page = page;
2487 			skb_shinfo(skb)->frags[i].page_offset = 0;
2488 			skb_shinfo(skb)->frags[i].size =
2489 			    (datalen < PAGE_SIZE ? datalen : PAGE_SIZE);
2490 			datalen -= skb_shinfo(skb)->frags[i].size;
2491 			skb->len += skb_shinfo(skb)->frags[i].size;
2492 			skb->data_len += skb_shinfo(skb)->frags[i].size;
2493 			i++;
2494 			skb_shinfo(skb)->nr_frags = i;
2495 		}
2496 
2497 		while (i < frags) {
2498 			int rem;
2499 
2500 			if (i == 0)
2501 				break;
2502 
2503 			rem = skb_shinfo(skb)->frags[i - 1].size / 2;
2504 			if (rem == 0)
2505 				break;
2506 
2507 			skb_shinfo(skb)->frags[i - 1].size -= rem;
2508 
2509 			skb_shinfo(skb)->frags[i] =
2510 			    skb_shinfo(skb)->frags[i - 1];
2511 			get_page(skb_shinfo(skb)->frags[i].page);
2512 			skb_shinfo(skb)->frags[i].page =
2513 			    skb_shinfo(skb)->frags[i - 1].page;
2514 			skb_shinfo(skb)->frags[i].page_offset +=
2515 			    skb_shinfo(skb)->frags[i - 1].size;
2516 			skb_shinfo(skb)->frags[i].size = rem;
2517 			i++;
2518 			skb_shinfo(skb)->nr_frags = i;
2519 		}
2520 	}
2521 
2522 	/* Stamp the time, and sequence number, convert them to network byte order */
2523 	/* should we update cloned packets too ? */
2524 	if (pgh) {
2525 		struct timeval timestamp;
2526 
2527 		pgh->pgh_magic = htonl(PKTGEN_MAGIC);
2528 		pgh->seq_num = htonl(pkt_dev->seq_num);
2529 
2530 		do_gettimeofday(&timestamp);
2531 		pgh->tv_sec = htonl(timestamp.tv_sec);
2532 		pgh->tv_usec = htonl(timestamp.tv_usec);
2533 	}
2534 	pkt_dev->seq_num++;
2535 
2536 	return skb;
2537 }
2538 
2539 static inline struct sk_buff *fill_packet(struct net_device *odev,
2540 					  struct pktgen_dev *pkt_dev)
2541 {
2542 	if (pkt_dev->flags & F_IPV6)
2543 		return fill_packet_ipv6(odev, pkt_dev);
2544 	else
2545 		return fill_packet_ipv4(odev, pkt_dev);
2546 }
2547 
2548 static void pktgen_clear_counters(struct pktgen_dev *pkt_dev)
2549 {
2550 	pkt_dev->seq_num = 1;
2551 	pkt_dev->idle_acc = 0;
2552 	pkt_dev->sofar = 0;
2553 	pkt_dev->tx_bytes = 0;
2554 	pkt_dev->errors = 0;
2555 }
2556 
2557 /* Set up structure for sending pkts, clear counters */
2558 
2559 static void pktgen_run(struct pktgen_thread *t)
2560 {
2561 	struct pktgen_dev *pkt_dev;
2562 	int started = 0;
2563 
2564 	PG_DEBUG(printk("pktgen: entering pktgen_run. %p\n", t));
2565 
2566 	if_lock(t);
2567 	list_for_each_entry(pkt_dev, &t->if_list, list) {
2568 
2569 		/*
2570 		 * setup odev and create initial packet.
2571 		 */
2572 		pktgen_setup_inject(pkt_dev);
2573 
2574 		if (pkt_dev->odev) {
2575 			pktgen_clear_counters(pkt_dev);
2576 			pkt_dev->running = 1;	/* Cranke yeself! */
2577 			pkt_dev->skb = NULL;
2578 			pkt_dev->started_at = getCurUs();
2579 			pkt_dev->next_tx_us = getCurUs();	/* Transmit immediately */
2580 			pkt_dev->next_tx_ns = 0;
2581 
2582 			strcpy(pkt_dev->result, "Starting");
2583 			started++;
2584 		} else
2585 			strcpy(pkt_dev->result, "Error starting");
2586 	}
2587 	if_unlock(t);
2588 	if (started)
2589 		t->control &= ~(T_STOP);
2590 }
2591 
2592 static void pktgen_stop_all_threads_ifs(void)
2593 {
2594 	struct pktgen_thread *t;
2595 
2596 	PG_DEBUG(printk("pktgen: entering pktgen_stop_all_threads_ifs.\n"));
2597 
2598 	mutex_lock(&pktgen_thread_lock);
2599 
2600 	list_for_each_entry(t, &pktgen_threads, th_list)
2601 		t->control |= T_STOP;
2602 
2603 	mutex_unlock(&pktgen_thread_lock);
2604 }
2605 
2606 static int thread_is_running(struct pktgen_thread *t)
2607 {
2608 	struct pktgen_dev *pkt_dev;
2609 	int res = 0;
2610 
2611 	list_for_each_entry(pkt_dev, &t->if_list, list)
2612 		if (pkt_dev->running) {
2613 			res = 1;
2614 			break;
2615 		}
2616 	return res;
2617 }
2618 
2619 static int pktgen_wait_thread_run(struct pktgen_thread *t)
2620 {
2621 	if_lock(t);
2622 
2623 	while (thread_is_running(t)) {
2624 
2625 		if_unlock(t);
2626 
2627 		msleep_interruptible(100);
2628 
2629 		if (signal_pending(current))
2630 			goto signal;
2631 		if_lock(t);
2632 	}
2633 	if_unlock(t);
2634 	return 1;
2635 signal:
2636 	return 0;
2637 }
2638 
2639 static int pktgen_wait_all_threads_run(void)
2640 {
2641 	struct pktgen_thread *t;
2642 	int sig = 1;
2643 
2644 	mutex_lock(&pktgen_thread_lock);
2645 
2646 	list_for_each_entry(t, &pktgen_threads, th_list) {
2647 		sig = pktgen_wait_thread_run(t);
2648 		if (sig == 0)
2649 			break;
2650 	}
2651 
2652 	if (sig == 0)
2653 		list_for_each_entry(t, &pktgen_threads, th_list)
2654 			t->control |= (T_STOP);
2655 
2656 	mutex_unlock(&pktgen_thread_lock);
2657 	return sig;
2658 }
2659 
2660 static void pktgen_run_all_threads(void)
2661 {
2662 	struct pktgen_thread *t;
2663 
2664 	PG_DEBUG(printk("pktgen: entering pktgen_run_all_threads.\n"));
2665 
2666 	mutex_lock(&pktgen_thread_lock);
2667 
2668 	list_for_each_entry(t, &pktgen_threads, th_list)
2669 		t->control |= (T_RUN);
2670 
2671 	mutex_unlock(&pktgen_thread_lock);
2672 
2673 	schedule_timeout_interruptible(msecs_to_jiffies(125));	/* Propagate thread->control  */
2674 
2675 	pktgen_wait_all_threads_run();
2676 }
2677 
2678 static void show_results(struct pktgen_dev *pkt_dev, int nr_frags)
2679 {
2680 	__u64 total_us, bps, mbps, pps, idle;
2681 	char *p = pkt_dev->result;
2682 
2683 	total_us = pkt_dev->stopped_at - pkt_dev->started_at;
2684 
2685 	idle = pkt_dev->idle_acc;
2686 
2687 	p += sprintf(p, "OK: %llu(c%llu+d%llu) usec, %llu (%dbyte,%dfrags)\n",
2688 		     (unsigned long long)total_us,
2689 		     (unsigned long long)(total_us - idle),
2690 		     (unsigned long long)idle,
2691 		     (unsigned long long)pkt_dev->sofar,
2692 		     pkt_dev->cur_pkt_size, nr_frags);
2693 
2694 	pps = pkt_dev->sofar * USEC_PER_SEC;
2695 
2696 	while ((total_us >> 32) != 0) {
2697 		pps >>= 1;
2698 		total_us >>= 1;
2699 	}
2700 
2701 	do_div(pps, total_us);
2702 
2703 	bps = pps * 8 * pkt_dev->cur_pkt_size;
2704 
2705 	mbps = bps;
2706 	do_div(mbps, 1000000);
2707 	p += sprintf(p, "  %llupps %lluMb/sec (%llubps) errors: %llu",
2708 		     (unsigned long long)pps,
2709 		     (unsigned long long)mbps,
2710 		     (unsigned long long)bps,
2711 		     (unsigned long long)pkt_dev->errors);
2712 }
2713 
2714 /* Set stopped-at timer, remove from running list, do counters & statistics */
2715 
2716 static int pktgen_stop_device(struct pktgen_dev *pkt_dev)
2717 {
2718 	int nr_frags = pkt_dev->skb ? skb_shinfo(pkt_dev->skb)->nr_frags : -1;
2719 
2720 	if (!pkt_dev->running) {
2721 		printk("pktgen: interface: %s is already stopped\n",
2722 		       pkt_dev->ifname);
2723 		return -EINVAL;
2724 	}
2725 
2726 	pkt_dev->stopped_at = getCurUs();
2727 	pkt_dev->running = 0;
2728 
2729 	show_results(pkt_dev, nr_frags);
2730 
2731 	return 0;
2732 }
2733 
2734 static struct pktgen_dev *next_to_run(struct pktgen_thread *t)
2735 {
2736 	struct pktgen_dev *pkt_dev, *best = NULL;
2737 
2738 	if_lock(t);
2739 
2740 	list_for_each_entry(pkt_dev, &t->if_list, list) {
2741 		if (!pkt_dev->running)
2742 			continue;
2743 		if (best == NULL)
2744 			best = pkt_dev;
2745 		else if (pkt_dev->next_tx_us < best->next_tx_us)
2746 			best = pkt_dev;
2747 	}
2748 	if_unlock(t);
2749 	return best;
2750 }
2751 
2752 static void pktgen_stop(struct pktgen_thread *t)
2753 {
2754 	struct pktgen_dev *pkt_dev;
2755 
2756 	PG_DEBUG(printk("pktgen: entering pktgen_stop\n"));
2757 
2758 	if_lock(t);
2759 
2760 	list_for_each_entry(pkt_dev, &t->if_list, list) {
2761 		pktgen_stop_device(pkt_dev);
2762 		if (pkt_dev->skb)
2763 			kfree_skb(pkt_dev->skb);
2764 
2765 		pkt_dev->skb = NULL;
2766 	}
2767 
2768 	if_unlock(t);
2769 }
2770 
2771 /*
2772  * one of our devices needs to be removed - find it
2773  * and remove it
2774  */
2775 static void pktgen_rem_one_if(struct pktgen_thread *t)
2776 {
2777 	struct list_head *q, *n;
2778 	struct pktgen_dev *cur;
2779 
2780 	PG_DEBUG(printk("pktgen: entering pktgen_rem_one_if\n"));
2781 
2782 	if_lock(t);
2783 
2784 	list_for_each_safe(q, n, &t->if_list) {
2785 		cur = list_entry(q, struct pktgen_dev, list);
2786 
2787 		if (!cur->removal_mark)
2788 			continue;
2789 
2790 		if (cur->skb)
2791 			kfree_skb(cur->skb);
2792 		cur->skb = NULL;
2793 
2794 		pktgen_remove_device(t, cur);
2795 
2796 		break;
2797 	}
2798 
2799 	if_unlock(t);
2800 }
2801 
2802 static void pktgen_rem_all_ifs(struct pktgen_thread *t)
2803 {
2804 	struct list_head *q, *n;
2805 	struct pktgen_dev *cur;
2806 
2807 	/* Remove all devices, free mem */
2808 
2809 	PG_DEBUG(printk("pktgen: entering pktgen_rem_all_ifs\n"));
2810 	if_lock(t);
2811 
2812 	list_for_each_safe(q, n, &t->if_list) {
2813 		cur = list_entry(q, struct pktgen_dev, list);
2814 
2815 		if (cur->skb)
2816 			kfree_skb(cur->skb);
2817 		cur->skb = NULL;
2818 
2819 		pktgen_remove_device(t, cur);
2820 	}
2821 
2822 	if_unlock(t);
2823 }
2824 
2825 static void pktgen_rem_thread(struct pktgen_thread *t)
2826 {
2827 	/* Remove from the thread list */
2828 
2829 	remove_proc_entry(t->name, pg_proc_dir);
2830 
2831 	mutex_lock(&pktgen_thread_lock);
2832 
2833 	list_del(&t->th_list);
2834 
2835 	mutex_unlock(&pktgen_thread_lock);
2836 }
2837 
2838 static __inline__ void pktgen_xmit(struct pktgen_dev *pkt_dev)
2839 {
2840 	struct net_device *odev = NULL;
2841 	__u64 idle_start = 0;
2842 	int ret;
2843 
2844 	odev = pkt_dev->odev;
2845 
2846 	if (pkt_dev->delay_us || pkt_dev->delay_ns) {
2847 		u64 now;
2848 
2849 		now = getCurUs();
2850 		if (now < pkt_dev->next_tx_us)
2851 			spin(pkt_dev, pkt_dev->next_tx_us);
2852 
2853 		/* This is max DELAY, this has special meaning of
2854 		 * "never transmit"
2855 		 */
2856 		if (pkt_dev->delay_us == 0x7FFFFFFF) {
2857 			pkt_dev->next_tx_us = getCurUs() + pkt_dev->delay_us;
2858 			pkt_dev->next_tx_ns = pkt_dev->delay_ns;
2859 			goto out;
2860 		}
2861 	}
2862 
2863 	if (netif_queue_stopped(odev) || need_resched()) {
2864 		idle_start = getCurUs();
2865 
2866 		if (!netif_running(odev)) {
2867 			pktgen_stop_device(pkt_dev);
2868 			if (pkt_dev->skb)
2869 				kfree_skb(pkt_dev->skb);
2870 			pkt_dev->skb = NULL;
2871 			goto out;
2872 		}
2873 		if (need_resched())
2874 			schedule();
2875 
2876 		pkt_dev->idle_acc += getCurUs() - idle_start;
2877 
2878 		if (netif_queue_stopped(odev)) {
2879 			pkt_dev->next_tx_us = getCurUs();	/* TODO */
2880 			pkt_dev->next_tx_ns = 0;
2881 			goto out;	/* Try the next interface */
2882 		}
2883 	}
2884 
2885 	if (pkt_dev->last_ok || !pkt_dev->skb) {
2886 		if ((++pkt_dev->clone_count >= pkt_dev->clone_skb)
2887 		    || (!pkt_dev->skb)) {
2888 			/* build a new pkt */
2889 			if (pkt_dev->skb)
2890 				kfree_skb(pkt_dev->skb);
2891 
2892 			pkt_dev->skb = fill_packet(odev, pkt_dev);
2893 			if (pkt_dev->skb == NULL) {
2894 				printk("pktgen: ERROR: couldn't allocate skb in fill_packet.\n");
2895 				schedule();
2896 				pkt_dev->clone_count--;	/* back out increment, OOM */
2897 				goto out;
2898 			}
2899 			pkt_dev->allocated_skbs++;
2900 			pkt_dev->clone_count = 0;	/* reset counter */
2901 		}
2902 	}
2903 
2904 	netif_tx_lock_bh(odev);
2905 	if (!netif_queue_stopped(odev)) {
2906 
2907 		atomic_inc(&(pkt_dev->skb->users));
2908 	      retry_now:
2909 		ret = odev->hard_start_xmit(pkt_dev->skb, odev);
2910 		if (likely(ret == NETDEV_TX_OK)) {
2911 			pkt_dev->last_ok = 1;
2912 			pkt_dev->sofar++;
2913 			pkt_dev->seq_num++;
2914 			pkt_dev->tx_bytes += pkt_dev->cur_pkt_size;
2915 
2916 		} else if (ret == NETDEV_TX_LOCKED
2917 			   && (odev->features & NETIF_F_LLTX)) {
2918 			cpu_relax();
2919 			goto retry_now;
2920 		} else {	/* Retry it next time */
2921 
2922 			atomic_dec(&(pkt_dev->skb->users));
2923 
2924 			if (debug && net_ratelimit())
2925 				printk(KERN_INFO "pktgen: Hard xmit error\n");
2926 
2927 			pkt_dev->errors++;
2928 			pkt_dev->last_ok = 0;
2929 		}
2930 
2931 		pkt_dev->next_tx_us = getCurUs();
2932 		pkt_dev->next_tx_ns = 0;
2933 
2934 		pkt_dev->next_tx_us += pkt_dev->delay_us;
2935 		pkt_dev->next_tx_ns += pkt_dev->delay_ns;
2936 
2937 		if (pkt_dev->next_tx_ns > 1000) {
2938 			pkt_dev->next_tx_us++;
2939 			pkt_dev->next_tx_ns -= 1000;
2940 		}
2941 	}
2942 
2943 	else {			/* Retry it next time */
2944 		pkt_dev->last_ok = 0;
2945 		pkt_dev->next_tx_us = getCurUs();	/* TODO */
2946 		pkt_dev->next_tx_ns = 0;
2947 	}
2948 
2949 	netif_tx_unlock_bh(odev);
2950 
2951 	/* If pkt_dev->count is zero, then run forever */
2952 	if ((pkt_dev->count != 0) && (pkt_dev->sofar >= pkt_dev->count)) {
2953 		if (atomic_read(&(pkt_dev->skb->users)) != 1) {
2954 			idle_start = getCurUs();
2955 			while (atomic_read(&(pkt_dev->skb->users)) != 1) {
2956 				if (signal_pending(current)) {
2957 					break;
2958 				}
2959 				schedule();
2960 			}
2961 			pkt_dev->idle_acc += getCurUs() - idle_start;
2962 		}
2963 
2964 		/* Done with this */
2965 		pktgen_stop_device(pkt_dev);
2966 		if (pkt_dev->skb)
2967 			kfree_skb(pkt_dev->skb);
2968 		pkt_dev->skb = NULL;
2969 	}
2970 out:;
2971 }
2972 
2973 /*
2974  * Main loop of the thread goes here
2975  */
2976 
2977 static void pktgen_thread_worker(struct pktgen_thread *t)
2978 {
2979 	DEFINE_WAIT(wait);
2980 	struct pktgen_dev *pkt_dev = NULL;
2981 	int cpu = t->cpu;
2982 	sigset_t tmpsig;
2983 	u32 max_before_softirq;
2984 	u32 tx_since_softirq = 0;
2985 
2986 	daemonize("pktgen/%d", cpu);
2987 
2988 	/* Block all signals except SIGKILL, SIGSTOP and SIGTERM */
2989 
2990 	spin_lock_irq(&current->sighand->siglock);
2991 	tmpsig = current->blocked;
2992 	siginitsetinv(&current->blocked,
2993 		      sigmask(SIGKILL) | sigmask(SIGSTOP) | sigmask(SIGTERM));
2994 
2995 	recalc_sigpending();
2996 	spin_unlock_irq(&current->sighand->siglock);
2997 
2998 	/* Migrate to the right CPU */
2999 	set_cpus_allowed(current, cpumask_of_cpu(cpu));
3000 	if (smp_processor_id() != cpu)
3001 		BUG();
3002 
3003 	init_waitqueue_head(&t->queue);
3004 
3005 	t->control &= ~(T_TERMINATE);
3006 	t->control &= ~(T_RUN);
3007 	t->control &= ~(T_STOP);
3008 	t->control &= ~(T_REMDEVALL);
3009 	t->control &= ~(T_REMDEV);
3010 
3011 	t->pid = current->pid;
3012 
3013 	PG_DEBUG(printk("pktgen: starting pktgen/%d:  pid=%d\n", cpu, current->pid));
3014 
3015 	max_before_softirq = t->max_before_softirq;
3016 
3017 	__set_current_state(TASK_INTERRUPTIBLE);
3018 	mb();
3019 
3020 	while (1) {
3021 
3022 		__set_current_state(TASK_RUNNING);
3023 
3024 		/*
3025 		 * Get next dev to xmit -- if any.
3026 		 */
3027 
3028 		pkt_dev = next_to_run(t);
3029 
3030 		if (pkt_dev) {
3031 
3032 			pktgen_xmit(pkt_dev);
3033 
3034 			/*
3035 			 * We like to stay RUNNING but must also give
3036 			 * others fair share.
3037 			 */
3038 
3039 			tx_since_softirq += pkt_dev->last_ok;
3040 
3041 			if (tx_since_softirq > max_before_softirq) {
3042 				if (local_softirq_pending())
3043 					do_softirq();
3044 				tx_since_softirq = 0;
3045 			}
3046 		} else {
3047 			prepare_to_wait(&(t->queue), &wait, TASK_INTERRUPTIBLE);
3048 			schedule_timeout(HZ / 10);
3049 			finish_wait(&(t->queue), &wait);
3050 		}
3051 
3052 		/*
3053 		 * Back from sleep, either due to the timeout or signal.
3054 		 * We check if we have any "posted" work for us.
3055 		 */
3056 
3057 		if (t->control & T_TERMINATE || signal_pending(current))
3058 			/* we received a request to terminate ourself */
3059 			break;
3060 
3061 		if (t->control & T_STOP) {
3062 			pktgen_stop(t);
3063 			t->control &= ~(T_STOP);
3064 		}
3065 
3066 		if (t->control & T_RUN) {
3067 			pktgen_run(t);
3068 			t->control &= ~(T_RUN);
3069 		}
3070 
3071 		if (t->control & T_REMDEVALL) {
3072 			pktgen_rem_all_ifs(t);
3073 			t->control &= ~(T_REMDEVALL);
3074 		}
3075 
3076 		if (t->control & T_REMDEV) {
3077 			pktgen_rem_one_if(t);
3078 			t->control &= ~(T_REMDEV);
3079 		}
3080 
3081 		if (need_resched())
3082 			schedule();
3083 	}
3084 
3085 	PG_DEBUG(printk("pktgen: %s stopping all device\n", t->name));
3086 	pktgen_stop(t);
3087 
3088 	PG_DEBUG(printk("pktgen: %s removing all device\n", t->name));
3089 	pktgen_rem_all_ifs(t);
3090 
3091 	PG_DEBUG(printk("pktgen: %s removing thread.\n", t->name));
3092 	pktgen_rem_thread(t);
3093 
3094 	t->removed = 1;
3095 }
3096 
3097 static struct pktgen_dev *pktgen_find_dev(struct pktgen_thread *t,
3098 					  const char *ifname)
3099 {
3100 	struct pktgen_dev *p, *pkt_dev = NULL;
3101 	if_lock(t);
3102 
3103 	list_for_each_entry(p, &t->if_list, list)
3104 		if (strncmp(p->ifname, ifname, IFNAMSIZ) == 0) {
3105 			pkt_dev = p;
3106 			break;
3107 		}
3108 
3109 	if_unlock(t);
3110 	PG_DEBUG(printk("pktgen: find_dev(%s) returning %p\n", ifname, pkt_dev));
3111 	return pkt_dev;
3112 }
3113 
3114 /*
3115  * Adds a dev at front of if_list.
3116  */
3117 
3118 static int add_dev_to_thread(struct pktgen_thread *t,
3119 			     struct pktgen_dev *pkt_dev)
3120 {
3121 	int rv = 0;
3122 
3123 	if_lock(t);
3124 
3125 	if (pkt_dev->pg_thread) {
3126 		printk("pktgen: ERROR:  already assigned to a thread.\n");
3127 		rv = -EBUSY;
3128 		goto out;
3129 	}
3130 
3131 	list_add(&pkt_dev->list, &t->if_list);
3132 	pkt_dev->pg_thread = t;
3133 	pkt_dev->running = 0;
3134 
3135 out:
3136 	if_unlock(t);
3137 	return rv;
3138 }
3139 
3140 /* Called under thread lock */
3141 
3142 static int pktgen_add_device(struct pktgen_thread *t, const char *ifname)
3143 {
3144 	struct pktgen_dev *pkt_dev;
3145 	struct proc_dir_entry *pe;
3146 
3147 	/* We don't allow a device to be on several threads */
3148 
3149 	pkt_dev = __pktgen_NN_threads(ifname, FIND);
3150 	if (pkt_dev) {
3151 		printk("pktgen: ERROR: interface already used.\n");
3152 		return -EBUSY;
3153 	}
3154 
3155 	pkt_dev = kzalloc(sizeof(struct pktgen_dev), GFP_KERNEL);
3156 	if (!pkt_dev)
3157 		return -ENOMEM;
3158 
3159 	pkt_dev->flows = vmalloc(MAX_CFLOWS * sizeof(struct flow_state));
3160 	if (pkt_dev->flows == NULL) {
3161 		kfree(pkt_dev);
3162 		return -ENOMEM;
3163 	}
3164 	memset(pkt_dev->flows, 0, MAX_CFLOWS * sizeof(struct flow_state));
3165 
3166 	pkt_dev->removal_mark = 0;
3167 	pkt_dev->min_pkt_size = ETH_ZLEN;
3168 	pkt_dev->max_pkt_size = ETH_ZLEN;
3169 	pkt_dev->nfrags = 0;
3170 	pkt_dev->clone_skb = pg_clone_skb_d;
3171 	pkt_dev->delay_us = pg_delay_d / 1000;
3172 	pkt_dev->delay_ns = pg_delay_d % 1000;
3173 	pkt_dev->count = pg_count_d;
3174 	pkt_dev->sofar = 0;
3175 	pkt_dev->udp_src_min = 9;	/* sink port */
3176 	pkt_dev->udp_src_max = 9;
3177 	pkt_dev->udp_dst_min = 9;
3178 	pkt_dev->udp_dst_max = 9;
3179 
3180 	strncpy(pkt_dev->ifname, ifname, IFNAMSIZ);
3181 
3182 	if (!pktgen_setup_dev(pkt_dev)) {
3183 		printk("pktgen: ERROR: pktgen_setup_dev failed.\n");
3184 		if (pkt_dev->flows)
3185 			vfree(pkt_dev->flows);
3186 		kfree(pkt_dev);
3187 		return -ENODEV;
3188 	}
3189 
3190 	pe = create_proc_entry(ifname, 0600, pg_proc_dir);
3191 	if (!pe) {
3192 		printk("pktgen: cannot create %s/%s procfs entry.\n",
3193 		       PG_PROC_DIR, ifname);
3194 		if (pkt_dev->flows)
3195 			vfree(pkt_dev->flows);
3196 		kfree(pkt_dev);
3197 		return -EINVAL;
3198 	}
3199 	pe->proc_fops = &pktgen_if_fops;
3200 	pe->data = pkt_dev;
3201 
3202 	return add_dev_to_thread(t, pkt_dev);
3203 }
3204 
3205 static struct pktgen_thread *__init pktgen_find_thread(const char *name)
3206 {
3207 	struct pktgen_thread *t;
3208 
3209 	mutex_lock(&pktgen_thread_lock);
3210 
3211 	list_for_each_entry(t, &pktgen_threads, th_list)
3212 		if (strcmp(t->name, name) == 0) {
3213 			mutex_unlock(&pktgen_thread_lock);
3214 			return t;
3215 		}
3216 
3217 	mutex_unlock(&pktgen_thread_lock);
3218 	return NULL;
3219 }
3220 
3221 static int __init pktgen_create_thread(const char *name, int cpu)
3222 {
3223 	int err;
3224 	struct pktgen_thread *t = NULL;
3225 	struct proc_dir_entry *pe;
3226 
3227 	if (strlen(name) > 31) {
3228 		printk("pktgen: ERROR:  Thread name cannot be more than 31 characters.\n");
3229 		return -EINVAL;
3230 	}
3231 
3232 	if (pktgen_find_thread(name)) {
3233 		printk("pktgen: ERROR: thread: %s already exists\n", name);
3234 		return -EINVAL;
3235 	}
3236 
3237 	t = kzalloc(sizeof(struct pktgen_thread), GFP_KERNEL);
3238 	if (!t) {
3239 		printk("pktgen: ERROR: out of memory, can't create new thread.\n");
3240 		return -ENOMEM;
3241 	}
3242 
3243 	strcpy(t->name, name);
3244 	spin_lock_init(&t->if_lock);
3245 	t->cpu = cpu;
3246 
3247 	pe = create_proc_entry(t->name, 0600, pg_proc_dir);
3248 	if (!pe) {
3249 		printk("pktgen: cannot create %s/%s procfs entry.\n",
3250 		       PG_PROC_DIR, t->name);
3251 		kfree(t);
3252 		return -EINVAL;
3253 	}
3254 
3255 	pe->proc_fops = &pktgen_thread_fops;
3256 	pe->data = t;
3257 
3258 	INIT_LIST_HEAD(&t->if_list);
3259 
3260 	list_add_tail(&t->th_list, &pktgen_threads);
3261 
3262 	t->removed = 0;
3263 
3264 	err = kernel_thread((void *)pktgen_thread_worker, (void *)t,
3265 			  CLONE_FS | CLONE_FILES | CLONE_SIGHAND);
3266 	if (err < 0) {
3267 		printk("pktgen: kernel_thread() failed for cpu %d\n", t->cpu);
3268 		remove_proc_entry(t->name, pg_proc_dir);
3269 		list_del(&t->th_list);
3270 		kfree(t);
3271 		return err;
3272 	}
3273 
3274 	return 0;
3275 }
3276 
3277 /*
3278  * Removes a device from the thread if_list.
3279  */
3280 static void _rem_dev_from_if_list(struct pktgen_thread *t,
3281 				  struct pktgen_dev *pkt_dev)
3282 {
3283 	struct list_head *q, *n;
3284 	struct pktgen_dev *p;
3285 
3286 	list_for_each_safe(q, n, &t->if_list) {
3287 		p = list_entry(q, struct pktgen_dev, list);
3288 		if (p == pkt_dev)
3289 			list_del(&p->list);
3290 	}
3291 }
3292 
3293 static int pktgen_remove_device(struct pktgen_thread *t,
3294 				struct pktgen_dev *pkt_dev)
3295 {
3296 
3297 	PG_DEBUG(printk("pktgen: remove_device pkt_dev=%p\n", pkt_dev));
3298 
3299 	if (pkt_dev->running) {
3300 		printk("pktgen:WARNING: trying to remove a running interface, stopping it now.\n");
3301 		pktgen_stop_device(pkt_dev);
3302 	}
3303 
3304 	/* Dis-associate from the interface */
3305 
3306 	if (pkt_dev->odev) {
3307 		dev_put(pkt_dev->odev);
3308 		pkt_dev->odev = NULL;
3309 	}
3310 
3311 	/* And update the thread if_list */
3312 
3313 	_rem_dev_from_if_list(t, pkt_dev);
3314 
3315 	/* Clean up proc file system */
3316 
3317 	remove_proc_entry(pkt_dev->ifname, pg_proc_dir);
3318 
3319 	if (pkt_dev->flows)
3320 		vfree(pkt_dev->flows);
3321 	kfree(pkt_dev);
3322 	return 0;
3323 }
3324 
3325 static int __init pg_init(void)
3326 {
3327 	int cpu;
3328 	struct proc_dir_entry *pe;
3329 
3330 	printk(version);
3331 
3332 	pg_proc_dir = proc_mkdir(PG_PROC_DIR, proc_net);
3333 	if (!pg_proc_dir)
3334 		return -ENODEV;
3335 	pg_proc_dir->owner = THIS_MODULE;
3336 
3337 	pe = create_proc_entry(PGCTRL, 0600, pg_proc_dir);
3338 	if (pe == NULL) {
3339 		printk("pktgen: ERROR: cannot create %s procfs entry.\n",
3340 		       PGCTRL);
3341 		proc_net_remove(PG_PROC_DIR);
3342 		return -EINVAL;
3343 	}
3344 
3345 	pe->proc_fops = &pktgen_fops;
3346 	pe->data = NULL;
3347 
3348 	/* Register us to receive netdevice events */
3349 	register_netdevice_notifier(&pktgen_notifier_block);
3350 
3351 	for_each_online_cpu(cpu) {
3352 		int err;
3353 		char buf[30];
3354 
3355 		sprintf(buf, "kpktgend_%i", cpu);
3356 		err = pktgen_create_thread(buf, cpu);
3357 		if (err)
3358 			printk("pktgen: WARNING: Cannot create thread for cpu %d (%d)\n",
3359 					cpu, err);
3360 	}
3361 
3362 	if (list_empty(&pktgen_threads)) {
3363 		printk("pktgen: ERROR: Initialization failed for all threads\n");
3364 		unregister_netdevice_notifier(&pktgen_notifier_block);
3365 		remove_proc_entry(PGCTRL, pg_proc_dir);
3366 		proc_net_remove(PG_PROC_DIR);
3367 		return -ENODEV;
3368 	}
3369 
3370 	return 0;
3371 }
3372 
3373 static void __exit pg_cleanup(void)
3374 {
3375 	struct pktgen_thread *t;
3376 	struct list_head *q, *n;
3377 	wait_queue_head_t queue;
3378 	init_waitqueue_head(&queue);
3379 
3380 	/* Stop all interfaces & threads */
3381 
3382 	list_for_each_safe(q, n, &pktgen_threads) {
3383 		t = list_entry(q, struct pktgen_thread, th_list);
3384 		t->control |= (T_TERMINATE);
3385 
3386 		wait_event_interruptible_timeout(queue, (t->removed == 1), HZ);
3387 	}
3388 
3389 	/* Un-register us from receiving netdevice events */
3390 	unregister_netdevice_notifier(&pktgen_notifier_block);
3391 
3392 	/* Clean up proc file system */
3393 	remove_proc_entry(PGCTRL, pg_proc_dir);
3394 	proc_net_remove(PG_PROC_DIR);
3395 }
3396 
3397 module_init(pg_init);
3398 module_exit(pg_cleanup);
3399 
3400 MODULE_AUTHOR("Robert Olsson <robert.olsson@its.uu.se");
3401 MODULE_DESCRIPTION("Packet Generator tool");
3402 MODULE_LICENSE("GPL");
3403 module_param(pg_count_d, int, 0);
3404 module_param(pg_delay_d, int, 0);
3405 module_param(pg_clone_skb_d, int, 0);
3406 module_param(debug, int, 0);
3407