1 /*
2  * Copyright (c) 2009-2010 Chelsio, Inc. All rights reserved.
3  *
4  * This software is available to you under a choice of one of two
5  * licenses.  You may choose to be licensed under the terms of the GNU
6  * General Public License (GPL) Version 2, available from the file
7  * COPYING in the main directory of this source tree, or the
8  * OpenIB.org BSD license below:
9  *
10  *     Redistribution and use in source and binary forms, with or
11  *     without modification, are permitted provided that the following
12  *     conditions are met:
13  *
14  *      - Redistributions of source code must retain the above
15  *	  copyright notice, this list of conditions and the following
16  *	  disclaimer.
17  *
18  *      - Redistributions in binary form must reproduce the above
19  *	  copyright notice, this list of conditions and the following
20  *	  disclaimer in the documentation and/or other materials
21  *	  provided with the distribution.
22  *
23  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
24  * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
25  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
26  * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
27  * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
28  * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
29  * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
30  * SOFTWARE.
31  */
32 #include <linux/module.h>
33 #include <linux/moduleparam.h>
34 #include <linux/debugfs.h>
35 #include <linux/vmalloc.h>
36 
37 #include <rdma/ib_verbs.h>
38 
39 #include "iw_cxgb4.h"
40 
41 #define DRV_VERSION "0.1"
42 
43 MODULE_AUTHOR("Steve Wise");
44 MODULE_DESCRIPTION("Chelsio T4 RDMA Driver");
45 MODULE_LICENSE("Dual BSD/GPL");
46 MODULE_VERSION(DRV_VERSION);
47 
48 struct uld_ctx {
49 	struct list_head entry;
50 	struct cxgb4_lld_info lldi;
51 	struct c4iw_dev *dev;
52 };
53 
54 static LIST_HEAD(uld_ctx_list);
55 static DEFINE_MUTEX(dev_mutex);
56 
57 static struct dentry *c4iw_debugfs_root;
58 
59 struct c4iw_debugfs_data {
60 	struct c4iw_dev *devp;
61 	char *buf;
62 	int bufsize;
63 	int pos;
64 };
65 
66 static int count_idrs(int id, void *p, void *data)
67 {
68 	int *countp = data;
69 
70 	*countp = *countp + 1;
71 	return 0;
72 }
73 
74 static ssize_t debugfs_read(struct file *file, char __user *buf, size_t count,
75 			    loff_t *ppos)
76 {
77 	struct c4iw_debugfs_data *d = file->private_data;
78 
79 	return simple_read_from_buffer(buf, count, ppos, d->buf, d->pos);
80 }
81 
82 static int dump_qp(int id, void *p, void *data)
83 {
84 	struct c4iw_qp *qp = p;
85 	struct c4iw_debugfs_data *qpd = data;
86 	int space;
87 	int cc;
88 
89 	if (id != qp->wq.sq.qid)
90 		return 0;
91 
92 	space = qpd->bufsize - qpd->pos - 1;
93 	if (space == 0)
94 		return 1;
95 
96 	if (qp->ep)
97 		cc = snprintf(qpd->buf + qpd->pos, space,
98 			     "qp sq id %u rq id %u state %u onchip %u "
99 			     "ep tid %u state %u %pI4:%u->%pI4:%u\n",
100 			     qp->wq.sq.qid, qp->wq.rq.qid, (int)qp->attr.state,
101 			     qp->wq.sq.flags & T4_SQ_ONCHIP,
102 			     qp->ep->hwtid, (int)qp->ep->com.state,
103 			     &qp->ep->com.local_addr.sin_addr.s_addr,
104 			     ntohs(qp->ep->com.local_addr.sin_port),
105 			     &qp->ep->com.remote_addr.sin_addr.s_addr,
106 			     ntohs(qp->ep->com.remote_addr.sin_port));
107 	else
108 		cc = snprintf(qpd->buf + qpd->pos, space,
109 			     "qp sq id %u rq id %u state %u onchip %u\n",
110 			      qp->wq.sq.qid, qp->wq.rq.qid,
111 			      (int)qp->attr.state,
112 			      qp->wq.sq.flags & T4_SQ_ONCHIP);
113 	if (cc < space)
114 		qpd->pos += cc;
115 	return 0;
116 }
117 
118 static int qp_release(struct inode *inode, struct file *file)
119 {
120 	struct c4iw_debugfs_data *qpd = file->private_data;
121 	if (!qpd) {
122 		printk(KERN_INFO "%s null qpd?\n", __func__);
123 		return 0;
124 	}
125 	vfree(qpd->buf);
126 	kfree(qpd);
127 	return 0;
128 }
129 
130 static int qp_open(struct inode *inode, struct file *file)
131 {
132 	struct c4iw_debugfs_data *qpd;
133 	int ret = 0;
134 	int count = 1;
135 
136 	qpd = kmalloc(sizeof *qpd, GFP_KERNEL);
137 	if (!qpd) {
138 		ret = -ENOMEM;
139 		goto out;
140 	}
141 	qpd->devp = inode->i_private;
142 	qpd->pos = 0;
143 
144 	spin_lock_irq(&qpd->devp->lock);
145 	idr_for_each(&qpd->devp->qpidr, count_idrs, &count);
146 	spin_unlock_irq(&qpd->devp->lock);
147 
148 	qpd->bufsize = count * 128;
149 	qpd->buf = vmalloc(qpd->bufsize);
150 	if (!qpd->buf) {
151 		ret = -ENOMEM;
152 		goto err1;
153 	}
154 
155 	spin_lock_irq(&qpd->devp->lock);
156 	idr_for_each(&qpd->devp->qpidr, dump_qp, qpd);
157 	spin_unlock_irq(&qpd->devp->lock);
158 
159 	qpd->buf[qpd->pos++] = 0;
160 	file->private_data = qpd;
161 	goto out;
162 err1:
163 	kfree(qpd);
164 out:
165 	return ret;
166 }
167 
168 static const struct file_operations qp_debugfs_fops = {
169 	.owner   = THIS_MODULE,
170 	.open    = qp_open,
171 	.release = qp_release,
172 	.read    = debugfs_read,
173 	.llseek  = default_llseek,
174 };
175 
176 static int dump_stag(int id, void *p, void *data)
177 {
178 	struct c4iw_debugfs_data *stagd = data;
179 	int space;
180 	int cc;
181 
182 	space = stagd->bufsize - stagd->pos - 1;
183 	if (space == 0)
184 		return 1;
185 
186 	cc = snprintf(stagd->buf + stagd->pos, space, "0x%x\n", id<<8);
187 	if (cc < space)
188 		stagd->pos += cc;
189 	return 0;
190 }
191 
192 static int stag_release(struct inode *inode, struct file *file)
193 {
194 	struct c4iw_debugfs_data *stagd = file->private_data;
195 	if (!stagd) {
196 		printk(KERN_INFO "%s null stagd?\n", __func__);
197 		return 0;
198 	}
199 	kfree(stagd->buf);
200 	kfree(stagd);
201 	return 0;
202 }
203 
204 static int stag_open(struct inode *inode, struct file *file)
205 {
206 	struct c4iw_debugfs_data *stagd;
207 	int ret = 0;
208 	int count = 1;
209 
210 	stagd = kmalloc(sizeof *stagd, GFP_KERNEL);
211 	if (!stagd) {
212 		ret = -ENOMEM;
213 		goto out;
214 	}
215 	stagd->devp = inode->i_private;
216 	stagd->pos = 0;
217 
218 	spin_lock_irq(&stagd->devp->lock);
219 	idr_for_each(&stagd->devp->mmidr, count_idrs, &count);
220 	spin_unlock_irq(&stagd->devp->lock);
221 
222 	stagd->bufsize = count * sizeof("0x12345678\n");
223 	stagd->buf = kmalloc(stagd->bufsize, GFP_KERNEL);
224 	if (!stagd->buf) {
225 		ret = -ENOMEM;
226 		goto err1;
227 	}
228 
229 	spin_lock_irq(&stagd->devp->lock);
230 	idr_for_each(&stagd->devp->mmidr, dump_stag, stagd);
231 	spin_unlock_irq(&stagd->devp->lock);
232 
233 	stagd->buf[stagd->pos++] = 0;
234 	file->private_data = stagd;
235 	goto out;
236 err1:
237 	kfree(stagd);
238 out:
239 	return ret;
240 }
241 
242 static const struct file_operations stag_debugfs_fops = {
243 	.owner   = THIS_MODULE,
244 	.open    = stag_open,
245 	.release = stag_release,
246 	.read    = debugfs_read,
247 	.llseek  = default_llseek,
248 };
249 
250 static char *db_state_str[] = {"NORMAL", "FLOW_CONTROL", "RECOVERY"};
251 
252 static int stats_show(struct seq_file *seq, void *v)
253 {
254 	struct c4iw_dev *dev = seq->private;
255 
256 	seq_printf(seq, "   Object: %10s %10s %10s %10s\n", "Total", "Current",
257 		   "Max", "Fail");
258 	seq_printf(seq, "     PDID: %10llu %10llu %10llu %10llu\n",
259 			dev->rdev.stats.pd.total, dev->rdev.stats.pd.cur,
260 			dev->rdev.stats.pd.max, dev->rdev.stats.pd.fail);
261 	seq_printf(seq, "      QID: %10llu %10llu %10llu %10llu\n",
262 			dev->rdev.stats.qid.total, dev->rdev.stats.qid.cur,
263 			dev->rdev.stats.qid.max, dev->rdev.stats.qid.fail);
264 	seq_printf(seq, "   TPTMEM: %10llu %10llu %10llu %10llu\n",
265 			dev->rdev.stats.stag.total, dev->rdev.stats.stag.cur,
266 			dev->rdev.stats.stag.max, dev->rdev.stats.stag.fail);
267 	seq_printf(seq, "   PBLMEM: %10llu %10llu %10llu %10llu\n",
268 			dev->rdev.stats.pbl.total, dev->rdev.stats.pbl.cur,
269 			dev->rdev.stats.pbl.max, dev->rdev.stats.pbl.fail);
270 	seq_printf(seq, "   RQTMEM: %10llu %10llu %10llu %10llu\n",
271 			dev->rdev.stats.rqt.total, dev->rdev.stats.rqt.cur,
272 			dev->rdev.stats.rqt.max, dev->rdev.stats.rqt.fail);
273 	seq_printf(seq, "  OCQPMEM: %10llu %10llu %10llu %10llu\n",
274 			dev->rdev.stats.ocqp.total, dev->rdev.stats.ocqp.cur,
275 			dev->rdev.stats.ocqp.max, dev->rdev.stats.ocqp.fail);
276 	seq_printf(seq, "  DB FULL: %10llu\n", dev->rdev.stats.db_full);
277 	seq_printf(seq, " DB EMPTY: %10llu\n", dev->rdev.stats.db_empty);
278 	seq_printf(seq, "  DB DROP: %10llu\n", dev->rdev.stats.db_drop);
279 	seq_printf(seq, " DB State: %s Transitions %llu\n",
280 		   db_state_str[dev->db_state],
281 		   dev->rdev.stats.db_state_transitions);
282 	seq_printf(seq, "TCAM_FULL: %10llu\n", dev->rdev.stats.tcam_full);
283 	seq_printf(seq, "ACT_OFLD_CONN_FAILS: %10llu\n",
284 		   dev->rdev.stats.act_ofld_conn_fails);
285 	seq_printf(seq, "PAS_OFLD_CONN_FAILS: %10llu\n",
286 		   dev->rdev.stats.pas_ofld_conn_fails);
287 	return 0;
288 }
289 
290 static int stats_open(struct inode *inode, struct file *file)
291 {
292 	return single_open(file, stats_show, inode->i_private);
293 }
294 
295 static ssize_t stats_clear(struct file *file, const char __user *buf,
296 		size_t count, loff_t *pos)
297 {
298 	struct c4iw_dev *dev = ((struct seq_file *)file->private_data)->private;
299 
300 	mutex_lock(&dev->rdev.stats.lock);
301 	dev->rdev.stats.pd.max = 0;
302 	dev->rdev.stats.pd.fail = 0;
303 	dev->rdev.stats.qid.max = 0;
304 	dev->rdev.stats.qid.fail = 0;
305 	dev->rdev.stats.stag.max = 0;
306 	dev->rdev.stats.stag.fail = 0;
307 	dev->rdev.stats.pbl.max = 0;
308 	dev->rdev.stats.pbl.fail = 0;
309 	dev->rdev.stats.rqt.max = 0;
310 	dev->rdev.stats.rqt.fail = 0;
311 	dev->rdev.stats.ocqp.max = 0;
312 	dev->rdev.stats.ocqp.fail = 0;
313 	dev->rdev.stats.db_full = 0;
314 	dev->rdev.stats.db_empty = 0;
315 	dev->rdev.stats.db_drop = 0;
316 	dev->rdev.stats.db_state_transitions = 0;
317 	dev->rdev.stats.tcam_full = 0;
318 	dev->rdev.stats.act_ofld_conn_fails = 0;
319 	dev->rdev.stats.pas_ofld_conn_fails = 0;
320 	mutex_unlock(&dev->rdev.stats.lock);
321 	return count;
322 }
323 
324 static const struct file_operations stats_debugfs_fops = {
325 	.owner   = THIS_MODULE,
326 	.open    = stats_open,
327 	.release = single_release,
328 	.read    = seq_read,
329 	.llseek  = seq_lseek,
330 	.write   = stats_clear,
331 };
332 
333 static int dump_ep(int id, void *p, void *data)
334 {
335 	struct c4iw_ep *ep = p;
336 	struct c4iw_debugfs_data *epd = data;
337 	int space;
338 	int cc;
339 
340 	space = epd->bufsize - epd->pos - 1;
341 	if (space == 0)
342 		return 1;
343 
344 	cc = snprintf(epd->buf + epd->pos, space,
345 			"ep %p cm_id %p qp %p state %d flags 0x%lx history 0x%lx "
346 			"hwtid %d atid %d %pI4:%d <-> %pI4:%d\n",
347 			ep, ep->com.cm_id, ep->com.qp, (int)ep->com.state,
348 			ep->com.flags, ep->com.history, ep->hwtid, ep->atid,
349 			&ep->com.local_addr.sin_addr.s_addr,
350 			ntohs(ep->com.local_addr.sin_port),
351 			&ep->com.remote_addr.sin_addr.s_addr,
352 			ntohs(ep->com.remote_addr.sin_port));
353 	if (cc < space)
354 		epd->pos += cc;
355 	return 0;
356 }
357 
358 static int dump_listen_ep(int id, void *p, void *data)
359 {
360 	struct c4iw_listen_ep *ep = p;
361 	struct c4iw_debugfs_data *epd = data;
362 	int space;
363 	int cc;
364 
365 	space = epd->bufsize - epd->pos - 1;
366 	if (space == 0)
367 		return 1;
368 
369 	cc = snprintf(epd->buf + epd->pos, space,
370 			"ep %p cm_id %p state %d flags 0x%lx stid %d backlog %d "
371 			"%pI4:%d\n", ep, ep->com.cm_id, (int)ep->com.state,
372 			ep->com.flags, ep->stid, ep->backlog,
373 			&ep->com.local_addr.sin_addr.s_addr,
374 			ntohs(ep->com.local_addr.sin_port));
375 	if (cc < space)
376 		epd->pos += cc;
377 	return 0;
378 }
379 
380 static int ep_release(struct inode *inode, struct file *file)
381 {
382 	struct c4iw_debugfs_data *epd = file->private_data;
383 	if (!epd) {
384 		pr_info("%s null qpd?\n", __func__);
385 		return 0;
386 	}
387 	vfree(epd->buf);
388 	kfree(epd);
389 	return 0;
390 }
391 
392 static int ep_open(struct inode *inode, struct file *file)
393 {
394 	struct c4iw_debugfs_data *epd;
395 	int ret = 0;
396 	int count = 1;
397 
398 	epd = kmalloc(sizeof(*epd), GFP_KERNEL);
399 	if (!epd) {
400 		ret = -ENOMEM;
401 		goto out;
402 	}
403 	epd->devp = inode->i_private;
404 	epd->pos = 0;
405 
406 	spin_lock_irq(&epd->devp->lock);
407 	idr_for_each(&epd->devp->hwtid_idr, count_idrs, &count);
408 	idr_for_each(&epd->devp->atid_idr, count_idrs, &count);
409 	idr_for_each(&epd->devp->stid_idr, count_idrs, &count);
410 	spin_unlock_irq(&epd->devp->lock);
411 
412 	epd->bufsize = count * 160;
413 	epd->buf = vmalloc(epd->bufsize);
414 	if (!epd->buf) {
415 		ret = -ENOMEM;
416 		goto err1;
417 	}
418 
419 	spin_lock_irq(&epd->devp->lock);
420 	idr_for_each(&epd->devp->hwtid_idr, dump_ep, epd);
421 	idr_for_each(&epd->devp->atid_idr, dump_ep, epd);
422 	idr_for_each(&epd->devp->stid_idr, dump_listen_ep, epd);
423 	spin_unlock_irq(&epd->devp->lock);
424 
425 	file->private_data = epd;
426 	goto out;
427 err1:
428 	kfree(epd);
429 out:
430 	return ret;
431 }
432 
433 static const struct file_operations ep_debugfs_fops = {
434 	.owner   = THIS_MODULE,
435 	.open    = ep_open,
436 	.release = ep_release,
437 	.read    = debugfs_read,
438 };
439 
440 static int setup_debugfs(struct c4iw_dev *devp)
441 {
442 	struct dentry *de;
443 
444 	if (!devp->debugfs_root)
445 		return -1;
446 
447 	de = debugfs_create_file("qps", S_IWUSR, devp->debugfs_root,
448 				 (void *)devp, &qp_debugfs_fops);
449 	if (de && de->d_inode)
450 		de->d_inode->i_size = 4096;
451 
452 	de = debugfs_create_file("stags", S_IWUSR, devp->debugfs_root,
453 				 (void *)devp, &stag_debugfs_fops);
454 	if (de && de->d_inode)
455 		de->d_inode->i_size = 4096;
456 
457 	de = debugfs_create_file("stats", S_IWUSR, devp->debugfs_root,
458 			(void *)devp, &stats_debugfs_fops);
459 	if (de && de->d_inode)
460 		de->d_inode->i_size = 4096;
461 
462 	de = debugfs_create_file("eps", S_IWUSR, devp->debugfs_root,
463 			(void *)devp, &ep_debugfs_fops);
464 	if (de && de->d_inode)
465 		de->d_inode->i_size = 4096;
466 
467 	return 0;
468 }
469 
470 void c4iw_release_dev_ucontext(struct c4iw_rdev *rdev,
471 			       struct c4iw_dev_ucontext *uctx)
472 {
473 	struct list_head *pos, *nxt;
474 	struct c4iw_qid_list *entry;
475 
476 	mutex_lock(&uctx->lock);
477 	list_for_each_safe(pos, nxt, &uctx->qpids) {
478 		entry = list_entry(pos, struct c4iw_qid_list, entry);
479 		list_del_init(&entry->entry);
480 		if (!(entry->qid & rdev->qpmask)) {
481 			c4iw_put_resource(&rdev->resource.qid_table,
482 					  entry->qid);
483 			mutex_lock(&rdev->stats.lock);
484 			rdev->stats.qid.cur -= rdev->qpmask + 1;
485 			mutex_unlock(&rdev->stats.lock);
486 		}
487 		kfree(entry);
488 	}
489 
490 	list_for_each_safe(pos, nxt, &uctx->qpids) {
491 		entry = list_entry(pos, struct c4iw_qid_list, entry);
492 		list_del_init(&entry->entry);
493 		kfree(entry);
494 	}
495 	mutex_unlock(&uctx->lock);
496 }
497 
498 void c4iw_init_dev_ucontext(struct c4iw_rdev *rdev,
499 			    struct c4iw_dev_ucontext *uctx)
500 {
501 	INIT_LIST_HEAD(&uctx->qpids);
502 	INIT_LIST_HEAD(&uctx->cqids);
503 	mutex_init(&uctx->lock);
504 }
505 
506 /* Caller takes care of locking if needed */
507 static int c4iw_rdev_open(struct c4iw_rdev *rdev)
508 {
509 	int err;
510 
511 	c4iw_init_dev_ucontext(rdev, &rdev->uctx);
512 
513 	/*
514 	 * qpshift is the number of bits to shift the qpid left in order
515 	 * to get the correct address of the doorbell for that qp.
516 	 */
517 	rdev->qpshift = PAGE_SHIFT - ilog2(rdev->lldi.udb_density);
518 	rdev->qpmask = rdev->lldi.udb_density - 1;
519 	rdev->cqshift = PAGE_SHIFT - ilog2(rdev->lldi.ucq_density);
520 	rdev->cqmask = rdev->lldi.ucq_density - 1;
521 	PDBG("%s dev %s stag start 0x%0x size 0x%0x num stags %d "
522 	     "pbl start 0x%0x size 0x%0x rq start 0x%0x size 0x%0x "
523 	     "qp qid start %u size %u cq qid start %u size %u\n",
524 	     __func__, pci_name(rdev->lldi.pdev), rdev->lldi.vr->stag.start,
525 	     rdev->lldi.vr->stag.size, c4iw_num_stags(rdev),
526 	     rdev->lldi.vr->pbl.start,
527 	     rdev->lldi.vr->pbl.size, rdev->lldi.vr->rq.start,
528 	     rdev->lldi.vr->rq.size,
529 	     rdev->lldi.vr->qp.start,
530 	     rdev->lldi.vr->qp.size,
531 	     rdev->lldi.vr->cq.start,
532 	     rdev->lldi.vr->cq.size);
533 	PDBG("udb len 0x%x udb base %p db_reg %p gts_reg %p qpshift %lu "
534 	     "qpmask 0x%x cqshift %lu cqmask 0x%x\n",
535 	     (unsigned)pci_resource_len(rdev->lldi.pdev, 2),
536 	     (void *)pci_resource_start(rdev->lldi.pdev, 2),
537 	     rdev->lldi.db_reg,
538 	     rdev->lldi.gts_reg,
539 	     rdev->qpshift, rdev->qpmask,
540 	     rdev->cqshift, rdev->cqmask);
541 
542 	if (c4iw_num_stags(rdev) == 0) {
543 		err = -EINVAL;
544 		goto err1;
545 	}
546 
547 	rdev->stats.pd.total = T4_MAX_NUM_PD;
548 	rdev->stats.stag.total = rdev->lldi.vr->stag.size;
549 	rdev->stats.pbl.total = rdev->lldi.vr->pbl.size;
550 	rdev->stats.rqt.total = rdev->lldi.vr->rq.size;
551 	rdev->stats.ocqp.total = rdev->lldi.vr->ocq.size;
552 	rdev->stats.qid.total = rdev->lldi.vr->qp.size;
553 
554 	err = c4iw_init_resource(rdev, c4iw_num_stags(rdev), T4_MAX_NUM_PD);
555 	if (err) {
556 		printk(KERN_ERR MOD "error %d initializing resources\n", err);
557 		goto err1;
558 	}
559 	err = c4iw_pblpool_create(rdev);
560 	if (err) {
561 		printk(KERN_ERR MOD "error %d initializing pbl pool\n", err);
562 		goto err2;
563 	}
564 	err = c4iw_rqtpool_create(rdev);
565 	if (err) {
566 		printk(KERN_ERR MOD "error %d initializing rqt pool\n", err);
567 		goto err3;
568 	}
569 	err = c4iw_ocqp_pool_create(rdev);
570 	if (err) {
571 		printk(KERN_ERR MOD "error %d initializing ocqp pool\n", err);
572 		goto err4;
573 	}
574 	return 0;
575 err4:
576 	c4iw_rqtpool_destroy(rdev);
577 err3:
578 	c4iw_pblpool_destroy(rdev);
579 err2:
580 	c4iw_destroy_resource(&rdev->resource);
581 err1:
582 	return err;
583 }
584 
585 static void c4iw_rdev_close(struct c4iw_rdev *rdev)
586 {
587 	c4iw_pblpool_destroy(rdev);
588 	c4iw_rqtpool_destroy(rdev);
589 	c4iw_destroy_resource(&rdev->resource);
590 }
591 
592 static void c4iw_dealloc(struct uld_ctx *ctx)
593 {
594 	c4iw_rdev_close(&ctx->dev->rdev);
595 	idr_destroy(&ctx->dev->cqidr);
596 	idr_destroy(&ctx->dev->qpidr);
597 	idr_destroy(&ctx->dev->mmidr);
598 	idr_destroy(&ctx->dev->hwtid_idr);
599 	idr_destroy(&ctx->dev->stid_idr);
600 	idr_destroy(&ctx->dev->atid_idr);
601 	iounmap(ctx->dev->rdev.oc_mw_kva);
602 	ib_dealloc_device(&ctx->dev->ibdev);
603 	ctx->dev = NULL;
604 }
605 
606 static void c4iw_remove(struct uld_ctx *ctx)
607 {
608 	PDBG("%s c4iw_dev %p\n", __func__,  ctx->dev);
609 	c4iw_unregister_device(ctx->dev);
610 	c4iw_dealloc(ctx);
611 }
612 
613 static int rdma_supported(const struct cxgb4_lld_info *infop)
614 {
615 	return infop->vr->stag.size > 0 && infop->vr->pbl.size > 0 &&
616 	       infop->vr->rq.size > 0 && infop->vr->qp.size > 0 &&
617 	       infop->vr->cq.size > 0 && infop->vr->ocq.size > 0;
618 }
619 
620 static struct c4iw_dev *c4iw_alloc(const struct cxgb4_lld_info *infop)
621 {
622 	struct c4iw_dev *devp;
623 	int ret;
624 
625 	if (!rdma_supported(infop)) {
626 		printk(KERN_INFO MOD "%s: RDMA not supported on this device.\n",
627 		       pci_name(infop->pdev));
628 		return ERR_PTR(-ENOSYS);
629 	}
630 	devp = (struct c4iw_dev *)ib_alloc_device(sizeof(*devp));
631 	if (!devp) {
632 		printk(KERN_ERR MOD "Cannot allocate ib device\n");
633 		return ERR_PTR(-ENOMEM);
634 	}
635 	devp->rdev.lldi = *infop;
636 
637 	devp->rdev.oc_mw_pa = pci_resource_start(devp->rdev.lldi.pdev, 2) +
638 		(pci_resource_len(devp->rdev.lldi.pdev, 2) -
639 		 roundup_pow_of_two(devp->rdev.lldi.vr->ocq.size));
640 	devp->rdev.oc_mw_kva = ioremap_wc(devp->rdev.oc_mw_pa,
641 					       devp->rdev.lldi.vr->ocq.size);
642 
643 	PDBG(KERN_INFO MOD "ocq memory: "
644 	       "hw_start 0x%x size %u mw_pa 0x%lx mw_kva %p\n",
645 	       devp->rdev.lldi.vr->ocq.start, devp->rdev.lldi.vr->ocq.size,
646 	       devp->rdev.oc_mw_pa, devp->rdev.oc_mw_kva);
647 
648 	ret = c4iw_rdev_open(&devp->rdev);
649 	if (ret) {
650 		printk(KERN_ERR MOD "Unable to open CXIO rdev err %d\n", ret);
651 		ib_dealloc_device(&devp->ibdev);
652 		return ERR_PTR(ret);
653 	}
654 
655 	idr_init(&devp->cqidr);
656 	idr_init(&devp->qpidr);
657 	idr_init(&devp->mmidr);
658 	idr_init(&devp->hwtid_idr);
659 	idr_init(&devp->stid_idr);
660 	idr_init(&devp->atid_idr);
661 	spin_lock_init(&devp->lock);
662 	mutex_init(&devp->rdev.stats.lock);
663 	mutex_init(&devp->db_mutex);
664 
665 	if (c4iw_debugfs_root) {
666 		devp->debugfs_root = debugfs_create_dir(
667 					pci_name(devp->rdev.lldi.pdev),
668 					c4iw_debugfs_root);
669 		setup_debugfs(devp);
670 	}
671 	return devp;
672 }
673 
674 static void *c4iw_uld_add(const struct cxgb4_lld_info *infop)
675 {
676 	struct uld_ctx *ctx;
677 	static int vers_printed;
678 	int i;
679 
680 	if (!vers_printed++)
681 		printk(KERN_INFO MOD "Chelsio T4 RDMA Driver - version %s\n",
682 		       DRV_VERSION);
683 
684 	ctx = kzalloc(sizeof *ctx, GFP_KERNEL);
685 	if (!ctx) {
686 		ctx = ERR_PTR(-ENOMEM);
687 		goto out;
688 	}
689 	ctx->lldi = *infop;
690 
691 	PDBG("%s found device %s nchan %u nrxq %u ntxq %u nports %u\n",
692 	     __func__, pci_name(ctx->lldi.pdev),
693 	     ctx->lldi.nchan, ctx->lldi.nrxq,
694 	     ctx->lldi.ntxq, ctx->lldi.nports);
695 
696 	mutex_lock(&dev_mutex);
697 	list_add_tail(&ctx->entry, &uld_ctx_list);
698 	mutex_unlock(&dev_mutex);
699 
700 	for (i = 0; i < ctx->lldi.nrxq; i++)
701 		PDBG("rxqid[%u] %u\n", i, ctx->lldi.rxq_ids[i]);
702 out:
703 	return ctx;
704 }
705 
706 static inline struct sk_buff *copy_gl_to_skb_pkt(const struct pkt_gl *gl,
707 						 const __be64 *rsp,
708 						 u32 pktshift)
709 {
710 	struct sk_buff *skb;
711 
712 	/*
713 	 * Allocate space for cpl_pass_accept_req which will be synthesized by
714 	 * driver. Once the driver synthesizes the request the skb will go
715 	 * through the regular cpl_pass_accept_req processing.
716 	 * The math here assumes sizeof cpl_pass_accept_req >= sizeof
717 	 * cpl_rx_pkt.
718 	 */
719 	skb = alloc_skb(gl->tot_len + sizeof(struct cpl_pass_accept_req) +
720 			sizeof(struct rss_header) - pktshift, GFP_ATOMIC);
721 	if (unlikely(!skb))
722 		return NULL;
723 
724 	 __skb_put(skb, gl->tot_len + sizeof(struct cpl_pass_accept_req) +
725 		   sizeof(struct rss_header) - pktshift);
726 
727 	/*
728 	 * This skb will contain:
729 	 *   rss_header from the rspq descriptor (1 flit)
730 	 *   cpl_rx_pkt struct from the rspq descriptor (2 flits)
731 	 *   space for the difference between the size of an
732 	 *      rx_pkt and pass_accept_req cpl (1 flit)
733 	 *   the packet data from the gl
734 	 */
735 	skb_copy_to_linear_data(skb, rsp, sizeof(struct cpl_pass_accept_req) +
736 				sizeof(struct rss_header));
737 	skb_copy_to_linear_data_offset(skb, sizeof(struct rss_header) +
738 				       sizeof(struct cpl_pass_accept_req),
739 				       gl->va + pktshift,
740 				       gl->tot_len - pktshift);
741 	return skb;
742 }
743 
744 static inline int recv_rx_pkt(struct c4iw_dev *dev, const struct pkt_gl *gl,
745 			   const __be64 *rsp)
746 {
747 	unsigned int opcode = *(u8 *)rsp;
748 	struct sk_buff *skb;
749 
750 	if (opcode != CPL_RX_PKT)
751 		goto out;
752 
753 	skb = copy_gl_to_skb_pkt(gl , rsp, dev->rdev.lldi.sge_pktshift);
754 	if (skb == NULL)
755 		goto out;
756 
757 	if (c4iw_handlers[opcode] == NULL) {
758 		pr_info("%s no handler opcode 0x%x...\n", __func__,
759 		       opcode);
760 		kfree_skb(skb);
761 		goto out;
762 	}
763 	c4iw_handlers[opcode](dev, skb);
764 	return 1;
765 out:
766 	return 0;
767 }
768 
769 static int c4iw_uld_rx_handler(void *handle, const __be64 *rsp,
770 			const struct pkt_gl *gl)
771 {
772 	struct uld_ctx *ctx = handle;
773 	struct c4iw_dev *dev = ctx->dev;
774 	struct sk_buff *skb;
775 	u8 opcode;
776 
777 	if (gl == NULL) {
778 		/* omit RSS and rsp_ctrl at end of descriptor */
779 		unsigned int len = 64 - sizeof(struct rsp_ctrl) - 8;
780 
781 		skb = alloc_skb(256, GFP_ATOMIC);
782 		if (!skb)
783 			goto nomem;
784 		__skb_put(skb, len);
785 		skb_copy_to_linear_data(skb, &rsp[1], len);
786 	} else if (gl == CXGB4_MSG_AN) {
787 		const struct rsp_ctrl *rc = (void *)rsp;
788 
789 		u32 qid = be32_to_cpu(rc->pldbuflen_qid);
790 		c4iw_ev_handler(dev, qid);
791 		return 0;
792 	} else if (unlikely(*(u8 *)rsp != *(u8 *)gl->va)) {
793 		if (recv_rx_pkt(dev, gl, rsp))
794 			return 0;
795 
796 		pr_info("%s: unexpected FL contents at %p, " \
797 		       "RSS %#llx, FL %#llx, len %u\n",
798 		       pci_name(ctx->lldi.pdev), gl->va,
799 		       (unsigned long long)be64_to_cpu(*rsp),
800 		       (unsigned long long)be64_to_cpu(*(u64 *)gl->va),
801 		       gl->tot_len);
802 
803 		return 0;
804 	} else {
805 		skb = cxgb4_pktgl_to_skb(gl, 128, 128);
806 		if (unlikely(!skb))
807 			goto nomem;
808 	}
809 
810 	opcode = *(u8 *)rsp;
811 	if (c4iw_handlers[opcode])
812 		c4iw_handlers[opcode](dev, skb);
813 	else
814 		pr_info("%s no handler opcode 0x%x...\n", __func__,
815 		       opcode);
816 
817 	return 0;
818 nomem:
819 	return -1;
820 }
821 
822 static int c4iw_uld_state_change(void *handle, enum cxgb4_state new_state)
823 {
824 	struct uld_ctx *ctx = handle;
825 
826 	PDBG("%s new_state %u\n", __func__, new_state);
827 	switch (new_state) {
828 	case CXGB4_STATE_UP:
829 		printk(KERN_INFO MOD "%s: Up\n", pci_name(ctx->lldi.pdev));
830 		if (!ctx->dev) {
831 			int ret;
832 
833 			ctx->dev = c4iw_alloc(&ctx->lldi);
834 			if (IS_ERR(ctx->dev)) {
835 				printk(KERN_ERR MOD
836 				       "%s: initialization failed: %ld\n",
837 				       pci_name(ctx->lldi.pdev),
838 				       PTR_ERR(ctx->dev));
839 				ctx->dev = NULL;
840 				break;
841 			}
842 			ret = c4iw_register_device(ctx->dev);
843 			if (ret) {
844 				printk(KERN_ERR MOD
845 				       "%s: RDMA registration failed: %d\n",
846 				       pci_name(ctx->lldi.pdev), ret);
847 				c4iw_dealloc(ctx);
848 			}
849 		}
850 		break;
851 	case CXGB4_STATE_DOWN:
852 		printk(KERN_INFO MOD "%s: Down\n",
853 		       pci_name(ctx->lldi.pdev));
854 		if (ctx->dev)
855 			c4iw_remove(ctx);
856 		break;
857 	case CXGB4_STATE_START_RECOVERY:
858 		printk(KERN_INFO MOD "%s: Fatal Error\n",
859 		       pci_name(ctx->lldi.pdev));
860 		if (ctx->dev) {
861 			struct ib_event event;
862 
863 			ctx->dev->rdev.flags |= T4_FATAL_ERROR;
864 			memset(&event, 0, sizeof event);
865 			event.event  = IB_EVENT_DEVICE_FATAL;
866 			event.device = &ctx->dev->ibdev;
867 			ib_dispatch_event(&event);
868 			c4iw_remove(ctx);
869 		}
870 		break;
871 	case CXGB4_STATE_DETACH:
872 		printk(KERN_INFO MOD "%s: Detach\n",
873 		       pci_name(ctx->lldi.pdev));
874 		if (ctx->dev)
875 			c4iw_remove(ctx);
876 		break;
877 	}
878 	return 0;
879 }
880 
881 static int disable_qp_db(int id, void *p, void *data)
882 {
883 	struct c4iw_qp *qp = p;
884 
885 	t4_disable_wq_db(&qp->wq);
886 	return 0;
887 }
888 
889 static void stop_queues(struct uld_ctx *ctx)
890 {
891 	spin_lock_irq(&ctx->dev->lock);
892 	if (ctx->dev->db_state == NORMAL) {
893 		ctx->dev->rdev.stats.db_state_transitions++;
894 		ctx->dev->db_state = FLOW_CONTROL;
895 		idr_for_each(&ctx->dev->qpidr, disable_qp_db, NULL);
896 	}
897 	spin_unlock_irq(&ctx->dev->lock);
898 }
899 
900 static int enable_qp_db(int id, void *p, void *data)
901 {
902 	struct c4iw_qp *qp = p;
903 
904 	t4_enable_wq_db(&qp->wq);
905 	return 0;
906 }
907 
908 static void resume_queues(struct uld_ctx *ctx)
909 {
910 	spin_lock_irq(&ctx->dev->lock);
911 	if (ctx->dev->qpcnt <= db_fc_threshold &&
912 	    ctx->dev->db_state == FLOW_CONTROL) {
913 		ctx->dev->db_state = NORMAL;
914 		ctx->dev->rdev.stats.db_state_transitions++;
915 		idr_for_each(&ctx->dev->qpidr, enable_qp_db, NULL);
916 	}
917 	spin_unlock_irq(&ctx->dev->lock);
918 }
919 
920 struct qp_list {
921 	unsigned idx;
922 	struct c4iw_qp **qps;
923 };
924 
925 static int add_and_ref_qp(int id, void *p, void *data)
926 {
927 	struct qp_list *qp_listp = data;
928 	struct c4iw_qp *qp = p;
929 
930 	c4iw_qp_add_ref(&qp->ibqp);
931 	qp_listp->qps[qp_listp->idx++] = qp;
932 	return 0;
933 }
934 
935 static int count_qps(int id, void *p, void *data)
936 {
937 	unsigned *countp = data;
938 	(*countp)++;
939 	return 0;
940 }
941 
942 static void deref_qps(struct qp_list qp_list)
943 {
944 	int idx;
945 
946 	for (idx = 0; idx < qp_list.idx; idx++)
947 		c4iw_qp_rem_ref(&qp_list.qps[idx]->ibqp);
948 }
949 
950 static void recover_lost_dbs(struct uld_ctx *ctx, struct qp_list *qp_list)
951 {
952 	int idx;
953 	int ret;
954 
955 	for (idx = 0; idx < qp_list->idx; idx++) {
956 		struct c4iw_qp *qp = qp_list->qps[idx];
957 
958 		ret = cxgb4_sync_txq_pidx(qp->rhp->rdev.lldi.ports[0],
959 					  qp->wq.sq.qid,
960 					  t4_sq_host_wq_pidx(&qp->wq),
961 					  t4_sq_wq_size(&qp->wq));
962 		if (ret) {
963 			printk(KERN_ERR MOD "%s: Fatal error - "
964 			       "DB overflow recovery failed - "
965 			       "error syncing SQ qid %u\n",
966 			       pci_name(ctx->lldi.pdev), qp->wq.sq.qid);
967 			return;
968 		}
969 
970 		ret = cxgb4_sync_txq_pidx(qp->rhp->rdev.lldi.ports[0],
971 					  qp->wq.rq.qid,
972 					  t4_rq_host_wq_pidx(&qp->wq),
973 					  t4_rq_wq_size(&qp->wq));
974 
975 		if (ret) {
976 			printk(KERN_ERR MOD "%s: Fatal error - "
977 			       "DB overflow recovery failed - "
978 			       "error syncing RQ qid %u\n",
979 			       pci_name(ctx->lldi.pdev), qp->wq.rq.qid);
980 			return;
981 		}
982 
983 		/* Wait for the dbfifo to drain */
984 		while (cxgb4_dbfifo_count(qp->rhp->rdev.lldi.ports[0], 1) > 0) {
985 			set_current_state(TASK_UNINTERRUPTIBLE);
986 			schedule_timeout(usecs_to_jiffies(10));
987 		}
988 	}
989 }
990 
991 static void recover_queues(struct uld_ctx *ctx)
992 {
993 	int count = 0;
994 	struct qp_list qp_list;
995 	int ret;
996 
997 	/* lock out kernel db ringers */
998 	mutex_lock(&ctx->dev->db_mutex);
999 
1000 	/* put all queues in to recovery mode */
1001 	spin_lock_irq(&ctx->dev->lock);
1002 	ctx->dev->db_state = RECOVERY;
1003 	ctx->dev->rdev.stats.db_state_transitions++;
1004 	idr_for_each(&ctx->dev->qpidr, disable_qp_db, NULL);
1005 	spin_unlock_irq(&ctx->dev->lock);
1006 
1007 	/* slow everybody down */
1008 	set_current_state(TASK_UNINTERRUPTIBLE);
1009 	schedule_timeout(usecs_to_jiffies(1000));
1010 
1011 	/* Wait for the dbfifo to completely drain. */
1012 	while (cxgb4_dbfifo_count(ctx->dev->rdev.lldi.ports[0], 1) > 0) {
1013 		set_current_state(TASK_UNINTERRUPTIBLE);
1014 		schedule_timeout(usecs_to_jiffies(10));
1015 	}
1016 
1017 	/* flush the SGE contexts */
1018 	ret = cxgb4_flush_eq_cache(ctx->dev->rdev.lldi.ports[0]);
1019 	if (ret) {
1020 		printk(KERN_ERR MOD "%s: Fatal error - DB overflow recovery failed\n",
1021 		       pci_name(ctx->lldi.pdev));
1022 		goto out;
1023 	}
1024 
1025 	/* Count active queues so we can build a list of queues to recover */
1026 	spin_lock_irq(&ctx->dev->lock);
1027 	idr_for_each(&ctx->dev->qpidr, count_qps, &count);
1028 
1029 	qp_list.qps = kzalloc(count * sizeof *qp_list.qps, GFP_ATOMIC);
1030 	if (!qp_list.qps) {
1031 		printk(KERN_ERR MOD "%s: Fatal error - DB overflow recovery failed\n",
1032 		       pci_name(ctx->lldi.pdev));
1033 		spin_unlock_irq(&ctx->dev->lock);
1034 		goto out;
1035 	}
1036 	qp_list.idx = 0;
1037 
1038 	/* add and ref each qp so it doesn't get freed */
1039 	idr_for_each(&ctx->dev->qpidr, add_and_ref_qp, &qp_list);
1040 
1041 	spin_unlock_irq(&ctx->dev->lock);
1042 
1043 	/* now traverse the list in a safe context to recover the db state*/
1044 	recover_lost_dbs(ctx, &qp_list);
1045 
1046 	/* we're almost done!  deref the qps and clean up */
1047 	deref_qps(qp_list);
1048 	kfree(qp_list.qps);
1049 
1050 	/* Wait for the dbfifo to completely drain again */
1051 	while (cxgb4_dbfifo_count(ctx->dev->rdev.lldi.ports[0], 1) > 0) {
1052 		set_current_state(TASK_UNINTERRUPTIBLE);
1053 		schedule_timeout(usecs_to_jiffies(10));
1054 	}
1055 
1056 	/* resume the queues */
1057 	spin_lock_irq(&ctx->dev->lock);
1058 	if (ctx->dev->qpcnt > db_fc_threshold)
1059 		ctx->dev->db_state = FLOW_CONTROL;
1060 	else {
1061 		ctx->dev->db_state = NORMAL;
1062 		idr_for_each(&ctx->dev->qpidr, enable_qp_db, NULL);
1063 	}
1064 	ctx->dev->rdev.stats.db_state_transitions++;
1065 	spin_unlock_irq(&ctx->dev->lock);
1066 
1067 out:
1068 	/* start up kernel db ringers again */
1069 	mutex_unlock(&ctx->dev->db_mutex);
1070 }
1071 
1072 static int c4iw_uld_control(void *handle, enum cxgb4_control control, ...)
1073 {
1074 	struct uld_ctx *ctx = handle;
1075 
1076 	switch (control) {
1077 	case CXGB4_CONTROL_DB_FULL:
1078 		stop_queues(ctx);
1079 		mutex_lock(&ctx->dev->rdev.stats.lock);
1080 		ctx->dev->rdev.stats.db_full++;
1081 		mutex_unlock(&ctx->dev->rdev.stats.lock);
1082 		break;
1083 	case CXGB4_CONTROL_DB_EMPTY:
1084 		resume_queues(ctx);
1085 		mutex_lock(&ctx->dev->rdev.stats.lock);
1086 		ctx->dev->rdev.stats.db_empty++;
1087 		mutex_unlock(&ctx->dev->rdev.stats.lock);
1088 		break;
1089 	case CXGB4_CONTROL_DB_DROP:
1090 		recover_queues(ctx);
1091 		mutex_lock(&ctx->dev->rdev.stats.lock);
1092 		ctx->dev->rdev.stats.db_drop++;
1093 		mutex_unlock(&ctx->dev->rdev.stats.lock);
1094 		break;
1095 	default:
1096 		printk(KERN_WARNING MOD "%s: unknown control cmd %u\n",
1097 		       pci_name(ctx->lldi.pdev), control);
1098 		break;
1099 	}
1100 	return 0;
1101 }
1102 
1103 static struct cxgb4_uld_info c4iw_uld_info = {
1104 	.name = DRV_NAME,
1105 	.add = c4iw_uld_add,
1106 	.rx_handler = c4iw_uld_rx_handler,
1107 	.state_change = c4iw_uld_state_change,
1108 	.control = c4iw_uld_control,
1109 };
1110 
1111 static int __init c4iw_init_module(void)
1112 {
1113 	int err;
1114 
1115 	err = c4iw_cm_init();
1116 	if (err)
1117 		return err;
1118 
1119 	c4iw_debugfs_root = debugfs_create_dir(DRV_NAME, NULL);
1120 	if (!c4iw_debugfs_root)
1121 		printk(KERN_WARNING MOD
1122 		       "could not create debugfs entry, continuing\n");
1123 
1124 	cxgb4_register_uld(CXGB4_ULD_RDMA, &c4iw_uld_info);
1125 
1126 	return 0;
1127 }
1128 
1129 static void __exit c4iw_exit_module(void)
1130 {
1131 	struct uld_ctx *ctx, *tmp;
1132 
1133 	mutex_lock(&dev_mutex);
1134 	list_for_each_entry_safe(ctx, tmp, &uld_ctx_list, entry) {
1135 		if (ctx->dev)
1136 			c4iw_remove(ctx);
1137 		kfree(ctx);
1138 	}
1139 	mutex_unlock(&dev_mutex);
1140 	cxgb4_unregister_uld(CXGB4_ULD_RDMA);
1141 	c4iw_cm_term();
1142 	debugfs_remove_recursive(c4iw_debugfs_root);
1143 }
1144 
1145 module_init(c4iw_init_module);
1146 module_exit(c4iw_exit_module);
1147