swapfile: change discard pgoff_t to sector_t
[linux-2.6/mini2440.git] / drivers / scsi / ips.c
blobef683f0d2b5a94c5f66626a49f3b954e9c0862ab
1 /*****************************************************************************/
2 /* ips.c -- driver for the Adaptec / IBM ServeRAID controller */
3 /* */
4 /* Written By: Keith Mitchell, IBM Corporation */
5 /* Jack Hammer, Adaptec, Inc. */
6 /* David Jeffery, Adaptec, Inc. */
7 /* */
8 /* Copyright (C) 2000 IBM Corporation */
9 /* Copyright (C) 2002,2003 Adaptec, Inc. */
10 /* */
11 /* This program is free software; you can redistribute it and/or modify */
12 /* it under the terms of the GNU General Public License as published by */
13 /* the Free Software Foundation; either version 2 of the License, or */
14 /* (at your option) any later version. */
15 /* */
16 /* This program is distributed in the hope that it will be useful, */
17 /* but WITHOUT ANY WARRANTY; without even the implied warranty of */
18 /* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */
19 /* GNU General Public License for more details. */
20 /* */
21 /* NO WARRANTY */
22 /* THE PROGRAM IS PROVIDED ON AN "AS IS" BASIS, WITHOUT WARRANTIES OR */
23 /* CONDITIONS OF ANY KIND, EITHER EXPRESS OR IMPLIED INCLUDING, WITHOUT */
24 /* LIMITATION, ANY WARRANTIES OR CONDITIONS OF TITLE, NON-INFRINGEMENT, */
25 /* MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE. Each Recipient is */
26 /* solely responsible for determining the appropriateness of using and */
27 /* distributing the Program and assumes all risks associated with its */
28 /* exercise of rights under this Agreement, including but not limited to */
29 /* the risks and costs of program errors, damage to or loss of data, */
30 /* programs or equipment, and unavailability or interruption of operations. */
31 /* */
32 /* DISCLAIMER OF LIABILITY */
33 /* NEITHER RECIPIENT NOR ANY CONTRIBUTORS SHALL HAVE ANY LIABILITY FOR ANY */
34 /* DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL */
35 /* DAMAGES (INCLUDING WITHOUT LIMITATION LOST PROFITS), HOWEVER CAUSED AND */
36 /* ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR */
37 /* TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE */
38 /* USE OR DISTRIBUTION OF THE PROGRAM OR THE EXERCISE OF ANY RIGHTS GRANTED */
39 /* HEREUNDER, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGES */
40 /* */
41 /* You should have received a copy of the GNU General Public License */
42 /* along with this program; if not, write to the Free Software */
43 /* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */
44 /* */
45 /* Bugs/Comments/Suggestions about this driver should be mailed to: */
46 /* ipslinux@adaptec.com */
47 /* */
48 /* For system support issues, contact your local IBM Customer support. */
49 /* Directions to find IBM Customer Support for each country can be found at: */
50 /* http://www.ibm.com/planetwide/ */
51 /* */
52 /*****************************************************************************/
54 /*****************************************************************************/
55 /* Change Log */
56 /* */
57 /* 0.99.02 - Breakup commands that are bigger than 8 * the stripe size */
58 /* 0.99.03 - Make interrupt routine handle all completed request on the */
59 /* adapter not just the first one */
60 /* - Make sure passthru commands get woken up if we run out of */
61 /* SCBs */
62 /* - Send all of the commands on the queue at once rather than */
63 /* one at a time since the card will support it. */
64 /* 0.99.04 - Fix race condition in the passthru mechanism -- this required */
65 /* the interface to the utilities to change */
66 /* - Fix error recovery code */
67 /* 0.99.05 - Fix an oops when we get certain passthru commands */
68 /* 1.00.00 - Initial Public Release */
69 /* Functionally equivalent to 0.99.05 */
70 /* 3.60.00 - Bump max commands to 128 for use with firmware 3.60 */
71 /* - Change version to 3.60 to coincide with release numbering. */
72 /* 3.60.01 - Remove bogus error check in passthru routine */
73 /* 3.60.02 - Make DCDB direction based on lookup table */
74 /* - Only allow one DCDB command to a SCSI ID at a time */
75 /* 4.00.00 - Add support for ServeRAID 4 */
76 /* 4.00.01 - Add support for First Failure Data Capture */
77 /* 4.00.02 - Fix problem with PT DCDB with no buffer */
78 /* 4.00.03 - Add alternative passthru interface */
79 /* - Add ability to flash BIOS */
80 /* 4.00.04 - Rename structures/constants to be prefixed with IPS_ */
81 /* 4.00.05 - Remove wish_block from init routine */
82 /* - Use linux/spinlock.h instead of asm/spinlock.h for kernels */
83 /* 2.3.18 and later */
84 /* - Sync with other changes from the 2.3 kernels */
85 /* 4.00.06 - Fix timeout with initial FFDC command */
86 /* 4.00.06a - Port to 2.4 (trivial) -- Christoph Hellwig <hch@infradead.org> */
87 /* 4.10.00 - Add support for ServeRAID 4M/4L */
88 /* 4.10.13 - Fix for dynamic unload and proc file system */
89 /* 4.20.03 - Rename version to coincide with new release schedules */
90 /* Performance fixes */
91 /* Fix truncation of /proc files with cat */
92 /* Merge in changes through kernel 2.4.0test1ac21 */
93 /* 4.20.13 - Fix some failure cases / reset code */
94 /* - Hook into the reboot_notifier to flush the controller cache */
95 /* 4.50.01 - Fix problem when there is a hole in logical drive numbering */
96 /* 4.70.09 - Use a Common ( Large Buffer ) for Flashing from the JCRM CD */
97 /* - Add IPSSEND Flash Support */
98 /* - Set Sense Data for Unknown SCSI Command */
99 /* - Use Slot Number from NVRAM Page 5 */
100 /* - Restore caller's DCDB Structure */
101 /* 4.70.12 - Corrective actions for bad controller ( during initialization )*/
102 /* 4.70.13 - Don't Send CDB's if we already know the device is not present */
103 /* - Don't release HA Lock in ips_next() until SC taken off queue */
104 /* - Unregister SCSI device in ips_release() */
105 /* 4.70.15 - Fix Breakup for very large ( non-SG ) requests in ips_done() */
106 /* 4.71.00 - Change all memory allocations to not use GFP_DMA flag */
107 /* Code Clean-Up for 2.4.x kernel */
108 /* 4.72.00 - Allow for a Scatter-Gather Element to exceed MAX_XFER Size */
109 /* 4.72.01 - I/O Mapped Memory release ( so "insmod ips" does not Fail ) */
110 /* - Don't Issue Internal FFDC Command if there are Active Commands */
111 /* - Close Window for getting too many IOCTL's active */
112 /* 4.80.00 - Make ia64 Safe */
113 /* 4.80.04 - Eliminate calls to strtok() if 2.4.x or greater */
114 /* - Adjustments to Device Queue Depth */
115 /* 4.80.14 - Take all semaphores off stack */
116 /* - Clean Up New_IOCTL path */
117 /* 4.80.20 - Set max_sectors in Scsi_Host structure ( if >= 2.4.7 kernel ) */
118 /* - 5 second delay needed after resetting an i960 adapter */
119 /* 4.80.26 - Clean up potential code problems ( Arjan's recommendations ) */
120 /* 4.90.01 - Version Matching for FirmWare, BIOS, and Driver */
121 /* 4.90.05 - Use New PCI Architecture to facilitate Hot Plug Development */
122 /* 4.90.08 - Increase Delays in Flashing ( Trombone Only - 4H ) */
123 /* 4.90.08 - Data Corruption if First Scatter Gather Element is > 64K */
124 /* 4.90.11 - Don't actually RESET unless it's physically required */
125 /* - Remove unused compile options */
126 /* 5.00.01 - Sarasota ( 5i ) adapters must always be scanned first */
127 /* - Get rid on IOCTL_NEW_COMMAND code */
128 /* - Add Extended DCDB Commands for Tape Support in 5I */
129 /* 5.10.12 - use pci_dma interfaces, update for 2.5 kernel changes */
130 /* 5.10.15 - remove unused code (sem, macros, etc.) */
131 /* 5.30.00 - use __devexit_p() */
132 /* 6.00.00 - Add 6x Adapters and Battery Flash */
133 /* 6.10.00 - Remove 1G Addressing Limitations */
134 /* 6.11.xx - Get VersionInfo buffer off the stack ! DDTS 60401 */
135 /* 6.11.xx - Make Logical Drive Info structure safe for DMA DDTS 60639 */
136 /* 7.10.18 - Add highmem_io flag in SCSI Templete for 2.4 kernels */
137 /* - Fix path/name for scsi_hosts.h include for 2.6 kernels */
138 /* - Fix sort order of 7k */
139 /* - Remove 3 unused "inline" functions */
140 /* 7.12.xx - Use STATIC functions whereever possible */
141 /* - Clean up deprecated MODULE_PARM calls */
142 /* 7.12.05 - Remove Version Matching per IBM request */
143 /*****************************************************************************/
146 * Conditional Compilation directives for this driver:
148 * IPS_DEBUG - Turn on debugging info
150 * Parameters:
152 * debug:<number> - Set debug level to <number>
153 * NOTE: only works when IPS_DEBUG compile directive is used.
154 * 1 - Normal debug messages
155 * 2 - Verbose debug messages
156 * 11 - Method trace (non interrupt)
157 * 12 - Method trace (includes interrupt)
159 * noi2o - Don't use I2O Queues (ServeRAID 4 only)
160 * nommap - Don't use memory mapped I/O
161 * ioctlsize - Initial size of the IOCTL buffer
164 #include <asm/io.h>
165 #include <asm/byteorder.h>
166 #include <asm/page.h>
167 #include <linux/stddef.h>
168 #include <linux/string.h>
169 #include <linux/errno.h>
170 #include <linux/kernel.h>
171 #include <linux/ioport.h>
172 #include <linux/slab.h>
173 #include <linux/delay.h>
174 #include <linux/pci.h>
175 #include <linux/proc_fs.h>
176 #include <linux/reboot.h>
177 #include <linux/interrupt.h>
179 #include <linux/blkdev.h>
180 #include <linux/types.h>
181 #include <linux/dma-mapping.h>
183 #include <scsi/sg.h>
184 #include "scsi.h"
185 #include <scsi/scsi_host.h>
187 #include "ips.h"
189 #include <linux/module.h>
191 #include <linux/stat.h>
193 #include <linux/spinlock.h>
194 #include <linux/init.h>
196 #include <linux/smp.h>
198 #ifdef MODULE
199 static char *ips = NULL;
200 module_param(ips, charp, 0);
201 #endif
204 * DRIVER_VER
206 #define IPS_VERSION_HIGH IPS_VER_MAJOR_STRING "." IPS_VER_MINOR_STRING
207 #define IPS_VERSION_LOW "." IPS_VER_BUILD_STRING " "
209 #if !defined(__i386__) && !defined(__ia64__) && !defined(__x86_64__)
210 #warning "This driver has only been tested on the x86/ia64/x86_64 platforms"
211 #endif
213 #define IPS_DMA_DIR(scb) ((!scb->scsi_cmd || ips_is_passthru(scb->scsi_cmd) || \
214 DMA_NONE == scb->scsi_cmd->sc_data_direction) ? \
215 PCI_DMA_BIDIRECTIONAL : \
216 scb->scsi_cmd->sc_data_direction)
218 #ifdef IPS_DEBUG
219 #define METHOD_TRACE(s, i) if (ips_debug >= (i+10)) printk(KERN_NOTICE s "\n");
220 #define DEBUG(i, s) if (ips_debug >= i) printk(KERN_NOTICE s "\n");
221 #define DEBUG_VAR(i, s, v...) if (ips_debug >= i) printk(KERN_NOTICE s "\n", v);
222 #else
223 #define METHOD_TRACE(s, i)
224 #define DEBUG(i, s)
225 #define DEBUG_VAR(i, s, v...)
226 #endif
229 * Function prototypes
231 static int ips_detect(struct scsi_host_template *);
232 static int ips_release(struct Scsi_Host *);
233 static int ips_eh_abort(struct scsi_cmnd *);
234 static int ips_eh_reset(struct scsi_cmnd *);
235 static int ips_queue(struct scsi_cmnd *, void (*)(struct scsi_cmnd *));
236 static const char *ips_info(struct Scsi_Host *);
237 static irqreturn_t do_ipsintr(int, void *);
238 static int ips_hainit(ips_ha_t *);
239 static int ips_map_status(ips_ha_t *, ips_scb_t *, ips_stat_t *);
240 static int ips_send_wait(ips_ha_t *, ips_scb_t *, int, int);
241 static int ips_send_cmd(ips_ha_t *, ips_scb_t *);
242 static int ips_online(ips_ha_t *, ips_scb_t *);
243 static int ips_inquiry(ips_ha_t *, ips_scb_t *);
244 static int ips_rdcap(ips_ha_t *, ips_scb_t *);
245 static int ips_msense(ips_ha_t *, ips_scb_t *);
246 static int ips_reqsen(ips_ha_t *, ips_scb_t *);
247 static int ips_deallocatescbs(ips_ha_t *, int);
248 static int ips_allocatescbs(ips_ha_t *);
249 static int ips_reset_copperhead(ips_ha_t *);
250 static int ips_reset_copperhead_memio(ips_ha_t *);
251 static int ips_reset_morpheus(ips_ha_t *);
252 static int ips_issue_copperhead(ips_ha_t *, ips_scb_t *);
253 static int ips_issue_copperhead_memio(ips_ha_t *, ips_scb_t *);
254 static int ips_issue_i2o(ips_ha_t *, ips_scb_t *);
255 static int ips_issue_i2o_memio(ips_ha_t *, ips_scb_t *);
256 static int ips_isintr_copperhead(ips_ha_t *);
257 static int ips_isintr_copperhead_memio(ips_ha_t *);
258 static int ips_isintr_morpheus(ips_ha_t *);
259 static int ips_wait(ips_ha_t *, int, int);
260 static int ips_write_driver_status(ips_ha_t *, int);
261 static int ips_read_adapter_status(ips_ha_t *, int);
262 static int ips_read_subsystem_parameters(ips_ha_t *, int);
263 static int ips_read_config(ips_ha_t *, int);
264 static int ips_clear_adapter(ips_ha_t *, int);
265 static int ips_readwrite_page5(ips_ha_t *, int, int);
266 static int ips_init_copperhead(ips_ha_t *);
267 static int ips_init_copperhead_memio(ips_ha_t *);
268 static int ips_init_morpheus(ips_ha_t *);
269 static int ips_isinit_copperhead(ips_ha_t *);
270 static int ips_isinit_copperhead_memio(ips_ha_t *);
271 static int ips_isinit_morpheus(ips_ha_t *);
272 static int ips_erase_bios(ips_ha_t *);
273 static int ips_program_bios(ips_ha_t *, char *, uint32_t, uint32_t);
274 static int ips_verify_bios(ips_ha_t *, char *, uint32_t, uint32_t);
275 static int ips_erase_bios_memio(ips_ha_t *);
276 static int ips_program_bios_memio(ips_ha_t *, char *, uint32_t, uint32_t);
277 static int ips_verify_bios_memio(ips_ha_t *, char *, uint32_t, uint32_t);
278 static int ips_flash_copperhead(ips_ha_t *, ips_passthru_t *, ips_scb_t *);
279 static int ips_flash_bios(ips_ha_t *, ips_passthru_t *, ips_scb_t *);
280 static int ips_flash_firmware(ips_ha_t *, ips_passthru_t *, ips_scb_t *);
281 static void ips_free_flash_copperhead(ips_ha_t * ha);
282 static void ips_get_bios_version(ips_ha_t *, int);
283 static void ips_identify_controller(ips_ha_t *);
284 static void ips_chkstatus(ips_ha_t *, IPS_STATUS *);
285 static void ips_enable_int_copperhead(ips_ha_t *);
286 static void ips_enable_int_copperhead_memio(ips_ha_t *);
287 static void ips_enable_int_morpheus(ips_ha_t *);
288 static int ips_intr_copperhead(ips_ha_t *);
289 static int ips_intr_morpheus(ips_ha_t *);
290 static void ips_next(ips_ha_t *, int);
291 static void ipsintr_blocking(ips_ha_t *, struct ips_scb *);
292 static void ipsintr_done(ips_ha_t *, struct ips_scb *);
293 static void ips_done(ips_ha_t *, ips_scb_t *);
294 static void ips_free(ips_ha_t *);
295 static void ips_init_scb(ips_ha_t *, ips_scb_t *);
296 static void ips_freescb(ips_ha_t *, ips_scb_t *);
297 static void ips_setup_funclist(ips_ha_t *);
298 static void ips_statinit(ips_ha_t *);
299 static void ips_statinit_memio(ips_ha_t *);
300 static void ips_fix_ffdc_time(ips_ha_t *, ips_scb_t *, time_t);
301 static void ips_ffdc_reset(ips_ha_t *, int);
302 static void ips_ffdc_time(ips_ha_t *);
303 static uint32_t ips_statupd_copperhead(ips_ha_t *);
304 static uint32_t ips_statupd_copperhead_memio(ips_ha_t *);
305 static uint32_t ips_statupd_morpheus(ips_ha_t *);
306 static ips_scb_t *ips_getscb(ips_ha_t *);
307 static void ips_putq_scb_head(ips_scb_queue_t *, ips_scb_t *);
308 static void ips_putq_wait_tail(ips_wait_queue_t *, struct scsi_cmnd *);
309 static void ips_putq_copp_tail(ips_copp_queue_t *,
310 ips_copp_wait_item_t *);
311 static ips_scb_t *ips_removeq_scb_head(ips_scb_queue_t *);
312 static ips_scb_t *ips_removeq_scb(ips_scb_queue_t *, ips_scb_t *);
313 static struct scsi_cmnd *ips_removeq_wait_head(ips_wait_queue_t *);
314 static struct scsi_cmnd *ips_removeq_wait(ips_wait_queue_t *,
315 struct scsi_cmnd *);
316 static ips_copp_wait_item_t *ips_removeq_copp(ips_copp_queue_t *,
317 ips_copp_wait_item_t *);
318 static ips_copp_wait_item_t *ips_removeq_copp_head(ips_copp_queue_t *);
320 static int ips_is_passthru(struct scsi_cmnd *);
321 static int ips_make_passthru(ips_ha_t *, struct scsi_cmnd *, ips_scb_t *, int);
322 static int ips_usrcmd(ips_ha_t *, ips_passthru_t *, ips_scb_t *);
323 static void ips_cleanup_passthru(ips_ha_t *, ips_scb_t *);
324 static void ips_scmd_buf_write(struct scsi_cmnd * scmd, void *data,
325 unsigned int count);
326 static void ips_scmd_buf_read(struct scsi_cmnd * scmd, void *data,
327 unsigned int count);
329 static int ips_proc_info(struct Scsi_Host *, char *, char **, off_t, int, int);
330 static int ips_host_info(ips_ha_t *, char *, off_t, int);
331 static void copy_mem_info(IPS_INFOSTR *, char *, int);
332 static int copy_info(IPS_INFOSTR *, char *, ...);
333 static int ips_abort_init(ips_ha_t * ha, int index);
334 static int ips_init_phase2(int index);
336 static int ips_init_phase1(struct pci_dev *pci_dev, int *indexPtr);
337 static int ips_register_scsi(int index);
339 static int ips_poll_for_flush_complete(ips_ha_t * ha);
340 static void ips_flush_and_reset(ips_ha_t *ha);
343 * global variables
345 static const char ips_name[] = "ips";
346 static struct Scsi_Host *ips_sh[IPS_MAX_ADAPTERS]; /* Array of host controller structures */
347 static ips_ha_t *ips_ha[IPS_MAX_ADAPTERS]; /* Array of HA structures */
348 static unsigned int ips_next_controller;
349 static unsigned int ips_num_controllers;
350 static unsigned int ips_released_controllers;
351 static int ips_hotplug;
352 static int ips_cmd_timeout = 60;
353 static int ips_reset_timeout = 60 * 5;
354 static int ips_force_memio = 1; /* Always use Memory Mapped I/O */
355 static int ips_force_i2o = 1; /* Always use I2O command delivery */
356 static int ips_ioctlsize = IPS_IOCTL_SIZE; /* Size of the ioctl buffer */
357 static int ips_cd_boot; /* Booting from Manager CD */
358 static char *ips_FlashData = NULL; /* CD Boot - Flash Data Buffer */
359 static dma_addr_t ips_flashbusaddr;
360 static long ips_FlashDataInUse; /* CD Boot - Flash Data In Use Flag */
361 static uint32_t MaxLiteCmds = 32; /* Max Active Cmds for a Lite Adapter */
362 static struct scsi_host_template ips_driver_template = {
363 .detect = ips_detect,
364 .release = ips_release,
365 .info = ips_info,
366 .queuecommand = ips_queue,
367 .eh_abort_handler = ips_eh_abort,
368 .eh_host_reset_handler = ips_eh_reset,
369 .proc_name = "ips",
370 .proc_info = ips_proc_info,
371 .slave_configure = ips_slave_configure,
372 .bios_param = ips_biosparam,
373 .this_id = -1,
374 .sg_tablesize = IPS_MAX_SG,
375 .cmd_per_lun = 3,
376 .use_clustering = ENABLE_CLUSTERING,
380 /* This table describes all ServeRAID Adapters */
381 static struct pci_device_id ips_pci_table[] = {
382 { 0x1014, 0x002E, PCI_ANY_ID, PCI_ANY_ID, 0, 0 },
383 { 0x1014, 0x01BD, PCI_ANY_ID, PCI_ANY_ID, 0, 0 },
384 { 0x9005, 0x0250, PCI_ANY_ID, PCI_ANY_ID, 0, 0 },
385 { 0, }
388 MODULE_DEVICE_TABLE( pci, ips_pci_table );
390 static char ips_hot_plug_name[] = "ips";
392 static int __devinit ips_insert_device(struct pci_dev *pci_dev, const struct pci_device_id *ent);
393 static void __devexit ips_remove_device(struct pci_dev *pci_dev);
395 static struct pci_driver ips_pci_driver = {
396 .name = ips_hot_plug_name,
397 .id_table = ips_pci_table,
398 .probe = ips_insert_device,
399 .remove = __devexit_p(ips_remove_device),
404 * Necessary forward function protoypes
406 static int ips_halt(struct notifier_block *nb, ulong event, void *buf);
408 #define MAX_ADAPTER_NAME 15
410 static char ips_adapter_name[][30] = {
411 "ServeRAID",
412 "ServeRAID II",
413 "ServeRAID on motherboard",
414 "ServeRAID on motherboard",
415 "ServeRAID 3H",
416 "ServeRAID 3L",
417 "ServeRAID 4H",
418 "ServeRAID 4M",
419 "ServeRAID 4L",
420 "ServeRAID 4Mx",
421 "ServeRAID 4Lx",
422 "ServeRAID 5i",
423 "ServeRAID 5i",
424 "ServeRAID 6M",
425 "ServeRAID 6i",
426 "ServeRAID 7t",
427 "ServeRAID 7k",
428 "ServeRAID 7M"
431 static struct notifier_block ips_notifier = {
432 ips_halt, NULL, 0
436 * Direction table
438 static char ips_command_direction[] = {
439 IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_IN, IPS_DATA_IN, IPS_DATA_OUT,
440 IPS_DATA_IN, IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_UNK,
441 IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
442 IPS_DATA_IN, IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_IN, IPS_DATA_OUT,
443 IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_OUT,
444 IPS_DATA_NONE, IPS_DATA_IN, IPS_DATA_NONE, IPS_DATA_IN, IPS_DATA_OUT,
445 IPS_DATA_NONE, IPS_DATA_UNK, IPS_DATA_IN, IPS_DATA_UNK, IPS_DATA_IN,
446 IPS_DATA_UNK, IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_UNK, IPS_DATA_UNK,
447 IPS_DATA_IN, IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_NONE, IPS_DATA_UNK,
448 IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT,
449 IPS_DATA_OUT, IPS_DATA_NONE, IPS_DATA_IN, IPS_DATA_NONE, IPS_DATA_NONE,
450 IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT,
451 IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_OUT,
452 IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_IN, IPS_DATA_IN, IPS_DATA_NONE,
453 IPS_DATA_UNK, IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_UNK,
454 IPS_DATA_NONE, IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_UNK, IPS_DATA_UNK,
455 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
456 IPS_DATA_OUT, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
457 IPS_DATA_IN, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
458 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
459 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
460 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
461 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
462 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
463 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
464 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
465 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
466 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
467 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
468 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
469 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
470 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
471 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
472 IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_UNK, IPS_DATA_IN, IPS_DATA_NONE,
473 IPS_DATA_OUT, IPS_DATA_UNK, IPS_DATA_NONE, IPS_DATA_UNK, IPS_DATA_OUT,
474 IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_NONE,
475 IPS_DATA_UNK, IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_IN,
476 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
477 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
478 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
479 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
480 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
481 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
482 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
483 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
484 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
485 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_OUT,
486 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
487 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
488 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
489 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK
493 /****************************************************************************/
494 /* */
495 /* Routine Name: ips_setup */
496 /* */
497 /* Routine Description: */
498 /* */
499 /* setup parameters to the driver */
500 /* */
501 /****************************************************************************/
502 static int
503 ips_setup(char *ips_str)
506 int i;
507 char *key;
508 char *value;
509 IPS_OPTION options[] = {
510 {"noi2o", &ips_force_i2o, 0},
511 {"nommap", &ips_force_memio, 0},
512 {"ioctlsize", &ips_ioctlsize, IPS_IOCTL_SIZE},
513 {"cdboot", &ips_cd_boot, 0},
514 {"maxcmds", &MaxLiteCmds, 32},
517 /* Don't use strtok() anymore ( if 2.4 Kernel or beyond ) */
518 /* Search for value */
519 while ((key = strsep(&ips_str, ",."))) {
520 if (!*key)
521 continue;
522 value = strchr(key, ':');
523 if (value)
524 *value++ = '\0';
526 * We now have key/value pairs.
527 * Update the variables
529 for (i = 0; i < ARRAY_SIZE(options); i++) {
530 if (strnicmp
531 (key, options[i].option_name,
532 strlen(options[i].option_name)) == 0) {
533 if (value)
534 *options[i].option_flag =
535 simple_strtoul(value, NULL, 0);
536 else
537 *options[i].option_flag =
538 options[i].option_value;
539 break;
544 return (1);
547 __setup("ips=", ips_setup);
549 /****************************************************************************/
550 /* */
551 /* Routine Name: ips_detect */
552 /* */
553 /* Routine Description: */
554 /* */
555 /* Detect and initialize the driver */
556 /* */
557 /* NOTE: this routine is called under the io_request_lock spinlock */
558 /* */
559 /****************************************************************************/
560 static int
561 ips_detect(struct scsi_host_template * SHT)
563 int i;
565 METHOD_TRACE("ips_detect", 1);
567 #ifdef MODULE
568 if (ips)
569 ips_setup(ips);
570 #endif
572 for (i = 0; i < ips_num_controllers; i++) {
573 if (ips_register_scsi(i))
574 ips_free(ips_ha[i]);
575 ips_released_controllers++;
577 ips_hotplug = 1;
578 return (ips_num_controllers);
581 /****************************************************************************/
582 /* configure the function pointers to use the functions that will work */
583 /* with the found version of the adapter */
584 /****************************************************************************/
585 static void
586 ips_setup_funclist(ips_ha_t * ha)
590 * Setup Functions
592 if (IPS_IS_MORPHEUS(ha) || IPS_IS_MARCO(ha)) {
593 /* morpheus / marco / sebring */
594 ha->func.isintr = ips_isintr_morpheus;
595 ha->func.isinit = ips_isinit_morpheus;
596 ha->func.issue = ips_issue_i2o_memio;
597 ha->func.init = ips_init_morpheus;
598 ha->func.statupd = ips_statupd_morpheus;
599 ha->func.reset = ips_reset_morpheus;
600 ha->func.intr = ips_intr_morpheus;
601 ha->func.enableint = ips_enable_int_morpheus;
602 } else if (IPS_USE_MEMIO(ha)) {
603 /* copperhead w/MEMIO */
604 ha->func.isintr = ips_isintr_copperhead_memio;
605 ha->func.isinit = ips_isinit_copperhead_memio;
606 ha->func.init = ips_init_copperhead_memio;
607 ha->func.statupd = ips_statupd_copperhead_memio;
608 ha->func.statinit = ips_statinit_memio;
609 ha->func.reset = ips_reset_copperhead_memio;
610 ha->func.intr = ips_intr_copperhead;
611 ha->func.erasebios = ips_erase_bios_memio;
612 ha->func.programbios = ips_program_bios_memio;
613 ha->func.verifybios = ips_verify_bios_memio;
614 ha->func.enableint = ips_enable_int_copperhead_memio;
615 if (IPS_USE_I2O_DELIVER(ha))
616 ha->func.issue = ips_issue_i2o_memio;
617 else
618 ha->func.issue = ips_issue_copperhead_memio;
619 } else {
620 /* copperhead */
621 ha->func.isintr = ips_isintr_copperhead;
622 ha->func.isinit = ips_isinit_copperhead;
623 ha->func.init = ips_init_copperhead;
624 ha->func.statupd = ips_statupd_copperhead;
625 ha->func.statinit = ips_statinit;
626 ha->func.reset = ips_reset_copperhead;
627 ha->func.intr = ips_intr_copperhead;
628 ha->func.erasebios = ips_erase_bios;
629 ha->func.programbios = ips_program_bios;
630 ha->func.verifybios = ips_verify_bios;
631 ha->func.enableint = ips_enable_int_copperhead;
633 if (IPS_USE_I2O_DELIVER(ha))
634 ha->func.issue = ips_issue_i2o;
635 else
636 ha->func.issue = ips_issue_copperhead;
640 /****************************************************************************/
641 /* */
642 /* Routine Name: ips_release */
643 /* */
644 /* Routine Description: */
645 /* */
646 /* Remove a driver */
647 /* */
648 /****************************************************************************/
649 static int
650 ips_release(struct Scsi_Host *sh)
652 ips_scb_t *scb;
653 ips_ha_t *ha;
654 int i;
656 METHOD_TRACE("ips_release", 1);
658 scsi_remove_host(sh);
660 for (i = 0; i < IPS_MAX_ADAPTERS && ips_sh[i] != sh; i++) ;
662 if (i == IPS_MAX_ADAPTERS) {
663 printk(KERN_WARNING
664 "(%s) release, invalid Scsi_Host pointer.\n", ips_name);
665 BUG();
666 return (FALSE);
669 ha = IPS_HA(sh);
671 if (!ha)
672 return (FALSE);
674 /* flush the cache on the controller */
675 scb = &ha->scbs[ha->max_cmds - 1];
677 ips_init_scb(ha, scb);
679 scb->timeout = ips_cmd_timeout;
680 scb->cdb[0] = IPS_CMD_FLUSH;
682 scb->cmd.flush_cache.op_code = IPS_CMD_FLUSH;
683 scb->cmd.flush_cache.command_id = IPS_COMMAND_ID(ha, scb);
684 scb->cmd.flush_cache.state = IPS_NORM_STATE;
685 scb->cmd.flush_cache.reserved = 0;
686 scb->cmd.flush_cache.reserved2 = 0;
687 scb->cmd.flush_cache.reserved3 = 0;
688 scb->cmd.flush_cache.reserved4 = 0;
690 IPS_PRINTK(KERN_WARNING, ha->pcidev, "Flushing Cache.\n");
692 /* send command */
693 if (ips_send_wait(ha, scb, ips_cmd_timeout, IPS_INTR_ON) == IPS_FAILURE)
694 IPS_PRINTK(KERN_WARNING, ha->pcidev, "Incomplete Flush.\n");
696 IPS_PRINTK(KERN_WARNING, ha->pcidev, "Flushing Complete.\n");
698 ips_sh[i] = NULL;
699 ips_ha[i] = NULL;
701 /* free extra memory */
702 ips_free(ha);
704 /* free IRQ */
705 free_irq(ha->pcidev->irq, ha);
707 scsi_host_put(sh);
709 ips_released_controllers++;
711 return (FALSE);
714 /****************************************************************************/
715 /* */
716 /* Routine Name: ips_halt */
717 /* */
718 /* Routine Description: */
719 /* */
720 /* Perform cleanup when the system reboots */
721 /* */
722 /****************************************************************************/
723 static int
724 ips_halt(struct notifier_block *nb, ulong event, void *buf)
726 ips_scb_t *scb;
727 ips_ha_t *ha;
728 int i;
730 if ((event != SYS_RESTART) && (event != SYS_HALT) &&
731 (event != SYS_POWER_OFF))
732 return (NOTIFY_DONE);
734 for (i = 0; i < ips_next_controller; i++) {
735 ha = (ips_ha_t *) ips_ha[i];
737 if (!ha)
738 continue;
740 if (!ha->active)
741 continue;
743 /* flush the cache on the controller */
744 scb = &ha->scbs[ha->max_cmds - 1];
746 ips_init_scb(ha, scb);
748 scb->timeout = ips_cmd_timeout;
749 scb->cdb[0] = IPS_CMD_FLUSH;
751 scb->cmd.flush_cache.op_code = IPS_CMD_FLUSH;
752 scb->cmd.flush_cache.command_id = IPS_COMMAND_ID(ha, scb);
753 scb->cmd.flush_cache.state = IPS_NORM_STATE;
754 scb->cmd.flush_cache.reserved = 0;
755 scb->cmd.flush_cache.reserved2 = 0;
756 scb->cmd.flush_cache.reserved3 = 0;
757 scb->cmd.flush_cache.reserved4 = 0;
759 IPS_PRINTK(KERN_WARNING, ha->pcidev, "Flushing Cache.\n");
761 /* send command */
762 if (ips_send_wait(ha, scb, ips_cmd_timeout, IPS_INTR_ON) ==
763 IPS_FAILURE)
764 IPS_PRINTK(KERN_WARNING, ha->pcidev,
765 "Incomplete Flush.\n");
766 else
767 IPS_PRINTK(KERN_WARNING, ha->pcidev,
768 "Flushing Complete.\n");
771 return (NOTIFY_OK);
774 /****************************************************************************/
775 /* */
776 /* Routine Name: ips_eh_abort */
777 /* */
778 /* Routine Description: */
779 /* */
780 /* Abort a command (using the new error code stuff) */
781 /* Note: this routine is called under the io_request_lock */
782 /****************************************************************************/
783 int ips_eh_abort(struct scsi_cmnd *SC)
785 ips_ha_t *ha;
786 ips_copp_wait_item_t *item;
787 int ret;
788 struct Scsi_Host *host;
790 METHOD_TRACE("ips_eh_abort", 1);
792 if (!SC)
793 return (FAILED);
795 host = SC->device->host;
796 ha = (ips_ha_t *) SC->device->host->hostdata;
798 if (!ha)
799 return (FAILED);
801 if (!ha->active)
802 return (FAILED);
804 spin_lock(host->host_lock);
806 /* See if the command is on the copp queue */
807 item = ha->copp_waitlist.head;
808 while ((item) && (item->scsi_cmd != SC))
809 item = item->next;
811 if (item) {
812 /* Found it */
813 ips_removeq_copp(&ha->copp_waitlist, item);
814 ret = (SUCCESS);
816 /* See if the command is on the wait queue */
817 } else if (ips_removeq_wait(&ha->scb_waitlist, SC)) {
818 /* command not sent yet */
819 ret = (SUCCESS);
820 } else {
821 /* command must have already been sent */
822 ret = (FAILED);
825 spin_unlock(host->host_lock);
826 return ret;
829 /****************************************************************************/
830 /* */
831 /* Routine Name: ips_eh_reset */
832 /* */
833 /* Routine Description: */
834 /* */
835 /* Reset the controller (with new eh error code) */
836 /* */
837 /* NOTE: this routine is called under the io_request_lock spinlock */
838 /* */
839 /****************************************************************************/
840 static int __ips_eh_reset(struct scsi_cmnd *SC)
842 int ret;
843 int i;
844 ips_ha_t *ha;
845 ips_scb_t *scb;
846 ips_copp_wait_item_t *item;
848 METHOD_TRACE("ips_eh_reset", 1);
850 #ifdef NO_IPS_RESET
851 return (FAILED);
852 #else
854 if (!SC) {
855 DEBUG(1, "Reset called with NULL scsi command");
857 return (FAILED);
860 ha = (ips_ha_t *) SC->device->host->hostdata;
862 if (!ha) {
863 DEBUG(1, "Reset called with NULL ha struct");
865 return (FAILED);
868 if (!ha->active)
869 return (FAILED);
871 /* See if the command is on the copp queue */
872 item = ha->copp_waitlist.head;
873 while ((item) && (item->scsi_cmd != SC))
874 item = item->next;
876 if (item) {
877 /* Found it */
878 ips_removeq_copp(&ha->copp_waitlist, item);
879 return (SUCCESS);
882 /* See if the command is on the wait queue */
883 if (ips_removeq_wait(&ha->scb_waitlist, SC)) {
884 /* command not sent yet */
885 return (SUCCESS);
888 /* An explanation for the casual observer: */
889 /* Part of the function of a RAID controller is automatic error */
890 /* detection and recovery. As such, the only problem that physically */
891 /* resetting an adapter will ever fix is when, for some reason, */
892 /* the driver is not successfully communicating with the adapter. */
893 /* Therefore, we will attempt to flush this adapter. If that succeeds, */
894 /* then there's no real purpose in a physical reset. This will complete */
895 /* much faster and avoids any problems that might be caused by a */
896 /* physical reset ( such as having to fail all the outstanding I/O's ). */
898 if (ha->ioctl_reset == 0) { /* IF Not an IOCTL Requested Reset */
899 scb = &ha->scbs[ha->max_cmds - 1];
901 ips_init_scb(ha, scb);
903 scb->timeout = ips_cmd_timeout;
904 scb->cdb[0] = IPS_CMD_FLUSH;
906 scb->cmd.flush_cache.op_code = IPS_CMD_FLUSH;
907 scb->cmd.flush_cache.command_id = IPS_COMMAND_ID(ha, scb);
908 scb->cmd.flush_cache.state = IPS_NORM_STATE;
909 scb->cmd.flush_cache.reserved = 0;
910 scb->cmd.flush_cache.reserved2 = 0;
911 scb->cmd.flush_cache.reserved3 = 0;
912 scb->cmd.flush_cache.reserved4 = 0;
914 /* Attempt the flush command */
915 ret = ips_send_wait(ha, scb, ips_cmd_timeout, IPS_INTR_IORL);
916 if (ret == IPS_SUCCESS) {
917 IPS_PRINTK(KERN_NOTICE, ha->pcidev,
918 "Reset Request - Flushed Cache\n");
919 return (SUCCESS);
923 /* Either we can't communicate with the adapter or it's an IOCTL request */
924 /* from a utility. A physical reset is needed at this point. */
926 ha->ioctl_reset = 0; /* Reset the IOCTL Requested Reset Flag */
929 * command must have already been sent
930 * reset the controller
932 IPS_PRINTK(KERN_NOTICE, ha->pcidev, "Resetting controller.\n");
933 ret = (*ha->func.reset) (ha);
935 if (!ret) {
936 struct scsi_cmnd *scsi_cmd;
938 IPS_PRINTK(KERN_NOTICE, ha->pcidev,
939 "Controller reset failed - controller now offline.\n");
941 /* Now fail all of the active commands */
942 DEBUG_VAR(1, "(%s%d) Failing active commands",
943 ips_name, ha->host_num);
945 while ((scb = ips_removeq_scb_head(&ha->scb_activelist))) {
946 scb->scsi_cmd->result = DID_ERROR << 16;
947 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
948 ips_freescb(ha, scb);
951 /* Now fail all of the pending commands */
952 DEBUG_VAR(1, "(%s%d) Failing pending commands",
953 ips_name, ha->host_num);
955 while ((scsi_cmd = ips_removeq_wait_head(&ha->scb_waitlist))) {
956 scsi_cmd->result = DID_ERROR;
957 scsi_cmd->scsi_done(scsi_cmd);
960 ha->active = FALSE;
961 return (FAILED);
964 if (!ips_clear_adapter(ha, IPS_INTR_IORL)) {
965 struct scsi_cmnd *scsi_cmd;
967 IPS_PRINTK(KERN_NOTICE, ha->pcidev,
968 "Controller reset failed - controller now offline.\n");
970 /* Now fail all of the active commands */
971 DEBUG_VAR(1, "(%s%d) Failing active commands",
972 ips_name, ha->host_num);
974 while ((scb = ips_removeq_scb_head(&ha->scb_activelist))) {
975 scb->scsi_cmd->result = DID_ERROR << 16;
976 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
977 ips_freescb(ha, scb);
980 /* Now fail all of the pending commands */
981 DEBUG_VAR(1, "(%s%d) Failing pending commands",
982 ips_name, ha->host_num);
984 while ((scsi_cmd = ips_removeq_wait_head(&ha->scb_waitlist))) {
985 scsi_cmd->result = DID_ERROR << 16;
986 scsi_cmd->scsi_done(scsi_cmd);
989 ha->active = FALSE;
990 return (FAILED);
993 /* FFDC */
994 if (le32_to_cpu(ha->subsys->param[3]) & 0x300000) {
995 struct timeval tv;
997 do_gettimeofday(&tv);
998 ha->last_ffdc = tv.tv_sec;
999 ha->reset_count++;
1000 ips_ffdc_reset(ha, IPS_INTR_IORL);
1003 /* Now fail all of the active commands */
1004 DEBUG_VAR(1, "(%s%d) Failing active commands", ips_name, ha->host_num);
1006 while ((scb = ips_removeq_scb_head(&ha->scb_activelist))) {
1007 scb->scsi_cmd->result =
1008 (DID_RESET << 16) | (SUGGEST_RETRY << 24);
1009 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
1010 ips_freescb(ha, scb);
1013 /* Reset DCDB active command bits */
1014 for (i = 1; i < ha->nbus; i++)
1015 ha->dcdb_active[i - 1] = 0;
1017 /* Reset the number of active IOCTLs */
1018 ha->num_ioctl = 0;
1020 ips_next(ha, IPS_INTR_IORL);
1022 return (SUCCESS);
1023 #endif /* NO_IPS_RESET */
1027 static int ips_eh_reset(struct scsi_cmnd *SC)
1029 int rc;
1031 spin_lock_irq(SC->device->host->host_lock);
1032 rc = __ips_eh_reset(SC);
1033 spin_unlock_irq(SC->device->host->host_lock);
1035 return rc;
1038 /****************************************************************************/
1039 /* */
1040 /* Routine Name: ips_queue */
1041 /* */
1042 /* Routine Description: */
1043 /* */
1044 /* Send a command to the controller */
1045 /* */
1046 /* NOTE: */
1047 /* Linux obtains io_request_lock before calling this function */
1048 /* */
1049 /****************************************************************************/
1050 static int ips_queue(struct scsi_cmnd *SC, void (*done) (struct scsi_cmnd *))
1052 ips_ha_t *ha;
1053 ips_passthru_t *pt;
1055 METHOD_TRACE("ips_queue", 1);
1057 ha = (ips_ha_t *) SC->device->host->hostdata;
1059 if (!ha)
1060 return (1);
1062 if (!ha->active)
1063 return (DID_ERROR);
1065 if (ips_is_passthru(SC)) {
1066 if (ha->copp_waitlist.count == IPS_MAX_IOCTL_QUEUE) {
1067 SC->result = DID_BUS_BUSY << 16;
1068 done(SC);
1070 return (0);
1072 } else if (ha->scb_waitlist.count == IPS_MAX_QUEUE) {
1073 SC->result = DID_BUS_BUSY << 16;
1074 done(SC);
1076 return (0);
1079 SC->scsi_done = done;
1081 DEBUG_VAR(2, "(%s%d): ips_queue: cmd 0x%X (%d %d %d)",
1082 ips_name,
1083 ha->host_num,
1084 SC->cmnd[0],
1085 SC->device->channel, SC->device->id, SC->device->lun);
1087 /* Check for command to initiator IDs */
1088 if ((scmd_channel(SC) > 0)
1089 && (scmd_id(SC) == ha->ha_id[scmd_channel(SC)])) {
1090 SC->result = DID_NO_CONNECT << 16;
1091 done(SC);
1093 return (0);
1096 if (ips_is_passthru(SC)) {
1098 ips_copp_wait_item_t *scratch;
1100 /* A Reset IOCTL is only sent by the boot CD in extreme cases. */
1101 /* There can never be any system activity ( network or disk ), but check */
1102 /* anyway just as a good practice. */
1103 pt = (ips_passthru_t *) scsi_sglist(SC);
1104 if ((pt->CoppCP.cmd.reset.op_code == IPS_CMD_RESET_CHANNEL) &&
1105 (pt->CoppCP.cmd.reset.adapter_flag == 1)) {
1106 if (ha->scb_activelist.count != 0) {
1107 SC->result = DID_BUS_BUSY << 16;
1108 done(SC);
1109 return (0);
1111 ha->ioctl_reset = 1; /* This reset request is from an IOCTL */
1112 __ips_eh_reset(SC);
1113 SC->result = DID_OK << 16;
1114 SC->scsi_done(SC);
1115 return (0);
1118 /* allocate space for the scribble */
1119 scratch = kmalloc(sizeof (ips_copp_wait_item_t), GFP_ATOMIC);
1121 if (!scratch) {
1122 SC->result = DID_ERROR << 16;
1123 done(SC);
1125 return (0);
1128 scratch->scsi_cmd = SC;
1129 scratch->next = NULL;
1131 ips_putq_copp_tail(&ha->copp_waitlist, scratch);
1132 } else {
1133 ips_putq_wait_tail(&ha->scb_waitlist, SC);
1136 ips_next(ha, IPS_INTR_IORL);
1138 return (0);
1141 /****************************************************************************/
1142 /* */
1143 /* Routine Name: ips_biosparam */
1144 /* */
1145 /* Routine Description: */
1146 /* */
1147 /* Set bios geometry for the controller */
1148 /* */
1149 /****************************************************************************/
1150 static int ips_biosparam(struct scsi_device *sdev, struct block_device *bdev,
1151 sector_t capacity, int geom[])
1153 ips_ha_t *ha = (ips_ha_t *) sdev->host->hostdata;
1154 int heads;
1155 int sectors;
1156 int cylinders;
1158 METHOD_TRACE("ips_biosparam", 1);
1160 if (!ha)
1161 /* ?!?! host adater info invalid */
1162 return (0);
1164 if (!ha->active)
1165 return (0);
1167 if (!ips_read_adapter_status(ha, IPS_INTR_ON))
1168 /* ?!?! Enquiry command failed */
1169 return (0);
1171 if ((capacity > 0x400000) && ((ha->enq->ucMiscFlag & 0x8) == 0)) {
1172 heads = IPS_NORM_HEADS;
1173 sectors = IPS_NORM_SECTORS;
1174 } else {
1175 heads = IPS_COMP_HEADS;
1176 sectors = IPS_COMP_SECTORS;
1179 cylinders = (unsigned long) capacity / (heads * sectors);
1181 DEBUG_VAR(2, "Geometry: heads: %d, sectors: %d, cylinders: %d",
1182 heads, sectors, cylinders);
1184 geom[0] = heads;
1185 geom[1] = sectors;
1186 geom[2] = cylinders;
1188 return (0);
1191 /****************************************************************************/
1192 /* */
1193 /* Routine Name: ips_slave_configure */
1194 /* */
1195 /* Routine Description: */
1196 /* */
1197 /* Set queue depths on devices once scan is complete */
1198 /* */
1199 /****************************************************************************/
1200 static int
1201 ips_slave_configure(struct scsi_device * SDptr)
1203 ips_ha_t *ha;
1204 int min;
1206 ha = IPS_HA(SDptr->host);
1207 if (SDptr->tagged_supported && SDptr->type == TYPE_DISK) {
1208 min = ha->max_cmds / 2;
1209 if (ha->enq->ucLogDriveCount <= 2)
1210 min = ha->max_cmds - 1;
1211 scsi_adjust_queue_depth(SDptr, MSG_ORDERED_TAG, min);
1214 SDptr->skip_ms_page_8 = 1;
1215 SDptr->skip_ms_page_3f = 1;
1216 return 0;
1219 /****************************************************************************/
1220 /* */
1221 /* Routine Name: do_ipsintr */
1222 /* */
1223 /* Routine Description: */
1224 /* */
1225 /* Wrapper for the interrupt handler */
1226 /* */
1227 /****************************************************************************/
1228 static irqreturn_t
1229 do_ipsintr(int irq, void *dev_id)
1231 ips_ha_t *ha;
1232 struct Scsi_Host *host;
1233 int irqstatus;
1235 METHOD_TRACE("do_ipsintr", 2);
1237 ha = (ips_ha_t *) dev_id;
1238 if (!ha)
1239 return IRQ_NONE;
1240 host = ips_sh[ha->host_num];
1241 /* interrupt during initialization */
1242 if (!host) {
1243 (*ha->func.intr) (ha);
1244 return IRQ_HANDLED;
1247 spin_lock(host->host_lock);
1249 if (!ha->active) {
1250 spin_unlock(host->host_lock);
1251 return IRQ_HANDLED;
1254 irqstatus = (*ha->func.intr) (ha);
1256 spin_unlock(host->host_lock);
1258 /* start the next command */
1259 ips_next(ha, IPS_INTR_ON);
1260 return IRQ_RETVAL(irqstatus);
1263 /****************************************************************************/
1264 /* */
1265 /* Routine Name: ips_intr_copperhead */
1266 /* */
1267 /* Routine Description: */
1268 /* */
1269 /* Polling interrupt handler */
1270 /* */
1271 /* ASSUMES interrupts are disabled */
1272 /* */
1273 /****************************************************************************/
1275 ips_intr_copperhead(ips_ha_t * ha)
1277 ips_stat_t *sp;
1278 ips_scb_t *scb;
1279 IPS_STATUS cstatus;
1280 int intrstatus;
1282 METHOD_TRACE("ips_intr", 2);
1284 if (!ha)
1285 return 0;
1287 if (!ha->active)
1288 return 0;
1290 intrstatus = (*ha->func.isintr) (ha);
1292 if (!intrstatus) {
1294 * Unexpected/Shared interrupt
1297 return 0;
1300 while (TRUE) {
1301 sp = &ha->sp;
1303 intrstatus = (*ha->func.isintr) (ha);
1305 if (!intrstatus)
1306 break;
1307 else
1308 cstatus.value = (*ha->func.statupd) (ha);
1310 if (cstatus.fields.command_id > (IPS_MAX_CMDS - 1)) {
1311 /* Spurious Interrupt ? */
1312 continue;
1315 ips_chkstatus(ha, &cstatus);
1316 scb = (ips_scb_t *) sp->scb_addr;
1319 * use the callback function to finish things up
1320 * NOTE: interrupts are OFF for this
1322 (*scb->callback) (ha, scb);
1323 } /* end while */
1324 return 1;
1327 /****************************************************************************/
1328 /* */
1329 /* Routine Name: ips_intr_morpheus */
1330 /* */
1331 /* Routine Description: */
1332 /* */
1333 /* Polling interrupt handler */
1334 /* */
1335 /* ASSUMES interrupts are disabled */
1336 /* */
1337 /****************************************************************************/
1339 ips_intr_morpheus(ips_ha_t * ha)
1341 ips_stat_t *sp;
1342 ips_scb_t *scb;
1343 IPS_STATUS cstatus;
1344 int intrstatus;
1346 METHOD_TRACE("ips_intr_morpheus", 2);
1348 if (!ha)
1349 return 0;
1351 if (!ha->active)
1352 return 0;
1354 intrstatus = (*ha->func.isintr) (ha);
1356 if (!intrstatus) {
1358 * Unexpected/Shared interrupt
1361 return 0;
1364 while (TRUE) {
1365 sp = &ha->sp;
1367 intrstatus = (*ha->func.isintr) (ha);
1369 if (!intrstatus)
1370 break;
1371 else
1372 cstatus.value = (*ha->func.statupd) (ha);
1374 if (cstatus.value == 0xffffffff)
1375 /* No more to process */
1376 break;
1378 if (cstatus.fields.command_id > (IPS_MAX_CMDS - 1)) {
1379 IPS_PRINTK(KERN_WARNING, ha->pcidev,
1380 "Spurious interrupt; no ccb.\n");
1382 continue;
1385 ips_chkstatus(ha, &cstatus);
1386 scb = (ips_scb_t *) sp->scb_addr;
1389 * use the callback function to finish things up
1390 * NOTE: interrupts are OFF for this
1392 (*scb->callback) (ha, scb);
1393 } /* end while */
1394 return 1;
1397 /****************************************************************************/
1398 /* */
1399 /* Routine Name: ips_info */
1400 /* */
1401 /* Routine Description: */
1402 /* */
1403 /* Return info about the driver */
1404 /* */
1405 /****************************************************************************/
1406 static const char *
1407 ips_info(struct Scsi_Host *SH)
1409 static char buffer[256];
1410 char *bp;
1411 ips_ha_t *ha;
1413 METHOD_TRACE("ips_info", 1);
1415 ha = IPS_HA(SH);
1417 if (!ha)
1418 return (NULL);
1420 bp = &buffer[0];
1421 memset(bp, 0, sizeof (buffer));
1423 sprintf(bp, "%s%s%s Build %d", "IBM PCI ServeRAID ",
1424 IPS_VERSION_HIGH, IPS_VERSION_LOW, IPS_BUILD_IDENT);
1426 if (ha->ad_type > 0 && ha->ad_type <= MAX_ADAPTER_NAME) {
1427 strcat(bp, " <");
1428 strcat(bp, ips_adapter_name[ha->ad_type - 1]);
1429 strcat(bp, ">");
1432 return (bp);
1435 /****************************************************************************/
1436 /* */
1437 /* Routine Name: ips_proc_info */
1438 /* */
1439 /* Routine Description: */
1440 /* */
1441 /* The passthru interface for the driver */
1442 /* */
1443 /****************************************************************************/
1444 static int
1445 ips_proc_info(struct Scsi_Host *host, char *buffer, char **start, off_t offset,
1446 int length, int func)
1448 int i;
1449 int ret;
1450 ips_ha_t *ha = NULL;
1452 METHOD_TRACE("ips_proc_info", 1);
1454 /* Find our host structure */
1455 for (i = 0; i < ips_next_controller; i++) {
1456 if (ips_sh[i]) {
1457 if (ips_sh[i] == host) {
1458 ha = (ips_ha_t *) ips_sh[i]->hostdata;
1459 break;
1464 if (!ha)
1465 return (-EINVAL);
1467 if (func) {
1468 /* write */
1469 return (0);
1470 } else {
1471 /* read */
1472 if (start)
1473 *start = buffer;
1475 ret = ips_host_info(ha, buffer, offset, length);
1477 return (ret);
1481 /*--------------------------------------------------------------------------*/
1482 /* Helper Functions */
1483 /*--------------------------------------------------------------------------*/
1485 /****************************************************************************/
1486 /* */
1487 /* Routine Name: ips_is_passthru */
1488 /* */
1489 /* Routine Description: */
1490 /* */
1491 /* Determine if the specified SCSI command is really a passthru command */
1492 /* */
1493 /****************************************************************************/
1494 static int ips_is_passthru(struct scsi_cmnd *SC)
1496 unsigned long flags;
1498 METHOD_TRACE("ips_is_passthru", 1);
1500 if (!SC)
1501 return (0);
1503 if ((SC->cmnd[0] == IPS_IOCTL_COMMAND) &&
1504 (SC->device->channel == 0) &&
1505 (SC->device->id == IPS_ADAPTER_ID) &&
1506 (SC->device->lun == 0) && scsi_sglist(SC)) {
1507 struct scatterlist *sg = scsi_sglist(SC);
1508 char *buffer;
1510 /* kmap_atomic() ensures addressability of the user buffer.*/
1511 /* local_irq_save() protects the KM_IRQ0 address slot. */
1512 local_irq_save(flags);
1513 buffer = kmap_atomic(sg_page(sg), KM_IRQ0) + sg->offset;
1514 if (buffer && buffer[0] == 'C' && buffer[1] == 'O' &&
1515 buffer[2] == 'P' && buffer[3] == 'P') {
1516 kunmap_atomic(buffer - sg->offset, KM_IRQ0);
1517 local_irq_restore(flags);
1518 return 1;
1520 kunmap_atomic(buffer - sg->offset, KM_IRQ0);
1521 local_irq_restore(flags);
1523 return 0;
1526 /****************************************************************************/
1527 /* */
1528 /* Routine Name: ips_alloc_passthru_buffer */
1529 /* */
1530 /* Routine Description: */
1531 /* allocate a buffer large enough for the ioctl data if the ioctl buffer */
1532 /* is too small or doesn't exist */
1533 /****************************************************************************/
1534 static int
1535 ips_alloc_passthru_buffer(ips_ha_t * ha, int length)
1537 void *bigger_buf;
1538 dma_addr_t dma_busaddr;
1540 if (ha->ioctl_data && length <= ha->ioctl_len)
1541 return 0;
1542 /* there is no buffer or it's not big enough, allocate a new one */
1543 bigger_buf = pci_alloc_consistent(ha->pcidev, length, &dma_busaddr);
1544 if (bigger_buf) {
1545 /* free the old memory */
1546 pci_free_consistent(ha->pcidev, ha->ioctl_len, ha->ioctl_data,
1547 ha->ioctl_busaddr);
1548 /* use the new memory */
1549 ha->ioctl_data = (char *) bigger_buf;
1550 ha->ioctl_len = length;
1551 ha->ioctl_busaddr = dma_busaddr;
1552 } else {
1553 return -1;
1555 return 0;
1558 /****************************************************************************/
1559 /* */
1560 /* Routine Name: ips_make_passthru */
1561 /* */
1562 /* Routine Description: */
1563 /* */
1564 /* Make a passthru command out of the info in the Scsi block */
1565 /* */
1566 /****************************************************************************/
1567 static int
1568 ips_make_passthru(ips_ha_t *ha, struct scsi_cmnd *SC, ips_scb_t *scb, int intr)
1570 ips_passthru_t *pt;
1571 int length = 0;
1572 int i, ret;
1573 struct scatterlist *sg = scsi_sglist(SC);
1575 METHOD_TRACE("ips_make_passthru", 1);
1577 scsi_for_each_sg(SC, sg, scsi_sg_count(SC), i)
1578 length += sg->length;
1580 if (length < sizeof (ips_passthru_t)) {
1581 /* wrong size */
1582 DEBUG_VAR(1, "(%s%d) Passthru structure wrong size",
1583 ips_name, ha->host_num);
1584 return (IPS_FAILURE);
1586 if (ips_alloc_passthru_buffer(ha, length)) {
1587 /* allocation failure! If ha->ioctl_data exists, use it to return
1588 some error codes. Return a failed command to the scsi layer. */
1589 if (ha->ioctl_data) {
1590 pt = (ips_passthru_t *) ha->ioctl_data;
1591 ips_scmd_buf_read(SC, pt, sizeof (ips_passthru_t));
1592 pt->BasicStatus = 0x0B;
1593 pt->ExtendedStatus = 0x00;
1594 ips_scmd_buf_write(SC, pt, sizeof (ips_passthru_t));
1596 return IPS_FAILURE;
1598 ha->ioctl_datasize = length;
1600 ips_scmd_buf_read(SC, ha->ioctl_data, ha->ioctl_datasize);
1601 pt = (ips_passthru_t *) ha->ioctl_data;
1604 * Some notes about the passthru interface used
1606 * IF the scsi op_code == 0x0d then we assume
1607 * that the data came along with/goes with the
1608 * packet we received from the sg driver. In this
1609 * case the CmdBSize field of the pt structure is
1610 * used for the size of the buffer.
1613 switch (pt->CoppCmd) {
1614 case IPS_NUMCTRLS:
1615 memcpy(ha->ioctl_data + sizeof (ips_passthru_t),
1616 &ips_num_controllers, sizeof (int));
1617 ips_scmd_buf_write(SC, ha->ioctl_data,
1618 sizeof (ips_passthru_t) + sizeof (int));
1619 SC->result = DID_OK << 16;
1621 return (IPS_SUCCESS_IMM);
1623 case IPS_COPPUSRCMD:
1624 case IPS_COPPIOCCMD:
1625 if (SC->cmnd[0] == IPS_IOCTL_COMMAND) {
1626 if (length < (sizeof (ips_passthru_t) + pt->CmdBSize)) {
1627 /* wrong size */
1628 DEBUG_VAR(1,
1629 "(%s%d) Passthru structure wrong size",
1630 ips_name, ha->host_num);
1632 return (IPS_FAILURE);
1635 if (ha->pcidev->device == IPS_DEVICEID_COPPERHEAD &&
1636 pt->CoppCP.cmd.flashfw.op_code ==
1637 IPS_CMD_RW_BIOSFW) {
1638 ret = ips_flash_copperhead(ha, pt, scb);
1639 ips_scmd_buf_write(SC, ha->ioctl_data,
1640 sizeof (ips_passthru_t));
1641 return ret;
1643 if (ips_usrcmd(ha, pt, scb))
1644 return (IPS_SUCCESS);
1645 else
1646 return (IPS_FAILURE);
1649 break;
1651 } /* end switch */
1653 return (IPS_FAILURE);
1656 /****************************************************************************/
1657 /* Routine Name: ips_flash_copperhead */
1658 /* Routine Description: */
1659 /* Flash the BIOS/FW on a Copperhead style controller */
1660 /****************************************************************************/
1661 static int
1662 ips_flash_copperhead(ips_ha_t * ha, ips_passthru_t * pt, ips_scb_t * scb)
1664 int datasize;
1666 /* Trombone is the only copperhead that can do packet flash, but only
1667 * for firmware. No one said it had to make sence. */
1668 if (IPS_IS_TROMBONE(ha) && pt->CoppCP.cmd.flashfw.type == IPS_FW_IMAGE) {
1669 if (ips_usrcmd(ha, pt, scb))
1670 return IPS_SUCCESS;
1671 else
1672 return IPS_FAILURE;
1674 pt->BasicStatus = 0x0B;
1675 pt->ExtendedStatus = 0;
1676 scb->scsi_cmd->result = DID_OK << 16;
1677 /* IF it's OK to Use the "CD BOOT" Flash Buffer, then you can */
1678 /* avoid allocating a huge buffer per adapter ( which can fail ). */
1679 if (pt->CoppCP.cmd.flashfw.type == IPS_BIOS_IMAGE &&
1680 pt->CoppCP.cmd.flashfw.direction == IPS_ERASE_BIOS) {
1681 pt->BasicStatus = 0;
1682 return ips_flash_bios(ha, pt, scb);
1683 } else if (pt->CoppCP.cmd.flashfw.packet_num == 0) {
1684 if (ips_FlashData && !test_and_set_bit(0, &ips_FlashDataInUse)){
1685 ha->flash_data = ips_FlashData;
1686 ha->flash_busaddr = ips_flashbusaddr;
1687 ha->flash_len = PAGE_SIZE << 7;
1688 ha->flash_datasize = 0;
1689 } else if (!ha->flash_data) {
1690 datasize = pt->CoppCP.cmd.flashfw.total_packets *
1691 pt->CoppCP.cmd.flashfw.count;
1692 ha->flash_data = pci_alloc_consistent(ha->pcidev,
1693 datasize,
1694 &ha->flash_busaddr);
1695 if (!ha->flash_data){
1696 printk(KERN_WARNING "Unable to allocate a flash buffer\n");
1697 return IPS_FAILURE;
1699 ha->flash_datasize = 0;
1700 ha->flash_len = datasize;
1701 } else
1702 return IPS_FAILURE;
1703 } else {
1704 if (pt->CoppCP.cmd.flashfw.count + ha->flash_datasize >
1705 ha->flash_len) {
1706 ips_free_flash_copperhead(ha);
1707 IPS_PRINTK(KERN_WARNING, ha->pcidev,
1708 "failed size sanity check\n");
1709 return IPS_FAILURE;
1712 if (!ha->flash_data)
1713 return IPS_FAILURE;
1714 pt->BasicStatus = 0;
1715 memcpy(&ha->flash_data[ha->flash_datasize], pt + 1,
1716 pt->CoppCP.cmd.flashfw.count);
1717 ha->flash_datasize += pt->CoppCP.cmd.flashfw.count;
1718 if (pt->CoppCP.cmd.flashfw.packet_num ==
1719 pt->CoppCP.cmd.flashfw.total_packets - 1) {
1720 if (pt->CoppCP.cmd.flashfw.type == IPS_BIOS_IMAGE)
1721 return ips_flash_bios(ha, pt, scb);
1722 else if (pt->CoppCP.cmd.flashfw.type == IPS_FW_IMAGE)
1723 return ips_flash_firmware(ha, pt, scb);
1725 return IPS_SUCCESS_IMM;
1728 /****************************************************************************/
1729 /* Routine Name: ips_flash_bios */
1730 /* Routine Description: */
1731 /* flashes the bios of a copperhead adapter */
1732 /****************************************************************************/
1733 static int
1734 ips_flash_bios(ips_ha_t * ha, ips_passthru_t * pt, ips_scb_t * scb)
1737 if (pt->CoppCP.cmd.flashfw.type == IPS_BIOS_IMAGE &&
1738 pt->CoppCP.cmd.flashfw.direction == IPS_WRITE_BIOS) {
1739 if ((!ha->func.programbios) || (!ha->func.erasebios) ||
1740 (!ha->func.verifybios))
1741 goto error;
1742 if ((*ha->func.erasebios) (ha)) {
1743 DEBUG_VAR(1,
1744 "(%s%d) flash bios failed - unable to erase flash",
1745 ips_name, ha->host_num);
1746 goto error;
1747 } else
1748 if ((*ha->func.programbios) (ha,
1749 ha->flash_data +
1750 IPS_BIOS_HEADER,
1751 ha->flash_datasize -
1752 IPS_BIOS_HEADER, 0)) {
1753 DEBUG_VAR(1,
1754 "(%s%d) flash bios failed - unable to flash",
1755 ips_name, ha->host_num);
1756 goto error;
1757 } else
1758 if ((*ha->func.verifybios) (ha,
1759 ha->flash_data +
1760 IPS_BIOS_HEADER,
1761 ha->flash_datasize -
1762 IPS_BIOS_HEADER, 0)) {
1763 DEBUG_VAR(1,
1764 "(%s%d) flash bios failed - unable to verify flash",
1765 ips_name, ha->host_num);
1766 goto error;
1768 ips_free_flash_copperhead(ha);
1769 return IPS_SUCCESS_IMM;
1770 } else if (pt->CoppCP.cmd.flashfw.type == IPS_BIOS_IMAGE &&
1771 pt->CoppCP.cmd.flashfw.direction == IPS_ERASE_BIOS) {
1772 if (!ha->func.erasebios)
1773 goto error;
1774 if ((*ha->func.erasebios) (ha)) {
1775 DEBUG_VAR(1,
1776 "(%s%d) flash bios failed - unable to erase flash",
1777 ips_name, ha->host_num);
1778 goto error;
1780 return IPS_SUCCESS_IMM;
1782 error:
1783 pt->BasicStatus = 0x0B;
1784 pt->ExtendedStatus = 0x00;
1785 ips_free_flash_copperhead(ha);
1786 return IPS_FAILURE;
1789 /****************************************************************************/
1790 /* */
1791 /* Routine Name: ips_fill_scb_sg_single */
1792 /* */
1793 /* Routine Description: */
1794 /* Fill in a single scb sg_list element from an address */
1795 /* return a -1 if a breakup occurred */
1796 /****************************************************************************/
1797 static int
1798 ips_fill_scb_sg_single(ips_ha_t * ha, dma_addr_t busaddr,
1799 ips_scb_t * scb, int indx, unsigned int e_len)
1802 int ret_val = 0;
1804 if ((scb->data_len + e_len) > ha->max_xfer) {
1805 e_len = ha->max_xfer - scb->data_len;
1806 scb->breakup = indx;
1807 ++scb->sg_break;
1808 ret_val = -1;
1809 } else {
1810 scb->breakup = 0;
1811 scb->sg_break = 0;
1813 if (IPS_USE_ENH_SGLIST(ha)) {
1814 scb->sg_list.enh_list[indx].address_lo =
1815 cpu_to_le32(pci_dma_lo32(busaddr));
1816 scb->sg_list.enh_list[indx].address_hi =
1817 cpu_to_le32(pci_dma_hi32(busaddr));
1818 scb->sg_list.enh_list[indx].length = cpu_to_le32(e_len);
1819 } else {
1820 scb->sg_list.std_list[indx].address =
1821 cpu_to_le32(pci_dma_lo32(busaddr));
1822 scb->sg_list.std_list[indx].length = cpu_to_le32(e_len);
1825 ++scb->sg_len;
1826 scb->data_len += e_len;
1827 return ret_val;
1830 /****************************************************************************/
1831 /* Routine Name: ips_flash_firmware */
1832 /* Routine Description: */
1833 /* flashes the firmware of a copperhead adapter */
1834 /****************************************************************************/
1835 static int
1836 ips_flash_firmware(ips_ha_t * ha, ips_passthru_t * pt, ips_scb_t * scb)
1838 IPS_SG_LIST sg_list;
1839 uint32_t cmd_busaddr;
1841 if (pt->CoppCP.cmd.flashfw.type == IPS_FW_IMAGE &&
1842 pt->CoppCP.cmd.flashfw.direction == IPS_WRITE_FW) {
1843 memset(&pt->CoppCP.cmd, 0, sizeof (IPS_HOST_COMMAND));
1844 pt->CoppCP.cmd.flashfw.op_code = IPS_CMD_DOWNLOAD;
1845 pt->CoppCP.cmd.flashfw.count = cpu_to_le32(ha->flash_datasize);
1846 } else {
1847 pt->BasicStatus = 0x0B;
1848 pt->ExtendedStatus = 0x00;
1849 ips_free_flash_copperhead(ha);
1850 return IPS_FAILURE;
1852 /* Save the S/G list pointer so it doesn't get clobbered */
1853 sg_list.list = scb->sg_list.list;
1854 cmd_busaddr = scb->scb_busaddr;
1855 /* copy in the CP */
1856 memcpy(&scb->cmd, &pt->CoppCP.cmd, sizeof (IPS_IOCTL_CMD));
1857 /* FIX stuff that might be wrong */
1858 scb->sg_list.list = sg_list.list;
1859 scb->scb_busaddr = cmd_busaddr;
1860 scb->bus = scb->scsi_cmd->device->channel;
1861 scb->target_id = scb->scsi_cmd->device->id;
1862 scb->lun = scb->scsi_cmd->device->lun;
1863 scb->sg_len = 0;
1864 scb->data_len = 0;
1865 scb->flags = 0;
1866 scb->op_code = 0;
1867 scb->callback = ipsintr_done;
1868 scb->timeout = ips_cmd_timeout;
1870 scb->data_len = ha->flash_datasize;
1871 scb->data_busaddr =
1872 pci_map_single(ha->pcidev, ha->flash_data, scb->data_len,
1873 IPS_DMA_DIR(scb));
1874 scb->flags |= IPS_SCB_MAP_SINGLE;
1875 scb->cmd.flashfw.command_id = IPS_COMMAND_ID(ha, scb);
1876 scb->cmd.flashfw.buffer_addr = cpu_to_le32(scb->data_busaddr);
1877 if (pt->TimeOut)
1878 scb->timeout = pt->TimeOut;
1879 scb->scsi_cmd->result = DID_OK << 16;
1880 return IPS_SUCCESS;
1883 /****************************************************************************/
1884 /* Routine Name: ips_free_flash_copperhead */
1885 /* Routine Description: */
1886 /* release the memory resources used to hold the flash image */
1887 /****************************************************************************/
1888 static void
1889 ips_free_flash_copperhead(ips_ha_t * ha)
1891 if (ha->flash_data == ips_FlashData)
1892 test_and_clear_bit(0, &ips_FlashDataInUse);
1893 else if (ha->flash_data)
1894 pci_free_consistent(ha->pcidev, ha->flash_len, ha->flash_data,
1895 ha->flash_busaddr);
1896 ha->flash_data = NULL;
1899 /****************************************************************************/
1900 /* */
1901 /* Routine Name: ips_usrcmd */
1902 /* */
1903 /* Routine Description: */
1904 /* */
1905 /* Process a user command and make it ready to send */
1906 /* */
1907 /****************************************************************************/
1908 static int
1909 ips_usrcmd(ips_ha_t * ha, ips_passthru_t * pt, ips_scb_t * scb)
1911 IPS_SG_LIST sg_list;
1912 uint32_t cmd_busaddr;
1914 METHOD_TRACE("ips_usrcmd", 1);
1916 if ((!scb) || (!pt) || (!ha))
1917 return (0);
1919 /* Save the S/G list pointer so it doesn't get clobbered */
1920 sg_list.list = scb->sg_list.list;
1921 cmd_busaddr = scb->scb_busaddr;
1922 /* copy in the CP */
1923 memcpy(&scb->cmd, &pt->CoppCP.cmd, sizeof (IPS_IOCTL_CMD));
1924 memcpy(&scb->dcdb, &pt->CoppCP.dcdb, sizeof (IPS_DCDB_TABLE));
1926 /* FIX stuff that might be wrong */
1927 scb->sg_list.list = sg_list.list;
1928 scb->scb_busaddr = cmd_busaddr;
1929 scb->bus = scb->scsi_cmd->device->channel;
1930 scb->target_id = scb->scsi_cmd->device->id;
1931 scb->lun = scb->scsi_cmd->device->lun;
1932 scb->sg_len = 0;
1933 scb->data_len = 0;
1934 scb->flags = 0;
1935 scb->op_code = 0;
1936 scb->callback = ipsintr_done;
1937 scb->timeout = ips_cmd_timeout;
1938 scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
1940 /* we don't support DCDB/READ/WRITE Scatter Gather */
1941 if ((scb->cmd.basic_io.op_code == IPS_CMD_READ_SG) ||
1942 (scb->cmd.basic_io.op_code == IPS_CMD_WRITE_SG) ||
1943 (scb->cmd.basic_io.op_code == IPS_CMD_DCDB_SG))
1944 return (0);
1946 if (pt->CmdBSize) {
1947 scb->data_len = pt->CmdBSize;
1948 scb->data_busaddr = ha->ioctl_busaddr + sizeof (ips_passthru_t);
1949 } else {
1950 scb->data_busaddr = 0L;
1953 if (scb->cmd.dcdb.op_code == IPS_CMD_DCDB)
1954 scb->cmd.dcdb.dcdb_address = cpu_to_le32(scb->scb_busaddr +
1955 (unsigned long) &scb->
1956 dcdb -
1957 (unsigned long) scb);
1959 if (pt->CmdBSize) {
1960 if (scb->cmd.dcdb.op_code == IPS_CMD_DCDB)
1961 scb->dcdb.buffer_pointer =
1962 cpu_to_le32(scb->data_busaddr);
1963 else
1964 scb->cmd.basic_io.sg_addr =
1965 cpu_to_le32(scb->data_busaddr);
1968 /* set timeouts */
1969 if (pt->TimeOut) {
1970 scb->timeout = pt->TimeOut;
1972 if (pt->TimeOut <= 10)
1973 scb->dcdb.cmd_attribute |= IPS_TIMEOUT10;
1974 else if (pt->TimeOut <= 60)
1975 scb->dcdb.cmd_attribute |= IPS_TIMEOUT60;
1976 else
1977 scb->dcdb.cmd_attribute |= IPS_TIMEOUT20M;
1980 /* assume success */
1981 scb->scsi_cmd->result = DID_OK << 16;
1983 /* success */
1984 return (1);
1987 /****************************************************************************/
1988 /* */
1989 /* Routine Name: ips_cleanup_passthru */
1990 /* */
1991 /* Routine Description: */
1992 /* */
1993 /* Cleanup after a passthru command */
1994 /* */
1995 /****************************************************************************/
1996 static void
1997 ips_cleanup_passthru(ips_ha_t * ha, ips_scb_t * scb)
1999 ips_passthru_t *pt;
2001 METHOD_TRACE("ips_cleanup_passthru", 1);
2003 if ((!scb) || (!scb->scsi_cmd) || (!scsi_sglist(scb->scsi_cmd))) {
2004 DEBUG_VAR(1, "(%s%d) couldn't cleanup after passthru",
2005 ips_name, ha->host_num);
2007 return;
2009 pt = (ips_passthru_t *) ha->ioctl_data;
2011 /* Copy data back to the user */
2012 if (scb->cmd.dcdb.op_code == IPS_CMD_DCDB) /* Copy DCDB Back to Caller's Area */
2013 memcpy(&pt->CoppCP.dcdb, &scb->dcdb, sizeof (IPS_DCDB_TABLE));
2015 pt->BasicStatus = scb->basic_status;
2016 pt->ExtendedStatus = scb->extended_status;
2017 pt->AdapterType = ha->ad_type;
2019 if (ha->pcidev->device == IPS_DEVICEID_COPPERHEAD &&
2020 (scb->cmd.flashfw.op_code == IPS_CMD_DOWNLOAD ||
2021 scb->cmd.flashfw.op_code == IPS_CMD_RW_BIOSFW))
2022 ips_free_flash_copperhead(ha);
2024 ips_scmd_buf_write(scb->scsi_cmd, ha->ioctl_data, ha->ioctl_datasize);
2027 /****************************************************************************/
2028 /* */
2029 /* Routine Name: ips_host_info */
2030 /* */
2031 /* Routine Description: */
2032 /* */
2033 /* The passthru interface for the driver */
2034 /* */
2035 /****************************************************************************/
2036 static int
2037 ips_host_info(ips_ha_t * ha, char *ptr, off_t offset, int len)
2039 IPS_INFOSTR info;
2041 METHOD_TRACE("ips_host_info", 1);
2043 info.buffer = ptr;
2044 info.length = len;
2045 info.offset = offset;
2046 info.pos = 0;
2047 info.localpos = 0;
2049 copy_info(&info, "\nIBM ServeRAID General Information:\n\n");
2051 if ((le32_to_cpu(ha->nvram->signature) == IPS_NVRAM_P5_SIG) &&
2052 (le16_to_cpu(ha->nvram->adapter_type) != 0))
2053 copy_info(&info, "\tController Type : %s\n",
2054 ips_adapter_name[ha->ad_type - 1]);
2055 else
2056 copy_info(&info,
2057 "\tController Type : Unknown\n");
2059 if (ha->io_addr)
2060 copy_info(&info,
2061 "\tIO region : 0x%lx (%d bytes)\n",
2062 ha->io_addr, ha->io_len);
2064 if (ha->mem_addr) {
2065 copy_info(&info,
2066 "\tMemory region : 0x%lx (%d bytes)\n",
2067 ha->mem_addr, ha->mem_len);
2068 copy_info(&info,
2069 "\tShared memory address : 0x%lx\n",
2070 ha->mem_ptr);
2073 copy_info(&info, "\tIRQ number : %d\n", ha->pcidev->irq);
2075 /* For the Next 3 lines Check for Binary 0 at the end and don't include it if it's there. */
2076 /* That keeps everything happy for "text" operations on the proc file. */
2078 if (le32_to_cpu(ha->nvram->signature) == IPS_NVRAM_P5_SIG) {
2079 if (ha->nvram->bios_low[3] == 0) {
2080 copy_info(&info,
2081 "\tBIOS Version : %c%c%c%c%c%c%c\n",
2082 ha->nvram->bios_high[0], ha->nvram->bios_high[1],
2083 ha->nvram->bios_high[2], ha->nvram->bios_high[3],
2084 ha->nvram->bios_low[0], ha->nvram->bios_low[1],
2085 ha->nvram->bios_low[2]);
2087 } else {
2088 copy_info(&info,
2089 "\tBIOS Version : %c%c%c%c%c%c%c%c\n",
2090 ha->nvram->bios_high[0], ha->nvram->bios_high[1],
2091 ha->nvram->bios_high[2], ha->nvram->bios_high[3],
2092 ha->nvram->bios_low[0], ha->nvram->bios_low[1],
2093 ha->nvram->bios_low[2], ha->nvram->bios_low[3]);
2098 if (ha->enq->CodeBlkVersion[7] == 0) {
2099 copy_info(&info,
2100 "\tFirmware Version : %c%c%c%c%c%c%c\n",
2101 ha->enq->CodeBlkVersion[0], ha->enq->CodeBlkVersion[1],
2102 ha->enq->CodeBlkVersion[2], ha->enq->CodeBlkVersion[3],
2103 ha->enq->CodeBlkVersion[4], ha->enq->CodeBlkVersion[5],
2104 ha->enq->CodeBlkVersion[6]);
2105 } else {
2106 copy_info(&info,
2107 "\tFirmware Version : %c%c%c%c%c%c%c%c\n",
2108 ha->enq->CodeBlkVersion[0], ha->enq->CodeBlkVersion[1],
2109 ha->enq->CodeBlkVersion[2], ha->enq->CodeBlkVersion[3],
2110 ha->enq->CodeBlkVersion[4], ha->enq->CodeBlkVersion[5],
2111 ha->enq->CodeBlkVersion[6], ha->enq->CodeBlkVersion[7]);
2114 if (ha->enq->BootBlkVersion[7] == 0) {
2115 copy_info(&info,
2116 "\tBoot Block Version : %c%c%c%c%c%c%c\n",
2117 ha->enq->BootBlkVersion[0], ha->enq->BootBlkVersion[1],
2118 ha->enq->BootBlkVersion[2], ha->enq->BootBlkVersion[3],
2119 ha->enq->BootBlkVersion[4], ha->enq->BootBlkVersion[5],
2120 ha->enq->BootBlkVersion[6]);
2121 } else {
2122 copy_info(&info,
2123 "\tBoot Block Version : %c%c%c%c%c%c%c%c\n",
2124 ha->enq->BootBlkVersion[0], ha->enq->BootBlkVersion[1],
2125 ha->enq->BootBlkVersion[2], ha->enq->BootBlkVersion[3],
2126 ha->enq->BootBlkVersion[4], ha->enq->BootBlkVersion[5],
2127 ha->enq->BootBlkVersion[6], ha->enq->BootBlkVersion[7]);
2130 copy_info(&info, "\tDriver Version : %s%s\n",
2131 IPS_VERSION_HIGH, IPS_VERSION_LOW);
2133 copy_info(&info, "\tDriver Build : %d\n",
2134 IPS_BUILD_IDENT);
2136 copy_info(&info, "\tMax Physical Devices : %d\n",
2137 ha->enq->ucMaxPhysicalDevices);
2138 copy_info(&info, "\tMax Active Commands : %d\n",
2139 ha->max_cmds);
2140 copy_info(&info, "\tCurrent Queued Commands : %d\n",
2141 ha->scb_waitlist.count);
2142 copy_info(&info, "\tCurrent Active Commands : %d\n",
2143 ha->scb_activelist.count - ha->num_ioctl);
2144 copy_info(&info, "\tCurrent Queued PT Commands : %d\n",
2145 ha->copp_waitlist.count);
2146 copy_info(&info, "\tCurrent Active PT Commands : %d\n",
2147 ha->num_ioctl);
2149 copy_info(&info, "\n");
2151 return (info.localpos);
2154 /****************************************************************************/
2155 /* */
2156 /* Routine Name: copy_mem_info */
2157 /* */
2158 /* Routine Description: */
2159 /* */
2160 /* Copy data into an IPS_INFOSTR structure */
2161 /* */
2162 /****************************************************************************/
2163 static void
2164 copy_mem_info(IPS_INFOSTR * info, char *data, int len)
2166 METHOD_TRACE("copy_mem_info", 1);
2168 if (info->pos + len < info->offset) {
2169 info->pos += len;
2170 return;
2173 if (info->pos < info->offset) {
2174 data += (info->offset - info->pos);
2175 len -= (info->offset - info->pos);
2176 info->pos += (info->offset - info->pos);
2179 if (info->localpos + len > info->length)
2180 len = info->length - info->localpos;
2182 if (len > 0) {
2183 memcpy(info->buffer + info->localpos, data, len);
2184 info->pos += len;
2185 info->localpos += len;
2189 /****************************************************************************/
2190 /* */
2191 /* Routine Name: copy_info */
2192 /* */
2193 /* Routine Description: */
2194 /* */
2195 /* printf style wrapper for an info structure */
2196 /* */
2197 /****************************************************************************/
2198 static int
2199 copy_info(IPS_INFOSTR * info, char *fmt, ...)
2201 va_list args;
2202 char buf[128];
2203 int len;
2205 METHOD_TRACE("copy_info", 1);
2207 va_start(args, fmt);
2208 len = vsprintf(buf, fmt, args);
2209 va_end(args);
2211 copy_mem_info(info, buf, len);
2213 return (len);
2216 /****************************************************************************/
2217 /* */
2218 /* Routine Name: ips_identify_controller */
2219 /* */
2220 /* Routine Description: */
2221 /* */
2222 /* Identify this controller */
2223 /* */
2224 /****************************************************************************/
2225 static void
2226 ips_identify_controller(ips_ha_t * ha)
2228 METHOD_TRACE("ips_identify_controller", 1);
2230 switch (ha->pcidev->device) {
2231 case IPS_DEVICEID_COPPERHEAD:
2232 if (ha->pcidev->revision <= IPS_REVID_SERVERAID) {
2233 ha->ad_type = IPS_ADTYPE_SERVERAID;
2234 } else if (ha->pcidev->revision == IPS_REVID_SERVERAID2) {
2235 ha->ad_type = IPS_ADTYPE_SERVERAID2;
2236 } else if (ha->pcidev->revision == IPS_REVID_NAVAJO) {
2237 ha->ad_type = IPS_ADTYPE_NAVAJO;
2238 } else if ((ha->pcidev->revision == IPS_REVID_SERVERAID2)
2239 && (ha->slot_num == 0)) {
2240 ha->ad_type = IPS_ADTYPE_KIOWA;
2241 } else if ((ha->pcidev->revision >= IPS_REVID_CLARINETP1) &&
2242 (ha->pcidev->revision <= IPS_REVID_CLARINETP3)) {
2243 if (ha->enq->ucMaxPhysicalDevices == 15)
2244 ha->ad_type = IPS_ADTYPE_SERVERAID3L;
2245 else
2246 ha->ad_type = IPS_ADTYPE_SERVERAID3;
2247 } else if ((ha->pcidev->revision >= IPS_REVID_TROMBONE32) &&
2248 (ha->pcidev->revision <= IPS_REVID_TROMBONE64)) {
2249 ha->ad_type = IPS_ADTYPE_SERVERAID4H;
2251 break;
2253 case IPS_DEVICEID_MORPHEUS:
2254 switch (ha->pcidev->subsystem_device) {
2255 case IPS_SUBDEVICEID_4L:
2256 ha->ad_type = IPS_ADTYPE_SERVERAID4L;
2257 break;
2259 case IPS_SUBDEVICEID_4M:
2260 ha->ad_type = IPS_ADTYPE_SERVERAID4M;
2261 break;
2263 case IPS_SUBDEVICEID_4MX:
2264 ha->ad_type = IPS_ADTYPE_SERVERAID4MX;
2265 break;
2267 case IPS_SUBDEVICEID_4LX:
2268 ha->ad_type = IPS_ADTYPE_SERVERAID4LX;
2269 break;
2271 case IPS_SUBDEVICEID_5I2:
2272 ha->ad_type = IPS_ADTYPE_SERVERAID5I2;
2273 break;
2275 case IPS_SUBDEVICEID_5I1:
2276 ha->ad_type = IPS_ADTYPE_SERVERAID5I1;
2277 break;
2280 break;
2282 case IPS_DEVICEID_MARCO:
2283 switch (ha->pcidev->subsystem_device) {
2284 case IPS_SUBDEVICEID_6M:
2285 ha->ad_type = IPS_ADTYPE_SERVERAID6M;
2286 break;
2287 case IPS_SUBDEVICEID_6I:
2288 ha->ad_type = IPS_ADTYPE_SERVERAID6I;
2289 break;
2290 case IPS_SUBDEVICEID_7k:
2291 ha->ad_type = IPS_ADTYPE_SERVERAID7k;
2292 break;
2293 case IPS_SUBDEVICEID_7M:
2294 ha->ad_type = IPS_ADTYPE_SERVERAID7M;
2295 break;
2297 break;
2301 /****************************************************************************/
2302 /* */
2303 /* Routine Name: ips_get_bios_version */
2304 /* */
2305 /* Routine Description: */
2306 /* */
2307 /* Get the BIOS revision number */
2308 /* */
2309 /****************************************************************************/
2310 static void
2311 ips_get_bios_version(ips_ha_t * ha, int intr)
2313 ips_scb_t *scb;
2314 int ret;
2315 uint8_t major;
2316 uint8_t minor;
2317 uint8_t subminor;
2318 uint8_t *buffer;
2319 char hexDigits[] =
2320 { '0', '1', '2', '3', '4', '5', '6', '7', '8', '9', 'A', 'B', 'C',
2321 'D', 'E', 'F' };
2323 METHOD_TRACE("ips_get_bios_version", 1);
2325 major = 0;
2326 minor = 0;
2328 strncpy(ha->bios_version, " ?", 8);
2330 if (ha->pcidev->device == IPS_DEVICEID_COPPERHEAD) {
2331 if (IPS_USE_MEMIO(ha)) {
2332 /* Memory Mapped I/O */
2334 /* test 1st byte */
2335 writel(0, ha->mem_ptr + IPS_REG_FLAP);
2336 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2337 udelay(25); /* 25 us */
2339 if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0x55)
2340 return;
2342 writel(1, ha->mem_ptr + IPS_REG_FLAP);
2343 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2344 udelay(25); /* 25 us */
2346 if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0xAA)
2347 return;
2349 /* Get Major version */
2350 writel(0x1FF, ha->mem_ptr + IPS_REG_FLAP);
2351 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2352 udelay(25); /* 25 us */
2354 major = readb(ha->mem_ptr + IPS_REG_FLDP);
2356 /* Get Minor version */
2357 writel(0x1FE, ha->mem_ptr + IPS_REG_FLAP);
2358 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2359 udelay(25); /* 25 us */
2360 minor = readb(ha->mem_ptr + IPS_REG_FLDP);
2362 /* Get SubMinor version */
2363 writel(0x1FD, ha->mem_ptr + IPS_REG_FLAP);
2364 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2365 udelay(25); /* 25 us */
2366 subminor = readb(ha->mem_ptr + IPS_REG_FLDP);
2368 } else {
2369 /* Programmed I/O */
2371 /* test 1st byte */
2372 outl(0, ha->io_addr + IPS_REG_FLAP);
2373 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2374 udelay(25); /* 25 us */
2376 if (inb(ha->io_addr + IPS_REG_FLDP) != 0x55)
2377 return;
2379 outl(1, ha->io_addr + IPS_REG_FLAP);
2380 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2381 udelay(25); /* 25 us */
2383 if (inb(ha->io_addr + IPS_REG_FLDP) != 0xAA)
2384 return;
2386 /* Get Major version */
2387 outl(0x1FF, ha->io_addr + IPS_REG_FLAP);
2388 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2389 udelay(25); /* 25 us */
2391 major = inb(ha->io_addr + IPS_REG_FLDP);
2393 /* Get Minor version */
2394 outl(0x1FE, ha->io_addr + IPS_REG_FLAP);
2395 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2396 udelay(25); /* 25 us */
2398 minor = inb(ha->io_addr + IPS_REG_FLDP);
2400 /* Get SubMinor version */
2401 outl(0x1FD, ha->io_addr + IPS_REG_FLAP);
2402 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2403 udelay(25); /* 25 us */
2405 subminor = inb(ha->io_addr + IPS_REG_FLDP);
2408 } else {
2409 /* Morpheus Family - Send Command to the card */
2411 buffer = ha->ioctl_data;
2413 memset(buffer, 0, 0x1000);
2415 scb = &ha->scbs[ha->max_cmds - 1];
2417 ips_init_scb(ha, scb);
2419 scb->timeout = ips_cmd_timeout;
2420 scb->cdb[0] = IPS_CMD_RW_BIOSFW;
2422 scb->cmd.flashfw.op_code = IPS_CMD_RW_BIOSFW;
2423 scb->cmd.flashfw.command_id = IPS_COMMAND_ID(ha, scb);
2424 scb->cmd.flashfw.type = 1;
2425 scb->cmd.flashfw.direction = 0;
2426 scb->cmd.flashfw.count = cpu_to_le32(0x800);
2427 scb->cmd.flashfw.total_packets = 1;
2428 scb->cmd.flashfw.packet_num = 0;
2429 scb->data_len = 0x1000;
2430 scb->cmd.flashfw.buffer_addr = ha->ioctl_busaddr;
2432 /* issue the command */
2433 if (((ret =
2434 ips_send_wait(ha, scb, ips_cmd_timeout,
2435 intr)) == IPS_FAILURE)
2436 || (ret == IPS_SUCCESS_IMM)
2437 || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1)) {
2438 /* Error occurred */
2440 return;
2443 if ((buffer[0xC0] == 0x55) && (buffer[0xC1] == 0xAA)) {
2444 major = buffer[0x1ff + 0xC0]; /* Offset 0x1ff after the header (0xc0) */
2445 minor = buffer[0x1fe + 0xC0]; /* Offset 0x1fe after the header (0xc0) */
2446 subminor = buffer[0x1fd + 0xC0]; /* Offset 0x1fd after the header (0xc0) */
2447 } else {
2448 return;
2452 ha->bios_version[0] = hexDigits[(major & 0xF0) >> 4];
2453 ha->bios_version[1] = '.';
2454 ha->bios_version[2] = hexDigits[major & 0x0F];
2455 ha->bios_version[3] = hexDigits[subminor];
2456 ha->bios_version[4] = '.';
2457 ha->bios_version[5] = hexDigits[(minor & 0xF0) >> 4];
2458 ha->bios_version[6] = hexDigits[minor & 0x0F];
2459 ha->bios_version[7] = 0;
2462 /****************************************************************************/
2463 /* */
2464 /* Routine Name: ips_hainit */
2465 /* */
2466 /* Routine Description: */
2467 /* */
2468 /* Initialize the controller */
2469 /* */
2470 /* NOTE: Assumes to be called from with a lock */
2471 /* */
2472 /****************************************************************************/
2473 static int
2474 ips_hainit(ips_ha_t * ha)
2476 int i;
2477 struct timeval tv;
2479 METHOD_TRACE("ips_hainit", 1);
2481 if (!ha)
2482 return (0);
2484 if (ha->func.statinit)
2485 (*ha->func.statinit) (ha);
2487 if (ha->func.enableint)
2488 (*ha->func.enableint) (ha);
2490 /* Send FFDC */
2491 ha->reset_count = 1;
2492 do_gettimeofday(&tv);
2493 ha->last_ffdc = tv.tv_sec;
2494 ips_ffdc_reset(ha, IPS_INTR_IORL);
2496 if (!ips_read_config(ha, IPS_INTR_IORL)) {
2497 IPS_PRINTK(KERN_WARNING, ha->pcidev,
2498 "unable to read config from controller.\n");
2500 return (0);
2502 /* end if */
2503 if (!ips_read_adapter_status(ha, IPS_INTR_IORL)) {
2504 IPS_PRINTK(KERN_WARNING, ha->pcidev,
2505 "unable to read controller status.\n");
2507 return (0);
2510 /* Identify this controller */
2511 ips_identify_controller(ha);
2513 if (!ips_read_subsystem_parameters(ha, IPS_INTR_IORL)) {
2514 IPS_PRINTK(KERN_WARNING, ha->pcidev,
2515 "unable to read subsystem parameters.\n");
2517 return (0);
2520 /* write nvram user page 5 */
2521 if (!ips_write_driver_status(ha, IPS_INTR_IORL)) {
2522 IPS_PRINTK(KERN_WARNING, ha->pcidev,
2523 "unable to write driver info to controller.\n");
2525 return (0);
2528 /* If there are Logical Drives and a Reset Occurred, then an EraseStripeLock is Needed */
2529 if ((ha->conf->ucLogDriveCount > 0) && (ha->requires_esl == 1))
2530 ips_clear_adapter(ha, IPS_INTR_IORL);
2532 /* set limits on SID, LUN, BUS */
2533 ha->ntargets = IPS_MAX_TARGETS + 1;
2534 ha->nlun = 1;
2535 ha->nbus = (ha->enq->ucMaxPhysicalDevices / IPS_MAX_TARGETS) + 1;
2537 switch (ha->conf->logical_drive[0].ucStripeSize) {
2538 case 4:
2539 ha->max_xfer = 0x10000;
2540 break;
2542 case 5:
2543 ha->max_xfer = 0x20000;
2544 break;
2546 case 6:
2547 ha->max_xfer = 0x40000;
2548 break;
2550 case 7:
2551 default:
2552 ha->max_xfer = 0x80000;
2553 break;
2556 /* setup max concurrent commands */
2557 if (le32_to_cpu(ha->subsys->param[4]) & 0x1) {
2558 /* Use the new method */
2559 ha->max_cmds = ha->enq->ucConcurrentCmdCount;
2560 } else {
2561 /* use the old method */
2562 switch (ha->conf->logical_drive[0].ucStripeSize) {
2563 case 4:
2564 ha->max_cmds = 32;
2565 break;
2567 case 5:
2568 ha->max_cmds = 16;
2569 break;
2571 case 6:
2572 ha->max_cmds = 8;
2573 break;
2575 case 7:
2576 default:
2577 ha->max_cmds = 4;
2578 break;
2582 /* Limit the Active Commands on a Lite Adapter */
2583 if ((ha->ad_type == IPS_ADTYPE_SERVERAID3L) ||
2584 (ha->ad_type == IPS_ADTYPE_SERVERAID4L) ||
2585 (ha->ad_type == IPS_ADTYPE_SERVERAID4LX)) {
2586 if ((ha->max_cmds > MaxLiteCmds) && (MaxLiteCmds))
2587 ha->max_cmds = MaxLiteCmds;
2590 /* set controller IDs */
2591 ha->ha_id[0] = IPS_ADAPTER_ID;
2592 for (i = 1; i < ha->nbus; i++) {
2593 ha->ha_id[i] = ha->conf->init_id[i - 1] & 0x1f;
2594 ha->dcdb_active[i - 1] = 0;
2597 return (1);
2600 /****************************************************************************/
2601 /* */
2602 /* Routine Name: ips_next */
2603 /* */
2604 /* Routine Description: */
2605 /* */
2606 /* Take the next command off the queue and send it to the controller */
2607 /* */
2608 /****************************************************************************/
2609 static void
2610 ips_next(ips_ha_t * ha, int intr)
2612 ips_scb_t *scb;
2613 struct scsi_cmnd *SC;
2614 struct scsi_cmnd *p;
2615 struct scsi_cmnd *q;
2616 ips_copp_wait_item_t *item;
2617 int ret;
2618 struct Scsi_Host *host;
2619 METHOD_TRACE("ips_next", 1);
2621 if (!ha)
2622 return;
2623 host = ips_sh[ha->host_num];
2625 * Block access to the queue function so
2626 * this command won't time out
2628 if (intr == IPS_INTR_ON)
2629 spin_lock(host->host_lock);
2631 if ((ha->subsys->param[3] & 0x300000)
2632 && (ha->scb_activelist.count == 0)) {
2633 struct timeval tv;
2635 do_gettimeofday(&tv);
2637 if (tv.tv_sec - ha->last_ffdc > IPS_SECS_8HOURS) {
2638 ha->last_ffdc = tv.tv_sec;
2639 ips_ffdc_time(ha);
2644 * Send passthru commands
2645 * These have priority over normal I/O
2646 * but shouldn't affect performance too much
2647 * since we limit the number that can be active
2648 * on the card at any one time
2650 while ((ha->num_ioctl < IPS_MAX_IOCTL) &&
2651 (ha->copp_waitlist.head) && (scb = ips_getscb(ha))) {
2653 item = ips_removeq_copp_head(&ha->copp_waitlist);
2654 ha->num_ioctl++;
2655 if (intr == IPS_INTR_ON)
2656 spin_unlock(host->host_lock);
2657 scb->scsi_cmd = item->scsi_cmd;
2658 kfree(item);
2660 ret = ips_make_passthru(ha, scb->scsi_cmd, scb, intr);
2662 if (intr == IPS_INTR_ON)
2663 spin_lock(host->host_lock);
2664 switch (ret) {
2665 case IPS_FAILURE:
2666 if (scb->scsi_cmd) {
2667 scb->scsi_cmd->result = DID_ERROR << 16;
2668 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
2671 ips_freescb(ha, scb);
2672 break;
2673 case IPS_SUCCESS_IMM:
2674 if (scb->scsi_cmd) {
2675 scb->scsi_cmd->result = DID_OK << 16;
2676 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
2679 ips_freescb(ha, scb);
2680 break;
2681 default:
2682 break;
2683 } /* end case */
2685 if (ret != IPS_SUCCESS) {
2686 ha->num_ioctl--;
2687 continue;
2690 ret = ips_send_cmd(ha, scb);
2692 if (ret == IPS_SUCCESS)
2693 ips_putq_scb_head(&ha->scb_activelist, scb);
2694 else
2695 ha->num_ioctl--;
2697 switch (ret) {
2698 case IPS_FAILURE:
2699 if (scb->scsi_cmd) {
2700 scb->scsi_cmd->result = DID_ERROR << 16;
2703 ips_freescb(ha, scb);
2704 break;
2705 case IPS_SUCCESS_IMM:
2706 ips_freescb(ha, scb);
2707 break;
2708 default:
2709 break;
2710 } /* end case */
2715 * Send "Normal" I/O commands
2718 p = ha->scb_waitlist.head;
2719 while ((p) && (scb = ips_getscb(ha))) {
2720 if ((scmd_channel(p) > 0)
2721 && (ha->
2722 dcdb_active[scmd_channel(p) -
2723 1] & (1 << scmd_id(p)))) {
2724 ips_freescb(ha, scb);
2725 p = (struct scsi_cmnd *) p->host_scribble;
2726 continue;
2729 q = p;
2730 SC = ips_removeq_wait(&ha->scb_waitlist, q);
2732 if (intr == IPS_INTR_ON)
2733 spin_unlock(host->host_lock); /* Unlock HA after command is taken off queue */
2735 SC->result = DID_OK;
2736 SC->host_scribble = NULL;
2738 scb->target_id = SC->device->id;
2739 scb->lun = SC->device->lun;
2740 scb->bus = SC->device->channel;
2741 scb->scsi_cmd = SC;
2742 scb->breakup = 0;
2743 scb->data_len = 0;
2744 scb->callback = ipsintr_done;
2745 scb->timeout = ips_cmd_timeout;
2746 memset(&scb->cmd, 0, 16);
2748 /* copy in the CDB */
2749 memcpy(scb->cdb, SC->cmnd, SC->cmd_len);
2751 scb->sg_count = scsi_dma_map(SC);
2752 BUG_ON(scb->sg_count < 0);
2753 if (scb->sg_count) {
2754 struct scatterlist *sg;
2755 int i;
2757 scb->flags |= IPS_SCB_MAP_SG;
2759 scsi_for_each_sg(SC, sg, scb->sg_count, i) {
2760 if (ips_fill_scb_sg_single
2761 (ha, sg_dma_address(sg), scb, i,
2762 sg_dma_len(sg)) < 0)
2763 break;
2765 scb->dcdb.transfer_length = scb->data_len;
2766 } else {
2767 scb->data_busaddr = 0L;
2768 scb->sg_len = 0;
2769 scb->data_len = 0;
2770 scb->dcdb.transfer_length = 0;
2773 scb->dcdb.cmd_attribute =
2774 ips_command_direction[scb->scsi_cmd->cmnd[0]];
2776 /* Allow a WRITE BUFFER Command to Have no Data */
2777 /* This is Used by Tape Flash Utilites */
2778 if ((scb->scsi_cmd->cmnd[0] == WRITE_BUFFER) &&
2779 (scb->data_len == 0))
2780 scb->dcdb.cmd_attribute = 0;
2782 if (!(scb->dcdb.cmd_attribute & 0x3))
2783 scb->dcdb.transfer_length = 0;
2785 if (scb->data_len >= IPS_MAX_XFER) {
2786 scb->dcdb.cmd_attribute |= IPS_TRANSFER64K;
2787 scb->dcdb.transfer_length = 0;
2789 if (intr == IPS_INTR_ON)
2790 spin_lock(host->host_lock);
2792 ret = ips_send_cmd(ha, scb);
2794 switch (ret) {
2795 case IPS_SUCCESS:
2796 ips_putq_scb_head(&ha->scb_activelist, scb);
2797 break;
2798 case IPS_FAILURE:
2799 if (scb->scsi_cmd) {
2800 scb->scsi_cmd->result = DID_ERROR << 16;
2801 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
2804 if (scb->bus)
2805 ha->dcdb_active[scb->bus - 1] &=
2806 ~(1 << scb->target_id);
2808 ips_freescb(ha, scb);
2809 break;
2810 case IPS_SUCCESS_IMM:
2811 if (scb->scsi_cmd)
2812 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
2814 if (scb->bus)
2815 ha->dcdb_active[scb->bus - 1] &=
2816 ~(1 << scb->target_id);
2818 ips_freescb(ha, scb);
2819 break;
2820 default:
2821 break;
2822 } /* end case */
2824 p = (struct scsi_cmnd *) p->host_scribble;
2826 } /* end while */
2828 if (intr == IPS_INTR_ON)
2829 spin_unlock(host->host_lock);
2832 /****************************************************************************/
2833 /* */
2834 /* Routine Name: ips_putq_scb_head */
2835 /* */
2836 /* Routine Description: */
2837 /* */
2838 /* Add an item to the head of the queue */
2839 /* */
2840 /* ASSUMED to be called from within the HA lock */
2841 /* */
2842 /****************************************************************************/
2843 static void
2844 ips_putq_scb_head(ips_scb_queue_t * queue, ips_scb_t * item)
2846 METHOD_TRACE("ips_putq_scb_head", 1);
2848 if (!item)
2849 return;
2851 item->q_next = queue->head;
2852 queue->head = item;
2854 if (!queue->tail)
2855 queue->tail = item;
2857 queue->count++;
2860 /****************************************************************************/
2861 /* */
2862 /* Routine Name: ips_removeq_scb_head */
2863 /* */
2864 /* Routine Description: */
2865 /* */
2866 /* Remove the head of the queue */
2867 /* */
2868 /* ASSUMED to be called from within the HA lock */
2869 /* */
2870 /****************************************************************************/
2871 static ips_scb_t *
2872 ips_removeq_scb_head(ips_scb_queue_t * queue)
2874 ips_scb_t *item;
2876 METHOD_TRACE("ips_removeq_scb_head", 1);
2878 item = queue->head;
2880 if (!item) {
2881 return (NULL);
2884 queue->head = item->q_next;
2885 item->q_next = NULL;
2887 if (queue->tail == item)
2888 queue->tail = NULL;
2890 queue->count--;
2892 return (item);
2895 /****************************************************************************/
2896 /* */
2897 /* Routine Name: ips_removeq_scb */
2898 /* */
2899 /* Routine Description: */
2900 /* */
2901 /* Remove an item from a queue */
2902 /* */
2903 /* ASSUMED to be called from within the HA lock */
2904 /* */
2905 /****************************************************************************/
2906 static ips_scb_t *
2907 ips_removeq_scb(ips_scb_queue_t * queue, ips_scb_t * item)
2909 ips_scb_t *p;
2911 METHOD_TRACE("ips_removeq_scb", 1);
2913 if (!item)
2914 return (NULL);
2916 if (item == queue->head) {
2917 return (ips_removeq_scb_head(queue));
2920 p = queue->head;
2922 while ((p) && (item != p->q_next))
2923 p = p->q_next;
2925 if (p) {
2926 /* found a match */
2927 p->q_next = item->q_next;
2929 if (!item->q_next)
2930 queue->tail = p;
2932 item->q_next = NULL;
2933 queue->count--;
2935 return (item);
2938 return (NULL);
2941 /****************************************************************************/
2942 /* */
2943 /* Routine Name: ips_putq_wait_tail */
2944 /* */
2945 /* Routine Description: */
2946 /* */
2947 /* Add an item to the tail of the queue */
2948 /* */
2949 /* ASSUMED to be called from within the HA lock */
2950 /* */
2951 /****************************************************************************/
2952 static void ips_putq_wait_tail(ips_wait_queue_t *queue, struct scsi_cmnd *item)
2954 METHOD_TRACE("ips_putq_wait_tail", 1);
2956 if (!item)
2957 return;
2959 item->host_scribble = NULL;
2961 if (queue->tail)
2962 queue->tail->host_scribble = (char *) item;
2964 queue->tail = item;
2966 if (!queue->head)
2967 queue->head = item;
2969 queue->count++;
2972 /****************************************************************************/
2973 /* */
2974 /* Routine Name: ips_removeq_wait_head */
2975 /* */
2976 /* Routine Description: */
2977 /* */
2978 /* Remove the head of the queue */
2979 /* */
2980 /* ASSUMED to be called from within the HA lock */
2981 /* */
2982 /****************************************************************************/
2983 static struct scsi_cmnd *ips_removeq_wait_head(ips_wait_queue_t *queue)
2985 struct scsi_cmnd *item;
2987 METHOD_TRACE("ips_removeq_wait_head", 1);
2989 item = queue->head;
2991 if (!item) {
2992 return (NULL);
2995 queue->head = (struct scsi_cmnd *) item->host_scribble;
2996 item->host_scribble = NULL;
2998 if (queue->tail == item)
2999 queue->tail = NULL;
3001 queue->count--;
3003 return (item);
3006 /****************************************************************************/
3007 /* */
3008 /* Routine Name: ips_removeq_wait */
3009 /* */
3010 /* Routine Description: */
3011 /* */
3012 /* Remove an item from a queue */
3013 /* */
3014 /* ASSUMED to be called from within the HA lock */
3015 /* */
3016 /****************************************************************************/
3017 static struct scsi_cmnd *ips_removeq_wait(ips_wait_queue_t *queue,
3018 struct scsi_cmnd *item)
3020 struct scsi_cmnd *p;
3022 METHOD_TRACE("ips_removeq_wait", 1);
3024 if (!item)
3025 return (NULL);
3027 if (item == queue->head) {
3028 return (ips_removeq_wait_head(queue));
3031 p = queue->head;
3033 while ((p) && (item != (struct scsi_cmnd *) p->host_scribble))
3034 p = (struct scsi_cmnd *) p->host_scribble;
3036 if (p) {
3037 /* found a match */
3038 p->host_scribble = item->host_scribble;
3040 if (!item->host_scribble)
3041 queue->tail = p;
3043 item->host_scribble = NULL;
3044 queue->count--;
3046 return (item);
3049 return (NULL);
3052 /****************************************************************************/
3053 /* */
3054 /* Routine Name: ips_putq_copp_tail */
3055 /* */
3056 /* Routine Description: */
3057 /* */
3058 /* Add an item to the tail of the queue */
3059 /* */
3060 /* ASSUMED to be called from within the HA lock */
3061 /* */
3062 /****************************************************************************/
3063 static void
3064 ips_putq_copp_tail(ips_copp_queue_t * queue, ips_copp_wait_item_t * item)
3066 METHOD_TRACE("ips_putq_copp_tail", 1);
3068 if (!item)
3069 return;
3071 item->next = NULL;
3073 if (queue->tail)
3074 queue->tail->next = item;
3076 queue->tail = item;
3078 if (!queue->head)
3079 queue->head = item;
3081 queue->count++;
3084 /****************************************************************************/
3085 /* */
3086 /* Routine Name: ips_removeq_copp_head */
3087 /* */
3088 /* Routine Description: */
3089 /* */
3090 /* Remove the head of the queue */
3091 /* */
3092 /* ASSUMED to be called from within the HA lock */
3093 /* */
3094 /****************************************************************************/
3095 static ips_copp_wait_item_t *
3096 ips_removeq_copp_head(ips_copp_queue_t * queue)
3098 ips_copp_wait_item_t *item;
3100 METHOD_TRACE("ips_removeq_copp_head", 1);
3102 item = queue->head;
3104 if (!item) {
3105 return (NULL);
3108 queue->head = item->next;
3109 item->next = NULL;
3111 if (queue->tail == item)
3112 queue->tail = NULL;
3114 queue->count--;
3116 return (item);
3119 /****************************************************************************/
3120 /* */
3121 /* Routine Name: ips_removeq_copp */
3122 /* */
3123 /* Routine Description: */
3124 /* */
3125 /* Remove an item from a queue */
3126 /* */
3127 /* ASSUMED to be called from within the HA lock */
3128 /* */
3129 /****************************************************************************/
3130 static ips_copp_wait_item_t *
3131 ips_removeq_copp(ips_copp_queue_t * queue, ips_copp_wait_item_t * item)
3133 ips_copp_wait_item_t *p;
3135 METHOD_TRACE("ips_removeq_copp", 1);
3137 if (!item)
3138 return (NULL);
3140 if (item == queue->head) {
3141 return (ips_removeq_copp_head(queue));
3144 p = queue->head;
3146 while ((p) && (item != p->next))
3147 p = p->next;
3149 if (p) {
3150 /* found a match */
3151 p->next = item->next;
3153 if (!item->next)
3154 queue->tail = p;
3156 item->next = NULL;
3157 queue->count--;
3159 return (item);
3162 return (NULL);
3165 /****************************************************************************/
3166 /* */
3167 /* Routine Name: ipsintr_blocking */
3168 /* */
3169 /* Routine Description: */
3170 /* */
3171 /* Finalize an interrupt for internal commands */
3172 /* */
3173 /****************************************************************************/
3174 static void
3175 ipsintr_blocking(ips_ha_t * ha, ips_scb_t * scb)
3177 METHOD_TRACE("ipsintr_blocking", 2);
3179 ips_freescb(ha, scb);
3180 if ((ha->waitflag == TRUE) && (ha->cmd_in_progress == scb->cdb[0])) {
3181 ha->waitflag = FALSE;
3183 return;
3187 /****************************************************************************/
3188 /* */
3189 /* Routine Name: ipsintr_done */
3190 /* */
3191 /* Routine Description: */
3192 /* */
3193 /* Finalize an interrupt for non-internal commands */
3194 /* */
3195 /****************************************************************************/
3196 static void
3197 ipsintr_done(ips_ha_t * ha, ips_scb_t * scb)
3199 METHOD_TRACE("ipsintr_done", 2);
3201 if (!scb) {
3202 IPS_PRINTK(KERN_WARNING, ha->pcidev,
3203 "Spurious interrupt; scb NULL.\n");
3205 return;
3208 if (scb->scsi_cmd == NULL) {
3209 /* unexpected interrupt */
3210 IPS_PRINTK(KERN_WARNING, ha->pcidev,
3211 "Spurious interrupt; scsi_cmd not set.\n");
3213 return;
3216 ips_done(ha, scb);
3219 /****************************************************************************/
3220 /* */
3221 /* Routine Name: ips_done */
3222 /* */
3223 /* Routine Description: */
3224 /* */
3225 /* Do housekeeping on completed commands */
3226 /* ASSUMED to be called form within the request lock */
3227 /****************************************************************************/
3228 static void
3229 ips_done(ips_ha_t * ha, ips_scb_t * scb)
3231 int ret;
3233 METHOD_TRACE("ips_done", 1);
3235 if (!scb)
3236 return;
3238 if ((scb->scsi_cmd) && (ips_is_passthru(scb->scsi_cmd))) {
3239 ips_cleanup_passthru(ha, scb);
3240 ha->num_ioctl--;
3241 } else {
3243 * Check to see if this command had too much
3244 * data and had to be broke up. If so, queue
3245 * the rest of the data and continue.
3247 if ((scb->breakup) || (scb->sg_break)) {
3248 struct scatterlist *sg;
3249 int i, sg_dma_index, ips_sg_index = 0;
3251 /* we had a data breakup */
3252 scb->data_len = 0;
3254 sg = scsi_sglist(scb->scsi_cmd);
3256 /* Spin forward to last dma chunk */
3257 sg_dma_index = scb->breakup;
3258 for (i = 0; i < scb->breakup; i++)
3259 sg = sg_next(sg);
3261 /* Take care of possible partial on last chunk */
3262 ips_fill_scb_sg_single(ha,
3263 sg_dma_address(sg),
3264 scb, ips_sg_index++,
3265 sg_dma_len(sg));
3267 for (; sg_dma_index < scsi_sg_count(scb->scsi_cmd);
3268 sg_dma_index++, sg = sg_next(sg)) {
3269 if (ips_fill_scb_sg_single
3270 (ha,
3271 sg_dma_address(sg),
3272 scb, ips_sg_index++,
3273 sg_dma_len(sg)) < 0)
3274 break;
3277 scb->dcdb.transfer_length = scb->data_len;
3278 scb->dcdb.cmd_attribute |=
3279 ips_command_direction[scb->scsi_cmd->cmnd[0]];
3281 if (!(scb->dcdb.cmd_attribute & 0x3))
3282 scb->dcdb.transfer_length = 0;
3284 if (scb->data_len >= IPS_MAX_XFER) {
3285 scb->dcdb.cmd_attribute |= IPS_TRANSFER64K;
3286 scb->dcdb.transfer_length = 0;
3289 ret = ips_send_cmd(ha, scb);
3291 switch (ret) {
3292 case IPS_FAILURE:
3293 if (scb->scsi_cmd) {
3294 scb->scsi_cmd->result = DID_ERROR << 16;
3295 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
3298 ips_freescb(ha, scb);
3299 break;
3300 case IPS_SUCCESS_IMM:
3301 if (scb->scsi_cmd) {
3302 scb->scsi_cmd->result = DID_ERROR << 16;
3303 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
3306 ips_freescb(ha, scb);
3307 break;
3308 default:
3309 break;
3310 } /* end case */
3312 return;
3314 } /* end if passthru */
3316 if (scb->bus) {
3317 ha->dcdb_active[scb->bus - 1] &= ~(1 << scb->target_id);
3320 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
3322 ips_freescb(ha, scb);
3325 /****************************************************************************/
3326 /* */
3327 /* Routine Name: ips_map_status */
3328 /* */
3329 /* Routine Description: */
3330 /* */
3331 /* Map Controller Error codes to Linux Error Codes */
3332 /* */
3333 /****************************************************************************/
3334 static int
3335 ips_map_status(ips_ha_t * ha, ips_scb_t * scb, ips_stat_t * sp)
3337 int errcode;
3338 int device_error;
3339 uint32_t transfer_len;
3340 IPS_DCDB_TABLE_TAPE *tapeDCDB;
3341 IPS_SCSI_INQ_DATA inquiryData;
3343 METHOD_TRACE("ips_map_status", 1);
3345 if (scb->bus) {
3346 DEBUG_VAR(2,
3347 "(%s%d) Physical device error (%d %d %d): %x %x, Sense Key: %x, ASC: %x, ASCQ: %x",
3348 ips_name, ha->host_num,
3349 scb->scsi_cmd->device->channel,
3350 scb->scsi_cmd->device->id, scb->scsi_cmd->device->lun,
3351 scb->basic_status, scb->extended_status,
3352 scb->extended_status ==
3353 IPS_ERR_CKCOND ? scb->dcdb.sense_info[2] & 0xf : 0,
3354 scb->extended_status ==
3355 IPS_ERR_CKCOND ? scb->dcdb.sense_info[12] : 0,
3356 scb->extended_status ==
3357 IPS_ERR_CKCOND ? scb->dcdb.sense_info[13] : 0);
3360 /* default driver error */
3361 errcode = DID_ERROR;
3362 device_error = 0;
3364 switch (scb->basic_status & IPS_GSC_STATUS_MASK) {
3365 case IPS_CMD_TIMEOUT:
3366 errcode = DID_TIME_OUT;
3367 break;
3369 case IPS_INVAL_OPCO:
3370 case IPS_INVAL_CMD_BLK:
3371 case IPS_INVAL_PARM_BLK:
3372 case IPS_LD_ERROR:
3373 case IPS_CMD_CMPLT_WERROR:
3374 break;
3376 case IPS_PHYS_DRV_ERROR:
3377 switch (scb->extended_status) {
3378 case IPS_ERR_SEL_TO:
3379 if (scb->bus)
3380 errcode = DID_NO_CONNECT;
3382 break;
3384 case IPS_ERR_OU_RUN:
3385 if ((scb->cmd.dcdb.op_code == IPS_CMD_EXTENDED_DCDB) ||
3386 (scb->cmd.dcdb.op_code ==
3387 IPS_CMD_EXTENDED_DCDB_SG)) {
3388 tapeDCDB = (IPS_DCDB_TABLE_TAPE *) & scb->dcdb;
3389 transfer_len = tapeDCDB->transfer_length;
3390 } else {
3391 transfer_len =
3392 (uint32_t) scb->dcdb.transfer_length;
3395 if ((scb->bus) && (transfer_len < scb->data_len)) {
3396 /* Underrun - set default to no error */
3397 errcode = DID_OK;
3399 /* Restrict access to physical DASD */
3400 if (scb->scsi_cmd->cmnd[0] == INQUIRY) {
3401 ips_scmd_buf_read(scb->scsi_cmd,
3402 &inquiryData, sizeof (inquiryData));
3403 if ((inquiryData.DeviceType & 0x1f) == TYPE_DISK) {
3404 errcode = DID_TIME_OUT;
3405 break;
3408 } else
3409 errcode = DID_ERROR;
3411 break;
3413 case IPS_ERR_RECOVERY:
3414 /* don't fail recovered errors */
3415 if (scb->bus)
3416 errcode = DID_OK;
3418 break;
3420 case IPS_ERR_HOST_RESET:
3421 case IPS_ERR_DEV_RESET:
3422 errcode = DID_RESET;
3423 break;
3425 case IPS_ERR_CKCOND:
3426 if (scb->bus) {
3427 if ((scb->cmd.dcdb.op_code ==
3428 IPS_CMD_EXTENDED_DCDB)
3429 || (scb->cmd.dcdb.op_code ==
3430 IPS_CMD_EXTENDED_DCDB_SG)) {
3431 tapeDCDB =
3432 (IPS_DCDB_TABLE_TAPE *) & scb->dcdb;
3433 memcpy(scb->scsi_cmd->sense_buffer,
3434 tapeDCDB->sense_info,
3435 SCSI_SENSE_BUFFERSIZE);
3436 } else {
3437 memcpy(scb->scsi_cmd->sense_buffer,
3438 scb->dcdb.sense_info,
3439 SCSI_SENSE_BUFFERSIZE);
3441 device_error = 2; /* check condition */
3444 errcode = DID_OK;
3446 break;
3448 default:
3449 errcode = DID_ERROR;
3450 break;
3452 } /* end switch */
3453 } /* end switch */
3455 scb->scsi_cmd->result = device_error | (errcode << 16);
3457 return (1);
3460 /****************************************************************************/
3461 /* */
3462 /* Routine Name: ips_send_wait */
3463 /* */
3464 /* Routine Description: */
3465 /* */
3466 /* Send a command to the controller and wait for it to return */
3467 /* */
3468 /* The FFDC Time Stamp use this function for the callback, but doesn't */
3469 /* actually need to wait. */
3470 /****************************************************************************/
3471 static int
3472 ips_send_wait(ips_ha_t * ha, ips_scb_t * scb, int timeout, int intr)
3474 int ret;
3476 METHOD_TRACE("ips_send_wait", 1);
3478 if (intr != IPS_FFDC) { /* Won't be Waiting if this is a Time Stamp */
3479 ha->waitflag = TRUE;
3480 ha->cmd_in_progress = scb->cdb[0];
3482 scb->callback = ipsintr_blocking;
3483 ret = ips_send_cmd(ha, scb);
3485 if ((ret == IPS_FAILURE) || (ret == IPS_SUCCESS_IMM))
3486 return (ret);
3488 if (intr != IPS_FFDC) /* Don't Wait around if this is a Time Stamp */
3489 ret = ips_wait(ha, timeout, intr);
3491 return (ret);
3494 /****************************************************************************/
3495 /* */
3496 /* Routine Name: ips_scmd_buf_write */
3497 /* */
3498 /* Routine Description: */
3499 /* Write data to struct scsi_cmnd request_buffer at proper offsets */
3500 /****************************************************************************/
3501 static void
3502 ips_scmd_buf_write(struct scsi_cmnd *scmd, void *data, unsigned int count)
3504 unsigned long flags;
3506 local_irq_save(flags);
3507 scsi_sg_copy_from_buffer(scmd, data, count);
3508 local_irq_restore(flags);
3511 /****************************************************************************/
3512 /* */
3513 /* Routine Name: ips_scmd_buf_read */
3514 /* */
3515 /* Routine Description: */
3516 /* Copy data from a struct scsi_cmnd to a new, linear buffer */
3517 /****************************************************************************/
3518 static void
3519 ips_scmd_buf_read(struct scsi_cmnd *scmd, void *data, unsigned int count)
3521 unsigned long flags;
3523 local_irq_save(flags);
3524 scsi_sg_copy_to_buffer(scmd, data, count);
3525 local_irq_restore(flags);
3528 /****************************************************************************/
3529 /* */
3530 /* Routine Name: ips_send_cmd */
3531 /* */
3532 /* Routine Description: */
3533 /* */
3534 /* Map SCSI commands to ServeRAID commands for logical drives */
3535 /* */
3536 /****************************************************************************/
3537 static int
3538 ips_send_cmd(ips_ha_t * ha, ips_scb_t * scb)
3540 int ret;
3541 char *sp;
3542 int device_error;
3543 IPS_DCDB_TABLE_TAPE *tapeDCDB;
3544 int TimeOut;
3546 METHOD_TRACE("ips_send_cmd", 1);
3548 ret = IPS_SUCCESS;
3550 if (!scb->scsi_cmd) {
3551 /* internal command */
3553 if (scb->bus > 0) {
3554 /* Controller commands can't be issued */
3555 /* to real devices -- fail them */
3556 if ((ha->waitflag == TRUE) &&
3557 (ha->cmd_in_progress == scb->cdb[0])) {
3558 ha->waitflag = FALSE;
3561 return (1);
3563 } else if ((scb->bus == 0) && (!ips_is_passthru(scb->scsi_cmd))) {
3564 /* command to logical bus -- interpret */
3565 ret = IPS_SUCCESS_IMM;
3567 switch (scb->scsi_cmd->cmnd[0]) {
3568 case ALLOW_MEDIUM_REMOVAL:
3569 case REZERO_UNIT:
3570 case ERASE:
3571 case WRITE_FILEMARKS:
3572 case SPACE:
3573 scb->scsi_cmd->result = DID_ERROR << 16;
3574 break;
3576 case START_STOP:
3577 scb->scsi_cmd->result = DID_OK << 16;
3579 case TEST_UNIT_READY:
3580 case INQUIRY:
3581 if (scb->target_id == IPS_ADAPTER_ID) {
3583 * Either we have a TUR
3584 * or we have a SCSI inquiry
3586 if (scb->scsi_cmd->cmnd[0] == TEST_UNIT_READY)
3587 scb->scsi_cmd->result = DID_OK << 16;
3589 if (scb->scsi_cmd->cmnd[0] == INQUIRY) {
3590 IPS_SCSI_INQ_DATA inquiry;
3592 memset(&inquiry, 0,
3593 sizeof (IPS_SCSI_INQ_DATA));
3595 inquiry.DeviceType =
3596 IPS_SCSI_INQ_TYPE_PROCESSOR;
3597 inquiry.DeviceTypeQualifier =
3598 IPS_SCSI_INQ_LU_CONNECTED;
3599 inquiry.Version = IPS_SCSI_INQ_REV2;
3600 inquiry.ResponseDataFormat =
3601 IPS_SCSI_INQ_RD_REV2;
3602 inquiry.AdditionalLength = 31;
3603 inquiry.Flags[0] =
3604 IPS_SCSI_INQ_Address16;
3605 inquiry.Flags[1] =
3606 IPS_SCSI_INQ_WBus16 |
3607 IPS_SCSI_INQ_Sync;
3608 strncpy(inquiry.VendorId, "IBM ",
3610 strncpy(inquiry.ProductId,
3611 "SERVERAID ", 16);
3612 strncpy(inquiry.ProductRevisionLevel,
3613 "1.00", 4);
3615 ips_scmd_buf_write(scb->scsi_cmd,
3616 &inquiry,
3617 sizeof (inquiry));
3619 scb->scsi_cmd->result = DID_OK << 16;
3621 } else {
3622 scb->cmd.logical_info.op_code = IPS_CMD_GET_LD_INFO;
3623 scb->cmd.logical_info.command_id = IPS_COMMAND_ID(ha, scb);
3624 scb->cmd.logical_info.reserved = 0;
3625 scb->cmd.logical_info.reserved2 = 0;
3626 scb->data_len = sizeof (IPS_LD_INFO);
3627 scb->data_busaddr = ha->logical_drive_info_dma_addr;
3628 scb->flags = 0;
3629 scb->cmd.logical_info.buffer_addr = scb->data_busaddr;
3630 ret = IPS_SUCCESS;
3633 break;
3635 case REQUEST_SENSE:
3636 ips_reqsen(ha, scb);
3637 scb->scsi_cmd->result = DID_OK << 16;
3638 break;
3640 case READ_6:
3641 case WRITE_6:
3642 if (!scb->sg_len) {
3643 scb->cmd.basic_io.op_code =
3644 (scb->scsi_cmd->cmnd[0] ==
3645 READ_6) ? IPS_CMD_READ : IPS_CMD_WRITE;
3646 scb->cmd.basic_io.enhanced_sg = 0;
3647 scb->cmd.basic_io.sg_addr =
3648 cpu_to_le32(scb->data_busaddr);
3649 } else {
3650 scb->cmd.basic_io.op_code =
3651 (scb->scsi_cmd->cmnd[0] ==
3652 READ_6) ? IPS_CMD_READ_SG :
3653 IPS_CMD_WRITE_SG;
3654 scb->cmd.basic_io.enhanced_sg =
3655 IPS_USE_ENH_SGLIST(ha) ? 0xFF : 0;
3656 scb->cmd.basic_io.sg_addr =
3657 cpu_to_le32(scb->sg_busaddr);
3660 scb->cmd.basic_io.segment_4G = 0;
3661 scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
3662 scb->cmd.basic_io.log_drv = scb->target_id;
3663 scb->cmd.basic_io.sg_count = scb->sg_len;
3665 if (scb->cmd.basic_io.lba)
3666 le32_add_cpu(&scb->cmd.basic_io.lba,
3667 le16_to_cpu(scb->cmd.basic_io.
3668 sector_count));
3669 else
3670 scb->cmd.basic_io.lba =
3671 (((scb->scsi_cmd->
3672 cmnd[1] & 0x1f) << 16) | (scb->scsi_cmd->
3673 cmnd[2] << 8) |
3674 (scb->scsi_cmd->cmnd[3]));
3676 scb->cmd.basic_io.sector_count =
3677 cpu_to_le16(scb->data_len / IPS_BLKSIZE);
3679 if (le16_to_cpu(scb->cmd.basic_io.sector_count) == 0)
3680 scb->cmd.basic_io.sector_count =
3681 cpu_to_le16(256);
3683 ret = IPS_SUCCESS;
3684 break;
3686 case READ_10:
3687 case WRITE_10:
3688 if (!scb->sg_len) {
3689 scb->cmd.basic_io.op_code =
3690 (scb->scsi_cmd->cmnd[0] ==
3691 READ_10) ? IPS_CMD_READ : IPS_CMD_WRITE;
3692 scb->cmd.basic_io.enhanced_sg = 0;
3693 scb->cmd.basic_io.sg_addr =
3694 cpu_to_le32(scb->data_busaddr);
3695 } else {
3696 scb->cmd.basic_io.op_code =
3697 (scb->scsi_cmd->cmnd[0] ==
3698 READ_10) ? IPS_CMD_READ_SG :
3699 IPS_CMD_WRITE_SG;
3700 scb->cmd.basic_io.enhanced_sg =
3701 IPS_USE_ENH_SGLIST(ha) ? 0xFF : 0;
3702 scb->cmd.basic_io.sg_addr =
3703 cpu_to_le32(scb->sg_busaddr);
3706 scb->cmd.basic_io.segment_4G = 0;
3707 scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
3708 scb->cmd.basic_io.log_drv = scb->target_id;
3709 scb->cmd.basic_io.sg_count = scb->sg_len;
3711 if (scb->cmd.basic_io.lba)
3712 le32_add_cpu(&scb->cmd.basic_io.lba,
3713 le16_to_cpu(scb->cmd.basic_io.
3714 sector_count));
3715 else
3716 scb->cmd.basic_io.lba =
3717 ((scb->scsi_cmd->cmnd[2] << 24) | (scb->
3718 scsi_cmd->
3719 cmnd[3]
3720 << 16) |
3721 (scb->scsi_cmd->cmnd[4] << 8) | scb->
3722 scsi_cmd->cmnd[5]);
3724 scb->cmd.basic_io.sector_count =
3725 cpu_to_le16(scb->data_len / IPS_BLKSIZE);
3727 if (cpu_to_le16(scb->cmd.basic_io.sector_count) == 0) {
3729 * This is a null condition
3730 * we don't have to do anything
3731 * so just return
3733 scb->scsi_cmd->result = DID_OK << 16;
3734 } else
3735 ret = IPS_SUCCESS;
3737 break;
3739 case RESERVE:
3740 case RELEASE:
3741 scb->scsi_cmd->result = DID_OK << 16;
3742 break;
3744 case MODE_SENSE:
3745 scb->cmd.basic_io.op_code = IPS_CMD_ENQUIRY;
3746 scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
3747 scb->cmd.basic_io.segment_4G = 0;
3748 scb->cmd.basic_io.enhanced_sg = 0;
3749 scb->data_len = sizeof (*ha->enq);
3750 scb->cmd.basic_io.sg_addr = ha->enq_busaddr;
3751 ret = IPS_SUCCESS;
3752 break;
3754 case READ_CAPACITY:
3755 scb->cmd.logical_info.op_code = IPS_CMD_GET_LD_INFO;
3756 scb->cmd.logical_info.command_id = IPS_COMMAND_ID(ha, scb);
3757 scb->cmd.logical_info.reserved = 0;
3758 scb->cmd.logical_info.reserved2 = 0;
3759 scb->cmd.logical_info.reserved3 = 0;
3760 scb->data_len = sizeof (IPS_LD_INFO);
3761 scb->data_busaddr = ha->logical_drive_info_dma_addr;
3762 scb->flags = 0;
3763 scb->cmd.logical_info.buffer_addr = scb->data_busaddr;
3764 ret = IPS_SUCCESS;
3765 break;
3767 case SEND_DIAGNOSTIC:
3768 case REASSIGN_BLOCKS:
3769 case FORMAT_UNIT:
3770 case SEEK_10:
3771 case VERIFY:
3772 case READ_DEFECT_DATA:
3773 case READ_BUFFER:
3774 case WRITE_BUFFER:
3775 scb->scsi_cmd->result = DID_OK << 16;
3776 break;
3778 default:
3779 /* Set the Return Info to appear like the Command was */
3780 /* attempted, a Check Condition occurred, and Sense */
3781 /* Data indicating an Invalid CDB OpCode is returned. */
3782 sp = (char *) scb->scsi_cmd->sense_buffer;
3784 sp[0] = 0x70; /* Error Code */
3785 sp[2] = ILLEGAL_REQUEST; /* Sense Key 5 Illegal Req. */
3786 sp[7] = 0x0A; /* Additional Sense Length */
3787 sp[12] = 0x20; /* ASC = Invalid OpCode */
3788 sp[13] = 0x00; /* ASCQ */
3790 device_error = 2; /* Indicate Check Condition */
3791 scb->scsi_cmd->result = device_error | (DID_OK << 16);
3792 break;
3793 } /* end switch */
3795 /* end if */
3796 if (ret == IPS_SUCCESS_IMM)
3797 return (ret);
3799 /* setup DCDB */
3800 if (scb->bus > 0) {
3802 /* If we already know the Device is Not there, no need to attempt a Command */
3803 /* This also protects an NT FailOver Controller from getting CDB's sent to it */
3804 if (ha->conf->dev[scb->bus - 1][scb->target_id].ucState == 0) {
3805 scb->scsi_cmd->result = DID_NO_CONNECT << 16;
3806 return (IPS_SUCCESS_IMM);
3809 ha->dcdb_active[scb->bus - 1] |= (1 << scb->target_id);
3810 scb->cmd.dcdb.command_id = IPS_COMMAND_ID(ha, scb);
3811 scb->cmd.dcdb.dcdb_address = cpu_to_le32(scb->scb_busaddr +
3812 (unsigned long) &scb->
3813 dcdb -
3814 (unsigned long) scb);
3815 scb->cmd.dcdb.reserved = 0;
3816 scb->cmd.dcdb.reserved2 = 0;
3817 scb->cmd.dcdb.reserved3 = 0;
3818 scb->cmd.dcdb.segment_4G = 0;
3819 scb->cmd.dcdb.enhanced_sg = 0;
3821 TimeOut = scb->scsi_cmd->request->timeout;
3823 if (ha->subsys->param[4] & 0x00100000) { /* If NEW Tape DCDB is Supported */
3824 if (!scb->sg_len) {
3825 scb->cmd.dcdb.op_code = IPS_CMD_EXTENDED_DCDB;
3826 } else {
3827 scb->cmd.dcdb.op_code =
3828 IPS_CMD_EXTENDED_DCDB_SG;
3829 scb->cmd.dcdb.enhanced_sg =
3830 IPS_USE_ENH_SGLIST(ha) ? 0xFF : 0;
3833 tapeDCDB = (IPS_DCDB_TABLE_TAPE *) & scb->dcdb; /* Use Same Data Area as Old DCDB Struct */
3834 tapeDCDB->device_address =
3835 ((scb->bus - 1) << 4) | scb->target_id;
3836 tapeDCDB->cmd_attribute |= IPS_DISCONNECT_ALLOWED;
3837 tapeDCDB->cmd_attribute &= ~IPS_TRANSFER64K; /* Always Turn OFF 64K Size Flag */
3839 if (TimeOut) {
3840 if (TimeOut < (10 * HZ))
3841 tapeDCDB->cmd_attribute |= IPS_TIMEOUT10; /* TimeOut is 10 Seconds */
3842 else if (TimeOut < (60 * HZ))
3843 tapeDCDB->cmd_attribute |= IPS_TIMEOUT60; /* TimeOut is 60 Seconds */
3844 else if (TimeOut < (1200 * HZ))
3845 tapeDCDB->cmd_attribute |= IPS_TIMEOUT20M; /* TimeOut is 20 Minutes */
3848 tapeDCDB->cdb_length = scb->scsi_cmd->cmd_len;
3849 tapeDCDB->reserved_for_LUN = 0;
3850 tapeDCDB->transfer_length = scb->data_len;
3851 if (scb->cmd.dcdb.op_code == IPS_CMD_EXTENDED_DCDB_SG)
3852 tapeDCDB->buffer_pointer =
3853 cpu_to_le32(scb->sg_busaddr);
3854 else
3855 tapeDCDB->buffer_pointer =
3856 cpu_to_le32(scb->data_busaddr);
3857 tapeDCDB->sg_count = scb->sg_len;
3858 tapeDCDB->sense_length = sizeof (tapeDCDB->sense_info);
3859 tapeDCDB->scsi_status = 0;
3860 tapeDCDB->reserved = 0;
3861 memcpy(tapeDCDB->scsi_cdb, scb->scsi_cmd->cmnd,
3862 scb->scsi_cmd->cmd_len);
3863 } else {
3864 if (!scb->sg_len) {
3865 scb->cmd.dcdb.op_code = IPS_CMD_DCDB;
3866 } else {
3867 scb->cmd.dcdb.op_code = IPS_CMD_DCDB_SG;
3868 scb->cmd.dcdb.enhanced_sg =
3869 IPS_USE_ENH_SGLIST(ha) ? 0xFF : 0;
3872 scb->dcdb.device_address =
3873 ((scb->bus - 1) << 4) | scb->target_id;
3874 scb->dcdb.cmd_attribute |= IPS_DISCONNECT_ALLOWED;
3876 if (TimeOut) {
3877 if (TimeOut < (10 * HZ))
3878 scb->dcdb.cmd_attribute |= IPS_TIMEOUT10; /* TimeOut is 10 Seconds */
3879 else if (TimeOut < (60 * HZ))
3880 scb->dcdb.cmd_attribute |= IPS_TIMEOUT60; /* TimeOut is 60 Seconds */
3881 else if (TimeOut < (1200 * HZ))
3882 scb->dcdb.cmd_attribute |= IPS_TIMEOUT20M; /* TimeOut is 20 Minutes */
3885 scb->dcdb.transfer_length = scb->data_len;
3886 if (scb->dcdb.cmd_attribute & IPS_TRANSFER64K)
3887 scb->dcdb.transfer_length = 0;
3888 if (scb->cmd.dcdb.op_code == IPS_CMD_DCDB_SG)
3889 scb->dcdb.buffer_pointer =
3890 cpu_to_le32(scb->sg_busaddr);
3891 else
3892 scb->dcdb.buffer_pointer =
3893 cpu_to_le32(scb->data_busaddr);
3894 scb->dcdb.cdb_length = scb->scsi_cmd->cmd_len;
3895 scb->dcdb.sense_length = sizeof (scb->dcdb.sense_info);
3896 scb->dcdb.sg_count = scb->sg_len;
3897 scb->dcdb.reserved = 0;
3898 memcpy(scb->dcdb.scsi_cdb, scb->scsi_cmd->cmnd,
3899 scb->scsi_cmd->cmd_len);
3900 scb->dcdb.scsi_status = 0;
3901 scb->dcdb.reserved2[0] = 0;
3902 scb->dcdb.reserved2[1] = 0;
3903 scb->dcdb.reserved2[2] = 0;
3907 return ((*ha->func.issue) (ha, scb));
3910 /****************************************************************************/
3911 /* */
3912 /* Routine Name: ips_chk_status */
3913 /* */
3914 /* Routine Description: */
3915 /* */
3916 /* Check the status of commands to logical drives */
3917 /* Assumed to be called with the HA lock */
3918 /****************************************************************************/
3919 static void
3920 ips_chkstatus(ips_ha_t * ha, IPS_STATUS * pstatus)
3922 ips_scb_t *scb;
3923 ips_stat_t *sp;
3924 uint8_t basic_status;
3925 uint8_t ext_status;
3926 int errcode;
3927 IPS_SCSI_INQ_DATA inquiryData;
3929 METHOD_TRACE("ips_chkstatus", 1);
3931 scb = &ha->scbs[pstatus->fields.command_id];
3932 scb->basic_status = basic_status =
3933 pstatus->fields.basic_status & IPS_BASIC_STATUS_MASK;
3934 scb->extended_status = ext_status = pstatus->fields.extended_status;
3936 sp = &ha->sp;
3937 sp->residue_len = 0;
3938 sp->scb_addr = (void *) scb;
3940 /* Remove the item from the active queue */
3941 ips_removeq_scb(&ha->scb_activelist, scb);
3943 if (!scb->scsi_cmd)
3944 /* internal commands are handled in do_ipsintr */
3945 return;
3947 DEBUG_VAR(2, "(%s%d) ips_chkstatus: cmd 0x%X id %d (%d %d %d)",
3948 ips_name,
3949 ha->host_num,
3950 scb->cdb[0],
3951 scb->cmd.basic_io.command_id,
3952 scb->bus, scb->target_id, scb->lun);
3954 if ((scb->scsi_cmd) && (ips_is_passthru(scb->scsi_cmd)))
3955 /* passthru - just returns the raw result */
3956 return;
3958 errcode = DID_OK;
3960 if (((basic_status & IPS_GSC_STATUS_MASK) == IPS_CMD_SUCCESS) ||
3961 ((basic_status & IPS_GSC_STATUS_MASK) == IPS_CMD_RECOVERED_ERROR)) {
3963 if (scb->bus == 0) {
3964 if ((basic_status & IPS_GSC_STATUS_MASK) ==
3965 IPS_CMD_RECOVERED_ERROR) {
3966 DEBUG_VAR(1,
3967 "(%s%d) Recovered Logical Drive Error OpCode: %x, BSB: %x, ESB: %x",
3968 ips_name, ha->host_num,
3969 scb->cmd.basic_io.op_code,
3970 basic_status, ext_status);
3973 switch (scb->scsi_cmd->cmnd[0]) {
3974 case ALLOW_MEDIUM_REMOVAL:
3975 case REZERO_UNIT:
3976 case ERASE:
3977 case WRITE_FILEMARKS:
3978 case SPACE:
3979 errcode = DID_ERROR;
3980 break;
3982 case START_STOP:
3983 break;
3985 case TEST_UNIT_READY:
3986 if (!ips_online(ha, scb)) {
3987 errcode = DID_TIME_OUT;
3989 break;
3991 case INQUIRY:
3992 if (ips_online(ha, scb)) {
3993 ips_inquiry(ha, scb);
3994 } else {
3995 errcode = DID_TIME_OUT;
3997 break;
3999 case REQUEST_SENSE:
4000 ips_reqsen(ha, scb);
4001 break;
4003 case READ_6:
4004 case WRITE_6:
4005 case READ_10:
4006 case WRITE_10:
4007 case RESERVE:
4008 case RELEASE:
4009 break;
4011 case MODE_SENSE:
4012 if (!ips_online(ha, scb)
4013 || !ips_msense(ha, scb)) {
4014 errcode = DID_ERROR;
4016 break;
4018 case READ_CAPACITY:
4019 if (ips_online(ha, scb))
4020 ips_rdcap(ha, scb);
4021 else {
4022 errcode = DID_TIME_OUT;
4024 break;
4026 case SEND_DIAGNOSTIC:
4027 case REASSIGN_BLOCKS:
4028 break;
4030 case FORMAT_UNIT:
4031 errcode = DID_ERROR;
4032 break;
4034 case SEEK_10:
4035 case VERIFY:
4036 case READ_DEFECT_DATA:
4037 case READ_BUFFER:
4038 case WRITE_BUFFER:
4039 break;
4041 default:
4042 errcode = DID_ERROR;
4043 } /* end switch */
4045 scb->scsi_cmd->result = errcode << 16;
4046 } else { /* bus == 0 */
4047 /* restrict access to physical drives */
4048 if (scb->scsi_cmd->cmnd[0] == INQUIRY) {
4049 ips_scmd_buf_read(scb->scsi_cmd,
4050 &inquiryData, sizeof (inquiryData));
4051 if ((inquiryData.DeviceType & 0x1f) == TYPE_DISK)
4052 scb->scsi_cmd->result = DID_TIME_OUT << 16;
4054 } /* else */
4055 } else { /* recovered error / success */
4056 if (scb->bus == 0) {
4057 DEBUG_VAR(1,
4058 "(%s%d) Unrecovered Logical Drive Error OpCode: %x, BSB: %x, ESB: %x",
4059 ips_name, ha->host_num,
4060 scb->cmd.basic_io.op_code, basic_status,
4061 ext_status);
4064 ips_map_status(ha, scb, sp);
4065 } /* else */
4068 /****************************************************************************/
4069 /* */
4070 /* Routine Name: ips_online */
4071 /* */
4072 /* Routine Description: */
4073 /* */
4074 /* Determine if a logical drive is online */
4075 /* */
4076 /****************************************************************************/
4077 static int
4078 ips_online(ips_ha_t * ha, ips_scb_t * scb)
4080 METHOD_TRACE("ips_online", 1);
4082 if (scb->target_id >= IPS_MAX_LD)
4083 return (0);
4085 if ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1) {
4086 memset(ha->logical_drive_info, 0, sizeof (IPS_LD_INFO));
4087 return (0);
4090 if (ha->logical_drive_info->drive_info[scb->target_id].state !=
4091 IPS_LD_OFFLINE
4092 && ha->logical_drive_info->drive_info[scb->target_id].state !=
4093 IPS_LD_FREE
4094 && ha->logical_drive_info->drive_info[scb->target_id].state !=
4095 IPS_LD_CRS
4096 && ha->logical_drive_info->drive_info[scb->target_id].state !=
4097 IPS_LD_SYS)
4098 return (1);
4099 else
4100 return (0);
4103 /****************************************************************************/
4104 /* */
4105 /* Routine Name: ips_inquiry */
4106 /* */
4107 /* Routine Description: */
4108 /* */
4109 /* Simulate an inquiry command to a logical drive */
4110 /* */
4111 /****************************************************************************/
4112 static int
4113 ips_inquiry(ips_ha_t * ha, ips_scb_t * scb)
4115 IPS_SCSI_INQ_DATA inquiry;
4117 METHOD_TRACE("ips_inquiry", 1);
4119 memset(&inquiry, 0, sizeof (IPS_SCSI_INQ_DATA));
4121 inquiry.DeviceType = IPS_SCSI_INQ_TYPE_DASD;
4122 inquiry.DeviceTypeQualifier = IPS_SCSI_INQ_LU_CONNECTED;
4123 inquiry.Version = IPS_SCSI_INQ_REV2;
4124 inquiry.ResponseDataFormat = IPS_SCSI_INQ_RD_REV2;
4125 inquiry.AdditionalLength = 31;
4126 inquiry.Flags[0] = IPS_SCSI_INQ_Address16;
4127 inquiry.Flags[1] =
4128 IPS_SCSI_INQ_WBus16 | IPS_SCSI_INQ_Sync | IPS_SCSI_INQ_CmdQue;
4129 strncpy(inquiry.VendorId, "IBM ", 8);
4130 strncpy(inquiry.ProductId, "SERVERAID ", 16);
4131 strncpy(inquiry.ProductRevisionLevel, "1.00", 4);
4133 ips_scmd_buf_write(scb->scsi_cmd, &inquiry, sizeof (inquiry));
4135 return (1);
4138 /****************************************************************************/
4139 /* */
4140 /* Routine Name: ips_rdcap */
4141 /* */
4142 /* Routine Description: */
4143 /* */
4144 /* Simulate a read capacity command to a logical drive */
4145 /* */
4146 /****************************************************************************/
4147 static int
4148 ips_rdcap(ips_ha_t * ha, ips_scb_t * scb)
4150 IPS_SCSI_CAPACITY cap;
4152 METHOD_TRACE("ips_rdcap", 1);
4154 if (scsi_bufflen(scb->scsi_cmd) < 8)
4155 return (0);
4157 cap.lba =
4158 cpu_to_be32(le32_to_cpu
4159 (ha->logical_drive_info->
4160 drive_info[scb->target_id].sector_count) - 1);
4161 cap.len = cpu_to_be32((uint32_t) IPS_BLKSIZE);
4163 ips_scmd_buf_write(scb->scsi_cmd, &cap, sizeof (cap));
4165 return (1);
4168 /****************************************************************************/
4169 /* */
4170 /* Routine Name: ips_msense */
4171 /* */
4172 /* Routine Description: */
4173 /* */
4174 /* Simulate a mode sense command to a logical drive */
4175 /* */
4176 /****************************************************************************/
4177 static int
4178 ips_msense(ips_ha_t * ha, ips_scb_t * scb)
4180 uint16_t heads;
4181 uint16_t sectors;
4182 uint32_t cylinders;
4183 IPS_SCSI_MODE_PAGE_DATA mdata;
4185 METHOD_TRACE("ips_msense", 1);
4187 if (le32_to_cpu(ha->enq->ulDriveSize[scb->target_id]) > 0x400000 &&
4188 (ha->enq->ucMiscFlag & 0x8) == 0) {
4189 heads = IPS_NORM_HEADS;
4190 sectors = IPS_NORM_SECTORS;
4191 } else {
4192 heads = IPS_COMP_HEADS;
4193 sectors = IPS_COMP_SECTORS;
4196 cylinders =
4197 (le32_to_cpu(ha->enq->ulDriveSize[scb->target_id]) -
4198 1) / (heads * sectors);
4200 memset(&mdata, 0, sizeof (IPS_SCSI_MODE_PAGE_DATA));
4202 mdata.hdr.BlockDescLength = 8;
4204 switch (scb->scsi_cmd->cmnd[2] & 0x3f) {
4205 case 0x03: /* page 3 */
4206 mdata.pdata.pg3.PageCode = 3;
4207 mdata.pdata.pg3.PageLength = sizeof (IPS_SCSI_MODE_PAGE3);
4208 mdata.hdr.DataLength =
4209 3 + mdata.hdr.BlockDescLength + mdata.pdata.pg3.PageLength;
4210 mdata.pdata.pg3.TracksPerZone = 0;
4211 mdata.pdata.pg3.AltSectorsPerZone = 0;
4212 mdata.pdata.pg3.AltTracksPerZone = 0;
4213 mdata.pdata.pg3.AltTracksPerVolume = 0;
4214 mdata.pdata.pg3.SectorsPerTrack = cpu_to_be16(sectors);
4215 mdata.pdata.pg3.BytesPerSector = cpu_to_be16(IPS_BLKSIZE);
4216 mdata.pdata.pg3.Interleave = cpu_to_be16(1);
4217 mdata.pdata.pg3.TrackSkew = 0;
4218 mdata.pdata.pg3.CylinderSkew = 0;
4219 mdata.pdata.pg3.flags = IPS_SCSI_MP3_SoftSector;
4220 break;
4222 case 0x4:
4223 mdata.pdata.pg4.PageCode = 4;
4224 mdata.pdata.pg4.PageLength = sizeof (IPS_SCSI_MODE_PAGE4);
4225 mdata.hdr.DataLength =
4226 3 + mdata.hdr.BlockDescLength + mdata.pdata.pg4.PageLength;
4227 mdata.pdata.pg4.CylindersHigh =
4228 cpu_to_be16((cylinders >> 8) & 0xFFFF);
4229 mdata.pdata.pg4.CylindersLow = (cylinders & 0xFF);
4230 mdata.pdata.pg4.Heads = heads;
4231 mdata.pdata.pg4.WritePrecompHigh = 0;
4232 mdata.pdata.pg4.WritePrecompLow = 0;
4233 mdata.pdata.pg4.ReducedWriteCurrentHigh = 0;
4234 mdata.pdata.pg4.ReducedWriteCurrentLow = 0;
4235 mdata.pdata.pg4.StepRate = cpu_to_be16(1);
4236 mdata.pdata.pg4.LandingZoneHigh = 0;
4237 mdata.pdata.pg4.LandingZoneLow = 0;
4238 mdata.pdata.pg4.flags = 0;
4239 mdata.pdata.pg4.RotationalOffset = 0;
4240 mdata.pdata.pg4.MediumRotationRate = 0;
4241 break;
4242 case 0x8:
4243 mdata.pdata.pg8.PageCode = 8;
4244 mdata.pdata.pg8.PageLength = sizeof (IPS_SCSI_MODE_PAGE8);
4245 mdata.hdr.DataLength =
4246 3 + mdata.hdr.BlockDescLength + mdata.pdata.pg8.PageLength;
4247 /* everything else is left set to 0 */
4248 break;
4250 default:
4251 return (0);
4252 } /* end switch */
4254 ips_scmd_buf_write(scb->scsi_cmd, &mdata, sizeof (mdata));
4256 return (1);
4259 /****************************************************************************/
4260 /* */
4261 /* Routine Name: ips_reqsen */
4262 /* */
4263 /* Routine Description: */
4264 /* */
4265 /* Simulate a request sense command to a logical drive */
4266 /* */
4267 /****************************************************************************/
4268 static int
4269 ips_reqsen(ips_ha_t * ha, ips_scb_t * scb)
4271 IPS_SCSI_REQSEN reqsen;
4273 METHOD_TRACE("ips_reqsen", 1);
4275 memset(&reqsen, 0, sizeof (IPS_SCSI_REQSEN));
4277 reqsen.ResponseCode =
4278 IPS_SCSI_REQSEN_VALID | IPS_SCSI_REQSEN_CURRENT_ERR;
4279 reqsen.AdditionalLength = 10;
4280 reqsen.AdditionalSenseCode = IPS_SCSI_REQSEN_NO_SENSE;
4281 reqsen.AdditionalSenseCodeQual = IPS_SCSI_REQSEN_NO_SENSE;
4283 ips_scmd_buf_write(scb->scsi_cmd, &reqsen, sizeof (reqsen));
4285 return (1);
4288 /****************************************************************************/
4289 /* */
4290 /* Routine Name: ips_free */
4291 /* */
4292 /* Routine Description: */
4293 /* */
4294 /* Free any allocated space for this controller */
4295 /* */
4296 /****************************************************************************/
4297 static void
4298 ips_free(ips_ha_t * ha)
4301 METHOD_TRACE("ips_free", 1);
4303 if (ha) {
4304 if (ha->enq) {
4305 pci_free_consistent(ha->pcidev, sizeof(IPS_ENQ),
4306 ha->enq, ha->enq_busaddr);
4307 ha->enq = NULL;
4310 kfree(ha->conf);
4311 ha->conf = NULL;
4313 if (ha->adapt) {
4314 pci_free_consistent(ha->pcidev,
4315 sizeof (IPS_ADAPTER) +
4316 sizeof (IPS_IO_CMD), ha->adapt,
4317 ha->adapt->hw_status_start);
4318 ha->adapt = NULL;
4321 if (ha->logical_drive_info) {
4322 pci_free_consistent(ha->pcidev,
4323 sizeof (IPS_LD_INFO),
4324 ha->logical_drive_info,
4325 ha->logical_drive_info_dma_addr);
4326 ha->logical_drive_info = NULL;
4329 kfree(ha->nvram);
4330 ha->nvram = NULL;
4332 kfree(ha->subsys);
4333 ha->subsys = NULL;
4335 if (ha->ioctl_data) {
4336 pci_free_consistent(ha->pcidev, ha->ioctl_len,
4337 ha->ioctl_data, ha->ioctl_busaddr);
4338 ha->ioctl_data = NULL;
4339 ha->ioctl_datasize = 0;
4340 ha->ioctl_len = 0;
4342 ips_deallocatescbs(ha, ha->max_cmds);
4344 /* free memory mapped (if applicable) */
4345 if (ha->mem_ptr) {
4346 iounmap(ha->ioremap_ptr);
4347 ha->ioremap_ptr = NULL;
4348 ha->mem_ptr = NULL;
4351 ha->mem_addr = 0;
4356 /****************************************************************************/
4357 /* */
4358 /* Routine Name: ips_deallocatescbs */
4359 /* */
4360 /* Routine Description: */
4361 /* */
4362 /* Free the command blocks */
4363 /* */
4364 /****************************************************************************/
4365 static int
4366 ips_deallocatescbs(ips_ha_t * ha, int cmds)
4368 if (ha->scbs) {
4369 pci_free_consistent(ha->pcidev,
4370 IPS_SGLIST_SIZE(ha) * IPS_MAX_SG * cmds,
4371 ha->scbs->sg_list.list,
4372 ha->scbs->sg_busaddr);
4373 pci_free_consistent(ha->pcidev, sizeof (ips_scb_t) * cmds,
4374 ha->scbs, ha->scbs->scb_busaddr);
4375 ha->scbs = NULL;
4376 } /* end if */
4377 return 1;
4380 /****************************************************************************/
4381 /* */
4382 /* Routine Name: ips_allocatescbs */
4383 /* */
4384 /* Routine Description: */
4385 /* */
4386 /* Allocate the command blocks */
4387 /* */
4388 /****************************************************************************/
4389 static int
4390 ips_allocatescbs(ips_ha_t * ha)
4392 ips_scb_t *scb_p;
4393 IPS_SG_LIST ips_sg;
4394 int i;
4395 dma_addr_t command_dma, sg_dma;
4397 METHOD_TRACE("ips_allocatescbs", 1);
4399 /* Allocate memory for the SCBs */
4400 ha->scbs =
4401 pci_alloc_consistent(ha->pcidev, ha->max_cmds * sizeof (ips_scb_t),
4402 &command_dma);
4403 if (ha->scbs == NULL)
4404 return 0;
4405 ips_sg.list =
4406 pci_alloc_consistent(ha->pcidev,
4407 IPS_SGLIST_SIZE(ha) * IPS_MAX_SG *
4408 ha->max_cmds, &sg_dma);
4409 if (ips_sg.list == NULL) {
4410 pci_free_consistent(ha->pcidev,
4411 ha->max_cmds * sizeof (ips_scb_t), ha->scbs,
4412 command_dma);
4413 return 0;
4416 memset(ha->scbs, 0, ha->max_cmds * sizeof (ips_scb_t));
4418 for (i = 0; i < ha->max_cmds; i++) {
4419 scb_p = &ha->scbs[i];
4420 scb_p->scb_busaddr = command_dma + sizeof (ips_scb_t) * i;
4421 /* set up S/G list */
4422 if (IPS_USE_ENH_SGLIST(ha)) {
4423 scb_p->sg_list.enh_list =
4424 ips_sg.enh_list + i * IPS_MAX_SG;
4425 scb_p->sg_busaddr =
4426 sg_dma + IPS_SGLIST_SIZE(ha) * IPS_MAX_SG * i;
4427 } else {
4428 scb_p->sg_list.std_list =
4429 ips_sg.std_list + i * IPS_MAX_SG;
4430 scb_p->sg_busaddr =
4431 sg_dma + IPS_SGLIST_SIZE(ha) * IPS_MAX_SG * i;
4434 /* add to the free list */
4435 if (i < ha->max_cmds - 1) {
4436 scb_p->q_next = ha->scb_freelist;
4437 ha->scb_freelist = scb_p;
4441 /* success */
4442 return (1);
4445 /****************************************************************************/
4446 /* */
4447 /* Routine Name: ips_init_scb */
4448 /* */
4449 /* Routine Description: */
4450 /* */
4451 /* Initialize a CCB to default values */
4452 /* */
4453 /****************************************************************************/
4454 static void
4455 ips_init_scb(ips_ha_t * ha, ips_scb_t * scb)
4457 IPS_SG_LIST sg_list;
4458 uint32_t cmd_busaddr, sg_busaddr;
4459 METHOD_TRACE("ips_init_scb", 1);
4461 if (scb == NULL)
4462 return;
4464 sg_list.list = scb->sg_list.list;
4465 cmd_busaddr = scb->scb_busaddr;
4466 sg_busaddr = scb->sg_busaddr;
4467 /* zero fill */
4468 memset(scb, 0, sizeof (ips_scb_t));
4469 memset(ha->dummy, 0, sizeof (IPS_IO_CMD));
4471 /* Initialize dummy command bucket */
4472 ha->dummy->op_code = 0xFF;
4473 ha->dummy->ccsar = cpu_to_le32(ha->adapt->hw_status_start
4474 + sizeof (IPS_ADAPTER));
4475 ha->dummy->command_id = IPS_MAX_CMDS;
4477 /* set bus address of scb */
4478 scb->scb_busaddr = cmd_busaddr;
4479 scb->sg_busaddr = sg_busaddr;
4480 scb->sg_list.list = sg_list.list;
4482 /* Neptune Fix */
4483 scb->cmd.basic_io.cccr = cpu_to_le32((uint32_t) IPS_BIT_ILE);
4484 scb->cmd.basic_io.ccsar = cpu_to_le32(ha->adapt->hw_status_start
4485 + sizeof (IPS_ADAPTER));
4488 /****************************************************************************/
4489 /* */
4490 /* Routine Name: ips_get_scb */
4491 /* */
4492 /* Routine Description: */
4493 /* */
4494 /* Initialize a CCB to default values */
4495 /* */
4496 /* ASSUMED to be callled from within a lock */
4497 /* */
4498 /****************************************************************************/
4499 static ips_scb_t *
4500 ips_getscb(ips_ha_t * ha)
4502 ips_scb_t *scb;
4504 METHOD_TRACE("ips_getscb", 1);
4506 if ((scb = ha->scb_freelist) == NULL) {
4508 return (NULL);
4511 ha->scb_freelist = scb->q_next;
4512 scb->flags = 0;
4513 scb->q_next = NULL;
4515 ips_init_scb(ha, scb);
4517 return (scb);
4520 /****************************************************************************/
4521 /* */
4522 /* Routine Name: ips_free_scb */
4523 /* */
4524 /* Routine Description: */
4525 /* */
4526 /* Return an unused CCB back to the free list */
4527 /* */
4528 /* ASSUMED to be called from within a lock */
4529 /* */
4530 /****************************************************************************/
4531 static void
4532 ips_freescb(ips_ha_t * ha, ips_scb_t * scb)
4535 METHOD_TRACE("ips_freescb", 1);
4536 if (scb->flags & IPS_SCB_MAP_SG)
4537 scsi_dma_unmap(scb->scsi_cmd);
4538 else if (scb->flags & IPS_SCB_MAP_SINGLE)
4539 pci_unmap_single(ha->pcidev, scb->data_busaddr, scb->data_len,
4540 IPS_DMA_DIR(scb));
4542 /* check to make sure this is not our "special" scb */
4543 if (IPS_COMMAND_ID(ha, scb) < (ha->max_cmds - 1)) {
4544 scb->q_next = ha->scb_freelist;
4545 ha->scb_freelist = scb;
4549 /****************************************************************************/
4550 /* */
4551 /* Routine Name: ips_isinit_copperhead */
4552 /* */
4553 /* Routine Description: */
4554 /* */
4555 /* Is controller initialized ? */
4556 /* */
4557 /****************************************************************************/
4558 static int
4559 ips_isinit_copperhead(ips_ha_t * ha)
4561 uint8_t scpr;
4562 uint8_t isr;
4564 METHOD_TRACE("ips_isinit_copperhead", 1);
4566 isr = inb(ha->io_addr + IPS_REG_HISR);
4567 scpr = inb(ha->io_addr + IPS_REG_SCPR);
4569 if (((isr & IPS_BIT_EI) == 0) && ((scpr & IPS_BIT_EBM) == 0))
4570 return (0);
4571 else
4572 return (1);
4575 /****************************************************************************/
4576 /* */
4577 /* Routine Name: ips_isinit_copperhead_memio */
4578 /* */
4579 /* Routine Description: */
4580 /* */
4581 /* Is controller initialized ? */
4582 /* */
4583 /****************************************************************************/
4584 static int
4585 ips_isinit_copperhead_memio(ips_ha_t * ha)
4587 uint8_t isr = 0;
4588 uint8_t scpr;
4590 METHOD_TRACE("ips_is_init_copperhead_memio", 1);
4592 isr = readb(ha->mem_ptr + IPS_REG_HISR);
4593 scpr = readb(ha->mem_ptr + IPS_REG_SCPR);
4595 if (((isr & IPS_BIT_EI) == 0) && ((scpr & IPS_BIT_EBM) == 0))
4596 return (0);
4597 else
4598 return (1);
4601 /****************************************************************************/
4602 /* */
4603 /* Routine Name: ips_isinit_morpheus */
4604 /* */
4605 /* Routine Description: */
4606 /* */
4607 /* Is controller initialized ? */
4608 /* */
4609 /****************************************************************************/
4610 static int
4611 ips_isinit_morpheus(ips_ha_t * ha)
4613 uint32_t post;
4614 uint32_t bits;
4616 METHOD_TRACE("ips_is_init_morpheus", 1);
4618 if (ips_isintr_morpheus(ha))
4619 ips_flush_and_reset(ha);
4621 post = readl(ha->mem_ptr + IPS_REG_I960_MSG0);
4622 bits = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
4624 if (post == 0)
4625 return (0);
4626 else if (bits & 0x3)
4627 return (0);
4628 else
4629 return (1);
4632 /****************************************************************************/
4633 /* */
4634 /* Routine Name: ips_flush_and_reset */
4635 /* */
4636 /* Routine Description: */
4637 /* */
4638 /* Perform cleanup ( FLUSH and RESET ) when the adapter is in an unknown */
4639 /* state ( was trying to INIT and an interrupt was already pending ) ... */
4640 /* */
4641 /****************************************************************************/
4642 static void
4643 ips_flush_and_reset(ips_ha_t *ha)
4645 ips_scb_t *scb;
4646 int ret;
4647 int time;
4648 int done;
4649 dma_addr_t command_dma;
4651 /* Create a usuable SCB */
4652 scb = pci_alloc_consistent(ha->pcidev, sizeof(ips_scb_t), &command_dma);
4653 if (scb) {
4654 memset(scb, 0, sizeof(ips_scb_t));
4655 ips_init_scb(ha, scb);
4656 scb->scb_busaddr = command_dma;
4658 scb->timeout = ips_cmd_timeout;
4659 scb->cdb[0] = IPS_CMD_FLUSH;
4661 scb->cmd.flush_cache.op_code = IPS_CMD_FLUSH;
4662 scb->cmd.flush_cache.command_id = IPS_MAX_CMDS; /* Use an ID that would otherwise not exist */
4663 scb->cmd.flush_cache.state = IPS_NORM_STATE;
4664 scb->cmd.flush_cache.reserved = 0;
4665 scb->cmd.flush_cache.reserved2 = 0;
4666 scb->cmd.flush_cache.reserved3 = 0;
4667 scb->cmd.flush_cache.reserved4 = 0;
4669 ret = ips_send_cmd(ha, scb); /* Send the Flush Command */
4671 if (ret == IPS_SUCCESS) {
4672 time = 60 * IPS_ONE_SEC; /* Max Wait time is 60 seconds */
4673 done = 0;
4675 while ((time > 0) && (!done)) {
4676 done = ips_poll_for_flush_complete(ha);
4677 /* This may look evil, but it's only done during extremely rare start-up conditions ! */
4678 udelay(1000);
4679 time--;
4684 /* Now RESET and INIT the adapter */
4685 (*ha->func.reset) (ha);
4687 pci_free_consistent(ha->pcidev, sizeof(ips_scb_t), scb, command_dma);
4688 return;
4691 /****************************************************************************/
4692 /* */
4693 /* Routine Name: ips_poll_for_flush_complete */
4694 /* */
4695 /* Routine Description: */
4696 /* */
4697 /* Poll for the Flush Command issued by ips_flush_and_reset() to complete */
4698 /* All other responses are just taken off the queue and ignored */
4699 /* */
4700 /****************************************************************************/
4701 static int
4702 ips_poll_for_flush_complete(ips_ha_t * ha)
4704 IPS_STATUS cstatus;
4706 while (TRUE) {
4707 cstatus.value = (*ha->func.statupd) (ha);
4709 if (cstatus.value == 0xffffffff) /* If No Interrupt to process */
4710 break;
4712 /* Success is when we see the Flush Command ID */
4713 if (cstatus.fields.command_id == IPS_MAX_CMDS)
4714 return 1;
4717 return 0;
4720 /****************************************************************************/
4721 /* */
4722 /* Routine Name: ips_enable_int_copperhead */
4723 /* */
4724 /* Routine Description: */
4725 /* Turn on interrupts */
4726 /* */
4727 /****************************************************************************/
4728 static void
4729 ips_enable_int_copperhead(ips_ha_t * ha)
4731 METHOD_TRACE("ips_enable_int_copperhead", 1);
4733 outb(ha->io_addr + IPS_REG_HISR, IPS_BIT_EI);
4734 inb(ha->io_addr + IPS_REG_HISR); /*Ensure PCI Posting Completes*/
4737 /****************************************************************************/
4738 /* */
4739 /* Routine Name: ips_enable_int_copperhead_memio */
4740 /* */
4741 /* Routine Description: */
4742 /* Turn on interrupts */
4743 /* */
4744 /****************************************************************************/
4745 static void
4746 ips_enable_int_copperhead_memio(ips_ha_t * ha)
4748 METHOD_TRACE("ips_enable_int_copperhead_memio", 1);
4750 writeb(IPS_BIT_EI, ha->mem_ptr + IPS_REG_HISR);
4751 readb(ha->mem_ptr + IPS_REG_HISR); /*Ensure PCI Posting Completes*/
4754 /****************************************************************************/
4755 /* */
4756 /* Routine Name: ips_enable_int_morpheus */
4757 /* */
4758 /* Routine Description: */
4759 /* Turn on interrupts */
4760 /* */
4761 /****************************************************************************/
4762 static void
4763 ips_enable_int_morpheus(ips_ha_t * ha)
4765 uint32_t Oimr;
4767 METHOD_TRACE("ips_enable_int_morpheus", 1);
4769 Oimr = readl(ha->mem_ptr + IPS_REG_I960_OIMR);
4770 Oimr &= ~0x08;
4771 writel(Oimr, ha->mem_ptr + IPS_REG_I960_OIMR);
4772 readl(ha->mem_ptr + IPS_REG_I960_OIMR); /*Ensure PCI Posting Completes*/
4775 /****************************************************************************/
4776 /* */
4777 /* Routine Name: ips_init_copperhead */
4778 /* */
4779 /* Routine Description: */
4780 /* */
4781 /* Initialize a copperhead controller */
4782 /* */
4783 /****************************************************************************/
4784 static int
4785 ips_init_copperhead(ips_ha_t * ha)
4787 uint8_t Isr;
4788 uint8_t Cbsp;
4789 uint8_t PostByte[IPS_MAX_POST_BYTES];
4790 uint8_t ConfigByte[IPS_MAX_CONFIG_BYTES];
4791 int i, j;
4793 METHOD_TRACE("ips_init_copperhead", 1);
4795 for (i = 0; i < IPS_MAX_POST_BYTES; i++) {
4796 for (j = 0; j < 45; j++) {
4797 Isr = inb(ha->io_addr + IPS_REG_HISR);
4798 if (Isr & IPS_BIT_GHI)
4799 break;
4801 /* Delay for 1 Second */
4802 MDELAY(IPS_ONE_SEC);
4805 if (j >= 45)
4806 /* error occurred */
4807 return (0);
4809 PostByte[i] = inb(ha->io_addr + IPS_REG_ISPR);
4810 outb(Isr, ha->io_addr + IPS_REG_HISR);
4813 if (PostByte[0] < IPS_GOOD_POST_STATUS) {
4814 IPS_PRINTK(KERN_WARNING, ha->pcidev,
4815 "reset controller fails (post status %x %x).\n",
4816 PostByte[0], PostByte[1]);
4818 return (0);
4821 for (i = 0; i < IPS_MAX_CONFIG_BYTES; i++) {
4822 for (j = 0; j < 240; j++) {
4823 Isr = inb(ha->io_addr + IPS_REG_HISR);
4824 if (Isr & IPS_BIT_GHI)
4825 break;
4827 /* Delay for 1 Second */
4828 MDELAY(IPS_ONE_SEC);
4831 if (j >= 240)
4832 /* error occurred */
4833 return (0);
4835 ConfigByte[i] = inb(ha->io_addr + IPS_REG_ISPR);
4836 outb(Isr, ha->io_addr + IPS_REG_HISR);
4839 for (i = 0; i < 240; i++) {
4840 Cbsp = inb(ha->io_addr + IPS_REG_CBSP);
4842 if ((Cbsp & IPS_BIT_OP) == 0)
4843 break;
4845 /* Delay for 1 Second */
4846 MDELAY(IPS_ONE_SEC);
4849 if (i >= 240)
4850 /* reset failed */
4851 return (0);
4853 /* setup CCCR */
4854 outl(0x1010, ha->io_addr + IPS_REG_CCCR);
4856 /* Enable busmastering */
4857 outb(IPS_BIT_EBM, ha->io_addr + IPS_REG_SCPR);
4859 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
4860 /* fix for anaconda64 */
4861 outl(0, ha->io_addr + IPS_REG_NDAE);
4863 /* Enable interrupts */
4864 outb(IPS_BIT_EI, ha->io_addr + IPS_REG_HISR);
4866 return (1);
4869 /****************************************************************************/
4870 /* */
4871 /* Routine Name: ips_init_copperhead_memio */
4872 /* */
4873 /* Routine Description: */
4874 /* */
4875 /* Initialize a copperhead controller with memory mapped I/O */
4876 /* */
4877 /****************************************************************************/
4878 static int
4879 ips_init_copperhead_memio(ips_ha_t * ha)
4881 uint8_t Isr = 0;
4882 uint8_t Cbsp;
4883 uint8_t PostByte[IPS_MAX_POST_BYTES];
4884 uint8_t ConfigByte[IPS_MAX_CONFIG_BYTES];
4885 int i, j;
4887 METHOD_TRACE("ips_init_copperhead_memio", 1);
4889 for (i = 0; i < IPS_MAX_POST_BYTES; i++) {
4890 for (j = 0; j < 45; j++) {
4891 Isr = readb(ha->mem_ptr + IPS_REG_HISR);
4892 if (Isr & IPS_BIT_GHI)
4893 break;
4895 /* Delay for 1 Second */
4896 MDELAY(IPS_ONE_SEC);
4899 if (j >= 45)
4900 /* error occurred */
4901 return (0);
4903 PostByte[i] = readb(ha->mem_ptr + IPS_REG_ISPR);
4904 writeb(Isr, ha->mem_ptr + IPS_REG_HISR);
4907 if (PostByte[0] < IPS_GOOD_POST_STATUS) {
4908 IPS_PRINTK(KERN_WARNING, ha->pcidev,
4909 "reset controller fails (post status %x %x).\n",
4910 PostByte[0], PostByte[1]);
4912 return (0);
4915 for (i = 0; i < IPS_MAX_CONFIG_BYTES; i++) {
4916 for (j = 0; j < 240; j++) {
4917 Isr = readb(ha->mem_ptr + IPS_REG_HISR);
4918 if (Isr & IPS_BIT_GHI)
4919 break;
4921 /* Delay for 1 Second */
4922 MDELAY(IPS_ONE_SEC);
4925 if (j >= 240)
4926 /* error occurred */
4927 return (0);
4929 ConfigByte[i] = readb(ha->mem_ptr + IPS_REG_ISPR);
4930 writeb(Isr, ha->mem_ptr + IPS_REG_HISR);
4933 for (i = 0; i < 240; i++) {
4934 Cbsp = readb(ha->mem_ptr + IPS_REG_CBSP);
4936 if ((Cbsp & IPS_BIT_OP) == 0)
4937 break;
4939 /* Delay for 1 Second */
4940 MDELAY(IPS_ONE_SEC);
4943 if (i >= 240)
4944 /* error occurred */
4945 return (0);
4947 /* setup CCCR */
4948 writel(0x1010, ha->mem_ptr + IPS_REG_CCCR);
4950 /* Enable busmastering */
4951 writeb(IPS_BIT_EBM, ha->mem_ptr + IPS_REG_SCPR);
4953 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
4954 /* fix for anaconda64 */
4955 writel(0, ha->mem_ptr + IPS_REG_NDAE);
4957 /* Enable interrupts */
4958 writeb(IPS_BIT_EI, ha->mem_ptr + IPS_REG_HISR);
4960 /* if we get here then everything went OK */
4961 return (1);
4964 /****************************************************************************/
4965 /* */
4966 /* Routine Name: ips_init_morpheus */
4967 /* */
4968 /* Routine Description: */
4969 /* */
4970 /* Initialize a morpheus controller */
4971 /* */
4972 /****************************************************************************/
4973 static int
4974 ips_init_morpheus(ips_ha_t * ha)
4976 uint32_t Post;
4977 uint32_t Config;
4978 uint32_t Isr;
4979 uint32_t Oimr;
4980 int i;
4982 METHOD_TRACE("ips_init_morpheus", 1);
4984 /* Wait up to 45 secs for Post */
4985 for (i = 0; i < 45; i++) {
4986 Isr = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
4988 if (Isr & IPS_BIT_I960_MSG0I)
4989 break;
4991 /* Delay for 1 Second */
4992 MDELAY(IPS_ONE_SEC);
4995 if (i >= 45) {
4996 /* error occurred */
4997 IPS_PRINTK(KERN_WARNING, ha->pcidev,
4998 "timeout waiting for post.\n");
5000 return (0);
5003 Post = readl(ha->mem_ptr + IPS_REG_I960_MSG0);
5005 if (Post == 0x4F00) { /* If Flashing the Battery PIC */
5006 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5007 "Flashing Battery PIC, Please wait ...\n");
5009 /* Clear the interrupt bit */
5010 Isr = (uint32_t) IPS_BIT_I960_MSG0I;
5011 writel(Isr, ha->mem_ptr + IPS_REG_I2O_HIR);
5013 for (i = 0; i < 120; i++) { /* Wait Up to 2 Min. for Completion */
5014 Post = readl(ha->mem_ptr + IPS_REG_I960_MSG0);
5015 if (Post != 0x4F00)
5016 break;
5017 /* Delay for 1 Second */
5018 MDELAY(IPS_ONE_SEC);
5021 if (i >= 120) {
5022 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5023 "timeout waiting for Battery PIC Flash\n");
5024 return (0);
5029 /* Clear the interrupt bit */
5030 Isr = (uint32_t) IPS_BIT_I960_MSG0I;
5031 writel(Isr, ha->mem_ptr + IPS_REG_I2O_HIR);
5033 if (Post < (IPS_GOOD_POST_STATUS << 8)) {
5034 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5035 "reset controller fails (post status %x).\n", Post);
5037 return (0);
5040 /* Wait up to 240 secs for config bytes */
5041 for (i = 0; i < 240; i++) {
5042 Isr = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
5044 if (Isr & IPS_BIT_I960_MSG1I)
5045 break;
5047 /* Delay for 1 Second */
5048 MDELAY(IPS_ONE_SEC);
5051 if (i >= 240) {
5052 /* error occurred */
5053 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5054 "timeout waiting for config.\n");
5056 return (0);
5059 Config = readl(ha->mem_ptr + IPS_REG_I960_MSG1);
5061 /* Clear interrupt bit */
5062 Isr = (uint32_t) IPS_BIT_I960_MSG1I;
5063 writel(Isr, ha->mem_ptr + IPS_REG_I2O_HIR);
5065 /* Turn on the interrupts */
5066 Oimr = readl(ha->mem_ptr + IPS_REG_I960_OIMR);
5067 Oimr &= ~0x8;
5068 writel(Oimr, ha->mem_ptr + IPS_REG_I960_OIMR);
5070 /* if we get here then everything went OK */
5072 /* Since we did a RESET, an EraseStripeLock may be needed */
5073 if (Post == 0xEF10) {
5074 if ((Config == 0x000F) || (Config == 0x0009))
5075 ha->requires_esl = 1;
5078 return (1);
5081 /****************************************************************************/
5082 /* */
5083 /* Routine Name: ips_reset_copperhead */
5084 /* */
5085 /* Routine Description: */
5086 /* */
5087 /* Reset the controller */
5088 /* */
5089 /****************************************************************************/
5090 static int
5091 ips_reset_copperhead(ips_ha_t * ha)
5093 int reset_counter;
5095 METHOD_TRACE("ips_reset_copperhead", 1);
5097 DEBUG_VAR(1, "(%s%d) ips_reset_copperhead: io addr: %x, irq: %d",
5098 ips_name, ha->host_num, ha->io_addr, ha->pcidev->irq);
5100 reset_counter = 0;
5102 while (reset_counter < 2) {
5103 reset_counter++;
5105 outb(IPS_BIT_RST, ha->io_addr + IPS_REG_SCPR);
5107 /* Delay for 1 Second */
5108 MDELAY(IPS_ONE_SEC);
5110 outb(0, ha->io_addr + IPS_REG_SCPR);
5112 /* Delay for 1 Second */
5113 MDELAY(IPS_ONE_SEC);
5115 if ((*ha->func.init) (ha))
5116 break;
5117 else if (reset_counter >= 2) {
5119 return (0);
5123 return (1);
5126 /****************************************************************************/
5127 /* */
5128 /* Routine Name: ips_reset_copperhead_memio */
5129 /* */
5130 /* Routine Description: */
5131 /* */
5132 /* Reset the controller */
5133 /* */
5134 /****************************************************************************/
5135 static int
5136 ips_reset_copperhead_memio(ips_ha_t * ha)
5138 int reset_counter;
5140 METHOD_TRACE("ips_reset_copperhead_memio", 1);
5142 DEBUG_VAR(1, "(%s%d) ips_reset_copperhead_memio: mem addr: %x, irq: %d",
5143 ips_name, ha->host_num, ha->mem_addr, ha->pcidev->irq);
5145 reset_counter = 0;
5147 while (reset_counter < 2) {
5148 reset_counter++;
5150 writeb(IPS_BIT_RST, ha->mem_ptr + IPS_REG_SCPR);
5152 /* Delay for 1 Second */
5153 MDELAY(IPS_ONE_SEC);
5155 writeb(0, ha->mem_ptr + IPS_REG_SCPR);
5157 /* Delay for 1 Second */
5158 MDELAY(IPS_ONE_SEC);
5160 if ((*ha->func.init) (ha))
5161 break;
5162 else if (reset_counter >= 2) {
5164 return (0);
5168 return (1);
5171 /****************************************************************************/
5172 /* */
5173 /* Routine Name: ips_reset_morpheus */
5174 /* */
5175 /* Routine Description: */
5176 /* */
5177 /* Reset the controller */
5178 /* */
5179 /****************************************************************************/
5180 static int
5181 ips_reset_morpheus(ips_ha_t * ha)
5183 int reset_counter;
5184 uint8_t junk;
5186 METHOD_TRACE("ips_reset_morpheus", 1);
5188 DEBUG_VAR(1, "(%s%d) ips_reset_morpheus: mem addr: %x, irq: %d",
5189 ips_name, ha->host_num, ha->mem_addr, ha->pcidev->irq);
5191 reset_counter = 0;
5193 while (reset_counter < 2) {
5194 reset_counter++;
5196 writel(0x80000000, ha->mem_ptr + IPS_REG_I960_IDR);
5198 /* Delay for 5 Seconds */
5199 MDELAY(5 * IPS_ONE_SEC);
5201 /* Do a PCI config read to wait for adapter */
5202 pci_read_config_byte(ha->pcidev, 4, &junk);
5204 if ((*ha->func.init) (ha))
5205 break;
5206 else if (reset_counter >= 2) {
5208 return (0);
5212 return (1);
5215 /****************************************************************************/
5216 /* */
5217 /* Routine Name: ips_statinit */
5218 /* */
5219 /* Routine Description: */
5220 /* */
5221 /* Initialize the status queues on the controller */
5222 /* */
5223 /****************************************************************************/
5224 static void
5225 ips_statinit(ips_ha_t * ha)
5227 uint32_t phys_status_start;
5229 METHOD_TRACE("ips_statinit", 1);
5231 ha->adapt->p_status_start = ha->adapt->status;
5232 ha->adapt->p_status_end = ha->adapt->status + IPS_MAX_CMDS;
5233 ha->adapt->p_status_tail = ha->adapt->status;
5235 phys_status_start = ha->adapt->hw_status_start;
5236 outl(phys_status_start, ha->io_addr + IPS_REG_SQSR);
5237 outl(phys_status_start + IPS_STATUS_Q_SIZE,
5238 ha->io_addr + IPS_REG_SQER);
5239 outl(phys_status_start + IPS_STATUS_SIZE,
5240 ha->io_addr + IPS_REG_SQHR);
5241 outl(phys_status_start, ha->io_addr + IPS_REG_SQTR);
5243 ha->adapt->hw_status_tail = phys_status_start;
5246 /****************************************************************************/
5247 /* */
5248 /* Routine Name: ips_statinit_memio */
5249 /* */
5250 /* Routine Description: */
5251 /* */
5252 /* Initialize the status queues on the controller */
5253 /* */
5254 /****************************************************************************/
5255 static void
5256 ips_statinit_memio(ips_ha_t * ha)
5258 uint32_t phys_status_start;
5260 METHOD_TRACE("ips_statinit_memio", 1);
5262 ha->adapt->p_status_start = ha->adapt->status;
5263 ha->adapt->p_status_end = ha->adapt->status + IPS_MAX_CMDS;
5264 ha->adapt->p_status_tail = ha->adapt->status;
5266 phys_status_start = ha->adapt->hw_status_start;
5267 writel(phys_status_start, ha->mem_ptr + IPS_REG_SQSR);
5268 writel(phys_status_start + IPS_STATUS_Q_SIZE,
5269 ha->mem_ptr + IPS_REG_SQER);
5270 writel(phys_status_start + IPS_STATUS_SIZE, ha->mem_ptr + IPS_REG_SQHR);
5271 writel(phys_status_start, ha->mem_ptr + IPS_REG_SQTR);
5273 ha->adapt->hw_status_tail = phys_status_start;
5276 /****************************************************************************/
5277 /* */
5278 /* Routine Name: ips_statupd_copperhead */
5279 /* */
5280 /* Routine Description: */
5281 /* */
5282 /* Remove an element from the status queue */
5283 /* */
5284 /****************************************************************************/
5285 static uint32_t
5286 ips_statupd_copperhead(ips_ha_t * ha)
5288 METHOD_TRACE("ips_statupd_copperhead", 1);
5290 if (ha->adapt->p_status_tail != ha->adapt->p_status_end) {
5291 ha->adapt->p_status_tail++;
5292 ha->adapt->hw_status_tail += sizeof (IPS_STATUS);
5293 } else {
5294 ha->adapt->p_status_tail = ha->adapt->p_status_start;
5295 ha->adapt->hw_status_tail = ha->adapt->hw_status_start;
5298 outl(ha->adapt->hw_status_tail,
5299 ha->io_addr + IPS_REG_SQTR);
5301 return (ha->adapt->p_status_tail->value);
5304 /****************************************************************************/
5305 /* */
5306 /* Routine Name: ips_statupd_copperhead_memio */
5307 /* */
5308 /* Routine Description: */
5309 /* */
5310 /* Remove an element from the status queue */
5311 /* */
5312 /****************************************************************************/
5313 static uint32_t
5314 ips_statupd_copperhead_memio(ips_ha_t * ha)
5316 METHOD_TRACE("ips_statupd_copperhead_memio", 1);
5318 if (ha->adapt->p_status_tail != ha->adapt->p_status_end) {
5319 ha->adapt->p_status_tail++;
5320 ha->adapt->hw_status_tail += sizeof (IPS_STATUS);
5321 } else {
5322 ha->adapt->p_status_tail = ha->adapt->p_status_start;
5323 ha->adapt->hw_status_tail = ha->adapt->hw_status_start;
5326 writel(ha->adapt->hw_status_tail, ha->mem_ptr + IPS_REG_SQTR);
5328 return (ha->adapt->p_status_tail->value);
5331 /****************************************************************************/
5332 /* */
5333 /* Routine Name: ips_statupd_morpheus */
5334 /* */
5335 /* Routine Description: */
5336 /* */
5337 /* Remove an element from the status queue */
5338 /* */
5339 /****************************************************************************/
5340 static uint32_t
5341 ips_statupd_morpheus(ips_ha_t * ha)
5343 uint32_t val;
5345 METHOD_TRACE("ips_statupd_morpheus", 1);
5347 val = readl(ha->mem_ptr + IPS_REG_I2O_OUTMSGQ);
5349 return (val);
5352 /****************************************************************************/
5353 /* */
5354 /* Routine Name: ips_issue_copperhead */
5355 /* */
5356 /* Routine Description: */
5357 /* */
5358 /* Send a command down to the controller */
5359 /* */
5360 /****************************************************************************/
5361 static int
5362 ips_issue_copperhead(ips_ha_t * ha, ips_scb_t * scb)
5364 uint32_t TimeOut;
5365 uint32_t val;
5367 METHOD_TRACE("ips_issue_copperhead", 1);
5369 if (scb->scsi_cmd) {
5370 DEBUG_VAR(2, "(%s%d) ips_issue: cmd 0x%X id %d (%d %d %d)",
5371 ips_name,
5372 ha->host_num,
5373 scb->cdb[0],
5374 scb->cmd.basic_io.command_id,
5375 scb->bus, scb->target_id, scb->lun);
5376 } else {
5377 DEBUG_VAR(2, KERN_NOTICE "(%s%d) ips_issue: logical cmd id %d",
5378 ips_name, ha->host_num, scb->cmd.basic_io.command_id);
5381 TimeOut = 0;
5383 while ((val =
5384 le32_to_cpu(inl(ha->io_addr + IPS_REG_CCCR))) & IPS_BIT_SEM) {
5385 udelay(1000);
5387 if (++TimeOut >= IPS_SEM_TIMEOUT) {
5388 if (!(val & IPS_BIT_START_STOP))
5389 break;
5391 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5392 "ips_issue val [0x%x].\n", val);
5393 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5394 "ips_issue semaphore chk timeout.\n");
5396 return (IPS_FAILURE);
5397 } /* end if */
5398 } /* end while */
5400 outl(scb->scb_busaddr, ha->io_addr + IPS_REG_CCSAR);
5401 outw(IPS_BIT_START_CMD, ha->io_addr + IPS_REG_CCCR);
5403 return (IPS_SUCCESS);
5406 /****************************************************************************/
5407 /* */
5408 /* Routine Name: ips_issue_copperhead_memio */
5409 /* */
5410 /* Routine Description: */
5411 /* */
5412 /* Send a command down to the controller */
5413 /* */
5414 /****************************************************************************/
5415 static int
5416 ips_issue_copperhead_memio(ips_ha_t * ha, ips_scb_t * scb)
5418 uint32_t TimeOut;
5419 uint32_t val;
5421 METHOD_TRACE("ips_issue_copperhead_memio", 1);
5423 if (scb->scsi_cmd) {
5424 DEBUG_VAR(2, "(%s%d) ips_issue: cmd 0x%X id %d (%d %d %d)",
5425 ips_name,
5426 ha->host_num,
5427 scb->cdb[0],
5428 scb->cmd.basic_io.command_id,
5429 scb->bus, scb->target_id, scb->lun);
5430 } else {
5431 DEBUG_VAR(2, "(%s%d) ips_issue: logical cmd id %d",
5432 ips_name, ha->host_num, scb->cmd.basic_io.command_id);
5435 TimeOut = 0;
5437 while ((val = readl(ha->mem_ptr + IPS_REG_CCCR)) & IPS_BIT_SEM) {
5438 udelay(1000);
5440 if (++TimeOut >= IPS_SEM_TIMEOUT) {
5441 if (!(val & IPS_BIT_START_STOP))
5442 break;
5444 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5445 "ips_issue val [0x%x].\n", val);
5446 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5447 "ips_issue semaphore chk timeout.\n");
5449 return (IPS_FAILURE);
5450 } /* end if */
5451 } /* end while */
5453 writel(scb->scb_busaddr, ha->mem_ptr + IPS_REG_CCSAR);
5454 writel(IPS_BIT_START_CMD, ha->mem_ptr + IPS_REG_CCCR);
5456 return (IPS_SUCCESS);
5459 /****************************************************************************/
5460 /* */
5461 /* Routine Name: ips_issue_i2o */
5462 /* */
5463 /* Routine Description: */
5464 /* */
5465 /* Send a command down to the controller */
5466 /* */
5467 /****************************************************************************/
5468 static int
5469 ips_issue_i2o(ips_ha_t * ha, ips_scb_t * scb)
5472 METHOD_TRACE("ips_issue_i2o", 1);
5474 if (scb->scsi_cmd) {
5475 DEBUG_VAR(2, "(%s%d) ips_issue: cmd 0x%X id %d (%d %d %d)",
5476 ips_name,
5477 ha->host_num,
5478 scb->cdb[0],
5479 scb->cmd.basic_io.command_id,
5480 scb->bus, scb->target_id, scb->lun);
5481 } else {
5482 DEBUG_VAR(2, "(%s%d) ips_issue: logical cmd id %d",
5483 ips_name, ha->host_num, scb->cmd.basic_io.command_id);
5486 outl(scb->scb_busaddr, ha->io_addr + IPS_REG_I2O_INMSGQ);
5488 return (IPS_SUCCESS);
5491 /****************************************************************************/
5492 /* */
5493 /* Routine Name: ips_issue_i2o_memio */
5494 /* */
5495 /* Routine Description: */
5496 /* */
5497 /* Send a command down to the controller */
5498 /* */
5499 /****************************************************************************/
5500 static int
5501 ips_issue_i2o_memio(ips_ha_t * ha, ips_scb_t * scb)
5504 METHOD_TRACE("ips_issue_i2o_memio", 1);
5506 if (scb->scsi_cmd) {
5507 DEBUG_VAR(2, "(%s%d) ips_issue: cmd 0x%X id %d (%d %d %d)",
5508 ips_name,
5509 ha->host_num,
5510 scb->cdb[0],
5511 scb->cmd.basic_io.command_id,
5512 scb->bus, scb->target_id, scb->lun);
5513 } else {
5514 DEBUG_VAR(2, "(%s%d) ips_issue: logical cmd id %d",
5515 ips_name, ha->host_num, scb->cmd.basic_io.command_id);
5518 writel(scb->scb_busaddr, ha->mem_ptr + IPS_REG_I2O_INMSGQ);
5520 return (IPS_SUCCESS);
5523 /****************************************************************************/
5524 /* */
5525 /* Routine Name: ips_isintr_copperhead */
5526 /* */
5527 /* Routine Description: */
5528 /* */
5529 /* Test to see if an interrupt is for us */
5530 /* */
5531 /****************************************************************************/
5532 static int
5533 ips_isintr_copperhead(ips_ha_t * ha)
5535 uint8_t Isr;
5537 METHOD_TRACE("ips_isintr_copperhead", 2);
5539 Isr = inb(ha->io_addr + IPS_REG_HISR);
5541 if (Isr == 0xFF)
5542 /* ?!?! Nothing really there */
5543 return (0);
5545 if (Isr & IPS_BIT_SCE)
5546 return (1);
5547 else if (Isr & (IPS_BIT_SQO | IPS_BIT_GHI)) {
5548 /* status queue overflow or GHI */
5549 /* just clear the interrupt */
5550 outb(Isr, ha->io_addr + IPS_REG_HISR);
5553 return (0);
5556 /****************************************************************************/
5557 /* */
5558 /* Routine Name: ips_isintr_copperhead_memio */
5559 /* */
5560 /* Routine Description: */
5561 /* */
5562 /* Test to see if an interrupt is for us */
5563 /* */
5564 /****************************************************************************/
5565 static int
5566 ips_isintr_copperhead_memio(ips_ha_t * ha)
5568 uint8_t Isr;
5570 METHOD_TRACE("ips_isintr_memio", 2);
5572 Isr = readb(ha->mem_ptr + IPS_REG_HISR);
5574 if (Isr == 0xFF)
5575 /* ?!?! Nothing really there */
5576 return (0);
5578 if (Isr & IPS_BIT_SCE)
5579 return (1);
5580 else if (Isr & (IPS_BIT_SQO | IPS_BIT_GHI)) {
5581 /* status queue overflow or GHI */
5582 /* just clear the interrupt */
5583 writeb(Isr, ha->mem_ptr + IPS_REG_HISR);
5586 return (0);
5589 /****************************************************************************/
5590 /* */
5591 /* Routine Name: ips_isintr_morpheus */
5592 /* */
5593 /* Routine Description: */
5594 /* */
5595 /* Test to see if an interrupt is for us */
5596 /* */
5597 /****************************************************************************/
5598 static int
5599 ips_isintr_morpheus(ips_ha_t * ha)
5601 uint32_t Isr;
5603 METHOD_TRACE("ips_isintr_morpheus", 2);
5605 Isr = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
5607 if (Isr & IPS_BIT_I2O_OPQI)
5608 return (1);
5609 else
5610 return (0);
5613 /****************************************************************************/
5614 /* */
5615 /* Routine Name: ips_wait */
5616 /* */
5617 /* Routine Description: */
5618 /* */
5619 /* Wait for a command to complete */
5620 /* */
5621 /****************************************************************************/
5622 static int
5623 ips_wait(ips_ha_t * ha, int time, int intr)
5625 int ret;
5626 int done;
5628 METHOD_TRACE("ips_wait", 1);
5630 ret = IPS_FAILURE;
5631 done = FALSE;
5633 time *= IPS_ONE_SEC; /* convert seconds */
5635 while ((time > 0) && (!done)) {
5636 if (intr == IPS_INTR_ON) {
5637 if (ha->waitflag == FALSE) {
5638 ret = IPS_SUCCESS;
5639 done = TRUE;
5640 break;
5642 } else if (intr == IPS_INTR_IORL) {
5643 if (ha->waitflag == FALSE) {
5645 * controller generated an interrupt to
5646 * acknowledge completion of the command
5647 * and ips_intr() has serviced the interrupt.
5649 ret = IPS_SUCCESS;
5650 done = TRUE;
5651 break;
5655 * NOTE: we already have the io_request_lock so
5656 * even if we get an interrupt it won't get serviced
5657 * until after we finish.
5660 (*ha->func.intr) (ha);
5663 /* This looks like a very evil loop, but it only does this during start-up */
5664 udelay(1000);
5665 time--;
5668 return (ret);
5671 /****************************************************************************/
5672 /* */
5673 /* Routine Name: ips_write_driver_status */
5674 /* */
5675 /* Routine Description: */
5676 /* */
5677 /* Write OS/Driver version to Page 5 of the nvram on the controller */
5678 /* */
5679 /****************************************************************************/
5680 static int
5681 ips_write_driver_status(ips_ha_t * ha, int intr)
5683 METHOD_TRACE("ips_write_driver_status", 1);
5685 if (!ips_readwrite_page5(ha, FALSE, intr)) {
5686 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5687 "unable to read NVRAM page 5.\n");
5689 return (0);
5692 /* check to make sure the page has a valid */
5693 /* signature */
5694 if (le32_to_cpu(ha->nvram->signature) != IPS_NVRAM_P5_SIG) {
5695 DEBUG_VAR(1,
5696 "(%s%d) NVRAM page 5 has an invalid signature: %X.",
5697 ips_name, ha->host_num, ha->nvram->signature);
5698 ha->nvram->signature = IPS_NVRAM_P5_SIG;
5701 DEBUG_VAR(2,
5702 "(%s%d) Ad Type: %d, Ad Slot: %d, BIOS: %c%c%c%c %c%c%c%c.",
5703 ips_name, ha->host_num, le16_to_cpu(ha->nvram->adapter_type),
5704 ha->nvram->adapter_slot, ha->nvram->bios_high[0],
5705 ha->nvram->bios_high[1], ha->nvram->bios_high[2],
5706 ha->nvram->bios_high[3], ha->nvram->bios_low[0],
5707 ha->nvram->bios_low[1], ha->nvram->bios_low[2],
5708 ha->nvram->bios_low[3]);
5710 ips_get_bios_version(ha, intr);
5712 /* change values (as needed) */
5713 ha->nvram->operating_system = IPS_OS_LINUX;
5714 ha->nvram->adapter_type = ha->ad_type;
5715 strncpy((char *) ha->nvram->driver_high, IPS_VERSION_HIGH, 4);
5716 strncpy((char *) ha->nvram->driver_low, IPS_VERSION_LOW, 4);
5717 strncpy((char *) ha->nvram->bios_high, ha->bios_version, 4);
5718 strncpy((char *) ha->nvram->bios_low, ha->bios_version + 4, 4);
5720 ha->nvram->versioning = 0; /* Indicate the Driver Does Not Support Versioning */
5722 /* now update the page */
5723 if (!ips_readwrite_page5(ha, TRUE, intr)) {
5724 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5725 "unable to write NVRAM page 5.\n");
5727 return (0);
5730 /* IF NVRAM Page 5 is OK, Use it for Slot Number Info Because Linux Doesn't Do Slots */
5731 ha->slot_num = ha->nvram->adapter_slot;
5733 return (1);
5736 /****************************************************************************/
5737 /* */
5738 /* Routine Name: ips_read_adapter_status */
5739 /* */
5740 /* Routine Description: */
5741 /* */
5742 /* Do an Inquiry command to the adapter */
5743 /* */
5744 /****************************************************************************/
5745 static int
5746 ips_read_adapter_status(ips_ha_t * ha, int intr)
5748 ips_scb_t *scb;
5749 int ret;
5751 METHOD_TRACE("ips_read_adapter_status", 1);
5753 scb = &ha->scbs[ha->max_cmds - 1];
5755 ips_init_scb(ha, scb);
5757 scb->timeout = ips_cmd_timeout;
5758 scb->cdb[0] = IPS_CMD_ENQUIRY;
5760 scb->cmd.basic_io.op_code = IPS_CMD_ENQUIRY;
5761 scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
5762 scb->cmd.basic_io.sg_count = 0;
5763 scb->cmd.basic_io.lba = 0;
5764 scb->cmd.basic_io.sector_count = 0;
5765 scb->cmd.basic_io.log_drv = 0;
5766 scb->data_len = sizeof (*ha->enq);
5767 scb->cmd.basic_io.sg_addr = ha->enq_busaddr;
5769 /* send command */
5770 if (((ret =
5771 ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5772 || (ret == IPS_SUCCESS_IMM)
5773 || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1))
5774 return (0);
5776 return (1);
5779 /****************************************************************************/
5780 /* */
5781 /* Routine Name: ips_read_subsystem_parameters */
5782 /* */
5783 /* Routine Description: */
5784 /* */
5785 /* Read subsystem parameters from the adapter */
5786 /* */
5787 /****************************************************************************/
5788 static int
5789 ips_read_subsystem_parameters(ips_ha_t * ha, int intr)
5791 ips_scb_t *scb;
5792 int ret;
5794 METHOD_TRACE("ips_read_subsystem_parameters", 1);
5796 scb = &ha->scbs[ha->max_cmds - 1];
5798 ips_init_scb(ha, scb);
5800 scb->timeout = ips_cmd_timeout;
5801 scb->cdb[0] = IPS_CMD_GET_SUBSYS;
5803 scb->cmd.basic_io.op_code = IPS_CMD_GET_SUBSYS;
5804 scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
5805 scb->cmd.basic_io.sg_count = 0;
5806 scb->cmd.basic_io.lba = 0;
5807 scb->cmd.basic_io.sector_count = 0;
5808 scb->cmd.basic_io.log_drv = 0;
5809 scb->data_len = sizeof (*ha->subsys);
5810 scb->cmd.basic_io.sg_addr = ha->ioctl_busaddr;
5812 /* send command */
5813 if (((ret =
5814 ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5815 || (ret == IPS_SUCCESS_IMM)
5816 || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1))
5817 return (0);
5819 memcpy(ha->subsys, ha->ioctl_data, sizeof(*ha->subsys));
5820 return (1);
5823 /****************************************************************************/
5824 /* */
5825 /* Routine Name: ips_read_config */
5826 /* */
5827 /* Routine Description: */
5828 /* */
5829 /* Read the configuration on the adapter */
5830 /* */
5831 /****************************************************************************/
5832 static int
5833 ips_read_config(ips_ha_t * ha, int intr)
5835 ips_scb_t *scb;
5836 int i;
5837 int ret;
5839 METHOD_TRACE("ips_read_config", 1);
5841 /* set defaults for initiator IDs */
5842 for (i = 0; i < 4; i++)
5843 ha->conf->init_id[i] = 7;
5845 scb = &ha->scbs[ha->max_cmds - 1];
5847 ips_init_scb(ha, scb);
5849 scb->timeout = ips_cmd_timeout;
5850 scb->cdb[0] = IPS_CMD_READ_CONF;
5852 scb->cmd.basic_io.op_code = IPS_CMD_READ_CONF;
5853 scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
5854 scb->data_len = sizeof (*ha->conf);
5855 scb->cmd.basic_io.sg_addr = ha->ioctl_busaddr;
5857 /* send command */
5858 if (((ret =
5859 ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5860 || (ret == IPS_SUCCESS_IMM)
5861 || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1)) {
5863 memset(ha->conf, 0, sizeof (IPS_CONF));
5865 /* reset initiator IDs */
5866 for (i = 0; i < 4; i++)
5867 ha->conf->init_id[i] = 7;
5869 /* Allow Completed with Errors, so JCRM can access the Adapter to fix the problems */
5870 if ((scb->basic_status & IPS_GSC_STATUS_MASK) ==
5871 IPS_CMD_CMPLT_WERROR)
5872 return (1);
5874 return (0);
5877 memcpy(ha->conf, ha->ioctl_data, sizeof(*ha->conf));
5878 return (1);
5881 /****************************************************************************/
5882 /* */
5883 /* Routine Name: ips_readwrite_page5 */
5884 /* */
5885 /* Routine Description: */
5886 /* */
5887 /* Read nvram page 5 from the adapter */
5888 /* */
5889 /****************************************************************************/
5890 static int
5891 ips_readwrite_page5(ips_ha_t * ha, int write, int intr)
5893 ips_scb_t *scb;
5894 int ret;
5896 METHOD_TRACE("ips_readwrite_page5", 1);
5898 scb = &ha->scbs[ha->max_cmds - 1];
5900 ips_init_scb(ha, scb);
5902 scb->timeout = ips_cmd_timeout;
5903 scb->cdb[0] = IPS_CMD_RW_NVRAM_PAGE;
5905 scb->cmd.nvram.op_code = IPS_CMD_RW_NVRAM_PAGE;
5906 scb->cmd.nvram.command_id = IPS_COMMAND_ID(ha, scb);
5907 scb->cmd.nvram.page = 5;
5908 scb->cmd.nvram.write = write;
5909 scb->cmd.nvram.reserved = 0;
5910 scb->cmd.nvram.reserved2 = 0;
5911 scb->data_len = sizeof (*ha->nvram);
5912 scb->cmd.nvram.buffer_addr = ha->ioctl_busaddr;
5913 if (write)
5914 memcpy(ha->ioctl_data, ha->nvram, sizeof(*ha->nvram));
5916 /* issue the command */
5917 if (((ret =
5918 ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5919 || (ret == IPS_SUCCESS_IMM)
5920 || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1)) {
5922 memset(ha->nvram, 0, sizeof (IPS_NVRAM_P5));
5924 return (0);
5926 if (!write)
5927 memcpy(ha->nvram, ha->ioctl_data, sizeof(*ha->nvram));
5928 return (1);
5931 /****************************************************************************/
5932 /* */
5933 /* Routine Name: ips_clear_adapter */
5934 /* */
5935 /* Routine Description: */
5936 /* */
5937 /* Clear the stripe lock tables */
5938 /* */
5939 /****************************************************************************/
5940 static int
5941 ips_clear_adapter(ips_ha_t * ha, int intr)
5943 ips_scb_t *scb;
5944 int ret;
5946 METHOD_TRACE("ips_clear_adapter", 1);
5948 scb = &ha->scbs[ha->max_cmds - 1];
5950 ips_init_scb(ha, scb);
5952 scb->timeout = ips_reset_timeout;
5953 scb->cdb[0] = IPS_CMD_CONFIG_SYNC;
5955 scb->cmd.config_sync.op_code = IPS_CMD_CONFIG_SYNC;
5956 scb->cmd.config_sync.command_id = IPS_COMMAND_ID(ha, scb);
5957 scb->cmd.config_sync.channel = 0;
5958 scb->cmd.config_sync.source_target = IPS_POCL;
5959 scb->cmd.config_sync.reserved = 0;
5960 scb->cmd.config_sync.reserved2 = 0;
5961 scb->cmd.config_sync.reserved3 = 0;
5963 /* issue command */
5964 if (((ret =
5965 ips_send_wait(ha, scb, ips_reset_timeout, intr)) == IPS_FAILURE)
5966 || (ret == IPS_SUCCESS_IMM)
5967 || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1))
5968 return (0);
5970 /* send unlock stripe command */
5971 ips_init_scb(ha, scb);
5973 scb->cdb[0] = IPS_CMD_ERROR_TABLE;
5974 scb->timeout = ips_reset_timeout;
5976 scb->cmd.unlock_stripe.op_code = IPS_CMD_ERROR_TABLE;
5977 scb->cmd.unlock_stripe.command_id = IPS_COMMAND_ID(ha, scb);
5978 scb->cmd.unlock_stripe.log_drv = 0;
5979 scb->cmd.unlock_stripe.control = IPS_CSL;
5980 scb->cmd.unlock_stripe.reserved = 0;
5981 scb->cmd.unlock_stripe.reserved2 = 0;
5982 scb->cmd.unlock_stripe.reserved3 = 0;
5984 /* issue command */
5985 if (((ret =
5986 ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5987 || (ret == IPS_SUCCESS_IMM)
5988 || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1))
5989 return (0);
5991 return (1);
5994 /****************************************************************************/
5995 /* */
5996 /* Routine Name: ips_ffdc_reset */
5997 /* */
5998 /* Routine Description: */
5999 /* */
6000 /* FFDC: write reset info */
6001 /* */
6002 /****************************************************************************/
6003 static void
6004 ips_ffdc_reset(ips_ha_t * ha, int intr)
6006 ips_scb_t *scb;
6008 METHOD_TRACE("ips_ffdc_reset", 1);
6010 scb = &ha->scbs[ha->max_cmds - 1];
6012 ips_init_scb(ha, scb);
6014 scb->timeout = ips_cmd_timeout;
6015 scb->cdb[0] = IPS_CMD_FFDC;
6016 scb->cmd.ffdc.op_code = IPS_CMD_FFDC;
6017 scb->cmd.ffdc.command_id = IPS_COMMAND_ID(ha, scb);
6018 scb->cmd.ffdc.reset_count = ha->reset_count;
6019 scb->cmd.ffdc.reset_type = 0x80;
6021 /* convert time to what the card wants */
6022 ips_fix_ffdc_time(ha, scb, ha->last_ffdc);
6024 /* issue command */
6025 ips_send_wait(ha, scb, ips_cmd_timeout, intr);
6028 /****************************************************************************/
6029 /* */
6030 /* Routine Name: ips_ffdc_time */
6031 /* */
6032 /* Routine Description: */
6033 /* */
6034 /* FFDC: write time info */
6035 /* */
6036 /****************************************************************************/
6037 static void
6038 ips_ffdc_time(ips_ha_t * ha)
6040 ips_scb_t *scb;
6042 METHOD_TRACE("ips_ffdc_time", 1);
6044 DEBUG_VAR(1, "(%s%d) Sending time update.", ips_name, ha->host_num);
6046 scb = &ha->scbs[ha->max_cmds - 1];
6048 ips_init_scb(ha, scb);
6050 scb->timeout = ips_cmd_timeout;
6051 scb->cdb[0] = IPS_CMD_FFDC;
6052 scb->cmd.ffdc.op_code = IPS_CMD_FFDC;
6053 scb->cmd.ffdc.command_id = IPS_COMMAND_ID(ha, scb);
6054 scb->cmd.ffdc.reset_count = 0;
6055 scb->cmd.ffdc.reset_type = 0;
6057 /* convert time to what the card wants */
6058 ips_fix_ffdc_time(ha, scb, ha->last_ffdc);
6060 /* issue command */
6061 ips_send_wait(ha, scb, ips_cmd_timeout, IPS_FFDC);
6064 /****************************************************************************/
6065 /* */
6066 /* Routine Name: ips_fix_ffdc_time */
6067 /* */
6068 /* Routine Description: */
6069 /* Adjust time_t to what the card wants */
6070 /* */
6071 /****************************************************************************/
6072 static void
6073 ips_fix_ffdc_time(ips_ha_t * ha, ips_scb_t * scb, time_t current_time)
6075 long days;
6076 long rem;
6077 int i;
6078 int year;
6079 int yleap;
6080 int year_lengths[2] = { IPS_DAYS_NORMAL_YEAR, IPS_DAYS_LEAP_YEAR };
6081 int month_lengths[12][2] = { {31, 31},
6082 {28, 29},
6083 {31, 31},
6084 {30, 30},
6085 {31, 31},
6086 {30, 30},
6087 {31, 31},
6088 {31, 31},
6089 {30, 30},
6090 {31, 31},
6091 {30, 30},
6092 {31, 31}
6095 METHOD_TRACE("ips_fix_ffdc_time", 1);
6097 days = current_time / IPS_SECS_DAY;
6098 rem = current_time % IPS_SECS_DAY;
6100 scb->cmd.ffdc.hour = (rem / IPS_SECS_HOUR);
6101 rem = rem % IPS_SECS_HOUR;
6102 scb->cmd.ffdc.minute = (rem / IPS_SECS_MIN);
6103 scb->cmd.ffdc.second = (rem % IPS_SECS_MIN);
6105 year = IPS_EPOCH_YEAR;
6106 while (days < 0 || days >= year_lengths[yleap = IPS_IS_LEAP_YEAR(year)]) {
6107 int newy;
6109 newy = year + (days / IPS_DAYS_NORMAL_YEAR);
6110 if (days < 0)
6111 --newy;
6112 days -= (newy - year) * IPS_DAYS_NORMAL_YEAR +
6113 IPS_NUM_LEAP_YEARS_THROUGH(newy - 1) -
6114 IPS_NUM_LEAP_YEARS_THROUGH(year - 1);
6115 year = newy;
6118 scb->cmd.ffdc.yearH = year / 100;
6119 scb->cmd.ffdc.yearL = year % 100;
6121 for (i = 0; days >= month_lengths[i][yleap]; ++i)
6122 days -= month_lengths[i][yleap];
6124 scb->cmd.ffdc.month = i + 1;
6125 scb->cmd.ffdc.day = days + 1;
6128 /****************************************************************************
6129 * BIOS Flash Routines *
6130 ****************************************************************************/
6132 /****************************************************************************/
6133 /* */
6134 /* Routine Name: ips_erase_bios */
6135 /* */
6136 /* Routine Description: */
6137 /* Erase the BIOS on the adapter */
6138 /* */
6139 /****************************************************************************/
6140 static int
6141 ips_erase_bios(ips_ha_t * ha)
6143 int timeout;
6144 uint8_t status = 0;
6146 METHOD_TRACE("ips_erase_bios", 1);
6148 status = 0;
6150 /* Clear the status register */
6151 outl(0, ha->io_addr + IPS_REG_FLAP);
6152 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6153 udelay(25); /* 25 us */
6155 outb(0x50, ha->io_addr + IPS_REG_FLDP);
6156 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6157 udelay(25); /* 25 us */
6159 /* Erase Setup */
6160 outb(0x20, ha->io_addr + IPS_REG_FLDP);
6161 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6162 udelay(25); /* 25 us */
6164 /* Erase Confirm */
6165 outb(0xD0, ha->io_addr + IPS_REG_FLDP);
6166 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6167 udelay(25); /* 25 us */
6169 /* Erase Status */
6170 outb(0x70, ha->io_addr + IPS_REG_FLDP);
6171 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6172 udelay(25); /* 25 us */
6174 timeout = 80000; /* 80 seconds */
6176 while (timeout > 0) {
6177 if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6178 outl(0, ha->io_addr + IPS_REG_FLAP);
6179 udelay(25); /* 25 us */
6182 status = inb(ha->io_addr + IPS_REG_FLDP);
6184 if (status & 0x80)
6185 break;
6187 MDELAY(1);
6188 timeout--;
6191 /* check for timeout */
6192 if (timeout <= 0) {
6193 /* timeout */
6195 /* try to suspend the erase */
6196 outb(0xB0, ha->io_addr + IPS_REG_FLDP);
6197 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6198 udelay(25); /* 25 us */
6200 /* wait for 10 seconds */
6201 timeout = 10000;
6202 while (timeout > 0) {
6203 if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6204 outl(0, ha->io_addr + IPS_REG_FLAP);
6205 udelay(25); /* 25 us */
6208 status = inb(ha->io_addr + IPS_REG_FLDP);
6210 if (status & 0xC0)
6211 break;
6213 MDELAY(1);
6214 timeout--;
6217 return (1);
6220 /* check for valid VPP */
6221 if (status & 0x08)
6222 /* VPP failure */
6223 return (1);
6225 /* check for successful flash */
6226 if (status & 0x30)
6227 /* sequence error */
6228 return (1);
6230 /* Otherwise, we were successful */
6231 /* clear status */
6232 outb(0x50, ha->io_addr + IPS_REG_FLDP);
6233 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6234 udelay(25); /* 25 us */
6236 /* enable reads */
6237 outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6238 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6239 udelay(25); /* 25 us */
6241 return (0);
6244 /****************************************************************************/
6245 /* */
6246 /* Routine Name: ips_erase_bios_memio */
6247 /* */
6248 /* Routine Description: */
6249 /* Erase the BIOS on the adapter */
6250 /* */
6251 /****************************************************************************/
6252 static int
6253 ips_erase_bios_memio(ips_ha_t * ha)
6255 int timeout;
6256 uint8_t status;
6258 METHOD_TRACE("ips_erase_bios_memio", 1);
6260 status = 0;
6262 /* Clear the status register */
6263 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6264 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6265 udelay(25); /* 25 us */
6267 writeb(0x50, ha->mem_ptr + IPS_REG_FLDP);
6268 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6269 udelay(25); /* 25 us */
6271 /* Erase Setup */
6272 writeb(0x20, ha->mem_ptr + IPS_REG_FLDP);
6273 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6274 udelay(25); /* 25 us */
6276 /* Erase Confirm */
6277 writeb(0xD0, ha->mem_ptr + IPS_REG_FLDP);
6278 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6279 udelay(25); /* 25 us */
6281 /* Erase Status */
6282 writeb(0x70, ha->mem_ptr + IPS_REG_FLDP);
6283 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6284 udelay(25); /* 25 us */
6286 timeout = 80000; /* 80 seconds */
6288 while (timeout > 0) {
6289 if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6290 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6291 udelay(25); /* 25 us */
6294 status = readb(ha->mem_ptr + IPS_REG_FLDP);
6296 if (status & 0x80)
6297 break;
6299 MDELAY(1);
6300 timeout--;
6303 /* check for timeout */
6304 if (timeout <= 0) {
6305 /* timeout */
6307 /* try to suspend the erase */
6308 writeb(0xB0, ha->mem_ptr + IPS_REG_FLDP);
6309 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6310 udelay(25); /* 25 us */
6312 /* wait for 10 seconds */
6313 timeout = 10000;
6314 while (timeout > 0) {
6315 if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6316 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6317 udelay(25); /* 25 us */
6320 status = readb(ha->mem_ptr + IPS_REG_FLDP);
6322 if (status & 0xC0)
6323 break;
6325 MDELAY(1);
6326 timeout--;
6329 return (1);
6332 /* check for valid VPP */
6333 if (status & 0x08)
6334 /* VPP failure */
6335 return (1);
6337 /* check for successful flash */
6338 if (status & 0x30)
6339 /* sequence error */
6340 return (1);
6342 /* Otherwise, we were successful */
6343 /* clear status */
6344 writeb(0x50, ha->mem_ptr + IPS_REG_FLDP);
6345 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6346 udelay(25); /* 25 us */
6348 /* enable reads */
6349 writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6350 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6351 udelay(25); /* 25 us */
6353 return (0);
6356 /****************************************************************************/
6357 /* */
6358 /* Routine Name: ips_program_bios */
6359 /* */
6360 /* Routine Description: */
6361 /* Program the BIOS on the adapter */
6362 /* */
6363 /****************************************************************************/
6364 static int
6365 ips_program_bios(ips_ha_t * ha, char *buffer, uint32_t buffersize,
6366 uint32_t offset)
6368 int i;
6369 int timeout;
6370 uint8_t status = 0;
6372 METHOD_TRACE("ips_program_bios", 1);
6374 status = 0;
6376 for (i = 0; i < buffersize; i++) {
6377 /* write a byte */
6378 outl(i + offset, ha->io_addr + IPS_REG_FLAP);
6379 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6380 udelay(25); /* 25 us */
6382 outb(0x40, ha->io_addr + IPS_REG_FLDP);
6383 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6384 udelay(25); /* 25 us */
6386 outb(buffer[i], ha->io_addr + IPS_REG_FLDP);
6387 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6388 udelay(25); /* 25 us */
6390 /* wait up to one second */
6391 timeout = 1000;
6392 while (timeout > 0) {
6393 if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6394 outl(0, ha->io_addr + IPS_REG_FLAP);
6395 udelay(25); /* 25 us */
6398 status = inb(ha->io_addr + IPS_REG_FLDP);
6400 if (status & 0x80)
6401 break;
6403 MDELAY(1);
6404 timeout--;
6407 if (timeout == 0) {
6408 /* timeout error */
6409 outl(0, ha->io_addr + IPS_REG_FLAP);
6410 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6411 udelay(25); /* 25 us */
6413 outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6414 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6415 udelay(25); /* 25 us */
6417 return (1);
6420 /* check the status */
6421 if (status & 0x18) {
6422 /* programming error */
6423 outl(0, ha->io_addr + IPS_REG_FLAP);
6424 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6425 udelay(25); /* 25 us */
6427 outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6428 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6429 udelay(25); /* 25 us */
6431 return (1);
6433 } /* end for */
6435 /* Enable reading */
6436 outl(0, ha->io_addr + IPS_REG_FLAP);
6437 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6438 udelay(25); /* 25 us */
6440 outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6441 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6442 udelay(25); /* 25 us */
6444 return (0);
6447 /****************************************************************************/
6448 /* */
6449 /* Routine Name: ips_program_bios_memio */
6450 /* */
6451 /* Routine Description: */
6452 /* Program the BIOS on the adapter */
6453 /* */
6454 /****************************************************************************/
6455 static int
6456 ips_program_bios_memio(ips_ha_t * ha, char *buffer, uint32_t buffersize,
6457 uint32_t offset)
6459 int i;
6460 int timeout;
6461 uint8_t status = 0;
6463 METHOD_TRACE("ips_program_bios_memio", 1);
6465 status = 0;
6467 for (i = 0; i < buffersize; i++) {
6468 /* write a byte */
6469 writel(i + offset, ha->mem_ptr + IPS_REG_FLAP);
6470 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6471 udelay(25); /* 25 us */
6473 writeb(0x40, ha->mem_ptr + IPS_REG_FLDP);
6474 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6475 udelay(25); /* 25 us */
6477 writeb(buffer[i], ha->mem_ptr + IPS_REG_FLDP);
6478 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6479 udelay(25); /* 25 us */
6481 /* wait up to one second */
6482 timeout = 1000;
6483 while (timeout > 0) {
6484 if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6485 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6486 udelay(25); /* 25 us */
6489 status = readb(ha->mem_ptr + IPS_REG_FLDP);
6491 if (status & 0x80)
6492 break;
6494 MDELAY(1);
6495 timeout--;
6498 if (timeout == 0) {
6499 /* timeout error */
6500 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6501 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6502 udelay(25); /* 25 us */
6504 writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6505 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6506 udelay(25); /* 25 us */
6508 return (1);
6511 /* check the status */
6512 if (status & 0x18) {
6513 /* programming error */
6514 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6515 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6516 udelay(25); /* 25 us */
6518 writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6519 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6520 udelay(25); /* 25 us */
6522 return (1);
6524 } /* end for */
6526 /* Enable reading */
6527 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6528 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6529 udelay(25); /* 25 us */
6531 writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6532 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6533 udelay(25); /* 25 us */
6535 return (0);
6538 /****************************************************************************/
6539 /* */
6540 /* Routine Name: ips_verify_bios */
6541 /* */
6542 /* Routine Description: */
6543 /* Verify the BIOS on the adapter */
6544 /* */
6545 /****************************************************************************/
6546 static int
6547 ips_verify_bios(ips_ha_t * ha, char *buffer, uint32_t buffersize,
6548 uint32_t offset)
6550 uint8_t checksum;
6551 int i;
6553 METHOD_TRACE("ips_verify_bios", 1);
6555 /* test 1st byte */
6556 outl(0, ha->io_addr + IPS_REG_FLAP);
6557 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6558 udelay(25); /* 25 us */
6560 if (inb(ha->io_addr + IPS_REG_FLDP) != 0x55)
6561 return (1);
6563 outl(1, ha->io_addr + IPS_REG_FLAP);
6564 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6565 udelay(25); /* 25 us */
6566 if (inb(ha->io_addr + IPS_REG_FLDP) != 0xAA)
6567 return (1);
6569 checksum = 0xff;
6570 for (i = 2; i < buffersize; i++) {
6572 outl(i + offset, ha->io_addr + IPS_REG_FLAP);
6573 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6574 udelay(25); /* 25 us */
6576 checksum = (uint8_t) checksum + inb(ha->io_addr + IPS_REG_FLDP);
6579 if (checksum != 0)
6580 /* failure */
6581 return (1);
6582 else
6583 /* success */
6584 return (0);
6587 /****************************************************************************/
6588 /* */
6589 /* Routine Name: ips_verify_bios_memio */
6590 /* */
6591 /* Routine Description: */
6592 /* Verify the BIOS on the adapter */
6593 /* */
6594 /****************************************************************************/
6595 static int
6596 ips_verify_bios_memio(ips_ha_t * ha, char *buffer, uint32_t buffersize,
6597 uint32_t offset)
6599 uint8_t checksum;
6600 int i;
6602 METHOD_TRACE("ips_verify_bios_memio", 1);
6604 /* test 1st byte */
6605 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6606 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6607 udelay(25); /* 25 us */
6609 if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0x55)
6610 return (1);
6612 writel(1, ha->mem_ptr + IPS_REG_FLAP);
6613 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6614 udelay(25); /* 25 us */
6615 if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0xAA)
6616 return (1);
6618 checksum = 0xff;
6619 for (i = 2; i < buffersize; i++) {
6621 writel(i + offset, ha->mem_ptr + IPS_REG_FLAP);
6622 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6623 udelay(25); /* 25 us */
6625 checksum =
6626 (uint8_t) checksum + readb(ha->mem_ptr + IPS_REG_FLDP);
6629 if (checksum != 0)
6630 /* failure */
6631 return (1);
6632 else
6633 /* success */
6634 return (0);
6637 /****************************************************************************/
6638 /* */
6639 /* Routine Name: ips_abort_init */
6640 /* */
6641 /* Routine Description: */
6642 /* cleanup routine for a failed adapter initialization */
6643 /****************************************************************************/
6644 static int
6645 ips_abort_init(ips_ha_t * ha, int index)
6647 ha->active = 0;
6648 ips_free(ha);
6649 ips_ha[index] = NULL;
6650 ips_sh[index] = NULL;
6651 return -1;
6654 /****************************************************************************/
6655 /* */
6656 /* Routine Name: ips_shift_controllers */
6657 /* */
6658 /* Routine Description: */
6659 /* helper function for ordering adapters */
6660 /****************************************************************************/
6661 static void
6662 ips_shift_controllers(int lowindex, int highindex)
6664 ips_ha_t *ha_sav = ips_ha[highindex];
6665 struct Scsi_Host *sh_sav = ips_sh[highindex];
6666 int i;
6668 for (i = highindex; i > lowindex; i--) {
6669 ips_ha[i] = ips_ha[i - 1];
6670 ips_sh[i] = ips_sh[i - 1];
6671 ips_ha[i]->host_num = i;
6673 ha_sav->host_num = lowindex;
6674 ips_ha[lowindex] = ha_sav;
6675 ips_sh[lowindex] = sh_sav;
6678 /****************************************************************************/
6679 /* */
6680 /* Routine Name: ips_order_controllers */
6681 /* */
6682 /* Routine Description: */
6683 /* place controllers is the "proper" boot order */
6684 /****************************************************************************/
6685 static void
6686 ips_order_controllers(void)
6688 int i, j, tmp, position = 0;
6689 IPS_NVRAM_P5 *nvram;
6690 if (!ips_ha[0])
6691 return;
6692 nvram = ips_ha[0]->nvram;
6694 if (nvram->adapter_order[0]) {
6695 for (i = 1; i <= nvram->adapter_order[0]; i++) {
6696 for (j = position; j < ips_num_controllers; j++) {
6697 switch (ips_ha[j]->ad_type) {
6698 case IPS_ADTYPE_SERVERAID6M:
6699 case IPS_ADTYPE_SERVERAID7M:
6700 if (nvram->adapter_order[i] == 'M') {
6701 ips_shift_controllers(position,
6703 position++;
6705 break;
6706 case IPS_ADTYPE_SERVERAID4L:
6707 case IPS_ADTYPE_SERVERAID4M:
6708 case IPS_ADTYPE_SERVERAID4MX:
6709 case IPS_ADTYPE_SERVERAID4LX:
6710 if (nvram->adapter_order[i] == 'N') {
6711 ips_shift_controllers(position,
6713 position++;
6715 break;
6716 case IPS_ADTYPE_SERVERAID6I:
6717 case IPS_ADTYPE_SERVERAID5I2:
6718 case IPS_ADTYPE_SERVERAID5I1:
6719 case IPS_ADTYPE_SERVERAID7k:
6720 if (nvram->adapter_order[i] == 'S') {
6721 ips_shift_controllers(position,
6723 position++;
6725 break;
6726 case IPS_ADTYPE_SERVERAID:
6727 case IPS_ADTYPE_SERVERAID2:
6728 case IPS_ADTYPE_NAVAJO:
6729 case IPS_ADTYPE_KIOWA:
6730 case IPS_ADTYPE_SERVERAID3L:
6731 case IPS_ADTYPE_SERVERAID3:
6732 case IPS_ADTYPE_SERVERAID4H:
6733 if (nvram->adapter_order[i] == 'A') {
6734 ips_shift_controllers(position,
6736 position++;
6738 break;
6739 default:
6740 break;
6744 /* if adapter_order[0], then ordering is complete */
6745 return;
6747 /* old bios, use older ordering */
6748 tmp = 0;
6749 for (i = position; i < ips_num_controllers; i++) {
6750 if (ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID5I2 ||
6751 ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID5I1) {
6752 ips_shift_controllers(position, i);
6753 position++;
6754 tmp = 1;
6757 /* if there were no 5I cards, then don't do any extra ordering */
6758 if (!tmp)
6759 return;
6760 for (i = position; i < ips_num_controllers; i++) {
6761 if (ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID4L ||
6762 ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID4M ||
6763 ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID4LX ||
6764 ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID4MX) {
6765 ips_shift_controllers(position, i);
6766 position++;
6770 return;
6773 /****************************************************************************/
6774 /* */
6775 /* Routine Name: ips_register_scsi */
6776 /* */
6777 /* Routine Description: */
6778 /* perform any registration and setup with the scsi layer */
6779 /****************************************************************************/
6780 static int
6781 ips_register_scsi(int index)
6783 struct Scsi_Host *sh;
6784 ips_ha_t *ha, *oldha = ips_ha[index];
6785 sh = scsi_host_alloc(&ips_driver_template, sizeof (ips_ha_t));
6786 if (!sh) {
6787 IPS_PRINTK(KERN_WARNING, oldha->pcidev,
6788 "Unable to register controller with SCSI subsystem\n");
6789 return -1;
6791 ha = IPS_HA(sh);
6792 memcpy(ha, oldha, sizeof (ips_ha_t));
6793 free_irq(oldha->pcidev->irq, oldha);
6794 /* Install the interrupt handler with the new ha */
6795 if (request_irq(ha->pcidev->irq, do_ipsintr, IRQF_SHARED, ips_name, ha)) {
6796 IPS_PRINTK(KERN_WARNING, ha->pcidev,
6797 "Unable to install interrupt handler\n");
6798 goto err_out_sh;
6801 kfree(oldha);
6803 /* Store away needed values for later use */
6804 sh->unique_id = (ha->io_addr) ? ha->io_addr : ha->mem_addr;
6805 sh->sg_tablesize = sh->hostt->sg_tablesize;
6806 sh->can_queue = sh->hostt->can_queue;
6807 sh->cmd_per_lun = sh->hostt->cmd_per_lun;
6808 sh->use_clustering = sh->hostt->use_clustering;
6809 sh->max_sectors = 128;
6811 sh->max_id = ha->ntargets;
6812 sh->max_lun = ha->nlun;
6813 sh->max_channel = ha->nbus - 1;
6814 sh->can_queue = ha->max_cmds - 1;
6816 if (scsi_add_host(sh, &ha->pcidev->dev))
6817 goto err_out;
6819 ips_sh[index] = sh;
6820 ips_ha[index] = ha;
6822 scsi_scan_host(sh);
6824 return 0;
6826 err_out:
6827 free_irq(ha->pcidev->irq, ha);
6828 err_out_sh:
6829 scsi_host_put(sh);
6830 return -1;
6833 /*---------------------------------------------------------------------------*/
6834 /* Routine Name: ips_remove_device */
6835 /* */
6836 /* Routine Description: */
6837 /* Remove one Adapter ( Hot Plugging ) */
6838 /*---------------------------------------------------------------------------*/
6839 static void __devexit
6840 ips_remove_device(struct pci_dev *pci_dev)
6842 struct Scsi_Host *sh = pci_get_drvdata(pci_dev);
6844 pci_set_drvdata(pci_dev, NULL);
6846 ips_release(sh);
6848 pci_release_regions(pci_dev);
6849 pci_disable_device(pci_dev);
6852 /****************************************************************************/
6853 /* */
6854 /* Routine Name: ips_module_init */
6855 /* */
6856 /* Routine Description: */
6857 /* function called on module load */
6858 /****************************************************************************/
6859 static int __init
6860 ips_module_init(void)
6862 if (pci_register_driver(&ips_pci_driver) < 0)
6863 return -ENODEV;
6864 ips_driver_template.module = THIS_MODULE;
6865 ips_order_controllers();
6866 if (!ips_detect(&ips_driver_template)) {
6867 pci_unregister_driver(&ips_pci_driver);
6868 return -ENODEV;
6870 register_reboot_notifier(&ips_notifier);
6871 return 0;
6874 /****************************************************************************/
6875 /* */
6876 /* Routine Name: ips_module_exit */
6877 /* */
6878 /* Routine Description: */
6879 /* function called on module unload */
6880 /****************************************************************************/
6881 static void __exit
6882 ips_module_exit(void)
6884 pci_unregister_driver(&ips_pci_driver);
6885 unregister_reboot_notifier(&ips_notifier);
6888 module_init(ips_module_init);
6889 module_exit(ips_module_exit);
6891 /*---------------------------------------------------------------------------*/
6892 /* Routine Name: ips_insert_device */
6893 /* */
6894 /* Routine Description: */
6895 /* Add One Adapter ( Hot Plug ) */
6896 /* */
6897 /* Return Value: */
6898 /* 0 if Successful, else non-zero */
6899 /*---------------------------------------------------------------------------*/
6900 static int __devinit
6901 ips_insert_device(struct pci_dev *pci_dev, const struct pci_device_id *ent)
6903 int index = -1;
6904 int rc;
6906 METHOD_TRACE("ips_insert_device", 1);
6907 rc = pci_enable_device(pci_dev);
6908 if (rc)
6909 return rc;
6911 rc = pci_request_regions(pci_dev, "ips");
6912 if (rc)
6913 goto err_out;
6915 rc = ips_init_phase1(pci_dev, &index);
6916 if (rc == SUCCESS)
6917 rc = ips_init_phase2(index);
6919 if (ips_hotplug)
6920 if (ips_register_scsi(index)) {
6921 ips_free(ips_ha[index]);
6922 rc = -1;
6925 if (rc == SUCCESS)
6926 ips_num_controllers++;
6928 ips_next_controller = ips_num_controllers;
6930 if (rc < 0) {
6931 rc = -ENODEV;
6932 goto err_out_regions;
6935 pci_set_drvdata(pci_dev, ips_sh[index]);
6936 return 0;
6938 err_out_regions:
6939 pci_release_regions(pci_dev);
6940 err_out:
6941 pci_disable_device(pci_dev);
6942 return rc;
6945 /*---------------------------------------------------------------------------*/
6946 /* Routine Name: ips_init_phase1 */
6947 /* */
6948 /* Routine Description: */
6949 /* Adapter Initialization */
6950 /* */
6951 /* Return Value: */
6952 /* 0 if Successful, else non-zero */
6953 /*---------------------------------------------------------------------------*/
6954 static int
6955 ips_init_phase1(struct pci_dev *pci_dev, int *indexPtr)
6957 ips_ha_t *ha;
6958 uint32_t io_addr;
6959 uint32_t mem_addr;
6960 uint32_t io_len;
6961 uint32_t mem_len;
6962 uint8_t bus;
6963 uint8_t func;
6964 int j;
6965 int index;
6966 dma_addr_t dma_address;
6967 char __iomem *ioremap_ptr;
6968 char __iomem *mem_ptr;
6969 uint32_t IsDead;
6971 METHOD_TRACE("ips_init_phase1", 1);
6972 index = IPS_MAX_ADAPTERS;
6973 for (j = 0; j < IPS_MAX_ADAPTERS; j++) {
6974 if (ips_ha[j] == NULL) {
6975 index = j;
6976 break;
6980 if (index >= IPS_MAX_ADAPTERS)
6981 return -1;
6983 /* stuff that we get in dev */
6984 bus = pci_dev->bus->number;
6985 func = pci_dev->devfn;
6987 /* Init MEM/IO addresses to 0 */
6988 mem_addr = 0;
6989 io_addr = 0;
6990 mem_len = 0;
6991 io_len = 0;
6993 for (j = 0; j < 2; j++) {
6994 if (!pci_resource_start(pci_dev, j))
6995 break;
6997 if (pci_resource_flags(pci_dev, j) & IORESOURCE_IO) {
6998 io_addr = pci_resource_start(pci_dev, j);
6999 io_len = pci_resource_len(pci_dev, j);
7000 } else {
7001 mem_addr = pci_resource_start(pci_dev, j);
7002 mem_len = pci_resource_len(pci_dev, j);
7006 /* setup memory mapped area (if applicable) */
7007 if (mem_addr) {
7008 uint32_t base;
7009 uint32_t offs;
7011 base = mem_addr & PAGE_MASK;
7012 offs = mem_addr - base;
7013 ioremap_ptr = ioremap(base, PAGE_SIZE);
7014 if (!ioremap_ptr)
7015 return -1;
7016 mem_ptr = ioremap_ptr + offs;
7017 } else {
7018 ioremap_ptr = NULL;
7019 mem_ptr = NULL;
7022 /* found a controller */
7023 ha = kzalloc(sizeof (ips_ha_t), GFP_KERNEL);
7024 if (ha == NULL) {
7025 IPS_PRINTK(KERN_WARNING, pci_dev,
7026 "Unable to allocate temporary ha struct\n");
7027 return -1;
7030 ips_sh[index] = NULL;
7031 ips_ha[index] = ha;
7032 ha->active = 1;
7034 /* Store info in HA structure */
7035 ha->io_addr = io_addr;
7036 ha->io_len = io_len;
7037 ha->mem_addr = mem_addr;
7038 ha->mem_len = mem_len;
7039 ha->mem_ptr = mem_ptr;
7040 ha->ioremap_ptr = ioremap_ptr;
7041 ha->host_num = (uint32_t) index;
7042 ha->slot_num = PCI_SLOT(pci_dev->devfn);
7043 ha->pcidev = pci_dev;
7046 * Set the pci_dev's dma_mask. Not all adapters support 64bit
7047 * addressing so don't enable it if the adapter can't support
7048 * it! Also, don't use 64bit addressing if dma addresses
7049 * are guaranteed to be < 4G.
7051 if (IPS_ENABLE_DMA64 && IPS_HAS_ENH_SGLIST(ha) &&
7052 !pci_set_dma_mask(ha->pcidev, DMA_64BIT_MASK)) {
7053 (ha)->flags |= IPS_HA_ENH_SG;
7054 } else {
7055 if (pci_set_dma_mask(ha->pcidev, DMA_32BIT_MASK) != 0) {
7056 printk(KERN_WARNING "Unable to set DMA Mask\n");
7057 return ips_abort_init(ha, index);
7060 if(ips_cd_boot && !ips_FlashData){
7061 ips_FlashData = pci_alloc_consistent(pci_dev, PAGE_SIZE << 7,
7062 &ips_flashbusaddr);
7065 ha->enq = pci_alloc_consistent(pci_dev, sizeof (IPS_ENQ),
7066 &ha->enq_busaddr);
7067 if (!ha->enq) {
7068 IPS_PRINTK(KERN_WARNING, pci_dev,
7069 "Unable to allocate host inquiry structure\n");
7070 return ips_abort_init(ha, index);
7073 ha->adapt = pci_alloc_consistent(pci_dev, sizeof (IPS_ADAPTER) +
7074 sizeof (IPS_IO_CMD), &dma_address);
7075 if (!ha->adapt) {
7076 IPS_PRINTK(KERN_WARNING, pci_dev,
7077 "Unable to allocate host adapt & dummy structures\n");
7078 return ips_abort_init(ha, index);
7080 ha->adapt->hw_status_start = dma_address;
7081 ha->dummy = (void *) (ha->adapt + 1);
7085 ha->logical_drive_info = pci_alloc_consistent(pci_dev, sizeof (IPS_LD_INFO), &dma_address);
7086 if (!ha->logical_drive_info) {
7087 IPS_PRINTK(KERN_WARNING, pci_dev,
7088 "Unable to allocate logical drive info structure\n");
7089 return ips_abort_init(ha, index);
7091 ha->logical_drive_info_dma_addr = dma_address;
7094 ha->conf = kmalloc(sizeof (IPS_CONF), GFP_KERNEL);
7096 if (!ha->conf) {
7097 IPS_PRINTK(KERN_WARNING, pci_dev,
7098 "Unable to allocate host conf structure\n");
7099 return ips_abort_init(ha, index);
7102 ha->nvram = kmalloc(sizeof (IPS_NVRAM_P5), GFP_KERNEL);
7104 if (!ha->nvram) {
7105 IPS_PRINTK(KERN_WARNING, pci_dev,
7106 "Unable to allocate host NVRAM structure\n");
7107 return ips_abort_init(ha, index);
7110 ha->subsys = kmalloc(sizeof (IPS_SUBSYS), GFP_KERNEL);
7112 if (!ha->subsys) {
7113 IPS_PRINTK(KERN_WARNING, pci_dev,
7114 "Unable to allocate host subsystem structure\n");
7115 return ips_abort_init(ha, index);
7118 /* the ioctl buffer is now used during adapter initialization, so its
7119 * successful allocation is now required */
7120 if (ips_ioctlsize < PAGE_SIZE)
7121 ips_ioctlsize = PAGE_SIZE;
7123 ha->ioctl_data = pci_alloc_consistent(pci_dev, ips_ioctlsize,
7124 &ha->ioctl_busaddr);
7125 ha->ioctl_len = ips_ioctlsize;
7126 if (!ha->ioctl_data) {
7127 IPS_PRINTK(KERN_WARNING, pci_dev,
7128 "Unable to allocate IOCTL data\n");
7129 return ips_abort_init(ha, index);
7133 * Setup Functions
7135 ips_setup_funclist(ha);
7137 if ((IPS_IS_MORPHEUS(ha)) || (IPS_IS_MARCO(ha))) {
7138 /* If Morpheus appears dead, reset it */
7139 IsDead = readl(ha->mem_ptr + IPS_REG_I960_MSG1);
7140 if (IsDead == 0xDEADBEEF) {
7141 ips_reset_morpheus(ha);
7146 * Initialize the card if it isn't already
7149 if (!(*ha->func.isinit) (ha)) {
7150 if (!(*ha->func.init) (ha)) {
7152 * Initialization failed
7154 IPS_PRINTK(KERN_WARNING, pci_dev,
7155 "Unable to initialize controller\n");
7156 return ips_abort_init(ha, index);
7160 *indexPtr = index;
7161 return SUCCESS;
7164 /*---------------------------------------------------------------------------*/
7165 /* Routine Name: ips_init_phase2 */
7166 /* */
7167 /* Routine Description: */
7168 /* Adapter Initialization Phase 2 */
7169 /* */
7170 /* Return Value: */
7171 /* 0 if Successful, else non-zero */
7172 /*---------------------------------------------------------------------------*/
7173 static int
7174 ips_init_phase2(int index)
7176 ips_ha_t *ha;
7178 ha = ips_ha[index];
7180 METHOD_TRACE("ips_init_phase2", 1);
7181 if (!ha->active) {
7182 ips_ha[index] = NULL;
7183 return -1;
7186 /* Install the interrupt handler */
7187 if (request_irq(ha->pcidev->irq, do_ipsintr, IRQF_SHARED, ips_name, ha)) {
7188 IPS_PRINTK(KERN_WARNING, ha->pcidev,
7189 "Unable to install interrupt handler\n");
7190 return ips_abort_init(ha, index);
7194 * Allocate a temporary SCB for initialization
7196 ha->max_cmds = 1;
7197 if (!ips_allocatescbs(ha)) {
7198 IPS_PRINTK(KERN_WARNING, ha->pcidev,
7199 "Unable to allocate a CCB\n");
7200 free_irq(ha->pcidev->irq, ha);
7201 return ips_abort_init(ha, index);
7204 if (!ips_hainit(ha)) {
7205 IPS_PRINTK(KERN_WARNING, ha->pcidev,
7206 "Unable to initialize controller\n");
7207 free_irq(ha->pcidev->irq, ha);
7208 return ips_abort_init(ha, index);
7210 /* Free the temporary SCB */
7211 ips_deallocatescbs(ha, 1);
7213 /* allocate CCBs */
7214 if (!ips_allocatescbs(ha)) {
7215 IPS_PRINTK(KERN_WARNING, ha->pcidev,
7216 "Unable to allocate CCBs\n");
7217 free_irq(ha->pcidev->irq, ha);
7218 return ips_abort_init(ha, index);
7221 return SUCCESS;
7224 MODULE_LICENSE("GPL");
7225 MODULE_DESCRIPTION("IBM ServeRAID Adapter Driver " IPS_VER_STRING);
7226 MODULE_VERSION(IPS_VER_STRING);
7230 * Overrides for Emacs so that we almost follow Linus's tabbing style.
7231 * Emacs will notice this stuff at the end of the file and automatically
7232 * adjust the settings for this buffer only. This must remain at the end
7233 * of the file.
7234 * ---------------------------------------------------------------------------
7235 * Local variables:
7236 * c-indent-level: 2
7237 * c-brace-imaginary-offset: 0
7238 * c-brace-offset: -2
7239 * c-argdecl-indent: 2
7240 * c-label-offset: -2
7241 * c-continued-statement-offset: 2
7242 * c-continued-brace-offset: 0
7243 * indent-tabs-mode: nil
7244 * tab-width: 8
7245 * End: