avr32: Clean up and optimize the TLB operations
[linux/fpc-iii.git] / drivers / scsi / 3w-9xxx.c
blob867f6fd5c2c019e51e310e7cb04de44e098f00d3
1 /*
2 3w-9xxx.c -- 3ware 9000 Storage Controller device driver for Linux.
4 Written By: Adam Radford <linuxraid@amcc.com>
5 Modifications By: Tom Couch <linuxraid@amcc.com>
7 Copyright (C) 2004-2007 Applied Micro Circuits Corporation.
9 This program is free software; you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation; version 2 of the License.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 NO WARRANTY
19 THE PROGRAM IS PROVIDED ON AN "AS IS" BASIS, WITHOUT WARRANTIES OR
20 CONDITIONS OF ANY KIND, EITHER EXPRESS OR IMPLIED INCLUDING, WITHOUT
21 LIMITATION, ANY WARRANTIES OR CONDITIONS OF TITLE, NON-INFRINGEMENT,
22 MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE. Each Recipient is
23 solely responsible for determining the appropriateness of using and
24 distributing the Program and assumes all risks associated with its
25 exercise of rights under this Agreement, including but not limited to
26 the risks and costs of program errors, damage to or loss of data,
27 programs or equipment, and unavailability or interruption of operations.
29 DISCLAIMER OF LIABILITY
30 NEITHER RECIPIENT NOR ANY CONTRIBUTORS SHALL HAVE ANY LIABILITY FOR ANY
31 DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
32 DAMAGES (INCLUDING WITHOUT LIMITATION LOST PROFITS), HOWEVER CAUSED AND
33 ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR
34 TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE
35 USE OR DISTRIBUTION OF THE PROGRAM OR THE EXERCISE OF ANY RIGHTS GRANTED
36 HEREUNDER, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGES
38 You should have received a copy of the GNU General Public License
39 along with this program; if not, write to the Free Software
40 Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
42 Bugs/Comments/Suggestions should be mailed to:
43 linuxraid@amcc.com
45 For more information, goto:
46 http://www.amcc.com
48 Note: This version of the driver does not contain a bundled firmware
49 image.
51 History
52 -------
53 2.26.02.000 - Driver cleanup for kernel submission.
54 2.26.02.001 - Replace schedule_timeout() calls with msleep().
55 2.26.02.002 - Add support for PAE mode.
56 Add lun support.
57 Fix twa_remove() to free irq handler/unregister_chrdev()
58 before shutting down card.
59 Change to new 'change_queue_depth' api.
60 Fix 'handled=1' ISR usage, remove bogus IRQ check.
61 Remove un-needed eh_abort handler.
62 Add support for embedded firmware error strings.
63 2.26.02.003 - Correctly handle single sgl's with use_sg=1.
64 2.26.02.004 - Add support for 9550SX controllers.
65 2.26.02.005 - Fix use_sg == 0 mapping on systems with 4GB or higher.
66 2.26.02.006 - Fix 9550SX pchip reset timeout.
67 Add big endian support.
68 2.26.02.007 - Disable local interrupts during kmap/unmap_atomic().
69 2.26.02.008 - Free irq handler in __twa_shutdown().
70 Serialize reset code.
71 Add support for 9650SE controllers.
72 2.26.02.009 - Fix dma mask setting to fallback to 32-bit if 64-bit fails.
73 2.26.02.010 - Add support for 9690SA controllers.
76 #include <linux/module.h>
77 #include <linux/reboot.h>
78 #include <linux/spinlock.h>
79 #include <linux/interrupt.h>
80 #include <linux/moduleparam.h>
81 #include <linux/errno.h>
82 #include <linux/types.h>
83 #include <linux/delay.h>
84 #include <linux/pci.h>
85 #include <linux/time.h>
86 #include <linux/mutex.h>
87 #include <asm/io.h>
88 #include <asm/irq.h>
89 #include <asm/uaccess.h>
90 #include <scsi/scsi.h>
91 #include <scsi/scsi_host.h>
92 #include <scsi/scsi_tcq.h>
93 #include <scsi/scsi_cmnd.h>
94 #include "3w-9xxx.h"
96 /* Globals */
97 #define TW_DRIVER_VERSION "2.26.02.010"
98 static TW_Device_Extension *twa_device_extension_list[TW_MAX_SLOT];
99 static unsigned int twa_device_extension_count;
100 static int twa_major = -1;
101 extern struct timezone sys_tz;
103 /* Module parameters */
104 MODULE_AUTHOR ("AMCC");
105 MODULE_DESCRIPTION ("3ware 9000 Storage Controller Linux Driver");
106 MODULE_LICENSE("GPL");
107 MODULE_VERSION(TW_DRIVER_VERSION);
109 /* Function prototypes */
110 static void twa_aen_queue_event(TW_Device_Extension *tw_dev, TW_Command_Apache_Header *header);
111 static int twa_aen_read_queue(TW_Device_Extension *tw_dev, int request_id);
112 static char *twa_aen_severity_lookup(unsigned char severity_code);
113 static void twa_aen_sync_time(TW_Device_Extension *tw_dev, int request_id);
114 static int twa_chrdev_ioctl(struct inode *inode, struct file *file, unsigned int cmd, unsigned long arg);
115 static int twa_chrdev_open(struct inode *inode, struct file *file);
116 static int twa_fill_sense(TW_Device_Extension *tw_dev, int request_id, int copy_sense, int print_host);
117 static void twa_free_request_id(TW_Device_Extension *tw_dev,int request_id);
118 static void twa_get_request_id(TW_Device_Extension *tw_dev, int *request_id);
119 static int twa_initconnection(TW_Device_Extension *tw_dev, int message_credits,
120 u32 set_features, unsigned short current_fw_srl,
121 unsigned short current_fw_arch_id,
122 unsigned short current_fw_branch,
123 unsigned short current_fw_build,
124 unsigned short *fw_on_ctlr_srl,
125 unsigned short *fw_on_ctlr_arch_id,
126 unsigned short *fw_on_ctlr_branch,
127 unsigned short *fw_on_ctlr_build,
128 u32 *init_connect_result);
129 static void twa_load_sgl(TW_Device_Extension *tw_dev, TW_Command_Full *full_command_packet, int request_id, dma_addr_t dma_handle, int length);
130 static int twa_poll_response(TW_Device_Extension *tw_dev, int request_id, int seconds);
131 static int twa_poll_status_gone(TW_Device_Extension *tw_dev, u32 flag, int seconds);
132 static int twa_post_command_packet(TW_Device_Extension *tw_dev, int request_id, char internal);
133 static int twa_reset_device_extension(TW_Device_Extension *tw_dev);
134 static int twa_reset_sequence(TW_Device_Extension *tw_dev, int soft_reset);
135 static int twa_scsiop_execute_scsi(TW_Device_Extension *tw_dev, int request_id, char *cdb, int use_sg, TW_SG_Entry *sglistarg);
136 static void twa_scsiop_execute_scsi_complete(TW_Device_Extension *tw_dev, int request_id);
137 static char *twa_string_lookup(twa_message_type *table, unsigned int aen_code);
138 static void twa_unmap_scsi_data(TW_Device_Extension *tw_dev, int request_id);
140 /* Functions */
142 /* Show some statistics about the card */
143 static ssize_t twa_show_stats(struct device *dev,
144 struct device_attribute *attr, char *buf)
146 struct Scsi_Host *host = class_to_shost(dev);
147 TW_Device_Extension *tw_dev = (TW_Device_Extension *)host->hostdata;
148 unsigned long flags = 0;
149 ssize_t len;
151 spin_lock_irqsave(tw_dev->host->host_lock, flags);
152 len = snprintf(buf, PAGE_SIZE, "3w-9xxx Driver version: %s\n"
153 "Current commands posted: %4d\n"
154 "Max commands posted: %4d\n"
155 "Current pending commands: %4d\n"
156 "Max pending commands: %4d\n"
157 "Last sgl length: %4d\n"
158 "Max sgl length: %4d\n"
159 "Last sector count: %4d\n"
160 "Max sector count: %4d\n"
161 "SCSI Host Resets: %4d\n"
162 "AEN's: %4d\n",
163 TW_DRIVER_VERSION,
164 tw_dev->posted_request_count,
165 tw_dev->max_posted_request_count,
166 tw_dev->pending_request_count,
167 tw_dev->max_pending_request_count,
168 tw_dev->sgl_entries,
169 tw_dev->max_sgl_entries,
170 tw_dev->sector_count,
171 tw_dev->max_sector_count,
172 tw_dev->num_resets,
173 tw_dev->aen_count);
174 spin_unlock_irqrestore(tw_dev->host->host_lock, flags);
175 return len;
176 } /* End twa_show_stats() */
178 /* This function will set a devices queue depth */
179 static int twa_change_queue_depth(struct scsi_device *sdev, int queue_depth)
181 if (queue_depth > TW_Q_LENGTH-2)
182 queue_depth = TW_Q_LENGTH-2;
183 scsi_adjust_queue_depth(sdev, MSG_ORDERED_TAG, queue_depth);
184 return queue_depth;
185 } /* End twa_change_queue_depth() */
187 /* Create sysfs 'stats' entry */
188 static struct device_attribute twa_host_stats_attr = {
189 .attr = {
190 .name = "stats",
191 .mode = S_IRUGO,
193 .show = twa_show_stats
196 /* Host attributes initializer */
197 static struct device_attribute *twa_host_attrs[] = {
198 &twa_host_stats_attr,
199 NULL,
202 /* File operations struct for character device */
203 static const struct file_operations twa_fops = {
204 .owner = THIS_MODULE,
205 .ioctl = twa_chrdev_ioctl,
206 .open = twa_chrdev_open,
207 .release = NULL
210 /* This function will complete an aen request from the isr */
211 static int twa_aen_complete(TW_Device_Extension *tw_dev, int request_id)
213 TW_Command_Full *full_command_packet;
214 TW_Command *command_packet;
215 TW_Command_Apache_Header *header;
216 unsigned short aen;
217 int retval = 1;
219 header = (TW_Command_Apache_Header *)tw_dev->generic_buffer_virt[request_id];
220 tw_dev->posted_request_count--;
221 aen = le16_to_cpu(header->status_block.error);
222 full_command_packet = tw_dev->command_packet_virt[request_id];
223 command_packet = &full_command_packet->command.oldcommand;
225 /* First check for internal completion of set param for time sync */
226 if (TW_OP_OUT(command_packet->opcode__sgloffset) == TW_OP_SET_PARAM) {
227 /* Keep reading the queue in case there are more aen's */
228 if (twa_aen_read_queue(tw_dev, request_id))
229 goto out2;
230 else {
231 retval = 0;
232 goto out;
236 switch (aen) {
237 case TW_AEN_QUEUE_EMPTY:
238 /* Quit reading the queue if this is the last one */
239 break;
240 case TW_AEN_SYNC_TIME_WITH_HOST:
241 twa_aen_sync_time(tw_dev, request_id);
242 retval = 0;
243 goto out;
244 default:
245 twa_aen_queue_event(tw_dev, header);
247 /* If there are more aen's, keep reading the queue */
248 if (twa_aen_read_queue(tw_dev, request_id))
249 goto out2;
250 else {
251 retval = 0;
252 goto out;
255 retval = 0;
256 out2:
257 tw_dev->state[request_id] = TW_S_COMPLETED;
258 twa_free_request_id(tw_dev, request_id);
259 clear_bit(TW_IN_ATTENTION_LOOP, &tw_dev->flags);
260 out:
261 return retval;
262 } /* End twa_aen_complete() */
264 /* This function will drain aen queue */
265 static int twa_aen_drain_queue(TW_Device_Extension *tw_dev, int no_check_reset)
267 int request_id = 0;
268 char cdb[TW_MAX_CDB_LEN];
269 TW_SG_Entry sglist[1];
270 int finished = 0, count = 0;
271 TW_Command_Full *full_command_packet;
272 TW_Command_Apache_Header *header;
273 unsigned short aen;
274 int first_reset = 0, queue = 0, retval = 1;
276 if (no_check_reset)
277 first_reset = 0;
278 else
279 first_reset = 1;
281 full_command_packet = tw_dev->command_packet_virt[request_id];
282 memset(full_command_packet, 0, sizeof(TW_Command_Full));
284 /* Initialize cdb */
285 memset(&cdb, 0, TW_MAX_CDB_LEN);
286 cdb[0] = REQUEST_SENSE; /* opcode */
287 cdb[4] = TW_ALLOCATION_LENGTH; /* allocation length */
289 /* Initialize sglist */
290 memset(&sglist, 0, sizeof(TW_SG_Entry));
291 sglist[0].length = TW_SECTOR_SIZE;
292 sglist[0].address = tw_dev->generic_buffer_phys[request_id];
294 if (sglist[0].address & TW_ALIGNMENT_9000_SGL) {
295 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x1, "Found unaligned address during AEN drain");
296 goto out;
299 /* Mark internal command */
300 tw_dev->srb[request_id] = NULL;
302 do {
303 /* Send command to the board */
304 if (twa_scsiop_execute_scsi(tw_dev, request_id, cdb, 1, sglist)) {
305 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x2, "Error posting request sense");
306 goto out;
309 /* Now poll for completion */
310 if (twa_poll_response(tw_dev, request_id, 30)) {
311 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x3, "No valid response while draining AEN queue");
312 tw_dev->posted_request_count--;
313 goto out;
316 tw_dev->posted_request_count--;
317 header = (TW_Command_Apache_Header *)tw_dev->generic_buffer_virt[request_id];
318 aen = le16_to_cpu(header->status_block.error);
319 queue = 0;
320 count++;
322 switch (aen) {
323 case TW_AEN_QUEUE_EMPTY:
324 if (first_reset != 1)
325 goto out;
326 else
327 finished = 1;
328 break;
329 case TW_AEN_SOFT_RESET:
330 if (first_reset == 0)
331 first_reset = 1;
332 else
333 queue = 1;
334 break;
335 case TW_AEN_SYNC_TIME_WITH_HOST:
336 break;
337 default:
338 queue = 1;
341 /* Now queue an event info */
342 if (queue)
343 twa_aen_queue_event(tw_dev, header);
344 } while ((finished == 0) && (count < TW_MAX_AEN_DRAIN));
346 if (count == TW_MAX_AEN_DRAIN)
347 goto out;
349 retval = 0;
350 out:
351 tw_dev->state[request_id] = TW_S_INITIAL;
352 return retval;
353 } /* End twa_aen_drain_queue() */
355 /* This function will queue an event */
356 static void twa_aen_queue_event(TW_Device_Extension *tw_dev, TW_Command_Apache_Header *header)
358 u32 local_time;
359 struct timeval time;
360 TW_Event *event;
361 unsigned short aen;
362 char host[16];
363 char *error_str;
365 tw_dev->aen_count++;
367 /* Fill out event info */
368 event = tw_dev->event_queue[tw_dev->error_index];
370 /* Check for clobber */
371 host[0] = '\0';
372 if (tw_dev->host) {
373 sprintf(host, " scsi%d:", tw_dev->host->host_no);
374 if (event->retrieved == TW_AEN_NOT_RETRIEVED)
375 tw_dev->aen_clobber = 1;
378 aen = le16_to_cpu(header->status_block.error);
379 memset(event, 0, sizeof(TW_Event));
381 event->severity = TW_SEV_OUT(header->status_block.severity__reserved);
382 do_gettimeofday(&time);
383 local_time = (u32)(time.tv_sec - (sys_tz.tz_minuteswest * 60));
384 event->time_stamp_sec = local_time;
385 event->aen_code = aen;
386 event->retrieved = TW_AEN_NOT_RETRIEVED;
387 event->sequence_id = tw_dev->error_sequence_id;
388 tw_dev->error_sequence_id++;
390 /* Check for embedded error string */
391 error_str = &(header->err_specific_desc[strlen(header->err_specific_desc)+1]);
393 header->err_specific_desc[sizeof(header->err_specific_desc) - 1] = '\0';
394 event->parameter_len = strlen(header->err_specific_desc);
395 memcpy(event->parameter_data, header->err_specific_desc, event->parameter_len + (error_str[0] == '\0' ? 0 : (1 + strlen(error_str))));
396 if (event->severity != TW_AEN_SEVERITY_DEBUG)
397 printk(KERN_WARNING "3w-9xxx:%s AEN: %s (0x%02X:0x%04X): %s:%s.\n",
398 host,
399 twa_aen_severity_lookup(TW_SEV_OUT(header->status_block.severity__reserved)),
400 TW_MESSAGE_SOURCE_CONTROLLER_EVENT, aen,
401 error_str[0] == '\0' ? twa_string_lookup(twa_aen_table, aen) : error_str,
402 header->err_specific_desc);
403 else
404 tw_dev->aen_count--;
406 if ((tw_dev->error_index + 1) == TW_Q_LENGTH)
407 tw_dev->event_queue_wrapped = 1;
408 tw_dev->error_index = (tw_dev->error_index + 1 ) % TW_Q_LENGTH;
409 } /* End twa_aen_queue_event() */
411 /* This function will read the aen queue from the isr */
412 static int twa_aen_read_queue(TW_Device_Extension *tw_dev, int request_id)
414 char cdb[TW_MAX_CDB_LEN];
415 TW_SG_Entry sglist[1];
416 TW_Command_Full *full_command_packet;
417 int retval = 1;
419 full_command_packet = tw_dev->command_packet_virt[request_id];
420 memset(full_command_packet, 0, sizeof(TW_Command_Full));
422 /* Initialize cdb */
423 memset(&cdb, 0, TW_MAX_CDB_LEN);
424 cdb[0] = REQUEST_SENSE; /* opcode */
425 cdb[4] = TW_ALLOCATION_LENGTH; /* allocation length */
427 /* Initialize sglist */
428 memset(&sglist, 0, sizeof(TW_SG_Entry));
429 sglist[0].length = TW_SECTOR_SIZE;
430 sglist[0].address = tw_dev->generic_buffer_phys[request_id];
432 /* Mark internal command */
433 tw_dev->srb[request_id] = NULL;
435 /* Now post the command packet */
436 if (twa_scsiop_execute_scsi(tw_dev, request_id, cdb, 1, sglist)) {
437 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x4, "Post failed while reading AEN queue");
438 goto out;
440 retval = 0;
441 out:
442 return retval;
443 } /* End twa_aen_read_queue() */
445 /* This function will look up an AEN severity string */
446 static char *twa_aen_severity_lookup(unsigned char severity_code)
448 char *retval = NULL;
450 if ((severity_code < (unsigned char) TW_AEN_SEVERITY_ERROR) ||
451 (severity_code > (unsigned char) TW_AEN_SEVERITY_DEBUG))
452 goto out;
454 retval = twa_aen_severity_table[severity_code];
455 out:
456 return retval;
457 } /* End twa_aen_severity_lookup() */
459 /* This function will sync firmware time with the host time */
460 static void twa_aen_sync_time(TW_Device_Extension *tw_dev, int request_id)
462 u32 schedulertime;
463 struct timeval utc;
464 TW_Command_Full *full_command_packet;
465 TW_Command *command_packet;
466 TW_Param_Apache *param;
467 u32 local_time;
469 /* Fill out the command packet */
470 full_command_packet = tw_dev->command_packet_virt[request_id];
471 memset(full_command_packet, 0, sizeof(TW_Command_Full));
472 command_packet = &full_command_packet->command.oldcommand;
473 command_packet->opcode__sgloffset = TW_OPSGL_IN(2, TW_OP_SET_PARAM);
474 command_packet->request_id = request_id;
475 command_packet->byte8_offset.param.sgl[0].address = TW_CPU_TO_SGL(tw_dev->generic_buffer_phys[request_id]);
476 command_packet->byte8_offset.param.sgl[0].length = cpu_to_le32(TW_SECTOR_SIZE);
477 command_packet->size = TW_COMMAND_SIZE;
478 command_packet->byte6_offset.parameter_count = cpu_to_le16(1);
480 /* Setup the param */
481 param = (TW_Param_Apache *)tw_dev->generic_buffer_virt[request_id];
482 memset(param, 0, TW_SECTOR_SIZE);
483 param->table_id = cpu_to_le16(TW_TIMEKEEP_TABLE | 0x8000); /* Controller time keep table */
484 param->parameter_id = cpu_to_le16(0x3); /* SchedulerTime */
485 param->parameter_size_bytes = cpu_to_le16(4);
487 /* Convert system time in UTC to local time seconds since last
488 Sunday 12:00AM */
489 do_gettimeofday(&utc);
490 local_time = (u32)(utc.tv_sec - (sys_tz.tz_minuteswest * 60));
491 schedulertime = local_time - (3 * 86400);
492 schedulertime = cpu_to_le32(schedulertime % 604800);
494 memcpy(param->data, &schedulertime, sizeof(u32));
496 /* Mark internal command */
497 tw_dev->srb[request_id] = NULL;
499 /* Now post the command */
500 twa_post_command_packet(tw_dev, request_id, 1);
501 } /* End twa_aen_sync_time() */
503 /* This function will allocate memory and check if it is correctly aligned */
504 static int twa_allocate_memory(TW_Device_Extension *tw_dev, int size, int which)
506 int i;
507 dma_addr_t dma_handle;
508 unsigned long *cpu_addr;
509 int retval = 1;
511 cpu_addr = pci_alloc_consistent(tw_dev->tw_pci_dev, size*TW_Q_LENGTH, &dma_handle);
512 if (!cpu_addr) {
513 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x5, "Memory allocation failed");
514 goto out;
517 if ((unsigned long)cpu_addr % (TW_ALIGNMENT_9000)) {
518 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x6, "Failed to allocate correctly aligned memory");
519 pci_free_consistent(tw_dev->tw_pci_dev, size*TW_Q_LENGTH, cpu_addr, dma_handle);
520 goto out;
523 memset(cpu_addr, 0, size*TW_Q_LENGTH);
525 for (i = 0; i < TW_Q_LENGTH; i++) {
526 switch(which) {
527 case 0:
528 tw_dev->command_packet_phys[i] = dma_handle+(i*size);
529 tw_dev->command_packet_virt[i] = (TW_Command_Full *)((unsigned char *)cpu_addr + (i*size));
530 break;
531 case 1:
532 tw_dev->generic_buffer_phys[i] = dma_handle+(i*size);
533 tw_dev->generic_buffer_virt[i] = (unsigned long *)((unsigned char *)cpu_addr + (i*size));
534 break;
537 retval = 0;
538 out:
539 return retval;
540 } /* End twa_allocate_memory() */
542 /* This function will check the status register for unexpected bits */
543 static int twa_check_bits(u32 status_reg_value)
545 int retval = 1;
547 if ((status_reg_value & TW_STATUS_EXPECTED_BITS) != TW_STATUS_EXPECTED_BITS)
548 goto out;
549 if ((status_reg_value & TW_STATUS_UNEXPECTED_BITS) != 0)
550 goto out;
552 retval = 0;
553 out:
554 return retval;
555 } /* End twa_check_bits() */
557 /* This function will check the srl and decide if we are compatible */
558 static int twa_check_srl(TW_Device_Extension *tw_dev, int *flashed)
560 int retval = 1;
561 unsigned short fw_on_ctlr_srl = 0, fw_on_ctlr_arch_id = 0;
562 unsigned short fw_on_ctlr_branch = 0, fw_on_ctlr_build = 0;
563 u32 init_connect_result = 0;
565 if (twa_initconnection(tw_dev, TW_INIT_MESSAGE_CREDITS,
566 TW_EXTENDED_INIT_CONNECT, TW_CURRENT_DRIVER_SRL,
567 TW_9000_ARCH_ID, TW_CURRENT_DRIVER_BRANCH,
568 TW_CURRENT_DRIVER_BUILD, &fw_on_ctlr_srl,
569 &fw_on_ctlr_arch_id, &fw_on_ctlr_branch,
570 &fw_on_ctlr_build, &init_connect_result)) {
571 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x7, "Initconnection failed while checking SRL");
572 goto out;
575 tw_dev->tw_compat_info.working_srl = fw_on_ctlr_srl;
576 tw_dev->tw_compat_info.working_branch = fw_on_ctlr_branch;
577 tw_dev->tw_compat_info.working_build = fw_on_ctlr_build;
579 /* Try base mode compatibility */
580 if (!(init_connect_result & TW_CTLR_FW_COMPATIBLE)) {
581 if (twa_initconnection(tw_dev, TW_INIT_MESSAGE_CREDITS,
582 TW_EXTENDED_INIT_CONNECT,
583 TW_BASE_FW_SRL, TW_9000_ARCH_ID,
584 TW_BASE_FW_BRANCH, TW_BASE_FW_BUILD,
585 &fw_on_ctlr_srl, &fw_on_ctlr_arch_id,
586 &fw_on_ctlr_branch, &fw_on_ctlr_build,
587 &init_connect_result)) {
588 TW_PRINTK(tw_dev->host, TW_DRIVER, 0xa, "Initconnection (base mode) failed while checking SRL");
589 goto out;
591 if (!(init_connect_result & TW_CTLR_FW_COMPATIBLE)) {
592 if (TW_CURRENT_DRIVER_SRL > fw_on_ctlr_srl) {
593 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x32, "Firmware and driver incompatibility: please upgrade firmware");
594 } else {
595 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x33, "Firmware and driver incompatibility: please upgrade driver");
597 goto out;
599 tw_dev->tw_compat_info.working_srl = TW_BASE_FW_SRL;
600 tw_dev->tw_compat_info.working_branch = TW_BASE_FW_BRANCH;
601 tw_dev->tw_compat_info.working_build = TW_BASE_FW_BUILD;
604 /* Load rest of compatibility struct */
605 strncpy(tw_dev->tw_compat_info.driver_version, TW_DRIVER_VERSION, strlen(TW_DRIVER_VERSION));
606 tw_dev->tw_compat_info.driver_srl_high = TW_CURRENT_DRIVER_SRL;
607 tw_dev->tw_compat_info.driver_branch_high = TW_CURRENT_DRIVER_BRANCH;
608 tw_dev->tw_compat_info.driver_build_high = TW_CURRENT_DRIVER_BUILD;
609 tw_dev->tw_compat_info.driver_srl_low = TW_BASE_FW_SRL;
610 tw_dev->tw_compat_info.driver_branch_low = TW_BASE_FW_BRANCH;
611 tw_dev->tw_compat_info.driver_build_low = TW_BASE_FW_BUILD;
612 tw_dev->tw_compat_info.fw_on_ctlr_srl = fw_on_ctlr_srl;
613 tw_dev->tw_compat_info.fw_on_ctlr_branch = fw_on_ctlr_branch;
614 tw_dev->tw_compat_info.fw_on_ctlr_build = fw_on_ctlr_build;
616 retval = 0;
617 out:
618 return retval;
619 } /* End twa_check_srl() */
621 /* This function handles ioctl for the character device */
622 static int twa_chrdev_ioctl(struct inode *inode, struct file *file, unsigned int cmd, unsigned long arg)
624 long timeout;
625 unsigned long *cpu_addr, data_buffer_length_adjusted = 0, flags = 0;
626 dma_addr_t dma_handle;
627 int request_id = 0;
628 unsigned int sequence_id = 0;
629 unsigned char event_index, start_index;
630 TW_Ioctl_Driver_Command driver_command;
631 TW_Ioctl_Buf_Apache *tw_ioctl;
632 TW_Lock *tw_lock;
633 TW_Command_Full *full_command_packet;
634 TW_Compatibility_Info *tw_compat_info;
635 TW_Event *event;
636 struct timeval current_time;
637 u32 current_time_ms;
638 TW_Device_Extension *tw_dev = twa_device_extension_list[iminor(inode)];
639 int retval = TW_IOCTL_ERROR_OS_EFAULT;
640 void __user *argp = (void __user *)arg;
642 /* Only let one of these through at a time */
643 if (mutex_lock_interruptible(&tw_dev->ioctl_lock)) {
644 retval = TW_IOCTL_ERROR_OS_EINTR;
645 goto out;
648 /* First copy down the driver command */
649 if (copy_from_user(&driver_command, argp, sizeof(TW_Ioctl_Driver_Command)))
650 goto out2;
652 /* Check data buffer size */
653 if (driver_command.buffer_length > TW_MAX_SECTORS * 2048) {
654 retval = TW_IOCTL_ERROR_OS_EINVAL;
655 goto out2;
658 /* Hardware can only do multiple of 512 byte transfers */
659 data_buffer_length_adjusted = (driver_command.buffer_length + 511) & ~511;
661 /* Now allocate ioctl buf memory */
662 cpu_addr = dma_alloc_coherent(&tw_dev->tw_pci_dev->dev, data_buffer_length_adjusted+sizeof(TW_Ioctl_Buf_Apache) - 1, &dma_handle, GFP_KERNEL);
663 if (!cpu_addr) {
664 retval = TW_IOCTL_ERROR_OS_ENOMEM;
665 goto out2;
668 tw_ioctl = (TW_Ioctl_Buf_Apache *)cpu_addr;
670 /* Now copy down the entire ioctl */
671 if (copy_from_user(tw_ioctl, argp, driver_command.buffer_length + sizeof(TW_Ioctl_Buf_Apache) - 1))
672 goto out3;
674 /* See which ioctl we are doing */
675 switch (cmd) {
676 case TW_IOCTL_FIRMWARE_PASS_THROUGH:
677 spin_lock_irqsave(tw_dev->host->host_lock, flags);
678 twa_get_request_id(tw_dev, &request_id);
680 /* Flag internal command */
681 tw_dev->srb[request_id] = NULL;
683 /* Flag chrdev ioctl */
684 tw_dev->chrdev_request_id = request_id;
686 full_command_packet = &tw_ioctl->firmware_command;
688 /* Load request id and sglist for both command types */
689 twa_load_sgl(tw_dev, full_command_packet, request_id, dma_handle, data_buffer_length_adjusted);
691 memcpy(tw_dev->command_packet_virt[request_id], &(tw_ioctl->firmware_command), sizeof(TW_Command_Full));
693 /* Now post the command packet to the controller */
694 twa_post_command_packet(tw_dev, request_id, 1);
695 spin_unlock_irqrestore(tw_dev->host->host_lock, flags);
697 timeout = TW_IOCTL_CHRDEV_TIMEOUT*HZ;
699 /* Now wait for command to complete */
700 timeout = wait_event_timeout(tw_dev->ioctl_wqueue, tw_dev->chrdev_request_id == TW_IOCTL_CHRDEV_FREE, timeout);
702 /* We timed out, and didn't get an interrupt */
703 if (tw_dev->chrdev_request_id != TW_IOCTL_CHRDEV_FREE) {
704 /* Now we need to reset the board */
705 printk(KERN_WARNING "3w-9xxx: scsi%d: WARNING: (0x%02X:0x%04X): Character ioctl (0x%x) timed out, resetting card.\n",
706 tw_dev->host->host_no, TW_DRIVER, 0x37,
707 cmd);
708 retval = TW_IOCTL_ERROR_OS_EIO;
709 twa_reset_device_extension(tw_dev);
710 goto out3;
713 /* Now copy in the command packet response */
714 memcpy(&(tw_ioctl->firmware_command), tw_dev->command_packet_virt[request_id], sizeof(TW_Command_Full));
716 /* Now complete the io */
717 spin_lock_irqsave(tw_dev->host->host_lock, flags);
718 tw_dev->posted_request_count--;
719 tw_dev->state[request_id] = TW_S_COMPLETED;
720 twa_free_request_id(tw_dev, request_id);
721 spin_unlock_irqrestore(tw_dev->host->host_lock, flags);
722 break;
723 case TW_IOCTL_GET_COMPATIBILITY_INFO:
724 tw_ioctl->driver_command.status = 0;
725 /* Copy compatiblity struct into ioctl data buffer */
726 tw_compat_info = (TW_Compatibility_Info *)tw_ioctl->data_buffer;
727 memcpy(tw_compat_info, &tw_dev->tw_compat_info, sizeof(TW_Compatibility_Info));
728 break;
729 case TW_IOCTL_GET_LAST_EVENT:
730 if (tw_dev->event_queue_wrapped) {
731 if (tw_dev->aen_clobber) {
732 tw_ioctl->driver_command.status = TW_IOCTL_ERROR_STATUS_AEN_CLOBBER;
733 tw_dev->aen_clobber = 0;
734 } else
735 tw_ioctl->driver_command.status = 0;
736 } else {
737 if (!tw_dev->error_index) {
738 tw_ioctl->driver_command.status = TW_IOCTL_ERROR_STATUS_NO_MORE_EVENTS;
739 break;
741 tw_ioctl->driver_command.status = 0;
743 event_index = (tw_dev->error_index - 1 + TW_Q_LENGTH) % TW_Q_LENGTH;
744 memcpy(tw_ioctl->data_buffer, tw_dev->event_queue[event_index], sizeof(TW_Event));
745 tw_dev->event_queue[event_index]->retrieved = TW_AEN_RETRIEVED;
746 break;
747 case TW_IOCTL_GET_FIRST_EVENT:
748 if (tw_dev->event_queue_wrapped) {
749 if (tw_dev->aen_clobber) {
750 tw_ioctl->driver_command.status = TW_IOCTL_ERROR_STATUS_AEN_CLOBBER;
751 tw_dev->aen_clobber = 0;
752 } else
753 tw_ioctl->driver_command.status = 0;
754 event_index = tw_dev->error_index;
755 } else {
756 if (!tw_dev->error_index) {
757 tw_ioctl->driver_command.status = TW_IOCTL_ERROR_STATUS_NO_MORE_EVENTS;
758 break;
760 tw_ioctl->driver_command.status = 0;
761 event_index = 0;
763 memcpy(tw_ioctl->data_buffer, tw_dev->event_queue[event_index], sizeof(TW_Event));
764 tw_dev->event_queue[event_index]->retrieved = TW_AEN_RETRIEVED;
765 break;
766 case TW_IOCTL_GET_NEXT_EVENT:
767 event = (TW_Event *)tw_ioctl->data_buffer;
768 sequence_id = event->sequence_id;
769 tw_ioctl->driver_command.status = 0;
771 if (tw_dev->event_queue_wrapped) {
772 if (tw_dev->aen_clobber) {
773 tw_ioctl->driver_command.status = TW_IOCTL_ERROR_STATUS_AEN_CLOBBER;
774 tw_dev->aen_clobber = 0;
776 start_index = tw_dev->error_index;
777 } else {
778 if (!tw_dev->error_index) {
779 tw_ioctl->driver_command.status = TW_IOCTL_ERROR_STATUS_NO_MORE_EVENTS;
780 break;
782 start_index = 0;
784 event_index = (start_index + sequence_id - tw_dev->event_queue[start_index]->sequence_id + 1) % TW_Q_LENGTH;
786 if (!(tw_dev->event_queue[event_index]->sequence_id > sequence_id)) {
787 if (tw_ioctl->driver_command.status == TW_IOCTL_ERROR_STATUS_AEN_CLOBBER)
788 tw_dev->aen_clobber = 1;
789 tw_ioctl->driver_command.status = TW_IOCTL_ERROR_STATUS_NO_MORE_EVENTS;
790 break;
792 memcpy(tw_ioctl->data_buffer, tw_dev->event_queue[event_index], sizeof(TW_Event));
793 tw_dev->event_queue[event_index]->retrieved = TW_AEN_RETRIEVED;
794 break;
795 case TW_IOCTL_GET_PREVIOUS_EVENT:
796 event = (TW_Event *)tw_ioctl->data_buffer;
797 sequence_id = event->sequence_id;
798 tw_ioctl->driver_command.status = 0;
800 if (tw_dev->event_queue_wrapped) {
801 if (tw_dev->aen_clobber) {
802 tw_ioctl->driver_command.status = TW_IOCTL_ERROR_STATUS_AEN_CLOBBER;
803 tw_dev->aen_clobber = 0;
805 start_index = tw_dev->error_index;
806 } else {
807 if (!tw_dev->error_index) {
808 tw_ioctl->driver_command.status = TW_IOCTL_ERROR_STATUS_NO_MORE_EVENTS;
809 break;
811 start_index = 0;
813 event_index = (start_index + sequence_id - tw_dev->event_queue[start_index]->sequence_id - 1) % TW_Q_LENGTH;
815 if (!(tw_dev->event_queue[event_index]->sequence_id < sequence_id)) {
816 if (tw_ioctl->driver_command.status == TW_IOCTL_ERROR_STATUS_AEN_CLOBBER)
817 tw_dev->aen_clobber = 1;
818 tw_ioctl->driver_command.status = TW_IOCTL_ERROR_STATUS_NO_MORE_EVENTS;
819 break;
821 memcpy(tw_ioctl->data_buffer, tw_dev->event_queue[event_index], sizeof(TW_Event));
822 tw_dev->event_queue[event_index]->retrieved = TW_AEN_RETRIEVED;
823 break;
824 case TW_IOCTL_GET_LOCK:
825 tw_lock = (TW_Lock *)tw_ioctl->data_buffer;
826 do_gettimeofday(&current_time);
827 current_time_ms = (current_time.tv_sec * 1000) + (current_time.tv_usec / 1000);
829 if ((tw_lock->force_flag == 1) || (tw_dev->ioctl_sem_lock == 0) || (current_time_ms >= tw_dev->ioctl_msec)) {
830 tw_dev->ioctl_sem_lock = 1;
831 tw_dev->ioctl_msec = current_time_ms + tw_lock->timeout_msec;
832 tw_ioctl->driver_command.status = 0;
833 tw_lock->time_remaining_msec = tw_lock->timeout_msec;
834 } else {
835 tw_ioctl->driver_command.status = TW_IOCTL_ERROR_STATUS_LOCKED;
836 tw_lock->time_remaining_msec = tw_dev->ioctl_msec - current_time_ms;
838 break;
839 case TW_IOCTL_RELEASE_LOCK:
840 if (tw_dev->ioctl_sem_lock == 1) {
841 tw_dev->ioctl_sem_lock = 0;
842 tw_ioctl->driver_command.status = 0;
843 } else {
844 tw_ioctl->driver_command.status = TW_IOCTL_ERROR_STATUS_NOT_LOCKED;
846 break;
847 default:
848 retval = TW_IOCTL_ERROR_OS_ENOTTY;
849 goto out3;
852 /* Now copy the entire response to userspace */
853 if (copy_to_user(argp, tw_ioctl, sizeof(TW_Ioctl_Buf_Apache) + driver_command.buffer_length - 1) == 0)
854 retval = 0;
855 out3:
856 /* Now free ioctl buf memory */
857 dma_free_coherent(&tw_dev->tw_pci_dev->dev, data_buffer_length_adjusted+sizeof(TW_Ioctl_Buf_Apache) - 1, cpu_addr, dma_handle);
858 out2:
859 mutex_unlock(&tw_dev->ioctl_lock);
860 out:
861 return retval;
862 } /* End twa_chrdev_ioctl() */
864 /* This function handles open for the character device */
865 static int twa_chrdev_open(struct inode *inode, struct file *file)
867 unsigned int minor_number;
868 int retval = TW_IOCTL_ERROR_OS_ENODEV;
870 minor_number = iminor(inode);
871 if (minor_number >= twa_device_extension_count)
872 goto out;
873 retval = 0;
874 out:
875 return retval;
876 } /* End twa_chrdev_open() */
878 /* This function will print readable messages from status register errors */
879 static int twa_decode_bits(TW_Device_Extension *tw_dev, u32 status_reg_value)
881 int retval = 1;
883 /* Check for various error conditions and handle them appropriately */
884 if (status_reg_value & TW_STATUS_PCI_PARITY_ERROR) {
885 TW_PRINTK(tw_dev->host, TW_DRIVER, 0xc, "PCI Parity Error: clearing");
886 writel(TW_CONTROL_CLEAR_PARITY_ERROR, TW_CONTROL_REG_ADDR(tw_dev));
889 if (status_reg_value & TW_STATUS_PCI_ABORT) {
890 TW_PRINTK(tw_dev->host, TW_DRIVER, 0xd, "PCI Abort: clearing");
891 writel(TW_CONTROL_CLEAR_PCI_ABORT, TW_CONTROL_REG_ADDR(tw_dev));
892 pci_write_config_word(tw_dev->tw_pci_dev, PCI_STATUS, TW_PCI_CLEAR_PCI_ABORT);
895 if (status_reg_value & TW_STATUS_QUEUE_ERROR) {
896 if (((tw_dev->tw_pci_dev->device != PCI_DEVICE_ID_3WARE_9650SE) &&
897 (tw_dev->tw_pci_dev->device != PCI_DEVICE_ID_3WARE_9690SA)) ||
898 (!test_bit(TW_IN_RESET, &tw_dev->flags)))
899 TW_PRINTK(tw_dev->host, TW_DRIVER, 0xe, "Controller Queue Error: clearing");
900 writel(TW_CONTROL_CLEAR_QUEUE_ERROR, TW_CONTROL_REG_ADDR(tw_dev));
903 if (status_reg_value & TW_STATUS_MICROCONTROLLER_ERROR) {
904 if (tw_dev->reset_print == 0) {
905 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x10, "Microcontroller Error: clearing");
906 tw_dev->reset_print = 1;
908 goto out;
910 retval = 0;
911 out:
912 return retval;
913 } /* End twa_decode_bits() */
915 /* This function will empty the response queue */
916 static int twa_empty_response_queue(TW_Device_Extension *tw_dev)
918 u32 status_reg_value, response_que_value;
919 int count = 0, retval = 1;
921 status_reg_value = readl(TW_STATUS_REG_ADDR(tw_dev));
923 while (((status_reg_value & TW_STATUS_RESPONSE_QUEUE_EMPTY) == 0) && (count < TW_MAX_RESPONSE_DRAIN)) {
924 response_que_value = readl(TW_RESPONSE_QUEUE_REG_ADDR(tw_dev));
925 status_reg_value = readl(TW_STATUS_REG_ADDR(tw_dev));
926 count++;
928 if (count == TW_MAX_RESPONSE_DRAIN)
929 goto out;
931 retval = 0;
932 out:
933 return retval;
934 } /* End twa_empty_response_queue() */
936 /* This function will clear the pchip/response queue on 9550SX */
937 static int twa_empty_response_queue_large(TW_Device_Extension *tw_dev)
939 u32 response_que_value = 0;
940 unsigned long before;
941 int retval = 1;
943 if (tw_dev->tw_pci_dev->device != PCI_DEVICE_ID_3WARE_9000) {
944 before = jiffies;
945 while ((response_que_value & TW_9550SX_DRAIN_COMPLETED) != TW_9550SX_DRAIN_COMPLETED) {
946 response_que_value = readl(TW_RESPONSE_QUEUE_REG_ADDR_LARGE(tw_dev));
947 msleep(1);
948 if (time_after(jiffies, before + HZ * 30))
949 goto out;
951 /* P-chip settle time */
952 msleep(500);
953 retval = 0;
954 } else
955 retval = 0;
956 out:
957 return retval;
958 } /* End twa_empty_response_queue_large() */
960 /* This function passes sense keys from firmware to scsi layer */
961 static int twa_fill_sense(TW_Device_Extension *tw_dev, int request_id, int copy_sense, int print_host)
963 TW_Command_Full *full_command_packet;
964 unsigned short error;
965 int retval = 1;
966 char *error_str;
968 full_command_packet = tw_dev->command_packet_virt[request_id];
970 /* Check for embedded error string */
971 error_str = &(full_command_packet->header.err_specific_desc[strlen(full_command_packet->header.err_specific_desc) + 1]);
973 /* Don't print error for Logical unit not supported during rollcall */
974 error = le16_to_cpu(full_command_packet->header.status_block.error);
975 if ((error != TW_ERROR_LOGICAL_UNIT_NOT_SUPPORTED) && (error != TW_ERROR_UNIT_OFFLINE)) {
976 if (print_host)
977 printk(KERN_WARNING "3w-9xxx: scsi%d: ERROR: (0x%02X:0x%04X): %s:%s.\n",
978 tw_dev->host->host_no,
979 TW_MESSAGE_SOURCE_CONTROLLER_ERROR,
980 full_command_packet->header.status_block.error,
981 error_str[0] == '\0' ?
982 twa_string_lookup(twa_error_table,
983 full_command_packet->header.status_block.error) : error_str,
984 full_command_packet->header.err_specific_desc);
985 else
986 printk(KERN_WARNING "3w-9xxx: ERROR: (0x%02X:0x%04X): %s:%s.\n",
987 TW_MESSAGE_SOURCE_CONTROLLER_ERROR,
988 full_command_packet->header.status_block.error,
989 error_str[0] == '\0' ?
990 twa_string_lookup(twa_error_table,
991 full_command_packet->header.status_block.error) : error_str,
992 full_command_packet->header.err_specific_desc);
995 if (copy_sense) {
996 memcpy(tw_dev->srb[request_id]->sense_buffer, full_command_packet->header.sense_data, TW_SENSE_DATA_LENGTH);
997 tw_dev->srb[request_id]->result = (full_command_packet->command.newcommand.status << 1);
998 retval = TW_ISR_DONT_RESULT;
999 goto out;
1001 retval = 0;
1002 out:
1003 return retval;
1004 } /* End twa_fill_sense() */
1006 /* This function will free up device extension resources */
1007 static void twa_free_device_extension(TW_Device_Extension *tw_dev)
1009 if (tw_dev->command_packet_virt[0])
1010 pci_free_consistent(tw_dev->tw_pci_dev,
1011 sizeof(TW_Command_Full)*TW_Q_LENGTH,
1012 tw_dev->command_packet_virt[0],
1013 tw_dev->command_packet_phys[0]);
1015 if (tw_dev->generic_buffer_virt[0])
1016 pci_free_consistent(tw_dev->tw_pci_dev,
1017 TW_SECTOR_SIZE*TW_Q_LENGTH,
1018 tw_dev->generic_buffer_virt[0],
1019 tw_dev->generic_buffer_phys[0]);
1021 kfree(tw_dev->event_queue[0]);
1022 } /* End twa_free_device_extension() */
1024 /* This function will free a request id */
1025 static void twa_free_request_id(TW_Device_Extension *tw_dev, int request_id)
1027 tw_dev->free_queue[tw_dev->free_tail] = request_id;
1028 tw_dev->state[request_id] = TW_S_FINISHED;
1029 tw_dev->free_tail = (tw_dev->free_tail + 1) % TW_Q_LENGTH;
1030 } /* End twa_free_request_id() */
1032 /* This function will get parameter table entries from the firmware */
1033 static void *twa_get_param(TW_Device_Extension *tw_dev, int request_id, int table_id, int parameter_id, int parameter_size_bytes)
1035 TW_Command_Full *full_command_packet;
1036 TW_Command *command_packet;
1037 TW_Param_Apache *param;
1038 unsigned long param_value;
1039 void *retval = NULL;
1041 /* Setup the command packet */
1042 full_command_packet = tw_dev->command_packet_virt[request_id];
1043 memset(full_command_packet, 0, sizeof(TW_Command_Full));
1044 command_packet = &full_command_packet->command.oldcommand;
1046 command_packet->opcode__sgloffset = TW_OPSGL_IN(2, TW_OP_GET_PARAM);
1047 command_packet->size = TW_COMMAND_SIZE;
1048 command_packet->request_id = request_id;
1049 command_packet->byte6_offset.block_count = cpu_to_le16(1);
1051 /* Now setup the param */
1052 param = (TW_Param_Apache *)tw_dev->generic_buffer_virt[request_id];
1053 memset(param, 0, TW_SECTOR_SIZE);
1054 param->table_id = cpu_to_le16(table_id | 0x8000);
1055 param->parameter_id = cpu_to_le16(parameter_id);
1056 param->parameter_size_bytes = cpu_to_le16(parameter_size_bytes);
1057 param_value = tw_dev->generic_buffer_phys[request_id];
1059 command_packet->byte8_offset.param.sgl[0].address = TW_CPU_TO_SGL(param_value);
1060 command_packet->byte8_offset.param.sgl[0].length = cpu_to_le32(TW_SECTOR_SIZE);
1062 /* Post the command packet to the board */
1063 twa_post_command_packet(tw_dev, request_id, 1);
1065 /* Poll for completion */
1066 if (twa_poll_response(tw_dev, request_id, 30))
1067 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x13, "No valid response during get param")
1068 else
1069 retval = (void *)&(param->data[0]);
1071 tw_dev->posted_request_count--;
1072 tw_dev->state[request_id] = TW_S_INITIAL;
1074 return retval;
1075 } /* End twa_get_param() */
1077 /* This function will assign an available request id */
1078 static void twa_get_request_id(TW_Device_Extension *tw_dev, int *request_id)
1080 *request_id = tw_dev->free_queue[tw_dev->free_head];
1081 tw_dev->free_head = (tw_dev->free_head + 1) % TW_Q_LENGTH;
1082 tw_dev->state[*request_id] = TW_S_STARTED;
1083 } /* End twa_get_request_id() */
1085 /* This function will send an initconnection command to controller */
1086 static int twa_initconnection(TW_Device_Extension *tw_dev, int message_credits,
1087 u32 set_features, unsigned short current_fw_srl,
1088 unsigned short current_fw_arch_id,
1089 unsigned short current_fw_branch,
1090 unsigned short current_fw_build,
1091 unsigned short *fw_on_ctlr_srl,
1092 unsigned short *fw_on_ctlr_arch_id,
1093 unsigned short *fw_on_ctlr_branch,
1094 unsigned short *fw_on_ctlr_build,
1095 u32 *init_connect_result)
1097 TW_Command_Full *full_command_packet;
1098 TW_Initconnect *tw_initconnect;
1099 int request_id = 0, retval = 1;
1101 /* Initialize InitConnection command packet */
1102 full_command_packet = tw_dev->command_packet_virt[request_id];
1103 memset(full_command_packet, 0, sizeof(TW_Command_Full));
1104 full_command_packet->header.header_desc.size_header = 128;
1106 tw_initconnect = (TW_Initconnect *)&full_command_packet->command.oldcommand;
1107 tw_initconnect->opcode__reserved = TW_OPRES_IN(0, TW_OP_INIT_CONNECTION);
1108 tw_initconnect->request_id = request_id;
1109 tw_initconnect->message_credits = cpu_to_le16(message_credits);
1110 tw_initconnect->features = set_features;
1112 /* Turn on 64-bit sgl support if we need to */
1113 tw_initconnect->features |= sizeof(dma_addr_t) > 4 ? 1 : 0;
1115 tw_initconnect->features = cpu_to_le32(tw_initconnect->features);
1117 if (set_features & TW_EXTENDED_INIT_CONNECT) {
1118 tw_initconnect->size = TW_INIT_COMMAND_PACKET_SIZE_EXTENDED;
1119 tw_initconnect->fw_srl = cpu_to_le16(current_fw_srl);
1120 tw_initconnect->fw_arch_id = cpu_to_le16(current_fw_arch_id);
1121 tw_initconnect->fw_branch = cpu_to_le16(current_fw_branch);
1122 tw_initconnect->fw_build = cpu_to_le16(current_fw_build);
1123 } else
1124 tw_initconnect->size = TW_INIT_COMMAND_PACKET_SIZE;
1126 /* Send command packet to the board */
1127 twa_post_command_packet(tw_dev, request_id, 1);
1129 /* Poll for completion */
1130 if (twa_poll_response(tw_dev, request_id, 30)) {
1131 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x15, "No valid response during init connection");
1132 } else {
1133 if (set_features & TW_EXTENDED_INIT_CONNECT) {
1134 *fw_on_ctlr_srl = le16_to_cpu(tw_initconnect->fw_srl);
1135 *fw_on_ctlr_arch_id = le16_to_cpu(tw_initconnect->fw_arch_id);
1136 *fw_on_ctlr_branch = le16_to_cpu(tw_initconnect->fw_branch);
1137 *fw_on_ctlr_build = le16_to_cpu(tw_initconnect->fw_build);
1138 *init_connect_result = le32_to_cpu(tw_initconnect->result);
1140 retval = 0;
1143 tw_dev->posted_request_count--;
1144 tw_dev->state[request_id] = TW_S_INITIAL;
1146 return retval;
1147 } /* End twa_initconnection() */
1149 /* This function will initialize the fields of a device extension */
1150 static int twa_initialize_device_extension(TW_Device_Extension *tw_dev)
1152 int i, retval = 1;
1154 /* Initialize command packet buffers */
1155 if (twa_allocate_memory(tw_dev, sizeof(TW_Command_Full), 0)) {
1156 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x16, "Command packet memory allocation failed");
1157 goto out;
1160 /* Initialize generic buffer */
1161 if (twa_allocate_memory(tw_dev, TW_SECTOR_SIZE, 1)) {
1162 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x17, "Generic memory allocation failed");
1163 goto out;
1166 /* Allocate event info space */
1167 tw_dev->event_queue[0] = kcalloc(TW_Q_LENGTH, sizeof(TW_Event), GFP_KERNEL);
1168 if (!tw_dev->event_queue[0]) {
1169 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x18, "Event info memory allocation failed");
1170 goto out;
1174 for (i = 0; i < TW_Q_LENGTH; i++) {
1175 tw_dev->event_queue[i] = (TW_Event *)((unsigned char *)tw_dev->event_queue[0] + (i * sizeof(TW_Event)));
1176 tw_dev->free_queue[i] = i;
1177 tw_dev->state[i] = TW_S_INITIAL;
1180 tw_dev->pending_head = TW_Q_START;
1181 tw_dev->pending_tail = TW_Q_START;
1182 tw_dev->free_head = TW_Q_START;
1183 tw_dev->free_tail = TW_Q_START;
1184 tw_dev->error_sequence_id = 1;
1185 tw_dev->chrdev_request_id = TW_IOCTL_CHRDEV_FREE;
1187 mutex_init(&tw_dev->ioctl_lock);
1188 init_waitqueue_head(&tw_dev->ioctl_wqueue);
1190 retval = 0;
1191 out:
1192 return retval;
1193 } /* End twa_initialize_device_extension() */
1195 /* This function is the interrupt service routine */
1196 static irqreturn_t twa_interrupt(int irq, void *dev_instance)
1198 int request_id, error = 0;
1199 u32 status_reg_value;
1200 TW_Response_Queue response_que;
1201 TW_Command_Full *full_command_packet;
1202 TW_Device_Extension *tw_dev = (TW_Device_Extension *)dev_instance;
1203 int handled = 0;
1205 /* Get the per adapter lock */
1206 spin_lock(tw_dev->host->host_lock);
1208 /* Read the registers */
1209 status_reg_value = readl(TW_STATUS_REG_ADDR(tw_dev));
1211 /* Check if this is our interrupt, otherwise bail */
1212 if (!(status_reg_value & TW_STATUS_VALID_INTERRUPT))
1213 goto twa_interrupt_bail;
1215 handled = 1;
1217 /* If we are resetting, bail */
1218 if (test_bit(TW_IN_RESET, &tw_dev->flags))
1219 goto twa_interrupt_bail;
1221 /* Check controller for errors */
1222 if (twa_check_bits(status_reg_value)) {
1223 if (twa_decode_bits(tw_dev, status_reg_value)) {
1224 TW_CLEAR_ALL_INTERRUPTS(tw_dev);
1225 goto twa_interrupt_bail;
1229 /* Handle host interrupt */
1230 if (status_reg_value & TW_STATUS_HOST_INTERRUPT)
1231 TW_CLEAR_HOST_INTERRUPT(tw_dev);
1233 /* Handle attention interrupt */
1234 if (status_reg_value & TW_STATUS_ATTENTION_INTERRUPT) {
1235 TW_CLEAR_ATTENTION_INTERRUPT(tw_dev);
1236 if (!(test_and_set_bit(TW_IN_ATTENTION_LOOP, &tw_dev->flags))) {
1237 twa_get_request_id(tw_dev, &request_id);
1239 error = twa_aen_read_queue(tw_dev, request_id);
1240 if (error) {
1241 tw_dev->state[request_id] = TW_S_COMPLETED;
1242 twa_free_request_id(tw_dev, request_id);
1243 clear_bit(TW_IN_ATTENTION_LOOP, &tw_dev->flags);
1248 /* Handle command interrupt */
1249 if (status_reg_value & TW_STATUS_COMMAND_INTERRUPT) {
1250 TW_MASK_COMMAND_INTERRUPT(tw_dev);
1251 /* Drain as many pending commands as we can */
1252 while (tw_dev->pending_request_count > 0) {
1253 request_id = tw_dev->pending_queue[tw_dev->pending_head];
1254 if (tw_dev->state[request_id] != TW_S_PENDING) {
1255 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x19, "Found request id that wasn't pending");
1256 TW_CLEAR_ALL_INTERRUPTS(tw_dev);
1257 goto twa_interrupt_bail;
1259 if (twa_post_command_packet(tw_dev, request_id, 1)==0) {
1260 tw_dev->pending_head = (tw_dev->pending_head + 1) % TW_Q_LENGTH;
1261 tw_dev->pending_request_count--;
1262 } else {
1263 /* If we get here, we will continue re-posting on the next command interrupt */
1264 break;
1269 /* Handle response interrupt */
1270 if (status_reg_value & TW_STATUS_RESPONSE_INTERRUPT) {
1272 /* Drain the response queue from the board */
1273 while ((status_reg_value & TW_STATUS_RESPONSE_QUEUE_EMPTY) == 0) {
1274 /* Complete the response */
1275 response_que.value = readl(TW_RESPONSE_QUEUE_REG_ADDR(tw_dev));
1276 request_id = TW_RESID_OUT(response_que.response_id);
1277 full_command_packet = tw_dev->command_packet_virt[request_id];
1278 error = 0;
1279 /* Check for command packet errors */
1280 if (full_command_packet->command.newcommand.status != 0) {
1281 if (tw_dev->srb[request_id] != NULL) {
1282 error = twa_fill_sense(tw_dev, request_id, 1, 1);
1283 } else {
1284 /* Skip ioctl error prints */
1285 if (request_id != tw_dev->chrdev_request_id) {
1286 error = twa_fill_sense(tw_dev, request_id, 0, 1);
1291 /* Check for correct state */
1292 if (tw_dev->state[request_id] != TW_S_POSTED) {
1293 if (tw_dev->srb[request_id] != NULL) {
1294 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x1a, "Received a request id that wasn't posted");
1295 TW_CLEAR_ALL_INTERRUPTS(tw_dev);
1296 goto twa_interrupt_bail;
1300 /* Check for internal command completion */
1301 if (tw_dev->srb[request_id] == NULL) {
1302 if (request_id != tw_dev->chrdev_request_id) {
1303 if (twa_aen_complete(tw_dev, request_id))
1304 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x1b, "Error completing AEN during attention interrupt");
1305 } else {
1306 tw_dev->chrdev_request_id = TW_IOCTL_CHRDEV_FREE;
1307 wake_up(&tw_dev->ioctl_wqueue);
1309 } else {
1310 struct scsi_cmnd *cmd;
1312 cmd = tw_dev->srb[request_id];
1314 twa_scsiop_execute_scsi_complete(tw_dev, request_id);
1315 /* If no error command was a success */
1316 if (error == 0) {
1317 cmd->result = (DID_OK << 16);
1320 /* If error, command failed */
1321 if (error == 1) {
1322 /* Ask for a host reset */
1323 cmd->result = (DID_OK << 16) | (CHECK_CONDITION << 1);
1326 /* Report residual bytes for single sgl */
1327 if ((scsi_sg_count(cmd) <= 1) && (full_command_packet->command.newcommand.status == 0)) {
1328 if (full_command_packet->command.newcommand.sg_list[0].length < scsi_bufflen(tw_dev->srb[request_id]))
1329 scsi_set_resid(cmd, scsi_bufflen(cmd) - full_command_packet->command.newcommand.sg_list[0].length);
1332 /* Now complete the io */
1333 tw_dev->state[request_id] = TW_S_COMPLETED;
1334 twa_free_request_id(tw_dev, request_id);
1335 tw_dev->posted_request_count--;
1336 tw_dev->srb[request_id]->scsi_done(tw_dev->srb[request_id]);
1337 twa_unmap_scsi_data(tw_dev, request_id);
1340 /* Check for valid status after each drain */
1341 status_reg_value = readl(TW_STATUS_REG_ADDR(tw_dev));
1342 if (twa_check_bits(status_reg_value)) {
1343 if (twa_decode_bits(tw_dev, status_reg_value)) {
1344 TW_CLEAR_ALL_INTERRUPTS(tw_dev);
1345 goto twa_interrupt_bail;
1351 twa_interrupt_bail:
1352 spin_unlock(tw_dev->host->host_lock);
1353 return IRQ_RETVAL(handled);
1354 } /* End twa_interrupt() */
1356 /* This function will load the request id and various sgls for ioctls */
1357 static void twa_load_sgl(TW_Device_Extension *tw_dev, TW_Command_Full *full_command_packet, int request_id, dma_addr_t dma_handle, int length)
1359 TW_Command *oldcommand;
1360 TW_Command_Apache *newcommand;
1361 TW_SG_Entry *sgl;
1362 unsigned int pae = 0;
1364 if ((sizeof(long) < 8) && (sizeof(dma_addr_t) > 4))
1365 pae = 1;
1367 if (TW_OP_OUT(full_command_packet->command.newcommand.opcode__reserved) == TW_OP_EXECUTE_SCSI) {
1368 newcommand = &full_command_packet->command.newcommand;
1369 newcommand->request_id__lunl =
1370 cpu_to_le16(TW_REQ_LUN_IN(TW_LUN_OUT(newcommand->request_id__lunl), request_id));
1371 newcommand->sg_list[0].address = TW_CPU_TO_SGL(dma_handle + sizeof(TW_Ioctl_Buf_Apache) - 1);
1372 newcommand->sg_list[0].length = cpu_to_le32(length);
1373 newcommand->sgl_entries__lunh =
1374 cpu_to_le16(TW_REQ_LUN_IN(TW_LUN_OUT(newcommand->sgl_entries__lunh), 1));
1375 } else {
1376 oldcommand = &full_command_packet->command.oldcommand;
1377 oldcommand->request_id = request_id;
1379 if (TW_SGL_OUT(oldcommand->opcode__sgloffset)) {
1380 /* Load the sg list */
1381 if (tw_dev->tw_pci_dev->device == PCI_DEVICE_ID_3WARE_9690SA)
1382 sgl = (TW_SG_Entry *)((u32 *)oldcommand+oldcommand->size - (sizeof(TW_SG_Entry)/4) + pae);
1383 else
1384 sgl = (TW_SG_Entry *)((u32 *)oldcommand+TW_SGL_OUT(oldcommand->opcode__sgloffset));
1385 sgl->address = TW_CPU_TO_SGL(dma_handle + sizeof(TW_Ioctl_Buf_Apache) - 1);
1386 sgl->length = cpu_to_le32(length);
1388 oldcommand->size += pae;
1391 } /* End twa_load_sgl() */
1393 /* This function will perform a pci-dma mapping for a scatter gather list */
1394 static int twa_map_scsi_sg_data(TW_Device_Extension *tw_dev, int request_id)
1396 int use_sg;
1397 struct scsi_cmnd *cmd = tw_dev->srb[request_id];
1399 use_sg = scsi_dma_map(cmd);
1400 if (!use_sg)
1401 return 0;
1402 else if (use_sg < 0) {
1403 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x1c, "Failed to map scatter gather list");
1404 return 0;
1407 cmd->SCp.phase = TW_PHASE_SGLIST;
1408 cmd->SCp.have_data_in = use_sg;
1410 return use_sg;
1411 } /* End twa_map_scsi_sg_data() */
1413 /* This function will poll for a response interrupt of a request */
1414 static int twa_poll_response(TW_Device_Extension *tw_dev, int request_id, int seconds)
1416 int retval = 1, found = 0, response_request_id;
1417 TW_Response_Queue response_queue;
1418 TW_Command_Full *full_command_packet = tw_dev->command_packet_virt[request_id];
1420 if (twa_poll_status_gone(tw_dev, TW_STATUS_RESPONSE_QUEUE_EMPTY, seconds) == 0) {
1421 response_queue.value = readl(TW_RESPONSE_QUEUE_REG_ADDR(tw_dev));
1422 response_request_id = TW_RESID_OUT(response_queue.response_id);
1423 if (request_id != response_request_id) {
1424 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x1e, "Found unexpected request id while polling for response");
1425 goto out;
1427 if (TW_OP_OUT(full_command_packet->command.newcommand.opcode__reserved) == TW_OP_EXECUTE_SCSI) {
1428 if (full_command_packet->command.newcommand.status != 0) {
1429 /* bad response */
1430 twa_fill_sense(tw_dev, request_id, 0, 0);
1431 goto out;
1433 found = 1;
1434 } else {
1435 if (full_command_packet->command.oldcommand.status != 0) {
1436 /* bad response */
1437 twa_fill_sense(tw_dev, request_id, 0, 0);
1438 goto out;
1440 found = 1;
1444 if (found)
1445 retval = 0;
1446 out:
1447 return retval;
1448 } /* End twa_poll_response() */
1450 /* This function will poll the status register for a flag */
1451 static int twa_poll_status(TW_Device_Extension *tw_dev, u32 flag, int seconds)
1453 u32 status_reg_value;
1454 unsigned long before;
1455 int retval = 1;
1457 status_reg_value = readl(TW_STATUS_REG_ADDR(tw_dev));
1458 before = jiffies;
1460 if (twa_check_bits(status_reg_value))
1461 twa_decode_bits(tw_dev, status_reg_value);
1463 while ((status_reg_value & flag) != flag) {
1464 status_reg_value = readl(TW_STATUS_REG_ADDR(tw_dev));
1466 if (twa_check_bits(status_reg_value))
1467 twa_decode_bits(tw_dev, status_reg_value);
1469 if (time_after(jiffies, before + HZ * seconds))
1470 goto out;
1472 msleep(50);
1474 retval = 0;
1475 out:
1476 return retval;
1477 } /* End twa_poll_status() */
1479 /* This function will poll the status register for disappearance of a flag */
1480 static int twa_poll_status_gone(TW_Device_Extension *tw_dev, u32 flag, int seconds)
1482 u32 status_reg_value;
1483 unsigned long before;
1484 int retval = 1;
1486 status_reg_value = readl(TW_STATUS_REG_ADDR(tw_dev));
1487 before = jiffies;
1489 if (twa_check_bits(status_reg_value))
1490 twa_decode_bits(tw_dev, status_reg_value);
1492 while ((status_reg_value & flag) != 0) {
1493 status_reg_value = readl(TW_STATUS_REG_ADDR(tw_dev));
1494 if (twa_check_bits(status_reg_value))
1495 twa_decode_bits(tw_dev, status_reg_value);
1497 if (time_after(jiffies, before + HZ * seconds))
1498 goto out;
1500 msleep(50);
1502 retval = 0;
1503 out:
1504 return retval;
1505 } /* End twa_poll_status_gone() */
1507 /* This function will attempt to post a command packet to the board */
1508 static int twa_post_command_packet(TW_Device_Extension *tw_dev, int request_id, char internal)
1510 u32 status_reg_value;
1511 dma_addr_t command_que_value;
1512 int retval = 1;
1514 command_que_value = tw_dev->command_packet_phys[request_id];
1516 /* For 9650SE write low 4 bytes first */
1517 if ((tw_dev->tw_pci_dev->device == PCI_DEVICE_ID_3WARE_9650SE) ||
1518 (tw_dev->tw_pci_dev->device == PCI_DEVICE_ID_3WARE_9690SA)) {
1519 command_que_value += TW_COMMAND_OFFSET;
1520 writel((u32)command_que_value, TW_COMMAND_QUEUE_REG_ADDR_LARGE(tw_dev));
1523 status_reg_value = readl(TW_STATUS_REG_ADDR(tw_dev));
1525 if (twa_check_bits(status_reg_value))
1526 twa_decode_bits(tw_dev, status_reg_value);
1528 if (((tw_dev->pending_request_count > 0) && (tw_dev->state[request_id] != TW_S_PENDING)) || (status_reg_value & TW_STATUS_COMMAND_QUEUE_FULL)) {
1530 /* Only pend internal driver commands */
1531 if (!internal) {
1532 retval = SCSI_MLQUEUE_HOST_BUSY;
1533 goto out;
1536 /* Couldn't post the command packet, so we do it later */
1537 if (tw_dev->state[request_id] != TW_S_PENDING) {
1538 tw_dev->state[request_id] = TW_S_PENDING;
1539 tw_dev->pending_request_count++;
1540 if (tw_dev->pending_request_count > tw_dev->max_pending_request_count) {
1541 tw_dev->max_pending_request_count = tw_dev->pending_request_count;
1543 tw_dev->pending_queue[tw_dev->pending_tail] = request_id;
1544 tw_dev->pending_tail = (tw_dev->pending_tail + 1) % TW_Q_LENGTH;
1546 TW_UNMASK_COMMAND_INTERRUPT(tw_dev);
1547 goto out;
1548 } else {
1549 if ((tw_dev->tw_pci_dev->device == PCI_DEVICE_ID_3WARE_9650SE) ||
1550 (tw_dev->tw_pci_dev->device == PCI_DEVICE_ID_3WARE_9690SA)) {
1551 /* Now write upper 4 bytes */
1552 writel((u32)((u64)command_que_value >> 32), TW_COMMAND_QUEUE_REG_ADDR_LARGE(tw_dev) + 0x4);
1553 } else {
1554 if (sizeof(dma_addr_t) > 4) {
1555 command_que_value += TW_COMMAND_OFFSET;
1556 writel((u32)command_que_value, TW_COMMAND_QUEUE_REG_ADDR(tw_dev));
1557 writel((u32)((u64)command_que_value >> 32), TW_COMMAND_QUEUE_REG_ADDR(tw_dev) + 0x4);
1558 } else {
1559 writel(TW_COMMAND_OFFSET + command_que_value, TW_COMMAND_QUEUE_REG_ADDR(tw_dev));
1562 tw_dev->state[request_id] = TW_S_POSTED;
1563 tw_dev->posted_request_count++;
1564 if (tw_dev->posted_request_count > tw_dev->max_posted_request_count) {
1565 tw_dev->max_posted_request_count = tw_dev->posted_request_count;
1568 retval = 0;
1569 out:
1570 return retval;
1571 } /* End twa_post_command_packet() */
1573 /* This function will reset a device extension */
1574 static int twa_reset_device_extension(TW_Device_Extension *tw_dev)
1576 int i = 0;
1577 int retval = 1;
1578 unsigned long flags = 0;
1580 set_bit(TW_IN_RESET, &tw_dev->flags);
1581 TW_DISABLE_INTERRUPTS(tw_dev);
1582 TW_MASK_COMMAND_INTERRUPT(tw_dev);
1583 spin_lock_irqsave(tw_dev->host->host_lock, flags);
1585 /* Abort all requests that are in progress */
1586 for (i = 0; i < TW_Q_LENGTH; i++) {
1587 if ((tw_dev->state[i] != TW_S_FINISHED) &&
1588 (tw_dev->state[i] != TW_S_INITIAL) &&
1589 (tw_dev->state[i] != TW_S_COMPLETED)) {
1590 if (tw_dev->srb[i]) {
1591 tw_dev->srb[i]->result = (DID_RESET << 16);
1592 tw_dev->srb[i]->scsi_done(tw_dev->srb[i]);
1593 twa_unmap_scsi_data(tw_dev, i);
1598 /* Reset queues and counts */
1599 for (i = 0; i < TW_Q_LENGTH; i++) {
1600 tw_dev->free_queue[i] = i;
1601 tw_dev->state[i] = TW_S_INITIAL;
1603 tw_dev->free_head = TW_Q_START;
1604 tw_dev->free_tail = TW_Q_START;
1605 tw_dev->posted_request_count = 0;
1606 tw_dev->pending_request_count = 0;
1607 tw_dev->pending_head = TW_Q_START;
1608 tw_dev->pending_tail = TW_Q_START;
1609 tw_dev->reset_print = 0;
1611 spin_unlock_irqrestore(tw_dev->host->host_lock, flags);
1613 if (twa_reset_sequence(tw_dev, 1))
1614 goto out;
1616 TW_ENABLE_AND_CLEAR_INTERRUPTS(tw_dev);
1617 clear_bit(TW_IN_RESET, &tw_dev->flags);
1618 tw_dev->chrdev_request_id = TW_IOCTL_CHRDEV_FREE;
1620 retval = 0;
1621 out:
1622 return retval;
1623 } /* End twa_reset_device_extension() */
1625 /* This function will reset a controller */
1626 static int twa_reset_sequence(TW_Device_Extension *tw_dev, int soft_reset)
1628 int tries = 0, retval = 1, flashed = 0, do_soft_reset = soft_reset;
1630 while (tries < TW_MAX_RESET_TRIES) {
1631 if (do_soft_reset) {
1632 TW_SOFT_RESET(tw_dev);
1633 /* Clear pchip/response queue on 9550SX */
1634 if (twa_empty_response_queue_large(tw_dev)) {
1635 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x36, "Response queue (large) empty failed during reset sequence");
1636 do_soft_reset = 1;
1637 tries++;
1638 continue;
1642 /* Make sure controller is in a good state */
1643 if (twa_poll_status(tw_dev, TW_STATUS_MICROCONTROLLER_READY | (do_soft_reset == 1 ? TW_STATUS_ATTENTION_INTERRUPT : 0), 60)) {
1644 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x1f, "Microcontroller not ready during reset sequence");
1645 do_soft_reset = 1;
1646 tries++;
1647 continue;
1650 /* Empty response queue */
1651 if (twa_empty_response_queue(tw_dev)) {
1652 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x20, "Response queue empty failed during reset sequence");
1653 do_soft_reset = 1;
1654 tries++;
1655 continue;
1658 flashed = 0;
1660 /* Check for compatibility/flash */
1661 if (twa_check_srl(tw_dev, &flashed)) {
1662 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x21, "Compatibility check failed during reset sequence");
1663 do_soft_reset = 1;
1664 tries++;
1665 continue;
1666 } else {
1667 if (flashed) {
1668 tries++;
1669 continue;
1673 /* Drain the AEN queue */
1674 if (twa_aen_drain_queue(tw_dev, soft_reset)) {
1675 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x22, "AEN drain failed during reset sequence");
1676 do_soft_reset = 1;
1677 tries++;
1678 continue;
1681 /* If we got here, controller is in a good state */
1682 retval = 0;
1683 goto out;
1685 out:
1686 return retval;
1687 } /* End twa_reset_sequence() */
1689 /* This funciton returns unit geometry in cylinders/heads/sectors */
1690 static int twa_scsi_biosparam(struct scsi_device *sdev, struct block_device *bdev, sector_t capacity, int geom[])
1692 int heads, sectors, cylinders;
1693 TW_Device_Extension *tw_dev;
1695 tw_dev = (TW_Device_Extension *)sdev->host->hostdata;
1697 if (capacity >= 0x200000) {
1698 heads = 255;
1699 sectors = 63;
1700 cylinders = sector_div(capacity, heads * sectors);
1701 } else {
1702 heads = 64;
1703 sectors = 32;
1704 cylinders = sector_div(capacity, heads * sectors);
1707 geom[0] = heads;
1708 geom[1] = sectors;
1709 geom[2] = cylinders;
1711 return 0;
1712 } /* End twa_scsi_biosparam() */
1714 /* This is the new scsi eh reset function */
1715 static int twa_scsi_eh_reset(struct scsi_cmnd *SCpnt)
1717 TW_Device_Extension *tw_dev = NULL;
1718 int retval = FAILED;
1720 tw_dev = (TW_Device_Extension *)SCpnt->device->host->hostdata;
1722 tw_dev->num_resets++;
1724 sdev_printk(KERN_WARNING, SCpnt->device,
1725 "WARNING: (0x%02X:0x%04X): Command (0x%x) timed out, resetting card.\n",
1726 TW_DRIVER, 0x2c, SCpnt->cmnd[0]);
1728 /* Make sure we are not issuing an ioctl or resetting from ioctl */
1729 mutex_lock(&tw_dev->ioctl_lock);
1731 /* Now reset the card and some of the device extension data */
1732 if (twa_reset_device_extension(tw_dev)) {
1733 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x2b, "Controller reset failed during scsi host reset");
1734 goto out;
1737 retval = SUCCESS;
1738 out:
1739 mutex_unlock(&tw_dev->ioctl_lock);
1740 return retval;
1741 } /* End twa_scsi_eh_reset() */
1743 /* This is the main scsi queue function to handle scsi opcodes */
1744 static int twa_scsi_queue(struct scsi_cmnd *SCpnt, void (*done)(struct scsi_cmnd *))
1746 int request_id, retval;
1747 TW_Device_Extension *tw_dev = (TW_Device_Extension *)SCpnt->device->host->hostdata;
1749 /* If we are resetting due to timed out ioctl, report as busy */
1750 if (test_bit(TW_IN_RESET, &tw_dev->flags)) {
1751 retval = SCSI_MLQUEUE_HOST_BUSY;
1752 goto out;
1755 /* Check if this FW supports luns */
1756 if ((SCpnt->device->lun != 0) && (tw_dev->tw_compat_info.working_srl < TW_FW_SRL_LUNS_SUPPORTED)) {
1757 SCpnt->result = (DID_BAD_TARGET << 16);
1758 done(SCpnt);
1759 retval = 0;
1760 goto out;
1763 /* Save done function into scsi_cmnd struct */
1764 SCpnt->scsi_done = done;
1766 /* Get a free request id */
1767 twa_get_request_id(tw_dev, &request_id);
1769 /* Save the scsi command for use by the ISR */
1770 tw_dev->srb[request_id] = SCpnt;
1772 /* Initialize phase to zero */
1773 SCpnt->SCp.phase = TW_PHASE_INITIAL;
1775 retval = twa_scsiop_execute_scsi(tw_dev, request_id, NULL, 0, NULL);
1776 switch (retval) {
1777 case SCSI_MLQUEUE_HOST_BUSY:
1778 twa_free_request_id(tw_dev, request_id);
1779 break;
1780 case 1:
1781 tw_dev->state[request_id] = TW_S_COMPLETED;
1782 twa_free_request_id(tw_dev, request_id);
1783 SCpnt->result = (DID_ERROR << 16);
1784 done(SCpnt);
1785 retval = 0;
1787 out:
1788 return retval;
1789 } /* End twa_scsi_queue() */
1791 /* This function hands scsi cdb's to the firmware */
1792 static int twa_scsiop_execute_scsi(TW_Device_Extension *tw_dev, int request_id, char *cdb, int use_sg, TW_SG_Entry *sglistarg)
1794 TW_Command_Full *full_command_packet;
1795 TW_Command_Apache *command_packet;
1796 u32 num_sectors = 0x0;
1797 int i, sg_count;
1798 struct scsi_cmnd *srb = NULL;
1799 struct scatterlist *sglist = NULL, *sg;
1800 int retval = 1;
1802 if (tw_dev->srb[request_id]) {
1803 srb = tw_dev->srb[request_id];
1804 if (scsi_sglist(srb))
1805 sglist = scsi_sglist(srb);
1808 /* Initialize command packet */
1809 full_command_packet = tw_dev->command_packet_virt[request_id];
1810 full_command_packet->header.header_desc.size_header = 128;
1811 full_command_packet->header.status_block.error = 0;
1812 full_command_packet->header.status_block.severity__reserved = 0;
1814 command_packet = &full_command_packet->command.newcommand;
1815 command_packet->status = 0;
1816 command_packet->opcode__reserved = TW_OPRES_IN(0, TW_OP_EXECUTE_SCSI);
1818 /* We forced 16 byte cdb use earlier */
1819 if (!cdb)
1820 memcpy(command_packet->cdb, srb->cmnd, TW_MAX_CDB_LEN);
1821 else
1822 memcpy(command_packet->cdb, cdb, TW_MAX_CDB_LEN);
1824 if (srb) {
1825 command_packet->unit = srb->device->id;
1826 command_packet->request_id__lunl =
1827 cpu_to_le16(TW_REQ_LUN_IN(srb->device->lun, request_id));
1828 } else {
1829 command_packet->request_id__lunl =
1830 cpu_to_le16(TW_REQ_LUN_IN(0, request_id));
1831 command_packet->unit = 0;
1834 command_packet->sgl_offset = 16;
1836 if (!sglistarg) {
1837 /* Map sglist from scsi layer to cmd packet */
1839 if (scsi_sg_count(srb)) {
1840 if ((scsi_sg_count(srb) == 1) &&
1841 (scsi_bufflen(srb) < TW_MIN_SGL_LENGTH)) {
1842 if (srb->sc_data_direction == DMA_TO_DEVICE ||
1843 srb->sc_data_direction == DMA_BIDIRECTIONAL)
1844 scsi_sg_copy_to_buffer(srb,
1845 tw_dev->generic_buffer_virt[request_id],
1846 TW_SECTOR_SIZE);
1847 command_packet->sg_list[0].address = TW_CPU_TO_SGL(tw_dev->generic_buffer_phys[request_id]);
1848 command_packet->sg_list[0].length = cpu_to_le32(TW_MIN_SGL_LENGTH);
1849 } else {
1850 sg_count = twa_map_scsi_sg_data(tw_dev, request_id);
1851 if (sg_count == 0)
1852 goto out;
1854 scsi_for_each_sg(srb, sg, sg_count, i) {
1855 command_packet->sg_list[i].address = TW_CPU_TO_SGL(sg_dma_address(sg));
1856 command_packet->sg_list[i].length = cpu_to_le32(sg_dma_len(sg));
1857 if (command_packet->sg_list[i].address & TW_CPU_TO_SGL(TW_ALIGNMENT_9000_SGL)) {
1858 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x2e, "Found unaligned sgl address during execute scsi");
1859 goto out;
1863 command_packet->sgl_entries__lunh = cpu_to_le16(TW_REQ_LUN_IN((srb->device->lun >> 4), scsi_sg_count(tw_dev->srb[request_id])));
1865 } else {
1866 /* Internal cdb post */
1867 for (i = 0; i < use_sg; i++) {
1868 command_packet->sg_list[i].address = TW_CPU_TO_SGL(sglistarg[i].address);
1869 command_packet->sg_list[i].length = cpu_to_le32(sglistarg[i].length);
1870 if (command_packet->sg_list[i].address & TW_CPU_TO_SGL(TW_ALIGNMENT_9000_SGL)) {
1871 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x2f, "Found unaligned sgl address during internal post");
1872 goto out;
1875 command_packet->sgl_entries__lunh = cpu_to_le16(TW_REQ_LUN_IN(0, use_sg));
1878 if (srb) {
1879 if (srb->cmnd[0] == READ_6 || srb->cmnd[0] == WRITE_6)
1880 num_sectors = (u32)srb->cmnd[4];
1882 if (srb->cmnd[0] == READ_10 || srb->cmnd[0] == WRITE_10)
1883 num_sectors = (u32)srb->cmnd[8] | ((u32)srb->cmnd[7] << 8);
1886 /* Update sector statistic */
1887 tw_dev->sector_count = num_sectors;
1888 if (tw_dev->sector_count > tw_dev->max_sector_count)
1889 tw_dev->max_sector_count = tw_dev->sector_count;
1891 /* Update SG statistics */
1892 if (srb) {
1893 tw_dev->sgl_entries = scsi_sg_count(tw_dev->srb[request_id]);
1894 if (tw_dev->sgl_entries > tw_dev->max_sgl_entries)
1895 tw_dev->max_sgl_entries = tw_dev->sgl_entries;
1898 /* Now post the command to the board */
1899 if (srb) {
1900 retval = twa_post_command_packet(tw_dev, request_id, 0);
1901 } else {
1902 twa_post_command_packet(tw_dev, request_id, 1);
1903 retval = 0;
1905 out:
1906 return retval;
1907 } /* End twa_scsiop_execute_scsi() */
1909 /* This function completes an execute scsi operation */
1910 static void twa_scsiop_execute_scsi_complete(TW_Device_Extension *tw_dev, int request_id)
1912 struct scsi_cmnd *cmd = tw_dev->srb[request_id];
1914 if (scsi_bufflen(cmd) < TW_MIN_SGL_LENGTH &&
1915 (cmd->sc_data_direction == DMA_FROM_DEVICE ||
1916 cmd->sc_data_direction == DMA_BIDIRECTIONAL)) {
1917 if (scsi_sg_count(cmd) == 1) {
1918 unsigned long flags;
1919 void *buf = tw_dev->generic_buffer_virt[request_id];
1921 local_irq_save(flags);
1922 scsi_sg_copy_from_buffer(cmd, buf, TW_SECTOR_SIZE);
1923 local_irq_restore(flags);
1926 } /* End twa_scsiop_execute_scsi_complete() */
1928 /* This function tells the controller to shut down */
1929 static void __twa_shutdown(TW_Device_Extension *tw_dev)
1931 /* Disable interrupts */
1932 TW_DISABLE_INTERRUPTS(tw_dev);
1934 /* Free up the IRQ */
1935 free_irq(tw_dev->tw_pci_dev->irq, tw_dev);
1937 printk(KERN_WARNING "3w-9xxx: Shutting down host %d.\n", tw_dev->host->host_no);
1939 /* Tell the card we are shutting down */
1940 if (twa_initconnection(tw_dev, 1, 0, 0, 0, 0, 0, NULL, NULL, NULL, NULL, NULL)) {
1941 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x31, "Connection shutdown failed");
1942 } else {
1943 printk(KERN_WARNING "3w-9xxx: Shutdown complete.\n");
1946 /* Clear all interrupts just before exit */
1947 TW_CLEAR_ALL_INTERRUPTS(tw_dev);
1948 } /* End __twa_shutdown() */
1950 /* Wrapper for __twa_shutdown */
1951 static void twa_shutdown(struct pci_dev *pdev)
1953 struct Scsi_Host *host = pci_get_drvdata(pdev);
1954 TW_Device_Extension *tw_dev = (TW_Device_Extension *)host->hostdata;
1956 __twa_shutdown(tw_dev);
1957 } /* End twa_shutdown() */
1959 /* This function will look up a string */
1960 static char *twa_string_lookup(twa_message_type *table, unsigned int code)
1962 int index;
1964 for (index = 0; ((code != table[index].code) &&
1965 (table[index].text != (char *)0)); index++);
1966 return(table[index].text);
1967 } /* End twa_string_lookup() */
1969 /* This function will perform a pci-dma unmap */
1970 static void twa_unmap_scsi_data(TW_Device_Extension *tw_dev, int request_id)
1972 struct scsi_cmnd *cmd = tw_dev->srb[request_id];
1974 scsi_dma_unmap(cmd);
1975 } /* End twa_unmap_scsi_data() */
1977 /* scsi_host_template initializer */
1978 static struct scsi_host_template driver_template = {
1979 .module = THIS_MODULE,
1980 .name = "3ware 9000 Storage Controller",
1981 .queuecommand = twa_scsi_queue,
1982 .eh_host_reset_handler = twa_scsi_eh_reset,
1983 .bios_param = twa_scsi_biosparam,
1984 .change_queue_depth = twa_change_queue_depth,
1985 .can_queue = TW_Q_LENGTH-2,
1986 .this_id = -1,
1987 .sg_tablesize = TW_APACHE_MAX_SGL_LENGTH,
1988 .max_sectors = TW_MAX_SECTORS,
1989 .cmd_per_lun = TW_MAX_CMDS_PER_LUN,
1990 .use_clustering = ENABLE_CLUSTERING,
1991 .shost_attrs = twa_host_attrs,
1992 .emulated = 1
1995 /* This function will probe and initialize a card */
1996 static int __devinit twa_probe(struct pci_dev *pdev, const struct pci_device_id *dev_id)
1998 struct Scsi_Host *host = NULL;
1999 TW_Device_Extension *tw_dev;
2000 u32 mem_addr;
2001 int retval = -ENODEV;
2003 retval = pci_enable_device(pdev);
2004 if (retval) {
2005 TW_PRINTK(host, TW_DRIVER, 0x34, "Failed to enable pci device");
2006 goto out_disable_device;
2009 pci_set_master(pdev);
2010 pci_try_set_mwi(pdev);
2012 if (pci_set_dma_mask(pdev, DMA_64BIT_MASK)
2013 || pci_set_consistent_dma_mask(pdev, DMA_64BIT_MASK))
2014 if (pci_set_dma_mask(pdev, DMA_32BIT_MASK)
2015 || pci_set_consistent_dma_mask(pdev, DMA_32BIT_MASK)) {
2016 TW_PRINTK(host, TW_DRIVER, 0x23, "Failed to set dma mask");
2017 retval = -ENODEV;
2018 goto out_disable_device;
2021 host = scsi_host_alloc(&driver_template, sizeof(TW_Device_Extension));
2022 if (!host) {
2023 TW_PRINTK(host, TW_DRIVER, 0x24, "Failed to allocate memory for device extension");
2024 retval = -ENOMEM;
2025 goto out_disable_device;
2027 tw_dev = (TW_Device_Extension *)host->hostdata;
2029 /* Save values to device extension */
2030 tw_dev->host = host;
2031 tw_dev->tw_pci_dev = pdev;
2033 if (twa_initialize_device_extension(tw_dev)) {
2034 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x25, "Failed to initialize device extension");
2035 goto out_free_device_extension;
2038 /* Request IO regions */
2039 retval = pci_request_regions(pdev, "3w-9xxx");
2040 if (retval) {
2041 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x26, "Failed to get mem region");
2042 goto out_free_device_extension;
2045 if (pdev->device == PCI_DEVICE_ID_3WARE_9000)
2046 mem_addr = pci_resource_start(pdev, 1);
2047 else
2048 mem_addr = pci_resource_start(pdev, 2);
2050 /* Save base address */
2051 tw_dev->base_addr = ioremap(mem_addr, PAGE_SIZE);
2052 if (!tw_dev->base_addr) {
2053 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x35, "Failed to ioremap");
2054 goto out_release_mem_region;
2057 /* Disable interrupts on the card */
2058 TW_DISABLE_INTERRUPTS(tw_dev);
2060 /* Initialize the card */
2061 if (twa_reset_sequence(tw_dev, 0))
2062 goto out_iounmap;
2064 /* Set host specific parameters */
2065 if ((pdev->device == PCI_DEVICE_ID_3WARE_9650SE) ||
2066 (pdev->device == PCI_DEVICE_ID_3WARE_9690SA))
2067 host->max_id = TW_MAX_UNITS_9650SE;
2068 else
2069 host->max_id = TW_MAX_UNITS;
2071 host->max_cmd_len = TW_MAX_CDB_LEN;
2073 /* Channels aren't supported by adapter */
2074 host->max_lun = TW_MAX_LUNS(tw_dev->tw_compat_info.working_srl);
2075 host->max_channel = 0;
2077 /* Register the card with the kernel SCSI layer */
2078 retval = scsi_add_host(host, &pdev->dev);
2079 if (retval) {
2080 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x27, "scsi add host failed");
2081 goto out_iounmap;
2084 pci_set_drvdata(pdev, host);
2086 printk(KERN_WARNING "3w-9xxx: scsi%d: Found a 3ware 9000 Storage Controller at 0x%x, IRQ: %d.\n",
2087 host->host_no, mem_addr, pdev->irq);
2088 printk(KERN_WARNING "3w-9xxx: scsi%d: Firmware %s, BIOS %s, Ports: %d.\n",
2089 host->host_no,
2090 (char *)twa_get_param(tw_dev, 0, TW_VERSION_TABLE,
2091 TW_PARAM_FWVER, TW_PARAM_FWVER_LENGTH),
2092 (char *)twa_get_param(tw_dev, 1, TW_VERSION_TABLE,
2093 TW_PARAM_BIOSVER, TW_PARAM_BIOSVER_LENGTH),
2094 le32_to_cpu(*(int *)twa_get_param(tw_dev, 2, TW_INFORMATION_TABLE,
2095 TW_PARAM_PORTCOUNT, TW_PARAM_PORTCOUNT_LENGTH)));
2097 /* Now setup the interrupt handler */
2098 retval = request_irq(pdev->irq, twa_interrupt, IRQF_SHARED, "3w-9xxx", tw_dev);
2099 if (retval) {
2100 TW_PRINTK(tw_dev->host, TW_DRIVER, 0x30, "Error requesting IRQ");
2101 goto out_remove_host;
2104 twa_device_extension_list[twa_device_extension_count] = tw_dev;
2105 twa_device_extension_count++;
2107 /* Re-enable interrupts on the card */
2108 TW_ENABLE_AND_CLEAR_INTERRUPTS(tw_dev);
2110 /* Finally, scan the host */
2111 scsi_scan_host(host);
2113 if (twa_major == -1) {
2114 if ((twa_major = register_chrdev (0, "twa", &twa_fops)) < 0)
2115 TW_PRINTK(host, TW_DRIVER, 0x29, "Failed to register character device");
2117 return 0;
2119 out_remove_host:
2120 scsi_remove_host(host);
2121 out_iounmap:
2122 iounmap(tw_dev->base_addr);
2123 out_release_mem_region:
2124 pci_release_regions(pdev);
2125 out_free_device_extension:
2126 twa_free_device_extension(tw_dev);
2127 scsi_host_put(host);
2128 out_disable_device:
2129 pci_disable_device(pdev);
2131 return retval;
2132 } /* End twa_probe() */
2134 /* This function is called to remove a device */
2135 static void twa_remove(struct pci_dev *pdev)
2137 struct Scsi_Host *host = pci_get_drvdata(pdev);
2138 TW_Device_Extension *tw_dev = (TW_Device_Extension *)host->hostdata;
2140 scsi_remove_host(tw_dev->host);
2142 /* Unregister character device */
2143 if (twa_major >= 0) {
2144 unregister_chrdev(twa_major, "twa");
2145 twa_major = -1;
2148 /* Shutdown the card */
2149 __twa_shutdown(tw_dev);
2151 /* Free IO remapping */
2152 iounmap(tw_dev->base_addr);
2154 /* Free up the mem region */
2155 pci_release_regions(pdev);
2157 /* Free up device extension resources */
2158 twa_free_device_extension(tw_dev);
2160 scsi_host_put(tw_dev->host);
2161 pci_disable_device(pdev);
2162 twa_device_extension_count--;
2163 } /* End twa_remove() */
2165 /* PCI Devices supported by this driver */
2166 static struct pci_device_id twa_pci_tbl[] __devinitdata = {
2167 { PCI_VENDOR_ID_3WARE, PCI_DEVICE_ID_3WARE_9000,
2168 PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
2169 { PCI_VENDOR_ID_3WARE, PCI_DEVICE_ID_3WARE_9550SX,
2170 PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
2171 { PCI_VENDOR_ID_3WARE, PCI_DEVICE_ID_3WARE_9650SE,
2172 PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
2173 { PCI_VENDOR_ID_3WARE, PCI_DEVICE_ID_3WARE_9690SA,
2174 PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
2177 MODULE_DEVICE_TABLE(pci, twa_pci_tbl);
2179 /* pci_driver initializer */
2180 static struct pci_driver twa_driver = {
2181 .name = "3w-9xxx",
2182 .id_table = twa_pci_tbl,
2183 .probe = twa_probe,
2184 .remove = twa_remove,
2185 .shutdown = twa_shutdown
2188 /* This function is called on driver initialization */
2189 static int __init twa_init(void)
2191 printk(KERN_WARNING "3ware 9000 Storage Controller device driver for Linux v%s.\n", TW_DRIVER_VERSION);
2193 return pci_register_driver(&twa_driver);
2194 } /* End twa_init() */
2196 /* This function is called on driver exit */
2197 static void __exit twa_exit(void)
2199 pci_unregister_driver(&twa_driver);
2200 } /* End twa_exit() */
2202 module_init(twa_init);
2203 module_exit(twa_exit);