?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Merge commit 'origin/master' into next
[linux-2.6/verdex.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 /*****************************************************************************/
53
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 /*****************************************************************************/
144
145 /*
146 * Conditional Compilation directives for this driver:
147 *
148 * IPS_DEBUG - Turn on debugging info
149 *
150 * Parameters:
151 *
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)
158 *
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
162 */
163
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>
178
179 #include <linux/blkdev.h>
180 #include <linux/types.h>
181 #include <linux/dma-mapping.h>
182
183 #include <scsi/sg.h>
184 #include "scsi.h"
185 #include <scsi/scsi_host.h>
186
187 #include "ips.h"
188
189 #include <linux/module.h>
190
191 #include <linux/stat.h>
192
193 #include <linux/spinlock.h>
194 #include <linux/init.h>
195
196 #include <linux/smp.h>
197
198 #ifdef MODULE
199 static char *ips = NULL;
200 module_param(ips, charp, 0);
201 #endif
202
203 /*
204 * DRIVER_VER
205 */
206 #define IPS_VERSION_HIGH IPS_VER_MAJOR_STRING "." IPS_VER_MINOR_STRING
207 #define IPS_VERSION_LOW "." IPS_VER_BUILD_STRING " "
208
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
212
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)
217
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
227
228 /*
229 * Function prototypes
230 */
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 *);
319
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);
328
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);
335
336 static int ips_init_phase1(struct pci_dev *pci_dev, int *indexPtr);
337 static int ips_register_scsi(int index);
338
339 static int ips_poll_for_flush_complete(ips_ha_t * ha);
340 static void ips_flush_and_reset(ips_ha_t *ha);
341
342 /*
343 * global variables
344 */
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,
377 };
378
379
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, }
386 };
387
388 MODULE_DEVICE_TABLE( pci, ips_pci_table );
389
390 static char ips_hot_plug_name[] = "ips";
391
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);
394
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),
400 };
401
402
403 /*
404 * Necessary forward function protoypes
405 */
406 static int ips_halt(struct notifier_block *nb, ulong event, void *buf);
407
408 #define MAX_ADAPTER_NAME 15
409
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"
429 };
430
431 static struct notifier_block ips_notifier = {
432 ips_halt, NULL, 0
433 };
434
435 /*
436 * Direction table
437 */
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
490 };
491
492
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)
504 {
505
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},
515 };
516
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';
525 /*
526 * We now have key/value pairs.
527 * Update the variables
528 */
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;
540 }
541 }
542 }
543
544 return (1);
545 }
546
547 __setup("ips=", ips_setup);
548
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)
562 {
563 int i;
564
565 METHOD_TRACE("ips_detect", 1);
566
567 #ifdef MODULE
568 if (ips)
569 ips_setup(ips);
570 #endif
571
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++;
576 }
577 ips_hotplug = 1;
578 return (ips_num_controllers);
579 }
580
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)
587 {
588
589 /*
590 * Setup Functions
591 */
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;
632
633 if (IPS_USE_I2O_DELIVER(ha))
634 ha->func.issue = ips_issue_i2o;
635 else
636 ha->func.issue = ips_issue_copperhead;
637 }
638 }
639
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)
651 {
652 ips_scb_t *scb;
653 ips_ha_t *ha;
654 int i;
655
656 METHOD_TRACE("ips_release", 1);
657
658 scsi_remove_host(sh);
659
660 for (i = 0; i < IPS_MAX_ADAPTERS && ips_sh[i] != sh; i++) ;
661
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);
667 }
668
669 ha = IPS_HA(sh);
670
671 if (!ha)
672 return (FALSE);
673
674 /* flush the cache on the controller */
675 scb = &ha->scbs[ha->max_cmds - 1];
676
677 ips_init_scb(ha, scb);
678
679 scb->timeout = ips_cmd_timeout;
680 scb->cdb[0] = IPS_CMD_FLUSH;
681
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;
689
690 IPS_PRINTK(KERN_WARNING, ha->pcidev, "Flushing Cache.\n");
691
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");
695
696 IPS_PRINTK(KERN_WARNING, ha->pcidev, "Flushing Complete.\n");
697
698 ips_sh[i] = NULL;
699 ips_ha[i] = NULL;
700
701 /* free extra memory */
702 ips_free(ha);
703
704 /* free IRQ */
705 free_irq(ha->pcidev->irq, ha);
706
707 scsi_host_put(sh);
708
709 ips_released_controllers++;
710
711 return (FALSE);
712 }
713
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)
725 {
726 ips_scb_t *scb;
727 ips_ha_t *ha;
728 int i;
729
730 if ((event != SYS_RESTART) && (event != SYS_HALT) &&
731 (event != SYS_POWER_OFF))
732 return (NOTIFY_DONE);
733
734 for (i = 0; i < ips_next_controller; i++) {
735 ha = (ips_ha_t *) ips_ha[i];
736
737 if (!ha)
738 continue;
739
740 if (!ha->active)
741 continue;
742
743 /* flush the cache on the controller */
744 scb = &ha->scbs[ha->max_cmds - 1];
745
746 ips_init_scb(ha, scb);
747
748 scb->timeout = ips_cmd_timeout;
749 scb->cdb[0] = IPS_CMD_FLUSH;
750
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;
758
759 IPS_PRINTK(KERN_WARNING, ha->pcidev, "Flushing Cache.\n");
760
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");
769 }
770
771 return (NOTIFY_OK);
772 }
773
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)
784 {
785 ips_ha_t *ha;
786 ips_copp_wait_item_t *item;
787 int ret;
788 struct Scsi_Host *host;
789
790 METHOD_TRACE("ips_eh_abort", 1);
791
792 if (!SC)
793 return (FAILED);
794
795 host = SC->device->host;
796 ha = (ips_ha_t *) SC->device->host->hostdata;
797
798 if (!ha)
799 return (FAILED);
800
801 if (!ha->active)
802 return (FAILED);
803
804 spin_lock(host->host_lock);
805
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;
810
811 if (item) {
812 /* Found it */
813 ips_removeq_copp(&ha->copp_waitlist, item);
814 ret = (SUCCESS);
815
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);
823 }
824
825 spin_unlock(host->host_lock);
826 return ret;
827 }
828
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)
841 {
842 int ret;
843 int i;
844 ips_ha_t *ha;
845 ips_scb_t *scb;
846 ips_copp_wait_item_t *item;
847
848 METHOD_TRACE("ips_eh_reset", 1);
849
850 #ifdef NO_IPS_RESET
851 return (FAILED);
852 #else
853
854 if (!SC) {
855 DEBUG(1, "Reset called with NULL scsi command");
856
857 return (FAILED);
858 }
859
860 ha = (ips_ha_t *) SC->device->host->hostdata;
861
862 if (!ha) {
863 DEBUG(1, "Reset called with NULL ha struct");
864
865 return (FAILED);
866 }
867
868 if (!ha->active)
869 return (FAILED);
870
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;
875
876 if (item) {
877 /* Found it */
878 ips_removeq_copp(&ha->copp_waitlist, item);
879 return (SUCCESS);
880 }
881
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);
886 }
887
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 ). */
897
898 if (ha->ioctl_reset == 0) { /* IF Not an IOCTL Requested Reset */
899 scb = &ha->scbs[ha->max_cmds - 1];
900
901 ips_init_scb(ha, scb);
902
903 scb->timeout = ips_cmd_timeout;
904 scb->cdb[0] = IPS_CMD_FLUSH;
905
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;
913
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);
920 }
921 }
922
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. */
925
926 ha->ioctl_reset = 0; /* Reset the IOCTL Requested Reset Flag */
927
928 /*
929 * command must have already been sent
930 * reset the controller
931 */
932 IPS_PRINTK(KERN_NOTICE, ha->pcidev, "Resetting controller.\n");
933 ret = (*ha->func.reset) (ha);
934
935 if (!ret) {
936 struct scsi_cmnd *scsi_cmd;
937
938 IPS_PRINTK(KERN_NOTICE, ha->pcidev,
939 "Controller reset failed - controller now offline.\n");
940
941 /* Now fail all of the active commands */
942 DEBUG_VAR(1, "(%s%d) Failing active commands",
943 ips_name, ha->host_num);
944
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);
949 }
950
951 /* Now fail all of the pending commands */
952 DEBUG_VAR(1, "(%s%d) Failing pending commands",
953 ips_name, ha->host_num);
954
955 while ((scsi_cmd = ips_removeq_wait_head(&ha->scb_waitlist))) {
956 scsi_cmd->result = DID_ERROR;
957 scsi_cmd->scsi_done(scsi_cmd);
958 }
959
960 ha->active = FALSE;
961 return (FAILED);
962 }
963
964 if (!ips_clear_adapter(ha, IPS_INTR_IORL)) {
965 struct scsi_cmnd *scsi_cmd;
966
967 IPS_PRINTK(KERN_NOTICE, ha->pcidev,
968 "Controller reset failed - controller now offline.\n");
969
970 /* Now fail all of the active commands */
971 DEBUG_VAR(1, "(%s%d) Failing active commands",
972 ips_name, ha->host_num);
973
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);
978 }
979
980 /* Now fail all of the pending commands */
981 DEBUG_VAR(1, "(%s%d) Failing pending commands",
982 ips_name, ha->host_num);
983
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);
987 }
988
989 ha->active = FALSE;
990 return (FAILED);
991 }
992
993 /* FFDC */
994 if (le32_to_cpu(ha->subsys->param[3]) & 0x300000) {
995 struct timeval tv;
996
997 do_gettimeofday(&tv);
998 ha->last_ffdc = tv.tv_sec;
999 ha->reset_count++;
1000 ips_ffdc_reset(ha, IPS_INTR_IORL);
1001 }
1002
1003 /* Now fail all of the active commands */
1004 DEBUG_VAR(1, "(%s%d) Failing active commands", ips_name, ha->host_num);
1005
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);
1011 }
1012
1013 /* Reset DCDB active command bits */
1014 for (i = 1; i < ha->nbus; i++)
1015 ha->dcdb_active[i - 1] = 0;
1016
1017 /* Reset the number of active IOCTLs */
1018 ha->num_ioctl = 0;
1019
1020 ips_next(ha, IPS_INTR_IORL);
1021
1022 return (SUCCESS);
1023 #endif /* NO_IPS_RESET */
1024
1025 }
1026
1027 static int ips_eh_reset(struct scsi_cmnd *SC)
1028 {
1029 int rc;
1030
1031 spin_lock_irq(SC->device->host->host_lock);
1032 rc = __ips_eh_reset(SC);
1033 spin_unlock_irq(SC->device->host->host_lock);
1034
1035 return rc;
1036 }
1037
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 *))
1051 {
1052 ips_ha_t *ha;
1053 ips_passthru_t *pt;
1054
1055 METHOD_TRACE("ips_queue", 1);
1056
1057 ha = (ips_ha_t *) SC->device->host->hostdata;
1058
1059 if (!ha)
1060 return (1);
1061
1062 if (!ha->active)
1063 return (DID_ERROR);
1064
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);
1069
1070 return (0);
1071 }
1072 } else if (ha->scb_waitlist.count == IPS_MAX_QUEUE) {
1073 SC->result = DID_BUS_BUSY << 16;
1074 done(SC);
1075
1076 return (0);
1077 }
1078
1079 SC->scsi_done = done;
1080
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);
1086
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);
1092
1093 return (0);
1094 }
1095
1096 if (ips_is_passthru(SC)) {
1097
1098 ips_copp_wait_item_t *scratch;
1099
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);
1110 }
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);
1116 }
1117
1118 /* allocate space for the scribble */
1119 scratch = kmalloc(sizeof (ips_copp_wait_item_t), GFP_ATOMIC);
1120
1121 if (!scratch) {
1122 SC->result = DID_ERROR << 16;
1123 done(SC);
1124
1125 return (0);
1126 }
1127
1128 scratch->scsi_cmd = SC;
1129 scratch->next = NULL;
1130
1131 ips_putq_copp_tail(&ha->copp_waitlist, scratch);
1132 } else {
1133 ips_putq_wait_tail(&ha->scb_waitlist, SC);
1134 }
1135
1136 ips_next(ha, IPS_INTR_IORL);
1137
1138 return (0);
1139 }
1140
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[])
1152 {
1153 ips_ha_t *ha = (ips_ha_t *) sdev->host->hostdata;
1154 int heads;
1155 int sectors;
1156 int cylinders;
1157
1158 METHOD_TRACE("ips_biosparam", 1);
1159
1160 if (!ha)
1161 /* ?!?! host adater info invalid */
1162 return (0);
1163
1164 if (!ha->active)
1165 return (0);
1166
1167 if (!ips_read_adapter_status(ha, IPS_INTR_ON))
1168 /* ?!?! Enquiry command failed */
1169 return (0);
1170
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;
1177 }
1178
1179 cylinders = (unsigned long) capacity / (heads * sectors);
1180
1181 DEBUG_VAR(2, "Geometry: heads: %d, sectors: %d, cylinders: %d",
1182 heads, sectors, cylinders);
1183
1184 geom[0] = heads;
1185 geom[1] = sectors;
1186 geom[2] = cylinders;
1187
1188 return (0);
1189 }
1190
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)
1202 {
1203 ips_ha_t *ha;
1204 int min;
1205
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);
1212 }
1213
1214 SDptr->skip_ms_page_8 = 1;
1215 SDptr->skip_ms_page_3f = 1;
1216 return 0;
1217 }
1218
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)
1230 {
1231 ips_ha_t *ha;
1232 struct Scsi_Host *host;
1233 int irqstatus;
1234
1235 METHOD_TRACE("do_ipsintr", 2);
1236
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;
1245 }
1246
1247 spin_lock(host->host_lock);
1248
1249 if (!ha->active) {
1250 spin_unlock(host->host_lock);
1251 return IRQ_HANDLED;
1252 }
1253
1254 irqstatus = (*ha->func.intr) (ha);
1255
1256 spin_unlock(host->host_lock);
1257
1258 /* start the next command */
1259 ips_next(ha, IPS_INTR_ON);
1260 return IRQ_RETVAL(irqstatus);
1261 }
1262
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 /****************************************************************************/
1274 int
1275 ips_intr_copperhead(ips_ha_t * ha)
1276 {
1277 ips_stat_t *sp;
1278 ips_scb_t *scb;
1279 IPS_STATUS cstatus;
1280 int intrstatus;
1281
1282 METHOD_TRACE("ips_intr", 2);
1283
1284 if (!ha)
1285 return 0;
1286
1287 if (!ha->active)
1288 return 0;
1289
1290 intrstatus = (*ha->func.isintr) (ha);
1291
1292 if (!intrstatus) {
1293 /*
1294 * Unexpected/Shared interrupt
1295 */
1296
1297 return 0;
1298 }
1299
1300 while (TRUE) {
1301 sp = &ha->sp;
1302
1303 intrstatus = (*ha->func.isintr) (ha);
1304
1305 if (!intrstatus)
1306 break;
1307 else
1308 cstatus.value = (*ha->func.statupd) (ha);
1309
1310 if (cstatus.fields.command_id > (IPS_MAX_CMDS - 1)) {
1311 /* Spurious Interrupt ? */
1312 continue;
1313 }
1314
1315 ips_chkstatus(ha, &cstatus);
1316 scb = (ips_scb_t *) sp->scb_addr;
1317
1318 /*
1319 * use the callback function to finish things up
1320 * NOTE: interrupts are OFF for this
1321 */
1322 (*scb->callback) (ha, scb);
1323 } /* end while */
1324 return 1;
1325 }
1326
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 /****************************************************************************/
1338 int
1339 ips_intr_morpheus(ips_ha_t * ha)
1340 {
1341 ips_stat_t *sp;
1342 ips_scb_t *scb;
1343 IPS_STATUS cstatus;
1344 int intrstatus;
1345
1346 METHOD_TRACE("ips_intr_morpheus", 2);
1347
1348 if (!ha)
1349 return 0;
1350
1351 if (!ha->active)
1352 return 0;
1353
1354 intrstatus = (*ha->func.isintr) (ha);
1355
1356 if (!intrstatus) {
1357 /*
1358 * Unexpected/Shared interrupt
1359 */
1360
1361 return 0;
1362 }
1363
1364 while (TRUE) {
1365 sp = &ha->sp;
1366
1367 intrstatus = (*ha->func.isintr) (ha);
1368
1369 if (!intrstatus)
1370 break;
1371 else
1372 cstatus.value = (*ha->func.statupd) (ha);
1373
1374 if (cstatus.value == 0xffffffff)
1375 /* No more to process */
1376 break;
1377
1378 if (cstatus.fields.command_id > (IPS_MAX_CMDS - 1)) {
1379 IPS_PRINTK(KERN_WARNING, ha->pcidev,
1380 "Spurious interrupt; no ccb.\n");
1381
1382 continue;
1383 }
1384
1385 ips_chkstatus(ha, &cstatus);
1386 scb = (ips_scb_t *) sp->scb_addr;
1387
1388 /*
1389 * use the callback function to finish things up
1390 * NOTE: interrupts are OFF for this
1391 */
1392 (*scb->callback) (ha, scb);
1393 } /* end while */
1394 return 1;
1395 }
1396
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)
1408 {
1409 static char buffer[256];
1410 char *bp;
1411 ips_ha_t *ha;
1412
1413 METHOD_TRACE("ips_info", 1);
1414
1415 ha = IPS_HA(SH);
1416
1417 if (!ha)
1418 return (NULL);
1419
1420 bp = &buffer[0];
1421 memset(bp, 0, sizeof (buffer));
1422
1423 sprintf(bp, "%s%s%s Build %d", "IBM PCI ServeRAID ",
1424 IPS_VERSION_HIGH, IPS_VERSION_LOW, IPS_BUILD_IDENT);
1425
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, ">");
1430 }
1431
1432 return (bp);
1433 }
1434
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)
1447 {
1448 int i;
1449 int ret;
1450 ips_ha_t *ha = NULL;
1451
1452 METHOD_TRACE("ips_proc_info", 1);
1453
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;
1460 }
1461 }
1462 }
1463
1464 if (!ha)
1465 return (-EINVAL);
1466
1467 if (func) {
1468 /* write */
1469 return (0);
1470 } else {
1471 /* read */
1472 if (start)
1473 *start = buffer;
1474
1475 ret = ips_host_info(ha, buffer, offset, length);
1476
1477 return (ret);
1478 }
1479 }
1480
1481 /*--------------------------------------------------------------------------*/
1482 /* Helper Functions */
1483 /*--------------------------------------------------------------------------*/
1484
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)
1495 {
1496 unsigned long flags;
1497
1498 METHOD_TRACE("ips_is_passthru", 1);
1499
1500 if (!SC)
1501 return (0);
1502
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;
1509
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;
1519 }
1520 kunmap_atomic(buffer - sg->offset, KM_IRQ0);
1521 local_irq_restore(flags);
1522 }
1523 return 0;
1524 }
1525
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)
1536 {
1537 void *bigger_buf;
1538 dma_addr_t dma_busaddr;
1539
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;
1554 }
1555 return 0;
1556 }
1557
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)
1569 {
1570 ips_passthru_t *pt;
1571 int length = 0;
1572 int i, ret;
1573 struct scatterlist *sg = scsi_sglist(SC);
1574
1575 METHOD_TRACE("ips_make_passthru", 1);
1576
1577 scsi_for_each_sg(SC, sg, scsi_sg_count(SC), i)
1578 length += sg->length;
1579
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);
1585 }
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));
1595 }
1596 return IPS_FAILURE;
1597 }
1598 ha->ioctl_datasize = length;
1599
1600 ips_scmd_buf_read(SC, ha->ioctl_data, ha->ioctl_datasize);
1601 pt = (ips_passthru_t *) ha->ioctl_data;
1602
1603 /*
1604 * Some notes about the passthru interface used
1605 *
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.
1611 */
1612
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;
1620
1621 return (IPS_SUCCESS_IMM);
1622
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);
1631
1632 return (IPS_FAILURE);
1633 }
1634
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;
1642 }
1643 if (ips_usrcmd(ha, pt, scb))
1644 return (IPS_SUCCESS);
1645 else
1646 return (IPS_FAILURE);
1647 }
1648
1649 break;
1650
1651 } /* end switch */
1652
1653 return (IPS_FAILURE);
1654 }
1655
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)
1663 {
1664 int datasize;
1665
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;
1673 }
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;
1698 }
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;
1710 }
1711 }
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);
1724 }
1725 return IPS_SUCCESS_IMM;
1726 }
1727
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)
1735 {
1736
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;
1767 }
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;
1779 }
1780 return IPS_SUCCESS_IMM;
1781 }
1782 error:
1783 pt->BasicStatus = 0x0B;
1784 pt->ExtendedStatus = 0x00;
1785 ips_free_flash_copperhead(ha);
1786 return IPS_FAILURE;
1787 }
1788
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)
1800 {
1801
1802 int ret_val = 0;
1803
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;
1812 }
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);
1823 }
1824
1825 ++scb->sg_len;
1826 scb->data_len += e_len;
1827 return ret_val;
1828 }
1829
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)
1837 {
1838 IPS_SG_LIST sg_list;
1839 uint32_t cmd_busaddr;
1840
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;
1851 }
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;
1869
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;
1881 }
1882
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)
1890 {
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;
1897 }
1898
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)
1910 {
1911 IPS_SG_LIST sg_list;
1912 uint32_t cmd_busaddr;
1913
1914 METHOD_TRACE("ips_usrcmd", 1);
1915
1916 if ((!scb) || (!pt) || (!ha))
1917 return (0);
1918
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));
1925
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);
1939
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);
1945
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;
1951 }
1952
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);
1958
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);
1966 }
1967
1968 /* set timeouts */
1969 if (pt->TimeOut) {
1970 scb->timeout = pt->TimeOut;
1971
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;
1978 }
1979
1980 /* assume success */
1981 scb->scsi_cmd->result = DID_OK << 16;
1982
1983 /* success */
1984 return (1);
1985 }
1986
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)
1998 {
1999 ips_passthru_t *pt;
2000
2001 METHOD_TRACE("ips_cleanup_passthru", 1);
2002
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);
2006
2007 return;
2008 }
2009 pt = (ips_passthru_t *) ha->ioctl_data;
2010
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));
2014
2015 pt->BasicStatus = scb->basic_status;
2016 pt->ExtendedStatus = scb->extended_status;
2017 pt->AdapterType = ha->ad_type;
2018
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);
2023
2024 ips_scmd_buf_write(scb->scsi_cmd, ha->ioctl_data, ha->ioctl_datasize);
2025 }
2026
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)
2038 {
2039 IPS_INFOSTR info;
2040
2041 METHOD_TRACE("ips_host_info", 1);
2042
2043 info.buffer = ptr;
2044 info.length = len;
2045 info.offset = offset;
2046 info.pos = 0;
2047 info.localpos = 0;
2048
2049 copy_info(&info, "\nIBM ServeRAID General Information:\n\n");
2050
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");
2058
2059 if (ha->io_addr)
2060 copy_info(&info,
2061 "\tIO region : 0x%lx (%d bytes)\n",
2062 ha->io_addr, ha->io_len);
2063
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);
2071 }
2072
2073 copy_info(&info, "\tIRQ number : %d\n", ha->pcidev->irq);
2074
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. */
2077
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]);
2086
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]);
2094 }
2095
2096 }
2097
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]);
2112 }
2113
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]);
2128 }
2129
2130 copy_info(&info, "\tDriver Version : %s%s\n",
2131 IPS_VERSION_HIGH, IPS_VERSION_LOW);
2132
2133 copy_info(&info, "\tDriver Build : %d\n",
2134 IPS_BUILD_IDENT);
2135
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);
2148
2149 copy_info(&info, "\n");
2150
2151 return (info.localpos);
2152 }
2153
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)
2165 {
2166 METHOD_TRACE("copy_mem_info", 1);
2167
2168 if (info->pos + len < info->offset) {
2169 info->pos += len;
2170 return;
2171 }
2172
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);
2177 }
2178
2179 if (info->localpos + len > info->length)
2180 len = info->length - info->localpos;
2181
2182 if (len > 0) {
2183 memcpy(info->buffer + info->localpos, data, len);
2184 info->pos += len;
2185 info->localpos += len;
2186 }
2187 }
2188
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, ...)
2200 {
2201 va_list args;
2202 char buf[128];
2203 int len;
2204
2205 METHOD_TRACE("copy_info", 1);
2206
2207 va_start(args, fmt);
2208 len = vsprintf(buf, fmt, args);
2209 va_end(args);
2210
2211 copy_mem_info(info, buf, len);
2212
2213 return (len);
2214 }
2215
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)
2227 {
2228 METHOD_TRACE("ips_identify_controller", 1);
2229
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;
2250 }
2251 break;
2252
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;
2258
2259 case IPS_SUBDEVICEID_4M:
2260 ha->ad_type = IPS_ADTYPE_SERVERAID4M;
2261 break;
2262
2263 case IPS_SUBDEVICEID_4MX:
2264 ha->ad_type = IPS_ADTYPE_SERVERAID4MX;
2265 break;
2266
2267 case IPS_SUBDEVICEID_4LX:
2268 ha->ad_type = IPS_ADTYPE_SERVERAID4LX;
2269 break;
2270
2271 case IPS_SUBDEVICEID_5I2:
2272 ha->ad_type = IPS_ADTYPE_SERVERAID5I2;
2273 break;
2274
2275 case IPS_SUBDEVICEID_5I1:
2276 ha->ad_type = IPS_ADTYPE_SERVERAID5I1;
2277 break;
2278 }
2279
2280 break;
2281
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;
2296 }
2297 break;
2298 }
2299 }
2300
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)
2312 {
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' };
2322
2323 METHOD_TRACE("ips_get_bios_version", 1);
2324
2325 major = 0;
2326 minor = 0;
2327
2328 strncpy(ha->bios_version, " ?", 8);
2329
2330 if (ha->pcidev->device == IPS_DEVICEID_COPPERHEAD) {
2331 if (IPS_USE_MEMIO(ha)) {
2332 /* Memory Mapped I/O */
2333
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 */
2338
2339 if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0x55)
2340 return;
2341
2342 writel(1, ha->mem_ptr + IPS_REG_FLAP);
2343 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2344 udelay(25); /* 25 us */
2345
2346 if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0xAA)
2347 return;
2348
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 */
2353
2354 major = readb(ha->mem_ptr + IPS_REG_FLDP);
2355
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);
2361
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);
2367
2368 } else {
2369 /* Programmed I/O */
2370
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 */
2375
2376 if (inb(ha->io_addr + IPS_REG_FLDP) != 0x55)
2377 return;
2378
2379 outl(1, ha->io_addr + IPS_REG_FLAP);
2380 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2381 udelay(25); /* 25 us */
2382
2383 if (inb(ha->io_addr + IPS_REG_FLDP) != 0xAA)
2384 return;
2385
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 */
2390
2391 major = inb(ha->io_addr + IPS_REG_FLDP);
2392
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 */
2397
2398 minor = inb(ha->io_addr + IPS_REG_FLDP);
2399
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 */
2404
2405 subminor = inb(ha->io_addr + IPS_REG_FLDP);
2406
2407 }
2408 } else {
2409 /* Morpheus Family - Send Command to the card */
2410
2411 buffer = ha->ioctl_data;
2412
2413 memset(buffer, 0, 0x1000);
2414
2415 scb = &ha->scbs[ha->max_cmds - 1];
2416
2417 ips_init_scb(ha, scb);
2418
2419 scb->timeout = ips_cmd_timeout;
2420 scb->cdb[0] = IPS_CMD_RW_BIOSFW;
2421
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;
2431
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 */
2439
2440 return;
2441 }
2442
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;
2449 }
2450 }
2451
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;
2460 }
2461
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)
2475 {
2476 int i;
2477 struct timeval tv;
2478
2479 METHOD_TRACE("ips_hainit", 1);
2480
2481 if (!ha)
2482 return (0);
2483
2484 if (ha->func.statinit)
2485 (*ha->func.statinit) (ha);
2486
2487 if (ha->func.enableint)
2488 (*ha->func.enableint) (ha);
2489
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);
2495
2496 if (!ips_read_config(ha, IPS_INTR_IORL)) {
2497 IPS_PRINTK(KERN_WARNING, ha->pcidev,
2498 "unable to read config from controller.\n");
2499
2500 return (0);
2501 }
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");
2506
2507 return (0);
2508 }
2509
2510 /* Identify this controller */
2511 ips_identify_controller(ha);
2512
2513 if (!ips_read_subsystem_parameters(ha, IPS_INTR_IORL)) {
2514 IPS_PRINTK(KERN_WARNING, ha->pcidev,
2515 "unable to read subsystem parameters.\n");
2516
2517 return (0);
2518 }
2519
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");
2524
2525 return (0);
2526 }
2527
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);
2531
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;
2536
2537 switch (ha->conf->logical_drive[0].ucStripeSize) {
2538 case 4:
2539 ha->max_xfer = 0x10000;
2540 break;
2541
2542 case 5:
2543 ha->max_xfer = 0x20000;
2544 break;
2545
2546 case 6:
2547 ha->max_xfer = 0x40000;
2548 break;
2549
2550 case 7:
2551 default:
2552 ha->max_xfer = 0x80000;
2553 break;
2554 }
2555
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;
2566
2567 case 5:
2568 ha->max_cmds = 16;
2569 break;
2570
2571 case 6:
2572 ha->max_cmds = 8;
2573 break;
2574
2575 case 7:
2576 default:
2577 ha->max_cmds = 4;
2578 break;
2579 }
2580 }
2581
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;
2588 }
2589
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;
2595 }
2596
2597 return (1);
2598 }
2599
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)
2611 {
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);
2620
2621 if (!ha)
2622 return;
2623 host = ips_sh[ha->host_num];
2624 /*
2625 * Block access to the queue function so
2626 * this command won't time out
2627 */
2628 if (intr == IPS_INTR_ON)
2629 spin_lock(host->host_lock);
2630
2631 if ((ha->subsys->param[3] & 0x300000)
2632 && (ha->scb_activelist.count == 0)) {
2633 struct timeval tv;
2634
2635 do_gettimeofday(&tv);
2636
2637 if (tv.tv_sec - ha->last_ffdc > IPS_SECS_8HOURS) {
2638 ha->last_ffdc = tv.tv_sec;
2639 ips_ffdc_time(ha);
2640 }
2641 }
2642
2643 /*
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
2649 */
2650 while ((ha->num_ioctl < IPS_MAX_IOCTL) &&
2651 (ha->copp_waitlist.head) && (scb = ips_getscb(ha))) {
2652
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);
2659
2660 ret = ips_make_passthru(ha, scb->scsi_cmd, scb, intr);
2661
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);
2669 }
2670
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);
2677 }
2678
2679 ips_freescb(ha, scb);
2680 break;
2681 default:
2682 break;
2683 } /* end case */
2684
2685 if (ret != IPS_SUCCESS) {
2686 ha->num_ioctl--;
2687 continue;
2688 }
2689
2690 ret = ips_send_cmd(ha, scb);
2691
2692 if (ret == IPS_SUCCESS)
2693 ips_putq_scb_head(&ha->scb_activelist, scb);
2694 else
2695 ha->num_ioctl--;
2696
2697 switch (ret) {
2698 case IPS_FAILURE:
2699 if (scb->scsi_cmd) {
2700 scb->scsi_cmd->result = DID_ERROR << 16;
2701 }
2702
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 */
2711
2712 }
2713
2714 /*
2715 * Send "Normal" I/O commands
2716 */
2717
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;
2727 }
2728
2729 q = p;
2730 SC = ips_removeq_wait(&ha->scb_waitlist, q);
2731
2732 if (intr == IPS_INTR_ON)
2733 spin_unlock(host->host_lock); /* Unlock HA after command is taken off queue */
2734
2735 SC->result = DID_OK;
2736 SC->host_scribble = NULL;
2737
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);
2747
2748 /* copy in the CDB */
2749 memcpy(scb->cdb, SC->cmnd, SC->cmd_len);
2750
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;
2756
2757 scb->flags |= IPS_SCB_MAP_SG;
2758
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;
2764 }
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;
2771 }
2772
2773 scb->dcdb.cmd_attribute =
2774 ips_command_direction[scb->scsi_cmd->cmnd[0]];
2775
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;
2781
2782 if (!(scb->dcdb.cmd_attribute & 0x3))
2783 scb->dcdb.transfer_length = 0;
2784
2785 if (scb->data_len >= IPS_MAX_XFER) {
2786 scb->dcdb.cmd_attribute |= IPS_TRANSFER64K;
2787 scb->dcdb.transfer_length = 0;
2788 }
2789 if (intr == IPS_INTR_ON)
2790 spin_lock(host->host_lock);
2791
2792 ret = ips_send_cmd(ha, scb);
2793
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);
2802 }
2803
2804 if (scb->bus)
2805 ha->dcdb_active[scb->bus - 1] &=
2806 ~(1 << scb->target_id);
2807
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);
2813
2814 if (scb->bus)
2815 ha->dcdb_active[scb->bus - 1] &=
2816 ~(1 << scb->target_id);
2817
2818 ips_freescb(ha, scb);
2819 break;
2820 default:
2821 break;
2822 } /* end case */
2823
2824 p = (struct scsi_cmnd *) p->host_scribble;
2825
2826 } /* end while */
2827
2828 if (intr == IPS_INTR_ON)
2829 spin_unlock(host->host_lock);
2830 }
2831
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)
2845 {
2846 METHOD_TRACE("ips_putq_scb_head", 1);
2847
2848 if (!item)
2849 return;
2850
2851 item->q_next = queue->head;
2852 queue->head = item;
2853
2854 if (!queue->tail)
2855 queue->tail = item;
2856
2857 queue->count++;
2858 }
2859
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)
2873 {
2874 ips_scb_t *item;
2875
2876 METHOD_TRACE("ips_removeq_scb_head", 1);
2877
2878 item = queue->head;
2879
2880 if (!item) {
2881 return (NULL);
2882 }
2883
2884 queue->head = item->q_next;
2885 item->q_next = NULL;
2886
2887 if (queue->tail == item)
2888 queue->tail = NULL;
2889
2890 queue->count--;
2891
2892 return (item);
2893 }
2894
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)
2908 {
2909 ips_scb_t *p;
2910
2911 METHOD_TRACE("ips_removeq_scb", 1);
2912
2913 if (!item)
2914 return (NULL);
2915
2916 if (item == queue->head) {
2917 return (ips_removeq_scb_head(queue));
2918 }
2919
2920 p = queue->head;
2921
2922 while ((p) && (item != p->q_next))
2923 p = p->q_next;
2924
2925 if (p) {
2926 /* found a match */
2927 p->q_next = item->q_next;
2928
2929 if (!item->q_next)
2930 queue->tail = p;
2931
2932 item->q_next = NULL;
2933 queue->count--;
2934
2935 return (item);
2936 }
2937
2938 return (NULL);
2939 }
2940
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)
2953 {
2954 METHOD_TRACE("ips_putq_wait_tail", 1);
2955
2956 if (!item)
2957 return;
2958
2959 item->host_scribble = NULL;
2960
2961 if (queue->tail)
2962 queue->tail->host_scribble = (char *) item;
2963
2964 queue->tail = item;
2965
2966 if (!queue->head)
2967 queue->head = item;
2968
2969 queue->count++;
2970 }
2971
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)
2984 {
2985 struct scsi_cmnd *item;
2986
2987 METHOD_TRACE("ips_removeq_wait_head", 1);
2988
2989 item = queue->head;
2990
2991 if (!item) {
2992 return (NULL);
2993 }
2994
2995 queue->head = (struct scsi_cmnd *) item->host_scribble;
2996 item->host_scribble = NULL;
2997
2998 if (queue->tail == item)
2999 queue->tail = NULL;
3000
3001 queue->count--;
3002
3003 return (item);
3004 }
3005
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)
3019 {
3020 struct scsi_cmnd *p;
3021
3022 METHOD_TRACE("ips_removeq_wait", 1);
3023
3024 if (!item)
3025 return (NULL);
3026
3027 if (item == queue->head) {
3028 return (ips_removeq_wait_head(queue));
3029 }
3030
3031 p = queue->head;
3032
3033 while ((p) && (item != (struct scsi_cmnd *) p->host_scribble))
3034 p = (struct scsi_cmnd *) p->host_scribble;
3035
3036 if (p) {
3037 /* found a match */
3038 p->host_scribble = item->host_scribble;
3039
3040 if (!item->host_scribble)
3041 queue->tail = p;
3042
3043 item->host_scribble = NULL;
3044 queue->count--;
3045
3046 return (item);
3047 }
3048
3049 return (NULL);
3050 }
3051
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)
3065 {
3066 METHOD_TRACE("ips_putq_copp_tail", 1);
3067
3068 if (!item)
3069 return;
3070
3071 item->next = NULL;
3072
3073 if (queue->tail)
3074 queue->tail->next = item;
3075
3076 queue->tail = item;
3077
3078 if (!queue->head)
3079 queue->head = item;
3080
3081 queue->count++;
3082 }
3083
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)
3097 {
3098 ips_copp_wait_item_t *item;
3099
3100 METHOD_TRACE("ips_removeq_copp_head", 1);
3101
3102 item = queue->head;
3103
3104 if (!item) {
3105 return (NULL);
3106 }
3107
3108 queue->head = item->next;
3109 item->next = NULL;
3110
3111 if (queue->tail == item)
3112 queue->tail = NULL;
3113
3114 queue->count--;
3115
3116 return (item);
3117 }
3118
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)
3132 {
3133 ips_copp_wait_item_t *p;
3134
3135 METHOD_TRACE("ips_removeq_copp", 1);
3136
3137 if (!item)
3138 return (NULL);
3139
3140 if (item == queue->head) {
3141 return (ips_removeq_copp_head(queue));
3142 }
3143
3144 p = queue->head;
3145
3146 while ((p) && (item != p->next))
3147 p = p->next;
3148
3149 if (p) {
3150 /* found a match */
3151 p->next = item->next;
3152
3153 if (!item->next)
3154 queue->tail = p;
3155
3156 item->next = NULL;
3157 queue->count--;
3158
3159 return (item);
3160 }
3161
3162 return (NULL);
3163 }
3164
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)
3176 {
3177 METHOD_TRACE("ipsintr_blocking", 2);
3178
3179 ips_freescb(ha, scb);
3180 if ((ha->waitflag == TRUE) && (ha->cmd_in_progress == scb->cdb[0])) {
3181 ha->waitflag = FALSE;
3182
3183 return;
3184 }
3185 }
3186
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)
3198 {
3199 METHOD_TRACE("ipsintr_done", 2);
3200
3201 if (!scb) {
3202 IPS_PRINTK(KERN_WARNING, ha->pcidev,
3203 "Spurious interrupt; scb NULL.\n");
3204
3205 return;
3206 }
3207
3208 if (scb->scsi_cmd == NULL) {
3209 /* unexpected interrupt */
3210 IPS_PRINTK(KERN_WARNING, ha->pcidev,
3211 "Spurious interrupt; scsi_cmd not set.\n");
3212
3213 return;
3214 }
3215
3216 ips_done(ha, scb);
3217 }
3218
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)
3230 {
3231 int ret;
3232
3233 METHOD_TRACE("ips_done", 1);
3234
3235 if (!scb)
3236 return;
3237
3238 if ((scb->scsi_cmd) && (ips_is_passthru(scb->scsi_cmd))) {
3239 ips_cleanup_passthru(ha, scb);
3240 ha->num_ioctl--;
3241 } else {
3242 /*
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.
3246 */
3247 if ((scb->breakup) || (scb->sg_break)) {
3248 struct scatterlist *sg;
3249 int i, sg_dma_index, ips_sg_index = 0;
3250
3251 /* we had a data breakup */
3252 scb->data_len = 0;
3253
3254 sg = scsi_sglist(scb->scsi_cmd);
3255
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);
3260
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));
3266
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;
3275 }
3276
3277 scb->dcdb.transfer_length = scb->data_len;
3278 scb->dcdb.cmd_attribute |=
3279 ips_command_direction[scb->scsi_cmd->cmnd[0]];
3280
3281 if (!(scb->dcdb.cmd_attribute & 0x3))
3282 scb->dcdb.transfer_length = 0;
3283
3284 if (scb->data_len >= IPS_MAX_XFER) {
3285 scb->dcdb.cmd_attribute |= IPS_TRANSFER64K;
3286 scb->dcdb.transfer_length = 0;
3287 }
3288
3289 ret = ips_send_cmd(ha, scb);
3290
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);
3296 }
3297
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);
3304 }
3305
3306 ips_freescb(ha, scb);
3307 break;
3308 default:
3309 break;
3310 } /* end case */
3311
3312 return;
3313 }
3314 } /* end if passthru */
3315
3316 if (scb->bus) {
3317 ha->dcdb_active[scb->bus - 1] &= ~(1 << scb->target_id);
3318 }
3319
3320 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
3321
3322 ips_freescb(ha, scb);
3323 }
3324
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)
3336 {
3337 int errcode;
3338 int device_error;
3339 uint32_t transfer_len;
3340 IPS_DCDB_TABLE_TAPE *tapeDCDB;
3341 IPS_SCSI_INQ_DATA inquiryData;
3342
3343 METHOD_TRACE("ips_map_status", 1);
3344
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);
3358 }
3359
3360 /* default driver error */
3361 errcode = DID_ERROR;
3362 device_error = 0;
3363
3364 switch (scb->basic_status & IPS_GSC_STATUS_MASK) {
3365 case IPS_CMD_TIMEOUT:
3366 errcode = DID_TIME_OUT;
3367 break;
3368
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;
3375
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;
3381
3382 break;
3383
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;
3393 }
3394
3395 if ((scb->bus) && (transfer_len < scb->data_len)) {
3396 /* Underrun - set default to no error */
3397 errcode = DID_OK;
3398
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;
3406 }
3407 }
3408 } else
3409 errcode = DID_ERROR;
3410
3411 break;
3412
3413 case IPS_ERR_RECOVERY:
3414 /* don't fail recovered errors */
3415 if (scb->bus)
3416 errcode = DID_OK;
3417
3418 break;
3419
3420 case IPS_ERR_HOST_RESET:
3421 case IPS_ERR_DEV_RESET:
3422 errcode = DID_RESET;
3423 break;
3424
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);
3440 }
3441 device_error = 2; /* check condition */
3442 }
3443
3444 errcode = DID_OK;
3445
3446 break;
3447
3448 default:
3449 errcode = DID_ERROR;
3450 break;
3451
3452 } /* end switch */
3453 } /* end switch */
3454
3455 scb->scsi_cmd->result = device_error | (errcode << 16);
3456
3457 return (1);
3458 }
3459
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)
3473 {
3474 int ret;
3475
3476 METHOD_TRACE("ips_send_wait", 1);
3477
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];
3481 }
3482 scb->callback = ipsintr_blocking;
3483 ret = ips_send_cmd(ha, scb);
3484
3485 if ((ret == IPS_FAILURE) || (ret == IPS_SUCCESS_IMM))
3486 return (ret);
3487
3488 if (intr != IPS_FFDC) /* Don't Wait around if this is a Time Stamp */
3489 ret = ips_wait(ha, timeout, intr);
3490
3491 return (ret);
3492 }
3493
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)
3503 {
3504 unsigned long flags;
3505
3506 local_irq_save(flags);
3507 scsi_sg_copy_from_buffer(scmd, data, count);
3508 local_irq_restore(flags);
3509 }
3510
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)
3520 {
3521 unsigned long flags;
3522
3523 local_irq_save(flags);
3524 scsi_sg_copy_to_buffer(scmd, data, count);
3525 local_irq_restore(flags);
3526 }
3527
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)
3539 {
3540 int ret;
3541 char *sp;
3542 int device_error;
3543 IPS_DCDB_TABLE_TAPE *tapeDCDB;
3544 int TimeOut;
3545
3546 METHOD_TRACE("ips_send_cmd", 1);
3547
3548 ret = IPS_SUCCESS;
3549
3550 if (!scb->scsi_cmd) {
3551 /* internal command */
3552
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;
3559 }
3560
3561 return (1);
3562 }
3563 } else if ((scb->bus == 0) && (!ips_is_passthru(scb->scsi_cmd))) {
3564 /* command to logical bus -- interpret */
3565 ret = IPS_SUCCESS_IMM;
3566
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;
3575
3576 case START_STOP:
3577 scb->scsi_cmd->result = DID_OK << 16;
3578
3579 case TEST_UNIT_READY:
3580 case INQUIRY:
3581 if (scb->target_id == IPS_ADAPTER_ID) {
3582 /*
3583 * Either we have a TUR
3584 * or we have a SCSI inquiry
3585 */
3586 if (scb->scsi_cmd->cmnd[0] == TEST_UNIT_READY)
3587 scb->scsi_cmd->result = DID_OK << 16;
3588
3589 if (scb->scsi_cmd->cmnd[0] == INQUIRY) {
3590 IPS_SCSI_INQ_DATA inquiry;
3591
3592 memset(&inquiry, 0,
3593 sizeof (IPS_SCSI_INQ_DATA));
3594
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 ",
3609 8);
3610 strncpy(inquiry.ProductId,
3611 "SERVERAID ", 16);
3612 strncpy(inquiry.ProductRevisionLevel,
3613 "1.00", 4);
3614
3615 ips_scmd_buf_write(scb->scsi_cmd,
3616 &inquiry,
3617 sizeof (inquiry));
3618
3619 scb->scsi_cmd->result = DID_OK << 16;
3620 }
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;
3631 }
3632
3633 break;
3634
3635 case REQUEST_SENSE:
3636 ips_reqsen(ha, scb);
3637 scb->scsi_cmd->result = DID_OK << 16;
3638 break;
3639
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);
3658 }
3659
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;
3664
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]));
3675
3676 scb->cmd.basic_io.sector_count =
3677 cpu_to_le16(scb->data_len / IPS_BLKSIZE);
3678
3679 if (le16_to_cpu(scb->cmd.basic_io.sector_count) == 0)
3680 scb->cmd.basic_io.sector_count =
3681 cpu_to_le16(256);
3682
3683 ret = IPS_SUCCESS;
3684 break;
3685
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);
3704 }
3705
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;
3710
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]);
3723
3724 scb->cmd.basic_io.sector_count =
3725 cpu_to_le16(scb->data_len / IPS_BLKSIZE);
3726
3727 if (cpu_to_le16(scb->cmd.basic_io.sector_count) == 0) {
3728 /*
3729 * This is a null condition
3730 * we don't have to do anything
3731 * so just return
3732 */
3733 scb->scsi_cmd->result = DID_OK << 16;
3734 } else
3735 ret = IPS_SUCCESS;
3736
3737 break;
3738
3739 case RESERVE:
3740 case RELEASE:
3741 scb->scsi_cmd->result = DID_OK << 16;
3742 break;
3743
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;
3753
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;
3766
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;
3777
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;
3783
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 */
3789
3790 device_error = 2; /* Indicate Check Condition */
3791 scb->scsi_cmd->result = device_error | (DID_OK << 16);
3792 break;
3793 } /* end switch */
3794 }
3795 /* end if */
3796 if (ret == IPS_SUCCESS_IMM)
3797 return (ret);
3798
3799 /* setup DCDB */
3800 if (scb->bus > 0) {
3801
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);
3807 }
3808
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;
3820
3821 TimeOut = scb->scsi_cmd->request->timeout;
3822
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;
3831 }
3832
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 */
3838
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 */
3846 }
3847
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;
3870 }
3871
3872 scb->dcdb.device_address =
3873 ((scb->bus - 1) << 4) | scb->target_id;
3874 scb->dcdb.cmd_attribute |= IPS_DISCONNECT_ALLOWED;
3875
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 */
3883 }
3884
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;
3904 }
3905 }
3906
3907 return ((*ha->func.issue) (ha, scb));
3908 }
3909
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)
3921 {
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;
3928
3929 METHOD_TRACE("ips_chkstatus", 1);
3930
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;
3935
3936 sp = &ha->sp;
3937 sp->residue_len = 0;
3938 sp->scb_addr = (void *) scb;
3939
3940 /* Remove the item from the active queue */
3941 ips_removeq_scb(&ha->scb_activelist, scb);
3942
3943 if (!scb->scsi_cmd)
3944 /* internal commands are handled in do_ipsintr */
3945 return;
3946
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);
3953
3954 if ((scb->scsi_cmd) && (ips_is_passthru(scb->scsi_cmd)))
3955 /* passthru - just returns the raw result */
3956 return;
3957
3958 errcode = DID_OK;
3959
3960 if (((basic_status & IPS_GSC_STATUS_MASK) == IPS_CMD_SUCCESS) ||
3961 ((basic_status & IPS_GSC_STATUS_MASK) == IPS_CMD_RECOVERED_ERROR)) {
3962
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);
3971 }
3972
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;
3981
3982 case START_STOP:
3983 break;
3984
3985 case TEST_UNIT_READY:
3986 if (!ips_online(ha, scb)) {
3987 errcode = DID_TIME_OUT;
3988 }
3989 break;
3990
3991 case INQUIRY:
3992 if (ips_online(ha, scb)) {
3993 ips_inquiry(ha, scb);
3994 } else {
3995 errcode = DID_TIME_OUT;
3996 }
3997 break;
3998
3999 case REQUEST_SENSE:
4000 ips_reqsen(ha, scb);
4001 break;
4002
4003 case READ_6:
4004 case WRITE_6:
4005 case READ_10:
4006 case WRITE_10:
4007 case RESERVE:
4008 case RELEASE:
4009 break;
4010
4011 case MODE_SENSE:
4012 if (!ips_online(ha, scb)
4013 || !ips_msense(ha, scb)) {
4014 errcode = DID_ERROR;
4015 }
4016 break;
4017
4018 case READ_CAPACITY:
4019 if (ips_online(ha, scb))
4020 ips_rdcap(ha, scb);
4021 else {
4022 errcode = DID_TIME_OUT;
4023 }
4024 break;
4025
4026 case SEND_DIAGNOSTIC:
4027 case REASSIGN_BLOCKS:
4028 break;
4029
4030 case FORMAT_UNIT:
4031 errcode = DID_ERROR;
4032 break;
4033
4034 case SEEK_10:
4035 case VERIFY:
4036 case READ_DEFECT_DATA:
4037 case READ_BUFFER:
4038 case WRITE_BUFFER:
4039 break;
4040
4041 default:
4042 errcode = DID_ERROR;
4043 } /* end switch */
4044
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;
4053 }
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);
4062 }
4063
4064 ips_map_status(ha, scb, sp);
4065 } /* else */
4066 }
4067
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)
4079 {
4080 METHOD_TRACE("ips_online", 1);
4081
4082 if (scb->target_id >= IPS_MAX_LD)
4083 return (0);
4084
4085 if ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1) {
4086 memset(ha->logical_drive_info, 0, sizeof (IPS_LD_INFO));
4087 return (0);
4088 }
4089
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);
4101 }
4102
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)
4114 {
4115 IPS_SCSI_INQ_DATA inquiry;
4116
4117 METHOD_TRACE("ips_inquiry", 1);
4118
4119 memset(&inquiry, 0, sizeof (IPS_SCSI_INQ_DATA));
4120
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);
4132
4133 ips_scmd_buf_write(scb->scsi_cmd, &inquiry, sizeof (inquiry));
4134
4135 return (1);
4136 }
4137
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)
4149 {
4150 IPS_SCSI_CAPACITY cap;
4151
4152 METHOD_TRACE("ips_rdcap", 1);
4153
4154 if (scsi_bufflen(scb->scsi_cmd) < 8)
4155 return (0);
4156
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);
4162
4163 ips_scmd_buf_write(scb->scsi_cmd, &cap, sizeof (cap));
4164
4165 return (1);
4166 }
4167
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)
4179 {
4180 uint16_t heads;
4181 uint16_t sectors;
4182 uint32_t cylinders;
4183 IPS_SCSI_MODE_PAGE_DATA mdata;
4184
4185 METHOD_TRACE("ips_msense", 1);
4186
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;
4194 }
4195
4196 cylinders =
4197 (le32_to_cpu(ha->enq->ulDriveSize[scb->target_id]) -
4198 1) / (heads * sectors);
4199
4200 memset(&mdata, 0, sizeof (IPS_SCSI_MODE_PAGE_DATA));
4201
4202 mdata.hdr.BlockDescLength = 8;
4203
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;
4221
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;
4249
4250 default:
4251 return (0);
4252 } /* end switch */
4253
4254 ips_scmd_buf_write(scb->scsi_cmd, &mdata, sizeof (mdata));
4255
4256 return (1);
4257 }
4258
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)
4270 {
4271 IPS_SCSI_REQSEN reqsen;
4272
4273 METHOD_TRACE("ips_reqsen", 1);
4274
4275 memset(&reqsen, 0, sizeof (IPS_SCSI_REQSEN));
4276
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;
4282
4283 ips_scmd_buf_write(scb->scsi_cmd, &reqsen, sizeof (reqsen));
4284
4285 return (1);
4286 }
4287
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)
4299 {
4300
4301 METHOD_TRACE("ips_free", 1);
4302
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;
4308 }
4309
4310 kfree(ha->conf);
4311 ha->conf = NULL;
4312
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;
4319 }
4320
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;
4327 }
4328
4329 kfree(ha->nvram);
4330 ha->nvram = NULL;
4331
4332 kfree(ha->subsys);
4333 ha->subsys = NULL;
4334
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;
4341 }
4342 ips_deallocatescbs(ha, ha->max_cmds);
4343
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;
4349 }
4350
4351 ha->mem_addr = 0;
4352
4353 }
4354 }
4355
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)
4367 {
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;
4378 }
4379
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)
4391 {
4392 ips_scb_t *scb_p;
4393 IPS_SG_LIST ips_sg;
4394 int i;
4395 dma_addr_t command_dma, sg_dma;
4396
4397 METHOD_TRACE("ips_allocatescbs", 1);
4398
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;
4414 }
4415
4416 memset(ha->scbs, 0, ha->max_cmds * sizeof (ips_scb_t));
4417
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;
4432 }
4433
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;
4438 }
4439 }
4440
4441 /* success */
4442 return (1);
4443 }
4444
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)
4456 {
4457 IPS_SG_LIST sg_list;
4458 uint32_t cmd_busaddr, sg_busaddr;
4459 METHOD_TRACE("ips_init_scb", 1);
4460
4461 if (scb == NULL)
4462 return;
4463
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));
4470
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;
4476
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;
4481
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));
4486 }
4487
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)
4501 {
4502 ips_scb_t *scb;
4503
4504 METHOD_TRACE("ips_getscb", 1);
4505
4506 if ((scb = ha->scb_freelist) == NULL) {
4507
4508 return (NULL);
4509 }
4510
4511 ha->scb_freelist = scb->q_next;
4512 scb->flags = 0;
4513 scb->q_next = NULL;
4514
4515 ips_init_scb(ha, scb);
4516
4517 return (scb);
4518 }
4519
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)
4533 {
4534
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));
4541
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;
4546 }
4547 }
4548
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)
4560 {
4561 uint8_t scpr;
4562 uint8_t isr;
4563
4564 METHOD_TRACE("ips_isinit_copperhead", 1);
4565
4566 isr = inb(ha->io_addr + IPS_REG_HISR);
4567 scpr = inb(ha->io_addr + IPS_REG_SCPR);
4568
4569 if (((isr & IPS_BIT_EI) == 0) && ((scpr & IPS_BIT_EBM) == 0))
4570 return (0);
4571 else
4572 return (1);
4573 }
4574
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)
4586 {
4587 uint8_t isr = 0;
4588 uint8_t scpr;
4589
4590 METHOD_TRACE("ips_is_init_copperhead_memio", 1);
4591
4592 isr = readb(ha->mem_ptr + IPS_REG_HISR);
4593 scpr = readb(ha->mem_ptr + IPS_REG_SCPR);
4594
4595 if (((isr & IPS_BIT_EI) == 0) && ((scpr & IPS_BIT_EBM) == 0))
4596 return (0);
4597 else
4598 return (1);
4599 }
4600
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)
4612 {
4613 uint32_t post;
4614 uint32_t bits;
4615
4616 METHOD_TRACE("ips_is_init_morpheus", 1);
4617
4618 if (ips_isintr_morpheus(ha))
4619 ips_flush_and_reset(ha);
4620
4621 post = readl(ha->mem_ptr + IPS_REG_I960_MSG0);
4622 bits = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
4623
4624 if (post == 0)
4625 return (0);
4626 else if (bits & 0x3)
4627 return (0);
4628 else
4629 return (1);
4630 }
4631
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)
4644 {
4645 ips_scb_t *scb;
4646 int ret;
4647 int time;
4648 int done;
4649 dma_addr_t command_dma;
4650
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;
4657
4658 scb->timeout = ips_cmd_timeout;
4659 scb->cdb[0] = IPS_CMD_FLUSH;
4660
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;
4668
4669 ret = ips_send_cmd(ha, scb); /* Send the Flush Command */
4670
4671 if (ret == IPS_SUCCESS) {
4672 time = 60 * IPS_ONE_SEC; /* Max Wait time is 60 seconds */
4673 done = 0;
4674
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--;
4680 }
4681 }
4682 }
4683
4684 /* Now RESET and INIT the adapter */
4685 (*ha->func.reset) (ha);
4686
4687 pci_free_consistent(ha->pcidev, sizeof(ips_scb_t), scb, command_dma);
4688 return;
4689 }
4690
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)
4703 {
4704 IPS_STATUS cstatus;
4705
4706 while (TRUE) {
4707 cstatus.value = (*ha->func.statupd) (ha);
4708
4709 if (cstatus.value == 0xffffffff) /* If No Interrupt to process */
4710 break;
4711
4712 /* Success is when we see the Flush Command ID */
4713 if (cstatus.fields.command_id == IPS_MAX_CMDS)
4714 return 1;
4715 }
4716
4717 return 0;
4718 }
4719
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)
4730 {
4731 METHOD_TRACE("ips_enable_int_copperhead", 1);
4732
4733 outb(ha->io_addr + IPS_REG_HISR, IPS_BIT_EI);
4734 inb(ha->io_addr + IPS_REG_HISR); /*Ensure PCI Posting Completes*/
4735 }
4736
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)
4747 {
4748 METHOD_TRACE("ips_enable_int_copperhead_memio", 1);
4749
4750 writeb(IPS_BIT_EI, ha->mem_ptr + IPS_REG_HISR);
4751 readb(ha->mem_ptr + IPS_REG_HISR); /*Ensure PCI Posting Completes*/
4752 }
4753
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)
4764 {
4765 uint32_t Oimr;
4766
4767 METHOD_TRACE("ips_enable_int_morpheus", 1);
4768
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*/
4773 }
4774
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)
4786 {
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;
4792
4793 METHOD_TRACE("ips_init_copperhead", 1);
4794
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;
4800
4801 /* Delay for 1 Second */
4802 MDELAY(IPS_ONE_SEC);
4803 }
4804
4805 if (j >= 45)
4806 /* error occurred */
4807 return (0);
4808
4809 PostByte[i] = inb(ha->io_addr + IPS_REG_ISPR);
4810 outb(Isr, ha->io_addr + IPS_REG_HISR);
4811 }
4812
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]);
4817
4818 return (0);
4819 }
4820
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;
4826
4827 /* Delay for 1 Second */
4828 MDELAY(IPS_ONE_SEC);
4829 }
4830
4831 if (j >= 240)
4832 /* error occurred */
4833 return (0);
4834
4835 ConfigByte[i] = inb(ha->io_addr + IPS_REG_ISPR);
4836 outb(Isr, ha->io_addr + IPS_REG_HISR);
4837 }
4838
4839 for (i = 0; i < 240; i++) {
4840 Cbsp = inb(ha->io_addr + IPS_REG_CBSP);
4841
4842 if ((Cbsp & IPS_BIT_OP) == 0)
4843 break;
4844
4845 /* Delay for 1 Second */
4846 MDELAY(IPS_ONE_SEC);
4847 }
4848
4849 if (i >= 240)
4850 /* reset failed */
4851 return (0);
4852
4853 /* setup CCCR */
4854 outl(0x1010, ha->io_addr + IPS_REG_CCCR);
4855
4856 /* Enable busmastering */
4857 outb(IPS_BIT_EBM, ha->io_addr + IPS_REG_SCPR);
4858
4859 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
4860 /* fix for anaconda64 */
4861 outl(0, ha->io_addr + IPS_REG_NDAE);
4862
4863 /* Enable interrupts */
4864 outb(IPS_BIT_EI, ha->io_addr + IPS_REG_HISR);
4865
4866 return (1);
4867 }
4868
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)
4880 {
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;
4886
4887 METHOD_TRACE("ips_init_copperhead_memio", 1);
4888
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;
4894
4895 /* Delay for 1 Second */
4896 MDELAY(IPS_ONE_SEC);
4897 }
4898
4899 if (j >= 45)
4900 /* error occurred */
4901 return (0);
4902
4903 PostByte[i] = readb(ha->mem_ptr + IPS_REG_ISPR);
4904 writeb(Isr, ha->mem_ptr + IPS_REG_HISR);
4905 }
4906
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]);
4911
4912 return (0);
4913 }
4914
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;
4920
4921 /* Delay for 1 Second */
4922 MDELAY(IPS_ONE_SEC);
4923 }
4924
4925 if (j >= 240)
4926 /* error occurred */
4927 return (0);
4928
4929 ConfigByte[i] = readb(ha->mem_ptr + IPS_REG_ISPR);
4930 writeb(Isr, ha->mem_ptr + IPS_REG_HISR);
4931 }
4932
4933 for (i = 0; i < 240; i++) {
4934 Cbsp = readb(ha->mem_ptr + IPS_REG_CBSP);
4935
4936 if ((Cbsp & IPS_BIT_OP) == 0)
4937 break;
4938
4939 /* Delay for 1 Second */
4940 MDELAY(IPS_ONE_SEC);
4941 }
4942
4943 if (i >= 240)
4944 /* error occurred */
4945 return (0);
4946
4947 /* setup CCCR */
4948 writel(0x1010, ha->mem_ptr + IPS_REG_CCCR);
4949
4950 /* Enable busmastering */
4951 writeb(IPS_BIT_EBM, ha->mem_ptr + IPS_REG_SCPR);
4952
4953 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
4954 /* fix for anaconda64 */
4955 writel(0, ha->mem_ptr + IPS_REG_NDAE);
4956
4957 /* Enable interrupts */
4958 writeb(IPS_BIT_EI, ha->mem_ptr + IPS_REG_HISR);
4959
4960 /* if we get here then everything went OK */
4961 return (1);
4962 }
4963
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)
4975 {
4976 uint32_t Post;
4977 uint32_t Config;
4978 uint32_t Isr;
4979 uint32_t Oimr;
4980 int i;
4981
4982 METHOD_TRACE("ips_init_morpheus", 1);
4983
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);
4987
4988 if (Isr & IPS_BIT_I960_MSG0I)
4989 break;
4990
4991 /* Delay for 1 Second */
4992 MDELAY(IPS_ONE_SEC);
4993 }
4994
4995 if (i >= 45) {
4996 /* error occurred */
4997 IPS_PRINTK(KERN_WARNING, ha->pcidev,
4998 "timeout waiting for post.\n");
4999
5000 return (0);
5001 }
5002
5003 Post = readl(ha->mem_ptr + IPS_REG_I960_MSG0);
5004
5005 if (Post == 0x4F00) { /* If Flashing the Battery PIC */
5006 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5007 "Flashing Battery PIC, Please wait ...\n");
5008
5009 /* Clear the interrupt bit */
5010 Isr = (uint32_t) IPS_BIT_I960_MSG0I;
5011 writel(Isr, ha->mem_ptr + IPS_REG_I2O_HIR);
5012
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);
5019 }
5020
5021 if (i >= 120) {
5022 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5023 "timeout waiting for Battery PIC Flash\n");
5024 return (0);
5025 }
5026
5027 }
5028
5029 /* Clear the interrupt bit */
5030 Isr = (uint32_t) IPS_BIT_I960_MSG0I;
5031 writel(Isr, ha->mem_ptr + IPS_REG_I2O_HIR);
5032
5033 if (Post < (IPS_GOOD_POST_STATUS << 8)) {
5034 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5035 "reset controller fails (post status %x).\n", Post);
5036
5037 return (0);
5038 }
5039
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);
5043
5044 if (Isr & IPS_BIT_I960_MSG1I)
5045 break;
5046
5047 /* Delay for 1 Second */
5048 MDELAY(IPS_ONE_SEC);
5049 }
5050
5051 if (i >= 240) {
5052 /* error occurred */
5053 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5054 "timeout waiting for config.\n");
5055
5056 return (0);
5057 }
5058
5059 Config = readl(ha->mem_ptr + IPS_REG_I960_MSG1);
5060
5061 /* Clear interrupt bit */
5062 Isr = (uint32_t) IPS_BIT_I960_MSG1I;
5063 writel(Isr, ha->mem_ptr + IPS_REG_I2O_HIR);
5064
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);
5069
5070 /* if we get here then everything went OK */
5071
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;
5076 }
5077
5078 return (1);
5079 }
5080
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)
5092 {
5093 int reset_counter;
5094
5095 METHOD_TRACE("ips_reset_copperhead", 1);
5096
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);
5099
5100 reset_counter = 0;
5101
5102 while (reset_counter < 2) {
5103 reset_counter++;
5104
5105 outb(IPS_BIT_RST, ha->io_addr + IPS_REG_SCPR);
5106
5107 /* Delay for 1 Second */
5108 MDELAY(IPS_ONE_SEC);
5109
5110 outb(0, ha->io_addr + IPS_REG_SCPR);
5111
5112 /* Delay for 1 Second */
5113 MDELAY(IPS_ONE_SEC);
5114
5115 if ((*ha->func.init) (ha))
5116 break;
5117 else if (reset_counter >= 2) {
5118
5119 return (0);
5120 }
5121 }
5122
5123 return (1);
5124 }
5125
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)
5137 {
5138 int reset_counter;
5139
5140 METHOD_TRACE("ips_reset_copperhead_memio", 1);
5141
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);
5144
5145 reset_counter = 0;
5146
5147 while (reset_counter < 2) {
5148 reset_counter++;
5149
5150 writeb(IPS_BIT_RST, ha->mem_ptr + IPS_REG_SCPR);
5151
5152 /* Delay for 1 Second */
5153 MDELAY(IPS_ONE_SEC);
5154
5155 writeb(0, ha->mem_ptr + IPS_REG_SCPR);
5156
5157 /* Delay for 1 Second */
5158 MDELAY(IPS_ONE_SEC);
5159
5160 if ((*ha->func.init) (ha))
5161 break;
5162 else if (reset_counter >= 2) {
5163
5164 return (0);
5165 }
5166 }
5167
5168 return (1);
5169 }
5170
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)
5182 {
5183 int reset_counter;
5184 uint8_t junk;
5185
5186 METHOD_TRACE("ips_reset_morpheus", 1);
5187
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);
5190
5191 reset_counter = 0;
5192
5193 while (reset_counter < 2) {
5194 reset_counter++;
5195
5196 writel(0x80000000, ha->mem_ptr + IPS_REG_I960_IDR);
5197
5198 /* Delay for 5 Seconds */
5199 MDELAY(5 * IPS_ONE_SEC);
5200
5201 /* Do a PCI config read to wait for adapter */
5202 pci_read_config_byte(ha->pcidev, 4, &junk);
5203
5204 if ((*ha->func.init) (ha))
5205 break;
5206 else if (reset_counter >= 2) {
5207
5208 return (0);
5209 }
5210 }
5211
5212 return (1);
5213 }
5214
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)
5226 {
5227 uint32_t phys_status_start;
5228
5229 METHOD_TRACE("ips_statinit", 1);
5230
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;
5234
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);
5242
5243 ha->adapt->hw_status_tail = phys_status_start;
5244 }
5245
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)
5257 {
5258 uint32_t phys_status_start;
5259
5260 METHOD_TRACE("ips_statinit_memio", 1);
5261
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;
5265
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);
5272
5273 ha->adapt->hw_status_tail = phys_status_start;
5274 }
5275
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)
5287 {
5288 METHOD_TRACE("ips_statupd_copperhead", 1);
5289
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;
5296 }
5297
5298 outl(ha->adapt->hw_status_tail,
5299 ha->io_addr + IPS_REG_SQTR);
5300
5301 return (ha->adapt->p_status_tail->value);
5302 }
5303
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)
5315 {
5316 METHOD_TRACE("ips_statupd_copperhead_memio", 1);
5317
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;
5324 }
5325
5326 writel(ha->adapt->hw_status_tail, ha->mem_ptr + IPS_REG_SQTR);
5327
5328 return (ha->adapt->p_status_tail->value);
5329 }
5330
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)
5342 {
5343 uint32_t val;
5344
5345 METHOD_TRACE("ips_statupd_morpheus", 1);
5346
5347 val = readl(ha->mem_ptr + IPS_REG_I2O_OUTMSGQ);
5348
5349 return (val);
5350 }
5351
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)
5363 {
5364 uint32_t TimeOut;
5365 uint32_t val;
5366
5367 METHOD_TRACE("ips_issue_copperhead", 1);
5368
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);
5379 }
5380
5381 TimeOut = 0;
5382
5383 while ((val =
5384 le32_to_cpu(inl(ha->io_addr + IPS_REG_CCCR))) & IPS_BIT_SEM) {
5385 udelay(1000);
5386
5387 if (++TimeOut >= IPS_SEM_TIMEOUT) {
5388 if (!(val & IPS_BIT_START_STOP))
5389 break;
5390
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");
5395
5396 return (IPS_FAILURE);
5397 } /* end if */
5398 } /* end while */
5399
5400 outl(scb->scb_busaddr, ha->io_addr + IPS_REG_CCSAR);
5401 outw(IPS_BIT_START_CMD, ha->io_addr + IPS_REG_CCCR);
5402
5403 return (IPS_SUCCESS);
5404 }
5405
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)
5417 {
5418 uint32_t TimeOut;
5419 uint32_t val;
5420
5421 METHOD_TRACE("ips_issue_copperhead_memio", 1);
5422
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);
5433 }
5434
5435 TimeOut = 0;
5436
5437 while ((val = readl(ha->mem_ptr + IPS_REG_CCCR)) & IPS_BIT_SEM) {
5438 udelay(1000);
5439
5440 if (++TimeOut >= IPS_SEM_TIMEOUT) {
5441 if (!(val & IPS_BIT_START_STOP))
5442 break;
5443
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");
5448
5449 return (IPS_FAILURE);
5450 } /* end if */
5451 } /* end while */
5452
5453 writel(scb->scb_busaddr, ha->mem_ptr + IPS_REG_CCSAR);
5454 writel(IPS_BIT_START_CMD, ha->mem_ptr + IPS_REG_CCCR);
5455
5456 return (IPS_SUCCESS);
5457 }
5458
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)
5470 {
5471
5472 METHOD_TRACE("ips_issue_i2o", 1);
5473
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);
5484 }
5485
5486 outl(scb->scb_busaddr, ha->io_addr + IPS_REG_I2O_INMSGQ);
5487
5488 return (IPS_SUCCESS);
5489 }
5490
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)
5502 {
5503
5504 METHOD_TRACE("ips_issue_i2o_memio", 1);
5505
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);
5516 }
5517
5518 writel(scb->scb_busaddr, ha->mem_ptr + IPS_REG_I2O_INMSGQ);
5519
5520 return (IPS_SUCCESS);
5521 }
5522
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)
5534 {
5535 uint8_t Isr;
5536
5537 METHOD_TRACE("ips_isintr_copperhead", 2);
5538
5539 Isr = inb(ha->io_addr + IPS_REG_HISR);
5540
5541 if (Isr == 0xFF)
5542 /* ?!?! Nothing really there */
5543 return (0);
5544
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);
5551 }
5552
5553 return (0);
5554 }
5555
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)
5567 {
5568 uint8_t Isr;
5569
5570 METHOD_TRACE("ips_isintr_memio", 2);
5571
5572 Isr = readb(ha->mem_ptr + IPS_REG_HISR);
5573
5574 if (Isr == 0xFF)
5575 /* ?!?! Nothing really there */
5576 return (0);
5577
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);
5584 }
5585
5586 return (0);
5587 }
5588
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)
5600 {
5601 uint32_t Isr;
5602
5603 METHOD_TRACE("ips_isintr_morpheus", 2);
5604
5605 Isr = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
5606
5607 if (Isr & IPS_BIT_I2O_OPQI)
5608 return (1);
5609 else
5610 return (0);
5611 }
5612
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)
5624 {
5625 int ret;
5626 int done;
5627
5628 METHOD_TRACE("ips_wait", 1);
5629
5630 ret = IPS_FAILURE;
5631 done = FALSE;
5632
5633 time *= IPS_ONE_SEC; /* convert seconds */
5634
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;
5641 }
5642 } else if (intr == IPS_INTR_IORL) {
5643 if (ha->waitflag == FALSE) {
5644 /*
5645 * controller generated an interrupt to
5646 * acknowledge completion of the command
5647 * and ips_intr() has serviced the interrupt.
5648 */
5649 ret = IPS_SUCCESS;
5650 done = TRUE;
5651 break;
5652 }
5653
5654 /*
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.
5658 */
5659
5660 (*ha->func.intr) (ha);
5661 }
5662
5663 /* This looks like a very evil loop, but it only does this during start-up */
5664 udelay(1000);
5665 time--;
5666 }
5667
5668 return (ret);
5669 }
5670
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)
5682 {
5683 METHOD_TRACE("ips_write_driver_status", 1);
5684
5685 if (!ips_readwrite_page5(ha, FALSE, intr)) {
5686 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5687 "unable to read NVRAM page 5.\n");
5688
5689 return (0);
5690 }
5691
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;
5699 }
5700
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]);
5709
5710 ips_get_bios_version(ha, intr);
5711
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);
5719
5720 ha->nvram->versioning = 0; /* Indicate the Driver Does Not Support Versioning */
5721
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");
5726
5727 return (0);
5728 }
5729
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;
5732
5733 return (1);
5734 }
5735
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)
5747 {
5748 ips_scb_t *scb;
5749 int ret;
5750
5751 METHOD_TRACE("ips_read_adapter_status", 1);
5752
5753 scb = &ha->scbs[ha->max_cmds - 1];
5754
5755 ips_init_scb(ha, scb);
5756
5757 scb->timeout = ips_cmd_timeout;
5758 scb->cdb[0] = IPS_CMD_ENQUIRY;
5759
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;
5768
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);
5775
5776 return (1);
5777 }
5778
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)
5790 {
5791 ips_scb_t *scb;
5792 int ret;
5793
5794 METHOD_TRACE("ips_read_subsystem_parameters", 1);
5795
5796 scb = &ha->scbs[ha->max_cmds - 1];
5797
5798 ips_init_scb(ha, scb);
5799
5800 scb->timeout = ips_cmd_timeout;
5801 scb->cdb[0] = IPS_CMD_GET_SUBSYS;
5802
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;
5811
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);
5818
5819 memcpy(ha->subsys, ha->ioctl_data, sizeof(*ha->subsys));
5820 return (1);
5821 }
5822
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)
5834 {
5835 ips_scb_t *scb;
5836 int i;
5837 int ret;
5838
5839 METHOD_TRACE("ips_read_config", 1);
5840
5841 /* set defaults for initiator IDs */
5842 for (i = 0; i < 4; i++)
5843 ha->conf->init_id[i] = 7;
5844
5845 scb = &ha->scbs[ha->max_cmds - 1];
5846
5847 ips_init_scb(ha, scb);
5848
5849 scb->timeout = ips_cmd_timeout;
5850 scb->cdb[0] = IPS_CMD_READ_CONF;
5851
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;
5856
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)) {
5862
5863 memset(ha->conf, 0, sizeof (IPS_CONF));
5864
5865 /* reset initiator IDs */
5866 for (i = 0; i < 4; i++)
5867 ha->conf->init_id[i] = 7;
5868
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);
5873
5874 return (0);
5875 }
5876
5877 memcpy(ha->conf, ha->ioctl_data, sizeof(*ha->conf));
5878 return (1);
5879 }
5880
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)
5892 {
5893 ips_scb_t *scb;
5894 int ret;
5895
5896 METHOD_TRACE("ips_readwrite_page5", 1);
5897
5898 scb = &ha->scbs[ha->max_cmds - 1];
5899
5900 ips_init_scb(ha, scb);
5901
5902 scb->timeout = ips_cmd_timeout;
5903 scb->cdb[0] = IPS_CMD_RW_NVRAM_PAGE;
5904
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));
5915
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)) {
5921
5922 memset(ha->nvram, 0, sizeof (IPS_NVRAM_P5));
5923
5924 return (0);
5925 }
5926 if (!write)
5927 memcpy(ha->nvram, ha->ioctl_data, sizeof(*ha->nvram));
5928 return (1);
5929 }
5930
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)
5942 {
5943 ips_scb_t *scb;
5944 int ret;
5945
5946 METHOD_TRACE("ips_clear_adapter", 1);
5947
5948 scb = &ha->scbs[ha->max_cmds - 1];
5949
5950 ips_init_scb(ha, scb);
5951
5952 scb->timeout = ips_reset_timeout;
5953 scb->cdb[0] = IPS_CMD_CONFIG_SYNC;
5954
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;
5962
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);
5969
5970 /* send unlock stripe command */
5971 ips_init_scb(ha, scb);
5972
5973 scb->cdb[0] = IPS_CMD_ERROR_TABLE;
5974 scb->timeout = ips_reset_timeout;
5975
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;
5983
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);
5990
5991 return (1);
5992 }
5993
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)
6005 {
6006 ips_scb_t *scb;
6007
6008 METHOD_TRACE("ips_ffdc_reset", 1);
6009
6010 scb = &ha->scbs[ha->max_cmds - 1];
6011
6012 ips_init_scb(ha, scb);
6013
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;
6020
6021 /* convert time to what the card wants */
6022 ips_fix_ffdc_time(ha, scb, ha->last_ffdc);
6023
6024 /* issue command */
6025 ips_send_wait(ha, scb, ips_cmd_timeout, intr);
6026 }
6027
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)
6039 {
6040 ips_scb_t *scb;
6041
6042 METHOD_TRACE("ips_ffdc_time", 1);
6043
6044 DEBUG_VAR(1, "(%s%d) Sending time update.", ips_name, ha->host_num);
6045
6046 scb = &ha->scbs[ha->max_cmds - 1];
6047
6048 ips_init_scb(ha, scb);
6049
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;
6056
6057 /* convert time to what the card wants */
6058 ips_fix_ffdc_time(ha, scb, ha->last_ffdc);
6059
6060 /* issue command */
6061 ips_send_wait(ha, scb, ips_cmd_timeout, IPS_FFDC);
6062 }
6063
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)
6074 {
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}
6093 };
6094
6095 METHOD_TRACE("ips_fix_ffdc_time", 1);
6096
6097 days = current_time / IPS_SECS_DAY;
6098 rem = current_time % IPS_SECS_DAY;
6099
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);
6104
6105 year = IPS_EPOCH_YEAR;
6106 while (days < 0 || days >= year_lengths[yleap = IPS_IS_LEAP_YEAR(year)]) {
6107 int newy;
6108
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;
6116 }
6117
6118 scb->cmd.ffdc.yearH = year / 100;
6119 scb->cmd.ffdc.yearL = year % 100;
6120
6121 for (i = 0; days >= month_lengths[i][yleap]; ++i)
6122 days -= month_lengths[i][yleap];
6123
6124 scb->cmd.ffdc.month = i + 1;
6125 scb->cmd.ffdc.day = days + 1;
6126 }
6127
6128 /****************************************************************************
6129 * BIOS Flash Routines *
6130 ****************************************************************************/
6131
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)
6142 {
6143 int timeout;
6144 uint8_t status = 0;
6145
6146 METHOD_TRACE("ips_erase_bios", 1);
6147
6148 status = 0;
6149
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 */
6154
6155 outb(0x50, ha->io_addr + IPS_REG_FLDP);
6156 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6157 udelay(25); /* 25 us */
6158
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 */
6163
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 */
6168
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 */
6173
6174 timeout = 80000; /* 80 seconds */
6175
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 */
6180 }
6181
6182 status = inb(ha->io_addr + IPS_REG_FLDP);
6183
6184 if (status & 0x80)
6185 break;
6186
6187 MDELAY(1);
6188 timeout--;
6189 }
6190
6191 /* check for timeout */
6192 if (timeout <= 0) {
6193 /* timeout */
6194
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 */
6199
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 */
6206 }
6207
6208 status = inb(ha->io_addr + IPS_REG_FLDP);
6209
6210 if (status & 0xC0)
6211 break;
6212
6213 MDELAY(1);
6214 timeout--;
6215 }
6216
6217 return (1);
6218 }
6219
6220 /* check for valid VPP */
6221 if (status & 0x08)
6222 /* VPP failure */
6223 return (1);
6224
6225 /* check for successful flash */
6226 if (status & 0x30)
6227 /* sequence error */
6228 return (1);
6229
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 */
6235
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 */
6240
6241 return (0);
6242 }
6243
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)
6254 {
6255 int timeout;
6256 uint8_t status;
6257
6258 METHOD_TRACE("ips_erase_bios_memio", 1);
6259
6260 status = 0;
6261
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 */
6266
6267 writeb(0x50, ha->mem_ptr + IPS_REG_FLDP);
6268 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6269 udelay(25); /* 25 us */
6270
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 */
6275
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 */
6280
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 */
6285
6286 timeout = 80000; /* 80 seconds */
6287
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 */
6292 }
6293
6294 status = readb(ha->mem_ptr + IPS_REG_FLDP);
6295
6296 if (status & 0x80)
6297 break;
6298
6299 MDELAY(1);
6300 timeout--;
6301 }
6302
6303 /* check for timeout */
6304 if (timeout <= 0) {
6305 /* timeout */
6306
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 */
6311
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 */
6318 }
6319
6320 status = readb(ha->mem_ptr + IPS_REG_FLDP);
6321
6322 if (status & 0xC0)
6323 break;
6324
6325 MDELAY(1);
6326 timeout--;
6327 }
6328
6329 return (1);
6330 }
6331
6332 /* check for valid VPP */
6333 if (status & 0x08)
6334 /* VPP failure */
6335 return (1);
6336
6337 /* check for successful flash */
6338 if (status & 0x30)
6339 /* sequence error */
6340 return (1);
6341
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 */
6347
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 */
6352
6353 return (0);
6354 }
6355
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)
6367 {
6368 int i;
6369 int timeout;
6370 uint8_t status = 0;
6371
6372 METHOD_TRACE("ips_program_bios", 1);
6373
6374 status = 0;
6375
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 */
6381
6382 outb(0x40, ha->io_addr + IPS_REG_FLDP);
6383 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6384 udelay(25); /* 25 us */
6385
6386 outb(buffer[i], ha->io_addr + IPS_REG_FLDP);
6387 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6388 udelay(25); /* 25 us */
6389
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 */
6396 }
6397
6398 status = inb(ha->io_addr + IPS_REG_FLDP);
6399
6400 if (status & 0x80)
6401 break;
6402
6403 MDELAY(1);
6404 timeout--;
6405 }
6406
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 */
6412
6413 outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6414 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6415 udelay(25); /* 25 us */
6416
6417 return (1);
6418 }
6419
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 */
6426
6427 outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6428 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6429 udelay(25); /* 25 us */
6430
6431 return (1);
6432 }
6433 } /* end for */
6434
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 */
6439
6440 outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6441 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6442 udelay(25); /* 25 us */
6443
6444 return (0);
6445 }
6446
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)
6458 {
6459 int i;
6460 int timeout;
6461 uint8_t status = 0;
6462
6463 METHOD_TRACE("ips_program_bios_memio", 1);
6464
6465 status = 0;
6466
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 */
6472
6473 writeb(0x40, ha->mem_ptr + IPS_REG_FLDP);
6474 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6475 udelay(25); /* 25 us */
6476
6477 writeb(buffer[i], ha->mem_ptr + IPS_REG_FLDP);
6478 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6479 udelay(25); /* 25 us */
6480
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 */
6487 }
6488
6489 status = readb(ha->mem_ptr + IPS_REG_FLDP);
6490
6491 if (status & 0x80)
6492 break;
6493
6494 MDELAY(1);
6495 timeout--;
6496 }
6497
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 */
6503
6504 writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6505 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6506 udelay(25); /* 25 us */
6507
6508 return (1);
6509 }
6510
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 */
6517
6518 writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6519 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6520 udelay(25); /* 25 us */
6521
6522 return (1);
6523 }
6524 } /* end for */
6525
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 */
6530
6531 writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6532 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6533 udelay(25); /* 25 us */
6534
6535 return (0);
6536 }
6537
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)
6549 {
6550 uint8_t checksum;
6551 int i;
6552
6553 METHOD_TRACE("ips_verify_bios", 1);
6554
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 */
6559
6560 if (inb(ha->io_addr + IPS_REG_FLDP) != 0x55)
6561 return (1);
6562
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);
6568
6569 checksum = 0xff;
6570 for (i = 2; i < buffersize; i++) {
6571
6572 outl(i + offset, ha->io_addr + IPS_REG_FLAP);
6573 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6574 udelay(25); /* 25 us */
6575
6576 checksum = (uint8_t) checksum + inb(ha->io_addr + IPS_REG_FLDP);
6577 }
6578
6579 if (checksum != 0)
6580 /* failure */
6581 return (1);
6582 else
6583 /* success */
6584 return (0);
6585 }
6586
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)
6598 {
6599 uint8_t checksum;
6600 int i;
6601
6602 METHOD_TRACE("ips_verify_bios_memio", 1);
6603
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 */
6608
6609 if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0x55)
6610 return (1);
6611
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);
6617
6618 checksum = 0xff;
6619 for (i = 2; i < buffersize; i++) {
6620
6621 writel(i + offset, ha->mem_ptr + IPS_REG_FLAP);
6622 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6623 udelay(25); /* 25 us */
6624
6625 checksum =
6626 (uint8_t) checksum + readb(ha->mem_ptr + IPS_REG_FLDP);
6627 }
6628
6629 if (checksum != 0)
6630 /* failure */
6631 return (1);
6632 else
6633 /* success */
6634 return (0);
6635 }
6636
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)
6646 {
6647 ha->active = 0;
6648 ips_free(ha);
6649 ips_ha[index] = NULL;
6650 ips_sh[index] = NULL;
6651 return -1;
6652 }
6653
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)
6663 {
6664 ips_ha_t *ha_sav = ips_ha[highindex];
6665 struct Scsi_Host *sh_sav = ips_sh[highindex];
6666 int i;
6667
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;
6672 }
6673 ha_sav->host_num = lowindex;
6674 ips_ha[lowindex] = ha_sav;
6675 ips_sh[lowindex] = sh_sav;
6676 }
6677
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)
6687 {
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;
6693
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,
6702 j);
6703 position++;
6704 }
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,
6712 j);
6713 position++;
6714 }
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,
6722 j);
6723 position++;
6724 }
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,
6735 j);
6736 position++;
6737 }
6738 break;
6739 default:
6740 break;
6741 }
6742 }
6743 }
6744 /* if adapter_order[0], then ordering is complete */
6745 return;
6746 }
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;
6755 }
6756 }
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++;
6767 }
6768 }
6769
6770 return;
6771 }
6772
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)
6782 {
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;
6790 }
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;
6799 }
6800
6801 kfree(oldha);
6802
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;
6810
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;
6815
6816 if (scsi_add_host(sh, &ha->pcidev->dev))
6817 goto err_out;
6818
6819 ips_sh[index] = sh;
6820 ips_ha[index] = ha;
6821
6822 scsi_scan_host(sh);
6823
6824 return 0;
6825
6826 err_out:
6827 free_irq(ha->pcidev->irq, ha);
6828 err_out_sh:
6829 scsi_host_put(sh);
6830 return -1;
6831 }
6832
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)
6841 {
6842 struct Scsi_Host *sh = pci_get_drvdata(pci_dev);
6843
6844 pci_set_drvdata(pci_dev, NULL);
6845
6846 ips_release(sh);
6847
6848 pci_release_regions(pci_dev);
6849 pci_disable_device(pci_dev);
6850 }
6851
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)
6861 {
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;
6869 }
6870 register_reboot_notifier(&ips_notifier);
6871 return 0;
6872 }
6873
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)
6883 {
6884 pci_unregister_driver(&ips_pci_driver);
6885 unregister_reboot_notifier(&ips_notifier);
6886 }
6887
6888 module_init(ips_module_init);
6889 module_exit(ips_module_exit);
6890
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)
6902 {
6903 int index = -1;
6904 int rc;
6905
6906 METHOD_TRACE("ips_insert_device", 1);
6907 rc = pci_enable_device(pci_dev);
6908 if (rc)
6909 return rc;
6910
6911 rc = pci_request_regions(pci_dev, "ips");
6912 if (rc)
6913 goto err_out;
6914
6915 rc = ips_init_phase1(pci_dev, &index);
6916 if (rc == SUCCESS)
6917 rc = ips_init_phase2(index);
6918
6919 if (ips_hotplug)
6920 if (ips_register_scsi(index)) {
6921 ips_free(ips_ha[index]);
6922 rc = -1;
6923 }
6924
6925 if (rc == SUCCESS)
6926 ips_num_controllers++;
6927
6928 ips_next_controller = ips_num_controllers;
6929
6930 if (rc < 0) {
6931 rc = -ENODEV;
6932 goto err_out_regions;
6933 }
6934
6935 pci_set_drvdata(pci_dev, ips_sh[index]);
6936 return 0;
6937
6938 err_out_regions:
6939 pci_release_regions(pci_dev);
6940 err_out:
6941 pci_disable_device(pci_dev);
6942 return rc;
6943 }
6944
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)
6956 {
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;
6970
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;
6977 }
6978 }
6979
6980 if (index >= IPS_MAX_ADAPTERS)
6981 return -1;
6982
6983 /* stuff that we get in dev */
6984 bus = pci_dev->bus->number;
6985 func = pci_dev->devfn;
6986
6987 /* Init MEM/IO addresses to 0 */
6988 mem_addr = 0;
6989 io_addr = 0;
6990 mem_len = 0;
6991 io_len = 0;
6992
6993 for (j = 0; j < 2; j++) {
6994 if (!pci_resource_start(pci_dev, j))
6995 break;
6996
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);
7003 }
7004 }
7005
7006 /* setup memory mapped area (if applicable) */
7007 if (mem_addr) {
7008 uint32_t base;
7009 uint32_t offs;
7010
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;
7020 }
7021
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;
7028 }
7029
7030 ips_sh[index] = NULL;
7031 ips_ha[index] = ha;
7032 ha->active = 1;
7033
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;
7044
7045 /*
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.
7050 */
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);
7058 }
7059 }
7060 if(ips_cd_boot && !ips_FlashData){
7061 ips_FlashData = pci_alloc_consistent(pci_dev, PAGE_SIZE << 7,
7062 &ips_flashbusaddr);
7063 }
7064
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);
7071 }
7072
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);
7079 }
7080 ha->adapt->hw_status_start = dma_address;
7081 ha->dummy = (void *) (ha->adapt + 1);
7082
7083
7084
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);
7090 }
7091 ha->logical_drive_info_dma_addr = dma_address;
7092
7093
7094 ha->conf = kmalloc(sizeof (IPS_CONF), GFP_KERNEL);
7095
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);
7100 }
7101
7102 ha->nvram = kmalloc(sizeof (IPS_NVRAM_P5), GFP_KERNEL);
7103
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);
7108 }
7109
7110 ha->subsys = kmalloc(sizeof (IPS_SUBSYS), GFP_KERNEL);
7111
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);
7116 }
7117
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;
7122
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);
7130 }
7131
7132 /*
7133 * Setup Functions
7134 */
7135 ips_setup_funclist(ha);
7136
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);
7142 }
7143 }
7144
7145 /*
7146 * Initialize the card if it isn't already
7147 */
7148
7149 if (!(*ha->func.isinit) (ha)) {
7150 if (!(*ha->func.init) (ha)) {
7151 /*
7152 * Initialization failed
7153 */
7154 IPS_PRINTK(KERN_WARNING, pci_dev,
7155 "Unable to initialize controller\n");
7156 return ips_abort_init(ha, index);
7157 }
7158 }
7159
7160 *indexPtr = index;
7161 return SUCCESS;
7162 }
7163
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)
7175 {
7176 ips_ha_t *ha;
7177
7178 ha = ips_ha[index];
7179
7180 METHOD_TRACE("ips_init_phase2", 1);
7181 if (!ha->active) {
7182 ips_ha[index] = NULL;
7183 return -1;
7184 }
7185
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);
7191 }
7192
7193 /*
7194 * Allocate a temporary SCB for initialization
7195 */
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);
7202 }
7203
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);
7209 }
7210 /* Free the temporary SCB */
7211 ips_deallocatescbs(ha, 1);
7212
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);
7219 }
7220
7221 return SUCCESS;
7222 }
7223
7224 MODULE_LICENSE("GPL");
7225 MODULE_DESCRIPTION("IBM ServeRAID Adapter Driver " IPS_VER_STRING);
7226 MODULE_VERSION(IPS_VER_STRING);
7227
7228
7229 /*
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:
7246 */
Verdex Pro support