2 * HighPoint RR3xxx/4xxx controller driver for Linux
3 * Copyright (C) 2006-2009 HighPoint Technologies, Inc. All Rights Reserved.
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.
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.
14 * Please report bugs/comments/suggestions to linux@highpoint-tech.com
16 * For more information, visit http://www.highpoint-tech.com
18 #include <linux/module.h>
19 #include <linux/types.h>
20 #include <linux/string.h>
21 #include <linux/kernel.h>
22 #include <linux/pci.h>
23 #include <linux/interrupt.h>
24 #include <linux/errno.h>
25 #include <linux/delay.h>
26 #include <linux/timer.h>
27 #include <linux/spinlock.h>
28 #include <linux/gfp.h>
29 #include <asm/uaccess.h>
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>
40 MODULE_AUTHOR("HighPoint Technologies, Inc.");
41 MODULE_DESCRIPTION("HighPoint RocketRAID 3xxx/4xxx Controller Driver");
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.6 (090910)";
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
);
54 static int iop_wait_ready_itl(struct hptiop_hba
*hba
, u32 millisec
)
59 for (i
= 0; i
< millisec
; i
++) {
60 req
= readl(&hba
->u
.itl
.iop
->inbound_queue
);
61 if (req
!= IOPMU_QUEUE_EMPTY
)
66 if (req
!= IOPMU_QUEUE_EMPTY
) {
67 writel(req
, &hba
->u
.itl
.iop
->outbound_queue
);
68 readl(&hba
->u
.itl
.iop
->outbound_intstatus
);
75 static int iop_wait_ready_mv(struct hptiop_hba
*hba
, u32 millisec
)
77 return iop_send_sync_msg(hba
, IOPMU_INBOUND_MSG0_NOP
, millisec
);
80 static void hptiop_request_callback_itl(struct hptiop_hba
*hba
, u32 tag
)
82 if (tag
& IOPMU_QUEUE_ADDR_HOST_BIT
)
83 hptiop_host_request_callback_itl(hba
,
84 tag
& ~IOPMU_QUEUE_ADDR_HOST_BIT
);
86 hptiop_iop_request_callback_itl(hba
, tag
);
89 static void hptiop_drain_outbound_queue_itl(struct hptiop_hba
*hba
)
93 while ((req
= readl(&hba
->u
.itl
.iop
->outbound_queue
)) !=
96 if (req
& IOPMU_QUEUE_MASK_HOST_BITS
)
97 hptiop_request_callback_itl(hba
, req
);
99 struct hpt_iop_request_header __iomem
* p
;
101 p
= (struct hpt_iop_request_header __iomem
*)
102 ((char __iomem
*)hba
->u
.itl
.iop
+ req
);
104 if (readl(&p
->flags
) & IOP_REQUEST_FLAG_SYNC_REQUEST
) {
105 if (readl(&p
->context
))
106 hptiop_request_callback_itl(hba
, req
);
108 writel(1, &p
->context
);
111 hptiop_request_callback_itl(hba
, req
);
116 static int iop_intr_itl(struct hptiop_hba
*hba
)
118 struct hpt_iopmu_itl __iomem
*iop
= hba
->u
.itl
.iop
;
119 void __iomem
*plx
= hba
->u
.itl
.plx
;
123 if (plx
&& readl(plx
+ 0x11C5C) & 0xf)
124 writel(1, plx
+ 0x11C60);
126 status
= readl(&iop
->outbound_intstatus
);
128 if (status
& IOPMU_OUTBOUND_INT_MSG0
) {
129 u32 msg
= readl(&iop
->outbound_msgaddr0
);
131 dprintk("received outbound msg %x\n", msg
);
132 writel(IOPMU_OUTBOUND_INT_MSG0
, &iop
->outbound_intstatus
);
133 hptiop_message_callback(hba
, msg
);
137 if (status
& IOPMU_OUTBOUND_INT_POSTQUEUE
) {
138 hptiop_drain_outbound_queue_itl(hba
);
145 static u64
mv_outbound_read(struct hpt_iopmu_mv __iomem
*mu
)
147 u32 outbound_tail
= readl(&mu
->outbound_tail
);
148 u32 outbound_head
= readl(&mu
->outbound_head
);
150 if (outbound_tail
!= outbound_head
) {
153 memcpy_fromio(&p
, &mu
->outbound_q
[mu
->outbound_tail
], 8);
156 if (outbound_tail
== MVIOP_QUEUE_LEN
)
158 writel(outbound_tail
, &mu
->outbound_tail
);
164 static void mv_inbound_write(u64 p
, struct hptiop_hba
*hba
)
166 u32 inbound_head
= readl(&hba
->u
.mv
.mu
->inbound_head
);
167 u32 head
= inbound_head
+ 1;
169 if (head
== MVIOP_QUEUE_LEN
)
172 memcpy_toio(&hba
->u
.mv
.mu
->inbound_q
[inbound_head
], &p
, 8);
173 writel(head
, &hba
->u
.mv
.mu
->inbound_head
);
174 writel(MVIOP_MU_INBOUND_INT_POSTQUEUE
,
175 &hba
->u
.mv
.regs
->inbound_doorbell
);
178 static void hptiop_request_callback_mv(struct hptiop_hba
*hba
, u64 tag
)
180 u32 req_type
= (tag
>> 5) & 0x7;
181 struct hpt_iop_request_scsi_command
*req
;
183 dprintk("hptiop_request_callback_mv: tag=%llx\n", tag
);
185 BUG_ON((tag
& MVIOP_MU_QUEUE_REQUEST_RETURN_CONTEXT
) == 0);
188 case IOP_REQUEST_TYPE_GET_CONFIG
:
189 case IOP_REQUEST_TYPE_SET_CONFIG
:
193 case IOP_REQUEST_TYPE_SCSI_COMMAND
:
194 req
= hba
->reqs
[tag
>> 8].req_virt
;
195 if (likely(tag
& MVIOP_MU_QUEUE_REQUEST_RESULT_BIT
))
196 req
->header
.result
= cpu_to_le32(IOP_RESULT_SUCCESS
);
198 hptiop_finish_scsi_req(hba
, tag
>>8, req
);
206 static int iop_intr_mv(struct hptiop_hba
*hba
)
211 status
= readl(&hba
->u
.mv
.regs
->outbound_doorbell
);
212 writel(~status
, &hba
->u
.mv
.regs
->outbound_doorbell
);
214 if (status
& MVIOP_MU_OUTBOUND_INT_MSG
) {
216 msg
= readl(&hba
->u
.mv
.mu
->outbound_msg
);
217 dprintk("received outbound msg %x\n", msg
);
218 hptiop_message_callback(hba
, msg
);
222 if (status
& MVIOP_MU_OUTBOUND_INT_POSTQUEUE
) {
225 while ((tag
= mv_outbound_read(hba
->u
.mv
.mu
)))
226 hptiop_request_callback_mv(hba
, tag
);
233 static int iop_send_sync_request_itl(struct hptiop_hba
*hba
,
234 void __iomem
*_req
, u32 millisec
)
236 struct hpt_iop_request_header __iomem
*req
= _req
;
239 writel(readl(&req
->flags
) | IOP_REQUEST_FLAG_SYNC_REQUEST
, &req
->flags
);
240 writel(0, &req
->context
);
241 writel((unsigned long)req
- (unsigned long)hba
->u
.itl
.iop
,
242 &hba
->u
.itl
.iop
->inbound_queue
);
243 readl(&hba
->u
.itl
.iop
->outbound_intstatus
);
245 for (i
= 0; i
< millisec
; i
++) {
247 if (readl(&req
->context
))
255 static int iop_send_sync_request_mv(struct hptiop_hba
*hba
,
256 u32 size_bits
, u32 millisec
)
258 struct hpt_iop_request_header
*reqhdr
= hba
->u
.mv
.internal_req
;
262 reqhdr
->flags
|= cpu_to_le32(IOP_REQUEST_FLAG_SYNC_REQUEST
);
263 mv_inbound_write(hba
->u
.mv
.internal_req_phy
|
264 MVIOP_MU_QUEUE_ADDR_HOST_BIT
| size_bits
, hba
);
266 for (i
= 0; i
< millisec
; i
++) {
275 static void hptiop_post_msg_itl(struct hptiop_hba
*hba
, u32 msg
)
277 writel(msg
, &hba
->u
.itl
.iop
->inbound_msgaddr0
);
278 readl(&hba
->u
.itl
.iop
->outbound_intstatus
);
281 static void hptiop_post_msg_mv(struct hptiop_hba
*hba
, u32 msg
)
283 writel(msg
, &hba
->u
.mv
.mu
->inbound_msg
);
284 writel(MVIOP_MU_INBOUND_INT_MSG
, &hba
->u
.mv
.regs
->inbound_doorbell
);
285 readl(&hba
->u
.mv
.regs
->inbound_doorbell
);
288 static int iop_send_sync_msg(struct hptiop_hba
*hba
, u32 msg
, u32 millisec
)
293 hba
->ops
->post_msg(hba
, msg
);
295 for (i
= 0; i
< millisec
; i
++) {
296 spin_lock_irq(hba
->host
->host_lock
);
297 hba
->ops
->iop_intr(hba
);
298 spin_unlock_irq(hba
->host
->host_lock
);
304 return hba
->msg_done
? 0 : -1;
307 static int iop_get_config_itl(struct hptiop_hba
*hba
,
308 struct hpt_iop_request_get_config
*config
)
311 struct hpt_iop_request_get_config __iomem
*req
;
313 req32
= readl(&hba
->u
.itl
.iop
->inbound_queue
);
314 if (req32
== IOPMU_QUEUE_EMPTY
)
317 req
= (struct hpt_iop_request_get_config __iomem
*)
318 ((unsigned long)hba
->u
.itl
.iop
+ req32
);
320 writel(0, &req
->header
.flags
);
321 writel(IOP_REQUEST_TYPE_GET_CONFIG
, &req
->header
.type
);
322 writel(sizeof(struct hpt_iop_request_get_config
), &req
->header
.size
);
323 writel(IOP_RESULT_PENDING
, &req
->header
.result
);
325 if (iop_send_sync_request_itl(hba
, req
, 20000)) {
326 dprintk("Get config send cmd failed\n");
330 memcpy_fromio(config
, req
, sizeof(*config
));
331 writel(req32
, &hba
->u
.itl
.iop
->outbound_queue
);
335 static int iop_get_config_mv(struct hptiop_hba
*hba
,
336 struct hpt_iop_request_get_config
*config
)
338 struct hpt_iop_request_get_config
*req
= hba
->u
.mv
.internal_req
;
340 req
->header
.flags
= cpu_to_le32(IOP_REQUEST_FLAG_OUTPUT_CONTEXT
);
341 req
->header
.type
= cpu_to_le32(IOP_REQUEST_TYPE_GET_CONFIG
);
343 cpu_to_le32(sizeof(struct hpt_iop_request_get_config
));
344 req
->header
.result
= cpu_to_le32(IOP_RESULT_PENDING
);
345 req
->header
.context
= cpu_to_le32(IOP_REQUEST_TYPE_GET_CONFIG
<<5);
346 req
->header
.context_hi32
= 0;
348 if (iop_send_sync_request_mv(hba
, 0, 20000)) {
349 dprintk("Get config send cmd failed\n");
353 memcpy(config
, req
, sizeof(struct hpt_iop_request_get_config
));
357 static int iop_set_config_itl(struct hptiop_hba
*hba
,
358 struct hpt_iop_request_set_config
*config
)
361 struct hpt_iop_request_set_config __iomem
*req
;
363 req32
= readl(&hba
->u
.itl
.iop
->inbound_queue
);
364 if (req32
== IOPMU_QUEUE_EMPTY
)
367 req
= (struct hpt_iop_request_set_config __iomem
*)
368 ((unsigned long)hba
->u
.itl
.iop
+ req32
);
370 memcpy_toio((u8 __iomem
*)req
+ sizeof(struct hpt_iop_request_header
),
371 (u8
*)config
+ sizeof(struct hpt_iop_request_header
),
372 sizeof(struct hpt_iop_request_set_config
) -
373 sizeof(struct hpt_iop_request_header
));
375 writel(0, &req
->header
.flags
);
376 writel(IOP_REQUEST_TYPE_SET_CONFIG
, &req
->header
.type
);
377 writel(sizeof(struct hpt_iop_request_set_config
), &req
->header
.size
);
378 writel(IOP_RESULT_PENDING
, &req
->header
.result
);
380 if (iop_send_sync_request_itl(hba
, req
, 20000)) {
381 dprintk("Set config send cmd failed\n");
385 writel(req32
, &hba
->u
.itl
.iop
->outbound_queue
);
389 static int iop_set_config_mv(struct hptiop_hba
*hba
,
390 struct hpt_iop_request_set_config
*config
)
392 struct hpt_iop_request_set_config
*req
= hba
->u
.mv
.internal_req
;
394 memcpy(req
, config
, sizeof(struct hpt_iop_request_set_config
));
395 req
->header
.flags
= cpu_to_le32(IOP_REQUEST_FLAG_OUTPUT_CONTEXT
);
396 req
->header
.type
= cpu_to_le32(IOP_REQUEST_TYPE_SET_CONFIG
);
398 cpu_to_le32(sizeof(struct hpt_iop_request_set_config
));
399 req
->header
.result
= cpu_to_le32(IOP_RESULT_PENDING
);
400 req
->header
.context
= cpu_to_le32(IOP_REQUEST_TYPE_SET_CONFIG
<<5);
401 req
->header
.context_hi32
= 0;
403 if (iop_send_sync_request_mv(hba
, 0, 20000)) {
404 dprintk("Set config send cmd failed\n");
411 static void hptiop_enable_intr_itl(struct hptiop_hba
*hba
)
413 writel(~(IOPMU_OUTBOUND_INT_POSTQUEUE
| IOPMU_OUTBOUND_INT_MSG0
),
414 &hba
->u
.itl
.iop
->outbound_intmask
);
417 static void hptiop_enable_intr_mv(struct hptiop_hba
*hba
)
419 writel(MVIOP_MU_OUTBOUND_INT_POSTQUEUE
| MVIOP_MU_OUTBOUND_INT_MSG
,
420 &hba
->u
.mv
.regs
->outbound_intmask
);
423 static int hptiop_initialize_iop(struct hptiop_hba
*hba
)
425 /* enable interrupts */
426 hba
->ops
->enable_intr(hba
);
428 hba
->initialized
= 1;
430 /* start background tasks */
431 if (iop_send_sync_msg(hba
,
432 IOPMU_INBOUND_MSG0_START_BACKGROUND_TASK
, 5000)) {
433 printk(KERN_ERR
"scsi%d: fail to start background task\n",
440 static void __iomem
*hptiop_map_pci_bar(struct hptiop_hba
*hba
, int index
)
442 u32 mem_base_phy
, length
;
443 void __iomem
*mem_base_virt
;
445 struct pci_dev
*pcidev
= hba
->pcidev
;
448 if (!(pci_resource_flags(pcidev
, index
) & IORESOURCE_MEM
)) {
449 printk(KERN_ERR
"scsi%d: pci resource invalid\n",
454 mem_base_phy
= pci_resource_start(pcidev
, index
);
455 length
= pci_resource_len(pcidev
, index
);
456 mem_base_virt
= ioremap(mem_base_phy
, length
);
458 if (!mem_base_virt
) {
459 printk(KERN_ERR
"scsi%d: Fail to ioremap memory space\n",
463 return mem_base_virt
;
466 static int hptiop_map_pci_bar_itl(struct hptiop_hba
*hba
)
468 struct pci_dev
*pcidev
= hba
->pcidev
;
469 hba
->u
.itl
.iop
= hptiop_map_pci_bar(hba
, 0);
470 if (hba
->u
.itl
.iop
== NULL
)
472 if ((pcidev
->device
& 0xff00) == 0x4400) {
473 hba
->u
.itl
.plx
= hba
->u
.itl
.iop
;
474 hba
->u
.itl
.iop
= hptiop_map_pci_bar(hba
, 2);
475 if (hba
->u
.itl
.iop
== NULL
) {
476 iounmap(hba
->u
.itl
.plx
);
483 static void hptiop_unmap_pci_bar_itl(struct hptiop_hba
*hba
)
486 iounmap(hba
->u
.itl
.plx
);
487 iounmap(hba
->u
.itl
.iop
);
490 static int hptiop_map_pci_bar_mv(struct hptiop_hba
*hba
)
492 hba
->u
.mv
.regs
= hptiop_map_pci_bar(hba
, 0);
493 if (hba
->u
.mv
.regs
== NULL
)
496 hba
->u
.mv
.mu
= hptiop_map_pci_bar(hba
, 2);
497 if (hba
->u
.mv
.mu
== NULL
) {
498 iounmap(hba
->u
.mv
.regs
);
505 static void hptiop_unmap_pci_bar_mv(struct hptiop_hba
*hba
)
507 iounmap(hba
->u
.mv
.regs
);
508 iounmap(hba
->u
.mv
.mu
);
511 static void hptiop_message_callback(struct hptiop_hba
*hba
, u32 msg
)
513 dprintk("iop message 0x%x\n", msg
);
515 if (msg
== IOPMU_INBOUND_MSG0_NOP
)
518 if (!hba
->initialized
)
521 if (msg
== IOPMU_INBOUND_MSG0_RESET
) {
522 atomic_set(&hba
->resetting
, 0);
523 wake_up(&hba
->reset_wq
);
525 else if (msg
<= IOPMU_INBOUND_MSG0_MAX
)
529 static struct hptiop_request
*get_req(struct hptiop_hba
*hba
)
531 struct hptiop_request
*ret
;
533 dprintk("get_req : req=%p\n", hba
->req_list
);
537 hba
->req_list
= ret
->next
;
542 static void free_req(struct hptiop_hba
*hba
, struct hptiop_request
*req
)
544 dprintk("free_req(%d, %p)\n", req
->index
, req
);
545 req
->next
= hba
->req_list
;
549 static void hptiop_finish_scsi_req(struct hptiop_hba
*hba
, u32 tag
,
550 struct hpt_iop_request_scsi_command
*req
)
552 struct scsi_cmnd
*scp
;
554 dprintk("hptiop_finish_scsi_req: req=%p, type=%d, "
555 "result=%d, context=0x%x tag=%d\n",
556 req
, req
->header
.type
, req
->header
.result
,
557 req
->header
.context
, tag
);
559 BUG_ON(!req
->header
.result
);
560 BUG_ON(req
->header
.type
!= cpu_to_le32(IOP_REQUEST_TYPE_SCSI_COMMAND
));
562 scp
= hba
->reqs
[tag
].scp
;
564 if (HPT_SCP(scp
)->mapped
)
567 switch (le32_to_cpu(req
->header
.result
)) {
568 case IOP_RESULT_SUCCESS
:
570 scsi_bufflen(scp
) - le32_to_cpu(req
->dataxfer_length
));
571 scp
->result
= (DID_OK
<<16);
573 case IOP_RESULT_BAD_TARGET
:
574 scp
->result
= (DID_BAD_TARGET
<<16);
576 case IOP_RESULT_BUSY
:
577 scp
->result
= (DID_BUS_BUSY
<<16);
579 case IOP_RESULT_RESET
:
580 scp
->result
= (DID_RESET
<<16);
582 case IOP_RESULT_FAIL
:
583 scp
->result
= (DID_ERROR
<<16);
585 case IOP_RESULT_INVALID_REQUEST
:
586 scp
->result
= (DID_ABORT
<<16);
588 case IOP_RESULT_CHECK_CONDITION
:
590 scsi_bufflen(scp
) - le32_to_cpu(req
->dataxfer_length
));
591 scp
->result
= SAM_STAT_CHECK_CONDITION
;
592 memcpy(scp
->sense_buffer
, &req
->sg_list
,
593 min_t(size_t, SCSI_SENSE_BUFFERSIZE
,
594 le32_to_cpu(req
->dataxfer_length
)));
598 scp
->result
= DRIVER_INVALID
<< 24 | DID_ABORT
<< 16;
602 dprintk("scsi_done(%p)\n", scp
);
604 free_req(hba
, &hba
->reqs
[tag
]);
607 static void hptiop_host_request_callback_itl(struct hptiop_hba
*hba
, u32 _tag
)
609 struct hpt_iop_request_scsi_command
*req
;
612 if (hba
->iopintf_v2
) {
613 tag
= _tag
& ~IOPMU_QUEUE_REQUEST_RESULT_BIT
;
614 req
= hba
->reqs
[tag
].req_virt
;
615 if (likely(_tag
& IOPMU_QUEUE_REQUEST_RESULT_BIT
))
616 req
->header
.result
= cpu_to_le32(IOP_RESULT_SUCCESS
);
619 req
= hba
->reqs
[tag
].req_virt
;
622 hptiop_finish_scsi_req(hba
, tag
, req
);
625 void hptiop_iop_request_callback_itl(struct hptiop_hba
*hba
, u32 tag
)
627 struct hpt_iop_request_header __iomem
*req
;
628 struct hpt_iop_request_ioctl_command __iomem
*p
;
629 struct hpt_ioctl_k
*arg
;
631 req
= (struct hpt_iop_request_header __iomem
*)
632 ((unsigned long)hba
->u
.itl
.iop
+ tag
);
633 dprintk("hptiop_iop_request_callback_itl: req=%p, type=%d, "
634 "result=%d, context=0x%x tag=%d\n",
635 req
, readl(&req
->type
), readl(&req
->result
),
636 readl(&req
->context
), tag
);
638 BUG_ON(!readl(&req
->result
));
639 BUG_ON(readl(&req
->type
) != IOP_REQUEST_TYPE_IOCTL_COMMAND
);
641 p
= (struct hpt_iop_request_ioctl_command __iomem
*)req
;
642 arg
= (struct hpt_ioctl_k
*)(unsigned long)
643 (readl(&req
->context
) |
644 ((u64
)readl(&req
->context_hi32
)<<32));
646 if (readl(&req
->result
) == IOP_RESULT_SUCCESS
) {
647 arg
->result
= HPT_IOCTL_RESULT_OK
;
649 if (arg
->outbuf_size
)
650 memcpy_fromio(arg
->outbuf
,
651 &p
->buf
[(readl(&p
->inbuf_size
) + 3)& ~3],
654 if (arg
->bytes_returned
)
655 *arg
->bytes_returned
= arg
->outbuf_size
;
658 arg
->result
= HPT_IOCTL_RESULT_FAILED
;
661 writel(tag
, &hba
->u
.itl
.iop
->outbound_queue
);
664 static irqreturn_t
hptiop_intr(int irq
, void *dev_id
)
666 struct hptiop_hba
*hba
= dev_id
;
670 spin_lock_irqsave(hba
->host
->host_lock
, flags
);
671 handled
= hba
->ops
->iop_intr(hba
);
672 spin_unlock_irqrestore(hba
->host
->host_lock
, flags
);
677 static int hptiop_buildsgl(struct scsi_cmnd
*scp
, struct hpt_iopsg
*psg
)
679 struct Scsi_Host
*host
= scp
->device
->host
;
680 struct hptiop_hba
*hba
= (struct hptiop_hba
*)host
->hostdata
;
681 struct scatterlist
*sg
;
684 nseg
= scsi_dma_map(scp
);
689 HPT_SCP(scp
)->sgcnt
= nseg
;
690 HPT_SCP(scp
)->mapped
= 1;
692 BUG_ON(HPT_SCP(scp
)->sgcnt
> hba
->max_sg_descriptors
);
694 scsi_for_each_sg(scp
, sg
, HPT_SCP(scp
)->sgcnt
, idx
) {
695 psg
[idx
].pci_address
= cpu_to_le64(sg_dma_address(sg
));
696 psg
[idx
].size
= cpu_to_le32(sg_dma_len(sg
));
697 psg
[idx
].eot
= (idx
== HPT_SCP(scp
)->sgcnt
- 1) ?
700 return HPT_SCP(scp
)->sgcnt
;
703 static void hptiop_post_req_itl(struct hptiop_hba
*hba
,
704 struct hptiop_request
*_req
)
706 struct hpt_iop_request_header
*reqhdr
= _req
->req_virt
;
708 reqhdr
->context
= cpu_to_le32(IOPMU_QUEUE_ADDR_HOST_BIT
|
710 reqhdr
->context_hi32
= 0;
712 if (hba
->iopintf_v2
) {
715 size
= le32_to_cpu(reqhdr
->size
);
717 size_bits
= IOPMU_QUEUE_REQUEST_SIZE_BIT
;
719 size_bits
= IOPMU_QUEUE_ADDR_HOST_BIT
;
721 size_bits
= IOPMU_QUEUE_REQUEST_SIZE_BIT
|
722 IOPMU_QUEUE_ADDR_HOST_BIT
;
723 writel(_req
->req_shifted_phy
| size_bits
,
724 &hba
->u
.itl
.iop
->inbound_queue
);
726 writel(_req
->req_shifted_phy
| IOPMU_QUEUE_ADDR_HOST_BIT
,
727 &hba
->u
.itl
.iop
->inbound_queue
);
730 static void hptiop_post_req_mv(struct hptiop_hba
*hba
,
731 struct hptiop_request
*_req
)
733 struct hpt_iop_request_header
*reqhdr
= _req
->req_virt
;
736 reqhdr
->context
= cpu_to_le32(_req
->index
<<8 |
737 IOP_REQUEST_TYPE_SCSI_COMMAND
<<5);
738 reqhdr
->context_hi32
= 0;
739 size
= le32_to_cpu(reqhdr
->size
);
743 else if (size
<= 256*2)
745 else if (size
<= 256*3)
750 mv_inbound_write((_req
->req_shifted_phy
<< 5) |
751 MVIOP_MU_QUEUE_ADDR_HOST_BIT
| size_bit
, hba
);
754 static int hptiop_queuecommand(struct scsi_cmnd
*scp
,
755 void (*done
)(struct scsi_cmnd
*))
757 struct Scsi_Host
*host
= scp
->device
->host
;
758 struct hptiop_hba
*hba
= (struct hptiop_hba
*)host
->hostdata
;
759 struct hpt_iop_request_scsi_command
*req
;
761 struct hptiop_request
*_req
;
764 scp
->scsi_done
= done
;
768 dprintk("hptiop_queuecmd : no free req\n");
769 return SCSI_MLQUEUE_HOST_BUSY
;
774 dprintk("hptiop_queuecmd(scp=%p) %d/%d/%d/%d cdb=(%x-%x-%x) "
775 "req_index=%d, req=%p\n",
777 host
->host_no
, scp
->device
->channel
,
778 scp
->device
->id
, scp
->device
->lun
,
779 ((u32
*)scp
->cmnd
)[0],
780 ((u32
*)scp
->cmnd
)[1],
781 ((u32
*)scp
->cmnd
)[2],
782 _req
->index
, _req
->req_virt
);
786 if (scp
->device
->channel
|| scp
->device
->lun
||
787 scp
->device
->id
> hba
->max_devices
) {
788 scp
->result
= DID_BAD_TARGET
<< 16;
793 req
= _req
->req_virt
;
795 /* build S/G table */
796 sg_count
= hptiop_buildsgl(scp
, req
->sg_list
);
798 HPT_SCP(scp
)->mapped
= 0;
800 req
->header
.flags
= cpu_to_le32(IOP_REQUEST_FLAG_OUTPUT_CONTEXT
);
801 req
->header
.type
= cpu_to_le32(IOP_REQUEST_TYPE_SCSI_COMMAND
);
802 req
->header
.result
= cpu_to_le32(IOP_RESULT_PENDING
);
803 req
->dataxfer_length
= cpu_to_le32(scsi_bufflen(scp
));
804 req
->channel
= scp
->device
->channel
;
805 req
->target
= scp
->device
->id
;
806 req
->lun
= scp
->device
->lun
;
807 req
->header
.size
= cpu_to_le32(
808 sizeof(struct hpt_iop_request_scsi_command
)
809 - sizeof(struct hpt_iopsg
)
810 + sg_count
* sizeof(struct hpt_iopsg
));
812 memcpy(req
->cdb
, scp
->cmnd
, sizeof(req
->cdb
));
813 hba
->ops
->post_req(hba
, _req
);
817 dprintk("scsi_done(scp=%p)\n", scp
);
822 static const char *hptiop_info(struct Scsi_Host
*host
)
824 return driver_name_long
;
827 static int hptiop_reset_hba(struct hptiop_hba
*hba
)
829 if (atomic_xchg(&hba
->resetting
, 1) == 0) {
830 atomic_inc(&hba
->reset_count
);
831 hba
->ops
->post_msg(hba
, IOPMU_INBOUND_MSG0_RESET
);
834 wait_event_timeout(hba
->reset_wq
,
835 atomic_read(&hba
->resetting
) == 0, 60 * HZ
);
837 if (atomic_read(&hba
->resetting
)) {
838 /* IOP is in unknown state, abort reset */
839 printk(KERN_ERR
"scsi%d: reset failed\n", hba
->host
->host_no
);
843 if (iop_send_sync_msg(hba
,
844 IOPMU_INBOUND_MSG0_START_BACKGROUND_TASK
, 5000)) {
845 dprintk("scsi%d: fail to start background task\n",
852 static int hptiop_reset(struct scsi_cmnd
*scp
)
854 struct Scsi_Host
* host
= scp
->device
->host
;
855 struct hptiop_hba
* hba
= (struct hptiop_hba
*)host
->hostdata
;
857 printk(KERN_WARNING
"hptiop_reset(%d/%d/%d) scp=%p\n",
858 scp
->device
->host
->host_no
, scp
->device
->channel
,
859 scp
->device
->id
, scp
);
861 return hptiop_reset_hba(hba
)? FAILED
: SUCCESS
;
864 static int hptiop_adjust_disk_queue_depth(struct scsi_device
*sdev
,
865 int queue_depth
, int reason
)
867 struct hptiop_hba
*hba
= (struct hptiop_hba
*)sdev
->host
->hostdata
;
869 if (reason
!= SCSI_QDEPTH_DEFAULT
)
872 if (queue_depth
> hba
->max_requests
)
873 queue_depth
= hba
->max_requests
;
874 scsi_adjust_queue_depth(sdev
, MSG_ORDERED_TAG
, queue_depth
);
878 static ssize_t
hptiop_show_version(struct device
*dev
,
879 struct device_attribute
*attr
, char *buf
)
881 return snprintf(buf
, PAGE_SIZE
, "%s\n", driver_ver
);
884 static ssize_t
hptiop_show_fw_version(struct device
*dev
,
885 struct device_attribute
*attr
, char *buf
)
887 struct Scsi_Host
*host
= class_to_shost(dev
);
888 struct hptiop_hba
*hba
= (struct hptiop_hba
*)host
->hostdata
;
890 return snprintf(buf
, PAGE_SIZE
, "%d.%d.%d.%d\n",
891 hba
->firmware_version
>> 24,
892 (hba
->firmware_version
>> 16) & 0xff,
893 (hba
->firmware_version
>> 8) & 0xff,
894 hba
->firmware_version
& 0xff);
897 static struct device_attribute hptiop_attr_version
= {
899 .name
= "driver-version",
902 .show
= hptiop_show_version
,
905 static struct device_attribute hptiop_attr_fw_version
= {
907 .name
= "firmware-version",
910 .show
= hptiop_show_fw_version
,
913 static struct device_attribute
*hptiop_attrs
[] = {
914 &hptiop_attr_version
,
915 &hptiop_attr_fw_version
,
919 static struct scsi_host_template driver_template
= {
920 .module
= THIS_MODULE
,
922 .queuecommand
= hptiop_queuecommand
,
923 .eh_device_reset_handler
= hptiop_reset
,
924 .eh_bus_reset_handler
= hptiop_reset
,
927 .use_clustering
= ENABLE_CLUSTERING
,
928 .proc_name
= driver_name
,
929 .shost_attrs
= hptiop_attrs
,
931 .change_queue_depth
= hptiop_adjust_disk_queue_depth
,
934 static int hptiop_internal_memalloc_mv(struct hptiop_hba
*hba
)
936 hba
->u
.mv
.internal_req
= dma_alloc_coherent(&hba
->pcidev
->dev
,
937 0x800, &hba
->u
.mv
.internal_req_phy
, GFP_KERNEL
);
938 if (hba
->u
.mv
.internal_req
)
944 static int hptiop_internal_memfree_mv(struct hptiop_hba
*hba
)
946 if (hba
->u
.mv
.internal_req
) {
947 dma_free_coherent(&hba
->pcidev
->dev
, 0x800,
948 hba
->u
.mv
.internal_req
, hba
->u
.mv
.internal_req_phy
);
954 static int __devinit
hptiop_probe(struct pci_dev
*pcidev
,
955 const struct pci_device_id
*id
)
957 struct Scsi_Host
*host
= NULL
;
958 struct hptiop_hba
*hba
;
959 struct hpt_iop_request_get_config iop_config
;
960 struct hpt_iop_request_set_config set_config
;
961 dma_addr_t start_phy
;
963 u32 offset
, i
, req_size
;
965 dprintk("hptiop_probe(%p)\n", pcidev
);
967 if (pci_enable_device(pcidev
)) {
968 printk(KERN_ERR
"hptiop: fail to enable pci device\n");
972 printk(KERN_INFO
"adapter at PCI %d:%d:%d, IRQ %d\n",
973 pcidev
->bus
->number
, pcidev
->devfn
>> 3, pcidev
->devfn
& 7,
976 pci_set_master(pcidev
);
978 /* Enable 64bit DMA if possible */
979 if (pci_set_dma_mask(pcidev
, DMA_BIT_MASK(64))) {
980 if (pci_set_dma_mask(pcidev
, DMA_BIT_MASK(32))) {
981 printk(KERN_ERR
"hptiop: fail to set dma_mask\n");
982 goto disable_pci_device
;
986 if (pci_request_regions(pcidev
, driver_name
)) {
987 printk(KERN_ERR
"hptiop: pci_request_regions failed\n");
988 goto disable_pci_device
;
991 host
= scsi_host_alloc(&driver_template
, sizeof(struct hptiop_hba
));
993 printk(KERN_ERR
"hptiop: fail to alloc scsi host\n");
994 goto free_pci_regions
;
997 hba
= (struct hptiop_hba
*)host
->hostdata
;
999 hba
->ops
= (struct hptiop_adapter_ops
*)id
->driver_data
;
1000 hba
->pcidev
= pcidev
;
1002 hba
->initialized
= 0;
1003 hba
->iopintf_v2
= 0;
1005 atomic_set(&hba
->resetting
, 0);
1006 atomic_set(&hba
->reset_count
, 0);
1008 init_waitqueue_head(&hba
->reset_wq
);
1009 init_waitqueue_head(&hba
->ioctl_wq
);
1012 host
->max_channel
= 0;
1014 host
->n_io_port
= 0;
1015 host
->irq
= pcidev
->irq
;
1017 if (hba
->ops
->map_pci_bar(hba
))
1018 goto free_scsi_host
;
1020 if (hba
->ops
->iop_wait_ready(hba
, 20000)) {
1021 printk(KERN_ERR
"scsi%d: firmware not ready\n",
1022 hba
->host
->host_no
);
1026 if (hba
->ops
->internal_memalloc
) {
1027 if (hba
->ops
->internal_memalloc(hba
)) {
1028 printk(KERN_ERR
"scsi%d: internal_memalloc failed\n",
1029 hba
->host
->host_no
);
1034 if (hba
->ops
->get_config(hba
, &iop_config
)) {
1035 printk(KERN_ERR
"scsi%d: get config failed\n",
1036 hba
->host
->host_no
);
1040 hba
->max_requests
= min(le32_to_cpu(iop_config
.max_requests
),
1041 HPTIOP_MAX_REQUESTS
);
1042 hba
->max_devices
= le32_to_cpu(iop_config
.max_devices
);
1043 hba
->max_request_size
= le32_to_cpu(iop_config
.request_size
);
1044 hba
->max_sg_descriptors
= le32_to_cpu(iop_config
.max_sg_count
);
1045 hba
->firmware_version
= le32_to_cpu(iop_config
.firmware_version
);
1046 hba
->interface_version
= le32_to_cpu(iop_config
.interface_version
);
1047 hba
->sdram_size
= le32_to_cpu(iop_config
.sdram_size
);
1049 if (hba
->firmware_version
> 0x01020000 ||
1050 hba
->interface_version
> 0x01020000)
1051 hba
->iopintf_v2
= 1;
1053 host
->max_sectors
= le32_to_cpu(iop_config
.data_transfer_length
) >> 9;
1054 host
->max_id
= le32_to_cpu(iop_config
.max_devices
);
1055 host
->sg_tablesize
= le32_to_cpu(iop_config
.max_sg_count
);
1056 host
->can_queue
= le32_to_cpu(iop_config
.max_requests
);
1057 host
->cmd_per_lun
= le32_to_cpu(iop_config
.max_requests
);
1058 host
->max_cmd_len
= 16;
1060 req_size
= sizeof(struct hpt_iop_request_scsi_command
)
1061 + sizeof(struct hpt_iopsg
) * (hba
->max_sg_descriptors
- 1);
1062 if ((req_size
& 0x1f) != 0)
1063 req_size
= (req_size
+ 0x1f) & ~0x1f;
1065 memset(&set_config
, 0, sizeof(struct hpt_iop_request_set_config
));
1066 set_config
.iop_id
= cpu_to_le32(host
->host_no
);
1067 set_config
.vbus_id
= cpu_to_le16(host
->host_no
);
1068 set_config
.max_host_request_size
= cpu_to_le16(req_size
);
1070 if (hba
->ops
->set_config(hba
, &set_config
)) {
1071 printk(KERN_ERR
"scsi%d: set config failed\n",
1072 hba
->host
->host_no
);
1076 pci_set_drvdata(pcidev
, host
);
1078 if (request_irq(pcidev
->irq
, hptiop_intr
, IRQF_SHARED
,
1079 driver_name
, hba
)) {
1080 printk(KERN_ERR
"scsi%d: request irq %d failed\n",
1081 hba
->host
->host_no
, pcidev
->irq
);
1085 /* Allocate request mem */
1087 dprintk("req_size=%d, max_requests=%d\n", req_size
, hba
->max_requests
);
1089 hba
->req_size
= req_size
;
1090 start_virt
= dma_alloc_coherent(&pcidev
->dev
,
1091 hba
->req_size
*hba
->max_requests
+ 0x20,
1092 &start_phy
, GFP_KERNEL
);
1095 printk(KERN_ERR
"scsi%d: fail to alloc request mem\n",
1096 hba
->host
->host_no
);
1097 goto free_request_irq
;
1100 hba
->dma_coherent
= start_virt
;
1101 hba
->dma_coherent_handle
= start_phy
;
1103 if ((start_phy
& 0x1f) != 0)
1105 offset
= ((start_phy
+ 0x1f) & ~0x1f) - start_phy
;
1106 start_phy
+= offset
;
1107 start_virt
+= offset
;
1110 hba
->req_list
= start_virt
;
1111 for (i
= 0; i
< hba
->max_requests
; i
++) {
1112 hba
->reqs
[i
].next
= NULL
;
1113 hba
->reqs
[i
].req_virt
= start_virt
;
1114 hba
->reqs
[i
].req_shifted_phy
= start_phy
>> 5;
1115 hba
->reqs
[i
].index
= i
;
1116 free_req(hba
, &hba
->reqs
[i
]);
1117 start_virt
= (char *)start_virt
+ hba
->req_size
;
1118 start_phy
= start_phy
+ hba
->req_size
;
1121 /* Enable Interrupt and start background task */
1122 if (hptiop_initialize_iop(hba
))
1123 goto free_request_mem
;
1125 if (scsi_add_host(host
, &pcidev
->dev
)) {
1126 printk(KERN_ERR
"scsi%d: scsi_add_host failed\n",
1127 hba
->host
->host_no
);
1128 goto free_request_mem
;
1132 scsi_scan_host(host
);
1134 dprintk("scsi%d: hptiop_probe successfully\n", hba
->host
->host_no
);
1138 dma_free_coherent(&hba
->pcidev
->dev
,
1139 hba
->req_size
* hba
->max_requests
+ 0x20,
1140 hba
->dma_coherent
, hba
->dma_coherent_handle
);
1143 free_irq(hba
->pcidev
->irq
, hba
);
1146 if (hba
->ops
->internal_memfree
)
1147 hba
->ops
->internal_memfree(hba
);
1149 hba
->ops
->unmap_pci_bar(hba
);
1152 scsi_host_put(host
);
1155 pci_release_regions(pcidev
);
1158 pci_disable_device(pcidev
);
1160 dprintk("scsi%d: hptiop_probe fail\n", host
? host
->host_no
: 0);
1164 static void hptiop_shutdown(struct pci_dev
*pcidev
)
1166 struct Scsi_Host
*host
= pci_get_drvdata(pcidev
);
1167 struct hptiop_hba
*hba
= (struct hptiop_hba
*)host
->hostdata
;
1169 dprintk("hptiop_shutdown(%p)\n", hba
);
1172 if (iop_send_sync_msg(hba
, IOPMU_INBOUND_MSG0_SHUTDOWN
, 60000))
1173 printk(KERN_ERR
"scsi%d: shutdown the iop timeout\n",
1174 hba
->host
->host_no
);
1176 /* disable all outbound interrupts */
1177 hba
->ops
->disable_intr(hba
);
1180 static void hptiop_disable_intr_itl(struct hptiop_hba
*hba
)
1184 int_mask
= readl(&hba
->u
.itl
.iop
->outbound_intmask
);
1186 IOPMU_OUTBOUND_INT_MSG0
| IOPMU_OUTBOUND_INT_POSTQUEUE
,
1187 &hba
->u
.itl
.iop
->outbound_intmask
);
1188 readl(&hba
->u
.itl
.iop
->outbound_intmask
);
1191 static void hptiop_disable_intr_mv(struct hptiop_hba
*hba
)
1193 writel(0, &hba
->u
.mv
.regs
->outbound_intmask
);
1194 readl(&hba
->u
.mv
.regs
->outbound_intmask
);
1197 static void hptiop_remove(struct pci_dev
*pcidev
)
1199 struct Scsi_Host
*host
= pci_get_drvdata(pcidev
);
1200 struct hptiop_hba
*hba
= (struct hptiop_hba
*)host
->hostdata
;
1202 dprintk("scsi%d: hptiop_remove\n", hba
->host
->host_no
);
1204 scsi_remove_host(host
);
1206 hptiop_shutdown(pcidev
);
1208 free_irq(hba
->pcidev
->irq
, hba
);
1210 dma_free_coherent(&hba
->pcidev
->dev
,
1211 hba
->req_size
* hba
->max_requests
+ 0x20,
1213 hba
->dma_coherent_handle
);
1215 if (hba
->ops
->internal_memfree
)
1216 hba
->ops
->internal_memfree(hba
);
1218 hba
->ops
->unmap_pci_bar(hba
);
1220 pci_release_regions(hba
->pcidev
);
1221 pci_set_drvdata(hba
->pcidev
, NULL
);
1222 pci_disable_device(hba
->pcidev
);
1224 scsi_host_put(host
);
1227 static struct hptiop_adapter_ops hptiop_itl_ops
= {
1228 .iop_wait_ready
= iop_wait_ready_itl
,
1229 .internal_memalloc
= NULL
,
1230 .internal_memfree
= NULL
,
1231 .map_pci_bar
= hptiop_map_pci_bar_itl
,
1232 .unmap_pci_bar
= hptiop_unmap_pci_bar_itl
,
1233 .enable_intr
= hptiop_enable_intr_itl
,
1234 .disable_intr
= hptiop_disable_intr_itl
,
1235 .get_config
= iop_get_config_itl
,
1236 .set_config
= iop_set_config_itl
,
1237 .iop_intr
= iop_intr_itl
,
1238 .post_msg
= hptiop_post_msg_itl
,
1239 .post_req
= hptiop_post_req_itl
,
1242 static struct hptiop_adapter_ops hptiop_mv_ops
= {
1243 .iop_wait_ready
= iop_wait_ready_mv
,
1244 .internal_memalloc
= hptiop_internal_memalloc_mv
,
1245 .internal_memfree
= hptiop_internal_memfree_mv
,
1246 .map_pci_bar
= hptiop_map_pci_bar_mv
,
1247 .unmap_pci_bar
= hptiop_unmap_pci_bar_mv
,
1248 .enable_intr
= hptiop_enable_intr_mv
,
1249 .disable_intr
= hptiop_disable_intr_mv
,
1250 .get_config
= iop_get_config_mv
,
1251 .set_config
= iop_set_config_mv
,
1252 .iop_intr
= iop_intr_mv
,
1253 .post_msg
= hptiop_post_msg_mv
,
1254 .post_req
= hptiop_post_req_mv
,
1257 static struct pci_device_id hptiop_id_table
[] = {
1258 { PCI_VDEVICE(TTI
, 0x3220), (kernel_ulong_t
)&hptiop_itl_ops
},
1259 { PCI_VDEVICE(TTI
, 0x3320), (kernel_ulong_t
)&hptiop_itl_ops
},
1260 { PCI_VDEVICE(TTI
, 0x3410), (kernel_ulong_t
)&hptiop_itl_ops
},
1261 { PCI_VDEVICE(TTI
, 0x3510), (kernel_ulong_t
)&hptiop_itl_ops
},
1262 { PCI_VDEVICE(TTI
, 0x3511), (kernel_ulong_t
)&hptiop_itl_ops
},
1263 { PCI_VDEVICE(TTI
, 0x3520), (kernel_ulong_t
)&hptiop_itl_ops
},
1264 { PCI_VDEVICE(TTI
, 0x3521), (kernel_ulong_t
)&hptiop_itl_ops
},
1265 { PCI_VDEVICE(TTI
, 0x3522), (kernel_ulong_t
)&hptiop_itl_ops
},
1266 { PCI_VDEVICE(TTI
, 0x3530), (kernel_ulong_t
)&hptiop_itl_ops
},
1267 { PCI_VDEVICE(TTI
, 0x3540), (kernel_ulong_t
)&hptiop_itl_ops
},
1268 { PCI_VDEVICE(TTI
, 0x3560), (kernel_ulong_t
)&hptiop_itl_ops
},
1269 { PCI_VDEVICE(TTI
, 0x4210), (kernel_ulong_t
)&hptiop_itl_ops
},
1270 { PCI_VDEVICE(TTI
, 0x4211), (kernel_ulong_t
)&hptiop_itl_ops
},
1271 { PCI_VDEVICE(TTI
, 0x4310), (kernel_ulong_t
)&hptiop_itl_ops
},
1272 { PCI_VDEVICE(TTI
, 0x4311), (kernel_ulong_t
)&hptiop_itl_ops
},
1273 { PCI_VDEVICE(TTI
, 0x4320), (kernel_ulong_t
)&hptiop_itl_ops
},
1274 { PCI_VDEVICE(TTI
, 0x4321), (kernel_ulong_t
)&hptiop_itl_ops
},
1275 { PCI_VDEVICE(TTI
, 0x4322), (kernel_ulong_t
)&hptiop_itl_ops
},
1276 { PCI_VDEVICE(TTI
, 0x4400), (kernel_ulong_t
)&hptiop_itl_ops
},
1277 { PCI_VDEVICE(TTI
, 0x3120), (kernel_ulong_t
)&hptiop_mv_ops
},
1278 { PCI_VDEVICE(TTI
, 0x3122), (kernel_ulong_t
)&hptiop_mv_ops
},
1279 { PCI_VDEVICE(TTI
, 0x3020), (kernel_ulong_t
)&hptiop_mv_ops
},
1283 MODULE_DEVICE_TABLE(pci
, hptiop_id_table
);
1285 static struct pci_driver hptiop_pci_driver
= {
1286 .name
= driver_name
,
1287 .id_table
= hptiop_id_table
,
1288 .probe
= hptiop_probe
,
1289 .remove
= hptiop_remove
,
1290 .shutdown
= hptiop_shutdown
,
1293 static int __init
hptiop_module_init(void)
1295 printk(KERN_INFO
"%s %s\n", driver_name_long
, driver_ver
);
1296 return pci_register_driver(&hptiop_pci_driver
);
1299 static void __exit
hptiop_module_exit(void)
1301 pci_unregister_driver(&hptiop_pci_driver
);
1305 module_init(hptiop_module_init
);
1306 module_exit(hptiop_module_exit
);
1308 MODULE_LICENSE("GPL");