Merge branch 'for-linus' of git://oss.sgi.com:8090/xfs/xfs-2.6
[linux-2.6] / drivers / scsi / hptiop.c
1 /*
2  * HighPoint RR3xxx controller driver for Linux
3  * Copyright (C) 2006-2007 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/hdreg.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
40 MODULE_AUTHOR("HighPoint Technologies, Inc.");
41 MODULE_DESCRIPTION("HighPoint RocketRAID 3xxx SATA Controller Driver");
42
43 static char driver_name[] = "hptiop";
44 static const char driver_name_long[] = "RocketRAID 3xxx SATA Controller driver";
45 static const char driver_ver[] = "v1.2 (070830)";
46
47 static void hptiop_host_request_callback(struct hptiop_hba *hba, u32 tag);
48 static void hptiop_iop_request_callback(struct hptiop_hba *hba, u32 tag);
49 static void hptiop_message_callback(struct hptiop_hba *hba, u32 msg);
50
51 static inline void hptiop_pci_posting_flush(struct hpt_iopmu __iomem *iop)
52 {
53         readl(&iop->outbound_intstatus);
54 }
55
56 static int iop_wait_ready(struct hpt_iopmu __iomem *iop, u32 millisec)
57 {
58         u32 req = 0;
59         int i;
60
61         for (i = 0; i < millisec; i++) {
62                 req = readl(&iop->inbound_queue);
63                 if (req != IOPMU_QUEUE_EMPTY)
64                         break;
65                 msleep(1);
66         }
67
68         if (req != IOPMU_QUEUE_EMPTY) {
69                 writel(req, &iop->outbound_queue);
70                 hptiop_pci_posting_flush(iop);
71                 return 0;
72         }
73
74         return -1;
75 }
76
77 static void hptiop_request_callback(struct hptiop_hba *hba, u32 tag)
78 {
79         if (tag & IOPMU_QUEUE_ADDR_HOST_BIT)
80                 return hptiop_host_request_callback(hba,
81                                 tag & ~IOPMU_QUEUE_ADDR_HOST_BIT);
82         else
83                 return hptiop_iop_request_callback(hba, tag);
84 }
85
86 static inline void hptiop_drain_outbound_queue(struct hptiop_hba *hba)
87 {
88         u32 req;
89
90         while ((req = readl(&hba->iop->outbound_queue)) != IOPMU_QUEUE_EMPTY) {
91
92                 if (req & IOPMU_QUEUE_MASK_HOST_BITS)
93                         hptiop_request_callback(hba, req);
94                 else {
95                         struct hpt_iop_request_header __iomem * p;
96
97                         p = (struct hpt_iop_request_header __iomem *)
98                                 ((char __iomem *)hba->iop + req);
99
100                         if (readl(&p->flags) & IOP_REQUEST_FLAG_SYNC_REQUEST) {
101                                 if (readl(&p->context))
102                                         hptiop_request_callback(hba, req);
103                                 else
104                                         writel(1, &p->context);
105                         }
106                         else
107                                 hptiop_request_callback(hba, req);
108                 }
109         }
110 }
111
112 static int __iop_intr(struct hptiop_hba *hba)
113 {
114         struct hpt_iopmu __iomem *iop = hba->iop;
115         u32 status;
116         int ret = 0;
117
118         status = readl(&iop->outbound_intstatus);
119
120         if (status & IOPMU_OUTBOUND_INT_MSG0) {
121                 u32 msg = readl(&iop->outbound_msgaddr0);
122                 dprintk("received outbound msg %x\n", msg);
123                 writel(IOPMU_OUTBOUND_INT_MSG0, &iop->outbound_intstatus);
124                 hptiop_message_callback(hba, msg);
125                 ret = 1;
126         }
127
128         if (status & IOPMU_OUTBOUND_INT_POSTQUEUE) {
129                 hptiop_drain_outbound_queue(hba);
130                 ret = 1;
131         }
132
133         return ret;
134 }
135
136 static int iop_send_sync_request(struct hptiop_hba *hba,
137                                         void __iomem *_req, u32 millisec)
138 {
139         struct hpt_iop_request_header __iomem *req = _req;
140         u32 i;
141
142         writel(readl(&req->flags) | IOP_REQUEST_FLAG_SYNC_REQUEST,
143                         &req->flags);
144
145         writel(0, &req->context);
146
147         writel((unsigned long)req - (unsigned long)hba->iop,
148                         &hba->iop->inbound_queue);
149
150         hptiop_pci_posting_flush(hba->iop);
151
152         for (i = 0; i < millisec; i++) {
153                 __iop_intr(hba);
154                 if (readl(&req->context))
155                         return 0;
156                 msleep(1);
157         }
158
159         return -1;
160 }
161
162 static int iop_send_sync_msg(struct hptiop_hba *hba, u32 msg, u32 millisec)
163 {
164         u32 i;
165
166         hba->msg_done = 0;
167
168         writel(msg, &hba->iop->inbound_msgaddr0);
169
170         hptiop_pci_posting_flush(hba->iop);
171
172         for (i = 0; i < millisec; i++) {
173                 spin_lock_irq(hba->host->host_lock);
174                 __iop_intr(hba);
175                 spin_unlock_irq(hba->host->host_lock);
176                 if (hba->msg_done)
177                         break;
178                 msleep(1);
179         }
180
181         return hba->msg_done? 0 : -1;
182 }
183
184 static int iop_get_config(struct hptiop_hba *hba,
185                                 struct hpt_iop_request_get_config *config)
186 {
187         u32 req32;
188         struct hpt_iop_request_get_config __iomem *req;
189
190         req32 = readl(&hba->iop->inbound_queue);
191         if (req32 == IOPMU_QUEUE_EMPTY)
192                 return -1;
193
194         req = (struct hpt_iop_request_get_config __iomem *)
195                         ((unsigned long)hba->iop + req32);
196
197         writel(0, &req->header.flags);
198         writel(IOP_REQUEST_TYPE_GET_CONFIG, &req->header.type);
199         writel(sizeof(struct hpt_iop_request_get_config), &req->header.size);
200         writel(IOP_RESULT_PENDING, &req->header.result);
201
202         if (iop_send_sync_request(hba, req, 20000)) {
203                 dprintk("Get config send cmd failed\n");
204                 return -1;
205         }
206
207         memcpy_fromio(config, req, sizeof(*config));
208         writel(req32, &hba->iop->outbound_queue);
209         return 0;
210 }
211
212 static int iop_set_config(struct hptiop_hba *hba,
213                                 struct hpt_iop_request_set_config *config)
214 {
215         u32 req32;
216         struct hpt_iop_request_set_config __iomem *req;
217
218         req32 = readl(&hba->iop->inbound_queue);
219         if (req32 == IOPMU_QUEUE_EMPTY)
220                 return -1;
221
222         req = (struct hpt_iop_request_set_config __iomem *)
223                         ((unsigned long)hba->iop + req32);
224
225         memcpy_toio((u8 __iomem *)req + sizeof(struct hpt_iop_request_header),
226                 (u8 *)config + sizeof(struct hpt_iop_request_header),
227                 sizeof(struct hpt_iop_request_set_config) -
228                         sizeof(struct hpt_iop_request_header));
229
230         writel(0, &req->header.flags);
231         writel(IOP_REQUEST_TYPE_SET_CONFIG, &req->header.type);
232         writel(sizeof(struct hpt_iop_request_set_config), &req->header.size);
233         writel(IOP_RESULT_PENDING, &req->header.result);
234
235         if (iop_send_sync_request(hba, req, 20000)) {
236                 dprintk("Set config send cmd failed\n");
237                 return -1;
238         }
239
240         writel(req32, &hba->iop->outbound_queue);
241         return 0;
242 }
243
244 static int hptiop_initialize_iop(struct hptiop_hba *hba)
245 {
246         struct hpt_iopmu __iomem *iop = hba->iop;
247
248         /* enable interrupts */
249         writel(~(IOPMU_OUTBOUND_INT_POSTQUEUE | IOPMU_OUTBOUND_INT_MSG0),
250                         &iop->outbound_intmask);
251
252         hba->initialized = 1;
253
254         /* start background tasks */
255         if (iop_send_sync_msg(hba,
256                         IOPMU_INBOUND_MSG0_START_BACKGROUND_TASK, 5000)) {
257                 printk(KERN_ERR "scsi%d: fail to start background task\n",
258                         hba->host->host_no);
259                 return -1;
260         }
261         return 0;
262 }
263
264 static int hptiop_map_pci_bar(struct hptiop_hba *hba)
265 {
266         u32 mem_base_phy, length;
267         void __iomem *mem_base_virt;
268         struct pci_dev *pcidev = hba->pcidev;
269
270         if (!(pci_resource_flags(pcidev, 0) & IORESOURCE_MEM)) {
271                 printk(KERN_ERR "scsi%d: pci resource invalid\n",
272                                 hba->host->host_no);
273                 return -1;
274         }
275
276         mem_base_phy = pci_resource_start(pcidev, 0);
277         length = pci_resource_len(pcidev, 0);
278         mem_base_virt = ioremap(mem_base_phy, length);
279
280         if (!mem_base_virt) {
281                 printk(KERN_ERR "scsi%d: Fail to ioremap memory space\n",
282                                 hba->host->host_no);
283                 return -1;
284         }
285
286         hba->iop = mem_base_virt;
287         dprintk("hptiop_map_pci_bar: iop=%p\n", hba->iop);
288         return 0;
289 }
290
291 static void hptiop_message_callback(struct hptiop_hba *hba, u32 msg)
292 {
293         dprintk("iop message 0x%x\n", msg);
294
295         if (!hba->initialized)
296                 return;
297
298         if (msg == IOPMU_INBOUND_MSG0_RESET) {
299                 atomic_set(&hba->resetting, 0);
300                 wake_up(&hba->reset_wq);
301         }
302         else if (msg <= IOPMU_INBOUND_MSG0_MAX)
303                 hba->msg_done = 1;
304 }
305
306 static inline struct hptiop_request *get_req(struct hptiop_hba *hba)
307 {
308         struct hptiop_request *ret;
309
310         dprintk("get_req : req=%p\n", hba->req_list);
311
312         ret = hba->req_list;
313         if (ret)
314                 hba->req_list = ret->next;
315
316         return ret;
317 }
318
319 static inline void free_req(struct hptiop_hba *hba, struct hptiop_request *req)
320 {
321         dprintk("free_req(%d, %p)\n", req->index, req);
322         req->next = hba->req_list;
323         hba->req_list = req;
324 }
325
326 static void hptiop_host_request_callback(struct hptiop_hba *hba, u32 _tag)
327 {
328         struct hpt_iop_request_scsi_command *req;
329         struct scsi_cmnd *scp;
330         u32 tag;
331
332         if (hba->iopintf_v2) {
333                 tag = _tag & ~ IOPMU_QUEUE_REQUEST_RESULT_BIT;
334                 req = hba->reqs[tag].req_virt;
335                 if (likely(_tag & IOPMU_QUEUE_REQUEST_RESULT_BIT))
336                         req->header.result = IOP_RESULT_SUCCESS;
337         } else {
338                 tag = _tag;
339                 req = hba->reqs[tag].req_virt;
340         }
341
342         dprintk("hptiop_host_request_callback: req=%p, type=%d, "
343                         "result=%d, context=0x%x tag=%d\n",
344                         req, req->header.type, req->header.result,
345                         req->header.context, tag);
346
347         BUG_ON(!req->header.result);
348         BUG_ON(req->header.type != cpu_to_le32(IOP_REQUEST_TYPE_SCSI_COMMAND));
349
350         scp = hba->reqs[tag].scp;
351
352         if (HPT_SCP(scp)->mapped)
353                 scsi_dma_unmap(scp);
354
355         switch (le32_to_cpu(req->header.result)) {
356         case IOP_RESULT_SUCCESS:
357                 scp->result = (DID_OK<<16);
358                 break;
359         case IOP_RESULT_BAD_TARGET:
360                 scp->result = (DID_BAD_TARGET<<16);
361                 break;
362         case IOP_RESULT_BUSY:
363                 scp->result = (DID_BUS_BUSY<<16);
364                 break;
365         case IOP_RESULT_RESET:
366                 scp->result = (DID_RESET<<16);
367                 break;
368         case IOP_RESULT_FAIL:
369                 scp->result = (DID_ERROR<<16);
370                 break;
371         case IOP_RESULT_INVALID_REQUEST:
372                 scp->result = (DID_ABORT<<16);
373                 break;
374         case IOP_RESULT_MODE_SENSE_CHECK_CONDITION:
375                 scp->result = SAM_STAT_CHECK_CONDITION;
376                 memset(&scp->sense_buffer,
377                                 0, sizeof(scp->sense_buffer));
378                 memcpy(&scp->sense_buffer, &req->sg_list,
379                                 min(sizeof(scp->sense_buffer),
380                                         le32_to_cpu(req->dataxfer_length)));
381                 break;
382
383         default:
384                 scp->result = ((DRIVER_INVALID|SUGGEST_ABORT)<<24) |
385                                         (DID_ABORT<<16);
386                 break;
387         }
388
389         dprintk("scsi_done(%p)\n", scp);
390         scp->scsi_done(scp);
391         free_req(hba, &hba->reqs[tag]);
392 }
393
394 void hptiop_iop_request_callback(struct hptiop_hba *hba, u32 tag)
395 {
396         struct hpt_iop_request_header __iomem *req;
397         struct hpt_iop_request_ioctl_command __iomem *p;
398         struct hpt_ioctl_k *arg;
399
400         req = (struct hpt_iop_request_header __iomem *)
401                         ((unsigned long)hba->iop + tag);
402         dprintk("hptiop_iop_request_callback: req=%p, type=%d, "
403                         "result=%d, context=0x%x tag=%d\n",
404                         req, readl(&req->type), readl(&req->result),
405                         readl(&req->context), tag);
406
407         BUG_ON(!readl(&req->result));
408         BUG_ON(readl(&req->type) != IOP_REQUEST_TYPE_IOCTL_COMMAND);
409
410         p = (struct hpt_iop_request_ioctl_command __iomem *)req;
411         arg = (struct hpt_ioctl_k *)(unsigned long)
412                 (readl(&req->context) |
413                         ((u64)readl(&req->context_hi32)<<32));
414
415         if (readl(&req->result) == IOP_RESULT_SUCCESS) {
416                 arg->result = HPT_IOCTL_RESULT_OK;
417
418                 if (arg->outbuf_size)
419                         memcpy_fromio(arg->outbuf,
420                                 &p->buf[(readl(&p->inbuf_size) + 3)& ~3],
421                                 arg->outbuf_size);
422
423                 if (arg->bytes_returned)
424                         *arg->bytes_returned = arg->outbuf_size;
425         }
426         else
427                 arg->result = HPT_IOCTL_RESULT_FAILED;
428
429         arg->done(arg);
430         writel(tag, &hba->iop->outbound_queue);
431 }
432
433 static irqreturn_t hptiop_intr(int irq, void *dev_id)
434 {
435         struct hptiop_hba  *hba = dev_id;
436         int  handled;
437         unsigned long flags;
438
439         spin_lock_irqsave(hba->host->host_lock, flags);
440         handled = __iop_intr(hba);
441         spin_unlock_irqrestore(hba->host->host_lock, flags);
442
443         return handled;
444 }
445
446 static int hptiop_buildsgl(struct scsi_cmnd *scp, struct hpt_iopsg *psg)
447 {
448         struct Scsi_Host *host = scp->device->host;
449         struct hptiop_hba *hba = (struct hptiop_hba *)host->hostdata;
450         struct scatterlist *sg;
451         int idx, nseg;
452
453         nseg = scsi_dma_map(scp);
454         BUG_ON(nseg < 0);
455         if (!nseg)
456                 return 0;
457
458         HPT_SCP(scp)->sgcnt = nseg;
459         HPT_SCP(scp)->mapped = 1;
460
461         BUG_ON(HPT_SCP(scp)->sgcnt > hba->max_sg_descriptors);
462
463         scsi_for_each_sg(scp, sg, HPT_SCP(scp)->sgcnt, idx) {
464                 psg[idx].pci_address = cpu_to_le64(sg_dma_address(sg));
465                 psg[idx].size = cpu_to_le32(sg_dma_len(sg));
466                 psg[idx].eot = (idx == HPT_SCP(scp)->sgcnt - 1) ?
467                         cpu_to_le32(1) : 0;
468         }
469         return HPT_SCP(scp)->sgcnt;
470 }
471
472 static int hptiop_queuecommand(struct scsi_cmnd *scp,
473                                 void (*done)(struct scsi_cmnd *))
474 {
475         struct Scsi_Host *host = scp->device->host;
476         struct hptiop_hba *hba = (struct hptiop_hba *)host->hostdata;
477         struct hpt_iop_request_scsi_command *req;
478         int sg_count = 0;
479         struct hptiop_request *_req;
480
481         BUG_ON(!done);
482         scp->scsi_done = done;
483
484         _req = get_req(hba);
485         if (_req == NULL) {
486                 dprintk("hptiop_queuecmd : no free req\n");
487                 return SCSI_MLQUEUE_HOST_BUSY;
488         }
489
490         _req->scp = scp;
491
492         dprintk("hptiop_queuecmd(scp=%p) %d/%d/%d/%d cdb=(%x-%x-%x) "
493                         "req_index=%d, req=%p\n",
494                         scp,
495                         host->host_no, scp->device->channel,
496                         scp->device->id, scp->device->lun,
497                         *((u32 *)&scp->cmnd),
498                         *((u32 *)&scp->cmnd + 1),
499                         *((u32 *)&scp->cmnd + 2),
500                         _req->index, _req->req_virt);
501
502         scp->result = 0;
503
504         if (scp->device->channel || scp->device->lun ||
505                         scp->device->id > hba->max_devices) {
506                 scp->result = DID_BAD_TARGET << 16;
507                 free_req(hba, _req);
508                 goto cmd_done;
509         }
510
511         req = _req->req_virt;
512
513         /* build S/G table */
514         sg_count = hptiop_buildsgl(scp, req->sg_list);
515         if (!sg_count)
516                 HPT_SCP(scp)->mapped = 0;
517
518         req->header.flags = cpu_to_le32(IOP_REQUEST_FLAG_OUTPUT_CONTEXT);
519         req->header.type = cpu_to_le32(IOP_REQUEST_TYPE_SCSI_COMMAND);
520         req->header.result = cpu_to_le32(IOP_RESULT_PENDING);
521         req->header.context = cpu_to_le32(IOPMU_QUEUE_ADDR_HOST_BIT |
522                                                         (u32)_req->index);
523         req->header.context_hi32 = 0;
524         req->dataxfer_length = cpu_to_le32(scsi_bufflen(scp));
525         req->channel = scp->device->channel;
526         req->target = scp->device->id;
527         req->lun = scp->device->lun;
528         req->header.size = cpu_to_le32(
529                                 sizeof(struct hpt_iop_request_scsi_command)
530                                  - sizeof(struct hpt_iopsg)
531                                  + sg_count * sizeof(struct hpt_iopsg));
532
533         memcpy(req->cdb, scp->cmnd, sizeof(req->cdb));
534
535         if (hba->iopintf_v2) {
536                 u32 size_bits;
537                 if (req->header.size < 256)
538                         size_bits = IOPMU_QUEUE_REQUEST_SIZE_BIT;
539                 else if (req->header.size < 512)
540                         size_bits = IOPMU_QUEUE_ADDR_HOST_BIT;
541                 else
542                         size_bits = IOPMU_QUEUE_REQUEST_SIZE_BIT |
543                                                 IOPMU_QUEUE_ADDR_HOST_BIT;
544                 writel(_req->req_shifted_phy | size_bits, &hba->iop->inbound_queue);
545         } else
546                 writel(_req->req_shifted_phy | IOPMU_QUEUE_ADDR_HOST_BIT,
547                                         &hba->iop->inbound_queue);
548
549         return 0;
550
551 cmd_done:
552         dprintk("scsi_done(scp=%p)\n", scp);
553         scp->scsi_done(scp);
554         return 0;
555 }
556
557 static const char *hptiop_info(struct Scsi_Host *host)
558 {
559         return driver_name_long;
560 }
561
562 static int hptiop_reset_hba(struct hptiop_hba *hba)
563 {
564         if (atomic_xchg(&hba->resetting, 1) == 0) {
565                 atomic_inc(&hba->reset_count);
566                 writel(IOPMU_INBOUND_MSG0_RESET,
567                                 &hba->iop->inbound_msgaddr0);
568                 hptiop_pci_posting_flush(hba->iop);
569         }
570
571         wait_event_timeout(hba->reset_wq,
572                         atomic_read(&hba->resetting) == 0, 60 * HZ);
573
574         if (atomic_read(&hba->resetting)) {
575                 /* IOP is in unkown state, abort reset */
576                 printk(KERN_ERR "scsi%d: reset failed\n", hba->host->host_no);
577                 return -1;
578         }
579
580         if (iop_send_sync_msg(hba,
581                 IOPMU_INBOUND_MSG0_START_BACKGROUND_TASK, 5000)) {
582                 dprintk("scsi%d: fail to start background task\n",
583                                 hba->host->host_no);
584         }
585
586         return 0;
587 }
588
589 static int hptiop_reset(struct scsi_cmnd *scp)
590 {
591         struct Scsi_Host * host = scp->device->host;
592         struct hptiop_hba * hba = (struct hptiop_hba *)host->hostdata;
593
594         printk(KERN_WARNING "hptiop_reset(%d/%d/%d) scp=%p\n",
595                         scp->device->host->host_no, scp->device->channel,
596                         scp->device->id, scp);
597
598         return hptiop_reset_hba(hba)? FAILED : SUCCESS;
599 }
600
601 static int hptiop_adjust_disk_queue_depth(struct scsi_device *sdev,
602                                                 int queue_depth)
603 {
604         if(queue_depth > 256)
605                 queue_depth = 256;
606         scsi_adjust_queue_depth(sdev, MSG_ORDERED_TAG, queue_depth);
607         return queue_depth;
608 }
609
610 static ssize_t hptiop_show_version(struct class_device *class_dev, char *buf)
611 {
612         return snprintf(buf, PAGE_SIZE, "%s\n", driver_ver);
613 }
614
615 static ssize_t hptiop_show_fw_version(struct class_device *class_dev, char *buf)
616 {
617         struct Scsi_Host *host = class_to_shost(class_dev);
618         struct hptiop_hba *hba = (struct hptiop_hba *)host->hostdata;
619
620         return snprintf(buf, PAGE_SIZE, "%d.%d.%d.%d\n",
621                                 hba->firmware_version >> 24,
622                                 (hba->firmware_version >> 16) & 0xff,
623                                 (hba->firmware_version >> 8) & 0xff,
624                                 hba->firmware_version & 0xff);
625 }
626
627 static struct class_device_attribute hptiop_attr_version = {
628         .attr = {
629                 .name = "driver-version",
630                 .mode = S_IRUGO,
631         },
632         .show = hptiop_show_version,
633 };
634
635 static struct class_device_attribute hptiop_attr_fw_version = {
636         .attr = {
637                 .name = "firmware-version",
638                 .mode = S_IRUGO,
639         },
640         .show = hptiop_show_fw_version,
641 };
642
643 static struct class_device_attribute *hptiop_attrs[] = {
644         &hptiop_attr_version,
645         &hptiop_attr_fw_version,
646         NULL
647 };
648
649 static struct scsi_host_template driver_template = {
650         .module                     = THIS_MODULE,
651         .name                       = driver_name,
652         .queuecommand               = hptiop_queuecommand,
653         .eh_device_reset_handler    = hptiop_reset,
654         .eh_bus_reset_handler       = hptiop_reset,
655         .info                       = hptiop_info,
656         .unchecked_isa_dma          = 0,
657         .emulated                   = 0,
658         .use_clustering             = ENABLE_CLUSTERING,
659         .use_sg_chaining            = ENABLE_SG_CHAINING,
660         .proc_name                  = driver_name,
661         .shost_attrs                = hptiop_attrs,
662         .this_id                    = -1,
663         .change_queue_depth         = hptiop_adjust_disk_queue_depth,
664 };
665
666 static int __devinit hptiop_probe(struct pci_dev *pcidev,
667                                         const struct pci_device_id *id)
668 {
669         struct Scsi_Host *host = NULL;
670         struct hptiop_hba *hba;
671         struct hpt_iop_request_get_config iop_config;
672         struct hpt_iop_request_set_config set_config;
673         dma_addr_t start_phy;
674         void *start_virt;
675         u32 offset, i, req_size;
676
677         dprintk("hptiop_probe(%p)\n", pcidev);
678
679         if (pci_enable_device(pcidev)) {
680                 printk(KERN_ERR "hptiop: fail to enable pci device\n");
681                 return -ENODEV;
682         }
683
684         printk(KERN_INFO "adapter at PCI %d:%d:%d, IRQ %d\n",
685                 pcidev->bus->number, pcidev->devfn >> 3, pcidev->devfn & 7,
686                 pcidev->irq);
687
688         pci_set_master(pcidev);
689
690         /* Enable 64bit DMA if possible */
691         if (pci_set_dma_mask(pcidev, DMA_64BIT_MASK)) {
692                 if (pci_set_dma_mask(pcidev, DMA_32BIT_MASK)) {
693                         printk(KERN_ERR "hptiop: fail to set dma_mask\n");
694                         goto disable_pci_device;
695                 }
696         }
697
698         if (pci_request_regions(pcidev, driver_name)) {
699                 printk(KERN_ERR "hptiop: pci_request_regions failed\n");
700                 goto disable_pci_device;
701         }
702
703         host = scsi_host_alloc(&driver_template, sizeof(struct hptiop_hba));
704         if (!host) {
705                 printk(KERN_ERR "hptiop: fail to alloc scsi host\n");
706                 goto free_pci_regions;
707         }
708
709         hba = (struct hptiop_hba *)host->hostdata;
710
711         hba->pcidev = pcidev;
712         hba->host = host;
713         hba->initialized = 0;
714         hba->iopintf_v2 = 0;
715
716         atomic_set(&hba->resetting, 0);
717         atomic_set(&hba->reset_count, 0);
718
719         init_waitqueue_head(&hba->reset_wq);
720         init_waitqueue_head(&hba->ioctl_wq);
721
722         host->max_lun = 1;
723         host->max_channel = 0;
724         host->io_port = 0;
725         host->n_io_port = 0;
726         host->irq = pcidev->irq;
727
728         if (hptiop_map_pci_bar(hba))
729                 goto free_scsi_host;
730
731         if (iop_wait_ready(hba->iop, 20000)) {
732                 printk(KERN_ERR "scsi%d: firmware not ready\n",
733                                 hba->host->host_no);
734                 goto unmap_pci_bar;
735         }
736
737         if (iop_get_config(hba, &iop_config)) {
738                 printk(KERN_ERR "scsi%d: get config failed\n",
739                                 hba->host->host_no);
740                 goto unmap_pci_bar;
741         }
742
743         hba->max_requests = min(le32_to_cpu(iop_config.max_requests),
744                                 HPTIOP_MAX_REQUESTS);
745         hba->max_devices = le32_to_cpu(iop_config.max_devices);
746         hba->max_request_size = le32_to_cpu(iop_config.request_size);
747         hba->max_sg_descriptors = le32_to_cpu(iop_config.max_sg_count);
748         hba->firmware_version = le32_to_cpu(iop_config.firmware_version);
749         hba->interface_version = le32_to_cpu(iop_config.interface_version);
750         hba->sdram_size = le32_to_cpu(iop_config.sdram_size);
751
752         if (hba->firmware_version > 0x01020000 ||
753                         hba->interface_version > 0x01020000)
754                 hba->iopintf_v2 = 1;
755
756         host->max_sectors = le32_to_cpu(iop_config.data_transfer_length) >> 9;
757         host->max_id = le32_to_cpu(iop_config.max_devices);
758         host->sg_tablesize = le32_to_cpu(iop_config.max_sg_count);
759         host->can_queue = le32_to_cpu(iop_config.max_requests);
760         host->cmd_per_lun = le32_to_cpu(iop_config.max_requests);
761         host->max_cmd_len = 16;
762
763         req_size = sizeof(struct hpt_iop_request_scsi_command)
764                 + sizeof(struct hpt_iopsg) * (hba->max_sg_descriptors - 1);
765         if ((req_size & 0x1f) != 0)
766                 req_size = (req_size + 0x1f) & ~0x1f;
767
768         memset(&set_config, 0, sizeof(struct hpt_iop_request_set_config));
769         set_config.iop_id = cpu_to_le32(host->host_no);
770         set_config.vbus_id = cpu_to_le16(host->host_no);
771         set_config.max_host_request_size = cpu_to_le16(req_size);
772
773         if (iop_set_config(hba, &set_config)) {
774                 printk(KERN_ERR "scsi%d: set config failed\n",
775                                 hba->host->host_no);
776                 goto unmap_pci_bar;
777         }
778
779         pci_set_drvdata(pcidev, host);
780
781         if (request_irq(pcidev->irq, hptiop_intr, IRQF_SHARED,
782                                         driver_name, hba)) {
783                 printk(KERN_ERR "scsi%d: request irq %d failed\n",
784                                         hba->host->host_no, pcidev->irq);
785                 goto unmap_pci_bar;
786         }
787
788         /* Allocate request mem */
789
790         dprintk("req_size=%d, max_requests=%d\n", req_size, hba->max_requests);
791
792         hba->req_size = req_size;
793         start_virt = dma_alloc_coherent(&pcidev->dev,
794                                 hba->req_size*hba->max_requests + 0x20,
795                                 &start_phy, GFP_KERNEL);
796
797         if (!start_virt) {
798                 printk(KERN_ERR "scsi%d: fail to alloc request mem\n",
799                                         hba->host->host_no);
800                 goto free_request_irq;
801         }
802
803         hba->dma_coherent = start_virt;
804         hba->dma_coherent_handle = start_phy;
805
806         if ((start_phy & 0x1f) != 0)
807         {
808                 offset = ((start_phy + 0x1f) & ~0x1f) - start_phy;
809                 start_phy += offset;
810                 start_virt += offset;
811         }
812
813         hba->req_list = start_virt;
814         for (i = 0; i < hba->max_requests; i++) {
815                 hba->reqs[i].next = NULL;
816                 hba->reqs[i].req_virt = start_virt;
817                 hba->reqs[i].req_shifted_phy = start_phy >> 5;
818                 hba->reqs[i].index = i;
819                 free_req(hba, &hba->reqs[i]);
820                 start_virt = (char *)start_virt + hba->req_size;
821                 start_phy = start_phy + hba->req_size;
822         }
823
824         /* Enable Interrupt and start background task */
825         if (hptiop_initialize_iop(hba))
826                 goto free_request_mem;
827
828         if (scsi_add_host(host, &pcidev->dev)) {
829                 printk(KERN_ERR "scsi%d: scsi_add_host failed\n",
830                                         hba->host->host_no);
831                 goto free_request_mem;
832         }
833
834
835         scsi_scan_host(host);
836
837         dprintk("scsi%d: hptiop_probe successfully\n", hba->host->host_no);
838         return 0;
839
840 free_request_mem:
841         dma_free_coherent(&hba->pcidev->dev,
842                         hba->req_size*hba->max_requests + 0x20,
843                         hba->dma_coherent, hba->dma_coherent_handle);
844
845 free_request_irq:
846         free_irq(hba->pcidev->irq, hba);
847
848 unmap_pci_bar:
849         iounmap(hba->iop);
850
851 free_pci_regions:
852         pci_release_regions(pcidev) ;
853
854 free_scsi_host:
855         scsi_host_put(host);
856
857 disable_pci_device:
858         pci_disable_device(pcidev);
859
860         dprintk("scsi%d: hptiop_probe fail\n", host->host_no);
861         return -ENODEV;
862 }
863
864 static void hptiop_shutdown(struct pci_dev *pcidev)
865 {
866         struct Scsi_Host *host = pci_get_drvdata(pcidev);
867         struct hptiop_hba *hba = (struct hptiop_hba *)host->hostdata;
868         struct hpt_iopmu __iomem *iop = hba->iop;
869         u32    int_mask;
870
871         dprintk("hptiop_shutdown(%p)\n", hba);
872
873         /* stop the iop */
874         if (iop_send_sync_msg(hba, IOPMU_INBOUND_MSG0_SHUTDOWN, 60000))
875                 printk(KERN_ERR "scsi%d: shutdown the iop timeout\n",
876                                         hba->host->host_no);
877
878         /* disable all outbound interrupts */
879         int_mask = readl(&iop->outbound_intmask);
880         writel(int_mask |
881                 IOPMU_OUTBOUND_INT_MSG0 | IOPMU_OUTBOUND_INT_POSTQUEUE,
882                 &iop->outbound_intmask);
883         hptiop_pci_posting_flush(iop);
884 }
885
886 static void hptiop_remove(struct pci_dev *pcidev)
887 {
888         struct Scsi_Host *host = pci_get_drvdata(pcidev);
889         struct hptiop_hba *hba = (struct hptiop_hba *)host->hostdata;
890
891         dprintk("scsi%d: hptiop_remove\n", hba->host->host_no);
892
893         scsi_remove_host(host);
894
895         hptiop_shutdown(pcidev);
896
897         free_irq(hba->pcidev->irq, hba);
898
899         dma_free_coherent(&hba->pcidev->dev,
900                         hba->req_size * hba->max_requests + 0x20,
901                         hba->dma_coherent,
902                         hba->dma_coherent_handle);
903
904         iounmap(hba->iop);
905
906         pci_release_regions(hba->pcidev);
907         pci_set_drvdata(hba->pcidev, NULL);
908         pci_disable_device(hba->pcidev);
909
910         scsi_host_put(host);
911 }
912
913 static struct pci_device_id hptiop_id_table[] = {
914         { PCI_VDEVICE(TTI, 0x3220) },
915         { PCI_VDEVICE(TTI, 0x3320) },
916         { PCI_VDEVICE(TTI, 0x3520) },
917         { PCI_VDEVICE(TTI, 0x4320) },
918         {},
919 };
920
921 MODULE_DEVICE_TABLE(pci, hptiop_id_table);
922
923 static struct pci_driver hptiop_pci_driver = {
924         .name       = driver_name,
925         .id_table   = hptiop_id_table,
926         .probe      = hptiop_probe,
927         .remove     = hptiop_remove,
928         .shutdown   = hptiop_shutdown,
929 };
930
931 static int __init hptiop_module_init(void)
932 {
933         printk(KERN_INFO "%s %s\n", driver_name_long, driver_ver);
934         return pci_register_driver(&hptiop_pci_driver);
935 }
936
937 static void __exit hptiop_module_exit(void)
938 {
939         pci_unregister_driver(&hptiop_pci_driver);
940 }
941
942
943 module_init(hptiop_module_init);
944 module_exit(hptiop_module_exit);
945
946 MODULE_LICENSE("GPL");
947