scsi: qla2xxx: remove double assignment in qla2x00_update_fcport
[linux-2.6-microblaze.git] / drivers / scsi / hptiop.c
1 /*
2  * HighPoint RR3xxx/4xxx controller driver for Linux
3  * Copyright (C) 2006-2015 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 <linux/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
40 MODULE_AUTHOR("HighPoint Technologies, Inc.");
41 MODULE_DESCRIPTION("HighPoint RocketRAID 3xxx/4xxx Controller Driver");
42
43 static char driver_name[] = "hptiop";
44 static const char driver_name_long[] = "RocketRAID 3xxx/4xxx Controller driver";
45 static const char driver_ver[] = "v1.10.0";
46
47 static int iop_send_sync_msg(struct hptiop_hba *hba, u32 msg, u32 millisec);
48 static void hptiop_finish_scsi_req(struct hptiop_hba *hba, u32 tag,
49                                 struct hpt_iop_request_scsi_command *req);
50 static void hptiop_host_request_callback_itl(struct hptiop_hba *hba, u32 tag);
51 static void hptiop_iop_request_callback_itl(struct hptiop_hba *hba, u32 tag);
52 static void hptiop_message_callback(struct hptiop_hba *hba, u32 msg);
53
54 static 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
75 static 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
80 static 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
85 static 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
94 static 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
121 static 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
150 static 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
169 static 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
183 static 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
211 static 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
238 static 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
261 static 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
306 static 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
328 static 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
348 static 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
368 static 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
374 static 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
381 static 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
387 static 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
408 static 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
436 static 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
458 static 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
480 static 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
512 static 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
534 static 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
557 static 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
563 static 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
569 static 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
576 static 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
593 static 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
619 static 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
636 static 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
643 static 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
658 static 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
673 static 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
679 static 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
685 static 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
704 static 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
717 static 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
724 static 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, SCSI_SENSE_BUFFERSIZE);
768                 goto skip_resid;
769                 break;
770
771         default:
772                 scp->result = DRIVER_INVALID << 24 | DID_ABORT << 16;
773                 break;
774         }
775
776         scsi_set_resid(scp,
777                 scsi_bufflen(scp) - le32_to_cpu(req->dataxfer_length));
778
779 skip_resid:
780         dprintk("scsi_done(%p)\n", scp);
781         scp->scsi_done(scp);
782         free_req(hba, &hba->reqs[tag]);
783 }
784
785 static void hptiop_host_request_callback_itl(struct hptiop_hba *hba, u32 _tag)
786 {
787         struct hpt_iop_request_scsi_command *req;
788         u32 tag;
789
790         if (hba->iopintf_v2) {
791                 tag = _tag & ~IOPMU_QUEUE_REQUEST_RESULT_BIT;
792                 req = hba->reqs[tag].req_virt;
793                 if (likely(_tag & IOPMU_QUEUE_REQUEST_RESULT_BIT))
794                         req->header.result = cpu_to_le32(IOP_RESULT_SUCCESS);
795         } else {
796                 tag = _tag;
797                 req = hba->reqs[tag].req_virt;
798         }
799
800         hptiop_finish_scsi_req(hba, tag, req);
801 }
802
803 static void hptiop_iop_request_callback_itl(struct hptiop_hba *hba, u32 tag)
804 {
805         struct hpt_iop_request_header __iomem *req;
806         struct hpt_iop_request_ioctl_command __iomem *p;
807         struct hpt_ioctl_k *arg;
808
809         req = (struct hpt_iop_request_header __iomem *)
810                         ((unsigned long)hba->u.itl.iop + tag);
811         dprintk("hptiop_iop_request_callback_itl: req=%p, type=%d, "
812                         "result=%d, context=0x%x tag=%d\n",
813                         req, readl(&req->type), readl(&req->result),
814                         readl(&req->context), tag);
815
816         BUG_ON(!readl(&req->result));
817         BUG_ON(readl(&req->type) != IOP_REQUEST_TYPE_IOCTL_COMMAND);
818
819         p = (struct hpt_iop_request_ioctl_command __iomem *)req;
820         arg = (struct hpt_ioctl_k *)(unsigned long)
821                 (readl(&req->context) |
822                         ((u64)readl(&req->context_hi32)<<32));
823
824         if (readl(&req->result) == IOP_RESULT_SUCCESS) {
825                 arg->result = HPT_IOCTL_RESULT_OK;
826
827                 if (arg->outbuf_size)
828                         memcpy_fromio(arg->outbuf,
829                                 &p->buf[(readl(&p->inbuf_size) + 3)& ~3],
830                                 arg->outbuf_size);
831
832                 if (arg->bytes_returned)
833                         *arg->bytes_returned = arg->outbuf_size;
834         }
835         else
836                 arg->result = HPT_IOCTL_RESULT_FAILED;
837
838         arg->done(arg);
839         writel(tag, &hba->u.itl.iop->outbound_queue);
840 }
841
842 static irqreturn_t hptiop_intr(int irq, void *dev_id)
843 {
844         struct hptiop_hba  *hba = dev_id;
845         int  handled;
846         unsigned long flags;
847
848         spin_lock_irqsave(hba->host->host_lock, flags);
849         handled = hba->ops->iop_intr(hba);
850         spin_unlock_irqrestore(hba->host->host_lock, flags);
851
852         return handled;
853 }
854
855 static int hptiop_buildsgl(struct scsi_cmnd *scp, struct hpt_iopsg *psg)
856 {
857         struct Scsi_Host *host = scp->device->host;
858         struct hptiop_hba *hba = (struct hptiop_hba *)host->hostdata;
859         struct scatterlist *sg;
860         int idx, nseg;
861
862         nseg = scsi_dma_map(scp);
863         BUG_ON(nseg < 0);
864         if (!nseg)
865                 return 0;
866
867         HPT_SCP(scp)->sgcnt = nseg;
868         HPT_SCP(scp)->mapped = 1;
869
870         BUG_ON(HPT_SCP(scp)->sgcnt > hba->max_sg_descriptors);
871
872         scsi_for_each_sg(scp, sg, HPT_SCP(scp)->sgcnt, idx) {
873                 psg[idx].pci_address = cpu_to_le64(sg_dma_address(sg)) |
874                         hba->ops->host_phy_flag;
875                 psg[idx].size = cpu_to_le32(sg_dma_len(sg));
876                 psg[idx].eot = (idx == HPT_SCP(scp)->sgcnt - 1) ?
877                         cpu_to_le32(1) : 0;
878         }
879         return HPT_SCP(scp)->sgcnt;
880 }
881
882 static void hptiop_post_req_itl(struct hptiop_hba *hba,
883                                         struct hptiop_request *_req)
884 {
885         struct hpt_iop_request_header *reqhdr = _req->req_virt;
886
887         reqhdr->context = cpu_to_le32(IOPMU_QUEUE_ADDR_HOST_BIT |
888                                                         (u32)_req->index);
889         reqhdr->context_hi32 = 0;
890
891         if (hba->iopintf_v2) {
892                 u32 size, size_bits;
893
894                 size = le32_to_cpu(reqhdr->size);
895                 if (size < 256)
896                         size_bits = IOPMU_QUEUE_REQUEST_SIZE_BIT;
897                 else if (size < 512)
898                         size_bits = IOPMU_QUEUE_ADDR_HOST_BIT;
899                 else
900                         size_bits = IOPMU_QUEUE_REQUEST_SIZE_BIT |
901                                                 IOPMU_QUEUE_ADDR_HOST_BIT;
902                 writel(_req->req_shifted_phy | size_bits,
903                         &hba->u.itl.iop->inbound_queue);
904         } else
905                 writel(_req->req_shifted_phy | IOPMU_QUEUE_ADDR_HOST_BIT,
906                                         &hba->u.itl.iop->inbound_queue);
907 }
908
909 static void hptiop_post_req_mv(struct hptiop_hba *hba,
910                                         struct hptiop_request *_req)
911 {
912         struct hpt_iop_request_header *reqhdr = _req->req_virt;
913         u32 size, size_bit;
914
915         reqhdr->context = cpu_to_le32(_req->index<<8 |
916                                         IOP_REQUEST_TYPE_SCSI_COMMAND<<5);
917         reqhdr->context_hi32 = 0;
918         size = le32_to_cpu(reqhdr->size);
919
920         if (size <= 256)
921                 size_bit = 0;
922         else if (size <= 256*2)
923                 size_bit = 1;
924         else if (size <= 256*3)
925                 size_bit = 2;
926         else
927                 size_bit = 3;
928
929         mv_inbound_write((_req->req_shifted_phy << 5) |
930                 MVIOP_MU_QUEUE_ADDR_HOST_BIT | size_bit, hba);
931 }
932
933 static void hptiop_post_req_mvfrey(struct hptiop_hba *hba,
934                                         struct hptiop_request *_req)
935 {
936         struct hpt_iop_request_header *reqhdr = _req->req_virt;
937         u32 index;
938
939         reqhdr->flags |= cpu_to_le32(IOP_REQUEST_FLAG_OUTPUT_CONTEXT |
940                         IOP_REQUEST_FLAG_ADDR_BITS |
941                         ((_req->req_shifted_phy >> 11) & 0xffff0000));
942         reqhdr->context = cpu_to_le32(IOPMU_QUEUE_ADDR_HOST_BIT |
943                         (_req->index << 4) | reqhdr->type);
944         reqhdr->context_hi32 = cpu_to_le32((_req->req_shifted_phy << 5) &
945                         0xffffffff);
946
947         hba->u.mvfrey.inlist_wptr++;
948         index = hba->u.mvfrey.inlist_wptr & 0x3fff;
949
950         if (index == hba->u.mvfrey.list_count) {
951                 index = 0;
952                 hba->u.mvfrey.inlist_wptr &= ~0x3fff;
953                 hba->u.mvfrey.inlist_wptr ^= CL_POINTER_TOGGLE;
954         }
955
956         hba->u.mvfrey.inlist[index].addr =
957                         (dma_addr_t)_req->req_shifted_phy << 5;
958         hba->u.mvfrey.inlist[index].intrfc_len = (reqhdr->size + 3) / 4;
959         writel(hba->u.mvfrey.inlist_wptr,
960                 &(hba->u.mvfrey.mu->inbound_write_ptr));
961         readl(&(hba->u.mvfrey.mu->inbound_write_ptr));
962 }
963
964 static int hptiop_reset_comm_itl(struct hptiop_hba *hba)
965 {
966         return 0;
967 }
968
969 static int hptiop_reset_comm_mv(struct hptiop_hba *hba)
970 {
971         return 0;
972 }
973
974 static int hptiop_reset_comm_mvfrey(struct hptiop_hba *hba)
975 {
976         u32 list_count = hba->u.mvfrey.list_count;
977
978         if (iop_send_sync_msg(hba, IOPMU_INBOUND_MSG0_RESET_COMM, 3000))
979                 return -1;
980
981         /* wait 100ms for MCU ready */
982         msleep(100);
983
984         writel(cpu_to_le32(hba->u.mvfrey.inlist_phy & 0xffffffff),
985                         &(hba->u.mvfrey.mu->inbound_base));
986         writel(cpu_to_le32((hba->u.mvfrey.inlist_phy >> 16) >> 16),
987                         &(hba->u.mvfrey.mu->inbound_base_high));
988
989         writel(cpu_to_le32(hba->u.mvfrey.outlist_phy & 0xffffffff),
990                         &(hba->u.mvfrey.mu->outbound_base));
991         writel(cpu_to_le32((hba->u.mvfrey.outlist_phy >> 16) >> 16),
992                         &(hba->u.mvfrey.mu->outbound_base_high));
993
994         writel(cpu_to_le32(hba->u.mvfrey.outlist_cptr_phy & 0xffffffff),
995                         &(hba->u.mvfrey.mu->outbound_shadow_base));
996         writel(cpu_to_le32((hba->u.mvfrey.outlist_cptr_phy >> 16) >> 16),
997                         &(hba->u.mvfrey.mu->outbound_shadow_base_high));
998
999         hba->u.mvfrey.inlist_wptr = (list_count - 1) | CL_POINTER_TOGGLE;
1000         *hba->u.mvfrey.outlist_cptr = (list_count - 1) | CL_POINTER_TOGGLE;
1001         hba->u.mvfrey.outlist_rptr = list_count - 1;
1002         return 0;
1003 }
1004
1005 static int hptiop_queuecommand_lck(struct scsi_cmnd *scp,
1006                                 void (*done)(struct scsi_cmnd *))
1007 {
1008         struct Scsi_Host *host = scp->device->host;
1009         struct hptiop_hba *hba = (struct hptiop_hba *)host->hostdata;
1010         struct hpt_iop_request_scsi_command *req;
1011         int sg_count = 0;
1012         struct hptiop_request *_req;
1013
1014         BUG_ON(!done);
1015         scp->scsi_done = done;
1016
1017         _req = get_req(hba);
1018         if (_req == NULL) {
1019                 dprintk("hptiop_queuecmd : no free req\n");
1020                 return SCSI_MLQUEUE_HOST_BUSY;
1021         }
1022
1023         _req->scp = scp;
1024
1025         dprintk("hptiop_queuecmd(scp=%p) %d/%d/%d/%llu cdb=(%08x-%08x-%08x-%08x) "
1026                         "req_index=%d, req=%p\n",
1027                         scp,
1028                         host->host_no, scp->device->channel,
1029                         scp->device->id, scp->device->lun,
1030                         cpu_to_be32(((u32 *)scp->cmnd)[0]),
1031                         cpu_to_be32(((u32 *)scp->cmnd)[1]),
1032                         cpu_to_be32(((u32 *)scp->cmnd)[2]),
1033                         cpu_to_be32(((u32 *)scp->cmnd)[3]),
1034                         _req->index, _req->req_virt);
1035
1036         scp->result = 0;
1037
1038         if (scp->device->channel ||
1039                         (scp->device->id > hba->max_devices) ||
1040                         ((scp->device->id == (hba->max_devices-1)) && scp->device->lun)) {
1041                 scp->result = DID_BAD_TARGET << 16;
1042                 free_req(hba, _req);
1043                 goto cmd_done;
1044         }
1045
1046         req = _req->req_virt;
1047
1048         /* build S/G table */
1049         sg_count = hptiop_buildsgl(scp, req->sg_list);
1050         if (!sg_count)
1051                 HPT_SCP(scp)->mapped = 0;
1052
1053         req->header.flags = cpu_to_le32(IOP_REQUEST_FLAG_OUTPUT_CONTEXT);
1054         req->header.type = cpu_to_le32(IOP_REQUEST_TYPE_SCSI_COMMAND);
1055         req->header.result = cpu_to_le32(IOP_RESULT_PENDING);
1056         req->dataxfer_length = cpu_to_le32(scsi_bufflen(scp));
1057         req->channel = scp->device->channel;
1058         req->target = scp->device->id;
1059         req->lun = scp->device->lun;
1060         req->header.size = cpu_to_le32(
1061                                 sizeof(struct hpt_iop_request_scsi_command)
1062                                  - sizeof(struct hpt_iopsg)
1063                                  + sg_count * sizeof(struct hpt_iopsg));
1064
1065         memcpy(req->cdb, scp->cmnd, sizeof(req->cdb));
1066         hba->ops->post_req(hba, _req);
1067         return 0;
1068
1069 cmd_done:
1070         dprintk("scsi_done(scp=%p)\n", scp);
1071         scp->scsi_done(scp);
1072         return 0;
1073 }
1074
1075 static DEF_SCSI_QCMD(hptiop_queuecommand)
1076
1077 static const char *hptiop_info(struct Scsi_Host *host)
1078 {
1079         return driver_name_long;
1080 }
1081
1082 static int hptiop_reset_hba(struct hptiop_hba *hba)
1083 {
1084         if (atomic_xchg(&hba->resetting, 1) == 0) {
1085                 atomic_inc(&hba->reset_count);
1086                 hba->ops->post_msg(hba, IOPMU_INBOUND_MSG0_RESET);
1087         }
1088
1089         wait_event_timeout(hba->reset_wq,
1090                         atomic_read(&hba->resetting) == 0, 60 * HZ);
1091
1092         if (atomic_read(&hba->resetting)) {
1093                 /* IOP is in unknown state, abort reset */
1094                 printk(KERN_ERR "scsi%d: reset failed\n", hba->host->host_no);
1095                 return -1;
1096         }
1097
1098         if (iop_send_sync_msg(hba,
1099                 IOPMU_INBOUND_MSG0_START_BACKGROUND_TASK, 5000)) {
1100                 dprintk("scsi%d: fail to start background task\n",
1101                                 hba->host->host_no);
1102         }
1103
1104         return 0;
1105 }
1106
1107 static int hptiop_reset(struct scsi_cmnd *scp)
1108 {
1109         struct hptiop_hba * hba = (struct hptiop_hba *)scp->device->host->hostdata;
1110
1111         printk(KERN_WARNING "hptiop_reset(%d/%d/%d)\n",
1112                scp->device->host->host_no, -1, -1);
1113
1114         return hptiop_reset_hba(hba)? FAILED : SUCCESS;
1115 }
1116
1117 static int hptiop_adjust_disk_queue_depth(struct scsi_device *sdev,
1118                                           int queue_depth)
1119 {
1120         struct hptiop_hba *hba = (struct hptiop_hba *)sdev->host->hostdata;
1121
1122         if (queue_depth > hba->max_requests)
1123                 queue_depth = hba->max_requests;
1124         return scsi_change_queue_depth(sdev, queue_depth);
1125 }
1126
1127 static ssize_t hptiop_show_version(struct device *dev,
1128                                    struct device_attribute *attr, char *buf)
1129 {
1130         return snprintf(buf, PAGE_SIZE, "%s\n", driver_ver);
1131 }
1132
1133 static ssize_t hptiop_show_fw_version(struct device *dev,
1134                                       struct device_attribute *attr, char *buf)
1135 {
1136         struct Scsi_Host *host = class_to_shost(dev);
1137         struct hptiop_hba *hba = (struct hptiop_hba *)host->hostdata;
1138
1139         return snprintf(buf, PAGE_SIZE, "%d.%d.%d.%d\n",
1140                                 hba->firmware_version >> 24,
1141                                 (hba->firmware_version >> 16) & 0xff,
1142                                 (hba->firmware_version >> 8) & 0xff,
1143                                 hba->firmware_version & 0xff);
1144 }
1145
1146 static struct device_attribute hptiop_attr_version = {
1147         .attr = {
1148                 .name = "driver-version",
1149                 .mode = S_IRUGO,
1150         },
1151         .show = hptiop_show_version,
1152 };
1153
1154 static struct device_attribute hptiop_attr_fw_version = {
1155         .attr = {
1156                 .name = "firmware-version",
1157                 .mode = S_IRUGO,
1158         },
1159         .show = hptiop_show_fw_version,
1160 };
1161
1162 static struct device_attribute *hptiop_attrs[] = {
1163         &hptiop_attr_version,
1164         &hptiop_attr_fw_version,
1165         NULL
1166 };
1167
1168 static int hptiop_slave_config(struct scsi_device *sdev)
1169 {
1170         if (sdev->type == TYPE_TAPE)
1171                 blk_queue_max_hw_sectors(sdev->request_queue, 8192);
1172
1173         return 0;
1174 }
1175
1176 static struct scsi_host_template driver_template = {
1177         .module                     = THIS_MODULE,
1178         .name                       = driver_name,
1179         .queuecommand               = hptiop_queuecommand,
1180         .eh_host_reset_handler      = hptiop_reset,
1181         .info                       = hptiop_info,
1182         .emulated                   = 0,
1183         .proc_name                  = driver_name,
1184         .shost_attrs                = hptiop_attrs,
1185         .slave_configure            = hptiop_slave_config,
1186         .this_id                    = -1,
1187         .change_queue_depth         = hptiop_adjust_disk_queue_depth,
1188 };
1189
1190 static int hptiop_internal_memalloc_itl(struct hptiop_hba *hba)
1191 {
1192         return 0;
1193 }
1194
1195 static int hptiop_internal_memalloc_mv(struct hptiop_hba *hba)
1196 {
1197         hba->u.mv.internal_req = dma_alloc_coherent(&hba->pcidev->dev,
1198                         0x800, &hba->u.mv.internal_req_phy, GFP_KERNEL);
1199         if (hba->u.mv.internal_req)
1200                 return 0;
1201         else
1202                 return -1;
1203 }
1204
1205 static int hptiop_internal_memalloc_mvfrey(struct hptiop_hba *hba)
1206 {
1207         u32 list_count = readl(&hba->u.mvfrey.mu->inbound_conf_ctl);
1208         char *p;
1209         dma_addr_t phy;
1210
1211         BUG_ON(hba->max_request_size == 0);
1212
1213         if (list_count == 0) {
1214                 BUG_ON(1);
1215                 return -1;
1216         }
1217
1218         list_count >>= 16;
1219
1220         hba->u.mvfrey.list_count = list_count;
1221         hba->u.mvfrey.internal_mem_size = 0x800 +
1222                         list_count * sizeof(struct mvfrey_inlist_entry) +
1223                         list_count * sizeof(struct mvfrey_outlist_entry) +
1224                         sizeof(int);
1225
1226         p = dma_alloc_coherent(&hba->pcidev->dev,
1227                         hba->u.mvfrey.internal_mem_size, &phy, GFP_KERNEL);
1228         if (!p)
1229                 return -1;
1230
1231         hba->u.mvfrey.internal_req.req_virt = p;
1232         hba->u.mvfrey.internal_req.req_shifted_phy = phy >> 5;
1233         hba->u.mvfrey.internal_req.scp = NULL;
1234         hba->u.mvfrey.internal_req.next = NULL;
1235
1236         p += 0x800;
1237         phy += 0x800;
1238
1239         hba->u.mvfrey.inlist = (struct mvfrey_inlist_entry *)p;
1240         hba->u.mvfrey.inlist_phy = phy;
1241
1242         p += list_count * sizeof(struct mvfrey_inlist_entry);
1243         phy += list_count * sizeof(struct mvfrey_inlist_entry);
1244
1245         hba->u.mvfrey.outlist = (struct mvfrey_outlist_entry *)p;
1246         hba->u.mvfrey.outlist_phy = phy;
1247
1248         p += list_count * sizeof(struct mvfrey_outlist_entry);
1249         phy += list_count * sizeof(struct mvfrey_outlist_entry);
1250
1251         hba->u.mvfrey.outlist_cptr = (__le32 *)p;
1252         hba->u.mvfrey.outlist_cptr_phy = phy;
1253
1254         return 0;
1255 }
1256
1257 static int hptiop_internal_memfree_itl(struct hptiop_hba *hba)
1258 {
1259         return 0;
1260 }
1261
1262 static int hptiop_internal_memfree_mv(struct hptiop_hba *hba)
1263 {
1264         if (hba->u.mv.internal_req) {
1265                 dma_free_coherent(&hba->pcidev->dev, 0x800,
1266                         hba->u.mv.internal_req, hba->u.mv.internal_req_phy);
1267                 return 0;
1268         } else
1269                 return -1;
1270 }
1271
1272 static int hptiop_internal_memfree_mvfrey(struct hptiop_hba *hba)
1273 {
1274         if (hba->u.mvfrey.internal_req.req_virt) {
1275                 dma_free_coherent(&hba->pcidev->dev,
1276                         hba->u.mvfrey.internal_mem_size,
1277                         hba->u.mvfrey.internal_req.req_virt,
1278                         (dma_addr_t)
1279                         hba->u.mvfrey.internal_req.req_shifted_phy << 5);
1280                 return 0;
1281         } else
1282                 return -1;
1283 }
1284
1285 static int hptiop_probe(struct pci_dev *pcidev, const struct pci_device_id *id)
1286 {
1287         struct Scsi_Host *host = NULL;
1288         struct hptiop_hba *hba;
1289         struct hptiop_adapter_ops *iop_ops;
1290         struct hpt_iop_request_get_config iop_config;
1291         struct hpt_iop_request_set_config set_config;
1292         dma_addr_t start_phy;
1293         void *start_virt;
1294         u32 offset, i, req_size;
1295         int rc;
1296
1297         dprintk("hptiop_probe(%p)\n", pcidev);
1298
1299         if (pci_enable_device(pcidev)) {
1300                 printk(KERN_ERR "hptiop: fail to enable pci device\n");
1301                 return -ENODEV;
1302         }
1303
1304         printk(KERN_INFO "adapter at PCI %d:%d:%d, IRQ %d\n",
1305                 pcidev->bus->number, pcidev->devfn >> 3, pcidev->devfn & 7,
1306                 pcidev->irq);
1307
1308         pci_set_master(pcidev);
1309
1310         /* Enable 64bit DMA if possible */
1311         iop_ops = (struct hptiop_adapter_ops *)id->driver_data;
1312         rc = dma_set_mask(&pcidev->dev,
1313                           DMA_BIT_MASK(iop_ops->hw_dma_bit_mask));
1314         if (rc)
1315                 rc = dma_set_mask(&pcidev->dev, DMA_BIT_MASK(32));
1316
1317         if (rc) {
1318                 printk(KERN_ERR "hptiop: fail to set dma_mask\n");
1319                 goto disable_pci_device;
1320         }
1321
1322         if (pci_request_regions(pcidev, driver_name)) {
1323                 printk(KERN_ERR "hptiop: pci_request_regions failed\n");
1324                 goto disable_pci_device;
1325         }
1326
1327         host = scsi_host_alloc(&driver_template, sizeof(struct hptiop_hba));
1328         if (!host) {
1329                 printk(KERN_ERR "hptiop: fail to alloc scsi host\n");
1330                 goto free_pci_regions;
1331         }
1332
1333         hba = (struct hptiop_hba *)host->hostdata;
1334         memset(hba, 0, sizeof(struct hptiop_hba));
1335
1336         hba->ops = iop_ops;
1337         hba->pcidev = pcidev;
1338         hba->host = host;
1339         hba->initialized = 0;
1340         hba->iopintf_v2 = 0;
1341
1342         atomic_set(&hba->resetting, 0);
1343         atomic_set(&hba->reset_count, 0);
1344
1345         init_waitqueue_head(&hba->reset_wq);
1346         init_waitqueue_head(&hba->ioctl_wq);
1347
1348         host->max_lun = 128;
1349         host->max_channel = 0;
1350         host->io_port = 0;
1351         host->n_io_port = 0;
1352         host->irq = pcidev->irq;
1353
1354         if (hba->ops->map_pci_bar(hba))
1355                 goto free_scsi_host;
1356
1357         if (hba->ops->iop_wait_ready(hba, 20000)) {
1358                 printk(KERN_ERR "scsi%d: firmware not ready\n",
1359                                 hba->host->host_no);
1360                 goto unmap_pci_bar;
1361         }
1362
1363         if (hba->ops->family == MV_BASED_IOP) {
1364                 if (hba->ops->internal_memalloc(hba)) {
1365                         printk(KERN_ERR "scsi%d: internal_memalloc failed\n",
1366                                 hba->host->host_no);
1367                         goto unmap_pci_bar;
1368                 }
1369         }
1370
1371         if (hba->ops->get_config(hba, &iop_config)) {
1372                 printk(KERN_ERR "scsi%d: get config failed\n",
1373                                 hba->host->host_no);
1374                 goto unmap_pci_bar;
1375         }
1376
1377         hba->max_requests = min(le32_to_cpu(iop_config.max_requests),
1378                                 HPTIOP_MAX_REQUESTS);
1379         hba->max_devices = le32_to_cpu(iop_config.max_devices);
1380         hba->max_request_size = le32_to_cpu(iop_config.request_size);
1381         hba->max_sg_descriptors = le32_to_cpu(iop_config.max_sg_count);
1382         hba->firmware_version = le32_to_cpu(iop_config.firmware_version);
1383         hba->interface_version = le32_to_cpu(iop_config.interface_version);
1384         hba->sdram_size = le32_to_cpu(iop_config.sdram_size);
1385
1386         if (hba->ops->family == MVFREY_BASED_IOP) {
1387                 if (hba->ops->internal_memalloc(hba)) {
1388                         printk(KERN_ERR "scsi%d: internal_memalloc failed\n",
1389                                 hba->host->host_no);
1390                         goto unmap_pci_bar;
1391                 }
1392                 if (hba->ops->reset_comm(hba)) {
1393                         printk(KERN_ERR "scsi%d: reset comm failed\n",
1394                                         hba->host->host_no);
1395                         goto unmap_pci_bar;
1396                 }
1397         }
1398
1399         if (hba->firmware_version > 0x01020000 ||
1400                         hba->interface_version > 0x01020000)
1401                 hba->iopintf_v2 = 1;
1402
1403         host->max_sectors = le32_to_cpu(iop_config.data_transfer_length) >> 9;
1404         host->max_id = le32_to_cpu(iop_config.max_devices);
1405         host->sg_tablesize = le32_to_cpu(iop_config.max_sg_count);
1406         host->can_queue = le32_to_cpu(iop_config.max_requests);
1407         host->cmd_per_lun = le32_to_cpu(iop_config.max_requests);
1408         host->max_cmd_len = 16;
1409
1410         req_size = sizeof(struct hpt_iop_request_scsi_command)
1411                 + sizeof(struct hpt_iopsg) * (hba->max_sg_descriptors - 1);
1412         if ((req_size & 0x1f) != 0)
1413                 req_size = (req_size + 0x1f) & ~0x1f;
1414
1415         memset(&set_config, 0, sizeof(struct hpt_iop_request_set_config));
1416         set_config.iop_id = cpu_to_le32(host->host_no);
1417         set_config.vbus_id = cpu_to_le16(host->host_no);
1418         set_config.max_host_request_size = cpu_to_le16(req_size);
1419
1420         if (hba->ops->set_config(hba, &set_config)) {
1421                 printk(KERN_ERR "scsi%d: set config failed\n",
1422                                 hba->host->host_no);
1423                 goto unmap_pci_bar;
1424         }
1425
1426         pci_set_drvdata(pcidev, host);
1427
1428         if (request_irq(pcidev->irq, hptiop_intr, IRQF_SHARED,
1429                                         driver_name, hba)) {
1430                 printk(KERN_ERR "scsi%d: request irq %d failed\n",
1431                                         hba->host->host_no, pcidev->irq);
1432                 goto unmap_pci_bar;
1433         }
1434
1435         /* Allocate request mem */
1436
1437         dprintk("req_size=%d, max_requests=%d\n", req_size, hba->max_requests);
1438
1439         hba->req_size = req_size;
1440         hba->req_list = NULL;
1441
1442         for (i = 0; i < hba->max_requests; i++) {
1443                 start_virt = dma_alloc_coherent(&pcidev->dev,
1444                                         hba->req_size + 0x20,
1445                                         &start_phy, GFP_KERNEL);
1446
1447                 if (!start_virt) {
1448                         printk(KERN_ERR "scsi%d: fail to alloc request mem\n",
1449                                                 hba->host->host_no);
1450                         goto free_request_mem;
1451                 }
1452
1453                 hba->dma_coherent[i] = start_virt;
1454                 hba->dma_coherent_handle[i] = start_phy;
1455
1456                 if ((start_phy & 0x1f) != 0) {
1457                         offset = ((start_phy + 0x1f) & ~0x1f) - start_phy;
1458                         start_phy += offset;
1459                         start_virt += offset;
1460                 }
1461
1462                 hba->reqs[i].next = NULL;
1463                 hba->reqs[i].req_virt = start_virt;
1464                 hba->reqs[i].req_shifted_phy = start_phy >> 5;
1465                 hba->reqs[i].index = i;
1466                 free_req(hba, &hba->reqs[i]);
1467         }
1468
1469         /* Enable Interrupt and start background task */
1470         if (hptiop_initialize_iop(hba))
1471                 goto free_request_mem;
1472
1473         if (scsi_add_host(host, &pcidev->dev)) {
1474                 printk(KERN_ERR "scsi%d: scsi_add_host failed\n",
1475                                         hba->host->host_no);
1476                 goto free_request_mem;
1477         }
1478
1479         scsi_scan_host(host);
1480
1481         dprintk("scsi%d: hptiop_probe successfully\n", hba->host->host_no);
1482         return 0;
1483
1484 free_request_mem:
1485         for (i = 0; i < hba->max_requests; i++) {
1486                 if (hba->dma_coherent[i] && hba->dma_coherent_handle[i])
1487                         dma_free_coherent(&hba->pcidev->dev,
1488                                         hba->req_size + 0x20,
1489                                         hba->dma_coherent[i],
1490                                         hba->dma_coherent_handle[i]);
1491                 else
1492                         break;
1493         }
1494
1495         free_irq(hba->pcidev->irq, hba);
1496
1497 unmap_pci_bar:
1498         hba->ops->internal_memfree(hba);
1499
1500         hba->ops->unmap_pci_bar(hba);
1501
1502 free_scsi_host:
1503         scsi_host_put(host);
1504
1505 free_pci_regions:
1506         pci_release_regions(pcidev);
1507
1508 disable_pci_device:
1509         pci_disable_device(pcidev);
1510
1511         dprintk("scsi%d: hptiop_probe fail\n", host ? host->host_no : 0);
1512         return -ENODEV;
1513 }
1514
1515 static void hptiop_shutdown(struct pci_dev *pcidev)
1516 {
1517         struct Scsi_Host *host = pci_get_drvdata(pcidev);
1518         struct hptiop_hba *hba = (struct hptiop_hba *)host->hostdata;
1519
1520         dprintk("hptiop_shutdown(%p)\n", hba);
1521
1522         /* stop the iop */
1523         if (iop_send_sync_msg(hba, IOPMU_INBOUND_MSG0_SHUTDOWN, 60000))
1524                 printk(KERN_ERR "scsi%d: shutdown the iop timeout\n",
1525                                         hba->host->host_no);
1526
1527         /* disable all outbound interrupts */
1528         hba->ops->disable_intr(hba);
1529 }
1530
1531 static void hptiop_disable_intr_itl(struct hptiop_hba *hba)
1532 {
1533         u32 int_mask;
1534
1535         int_mask = readl(&hba->u.itl.iop->outbound_intmask);
1536         writel(int_mask |
1537                 IOPMU_OUTBOUND_INT_MSG0 | IOPMU_OUTBOUND_INT_POSTQUEUE,
1538                 &hba->u.itl.iop->outbound_intmask);
1539         readl(&hba->u.itl.iop->outbound_intmask);
1540 }
1541
1542 static void hptiop_disable_intr_mv(struct hptiop_hba *hba)
1543 {
1544         writel(0, &hba->u.mv.regs->outbound_intmask);
1545         readl(&hba->u.mv.regs->outbound_intmask);
1546 }
1547
1548 static void hptiop_disable_intr_mvfrey(struct hptiop_hba *hba)
1549 {
1550         writel(0, &(hba->u.mvfrey.mu->f0_doorbell_enable));
1551         readl(&(hba->u.mvfrey.mu->f0_doorbell_enable));
1552         writel(0, &(hba->u.mvfrey.mu->isr_enable));
1553         readl(&(hba->u.mvfrey.mu->isr_enable));
1554         writel(0, &(hba->u.mvfrey.mu->pcie_f0_int_enable));
1555         readl(&(hba->u.mvfrey.mu->pcie_f0_int_enable));
1556 }
1557
1558 static void hptiop_remove(struct pci_dev *pcidev)
1559 {
1560         struct Scsi_Host *host = pci_get_drvdata(pcidev);
1561         struct hptiop_hba *hba = (struct hptiop_hba *)host->hostdata;
1562         u32 i;
1563
1564         dprintk("scsi%d: hptiop_remove\n", hba->host->host_no);
1565
1566         scsi_remove_host(host);
1567
1568         hptiop_shutdown(pcidev);
1569
1570         free_irq(hba->pcidev->irq, hba);
1571
1572         for (i = 0; i < hba->max_requests; i++) {
1573                 if (hba->dma_coherent[i] && hba->dma_coherent_handle[i])
1574                         dma_free_coherent(&hba->pcidev->dev,
1575                                         hba->req_size + 0x20,
1576                                         hba->dma_coherent[i],
1577                                         hba->dma_coherent_handle[i]);
1578                 else
1579                         break;
1580         }
1581
1582         hba->ops->internal_memfree(hba);
1583
1584         hba->ops->unmap_pci_bar(hba);
1585
1586         pci_release_regions(hba->pcidev);
1587         pci_set_drvdata(hba->pcidev, NULL);
1588         pci_disable_device(hba->pcidev);
1589
1590         scsi_host_put(host);
1591 }
1592
1593 static struct hptiop_adapter_ops hptiop_itl_ops = {
1594         .family            = INTEL_BASED_IOP,
1595         .iop_wait_ready    = iop_wait_ready_itl,
1596         .internal_memalloc = hptiop_internal_memalloc_itl,
1597         .internal_memfree  = hptiop_internal_memfree_itl,
1598         .map_pci_bar       = hptiop_map_pci_bar_itl,
1599         .unmap_pci_bar     = hptiop_unmap_pci_bar_itl,
1600         .enable_intr       = hptiop_enable_intr_itl,
1601         .disable_intr      = hptiop_disable_intr_itl,
1602         .get_config        = iop_get_config_itl,
1603         .set_config        = iop_set_config_itl,
1604         .iop_intr          = iop_intr_itl,
1605         .post_msg          = hptiop_post_msg_itl,
1606         .post_req          = hptiop_post_req_itl,
1607         .hw_dma_bit_mask   = 64,
1608         .reset_comm        = hptiop_reset_comm_itl,
1609         .host_phy_flag     = cpu_to_le64(0),
1610 };
1611
1612 static struct hptiop_adapter_ops hptiop_mv_ops = {
1613         .family            = MV_BASED_IOP,
1614         .iop_wait_ready    = iop_wait_ready_mv,
1615         .internal_memalloc = hptiop_internal_memalloc_mv,
1616         .internal_memfree  = hptiop_internal_memfree_mv,
1617         .map_pci_bar       = hptiop_map_pci_bar_mv,
1618         .unmap_pci_bar     = hptiop_unmap_pci_bar_mv,
1619         .enable_intr       = hptiop_enable_intr_mv,
1620         .disable_intr      = hptiop_disable_intr_mv,
1621         .get_config        = iop_get_config_mv,
1622         .set_config        = iop_set_config_mv,
1623         .iop_intr          = iop_intr_mv,
1624         .post_msg          = hptiop_post_msg_mv,
1625         .post_req          = hptiop_post_req_mv,
1626         .hw_dma_bit_mask   = 33,
1627         .reset_comm        = hptiop_reset_comm_mv,
1628         .host_phy_flag     = cpu_to_le64(0),
1629 };
1630
1631 static struct hptiop_adapter_ops hptiop_mvfrey_ops = {
1632         .family            = MVFREY_BASED_IOP,
1633         .iop_wait_ready    = iop_wait_ready_mvfrey,
1634         .internal_memalloc = hptiop_internal_memalloc_mvfrey,
1635         .internal_memfree  = hptiop_internal_memfree_mvfrey,
1636         .map_pci_bar       = hptiop_map_pci_bar_mvfrey,
1637         .unmap_pci_bar     = hptiop_unmap_pci_bar_mvfrey,
1638         .enable_intr       = hptiop_enable_intr_mvfrey,
1639         .disable_intr      = hptiop_disable_intr_mvfrey,
1640         .get_config        = iop_get_config_mvfrey,
1641         .set_config        = iop_set_config_mvfrey,
1642         .iop_intr          = iop_intr_mvfrey,
1643         .post_msg          = hptiop_post_msg_mvfrey,
1644         .post_req          = hptiop_post_req_mvfrey,
1645         .hw_dma_bit_mask   = 64,
1646         .reset_comm        = hptiop_reset_comm_mvfrey,
1647         .host_phy_flag     = cpu_to_le64(1),
1648 };
1649
1650 static struct pci_device_id hptiop_id_table[] = {
1651         { PCI_VDEVICE(TTI, 0x3220), (kernel_ulong_t)&hptiop_itl_ops },
1652         { PCI_VDEVICE(TTI, 0x3320), (kernel_ulong_t)&hptiop_itl_ops },
1653         { PCI_VDEVICE(TTI, 0x3410), (kernel_ulong_t)&hptiop_itl_ops },
1654         { PCI_VDEVICE(TTI, 0x3510), (kernel_ulong_t)&hptiop_itl_ops },
1655         { PCI_VDEVICE(TTI, 0x3511), (kernel_ulong_t)&hptiop_itl_ops },
1656         { PCI_VDEVICE(TTI, 0x3520), (kernel_ulong_t)&hptiop_itl_ops },
1657         { PCI_VDEVICE(TTI, 0x3521), (kernel_ulong_t)&hptiop_itl_ops },
1658         { PCI_VDEVICE(TTI, 0x3522), (kernel_ulong_t)&hptiop_itl_ops },
1659         { PCI_VDEVICE(TTI, 0x3530), (kernel_ulong_t)&hptiop_itl_ops },
1660         { PCI_VDEVICE(TTI, 0x3540), (kernel_ulong_t)&hptiop_itl_ops },
1661         { PCI_VDEVICE(TTI, 0x3560), (kernel_ulong_t)&hptiop_itl_ops },
1662         { PCI_VDEVICE(TTI, 0x4210), (kernel_ulong_t)&hptiop_itl_ops },
1663         { PCI_VDEVICE(TTI, 0x4211), (kernel_ulong_t)&hptiop_itl_ops },
1664         { PCI_VDEVICE(TTI, 0x4310), (kernel_ulong_t)&hptiop_itl_ops },
1665         { PCI_VDEVICE(TTI, 0x4311), (kernel_ulong_t)&hptiop_itl_ops },
1666         { PCI_VDEVICE(TTI, 0x4320), (kernel_ulong_t)&hptiop_itl_ops },
1667         { PCI_VDEVICE(TTI, 0x4321), (kernel_ulong_t)&hptiop_itl_ops },
1668         { PCI_VDEVICE(TTI, 0x4322), (kernel_ulong_t)&hptiop_itl_ops },
1669         { PCI_VDEVICE(TTI, 0x4400), (kernel_ulong_t)&hptiop_itl_ops },
1670         { PCI_VDEVICE(TTI, 0x3120), (kernel_ulong_t)&hptiop_mv_ops },
1671         { PCI_VDEVICE(TTI, 0x3122), (kernel_ulong_t)&hptiop_mv_ops },
1672         { PCI_VDEVICE(TTI, 0x3020), (kernel_ulong_t)&hptiop_mv_ops },
1673         { PCI_VDEVICE(TTI, 0x4520), (kernel_ulong_t)&hptiop_mvfrey_ops },
1674         { PCI_VDEVICE(TTI, 0x4522), (kernel_ulong_t)&hptiop_mvfrey_ops },
1675         { PCI_VDEVICE(TTI, 0x3610), (kernel_ulong_t)&hptiop_mvfrey_ops },
1676         { PCI_VDEVICE(TTI, 0x3611), (kernel_ulong_t)&hptiop_mvfrey_ops },
1677         { PCI_VDEVICE(TTI, 0x3620), (kernel_ulong_t)&hptiop_mvfrey_ops },
1678         { PCI_VDEVICE(TTI, 0x3622), (kernel_ulong_t)&hptiop_mvfrey_ops },
1679         { PCI_VDEVICE(TTI, 0x3640), (kernel_ulong_t)&hptiop_mvfrey_ops },
1680         { PCI_VDEVICE(TTI, 0x3660), (kernel_ulong_t)&hptiop_mvfrey_ops },
1681         { PCI_VDEVICE(TTI, 0x3680), (kernel_ulong_t)&hptiop_mvfrey_ops },
1682         { PCI_VDEVICE(TTI, 0x3690), (kernel_ulong_t)&hptiop_mvfrey_ops },
1683         {},
1684 };
1685
1686 MODULE_DEVICE_TABLE(pci, hptiop_id_table);
1687
1688 static struct pci_driver hptiop_pci_driver = {
1689         .name       = driver_name,
1690         .id_table   = hptiop_id_table,
1691         .probe      = hptiop_probe,
1692         .remove     = hptiop_remove,
1693         .shutdown   = hptiop_shutdown,
1694 };
1695
1696 static int __init hptiop_module_init(void)
1697 {
1698         printk(KERN_INFO "%s %s\n", driver_name_long, driver_ver);
1699         return pci_register_driver(&hptiop_pci_driver);
1700 }
1701
1702 static void __exit hptiop_module_exit(void)
1703 {
1704         pci_unregister_driver(&hptiop_pci_driver);
1705 }
1706
1707
1708 module_init(hptiop_module_init);
1709 module_exit(hptiop_module_exit);
1710
1711 MODULE_LICENSE("GPL");
1712