aoecmd.c 36.6 KB
Newer Older
E
Ed Cashin 已提交
1
/* Copyright (c) 2013 Coraid, Inc.  See COPYING for GPL terms. */
L
Linus Torvalds 已提交
2 3 4 5 6
/*
 * aoecmd.c
 * Filesystem request handling methods
 */

7
#include <linux/ata.h>
8
#include <linux/slab.h>
L
Linus Torvalds 已提交
9 10 11 12
#include <linux/hdreg.h>
#include <linux/blkdev.h>
#include <linux/skbuff.h>
#include <linux/netdevice.h>
13
#include <linux/genhd.h>
14
#include <linux/moduleparam.h>
15 16
#include <linux/workqueue.h>
#include <linux/kthread.h>
17
#include <net/net_namespace.h>
18
#include <asm/unaligned.h>
19
#include <linux/uio.h>
L
Linus Torvalds 已提交
20 21
#include "aoe.h"

22 23 24
#define MAXIOC (8192)	/* default meant to avoid most soft lockups */

static void ktcomplete(struct frame *, struct sk_buff *);
25
static int count_targets(struct aoedev *d, int *untainted);
26

27 28
static struct buf *nextbuf(struct aoedev *);

29 30 31
static int aoe_deadsecs = 60 * 3;
module_param(aoe_deadsecs, int, 0644);
MODULE_PARM_DESC(aoe_deadsecs, "After aoe_deadsecs seconds, give up and fail dev.");
L
Linus Torvalds 已提交
32

33
static int aoe_maxout = 64;
34 35 36 37
module_param(aoe_maxout, int, 0644);
MODULE_PARM_DESC(aoe_maxout,
	"Only aoe_maxout outstanding packets for every MAC on eX.Y.");

38 39 40 41 42 43 44 45 46 47 48 49 50 51
/* The number of online cpus during module initialization gives us a
 * convenient heuristic cap on the parallelism used for ktio threads
 * doing I/O completion.  It is not important that the cap equal the
 * actual number of running CPUs at any given time, but because of CPU
 * hotplug, we take care to use ncpus instead of using
 * num_online_cpus() after module initialization.
 */
static int ncpus;

/* mutex lock used for synchronization while thread spawning */
static DEFINE_MUTEX(ktio_spawn_lock);

static wait_queue_head_t *ktiowq;
static struct ktstate *kts;
52 53

/* io completion queue */
54
struct iocq_ktio {
55 56
	struct list_head head;
	spinlock_t lock;
57 58
};
static struct iocq_ktio *iocq;
59

60 61
static struct page *empty_page;

62
static struct sk_buff *
E
Ed L. Cashin 已提交
63
new_skb(ulong len)
L
Linus Torvalds 已提交
64 65 66
{
	struct sk_buff *skb;

67
	skb = alloc_skb(len + MAX_HEADER, GFP_ATOMIC);
L
Linus Torvalds 已提交
68
	if (skb) {
69
		skb_reserve(skb, MAX_HEADER);
70
		skb_reset_mac_header(skb);
71
		skb_reset_network_header(skb);
L
Linus Torvalds 已提交
72
		skb->protocol = __constant_htons(ETH_P_AOE);
73
		skb_checksum_none_assert(skb);
L
Linus Torvalds 已提交
74 75 76 77
	}
	return skb;
}

78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94
static struct frame *
getframe_deferred(struct aoedev *d, u32 tag)
{
	struct list_head *head, *pos, *nx;
	struct frame *f;

	head = &d->rexmitq;
	list_for_each_safe(pos, nx, head) {
		f = list_entry(pos, struct frame, head);
		if (f->tag == tag) {
			list_del(pos);
			return f;
		}
	}
	return NULL;
}

L
Linus Torvalds 已提交
95
static struct frame *
96
getframe(struct aoedev *d, u32 tag)
L
Linus Torvalds 已提交
97
{
98 99 100
	struct frame *f;
	struct list_head *head, *pos, *nx;
	u32 n;
L
Linus Torvalds 已提交
101

102
	n = tag % NFACTIVE;
103
	head = &d->factive[n];
104 105 106 107
	list_for_each_safe(pos, nx, head) {
		f = list_entry(pos, struct frame, head);
		if (f->tag == tag) {
			list_del(pos);
L
Linus Torvalds 已提交
108
			return f;
109 110
		}
	}
L
Linus Torvalds 已提交
111 112 113 114 115 116 117 118 119
	return NULL;
}

/*
 * Leave the top bit clear so we have tagspace for userland.
 * The bottom 16 bits are the xmit tick for rexmit/rttavg processing.
 * This driver reserves tag -1 to mean "unused frame."
 */
static int
120
newtag(struct aoedev *d)
L
Linus Torvalds 已提交
121 122 123 124
{
	register ulong n;

	n = jiffies & 0xffff;
125
	return n |= (++d->lasttag & 0x7fff) << 16;
L
Linus Torvalds 已提交
126 127
}

128
static u32
129
aoehdr_atainit(struct aoedev *d, struct aoetgt *t, struct aoe_hdr *h)
L
Linus Torvalds 已提交
130
{
131
	u32 host_tag = newtag(d);
L
Linus Torvalds 已提交
132

133 134
	memcpy(h->src, t->ifp->nd->dev_addr, sizeof h->src);
	memcpy(h->dst, t->addr, sizeof h->dst);
135
	h->type = __constant_cpu_to_be16(ETH_P_AOE);
L
Linus Torvalds 已提交
136
	h->verfl = AOE_HVER;
137
	h->major = cpu_to_be16(d->aoemajor);
L
Linus Torvalds 已提交
138 139
	h->minor = d->aoeminor;
	h->cmd = AOECMD_ATA;
140
	h->tag = cpu_to_be32(host_tag);
L
Linus Torvalds 已提交
141 142 143 144

	return host_tag;
}

E
Ed L. Cashin 已提交
145 146 147 148 149 150 151 152 153 154 155
static inline void
put_lba(struct aoe_atahdr *ah, sector_t lba)
{
	ah->lba0 = lba;
	ah->lba1 = lba >>= 8;
	ah->lba2 = lba >>= 8;
	ah->lba3 = lba >>= 8;
	ah->lba4 = lba >>= 8;
	ah->lba5 = lba >>= 8;
}

156
static struct aoeif *
157 158
ifrotate(struct aoetgt *t)
{
159 160 161 162 163 164 165 166 167
	struct aoeif *ifp;

	ifp = t->ifp;
	ifp++;
	if (ifp >= &t->ifs[NAOEIFS] || ifp->nd == NULL)
		ifp = t->ifs;
	if (ifp->nd == NULL)
		return NULL;
	return t->ifp = ifp;
168 169
}

170 171 172
static void
skb_pool_put(struct aoedev *d, struct sk_buff *skb)
{
173
	__skb_queue_tail(&d->skbpool, skb);
174 175 176 177 178
}

static struct sk_buff *
skb_pool_get(struct aoedev *d)
{
179
	struct sk_buff *skb = skb_peek(&d->skbpool);
180 181

	if (skb && atomic_read(&skb_shinfo(skb)->dataref) == 1) {
182
		__skb_unlink(skb, &d->skbpool);
183 184
		return skb;
	}
185 186
	if (skb_queue_len(&d->skbpool) < NSKBPOOLMAX &&
	    (skb = new_skb(ETH_ZLEN)))
187
		return skb;
188

189 190 191
	return NULL;
}

192 193 194 195 196 197 198
void
aoe_freetframe(struct frame *f)
{
	struct aoetgt *t;

	t = f->t;
	f->buf = NULL;
199
	memset(&f->iter, 0, sizeof(f->iter));
200
	f->r_skb = NULL;
201
	f->flags = 0;
202 203 204
	list_add(&f->head, &t->ffree);
}

205
static struct frame *
206
newtframe(struct aoedev *d, struct aoetgt *t)
L
Linus Torvalds 已提交
207
{
208
	struct frame *f;
209
	struct sk_buff *skb;
210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254
	struct list_head *pos;

	if (list_empty(&t->ffree)) {
		if (t->falloc >= NSKBPOOLMAX*2)
			return NULL;
		f = kcalloc(1, sizeof(*f), GFP_ATOMIC);
		if (f == NULL)
			return NULL;
		t->falloc++;
		f->t = t;
	} else {
		pos = t->ffree.next;
		list_del(pos);
		f = list_entry(pos, struct frame, head);
	}

	skb = f->skb;
	if (skb == NULL) {
		f->skb = skb = new_skb(ETH_ZLEN);
		if (!skb) {
bail:			aoe_freetframe(f);
			return NULL;
		}
	}

	if (atomic_read(&skb_shinfo(skb)->dataref) != 1) {
		skb = skb_pool_get(d);
		if (skb == NULL)
			goto bail;
		skb_pool_put(d, f->skb);
		f->skb = skb;
	}

	skb->truesize -= skb->data_len;
	skb_shinfo(skb)->nr_frags = skb->data_len = 0;
	skb_trim(skb, 0);
	return f;
}

static struct frame *
newframe(struct aoedev *d)
{
	struct frame *f;
	struct aoetgt *t, **tt;
	int totout = 0;
255 256
	int use_tainted;
	int has_untainted;
257

258
	if (!d->targets || !d->targets[0]) {
259 260 261
		printk(KERN_ERR "aoe: NULL TARGETS!\n");
		return NULL;
	}
262
	tt = d->tgt;	/* last used target */
263
	for (use_tainted = 0, has_untainted = 0;;) {
264
		tt++;
265
		if (tt >= &d->targets[d->ntargets] || !*tt)
266 267
			tt = d->targets;
		t = *tt;
268 269 270 271
		if (!t->taint) {
			has_untainted = 1;
			totout += t->nout;
		}
272
		if (t->nout < t->maxout
273
		&& (use_tainted || !t->taint)
274 275 276 277
		&& t->ifp->nd) {
			f = newtframe(d, t);
			if (f) {
				ifrotate(t);
278
				d->tgt = tt;
279 280 281
				return f;
			}
		}
282 283 284 285 286 287
		if (tt == d->tgt) {	/* we've looped and found nada */
			if (!use_tainted && !has_untainted)
				use_tainted = 1;
			else
				break;
		}
288 289 290 291
	}
	if (totout == 0) {
		d->kicked++;
		d->flags |= DEVFL_KICKME;
292
	}
293 294 295
	return NULL;
}

296
static void
297
skb_fillup(struct sk_buff *skb, struct bio *bio, struct bvec_iter iter)
298 299
{
	int frag = 0;
300 301 302 303 304
	struct bio_vec bv;

	__bio_for_each_segment(bv, bio, iter, iter)
		skb_fill_page_desc(skb, frag++, bv.bv_page,
				   bv.bv_offset, bv.bv_len);
305 306
}

307 308 309
static void
fhash(struct frame *f)
{
310
	struct aoedev *d = f->t->d;
311 312 313
	u32 n;

	n = f->tag % NFACTIVE;
314
	list_add_tail(&f->head, &d->factive[n]);
315 316
}

317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339 340 341 342
static void
ata_rw_frameinit(struct frame *f)
{
	struct aoetgt *t;
	struct aoe_hdr *h;
	struct aoe_atahdr *ah;
	struct sk_buff *skb;
	char writebit, extbit;

	skb = f->skb;
	h = (struct aoe_hdr *) skb_mac_header(skb);
	ah = (struct aoe_atahdr *) (h + 1);
	skb_put(skb, sizeof(*h) + sizeof(*ah));
	memset(h, 0, skb->len);

	writebit = 0x10;
	extbit = 0x4;

	t = f->t;
	f->tag = aoehdr_atainit(t->d, t, h);
	fhash(f);
	t->nout++;
	f->waited = 0;
	f->waited_total = 0;

	/* set up ata header */
343 344
	ah->scnt = f->iter.bi_size >> 9;
	put_lba(ah, f->iter.bi_sector);
345 346 347 348 349 350 351 352
	if (t->d->flags & DEVFL_EXT) {
		ah->aflags |= AOEAFL_EXT;
	} else {
		extbit = 0;
		ah->lba3 &= 0x0f;
		ah->lba3 |= 0xe0;	/* LBA bit + obsolete 0xa0 */
	}
	if (f->buf && bio_data_dir(f->buf->bio) == WRITE) {
353
		skb_fillup(skb, f->buf->bio, f->iter);
354
		ah->aflags |= AOEAFL_WRITE;
355 356 357
		skb->len += f->iter.bi_size;
		skb->data_len = f->iter.bi_size;
		skb->truesize += f->iter.bi_size;
358 359 360 361 362 363 364 365 366 367
		t->wpkts++;
	} else {
		t->rpkts++;
		writebit = 0;
	}

	ah->cmdstat = ATA_CMD_PIO_READ | writebit | extbit;
	skb->dev = t->ifp->nd;
}

368 369 370 371
static int
aoecmd_ata_rw(struct aoedev *d)
{
	struct frame *f;
L
Linus Torvalds 已提交
372 373
	struct buf *buf;
	struct sk_buff *skb;
374
	struct sk_buff_head queue;
L
Linus Torvalds 已提交
375

376 377 378
	buf = nextbuf(d);
	if (buf == NULL)
		return 0;
379
	f = newframe(d);
380 381
	if (f == NULL)
		return 0;
382

L
Linus Torvalds 已提交
383 384
	/* initialize the headers & frame */
	f->buf = buf;
385 386 387 388 389 390 391 392
	f->iter = buf->iter;
	f->iter.bi_size = min_t(unsigned long,
				d->maxbcnt ?: DEFAULTBCNT,
				f->iter.bi_size);
	bio_advance_iter(buf->bio, &buf->iter, f->iter.bi_size);

	if (!buf->iter.bi_size)
		d->ip.buf = NULL;
L
Linus Torvalds 已提交
393 394 395

	/* mark all tracking fields and load out */
	buf->nframesout += 1;
396 397

	ata_rw_frameinit(f);
L
Linus Torvalds 已提交
398

399
	skb = skb_clone(f->skb, GFP_ATOMIC);
400
	if (skb) {
401 402
		do_gettimeofday(&f->sent);
		f->sent_jiffs = (u32) jiffies;
403 404 405 406
		__skb_queue_head_init(&queue);
		__skb_queue_tail(&queue, skb);
		aoenet_xmit(&queue);
	}
407
	return 1;
L
Linus Torvalds 已提交
408 409
}

410 411 412
/* some callers cannot sleep, and they can call this function,
 * transmitting the packets later, when interrupts are on
 */
413 414
static void
aoecmd_cfg_pkts(ushort aoemajor, unsigned char aoeminor, struct sk_buff_head *queue)
415 416 417
{
	struct aoe_hdr *h;
	struct aoe_cfghdr *ch;
418
	struct sk_buff *skb;
419 420
	struct net_device *ifp;

421 422
	rcu_read_lock();
	for_each_netdev_rcu(&init_net, ifp) {
423 424
		dev_hold(ifp);
		if (!is_aoe_netif(ifp))
425
			goto cont;
426

E
Ed L. Cashin 已提交
427
		skb = new_skb(sizeof *h + sizeof *ch);
428
		if (skb == NULL) {
E
Ed L. Cashin 已提交
429
			printk(KERN_INFO "aoe: skb alloc failure\n");
430
			goto cont;
431
		}
432
		skb_put(skb, sizeof *h + sizeof *ch);
E
Ed L. Cashin 已提交
433
		skb->dev = ifp;
434
		__skb_queue_tail(queue, skb);
435
		h = (struct aoe_hdr *) skb_mac_header(skb);
436 437 438 439 440 441 442 443 444 445
		memset(h, 0, sizeof *h + sizeof *ch);

		memset(h->dst, 0xff, sizeof h->dst);
		memcpy(h->src, ifp->dev_addr, sizeof h->src);
		h->type = __constant_cpu_to_be16(ETH_P_AOE);
		h->verfl = AOE_HVER;
		h->major = cpu_to_be16(aoemajor);
		h->minor = aoeminor;
		h->cmd = AOECMD_CFG;

446 447
cont:
		dev_put(ifp);
448
	}
449
	rcu_read_unlock();
450 451
}

L
Linus Torvalds 已提交
452
static void
453
resend(struct aoedev *d, struct frame *f)
L
Linus Torvalds 已提交
454 455
{
	struct sk_buff *skb;
456
	struct sk_buff_head queue;
L
Linus Torvalds 已提交
457
	struct aoe_hdr *h;
458
	struct aoetgt *t;
L
Linus Torvalds 已提交
459 460 461
	char buf[128];
	u32 n;

462
	t = f->t;
463
	n = newtag(d);
464
	skb = f->skb;
465 466 467 468 469 470
	if (ifrotate(t) == NULL) {
		/* probably can't happen, but set it up to fail anyway */
		pr_info("aoe: resend: no interfaces to rotate to.\n");
		ktcomplete(f, NULL);
		return;
	}
471
	h = (struct aoe_hdr *) skb_mac_header(skb);
L
Linus Torvalds 已提交
472

473 474 475 476 477 478 479 480
	if (!(f->flags & FFL_PROBE)) {
		snprintf(buf, sizeof(buf),
			"%15s e%ld.%d oldtag=%08x@%08lx newtag=%08x s=%pm d=%pm nout=%d\n",
			"retransmit", d->aoemajor, d->aoeminor,
			f->tag, jiffies, n,
			h->src, h->dst, t->nout);
		aoechr_error(buf);
	}
L
Linus Torvalds 已提交
481 482

	f->tag = n;
483
	fhash(f);
484
	h->tag = cpu_to_be32(n);
485 486 487 488
	memcpy(h->dst, t->addr, sizeof h->dst);
	memcpy(h->src, t->ifp->nd->dev_addr, sizeof h->src);

	skb->dev = t->ifp->nd;
E
Ed L. Cashin 已提交
489 490 491
	skb = skb_clone(skb, GFP_ATOMIC);
	if (skb == NULL)
		return;
492 493
	do_gettimeofday(&f->sent);
	f->sent_jiffs = (u32) jiffies;
494 495 496
	__skb_queue_head_init(&queue);
	__skb_queue_tail(&queue, skb);
	aoenet_xmit(&queue);
L
Linus Torvalds 已提交
497 498
}

499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530
static int
tsince_hr(struct frame *f)
{
	struct timeval now;
	int n;

	do_gettimeofday(&now);
	n = now.tv_usec - f->sent.tv_usec;
	n += (now.tv_sec - f->sent.tv_sec) * USEC_PER_SEC;

	if (n < 0)
		n = -n;

	/* For relatively long periods, use jiffies to avoid
	 * discrepancies caused by updates to the system time.
	 *
	 * On system with HZ of 1000, 32-bits is over 49 days
	 * worth of jiffies, or over 71 minutes worth of usecs.
	 *
	 * Jiffies overflow is handled by subtraction of unsigned ints:
	 * (gdb) print (unsigned) 2 - (unsigned) 0xfffffffe
	 * $3 = 4
	 * (gdb)
	 */
	if (n > USEC_PER_SEC / 4) {
		n = ((u32) jiffies) - f->sent_jiffs;
		n *= USEC_PER_SEC / HZ;
	}

	return n;
}

L
Linus Torvalds 已提交
531
static int
532
tsince(u32 tag)
L
Linus Torvalds 已提交
533 534 535 536 537 538 539
{
	int n;

	n = jiffies & 0xffff;
	n -= tag & 0xffff;
	if (n < 0)
		n += 1<<16;
540
	return jiffies_to_usecs(n + 1);
L
Linus Torvalds 已提交
541 542
}

543 544 545 546 547 548 549 550 551 552 553 554 555 556 557 558 559
static struct aoeif *
getif(struct aoetgt *t, struct net_device *nd)
{
	struct aoeif *p, *e;

	p = t->ifs;
	e = p + NAOEIFS;
	for (; p < e; p++)
		if (p->nd == nd)
			return p;
	return NULL;
}

static void
ejectif(struct aoetgt *t, struct aoeif *ifp)
{
	struct aoeif *e;
560
	struct net_device *nd;
561 562
	ulong n;

563
	nd = ifp->nd;
564 565 566 567
	e = t->ifs + NAOEIFS - 1;
	n = (e - ifp) * sizeof *ifp;
	memmove(ifp, ifp+1, n);
	e->nd = NULL;
568
	dev_put(nd);
569 570
}

571
static struct frame *
572
reassign_frame(struct frame *f)
573 574 575 576 577 578 579
{
	struct frame *nf;
	struct sk_buff *skb;

	nf = newframe(f->t->d);
	if (!nf)
		return NULL;
580 581 582 583
	if (nf->t == f->t) {
		aoe_freetframe(nf);
		return NULL;
	}
584 585 586 587

	skb = nf->skb;
	nf->skb = f->skb;
	nf->buf = f->buf;
588
	nf->iter = f->iter;
589 590 591
	nf->waited = 0;
	nf->waited_total = f->waited_total;
	nf->sent = f->sent;
592
	nf->sent_jiffs = f->sent_jiffs;
593 594 595 596 597
	f->skb = skb;

	return nf;
}

598 599
static void
probe(struct aoetgt *t)
600
{
601 602 603 604 605 606
	struct aoedev *d;
	struct frame *f;
	struct sk_buff *skb;
	struct sk_buff_head queue;
	size_t n, m;
	int frag;
607

608 609 610 611 612 613 614 615 616
	d = t->d;
	f = newtframe(d, t);
	if (!f) {
		pr_err("%s %pm for e%ld.%d: %s\n",
			"aoe: cannot probe remote address",
			t->addr,
			(long) d->aoemajor, d->aoeminor,
			"no frame available");
		return;
617
	}
618 619
	f->flags |= FFL_PROBE;
	ifrotate(t);
620
	f->iter.bi_size = t->d->maxbcnt ? t->d->maxbcnt : DEFAULTBCNT;
621 622
	ata_rw_frameinit(f);
	skb = f->skb;
623
	for (frag = 0, n = f->iter.bi_size; n > 0; ++frag, n -= m) {
624 625 626 627 628
		if (n < PAGE_SIZE)
			m = n;
		else
			m = PAGE_SIZE;
		skb_fill_page_desc(skb, frag, empty_page, 0, m);
629
	}
630 631 632
	skb->len += f->iter.bi_size;
	skb->data_len = f->iter.bi_size;
	skb->truesize += f->iter.bi_size;
633 634 635 636 637 638 639 640 641 642 643 644 645 646 647 648 649 650 651 652 653 654

	skb = skb_clone(f->skb, GFP_ATOMIC);
	if (skb) {
		do_gettimeofday(&f->sent);
		f->sent_jiffs = (u32) jiffies;
		__skb_queue_head_init(&queue);
		__skb_queue_tail(&queue, skb);
		aoenet_xmit(&queue);
	}
}

static long
rto(struct aoedev *d)
{
	long t;

	t = 2 * d->rttavg >> RTTSCALE;
	t += 8 * d->rttdev >> RTTDSCALE;
	if (t == 0)
		t = 1;

	return t;
655 656
}

657 658 659 660 661
static void
rexmit_deferred(struct aoedev *d)
{
	struct aoetgt *t;
	struct frame *f;
662
	struct frame *nf;
663
	struct list_head *pos, *nx, *head;
664
	int since;
665 666 667
	int untainted;

	count_targets(d, &untainted);
668 669 670 671 672

	head = &d->rexmitq;
	list_for_each_safe(pos, nx, head) {
		f = list_entry(pos, struct frame, head);
		t = f->t;
673 674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696 697 698 699 700 701 702
		if (t->taint) {
			if (!(f->flags & FFL_PROBE)) {
				nf = reassign_frame(f);
				if (nf) {
					if (t->nout_probes == 0
					&& untainted > 0) {
						probe(t);
						t->nout_probes++;
					}
					list_replace(&f->head, &nf->head);
					pos = &nf->head;
					aoe_freetframe(f);
					f = nf;
					t = f->t;
				}
			} else if (untainted < 1) {
				/* don't probe w/o other untainted aoetgts */
				goto stop_probe;
			} else if (tsince_hr(f) < t->taint * rto(d)) {
				/* reprobe slowly when taint is high */
				continue;
			}
		} else if (f->flags & FFL_PROBE) {
stop_probe:		/* don't probe untainted aoetgts */
			list_del(pos);
			aoe_freetframe(f);
			/* leaving d->kicked, because this is routine */
			f->t->d->flags |= DEVFL_KICKME;
			continue;
		}
703 704 705 706
		if (t->nout >= t->maxout)
			continue;
		list_del(pos);
		t->nout++;
707 708
		if (f->flags & FFL_PROBE)
			t->nout_probes++;
709 710 711
		since = tsince_hr(f);
		f->waited += since;
		f->waited_total += since;
712 713 714 715
		resend(d, f);
	}
}

716 717 718 719 720 721 722 723 724 725 726 727 728 729 730 731 732 733 734 735 736 737 738 739 740 741 742 743 744 745
/* An aoetgt accumulates demerits quickly, and successful
 * probing redeems the aoetgt slowly.
 */
static void
scorn(struct aoetgt *t)
{
	int n;

	n = t->taint++;
	t->taint += t->taint * 2;
	if (n > t->taint)
		t->taint = n;
	if (t->taint > MAX_TAINT)
		t->taint = MAX_TAINT;
}

static int
count_targets(struct aoedev *d, int *untainted)
{
	int i, good;

	for (i = good = 0; i < d->ntargets && d->targets[i]; ++i)
		if (d->targets[i]->taint == 0)
			good++;

	if (untainted)
		*untainted = good;
	return i;
}

L
Linus Torvalds 已提交
746 747 748 749
static void
rexmit_timer(ulong vp)
{
	struct aoedev *d;
750
	struct aoetgt *t;
751
	struct aoeif *ifp;
752 753 754
	struct frame *f;
	struct list_head *head, *pos, *nx;
	LIST_HEAD(flist);
L
Linus Torvalds 已提交
755 756
	register long timeout;
	ulong flags, n;
757
	int i;
758
	int utgts;	/* number of aoetgt descriptors (not slots) */
759
	int since;
L
Linus Torvalds 已提交
760 761 762

	d = (struct aoedev *) vp;

763 764
	spin_lock_irqsave(&d->lock, flags);

765
	/* timeout based on observed timings and variations */
766 767 768
	timeout = rto(d);

	utgts = count_targets(d, NULL);
L
Linus Torvalds 已提交
769 770

	if (d->flags & DEVFL_TKILL) {
771
		spin_unlock_irqrestore(&d->lock, flags);
L
Linus Torvalds 已提交
772 773
		return;
	}
774 775

	/* collect all frames to rexmit into flist */
776 777 778 779
	for (i = 0; i < NFACTIVE; i++) {
		head = &d->factive[i];
		list_for_each_safe(pos, nx, head) {
			f = list_entry(pos, struct frame, head);
780
			if (tsince_hr(f) < timeout)
781 782 783
				break;	/* end of expired frames */
			/* move to flist for later processing */
			list_move_tail(pos, &flist);
784
		}
785
	}
786

787 788 789 790
	/* process expired frames */
	while (!list_empty(&flist)) {
		pos = flist.next;
		f = list_entry(pos, struct frame, head);
791 792
		since = tsince_hr(f);
		n = f->waited_total + since;
793
		n /= USEC_PER_SEC;
794 795 796
		if (aoe_deadsecs
		&& n > aoe_deadsecs
		&& !(f->flags & FFL_PROBE)) {
797 798 799 800
			/* Waited too long.  Device failure.
			 * Hang all frames on first hash bucket for downdev
			 * to clean up.
			 */
801
			list_splice(&flist, &d->factive[0]);
802
			aoedev_downdev(d);
803
			goto out;
804 805 806
		}

		t = f->t;
807 808 809 810 811
		n = f->waited + since;
		n /= USEC_PER_SEC;
		if (aoe_deadsecs && utgts > 0
		&& (n > aoe_deadsecs / utgts || n > HARD_SCORN_SECS))
			scorn(t); /* avoid this target */
812

813 814 815
		if (t->maxout != 1) {
			t->ssthresh = t->maxout / 2;
			t->maxout = 1;
816 817
		}

818 819 820 821 822 823 824 825 826
		if (f->flags & FFL_PROBE) {
			t->nout_probes--;
		} else {
			ifp = getif(t, f->skb->dev);
			if (ifp && ++ifp->lost > (t->nframes << 1)
			&& (ifp != t->ifs || t->ifs[1].nd)) {
				ejectif(t, ifp);
				ifp = NULL;
			}
827
		}
828 829
		list_move_tail(pos, &d->rexmitq);
		t->nout--;
830
	}
831
	rexmit_deferred(d);
832

833
out:
834
	if ((d->flags & DEVFL_KICKME) && d->blkq) {
E
Ed L. Cashin 已提交
835
		d->flags &= ~DEVFL_KICKME;
836
		d->blkq->request_fn(d->blkq);
E
Ed L. Cashin 已提交
837
	}
L
Linus Torvalds 已提交
838 839 840 841 842

	d->timer.expires = jiffies + TIMERTICK;
	add_timer(&d->timer);

	spin_unlock_irqrestore(&d->lock, flags);
843
}
L
Linus Torvalds 已提交
844

845 846 847 848 849 850 851 852 853 854 855 856 857 858 859 860 861 862 863
static unsigned long
rqbiocnt(struct request *r)
{
	struct bio *bio;
	unsigned long n = 0;

	__rq_for_each_bio(bio, r)
		n++;
	return n;
}

/* This can be removed if we are certain that no users of the block
 * layer will ever use zero-count pages in bios.  Otherwise we have to
 * protect against the put_page sometimes done by the network layer.
 *
 * See http://oss.sgi.com/archives/xfs/2007-01/msg00594.html for
 * discussion.
 *
 * We cannot use get_page in the workaround, because it insists on a
864
 * positive page count as a precondition.  So we use _refcount directly.
865 866 867 868
 */
static void
bio_pageinc(struct bio *bio)
{
869
	struct bio_vec bv;
870
	struct page *page;
871
	struct bvec_iter iter;
872

873
	bio_for_each_segment(bv, bio, iter) {
874
		/* Non-zero page count for non-head members of
875
		 * compound pages is no longer allowed by the kernel.
876
		 */
D
David Rientjes 已提交
877
		page = compound_head(bv.bv_page);
878
		page_ref_inc(page);
879 880 881 882 883 884
	}
}

static void
bio_pagedec(struct bio *bio)
{
885
	struct page *page;
886 887
	struct bio_vec bv;
	struct bvec_iter iter;
888

889
	bio_for_each_segment(bv, bio, iter) {
D
David Rientjes 已提交
890
		page = compound_head(bv.bv_page);
891
		page_ref_dec(page);
892
	}
893 894 895 896 897 898 899 900
}

static void
bufinit(struct buf *buf, struct request *rq, struct bio *bio)
{
	memset(buf, 0, sizeof(*buf));
	buf->rq = rq;
	buf->bio = bio;
901
	buf->iter = bio->bi_iter;
902 903 904 905 906 907 908 909 910 911 912 913 914 915 916 917 918 919 920 921 922 923 924 925 926 927 928 929 930 931 932 933 934 935 936 937 938 939
	bio_pageinc(bio);
}

static struct buf *
nextbuf(struct aoedev *d)
{
	struct request *rq;
	struct request_queue *q;
	struct buf *buf;
	struct bio *bio;

	q = d->blkq;
	if (q == NULL)
		return NULL;	/* initializing */
	if (d->ip.buf)
		return d->ip.buf;
	rq = d->ip.rq;
	if (rq == NULL) {
		rq = blk_peek_request(q);
		if (rq == NULL)
			return NULL;
		blk_start_request(rq);
		d->ip.rq = rq;
		d->ip.nxbio = rq->bio;
		rq->special = (void *) rqbiocnt(rq);
	}
	buf = mempool_alloc(d->bufpool, GFP_ATOMIC);
	if (buf == NULL) {
		pr_err("aoe: nextbuf: unable to mempool_alloc!\n");
		return NULL;
	}
	bio = d->ip.nxbio;
	bufinit(buf, rq, bio);
	bio = bio->bi_next;
	d->ip.nxbio = bio;
	if (bio == NULL)
		d->ip.rq = NULL;
	return d->ip.buf = buf;
L
Linus Torvalds 已提交
940 941
}

942 943 944 945
/* enters with d->lock held */
void
aoecmd_work(struct aoedev *d)
{
946
	rexmit_deferred(d);
947 948
	while (aoecmd_ata_rw(d))
		;
949 950
}

951 952 953
/* this function performs work that has been deferred until sleeping is OK
 */
void
D
David Howells 已提交
954
aoecmd_sleepwork(struct work_struct *work)
955
{
D
David Howells 已提交
956
	struct aoedev *d = container_of(work, struct aoedev, work);
957 958
	struct block_device *bd;
	u64 ssize;
959 960 961 962 963

	if (d->flags & DEVFL_GDALLOC)
		aoeblk_gdalloc(d);

	if (d->flags & DEVFL_NEWSIZE) {
964
		ssize = get_capacity(d->gd);
965 966
		bd = bdget_disk(d->gd, 0);
		if (bd) {
A
Al Viro 已提交
967
			inode_lock(bd->bd_inode);
968
			i_size_write(bd->bd_inode, (loff_t)ssize<<9);
A
Al Viro 已提交
969
			inode_unlock(bd->bd_inode);
970 971
			bdput(bd);
		}
972
		spin_lock_irq(&d->lock);
973 974
		d->flags |= DEVFL_UP;
		d->flags &= ~DEVFL_NEWSIZE;
975
		spin_unlock_irq(&d->lock);
976 977 978
	}
}

979 980 981 982 983 984 985 986 987 988 989
static void
ata_ident_fixstring(u16 *id, int ns)
{
	u16 s;

	while (ns-- > 0) {
		s = *id;
		*id++ = s >> 8 | s << 8;
	}
}

L
Linus Torvalds 已提交
990
static void
991
ataid_complete(struct aoedev *d, struct aoetgt *t, unsigned char *id)
L
Linus Torvalds 已提交
992 993 994 995 996
{
	u64 ssize;
	u16 n;

	/* word 83: command set supported */
997
	n = get_unaligned_le16(&id[83 << 1]);
L
Linus Torvalds 已提交
998 999

	/* word 86: command set/feature enabled */
1000
	n |= get_unaligned_le16(&id[86 << 1]);
L
Linus Torvalds 已提交
1001 1002 1003 1004 1005

	if (n & (1<<10)) {	/* bit 10: LBA 48 */
		d->flags |= DEVFL_EXT;

		/* word 100: number lba48 sectors */
1006
		ssize = get_unaligned_le64(&id[100 << 1]);
L
Linus Torvalds 已提交
1007 1008 1009 1010 1011 1012 1013 1014 1015 1016

		/* set as in ide-disk.c:init_idedisk_capacity */
		d->geo.cylinders = ssize;
		d->geo.cylinders /= (255 * 63);
		d->geo.heads = 255;
		d->geo.sectors = 63;
	} else {
		d->flags &= ~DEVFL_EXT;

		/* number lba28 sectors */
1017
		ssize = get_unaligned_le32(&id[60 << 1]);
L
Linus Torvalds 已提交
1018 1019

		/* NOTE: obsolete in ATA 6 */
1020 1021 1022
		d->geo.cylinders = get_unaligned_le16(&id[54 << 1]);
		d->geo.heads = get_unaligned_le16(&id[55 << 1]);
		d->geo.sectors = get_unaligned_le16(&id[56 << 1]);
L
Linus Torvalds 已提交
1023
	}
1024

1025 1026 1027 1028 1029
	ata_ident_fixstring((u16 *) &id[10<<1], 10);	/* serial */
	ata_ident_fixstring((u16 *) &id[23<<1], 4);	/* firmware */
	ata_ident_fixstring((u16 *) &id[27<<1], 20);	/* model */
	memcpy(d->ident, id, sizeof(d->ident));

1030
	if (d->ssize != ssize)
1031
		printk(KERN_INFO
1032 1033
			"aoe: %pm e%ld.%d v%04x has %llu sectors\n",
			t->addr,
1034 1035
			d->aoemajor, d->aoeminor,
			d->fw_ver, (long long)ssize);
L
Linus Torvalds 已提交
1036 1037
	d->ssize = ssize;
	d->geo.start = 0;
1038 1039
	if (d->flags & (DEVFL_GDALLOC|DEVFL_NEWSIZE))
		return;
L
Linus Torvalds 已提交
1040
	if (d->gd != NULL) {
1041
		set_capacity(d->gd, ssize);
1042
		d->flags |= DEVFL_NEWSIZE;
1043
	} else
1044
		d->flags |= DEVFL_GDALLOC;
L
Linus Torvalds 已提交
1045 1046 1047 1048
	schedule_work(&d->work);
}

static void
1049
calc_rttavg(struct aoedev *d, struct aoetgt *t, int rtt)
L
Linus Torvalds 已提交
1050 1051 1052 1053
{
	register long n;

	n = rtt;
1054 1055 1056 1057 1058 1059 1060 1061 1062 1063 1064 1065 1066 1067 1068 1069 1070

	/* cf. Congestion Avoidance and Control, Jacobson & Karels, 1988 */
	n -= d->rttavg >> RTTSCALE;
	d->rttavg += n;
	if (n < 0)
		n = -n;
	n -= d->rttdev >> RTTDSCALE;
	d->rttdev += n;

	if (!t || t->maxout >= t->nframes)
		return;
	if (t->maxout < t->ssthresh)
		t->maxout += 1;
	else if (t->nout == t->maxout && t->next_cwnd-- == 0) {
		t->maxout += 1;
		t->next_cwnd = t->maxout;
	}
L
Linus Torvalds 已提交
1071 1072
}

1073 1074 1075 1076 1077 1078
static struct aoetgt *
gettgt(struct aoedev *d, char *addr)
{
	struct aoetgt **t, **e;

	t = d->targets;
1079
	e = t + d->ntargets;
1080 1081 1082 1083 1084 1085
	for (; t < e && *t; t++)
		if (memcmp((*t)->addr, addr, sizeof((*t)->addr)) == 0)
			return *t;
	return NULL;
}

1086
static void
1087
bvcpy(struct sk_buff *skb, struct bio *bio, struct bvec_iter iter, long cnt)
1088 1089
{
	int soff = 0;
1090 1091 1092 1093 1094 1095 1096 1097 1098
	struct bio_vec bv;

	iter.bi_size = cnt;

	__bio_for_each_segment(bv, bio, iter, iter) {
		char *p = page_address(bv.bv_page) + bv.bv_offset;
		skb_copy_bits(skb, soff, p, bv.bv_len);
		soff += bv.bv_len;
	}
1099 1100
}

1101 1102 1103 1104 1105 1106 1107 1108 1109 1110 1111 1112
void
aoe_end_request(struct aoedev *d, struct request *rq, int fastfail)
{
	struct bio *bio;
	int bok;
	struct request_queue *q;

	q = d->blkq;
	if (rq == d->ip.rq)
		d->ip.rq = NULL;
	do {
		bio = rq->bio;
1113
		bok = !fastfail && !bio->bi_error;
1114
	} while (__blk_end_request(rq, bok ? 0 : -EIO, bio->bi_iter.bi_size));
1115 1116 1117

	/* cf. http://lkml.org/lkml/2006/10/31/28 */
	if (!fastfail)
1118
		__blk_run_queue(q);
1119 1120 1121 1122 1123 1124 1125 1126 1127 1128 1129 1130 1131 1132 1133 1134 1135 1136 1137
}

static void
aoe_end_buf(struct aoedev *d, struct buf *buf)
{
	struct request *rq;
	unsigned long n;

	if (buf == d->ip.buf)
		d->ip.buf = NULL;
	rq = buf->rq;
	bio_pagedec(buf->bio);
	mempool_free(buf, d->bufpool);
	n = (unsigned long) rq->special;
	rq->special = (void *) --n;
	if (n == 0)
		aoe_end_request(d, rq, 0);
}

1138
static void
1139
ktiocomplete(struct frame *f)
1140
{
1141 1142 1143 1144 1145 1146 1147 1148
	struct aoe_hdr *hin, *hout;
	struct aoe_atahdr *ahin, *ahout;
	struct buf *buf;
	struct sk_buff *skb;
	struct aoetgt *t;
	struct aoeif *ifp;
	struct aoedev *d;
	long n;
1149
	int untainted;
1150

1151
	if (f == NULL)
1152
		return;
1153 1154 1155

	t = f->t;
	d = t->d;
1156 1157 1158 1159 1160 1161
	skb = f->r_skb;
	buf = f->buf;
	if (f->flags & FFL_PROBE)
		goto out;
	if (!skb)		/* just fail the buf. */
		goto noskb;
1162 1163 1164 1165 1166 1167 1168 1169 1170 1171 1172 1173

	hout = (struct aoe_hdr *) skb_mac_header(f->skb);
	ahout = (struct aoe_atahdr *) (hout+1);

	hin = (struct aoe_hdr *) skb->data;
	skb_pull(skb, sizeof(*hin));
	ahin = (struct aoe_atahdr *) skb->data;
	skb_pull(skb, sizeof(*ahin));
	if (ahin->cmdstat & 0xa9) {	/* these bits cleared on success */
		pr_err("aoe: ata error cmd=%2.2Xh stat=%2.2Xh from e%ld.%d\n",
			ahout->cmdstat, ahin->cmdstat,
			d->aoemajor, d->aoeminor);
E
Ed Cashin 已提交
1174
noskb:		if (buf)
1175
			buf->bio->bi_error = -EIO;
1176
		goto out;
1177
	}
1178 1179 1180 1181 1182 1183

	n = ahout->scnt << 9;
	switch (ahout->cmdstat) {
	case ATA_CMD_PIO_READ:
	case ATA_CMD_PIO_READ_EXT:
		if (skb->len < n) {
1184 1185 1186 1187
			pr_err("%s e%ld.%d.  skb->len=%d need=%ld\n",
				"aoe: runt data size in read from",
				(long) d->aoemajor, d->aoeminor,
			       skb->len, n);
1188
			buf->bio->bi_error = -EIO;
1189 1190
			break;
		}
1191 1192 1193 1194 1195
		if (n > f->iter.bi_size) {
			pr_err_ratelimited("%s e%ld.%d.  bytes=%ld need=%u\n",
				"aoe: too-large data size in read from",
				(long) d->aoemajor, d->aoeminor,
				n, f->iter.bi_size);
1196
			buf->bio->bi_error = -EIO;
1197 1198 1199
			break;
		}
		bvcpy(skb, f->buf->bio, f->iter, n);
1200 1201 1202 1203
	case ATA_CMD_PIO_WRITE:
	case ATA_CMD_PIO_WRITE_EXT:
		spin_lock_irq(&d->lock);
		ifp = getif(t, skb->dev);
1204
		if (ifp)
1205 1206 1207 1208 1209
			ifp->lost = 0;
		spin_unlock_irq(&d->lock);
		break;
	case ATA_CMD_ID_ATA:
		if (skb->len < 512) {
1210 1211 1212
			pr_info("%s e%ld.%d.  skb->len=%d need=512\n",
				"aoe: runt data size in ataid from",
				(long) d->aoemajor, d->aoeminor,
1213 1214 1215 1216 1217 1218 1219 1220 1221 1222 1223 1224 1225 1226 1227
				skb->len);
			break;
		}
		if (skb_linearize(skb))
			break;
		spin_lock_irq(&d->lock);
		ataid_complete(d, t, skb->data);
		spin_unlock_irq(&d->lock);
		break;
	default:
		pr_info("aoe: unrecognized ata command %2.2Xh for %d.%d\n",
			ahout->cmdstat,
			be16_to_cpu(get_unaligned(&hin->major)),
			hin->minor);
	}
1228
out:
1229
	spin_lock_irq(&d->lock);
1230 1231 1232 1233 1234 1235 1236 1237 1238
	if (t->taint > 0
	&& --t->taint > 0
	&& t->nout_probes == 0) {
		count_targets(d, &untainted);
		if (untainted > 0) {
			probe(t);
			t->nout_probes++;
		}
	}
1239 1240 1241

	aoe_freetframe(f);

1242
	if (buf && --buf->nframesout == 0 && buf->iter.bi_size == 0)
1243
		aoe_end_buf(d, buf);
1244

1245 1246
	spin_unlock_irq(&d->lock);
	aoedev_put(d);
1247
	dev_kfree_skb(skb);
1248 1249
}

1250 1251 1252 1253
/* Enters with iocq.lock held.
 * Returns true iff responses needing processing remain.
 */
static int
1254
ktio(int id)
1255 1256 1257 1258
{
	struct frame *f;
	struct list_head *pos;
	int i;
1259
	int actual_id;
1260 1261 1262 1263

	for (i = 0; ; ++i) {
		if (i == MAXIOC)
			return 1;
1264
		if (list_empty(&iocq[id].head))
1265
			return 0;
1266
		pos = iocq[id].head.next;
1267 1268
		list_del(pos);
		f = list_entry(pos, struct frame, head);
1269
		spin_unlock_irq(&iocq[id].lock);
1270
		ktiocomplete(f);
1271 1272 1273 1274 1275 1276 1277 1278 1279 1280 1281 1282 1283

		/* Figure out if extra threads are required. */
		actual_id = f->t->d->aoeminor % ncpus;

		if (!kts[actual_id].active) {
			BUG_ON(id != 0);
			mutex_lock(&ktio_spawn_lock);
			if (!kts[actual_id].active
				&& aoe_ktstart(&kts[actual_id]) == 0)
				kts[actual_id].active = 1;
			mutex_unlock(&ktio_spawn_lock);
		}
		spin_lock_irq(&iocq[id].lock);
1284 1285 1286 1287 1288 1289 1290 1291 1292 1293 1294 1295 1296 1297 1298 1299
	}
}

static int
kthread(void *vp)
{
	struct ktstate *k;
	DECLARE_WAITQUEUE(wait, current);
	int more;

	k = vp;
	current->flags |= PF_NOFREEZE;
	set_user_nice(current, -10);
	complete(&k->rendez);	/* tell spawner we're running */
	do {
		spin_lock_irq(k->lock);
1300
		more = k->fn(k->id);
1301 1302 1303 1304 1305 1306 1307 1308 1309 1310 1311 1312 1313 1314 1315
		if (!more) {
			add_wait_queue(k->waitq, &wait);
			__set_current_state(TASK_INTERRUPTIBLE);
		}
		spin_unlock_irq(k->lock);
		if (!more) {
			schedule();
			remove_wait_queue(k->waitq, &wait);
		} else
			cond_resched();
	} while (!kthread_should_stop());
	complete(&k->rendez);	/* tell spawner we're stopping */
	return 0;
}

1316
void
1317 1318 1319 1320 1321 1322
aoe_ktstop(struct ktstate *k)
{
	kthread_stop(k->task);
	wait_for_completion(&k->rendez);
}

1323
int
1324 1325 1326 1327 1328
aoe_ktstart(struct ktstate *k)
{
	struct task_struct *task;

	init_completion(&k->rendez);
1329
	task = kthread_run(kthread, k, "%s", k->name);
1330 1331 1332 1333 1334 1335 1336 1337 1338 1339 1340 1341
	if (task == NULL || IS_ERR(task))
		return -ENOMEM;
	k->task = task;
	wait_for_completion(&k->rendez); /* allow kthread to start */
	init_completion(&k->rendez);	/* for waiting for exit later */
	return 0;
}

/* pass it off to kthreads for processing */
static void
ktcomplete(struct frame *f, struct sk_buff *skb)
{
1342
	int id;
1343 1344 1345
	ulong flags;

	f->r_skb = skb;
1346 1347 1348 1349 1350 1351 1352 1353 1354 1355 1356 1357 1358 1359
	id = f->t->d->aoeminor % ncpus;
	spin_lock_irqsave(&iocq[id].lock, flags);
	if (!kts[id].active) {
		spin_unlock_irqrestore(&iocq[id].lock, flags);
		/* The thread with id has not been spawned yet,
		 * so delegate the work to the main thread and
		 * try spawning a new thread.
		 */
		id = 0;
		spin_lock_irqsave(&iocq[id].lock, flags);
	}
	list_add_tail(&f->head, &iocq[id].head);
	spin_unlock_irqrestore(&iocq[id].lock, flags);
	wake_up(&ktiowq[id]);
1360 1361 1362
}

struct sk_buff *
L
Linus Torvalds 已提交
1363 1364 1365
aoecmd_ata_rsp(struct sk_buff *skb)
{
	struct aoedev *d;
1366
	struct aoe_hdr *h;
L
Linus Torvalds 已提交
1367
	struct frame *f;
1368
	u32 n;
L
Linus Torvalds 已提交
1369 1370
	ulong flags;
	char ebuf[128];
1371 1372
	u16 aoemajor;

1373 1374
	h = (struct aoe_hdr *) skb->data;
	aoemajor = be16_to_cpu(get_unaligned(&h->major));
1375
	d = aoedev_by_aoeaddr(aoemajor, h->minor, 0);
L
Linus Torvalds 已提交
1376 1377 1378
	if (d == NULL) {
		snprintf(ebuf, sizeof ebuf, "aoecmd_ata_rsp: ata response "
			"for unknown device %d.%d\n",
1379
			aoemajor, h->minor);
L
Linus Torvalds 已提交
1380
		aoechr_error(ebuf);
1381
		return skb;
L
Linus Torvalds 已提交
1382 1383 1384 1385
	}

	spin_lock_irqsave(&d->lock, flags);

1386
	n = be32_to_cpu(get_unaligned(&h->tag));
1387
	f = getframe(d, n);
1388
	if (f) {
1389
		calc_rttavg(d, f->t, tsince_hr(f));
1390
		f->t->nout--;
1391 1392
		if (f->flags & FFL_PROBE)
			f->t->nout_probes--;
1393 1394 1395
	} else {
		f = getframe_deferred(d, n);
		if (f) {
1396
			calc_rttavg(d, NULL, tsince_hr(f));
1397 1398 1399 1400 1401
		} else {
			calc_rttavg(d, NULL, tsince(n));
			spin_unlock_irqrestore(&d->lock, flags);
			aoedev_put(d);
			snprintf(ebuf, sizeof(ebuf),
1402
				 "%15s e%d.%d    tag=%08x@%08lx s=%pm d=%pm\n",
1403 1404 1405 1406
				 "unexpected rsp",
				 get_unaligned_be16(&h->major),
				 h->minor,
				 get_unaligned_be32(&h->tag),
1407 1408 1409
				 jiffies,
				 h->src,
				 h->dst);
1410 1411 1412
			aoechr_error(ebuf);
			return skb;
		}
L
Linus Torvalds 已提交
1413 1414 1415 1416
	}
	aoecmd_work(d);

	spin_unlock_irqrestore(&d->lock, flags);
1417 1418 1419 1420 1421 1422 1423 1424

	ktcomplete(f, skb);

	/*
	 * Note here that we do not perform an aoedev_put, as we are
	 * leaving this reference for the ktio to release.
	 */
	return NULL;
L
Linus Torvalds 已提交
1425 1426 1427 1428 1429
}

void
aoecmd_cfg(ushort aoemajor, unsigned char aoeminor)
{
1430
	struct sk_buff_head queue;
L
Linus Torvalds 已提交
1431

1432 1433 1434
	__skb_queue_head_init(&queue);
	aoecmd_cfg_pkts(aoemajor, aoeminor, &queue);
	aoenet_xmit(&queue);
L
Linus Torvalds 已提交
1435
}
E
Ed Cashin 已提交
1436

1437
struct sk_buff *
L
Linus Torvalds 已提交
1438 1439 1440 1441 1442 1443
aoecmd_ata_id(struct aoedev *d)
{
	struct aoe_hdr *h;
	struct aoe_atahdr *ah;
	struct frame *f;
	struct sk_buff *skb;
1444
	struct aoetgt *t;
L
Linus Torvalds 已提交
1445

1446
	f = newframe(d);
1447
	if (f == NULL)
L
Linus Torvalds 已提交
1448
		return NULL;
1449 1450

	t = *d->tgt;
L
Linus Torvalds 已提交
1451 1452

	/* initialize the headers & frame */
E
Ed L. Cashin 已提交
1453
	skb = f->skb;
1454
	h = (struct aoe_hdr *) skb_mac_header(skb);
L
Linus Torvalds 已提交
1455
	ah = (struct aoe_atahdr *) (h+1);
1456 1457
	skb_put(skb, sizeof *h + sizeof *ah);
	memset(h, 0, skb->len);
1458
	f->tag = aoehdr_atainit(d, t, h);
1459
	fhash(f);
1460
	t->nout++;
L
Linus Torvalds 已提交
1461
	f->waited = 0;
1462
	f->waited_total = 0;
L
Linus Torvalds 已提交
1463 1464 1465

	/* set up ata header */
	ah->scnt = 1;
1466
	ah->cmdstat = ATA_CMD_ID_ATA;
L
Linus Torvalds 已提交
1467 1468
	ah->lba3 = 0xa0;

1469
	skb->dev = t->ifp->nd;
L
Linus Torvalds 已提交
1470

1471 1472
	d->rttavg = RTTAVG_INIT;
	d->rttdev = RTTDEV_INIT;
L
Linus Torvalds 已提交
1473 1474
	d->timer.function = rexmit_timer;

1475 1476 1477 1478 1479 1480 1481
	skb = skb_clone(skb, GFP_ATOMIC);
	if (skb) {
		do_gettimeofday(&f->sent);
		f->sent_jiffs = (u32) jiffies;
	}

	return skb;
L
Linus Torvalds 已提交
1482
}
E
Ed Cashin 已提交
1483

1484 1485 1486 1487 1488 1489 1490 1491 1492 1493 1494 1495 1496 1497 1498 1499 1500 1501 1502 1503
static struct aoetgt **
grow_targets(struct aoedev *d)
{
	ulong oldn, newn;
	struct aoetgt **tt;

	oldn = d->ntargets;
	newn = oldn * 2;
	tt = kcalloc(newn, sizeof(*d->targets), GFP_ATOMIC);
	if (!tt)
		return NULL;
	memmove(tt, d->targets, sizeof(*d->targets) * oldn);
	d->tgt = tt + (d->tgt - d->targets);
	kfree(d->targets);
	d->targets = tt;
	d->ntargets = newn;

	return &d->targets[oldn];
}

1504 1505 1506 1507 1508 1509
static struct aoetgt *
addtgt(struct aoedev *d, char *addr, ulong nframes)
{
	struct aoetgt *t, **tt, **te;

	tt = d->targets;
1510
	te = tt + d->ntargets;
1511 1512 1513
	for (; tt < te && *tt; tt++)
		;

1514
	if (tt == te) {
1515 1516 1517
		tt = grow_targets(d);
		if (!tt)
			goto nomem;
1518
	}
1519
	t = kzalloc(sizeof(*t), GFP_ATOMIC);
1520 1521
	if (!t)
		goto nomem;
1522
	t->nframes = nframes;
1523
	t->d = d;
1524 1525
	memcpy(t->addr, addr, sizeof t->addr);
	t->ifp = t->ifs;
1526
	aoecmd_wreset(t);
1527
	t->maxout = t->nframes / 2;
1528
	INIT_LIST_HEAD(&t->ffree);
1529
	return *tt = t;
1530 1531 1532 1533

 nomem:
	pr_info("aoe: cannot allocate memory to add target\n");
	return NULL;
1534 1535
}

1536 1537 1538 1539 1540 1541 1542
static void
setdbcnt(struct aoedev *d)
{
	struct aoetgt **t, **e;
	int bcnt = 0;

	t = d->targets;
1543
	e = t + d->ntargets;
1544 1545 1546 1547 1548 1549 1550 1551 1552 1553 1554 1555 1556 1557 1558 1559 1560 1561 1562 1563 1564 1565 1566 1567 1568 1569 1570 1571 1572 1573 1574 1575 1576 1577 1578
	for (; t < e && *t; t++)
		if (bcnt == 0 || bcnt > (*t)->minbcnt)
			bcnt = (*t)->minbcnt;
	if (bcnt != d->maxbcnt) {
		d->maxbcnt = bcnt;
		pr_info("aoe: e%ld.%d: setting %d byte data frames\n",
			d->aoemajor, d->aoeminor, bcnt);
	}
}

static void
setifbcnt(struct aoetgt *t, struct net_device *nd, int bcnt)
{
	struct aoedev *d;
	struct aoeif *p, *e;
	int minbcnt;

	d = t->d;
	minbcnt = bcnt;
	p = t->ifs;
	e = p + NAOEIFS;
	for (; p < e; p++) {
		if (p->nd == NULL)
			break;		/* end of the valid interfaces */
		if (p->nd == nd) {
			p->bcnt = bcnt;	/* we're updating */
			nd = NULL;
		} else if (minbcnt > p->bcnt)
			minbcnt = p->bcnt; /* find the min interface */
	}
	if (nd) {
		if (p == e) {
			pr_err("aoe: device setifbcnt failure; too many interfaces.\n");
			return;
		}
1579
		dev_hold(nd);
1580 1581 1582 1583 1584 1585 1586
		p->nd = nd;
		p->bcnt = bcnt;
	}
	t->minbcnt = minbcnt;
	setdbcnt(d);
}

L
Linus Torvalds 已提交
1587 1588 1589 1590 1591 1592
void
aoecmd_cfg_rsp(struct sk_buff *skb)
{
	struct aoedev *d;
	struct aoe_hdr *h;
	struct aoe_cfghdr *ch;
1593
	struct aoetgt *t;
1594
	ulong flags, aoemajor;
L
Linus Torvalds 已提交
1595
	struct sk_buff *sl;
1596
	struct sk_buff_head queue;
E
Ed L. Cashin 已提交
1597
	u16 n;
L
Linus Torvalds 已提交
1598

1599
	sl = NULL;
1600
	h = (struct aoe_hdr *) skb_mac_header(skb);
L
Linus Torvalds 已提交
1601 1602 1603 1604 1605 1606
	ch = (struct aoe_cfghdr *) (h+1);

	/*
	 * Enough people have their dip switches set backwards to
	 * warrant a loud message for this special case.
	 */
1607
	aoemajor = get_unaligned_be16(&h->major);
L
Linus Torvalds 已提交
1608
	if (aoemajor == 0xfff) {
E
Ed L. Cashin 已提交
1609
		printk(KERN_ERR "aoe: Warning: shelf address is all ones.  "
E
Ed L. Cashin 已提交
1610
			"Check shelf dip switches.\n");
L
Linus Torvalds 已提交
1611 1612
		return;
	}
1613 1614
	if (aoemajor == 0xffff) {
		pr_info("aoe: e%ld.%d: broadcast shelf number invalid\n",
1615
			aoemajor, (int) h->minor);
1616 1617
		return;
	}
1618 1619 1620
	if (h->minor == 0xff) {
		pr_info("aoe: e%ld.%d: broadcast slot number invalid\n",
			aoemajor, (int) h->minor);
L
Linus Torvalds 已提交
1621 1622 1623
		return;
	}

E
Ed L. Cashin 已提交
1624
	n = be16_to_cpu(ch->bufcnt);
1625 1626
	if (n > aoe_maxout)	/* keep it reasonable */
		n = aoe_maxout;
L
Linus Torvalds 已提交
1627

1628 1629 1630 1631 1632 1633
	d = aoedev_by_aoeaddr(aoemajor, h->minor, 1);
	if (d == NULL) {
		pr_info("aoe: device allocation failure\n");
		return;
	}

L
Linus Torvalds 已提交
1634 1635
	spin_lock_irqsave(&d->lock, flags);

1636
	t = gettgt(d, h->src);
1637 1638 1639
	if (t) {
		t->nframes = n;
		if (n < t->maxout)
1640
			aoecmd_wreset(t);
1641
	} else {
1642
		t = addtgt(d, h->src, n);
1643 1644
		if (!t)
			goto bail;
1645
	}
1646 1647 1648 1649 1650 1651 1652
	n = skb->dev->mtu;
	n -= sizeof(struct aoe_hdr) + sizeof(struct aoe_atahdr);
	n /= 512;
	if (n > ch->scnt)
		n = ch->scnt;
	n = n ? n * 512 : DEFAULTBCNT;
	setifbcnt(t, skb->dev, n);
1653 1654

	/* don't change users' perspective */
1655 1656 1657
	if (d->nopen == 0) {
		d->fw_ver = be16_to_cpu(ch->fwver);
		sl = aoecmd_ata_id(d);
L
Linus Torvalds 已提交
1658
	}
1659
bail:
L
Linus Torvalds 已提交
1660
	spin_unlock_irqrestore(&d->lock, flags);
1661
	aoedev_put(d);
1662 1663 1664 1665 1666
	if (sl) {
		__skb_queue_head_init(&queue);
		__skb_queue_tail(&queue, sl);
		aoenet_xmit(&queue);
	}
L
Linus Torvalds 已提交
1667 1668
}

1669 1670 1671 1672 1673 1674 1675 1676
void
aoecmd_wreset(struct aoetgt *t)
{
	t->maxout = 1;
	t->ssthresh = t->nframes / 2;
	t->next_cwnd = t->nframes;
}

1677 1678 1679 1680 1681
void
aoecmd_cleanslate(struct aoedev *d)
{
	struct aoetgt **t, **te;

1682 1683
	d->rttavg = RTTAVG_INIT;
	d->rttdev = RTTDEV_INIT;
1684
	d->maxbcnt = 0;
1685 1686

	t = d->targets;
1687
	te = t + d->ntargets;
1688
	for (; t < te && *t; t++)
1689
		aoecmd_wreset(*t);
1690
}
1691

1692 1693 1694 1695 1696
void
aoe_failbuf(struct aoedev *d, struct buf *buf)
{
	if (buf == NULL)
		return;
1697
	buf->iter.bi_size = 0;
1698
	buf->bio->bi_error = -EIO;
1699 1700 1701 1702 1703 1704
	if (buf->nframesout == 0)
		aoe_end_buf(d, buf);
}

void
aoe_flush_iocq(void)
1705 1706 1707 1708 1709 1710 1711 1712 1713 1714 1715
{
	int i;

	for (i = 0; i < ncpus; i++) {
		if (kts[i].active)
			aoe_flush_iocq_by_index(i);
	}
}

void
aoe_flush_iocq_by_index(int id)
1716 1717 1718 1719 1720 1721 1722 1723
{
	struct frame *f;
	struct aoedev *d;
	LIST_HEAD(flist);
	struct list_head *pos;
	struct sk_buff *skb;
	ulong flags;

1724 1725 1726
	spin_lock_irqsave(&iocq[id].lock, flags);
	list_splice_init(&iocq[id].head, &flist);
	spin_unlock_irqrestore(&iocq[id].lock, flags);
1727 1728 1729 1730 1731 1732 1733 1734 1735 1736 1737 1738 1739 1740
	while (!list_empty(&flist)) {
		pos = flist.next;
		list_del(pos);
		f = list_entry(pos, struct frame, head);
		d = f->t->d;
		skb = f->r_skb;
		spin_lock_irqsave(&d->lock, flags);
		if (f->buf) {
			f->buf->nframesout--;
			aoe_failbuf(d, f->buf);
		}
		aoe_freetframe(f);
		spin_unlock_irqrestore(&d->lock, flags);
		dev_kfree_skb(skb);
1741
		aoedev_put(d);
1742 1743 1744 1745 1746 1747
	}
}

int __init
aoecmd_init(void)
{
1748
	void *p;
1749 1750
	int i;
	int ret;
1751 1752

	/* get_zeroed_page returns page with ref count 1 */
1753
	p = (void *) get_zeroed_page(GFP_KERNEL);
1754 1755 1756 1757
	if (!p)
		return -ENOMEM;
	empty_page = virt_to_page(p);

1758 1759 1760 1761 1762 1763 1764 1765 1766 1767 1768 1769 1770 1771 1772 1773 1774 1775 1776 1777 1778 1779 1780 1781 1782 1783 1784 1785 1786 1787 1788 1789 1790 1791 1792 1793 1794 1795 1796 1797 1798 1799 1800 1801 1802 1803
	ncpus = num_online_cpus();

	iocq = kcalloc(ncpus, sizeof(struct iocq_ktio), GFP_KERNEL);
	if (!iocq)
		return -ENOMEM;

	kts = kcalloc(ncpus, sizeof(struct ktstate), GFP_KERNEL);
	if (!kts) {
		ret = -ENOMEM;
		goto kts_fail;
	}

	ktiowq = kcalloc(ncpus, sizeof(wait_queue_head_t), GFP_KERNEL);
	if (!ktiowq) {
		ret = -ENOMEM;
		goto ktiowq_fail;
	}

	mutex_init(&ktio_spawn_lock);

	for (i = 0; i < ncpus; i++) {
		INIT_LIST_HEAD(&iocq[i].head);
		spin_lock_init(&iocq[i].lock);
		init_waitqueue_head(&ktiowq[i]);
		snprintf(kts[i].name, sizeof(kts[i].name), "aoe_ktio%d", i);
		kts[i].fn = ktio;
		kts[i].waitq = &ktiowq[i];
		kts[i].lock = &iocq[i].lock;
		kts[i].id = i;
		kts[i].active = 0;
	}
	kts[0].active = 1;
	if (aoe_ktstart(&kts[0])) {
		ret = -ENOMEM;
		goto ktstart_fail;
	}
	return 0;

ktstart_fail:
	kfree(ktiowq);
ktiowq_fail:
	kfree(kts);
kts_fail:
	kfree(iocq);

	return ret;
1804 1805 1806 1807 1808
}

void
aoecmd_exit(void)
{
1809 1810 1811 1812 1813 1814
	int i;

	for (i = 0; i < ncpus; i++)
		if (kts[i].active)
			aoe_ktstop(&kts[i]);

1815
	aoe_flush_iocq();
1816

1817 1818 1819 1820 1821 1822 1823
	/* Free up the iocq and thread speicific configuration
	* allocated during startup.
	*/
	kfree(iocq);
	kfree(kts);
	kfree(ktiowq);

1824 1825
	free_page((unsigned long) page_address(empty_page));
	empty_page = NULL;
1826
}