1/*
2 * HighPoint RR3xxx/4xxx controller driver for Linux
3 * Copyright (C) 2006-2012 HighPoint Technologies, Inc. All Rights Reserved.
4 *
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; version 2 of the License.
8 *
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12 * GNU General Public License for more details.
13 *
14 * Please report bugs/comments/suggestions to linux@highpoint-tech.com
15 *
16 * For more information, visit http://www.highpoint-tech.com
17 */
18#include <linux/module.h>
19#include <linux/types.h>
20#include <linux/string.h>
21#include <linux/kernel.h>
22#include <linux/pci.h>
23#include <linux/interrupt.h>
24#include <linux/errno.h>
25#include <linux/delay.h>
26#include <linux/timer.h>
27#include <linux/spinlock.h>
28#include <linux/gfp.h>
29#include <asm/uaccess.h>
30#include <asm/io.h>
31#include <asm/div64.h>
32#include <scsi/scsi_cmnd.h>
33#include <scsi/scsi_device.h>
34#include <scsi/scsi.h>
35#include <scsi/scsi_tcq.h>
36#include <scsi/scsi_host.h>
37
38#include "hptiop.h"
39
40MODULE_AUTHOR("HighPoint Technologies, Inc.");
41MODULE_DESCRIPTION("HighPoint RocketRAID 3xxx/4xxx Controller Driver");
42
43static char driver_name[] = "hptiop";
44static const char driver_name_long[] = "RocketRAID 3xxx/4xxx Controller driver";
45static const char driver_ver[] = "v1.8";
46
47static int iop_send_sync_msg(struct hptiop_hba *hba, u32 msg, u32 millisec);
48static void hptiop_finish_scsi_req(struct hptiop_hba *hba, u32 tag,
49				struct hpt_iop_request_scsi_command *req);
50static void hptiop_host_request_callback_itl(struct hptiop_hba *hba, u32 tag);
51static void hptiop_iop_request_callback_itl(struct hptiop_hba *hba, u32 tag);
52static void hptiop_message_callback(struct hptiop_hba *hba, u32 msg);
53
54static int iop_wait_ready_itl(struct hptiop_hba *hba, u32 millisec)
55{
56	u32 req = 0;
57	int i;
58
59	for (i = 0; i < millisec; i++) {
60		req = readl(&hba->u.itl.iop->inbound_queue);
61		if (req != IOPMU_QUEUE_EMPTY)
62			break;
63		msleep(1);
64	}
65
66	if (req != IOPMU_QUEUE_EMPTY) {
67		writel(req, &hba->u.itl.iop->outbound_queue);
68		readl(&hba->u.itl.iop->outbound_intstatus);
69		return 0;
70	}
71
72	return -1;
73}
74
75static int iop_wait_ready_mv(struct hptiop_hba *hba, u32 millisec)
76{
77	return iop_send_sync_msg(hba, IOPMU_INBOUND_MSG0_NOP, millisec);
78}
79
80static int iop_wait_ready_mvfrey(struct hptiop_hba *hba, u32 millisec)
81{
82	return iop_send_sync_msg(hba, IOPMU_INBOUND_MSG0_NOP, millisec);
83}
84
85static void hptiop_request_callback_itl(struct hptiop_hba *hba, u32 tag)
86{
87	if (tag & IOPMU_QUEUE_ADDR_HOST_BIT)
88		hptiop_host_request_callback_itl(hba,
89				tag & ~IOPMU_QUEUE_ADDR_HOST_BIT);
90	else
91		hptiop_iop_request_callback_itl(hba, tag);
92}
93
94static void hptiop_drain_outbound_queue_itl(struct hptiop_hba *hba)
95{
96	u32 req;
97
98	while ((req = readl(&hba->u.itl.iop->outbound_queue)) !=
99						IOPMU_QUEUE_EMPTY) {
100
101		if (req & IOPMU_QUEUE_MASK_HOST_BITS)
102			hptiop_request_callback_itl(hba, req);
103		else {
104			struct hpt_iop_request_header __iomem * p;
105
106			p = (struct hpt_iop_request_header __iomem *)
107				((char __iomem *)hba->u.itl.iop + req);
108
109			if (readl(&p->flags) & IOP_REQUEST_FLAG_SYNC_REQUEST) {
110				if (readl(&p->context))
111					hptiop_request_callback_itl(hba, req);
112				else
113					writel(1, &p->context);
114			}
115			else
116				hptiop_request_callback_itl(hba, req);
117		}
118	}
119}
120
121static int iop_intr_itl(struct hptiop_hba *hba)
122{
123	struct hpt_iopmu_itl __iomem *iop = hba->u.itl.iop;
124	void __iomem *plx = hba->u.itl.plx;
125	u32 status;
126	int ret = 0;
127
128	if (plx && readl(plx + 0x11C5C) & 0xf)
129		writel(1, plx + 0x11C60);
130
131	status = readl(&iop->outbound_intstatus);
132
133	if (status & IOPMU_OUTBOUND_INT_MSG0) {
134		u32 msg = readl(&iop->outbound_msgaddr0);
135
136		dprintk("received outbound msg %x\n", msg);
137		writel(IOPMU_OUTBOUND_INT_MSG0, &iop->outbound_intstatus);
138		hptiop_message_callback(hba, msg);
139		ret = 1;
140	}
141
142	if (status & IOPMU_OUTBOUND_INT_POSTQUEUE) {
143		hptiop_drain_outbound_queue_itl(hba);
144		ret = 1;
145	}
146
147	return ret;
148}
149
150static u64 mv_outbound_read(struct hpt_iopmu_mv __iomem *mu)
151{
152	u32 outbound_tail = readl(&mu->outbound_tail);
153	u32 outbound_head = readl(&mu->outbound_head);
154
155	if (outbound_tail != outbound_head) {
156		u64 p;
157
158		memcpy_fromio(&p, &mu->outbound_q[mu->outbound_tail], 8);
159		outbound_tail++;
160
161		if (outbound_tail == MVIOP_QUEUE_LEN)
162			outbound_tail = 0;
163		writel(outbound_tail, &mu->outbound_tail);
164		return p;
165	} else
166		return 0;
167}
168
169static void mv_inbound_write(u64 p, struct hptiop_hba *hba)
170{
171	u32 inbound_head = readl(&hba->u.mv.mu->inbound_head);
172	u32 head = inbound_head + 1;
173
174	if (head == MVIOP_QUEUE_LEN)
175		head = 0;
176
177	memcpy_toio(&hba->u.mv.mu->inbound_q[inbound_head], &p, 8);
178	writel(head, &hba->u.mv.mu->inbound_head);
179	writel(MVIOP_MU_INBOUND_INT_POSTQUEUE,
180			&hba->u.mv.regs->inbound_doorbell);
181}
182
183static void hptiop_request_callback_mv(struct hptiop_hba *hba, u64 tag)
184{
185	u32 req_type = (tag >> 5) & 0x7;
186	struct hpt_iop_request_scsi_command *req;
187
188	dprintk("hptiop_request_callback_mv: tag=%llx\n", tag);
189
190	BUG_ON((tag & MVIOP_MU_QUEUE_REQUEST_RETURN_CONTEXT) == 0);
191
192	switch (req_type) {
193	case IOP_REQUEST_TYPE_GET_CONFIG:
194	case IOP_REQUEST_TYPE_SET_CONFIG:
195		hba->msg_done = 1;
196		break;
197
198	case IOP_REQUEST_TYPE_SCSI_COMMAND:
199		req = hba->reqs[tag >> 8].req_virt;
200		if (likely(tag & MVIOP_MU_QUEUE_REQUEST_RESULT_BIT))
201			req->header.result = cpu_to_le32(IOP_RESULT_SUCCESS);
202
203		hptiop_finish_scsi_req(hba, tag>>8, req);
204		break;
205
206	default:
207		break;
208	}
209}
210
211static int iop_intr_mv(struct hptiop_hba *hba)
212{
213	u32 status;
214	int ret = 0;
215
216	status = readl(&hba->u.mv.regs->outbound_doorbell);
217	writel(~status, &hba->u.mv.regs->outbound_doorbell);
218
219	if (status & MVIOP_MU_OUTBOUND_INT_MSG) {
220		u32 msg;
221		msg = readl(&hba->u.mv.mu->outbound_msg);
222		dprintk("received outbound msg %x\n", msg);
223		hptiop_message_callback(hba, msg);
224		ret = 1;
225	}
226
227	if (status & MVIOP_MU_OUTBOUND_INT_POSTQUEUE) {
228		u64 tag;
229
230		while ((tag = mv_outbound_read(hba->u.mv.mu)))
231			hptiop_request_callback_mv(hba, tag);
232		ret = 1;
233	}
234
235	return ret;
236}
237
238static void hptiop_request_callback_mvfrey(struct hptiop_hba *hba, u32 _tag)
239{
240	u32 req_type = _tag & 0xf;
241	struct hpt_iop_request_scsi_command *req;
242
243	switch (req_type) {
244	case IOP_REQUEST_TYPE_GET_CONFIG:
245	case IOP_REQUEST_TYPE_SET_CONFIG:
246		hba->msg_done = 1;
247		break;
248
249	case IOP_REQUEST_TYPE_SCSI_COMMAND:
250		req = hba->reqs[(_tag >> 4) & 0xff].req_virt;
251		if (likely(_tag & IOPMU_QUEUE_REQUEST_RESULT_BIT))
252			req->header.result = IOP_RESULT_SUCCESS;
253		hptiop_finish_scsi_req(hba, (_tag >> 4) & 0xff, req);
254		break;
255
256	default:
257		break;
258	}
259}
260
261static int iop_intr_mvfrey(struct hptiop_hba *hba)
262{
263	u32 _tag, status, cptr, cur_rptr;
264	int ret = 0;
265
266	if (hba->initialized)
267		writel(0, &(hba->u.mvfrey.mu->pcie_f0_int_enable));
268
269	status = readl(&(hba->u.mvfrey.mu->f0_doorbell));
270	if (status) {
271		writel(status, &(hba->u.mvfrey.mu->f0_doorbell));
272		if (status & CPU_TO_F0_DRBL_MSG_BIT) {
273			u32 msg = readl(&(hba->u.mvfrey.mu->cpu_to_f0_msg_a));
274			dprintk("received outbound msg %x\n", msg);
275			hptiop_message_callback(hba, msg);
276		}
277		ret = 1;
278	}
279
280	status = readl(&(hba->u.mvfrey.mu->isr_cause));
281	if (status) {
282		writel(status, &(hba->u.mvfrey.mu->isr_cause));
283		do {
284			cptr = *hba->u.mvfrey.outlist_cptr & 0xff;
285			cur_rptr = hba->u.mvfrey.outlist_rptr;
286			while (cur_rptr != cptr) {
287				cur_rptr++;
288				if (cur_rptr ==	hba->u.mvfrey.list_count)
289					cur_rptr = 0;
290
291				_tag = hba->u.mvfrey.outlist[cur_rptr].val;
292				BUG_ON(!(_tag & IOPMU_QUEUE_MASK_HOST_BITS));
293				hptiop_request_callback_mvfrey(hba, _tag);
294				ret = 1;
295			}
296			hba->u.mvfrey.outlist_rptr = cur_rptr;
297		} while (cptr != (*hba->u.mvfrey.outlist_cptr & 0xff));
298	}
299
300	if (hba->initialized)
301		writel(0x1010, &(hba->u.mvfrey.mu->pcie_f0_int_enable));
302
303	return ret;
304}
305
306static int iop_send_sync_request_itl(struct hptiop_hba *hba,
307					void __iomem *_req, u32 millisec)
308{
309	struct hpt_iop_request_header __iomem *req = _req;
310	u32 i;
311
312	writel(readl(&req->flags) | IOP_REQUEST_FLAG_SYNC_REQUEST, &req->flags);
313	writel(0, &req->context);
314	writel((unsigned long)req - (unsigned long)hba->u.itl.iop,
315			&hba->u.itl.iop->inbound_queue);
316	readl(&hba->u.itl.iop->outbound_intstatus);
317
318	for (i = 0; i < millisec; i++) {
319		iop_intr_itl(hba);
320		if (readl(&req->context))
321			return 0;
322		msleep(1);
323	}
324
325	return -1;
326}
327
328static int iop_send_sync_request_mv(struct hptiop_hba *hba,
329					u32 size_bits, u32 millisec)
330{
331	struct hpt_iop_request_header *reqhdr = hba->u.mv.internal_req;
332	u32 i;
333
334	hba->msg_done = 0;
335	reqhdr->flags |= cpu_to_le32(IOP_REQUEST_FLAG_SYNC_REQUEST);
336	mv_inbound_write(hba->u.mv.internal_req_phy |
337			MVIOP_MU_QUEUE_ADDR_HOST_BIT | size_bits, hba);
338
339	for (i = 0; i < millisec; i++) {
340		iop_intr_mv(hba);
341		if (hba->msg_done)
342			return 0;
343		msleep(1);
344	}
345	return -1;
346}
347
348static int iop_send_sync_request_mvfrey(struct hptiop_hba *hba,
349					u32 size_bits, u32 millisec)
350{
351	struct hpt_iop_request_header *reqhdr =
352		hba->u.mvfrey.internal_req.req_virt;
353	u32 i;
354
355	hba->msg_done = 0;
356	reqhdr->flags |= cpu_to_le32(IOP_REQUEST_FLAG_SYNC_REQUEST);
357	hba->ops->post_req(hba, &(hba->u.mvfrey.internal_req));
358
359	for (i = 0; i < millisec; i++) {
360		iop_intr_mvfrey(hba);
361		if (hba->msg_done)
362			break;
363		msleep(1);
364	}
365	return hba->msg_done ? 0 : -1;
366}
367
368static void hptiop_post_msg_itl(struct hptiop_hba *hba, u32 msg)
369{
370	writel(msg, &hba->u.itl.iop->inbound_msgaddr0);
371	readl(&hba->u.itl.iop->outbound_intstatus);
372}
373
374static void hptiop_post_msg_mv(struct hptiop_hba *hba, u32 msg)
375{
376	writel(msg, &hba->u.mv.mu->inbound_msg);
377	writel(MVIOP_MU_INBOUND_INT_MSG, &hba->u.mv.regs->inbound_doorbell);
378	readl(&hba->u.mv.regs->inbound_doorbell);
379}
380
381static void hptiop_post_msg_mvfrey(struct hptiop_hba *hba, u32 msg)
382{
383	writel(msg, &(hba->u.mvfrey.mu->f0_to_cpu_msg_a));
384	readl(&(hba->u.mvfrey.mu->f0_to_cpu_msg_a));
385}
386
387static int iop_send_sync_msg(struct hptiop_hba *hba, u32 msg, u32 millisec)
388{
389	u32 i;
390
391	hba->msg_done = 0;
392	hba->ops->disable_intr(hba);
393	hba->ops->post_msg(hba, msg);
394
395	for (i = 0; i < millisec; i++) {
396		spin_lock_irq(hba->host->host_lock);
397		hba->ops->iop_intr(hba);
398		spin_unlock_irq(hba->host->host_lock);
399		if (hba->msg_done)
400			break;
401		msleep(1);
402	}
403
404	hba->ops->enable_intr(hba);
405	return hba->msg_done? 0 : -1;
406}
407
408static int iop_get_config_itl(struct hptiop_hba *hba,
409				struct hpt_iop_request_get_config *config)
410{
411	u32 req32;
412	struct hpt_iop_request_get_config __iomem *req;
413
414	req32 = readl(&hba->u.itl.iop->inbound_queue);
415	if (req32 == IOPMU_QUEUE_EMPTY)
416		return -1;
417
418	req = (struct hpt_iop_request_get_config __iomem *)
419			((unsigned long)hba->u.itl.iop + req32);
420
421	writel(0, &req->header.flags);
422	writel(IOP_REQUEST_TYPE_GET_CONFIG, &req->header.type);
423	writel(sizeof(struct hpt_iop_request_get_config), &req->header.size);
424	writel(IOP_RESULT_PENDING, &req->header.result);
425
426	if (iop_send_sync_request_itl(hba, req, 20000)) {
427		dprintk("Get config send cmd failed\n");
428		return -1;
429	}
430
431	memcpy_fromio(config, req, sizeof(*config));
432	writel(req32, &hba->u.itl.iop->outbound_queue);
433	return 0;
434}
435
436static int iop_get_config_mv(struct hptiop_hba *hba,
437				struct hpt_iop_request_get_config *config)
438{
439	struct hpt_iop_request_get_config *req = hba->u.mv.internal_req;
440
441	req->header.flags = cpu_to_le32(IOP_REQUEST_FLAG_OUTPUT_CONTEXT);
442	req->header.type = cpu_to_le32(IOP_REQUEST_TYPE_GET_CONFIG);
443	req->header.size =
444		cpu_to_le32(sizeof(struct hpt_iop_request_get_config));
445	req->header.result = cpu_to_le32(IOP_RESULT_PENDING);
446	req->header.context = cpu_to_le32(IOP_REQUEST_TYPE_GET_CONFIG<<5);
447	req->header.context_hi32 = 0;
448
449	if (iop_send_sync_request_mv(hba, 0, 20000)) {
450		dprintk("Get config send cmd failed\n");
451		return -1;
452	}
453
454	memcpy(config, req, sizeof(struct hpt_iop_request_get_config));
455	return 0;
456}
457
458static int iop_get_config_mvfrey(struct hptiop_hba *hba,
459				struct hpt_iop_request_get_config *config)
460{
461	struct hpt_iop_request_get_config *info = hba->u.mvfrey.config;
462
463	if (info->header.size != sizeof(struct hpt_iop_request_get_config) ||
464			info->header.type != IOP_REQUEST_TYPE_GET_CONFIG)
465		return -1;
466
467	config->interface_version = info->interface_version;
468	config->firmware_version = info->firmware_version;
469	config->max_requests = info->max_requests;
470	config->request_size = info->request_size;
471	config->max_sg_count = info->max_sg_count;
472	config->data_transfer_length = info->data_transfer_length;
473	config->alignment_mask = info->alignment_mask;
474	config->max_devices = info->max_devices;
475	config->sdram_size = info->sdram_size;
476
477	return 0;
478}
479
480static int iop_set_config_itl(struct hptiop_hba *hba,
481				struct hpt_iop_request_set_config *config)
482{
483	u32 req32;
484	struct hpt_iop_request_set_config __iomem *req;
485
486	req32 = readl(&hba->u.itl.iop->inbound_queue);
487	if (req32 == IOPMU_QUEUE_EMPTY)
488		return -1;
489
490	req = (struct hpt_iop_request_set_config __iomem *)
491			((unsigned long)hba->u.itl.iop + req32);
492
493	memcpy_toio((u8 __iomem *)req + sizeof(struct hpt_iop_request_header),
494		(u8 *)config + sizeof(struct hpt_iop_request_header),
495		sizeof(struct hpt_iop_request_set_config) -
496			sizeof(struct hpt_iop_request_header));
497
498	writel(0, &req->header.flags);
499	writel(IOP_REQUEST_TYPE_SET_CONFIG, &req->header.type);
500	writel(sizeof(struct hpt_iop_request_set_config), &req->header.size);
501	writel(IOP_RESULT_PENDING, &req->header.result);
502
503	if (iop_send_sync_request_itl(hba, req, 20000)) {
504		dprintk("Set config send cmd failed\n");
505		return -1;
506	}
507
508	writel(req32, &hba->u.itl.iop->outbound_queue);
509	return 0;
510}
511
512static int iop_set_config_mv(struct hptiop_hba *hba,
513				struct hpt_iop_request_set_config *config)
514{
515	struct hpt_iop_request_set_config *req = hba->u.mv.internal_req;
516
517	memcpy(req, config, sizeof(struct hpt_iop_request_set_config));
518	req->header.flags = cpu_to_le32(IOP_REQUEST_FLAG_OUTPUT_CONTEXT);
519	req->header.type = cpu_to_le32(IOP_REQUEST_TYPE_SET_CONFIG);
520	req->header.size =
521		cpu_to_le32(sizeof(struct hpt_iop_request_set_config));
522	req->header.result = cpu_to_le32(IOP_RESULT_PENDING);
523	req->header.context = cpu_to_le32(IOP_REQUEST_TYPE_SET_CONFIG<<5);
524	req->header.context_hi32 = 0;
525
526	if (iop_send_sync_request_mv(hba, 0, 20000)) {
527		dprintk("Set config send cmd failed\n");
528		return -1;
529	}
530
531	return 0;
532}
533
534static int iop_set_config_mvfrey(struct hptiop_hba *hba,
535				struct hpt_iop_request_set_config *config)
536{
537	struct hpt_iop_request_set_config *req =
538		hba->u.mvfrey.internal_req.req_virt;
539
540	memcpy(req, config, sizeof(struct hpt_iop_request_set_config));
541	req->header.flags = cpu_to_le32(IOP_REQUEST_FLAG_OUTPUT_CONTEXT);
542	req->header.type = cpu_to_le32(IOP_REQUEST_TYPE_SET_CONFIG);
543	req->header.size =
544		cpu_to_le32(sizeof(struct hpt_iop_request_set_config));
545	req->header.result = cpu_to_le32(IOP_RESULT_PENDING);
546	req->header.context = cpu_to_le32(IOP_REQUEST_TYPE_SET_CONFIG<<5);
547	req->header.context_hi32 = 0;
548
549	if (iop_send_sync_request_mvfrey(hba, 0, 20000)) {
550		dprintk("Set config send cmd failed\n");
551		return -1;
552	}
553
554	return 0;
555}
556
557static void hptiop_enable_intr_itl(struct hptiop_hba *hba)
558{
559	writel(~(IOPMU_OUTBOUND_INT_POSTQUEUE | IOPMU_OUTBOUND_INT_MSG0),
560		&hba->u.itl.iop->outbound_intmask);
561}
562
563static void hptiop_enable_intr_mv(struct hptiop_hba *hba)
564{
565	writel(MVIOP_MU_OUTBOUND_INT_POSTQUEUE | MVIOP_MU_OUTBOUND_INT_MSG,
566		&hba->u.mv.regs->outbound_intmask);
567}
568
569static void hptiop_enable_intr_mvfrey(struct hptiop_hba *hba)
570{
571	writel(CPU_TO_F0_DRBL_MSG_BIT, &(hba->u.mvfrey.mu->f0_doorbell_enable));
572	writel(0x1, &(hba->u.mvfrey.mu->isr_enable));
573	writel(0x1010, &(hba->u.mvfrey.mu->pcie_f0_int_enable));
574}
575
576static int hptiop_initialize_iop(struct hptiop_hba *hba)
577{
578	/* enable interrupts */
579	hba->ops->enable_intr(hba);
580
581	hba->initialized = 1;
582
583	/* start background tasks */
584	if (iop_send_sync_msg(hba,
585			IOPMU_INBOUND_MSG0_START_BACKGROUND_TASK, 5000)) {
586		printk(KERN_ERR "scsi%d: fail to start background task\n",
587			hba->host->host_no);
588		return -1;
589	}
590	return 0;
591}
592
593static void __iomem *hptiop_map_pci_bar(struct hptiop_hba *hba, int index)
594{
595	u32 mem_base_phy, length;
596	void __iomem *mem_base_virt;
597
598	struct pci_dev *pcidev = hba->pcidev;
599
600
601	if (!(pci_resource_flags(pcidev, index) & IORESOURCE_MEM)) {
602		printk(KERN_ERR "scsi%d: pci resource invalid\n",
603				hba->host->host_no);
604		return NULL;
605	}
606
607	mem_base_phy = pci_resource_start(pcidev, index);
608	length = pci_resource_len(pcidev, index);
609	mem_base_virt = ioremap(mem_base_phy, length);
610
611	if (!mem_base_virt) {
612		printk(KERN_ERR "scsi%d: Fail to ioremap memory space\n",
613				hba->host->host_no);
614		return NULL;
615	}
616	return mem_base_virt;
617}
618
619static int hptiop_map_pci_bar_itl(struct hptiop_hba *hba)
620{
621	struct pci_dev *pcidev = hba->pcidev;
622	hba->u.itl.iop = hptiop_map_pci_bar(hba, 0);
623	if (hba->u.itl.iop == NULL)
624		return -1;
625	if ((pcidev->device & 0xff00) == 0x4400) {
626		hba->u.itl.plx = hba->u.itl.iop;
627		hba->u.itl.iop = hptiop_map_pci_bar(hba, 2);
628		if (hba->u.itl.iop == NULL) {
629			iounmap(hba->u.itl.plx);
630			return -1;
631		}
632	}
633	return 0;
634}
635
636static void hptiop_unmap_pci_bar_itl(struct hptiop_hba *hba)
637{
638	if (hba->u.itl.plx)
639		iounmap(hba->u.itl.plx);
640	iounmap(hba->u.itl.iop);
641}
642
643static int hptiop_map_pci_bar_mv(struct hptiop_hba *hba)
644{
645	hba->u.mv.regs = hptiop_map_pci_bar(hba, 0);
646	if (hba->u.mv.regs == NULL)
647		return -1;
648
649	hba->u.mv.mu = hptiop_map_pci_bar(hba, 2);
650	if (hba->u.mv.mu == NULL) {
651		iounmap(hba->u.mv.regs);
652		return -1;
653	}
654
655	return 0;
656}
657
658static int hptiop_map_pci_bar_mvfrey(struct hptiop_hba *hba)
659{
660	hba->u.mvfrey.config = hptiop_map_pci_bar(hba, 0);
661	if (hba->u.mvfrey.config == NULL)
662		return -1;
663
664	hba->u.mvfrey.mu = hptiop_map_pci_bar(hba, 2);
665	if (hba->u.mvfrey.mu == NULL) {
666		iounmap(hba->u.mvfrey.config);
667		return -1;
668	}
669
670	return 0;
671}
672
673static void hptiop_unmap_pci_bar_mv(struct hptiop_hba *hba)
674{
675	iounmap(hba->u.mv.regs);
676	iounmap(hba->u.mv.mu);
677}
678
679static void hptiop_unmap_pci_bar_mvfrey(struct hptiop_hba *hba)
680{
681	iounmap(hba->u.mvfrey.config);
682	iounmap(hba->u.mvfrey.mu);
683}
684
685static void hptiop_message_callback(struct hptiop_hba *hba, u32 msg)
686{
687	dprintk("iop message 0x%x\n", msg);
688
689	if (msg == IOPMU_INBOUND_MSG0_NOP ||
690		msg == IOPMU_INBOUND_MSG0_RESET_COMM)
691		hba->msg_done = 1;
692
693	if (!hba->initialized)
694		return;
695
696	if (msg == IOPMU_INBOUND_MSG0_RESET) {
697		atomic_set(&hba->resetting, 0);
698		wake_up(&hba->reset_wq);
699	}
700	else if (msg <= IOPMU_INBOUND_MSG0_MAX)
701		hba->msg_done = 1;
702}
703
704static struct hptiop_request *get_req(struct hptiop_hba *hba)
705{
706	struct hptiop_request *ret;
707
708	dprintk("get_req : req=%p\n", hba->req_list);
709
710	ret = hba->req_list;
711	if (ret)
712		hba->req_list = ret->next;
713
714	return ret;
715}
716
717static void free_req(struct hptiop_hba *hba, struct hptiop_request *req)
718{
719	dprintk("free_req(%d, %p)\n", req->index, req);
720	req->next = hba->req_list;
721	hba->req_list = req;
722}
723
724static void hptiop_finish_scsi_req(struct hptiop_hba *hba, u32 tag,
725				struct hpt_iop_request_scsi_command *req)
726{
727	struct scsi_cmnd *scp;
728
729	dprintk("hptiop_finish_scsi_req: req=%p, type=%d, "
730			"result=%d, context=0x%x tag=%d\n",
731			req, req->header.type, req->header.result,
732			req->header.context, tag);
733
734	BUG_ON(!req->header.result);
735	BUG_ON(req->header.type != cpu_to_le32(IOP_REQUEST_TYPE_SCSI_COMMAND));
736
737	scp = hba->reqs[tag].scp;
738
739	if (HPT_SCP(scp)->mapped)
740		scsi_dma_unmap(scp);
741
742	switch (le32_to_cpu(req->header.result)) {
743	case IOP_RESULT_SUCCESS:
744		scsi_set_resid(scp,
745			scsi_bufflen(scp) - le32_to_cpu(req->dataxfer_length));
746		scp->result = (DID_OK<<16);
747		break;
748	case IOP_RESULT_BAD_TARGET:
749		scp->result = (DID_BAD_TARGET<<16);
750		break;
751	case IOP_RESULT_BUSY:
752		scp->result = (DID_BUS_BUSY<<16);
753		break;
754	case IOP_RESULT_RESET:
755		scp->result = (DID_RESET<<16);
756		break;
757	case IOP_RESULT_FAIL:
758		scp->result = (DID_ERROR<<16);
759		break;
760	case IOP_RESULT_INVALID_REQUEST:
761		scp->result = (DID_ABORT<<16);
762		break;
763	case IOP_RESULT_CHECK_CONDITION:
764		scsi_set_resid(scp,
765			scsi_bufflen(scp) - le32_to_cpu(req->dataxfer_length));
766		scp->result = SAM_STAT_CHECK_CONDITION;
767		memcpy(scp->sense_buffer, &req->sg_list,
768				min_t(size_t, SCSI_SENSE_BUFFERSIZE,
769					le32_to_cpu(req->dataxfer_length)));
770		goto skip_resid;
771		break;
772
773	default:
774		scp->result = DRIVER_INVALID << 24 | DID_ABORT << 16;
775		break;
776	}
777
778	scsi_set_resid(scp,
779		scsi_bufflen(scp) - le32_to_cpu(req->dataxfer_length));
780
781skip_resid:
782	dprintk("scsi_done(%p)\n", scp);
783	scp->scsi_done(scp);
784	free_req(hba, &hba->reqs[tag]);
785}
786
787static void hptiop_host_request_callback_itl(struct hptiop_hba *hba, u32 _tag)
788{
789	struct hpt_iop_request_scsi_command *req;
790	u32 tag;
791
792	if (hba->iopintf_v2) {
793		tag = _tag & ~IOPMU_QUEUE_REQUEST_RESULT_BIT;
794		req = hba->reqs[tag].req_virt;
795		if (likely(_tag & IOPMU_QUEUE_REQUEST_RESULT_BIT))
796			req->header.result = cpu_to_le32(IOP_RESULT_SUCCESS);
797	} else {
798		tag = _tag;
799		req = hba->reqs[tag].req_virt;
800	}
801
802	hptiop_finish_scsi_req(hba, tag, req);
803}
804
805void hptiop_iop_request_callback_itl(struct hptiop_hba *hba, u32 tag)
806{
807	struct hpt_iop_request_header __iomem *req;
808	struct hpt_iop_request_ioctl_command __iomem *p;
809	struct hpt_ioctl_k *arg;
810
811	req = (struct hpt_iop_request_header __iomem *)
812			((unsigned long)hba->u.itl.iop + tag);
813	dprintk("hptiop_iop_request_callback_itl: req=%p, type=%d, "
814			"result=%d, context=0x%x tag=%d\n",
815			req, readl(&req->type), readl(&req->result),
816			readl(&req->context), tag);
817
818	BUG_ON(!readl(&req->result));
819	BUG_ON(readl(&req->type) != IOP_REQUEST_TYPE_IOCTL_COMMAND);
820
821	p = (struct hpt_iop_request_ioctl_command __iomem *)req;
822	arg = (struct hpt_ioctl_k *)(unsigned long)
823		(readl(&req->context) |
824			((u64)readl(&req->context_hi32)<<32));
825
826	if (readl(&req->result) == IOP_RESULT_SUCCESS) {
827		arg->result = HPT_IOCTL_RESULT_OK;
828
829		if (arg->outbuf_size)
830			memcpy_fromio(arg->outbuf,
831				&p->buf[(readl(&p->inbuf_size) + 3)& ~3],
832				arg->outbuf_size);
833
834		if (arg->bytes_returned)
835			*arg->bytes_returned = arg->outbuf_size;
836	}
837	else
838		arg->result = HPT_IOCTL_RESULT_FAILED;
839
840	arg->done(arg);
841	writel(tag, &hba->u.itl.iop->outbound_queue);
842}
843
844static irqreturn_t hptiop_intr(int irq, void *dev_id)
845{
846	struct hptiop_hba  *hba = dev_id;
847	int  handled;
848	unsigned long flags;
849
850	spin_lock_irqsave(hba->host->host_lock, flags);
851	handled = hba->ops->iop_intr(hba);
852	spin_unlock_irqrestore(hba->host->host_lock, flags);
853
854	return handled;
855}
856
857static int hptiop_buildsgl(struct scsi_cmnd *scp, struct hpt_iopsg *psg)
858{
859	struct Scsi_Host *host = scp->device->host;
860	struct hptiop_hba *hba = (struct hptiop_hba *)host->hostdata;
861	struct scatterlist *sg;
862	int idx, nseg;
863
864	nseg = scsi_dma_map(scp);
865	BUG_ON(nseg < 0);
866	if (!nseg)
867		return 0;
868
869	HPT_SCP(scp)->sgcnt = nseg;
870	HPT_SCP(scp)->mapped = 1;
871
872	BUG_ON(HPT_SCP(scp)->sgcnt > hba->max_sg_descriptors);
873
874	scsi_for_each_sg(scp, sg, HPT_SCP(scp)->sgcnt, idx) {
875		psg[idx].pci_address = cpu_to_le64(sg_dma_address(sg)) |
876			hba->ops->host_phy_flag;
877		psg[idx].size = cpu_to_le32(sg_dma_len(sg));
878		psg[idx].eot = (idx == HPT_SCP(scp)->sgcnt - 1) ?
879			cpu_to_le32(1) : 0;
880	}
881	return HPT_SCP(scp)->sgcnt;
882}
883
884static void hptiop_post_req_itl(struct hptiop_hba *hba,
885					struct hptiop_request *_req)
886{
887	struct hpt_iop_request_header *reqhdr = _req->req_virt;
888
889	reqhdr->context = cpu_to_le32(IOPMU_QUEUE_ADDR_HOST_BIT |
890							(u32)_req->index);
891	reqhdr->context_hi32 = 0;
892
893	if (hba->iopintf_v2) {
894		u32 size, size_bits;
895
896		size = le32_to_cpu(reqhdr->size);
897		if (size < 256)
898			size_bits = IOPMU_QUEUE_REQUEST_SIZE_BIT;
899		else if (size < 512)
900			size_bits = IOPMU_QUEUE_ADDR_HOST_BIT;
901		else
902			size_bits = IOPMU_QUEUE_REQUEST_SIZE_BIT |
903						IOPMU_QUEUE_ADDR_HOST_BIT;
904		writel(_req->req_shifted_phy | size_bits,
905			&hba->u.itl.iop->inbound_queue);
906	} else
907		writel(_req->req_shifted_phy | IOPMU_QUEUE_ADDR_HOST_BIT,
908					&hba->u.itl.iop->inbound_queue);
909}
910
911static void hptiop_post_req_mv(struct hptiop_hba *hba,
912					struct hptiop_request *_req)
913{
914	struct hpt_iop_request_header *reqhdr = _req->req_virt;
915	u32 size, size_bit;
916
917	reqhdr->context = cpu_to_le32(_req->index<<8 |
918					IOP_REQUEST_TYPE_SCSI_COMMAND<<5);
919	reqhdr->context_hi32 = 0;
920	size = le32_to_cpu(reqhdr->size);
921
922	if (size <= 256)
923		size_bit = 0;
924	else if (size <= 256*2)
925		size_bit = 1;
926	else if (size <= 256*3)
927		size_bit = 2;
928	else
929		size_bit = 3;
930
931	mv_inbound_write((_req->req_shifted_phy << 5) |
932		MVIOP_MU_QUEUE_ADDR_HOST_BIT | size_bit, hba);
933}
934
935static void hptiop_post_req_mvfrey(struct hptiop_hba *hba,
936					struct hptiop_request *_req)
937{
938	struct hpt_iop_request_header *reqhdr = _req->req_virt;
939	u32 index;
940
941	reqhdr->flags |= cpu_to_le32(IOP_REQUEST_FLAG_OUTPUT_CONTEXT |
942			IOP_REQUEST_FLAG_ADDR_BITS |
943			((_req->req_shifted_phy >> 11) & 0xffff0000));
944	reqhdr->context = cpu_to_le32(IOPMU_QUEUE_ADDR_HOST_BIT |
945			(_req->index << 4) | reqhdr->type);
946	reqhdr->context_hi32 = cpu_to_le32((_req->req_shifted_phy << 5) &
947			0xffffffff);
948
949	hba->u.mvfrey.inlist_wptr++;
950	index = hba->u.mvfrey.inlist_wptr & 0x3fff;
951
952	if (index == hba->u.mvfrey.list_count) {
953		index = 0;
954		hba->u.mvfrey.inlist_wptr &= ~0x3fff;
955		hba->u.mvfrey.inlist_wptr ^= CL_POINTER_TOGGLE;
956	}
957
958	hba->u.mvfrey.inlist[index].addr =
959			(dma_addr_t)_req->req_shifted_phy << 5;
960	hba->u.mvfrey.inlist[index].intrfc_len = (reqhdr->size + 3) / 4;
961	writel(hba->u.mvfrey.inlist_wptr,
962		&(hba->u.mvfrey.mu->inbound_write_ptr));
963	readl(&(hba->u.mvfrey.mu->inbound_write_ptr));
964}
965
966static int hptiop_reset_comm_itl(struct hptiop_hba *hba)
967{
968	return 0;
969}
970
971static int hptiop_reset_comm_mv(struct hptiop_hba *hba)
972{
973	return 0;
974}
975
976static int hptiop_reset_comm_mvfrey(struct hptiop_hba *hba)
977{
978	u32 list_count = hba->u.mvfrey.list_count;
979
980	if (iop_send_sync_msg(hba, IOPMU_INBOUND_MSG0_RESET_COMM, 3000))
981		return -1;
982
983	/* wait 100ms for MCU ready */
984	msleep(100);
985
986	writel(cpu_to_le32(hba->u.mvfrey.inlist_phy & 0xffffffff),
987			&(hba->u.mvfrey.mu->inbound_base));
988	writel(cpu_to_le32((hba->u.mvfrey.inlist_phy >> 16) >> 16),
989			&(hba->u.mvfrey.mu->inbound_base_high));
990
991	writel(cpu_to_le32(hba->u.mvfrey.outlist_phy & 0xffffffff),
992			&(hba->u.mvfrey.mu->outbound_base));
993	writel(cpu_to_le32((hba->u.mvfrey.outlist_phy >> 16) >> 16),
994			&(hba->u.mvfrey.mu->outbound_base_high));
995
996	writel(cpu_to_le32(hba->u.mvfrey.outlist_cptr_phy & 0xffffffff),
997			&(hba->u.mvfrey.mu->outbound_shadow_base));
998	writel(cpu_to_le32((hba->u.mvfrey.outlist_cptr_phy >> 16) >> 16),
999			&(hba->u.mvfrey.mu->outbound_shadow_base_high));
1000
1001	hba->u.mvfrey.inlist_wptr = (list_count - 1) | CL_POINTER_TOGGLE;
1002	*hba->u.mvfrey.outlist_cptr = (list_count - 1) | CL_POINTER_TOGGLE;
1003	hba->u.mvfrey.outlist_rptr = list_count - 1;
1004	return 0;
1005}
1006
1007static int hptiop_queuecommand_lck(struct scsi_cmnd *scp,
1008				void (*done)(struct scsi_cmnd *))
1009{
1010	struct Scsi_Host *host = scp->device->host;
1011	struct hptiop_hba *hba = (struct hptiop_hba *)host->hostdata;
1012	struct hpt_iop_request_scsi_command *req;
1013	int sg_count = 0;
1014	struct hptiop_request *_req;
1015
1016	BUG_ON(!done);
1017	scp->scsi_done = done;
1018
1019	_req = get_req(hba);
1020	if (_req == NULL) {
1021		dprintk("hptiop_queuecmd : no free req\n");
1022		return SCSI_MLQUEUE_HOST_BUSY;
1023	}
1024
1025	_req->scp = scp;
1026
1027	dprintk("hptiop_queuecmd(scp=%p) %d/%d/%d/%llu cdb=(%08x-%08x-%08x-%08x) "
1028			"req_index=%d, req=%p\n",
1029			scp,
1030			host->host_no, scp->device->channel,
1031			scp->device->id, scp->device->lun,
1032			cpu_to_be32(((u32 *)scp->cmnd)[0]),
1033			cpu_to_be32(((u32 *)scp->cmnd)[1]),
1034			cpu_to_be32(((u32 *)scp->cmnd)[2]),
1035			cpu_to_be32(((u32 *)scp->cmnd)[3]),
1036			_req->index, _req->req_virt);
1037
1038	scp->result = 0;
1039
1040	if (scp->device->channel || scp->device->lun ||
1041			scp->device->id > hba->max_devices) {
1042		scp->result = DID_BAD_TARGET << 16;
1043		free_req(hba, _req);
1044		goto cmd_done;
1045	}
1046
1047	req = _req->req_virt;
1048
1049	/* build S/G table */
1050	sg_count = hptiop_buildsgl(scp, req->sg_list);
1051	if (!sg_count)
1052		HPT_SCP(scp)->mapped = 0;
1053
1054	req->header.flags = cpu_to_le32(IOP_REQUEST_FLAG_OUTPUT_CONTEXT);
1055	req->header.type = cpu_to_le32(IOP_REQUEST_TYPE_SCSI_COMMAND);
1056	req->header.result = cpu_to_le32(IOP_RESULT_PENDING);
1057	req->dataxfer_length = cpu_to_le32(scsi_bufflen(scp));
1058	req->channel = scp->device->channel;
1059	req->target = scp->device->id;
1060	req->lun = scp->device->lun;
1061	req->header.size = cpu_to_le32(
1062				sizeof(struct hpt_iop_request_scsi_command)
1063				 - sizeof(struct hpt_iopsg)
1064				 + sg_count * sizeof(struct hpt_iopsg));
1065
1066	memcpy(req->cdb, scp->cmnd, sizeof(req->cdb));
1067	hba->ops->post_req(hba, _req);
1068	return 0;
1069
1070cmd_done:
1071	dprintk("scsi_done(scp=%p)\n", scp);
1072	scp->scsi_done(scp);
1073	return 0;
1074}
1075
1076static DEF_SCSI_QCMD(hptiop_queuecommand)
1077
1078static const char *hptiop_info(struct Scsi_Host *host)
1079{
1080	return driver_name_long;
1081}
1082
1083static int hptiop_reset_hba(struct hptiop_hba *hba)
1084{
1085	if (atomic_xchg(&hba->resetting, 1) == 0) {
1086		atomic_inc(&hba->reset_count);
1087		hba->ops->post_msg(hba, IOPMU_INBOUND_MSG0_RESET);
1088	}
1089
1090	wait_event_timeout(hba->reset_wq,
1091			atomic_read(&hba->resetting) == 0, 60 * HZ);
1092
1093	if (atomic_read(&hba->resetting)) {
1094		/* IOP is in unknown state, abort reset */
1095		printk(KERN_ERR "scsi%d: reset failed\n", hba->host->host_no);
1096		return -1;
1097	}
1098
1099	if (iop_send_sync_msg(hba,
1100		IOPMU_INBOUND_MSG0_START_BACKGROUND_TASK, 5000)) {
1101		dprintk("scsi%d: fail to start background task\n",
1102				hba->host->host_no);
1103	}
1104
1105	return 0;
1106}
1107
1108static int hptiop_reset(struct scsi_cmnd *scp)
1109{
1110	struct Scsi_Host * host = scp->device->host;
1111	struct hptiop_hba * hba = (struct hptiop_hba *)host->hostdata;
1112
1113	printk(KERN_WARNING "hptiop_reset(%d/%d/%d) scp=%p\n",
1114			scp->device->host->host_no, scp->device->channel,
1115			scp->device->id, scp);
1116
1117	return hptiop_reset_hba(hba)? FAILED : SUCCESS;
1118}
1119
1120static int hptiop_adjust_disk_queue_depth(struct scsi_device *sdev,
1121					  int queue_depth)
1122{
1123	struct hptiop_hba *hba = (struct hptiop_hba *)sdev->host->hostdata;
1124
1125	if (queue_depth > hba->max_requests)
1126		queue_depth = hba->max_requests;
1127	return scsi_change_queue_depth(sdev, queue_depth);
1128}
1129
1130static ssize_t hptiop_show_version(struct device *dev,
1131				   struct device_attribute *attr, char *buf)
1132{
1133	return snprintf(buf, PAGE_SIZE, "%s\n", driver_ver);
1134}
1135
1136static ssize_t hptiop_show_fw_version(struct device *dev,
1137				      struct device_attribute *attr, char *buf)
1138{
1139	struct Scsi_Host *host = class_to_shost(dev);
1140	struct hptiop_hba *hba = (struct hptiop_hba *)host->hostdata;
1141
1142	return snprintf(buf, PAGE_SIZE, "%d.%d.%d.%d\n",
1143				hba->firmware_version >> 24,
1144				(hba->firmware_version >> 16) & 0xff,
1145				(hba->firmware_version >> 8) & 0xff,
1146				hba->firmware_version & 0xff);
1147}
1148
1149static struct device_attribute hptiop_attr_version = {
1150	.attr = {
1151		.name = "driver-version",
1152		.mode = S_IRUGO,
1153	},
1154	.show = hptiop_show_version,
1155};
1156
1157static struct device_attribute hptiop_attr_fw_version = {
1158	.attr = {
1159		.name = "firmware-version",
1160		.mode = S_IRUGO,
1161	},
1162	.show = hptiop_show_fw_version,
1163};
1164
1165static struct device_attribute *hptiop_attrs[] = {
1166	&hptiop_attr_version,
1167	&hptiop_attr_fw_version,
1168	NULL
1169};
1170
1171static struct scsi_host_template driver_template = {
1172	.module                     = THIS_MODULE,
1173	.name                       = driver_name,
1174	.queuecommand               = hptiop_queuecommand,
1175	.eh_device_reset_handler    = hptiop_reset,
1176	.eh_bus_reset_handler       = hptiop_reset,
1177	.info                       = hptiop_info,
1178	.emulated                   = 0,
1179	.use_clustering             = ENABLE_CLUSTERING,
1180	.proc_name                  = driver_name,
1181	.shost_attrs                = hptiop_attrs,
1182	.this_id                    = -1,
1183	.change_queue_depth         = hptiop_adjust_disk_queue_depth,
1184};
1185
1186static int hptiop_internal_memalloc_itl(struct hptiop_hba *hba)
1187{
1188	return 0;
1189}
1190
1191static int hptiop_internal_memalloc_mv(struct hptiop_hba *hba)
1192{
1193	hba->u.mv.internal_req = dma_alloc_coherent(&hba->pcidev->dev,
1194			0x800, &hba->u.mv.internal_req_phy, GFP_KERNEL);
1195	if (hba->u.mv.internal_req)
1196		return 0;
1197	else
1198		return -1;
1199}
1200
1201static int hptiop_internal_memalloc_mvfrey(struct hptiop_hba *hba)
1202{
1203	u32 list_count = readl(&hba->u.mvfrey.mu->inbound_conf_ctl);
1204	char *p;
1205	dma_addr_t phy;
1206
1207	BUG_ON(hba->max_request_size == 0);
1208
1209	if (list_count == 0) {
1210		BUG_ON(1);
1211		return -1;
1212	}
1213
1214	list_count >>= 16;
1215
1216	hba->u.mvfrey.list_count = list_count;
1217	hba->u.mvfrey.internal_mem_size = 0x800 +
1218			list_count * sizeof(struct mvfrey_inlist_entry) +
1219			list_count * sizeof(struct mvfrey_outlist_entry) +
1220			sizeof(int);
1221
1222	p = dma_alloc_coherent(&hba->pcidev->dev,
1223			hba->u.mvfrey.internal_mem_size, &phy, GFP_KERNEL);
1224	if (!p)
1225		return -1;
1226
1227	hba->u.mvfrey.internal_req.req_virt = p;
1228	hba->u.mvfrey.internal_req.req_shifted_phy = phy >> 5;
1229	hba->u.mvfrey.internal_req.scp = NULL;
1230	hba->u.mvfrey.internal_req.next = NULL;
1231
1232	p += 0x800;
1233	phy += 0x800;
1234
1235	hba->u.mvfrey.inlist = (struct mvfrey_inlist_entry *)p;
1236	hba->u.mvfrey.inlist_phy = phy;
1237
1238	p += list_count * sizeof(struct mvfrey_inlist_entry);
1239	phy += list_count * sizeof(struct mvfrey_inlist_entry);
1240
1241	hba->u.mvfrey.outlist = (struct mvfrey_outlist_entry *)p;
1242	hba->u.mvfrey.outlist_phy = phy;
1243
1244	p += list_count * sizeof(struct mvfrey_outlist_entry);
1245	phy += list_count * sizeof(struct mvfrey_outlist_entry);
1246
1247	hba->u.mvfrey.outlist_cptr = (__le32 *)p;
1248	hba->u.mvfrey.outlist_cptr_phy = phy;
1249
1250	return 0;
1251}
1252
1253static int hptiop_internal_memfree_itl(struct hptiop_hba *hba)
1254{
1255	return 0;
1256}
1257
1258static int hptiop_internal_memfree_mv(struct hptiop_hba *hba)
1259{
1260	if (hba->u.mv.internal_req) {
1261		dma_free_coherent(&hba->pcidev->dev, 0x800,
1262			hba->u.mv.internal_req, hba->u.mv.internal_req_phy);
1263		return 0;
1264	} else
1265		return -1;
1266}
1267
1268static int hptiop_internal_memfree_mvfrey(struct hptiop_hba *hba)
1269{
1270	if (hba->u.mvfrey.internal_req.req_virt) {
1271		dma_free_coherent(&hba->pcidev->dev,
1272			hba->u.mvfrey.internal_mem_size,
1273			hba->u.mvfrey.internal_req.req_virt,
1274			(dma_addr_t)
1275			hba->u.mvfrey.internal_req.req_shifted_phy << 5);
1276		return 0;
1277	} else
1278		return -1;
1279}
1280
1281static int hptiop_probe(struct pci_dev *pcidev, const struct pci_device_id *id)
1282{
1283	struct Scsi_Host *host = NULL;
1284	struct hptiop_hba *hba;
1285	struct hptiop_adapter_ops *iop_ops;
1286	struct hpt_iop_request_get_config iop_config;
1287	struct hpt_iop_request_set_config set_config;
1288	dma_addr_t start_phy;
1289	void *start_virt;
1290	u32 offset, i, req_size;
1291
1292	dprintk("hptiop_probe(%p)\n", pcidev);
1293
1294	if (pci_enable_device(pcidev)) {
1295		printk(KERN_ERR "hptiop: fail to enable pci device\n");
1296		return -ENODEV;
1297	}
1298
1299	printk(KERN_INFO "adapter at PCI %d:%d:%d, IRQ %d\n",
1300		pcidev->bus->number, pcidev->devfn >> 3, pcidev->devfn & 7,
1301		pcidev->irq);
1302
1303	pci_set_master(pcidev);
1304
1305	/* Enable 64bit DMA if possible */
1306	iop_ops = (struct hptiop_adapter_ops *)id->driver_data;
1307	if (pci_set_dma_mask(pcidev, DMA_BIT_MASK(iop_ops->hw_dma_bit_mask))) {
1308		if (pci_set_dma_mask(pcidev, DMA_BIT_MASK(32))) {
1309			printk(KERN_ERR "hptiop: fail to set dma_mask\n");
1310			goto disable_pci_device;
1311		}
1312	}
1313
1314	if (pci_request_regions(pcidev, driver_name)) {
1315		printk(KERN_ERR "hptiop: pci_request_regions failed\n");
1316		goto disable_pci_device;
1317	}
1318
1319	host = scsi_host_alloc(&driver_template, sizeof(struct hptiop_hba));
1320	if (!host) {
1321		printk(KERN_ERR "hptiop: fail to alloc scsi host\n");
1322		goto free_pci_regions;
1323	}
1324
1325	hba = (struct hptiop_hba *)host->hostdata;
1326
1327	hba->ops = iop_ops;
1328	hba->pcidev = pcidev;
1329	hba->host = host;
1330	hba->initialized = 0;
1331	hba->iopintf_v2 = 0;
1332
1333	atomic_set(&hba->resetting, 0);
1334	atomic_set(&hba->reset_count, 0);
1335
1336	init_waitqueue_head(&hba->reset_wq);
1337	init_waitqueue_head(&hba->ioctl_wq);
1338
1339	host->max_lun = 1;
1340	host->max_channel = 0;
1341	host->io_port = 0;
1342	host->n_io_port = 0;
1343	host->irq = pcidev->irq;
1344
1345	if (hba->ops->map_pci_bar(hba))
1346		goto free_scsi_host;
1347
1348	if (hba->ops->iop_wait_ready(hba, 20000)) {
1349		printk(KERN_ERR "scsi%d: firmware not ready\n",
1350				hba->host->host_no);
1351		goto unmap_pci_bar;
1352	}
1353
1354	if (hba->ops->family == MV_BASED_IOP) {
1355		if (hba->ops->internal_memalloc(hba)) {
1356			printk(KERN_ERR "scsi%d: internal_memalloc failed\n",
1357				hba->host->host_no);
1358			goto unmap_pci_bar;
1359		}
1360	}
1361
1362	if (hba->ops->get_config(hba, &iop_config)) {
1363		printk(KERN_ERR "scsi%d: get config failed\n",
1364				hba->host->host_no);
1365		goto unmap_pci_bar;
1366	}
1367
1368	hba->max_requests = min(le32_to_cpu(iop_config.max_requests),
1369				HPTIOP_MAX_REQUESTS);
1370	hba->max_devices = le32_to_cpu(iop_config.max_devices);
1371	hba->max_request_size = le32_to_cpu(iop_config.request_size);
1372	hba->max_sg_descriptors = le32_to_cpu(iop_config.max_sg_count);
1373	hba->firmware_version = le32_to_cpu(iop_config.firmware_version);
1374	hba->interface_version = le32_to_cpu(iop_config.interface_version);
1375	hba->sdram_size = le32_to_cpu(iop_config.sdram_size);
1376
1377	if (hba->ops->family == MVFREY_BASED_IOP) {
1378		if (hba->ops->internal_memalloc(hba)) {
1379			printk(KERN_ERR "scsi%d: internal_memalloc failed\n",
1380				hba->host->host_no);
1381			goto unmap_pci_bar;
1382		}
1383		if (hba->ops->reset_comm(hba)) {
1384			printk(KERN_ERR "scsi%d: reset comm failed\n",
1385					hba->host->host_no);
1386			goto unmap_pci_bar;
1387		}
1388	}
1389
1390	if (hba->firmware_version > 0x01020000 ||
1391			hba->interface_version > 0x01020000)
1392		hba->iopintf_v2 = 1;
1393
1394	host->max_sectors = le32_to_cpu(iop_config.data_transfer_length) >> 9;
1395	host->max_id = le32_to_cpu(iop_config.max_devices);
1396	host->sg_tablesize = le32_to_cpu(iop_config.max_sg_count);
1397	host->can_queue = le32_to_cpu(iop_config.max_requests);
1398	host->cmd_per_lun = le32_to_cpu(iop_config.max_requests);
1399	host->max_cmd_len = 16;
1400
1401	req_size = sizeof(struct hpt_iop_request_scsi_command)
1402		+ sizeof(struct hpt_iopsg) * (hba->max_sg_descriptors - 1);
1403	if ((req_size & 0x1f) != 0)
1404		req_size = (req_size + 0x1f) & ~0x1f;
1405
1406	memset(&set_config, 0, sizeof(struct hpt_iop_request_set_config));
1407	set_config.iop_id = cpu_to_le32(host->host_no);
1408	set_config.vbus_id = cpu_to_le16(host->host_no);
1409	set_config.max_host_request_size = cpu_to_le16(req_size);
1410
1411	if (hba->ops->set_config(hba, &set_config)) {
1412		printk(KERN_ERR "scsi%d: set config failed\n",
1413				hba->host->host_no);
1414		goto unmap_pci_bar;
1415	}
1416
1417	pci_set_drvdata(pcidev, host);
1418
1419	if (request_irq(pcidev->irq, hptiop_intr, IRQF_SHARED,
1420					driver_name, hba)) {
1421		printk(KERN_ERR "scsi%d: request irq %d failed\n",
1422					hba->host->host_no, pcidev->irq);
1423		goto unmap_pci_bar;
1424	}
1425
1426	/* Allocate request mem */
1427
1428	dprintk("req_size=%d, max_requests=%d\n", req_size, hba->max_requests);
1429
1430	hba->req_size = req_size;
1431	start_virt = dma_alloc_coherent(&pcidev->dev,
1432				hba->req_size*hba->max_requests + 0x20,
1433				&start_phy, GFP_KERNEL);
1434
1435	if (!start_virt) {
1436		printk(KERN_ERR "scsi%d: fail to alloc request mem\n",
1437					hba->host->host_no);
1438		goto free_request_irq;
1439	}
1440
1441	hba->dma_coherent = start_virt;
1442	hba->dma_coherent_handle = start_phy;
1443
1444	if ((start_phy & 0x1f) != 0) {
1445		offset = ((start_phy + 0x1f) & ~0x1f) - start_phy;
1446		start_phy += offset;
1447		start_virt += offset;
1448	}
1449
1450	hba->req_list = NULL;
1451	for (i = 0; i < hba->max_requests; i++) {
1452		hba->reqs[i].next = NULL;
1453		hba->reqs[i].req_virt = start_virt;
1454		hba->reqs[i].req_shifted_phy = start_phy >> 5;
1455		hba->reqs[i].index = i;
1456		free_req(hba, &hba->reqs[i]);
1457		start_virt = (char *)start_virt + hba->req_size;
1458		start_phy = start_phy + hba->req_size;
1459	}
1460
1461	/* Enable Interrupt and start background task */
1462	if (hptiop_initialize_iop(hba))
1463		goto free_request_mem;
1464
1465	if (scsi_add_host(host, &pcidev->dev)) {
1466		printk(KERN_ERR "scsi%d: scsi_add_host failed\n",
1467					hba->host->host_no);
1468		goto free_request_mem;
1469	}
1470
1471	scsi_scan_host(host);
1472
1473	dprintk("scsi%d: hptiop_probe successfully\n", hba->host->host_no);
1474	return 0;
1475
1476free_request_mem:
1477	dma_free_coherent(&hba->pcidev->dev,
1478			hba->req_size * hba->max_requests + 0x20,
1479			hba->dma_coherent, hba->dma_coherent_handle);
1480
1481free_request_irq:
1482	free_irq(hba->pcidev->irq, hba);
1483
1484unmap_pci_bar:
1485	hba->ops->internal_memfree(hba);
1486
1487	hba->ops->unmap_pci_bar(hba);
1488
1489free_scsi_host:
1490	scsi_host_put(host);
1491
1492free_pci_regions:
1493	pci_release_regions(pcidev);
1494
1495disable_pci_device:
1496	pci_disable_device(pcidev);
1497
1498	dprintk("scsi%d: hptiop_probe fail\n", host ? host->host_no : 0);
1499	return -ENODEV;
1500}
1501
1502static void hptiop_shutdown(struct pci_dev *pcidev)
1503{
1504	struct Scsi_Host *host = pci_get_drvdata(pcidev);
1505	struct hptiop_hba *hba = (struct hptiop_hba *)host->hostdata;
1506
1507	dprintk("hptiop_shutdown(%p)\n", hba);
1508
1509	/* stop the iop */
1510	if (iop_send_sync_msg(hba, IOPMU_INBOUND_MSG0_SHUTDOWN, 60000))
1511		printk(KERN_ERR "scsi%d: shutdown the iop timeout\n",
1512					hba->host->host_no);
1513
1514	/* disable all outbound interrupts */
1515	hba->ops->disable_intr(hba);
1516}
1517
1518static void hptiop_disable_intr_itl(struct hptiop_hba *hba)
1519{
1520	u32 int_mask;
1521
1522	int_mask = readl(&hba->u.itl.iop->outbound_intmask);
1523	writel(int_mask |
1524		IOPMU_OUTBOUND_INT_MSG0 | IOPMU_OUTBOUND_INT_POSTQUEUE,
1525		&hba->u.itl.iop->outbound_intmask);
1526	readl(&hba->u.itl.iop->outbound_intmask);
1527}
1528
1529static void hptiop_disable_intr_mv(struct hptiop_hba *hba)
1530{
1531	writel(0, &hba->u.mv.regs->outbound_intmask);
1532	readl(&hba->u.mv.regs->outbound_intmask);
1533}
1534
1535static void hptiop_disable_intr_mvfrey(struct hptiop_hba *hba)
1536{
1537	writel(0, &(hba->u.mvfrey.mu->f0_doorbell_enable));
1538	readl(&(hba->u.mvfrey.mu->f0_doorbell_enable));
1539	writel(0, &(hba->u.mvfrey.mu->isr_enable));
1540	readl(&(hba->u.mvfrey.mu->isr_enable));
1541	writel(0, &(hba->u.mvfrey.mu->pcie_f0_int_enable));
1542	readl(&(hba->u.mvfrey.mu->pcie_f0_int_enable));
1543}
1544
1545static void hptiop_remove(struct pci_dev *pcidev)
1546{
1547	struct Scsi_Host *host = pci_get_drvdata(pcidev);
1548	struct hptiop_hba *hba = (struct hptiop_hba *)host->hostdata;
1549
1550	dprintk("scsi%d: hptiop_remove\n", hba->host->host_no);
1551
1552	scsi_remove_host(host);
1553
1554	hptiop_shutdown(pcidev);
1555
1556	free_irq(hba->pcidev->irq, hba);
1557
1558	dma_free_coherent(&hba->pcidev->dev,
1559			hba->req_size * hba->max_requests + 0x20,
1560			hba->dma_coherent,
1561			hba->dma_coherent_handle);
1562
1563	hba->ops->internal_memfree(hba);
1564
1565	hba->ops->unmap_pci_bar(hba);
1566
1567	pci_release_regions(hba->pcidev);
1568	pci_set_drvdata(hba->pcidev, NULL);
1569	pci_disable_device(hba->pcidev);
1570
1571	scsi_host_put(host);
1572}
1573
1574static struct hptiop_adapter_ops hptiop_itl_ops = {
1575	.family            = INTEL_BASED_IOP,
1576	.iop_wait_ready    = iop_wait_ready_itl,
1577	.internal_memalloc = hptiop_internal_memalloc_itl,
1578	.internal_memfree  = hptiop_internal_memfree_itl,
1579	.map_pci_bar       = hptiop_map_pci_bar_itl,
1580	.unmap_pci_bar     = hptiop_unmap_pci_bar_itl,
1581	.enable_intr       = hptiop_enable_intr_itl,
1582	.disable_intr      = hptiop_disable_intr_itl,
1583	.get_config        = iop_get_config_itl,
1584	.set_config        = iop_set_config_itl,
1585	.iop_intr          = iop_intr_itl,
1586	.post_msg          = hptiop_post_msg_itl,
1587	.post_req          = hptiop_post_req_itl,
1588	.hw_dma_bit_mask   = 64,
1589	.reset_comm        = hptiop_reset_comm_itl,
1590	.host_phy_flag     = cpu_to_le64(0),
1591};
1592
1593static struct hptiop_adapter_ops hptiop_mv_ops = {
1594	.family            = MV_BASED_IOP,
1595	.iop_wait_ready    = iop_wait_ready_mv,
1596	.internal_memalloc = hptiop_internal_memalloc_mv,
1597	.internal_memfree  = hptiop_internal_memfree_mv,
1598	.map_pci_bar       = hptiop_map_pci_bar_mv,
1599	.unmap_pci_bar     = hptiop_unmap_pci_bar_mv,
1600	.enable_intr       = hptiop_enable_intr_mv,
1601	.disable_intr      = hptiop_disable_intr_mv,
1602	.get_config        = iop_get_config_mv,
1603	.set_config        = iop_set_config_mv,
1604	.iop_intr          = iop_intr_mv,
1605	.post_msg          = hptiop_post_msg_mv,
1606	.post_req          = hptiop_post_req_mv,
1607	.hw_dma_bit_mask   = 33,
1608	.reset_comm        = hptiop_reset_comm_mv,
1609	.host_phy_flag     = cpu_to_le64(0),
1610};
1611
1612static struct hptiop_adapter_ops hptiop_mvfrey_ops = {
1613	.family            = MVFREY_BASED_IOP,
1614	.iop_wait_ready    = iop_wait_ready_mvfrey,
1615	.internal_memalloc = hptiop_internal_memalloc_mvfrey,
1616	.internal_memfree  = hptiop_internal_memfree_mvfrey,
1617	.map_pci_bar       = hptiop_map_pci_bar_mvfrey,
1618	.unmap_pci_bar     = hptiop_unmap_pci_bar_mvfrey,
1619	.enable_intr       = hptiop_enable_intr_mvfrey,
1620	.disable_intr      = hptiop_disable_intr_mvfrey,
1621	.get_config        = iop_get_config_mvfrey,
1622	.set_config        = iop_set_config_mvfrey,
1623	.iop_intr          = iop_intr_mvfrey,
1624	.post_msg          = hptiop_post_msg_mvfrey,
1625	.post_req          = hptiop_post_req_mvfrey,
1626	.hw_dma_bit_mask   = 64,
1627	.reset_comm        = hptiop_reset_comm_mvfrey,
1628	.host_phy_flag     = cpu_to_le64(1),
1629};
1630
1631static struct pci_device_id hptiop_id_table[] = {
1632	{ PCI_VDEVICE(TTI, 0x3220), (kernel_ulong_t)&hptiop_itl_ops },
1633	{ PCI_VDEVICE(TTI, 0x3320), (kernel_ulong_t)&hptiop_itl_ops },
1634	{ PCI_VDEVICE(TTI, 0x3410), (kernel_ulong_t)&hptiop_itl_ops },
1635	{ PCI_VDEVICE(TTI, 0x3510), (kernel_ulong_t)&hptiop_itl_ops },
1636	{ PCI_VDEVICE(TTI, 0x3511), (kernel_ulong_t)&hptiop_itl_ops },
1637	{ PCI_VDEVICE(TTI, 0x3520), (kernel_ulong_t)&hptiop_itl_ops },
1638	{ PCI_VDEVICE(TTI, 0x3521), (kernel_ulong_t)&hptiop_itl_ops },
1639	{ PCI_VDEVICE(TTI, 0x3522), (kernel_ulong_t)&hptiop_itl_ops },
1640	{ PCI_VDEVICE(TTI, 0x3530), (kernel_ulong_t)&hptiop_itl_ops },
1641	{ PCI_VDEVICE(TTI, 0x3540), (kernel_ulong_t)&hptiop_itl_ops },
1642	{ PCI_VDEVICE(TTI, 0x3560), (kernel_ulong_t)&hptiop_itl_ops },
1643	{ PCI_VDEVICE(TTI, 0x4210), (kernel_ulong_t)&hptiop_itl_ops },
1644	{ PCI_VDEVICE(TTI, 0x4211), (kernel_ulong_t)&hptiop_itl_ops },
1645	{ PCI_VDEVICE(TTI, 0x4310), (kernel_ulong_t)&hptiop_itl_ops },
1646	{ PCI_VDEVICE(TTI, 0x4311), (kernel_ulong_t)&hptiop_itl_ops },
1647	{ PCI_VDEVICE(TTI, 0x4320), (kernel_ulong_t)&hptiop_itl_ops },
1648	{ PCI_VDEVICE(TTI, 0x4321), (kernel_ulong_t)&hptiop_itl_ops },
1649	{ PCI_VDEVICE(TTI, 0x4322), (kernel_ulong_t)&hptiop_itl_ops },
1650	{ PCI_VDEVICE(TTI, 0x4400), (kernel_ulong_t)&hptiop_itl_ops },
1651	{ PCI_VDEVICE(TTI, 0x3120), (kernel_ulong_t)&hptiop_mv_ops },
1652	{ PCI_VDEVICE(TTI, 0x3122), (kernel_ulong_t)&hptiop_mv_ops },
1653	{ PCI_VDEVICE(TTI, 0x3020), (kernel_ulong_t)&hptiop_mv_ops },
1654	{ PCI_VDEVICE(TTI, 0x4520), (kernel_ulong_t)&hptiop_mvfrey_ops },
1655	{ PCI_VDEVICE(TTI, 0x4522), (kernel_ulong_t)&hptiop_mvfrey_ops },
1656	{},
1657};
1658
1659MODULE_DEVICE_TABLE(pci, hptiop_id_table);
1660
1661static struct pci_driver hptiop_pci_driver = {
1662	.name       = driver_name,
1663	.id_table   = hptiop_id_table,
1664	.probe      = hptiop_probe,
1665	.remove     = hptiop_remove,
1666	.shutdown   = hptiop_shutdown,
1667};
1668
1669static int __init hptiop_module_init(void)
1670{
1671	printk(KERN_INFO "%s %s\n", driver_name_long, driver_ver);
1672	return pci_register_driver(&hptiop_pci_driver);
1673}
1674
1675static void __exit hptiop_module_exit(void)
1676{
1677	pci_unregister_driver(&hptiop_pci_driver);
1678}
1679
1680
1681module_init(hptiop_module_init);
1682module_exit(hptiop_module_exit);
1683
1684MODULE_LICENSE("GPL");
1685
1686