Merge branch 'for-linus' of git://git.kernel.org/pub/scm/linux/kernel/git/dtor/input
[GitHub/mt8127/android_kernel_alcatel_ttab.git] / drivers / scsi / ips.c
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 wherever 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_Host *, 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_write_info(struct Scsi_Host *, char *, int);
330 static int ips_show_info(struct seq_file *, struct Scsi_Host *);
331 static int ips_host_info(ips_ha_t *, struct seq_file *);
332 static int ips_abort_init(ips_ha_t * ha, int index);
333 static int ips_init_phase2(int index);
334
335 static int ips_init_phase1(struct pci_dev *pci_dev, int *indexPtr);
336 static int ips_register_scsi(int index);
337
338 static int ips_poll_for_flush_complete(ips_ha_t * ha);
339 static void ips_flush_and_reset(ips_ha_t *ha);
340
341 /*
342 * global variables
343 */
344 static const char ips_name[] = "ips";
345 static struct Scsi_Host *ips_sh[IPS_MAX_ADAPTERS]; /* Array of host controller structures */
346 static ips_ha_t *ips_ha[IPS_MAX_ADAPTERS]; /* Array of HA structures */
347 static unsigned int ips_next_controller;
348 static unsigned int ips_num_controllers;
349 static unsigned int ips_released_controllers;
350 static int ips_hotplug;
351 static int ips_cmd_timeout = 60;
352 static int ips_reset_timeout = 60 * 5;
353 static int ips_force_memio = 1; /* Always use Memory Mapped I/O */
354 static int ips_force_i2o = 1; /* Always use I2O command delivery */
355 static int ips_ioctlsize = IPS_IOCTL_SIZE; /* Size of the ioctl buffer */
356 static int ips_cd_boot; /* Booting from Manager CD */
357 static char *ips_FlashData = NULL; /* CD Boot - Flash Data Buffer */
358 static dma_addr_t ips_flashbusaddr;
359 static long ips_FlashDataInUse; /* CD Boot - Flash Data In Use Flag */
360 static uint32_t MaxLiteCmds = 32; /* Max Active Cmds for a Lite Adapter */
361 static struct scsi_host_template ips_driver_template = {
362 .detect = ips_detect,
363 .release = ips_release,
364 .info = ips_info,
365 .queuecommand = ips_queue,
366 .eh_abort_handler = ips_eh_abort,
367 .eh_host_reset_handler = ips_eh_reset,
368 .proc_name = "ips",
369 .show_info = ips_show_info,
370 .write_info = ips_write_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 ips_insert_device(struct pci_dev *pci_dev, const struct pci_device_id *ent);
393 static void 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 = 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 = DID_RESET << 16;
1008 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
1009 ips_freescb(ha, scb);
1010 }
1011
1012 /* Reset DCDB active command bits */
1013 for (i = 1; i < ha->nbus; i++)
1014 ha->dcdb_active[i - 1] = 0;
1015
1016 /* Reset the number of active IOCTLs */
1017 ha->num_ioctl = 0;
1018
1019 ips_next(ha, IPS_INTR_IORL);
1020
1021 return (SUCCESS);
1022 #endif /* NO_IPS_RESET */
1023
1024 }
1025
1026 static int ips_eh_reset(struct scsi_cmnd *SC)
1027 {
1028 int rc;
1029
1030 spin_lock_irq(SC->device->host->host_lock);
1031 rc = __ips_eh_reset(SC);
1032 spin_unlock_irq(SC->device->host->host_lock);
1033
1034 return rc;
1035 }
1036
1037 /****************************************************************************/
1038 /* */
1039 /* Routine Name: ips_queue */
1040 /* */
1041 /* Routine Description: */
1042 /* */
1043 /* Send a command to the controller */
1044 /* */
1045 /* NOTE: */
1046 /* Linux obtains io_request_lock before calling this function */
1047 /* */
1048 /****************************************************************************/
1049 static int ips_queue_lck(struct scsi_cmnd *SC, void (*done) (struct scsi_cmnd *))
1050 {
1051 ips_ha_t *ha;
1052 ips_passthru_t *pt;
1053
1054 METHOD_TRACE("ips_queue", 1);
1055
1056 ha = (ips_ha_t *) SC->device->host->hostdata;
1057
1058 if (!ha)
1059 return (1);
1060
1061 if (!ha->active)
1062 return (DID_ERROR);
1063
1064 if (ips_is_passthru(SC)) {
1065 if (ha->copp_waitlist.count == IPS_MAX_IOCTL_QUEUE) {
1066 SC->result = DID_BUS_BUSY << 16;
1067 done(SC);
1068
1069 return (0);
1070 }
1071 } else if (ha->scb_waitlist.count == IPS_MAX_QUEUE) {
1072 SC->result = DID_BUS_BUSY << 16;
1073 done(SC);
1074
1075 return (0);
1076 }
1077
1078 SC->scsi_done = done;
1079
1080 DEBUG_VAR(2, "(%s%d): ips_queue: cmd 0x%X (%d %d %d)",
1081 ips_name,
1082 ha->host_num,
1083 SC->cmnd[0],
1084 SC->device->channel, SC->device->id, SC->device->lun);
1085
1086 /* Check for command to initiator IDs */
1087 if ((scmd_channel(SC) > 0)
1088 && (scmd_id(SC) == ha->ha_id[scmd_channel(SC)])) {
1089 SC->result = DID_NO_CONNECT << 16;
1090 done(SC);
1091
1092 return (0);
1093 }
1094
1095 if (ips_is_passthru(SC)) {
1096
1097 ips_copp_wait_item_t *scratch;
1098
1099 /* A Reset IOCTL is only sent by the boot CD in extreme cases. */
1100 /* There can never be any system activity ( network or disk ), but check */
1101 /* anyway just as a good practice. */
1102 pt = (ips_passthru_t *) scsi_sglist(SC);
1103 if ((pt->CoppCP.cmd.reset.op_code == IPS_CMD_RESET_CHANNEL) &&
1104 (pt->CoppCP.cmd.reset.adapter_flag == 1)) {
1105 if (ha->scb_activelist.count != 0) {
1106 SC->result = DID_BUS_BUSY << 16;
1107 done(SC);
1108 return (0);
1109 }
1110 ha->ioctl_reset = 1; /* This reset request is from an IOCTL */
1111 __ips_eh_reset(SC);
1112 SC->result = DID_OK << 16;
1113 SC->scsi_done(SC);
1114 return (0);
1115 }
1116
1117 /* allocate space for the scribble */
1118 scratch = kmalloc(sizeof (ips_copp_wait_item_t), GFP_ATOMIC);
1119
1120 if (!scratch) {
1121 SC->result = DID_ERROR << 16;
1122 done(SC);
1123
1124 return (0);
1125 }
1126
1127 scratch->scsi_cmd = SC;
1128 scratch->next = NULL;
1129
1130 ips_putq_copp_tail(&ha->copp_waitlist, scratch);
1131 } else {
1132 ips_putq_wait_tail(&ha->scb_waitlist, SC);
1133 }
1134
1135 ips_next(ha, IPS_INTR_IORL);
1136
1137 return (0);
1138 }
1139
1140 static DEF_SCSI_QCMD(ips_queue)
1141
1142 /****************************************************************************/
1143 /* */
1144 /* Routine Name: ips_biosparam */
1145 /* */
1146 /* Routine Description: */
1147 /* */
1148 /* Set bios geometry for the controller */
1149 /* */
1150 /****************************************************************************/
1151 static int ips_biosparam(struct scsi_device *sdev, struct block_device *bdev,
1152 sector_t capacity, int geom[])
1153 {
1154 ips_ha_t *ha = (ips_ha_t *) sdev->host->hostdata;
1155 int heads;
1156 int sectors;
1157 int cylinders;
1158
1159 METHOD_TRACE("ips_biosparam", 1);
1160
1161 if (!ha)
1162 /* ?!?! host adater info invalid */
1163 return (0);
1164
1165 if (!ha->active)
1166 return (0);
1167
1168 if (!ips_read_adapter_status(ha, IPS_INTR_ON))
1169 /* ?!?! Enquiry command failed */
1170 return (0);
1171
1172 if ((capacity > 0x400000) && ((ha->enq->ucMiscFlag & 0x8) == 0)) {
1173 heads = IPS_NORM_HEADS;
1174 sectors = IPS_NORM_SECTORS;
1175 } else {
1176 heads = IPS_COMP_HEADS;
1177 sectors = IPS_COMP_SECTORS;
1178 }
1179
1180 cylinders = (unsigned long) capacity / (heads * sectors);
1181
1182 DEBUG_VAR(2, "Geometry: heads: %d, sectors: %d, cylinders: %d",
1183 heads, sectors, cylinders);
1184
1185 geom[0] = heads;
1186 geom[1] = sectors;
1187 geom[2] = cylinders;
1188
1189 return (0);
1190 }
1191
1192 /****************************************************************************/
1193 /* */
1194 /* Routine Name: ips_slave_configure */
1195 /* */
1196 /* Routine Description: */
1197 /* */
1198 /* Set queue depths on devices once scan is complete */
1199 /* */
1200 /****************************************************************************/
1201 static int
1202 ips_slave_configure(struct scsi_device * SDptr)
1203 {
1204 ips_ha_t *ha;
1205 int min;
1206
1207 ha = IPS_HA(SDptr->host);
1208 if (SDptr->tagged_supported && SDptr->type == TYPE_DISK) {
1209 min = ha->max_cmds / 2;
1210 if (ha->enq->ucLogDriveCount <= 2)
1211 min = ha->max_cmds - 1;
1212 scsi_adjust_queue_depth(SDptr, MSG_ORDERED_TAG, min);
1213 }
1214
1215 SDptr->skip_ms_page_8 = 1;
1216 SDptr->skip_ms_page_3f = 1;
1217 return 0;
1218 }
1219
1220 /****************************************************************************/
1221 /* */
1222 /* Routine Name: do_ipsintr */
1223 /* */
1224 /* Routine Description: */
1225 /* */
1226 /* Wrapper for the interrupt handler */
1227 /* */
1228 /****************************************************************************/
1229 static irqreturn_t
1230 do_ipsintr(int irq, void *dev_id)
1231 {
1232 ips_ha_t *ha;
1233 struct Scsi_Host *host;
1234 int irqstatus;
1235
1236 METHOD_TRACE("do_ipsintr", 2);
1237
1238 ha = (ips_ha_t *) dev_id;
1239 if (!ha)
1240 return IRQ_NONE;
1241 host = ips_sh[ha->host_num];
1242 /* interrupt during initialization */
1243 if (!host) {
1244 (*ha->func.intr) (ha);
1245 return IRQ_HANDLED;
1246 }
1247
1248 spin_lock(host->host_lock);
1249
1250 if (!ha->active) {
1251 spin_unlock(host->host_lock);
1252 return IRQ_HANDLED;
1253 }
1254
1255 irqstatus = (*ha->func.intr) (ha);
1256
1257 spin_unlock(host->host_lock);
1258
1259 /* start the next command */
1260 ips_next(ha, IPS_INTR_ON);
1261 return IRQ_RETVAL(irqstatus);
1262 }
1263
1264 /****************************************************************************/
1265 /* */
1266 /* Routine Name: ips_intr_copperhead */
1267 /* */
1268 /* Routine Description: */
1269 /* */
1270 /* Polling interrupt handler */
1271 /* */
1272 /* ASSUMES interrupts are disabled */
1273 /* */
1274 /****************************************************************************/
1275 int
1276 ips_intr_copperhead(ips_ha_t * ha)
1277 {
1278 ips_stat_t *sp;
1279 ips_scb_t *scb;
1280 IPS_STATUS cstatus;
1281 int intrstatus;
1282
1283 METHOD_TRACE("ips_intr", 2);
1284
1285 if (!ha)
1286 return 0;
1287
1288 if (!ha->active)
1289 return 0;
1290
1291 intrstatus = (*ha->func.isintr) (ha);
1292
1293 if (!intrstatus) {
1294 /*
1295 * Unexpected/Shared interrupt
1296 */
1297
1298 return 0;
1299 }
1300
1301 while (TRUE) {
1302 sp = &ha->sp;
1303
1304 intrstatus = (*ha->func.isintr) (ha);
1305
1306 if (!intrstatus)
1307 break;
1308 else
1309 cstatus.value = (*ha->func.statupd) (ha);
1310
1311 if (cstatus.fields.command_id > (IPS_MAX_CMDS - 1)) {
1312 /* Spurious Interrupt ? */
1313 continue;
1314 }
1315
1316 ips_chkstatus(ha, &cstatus);
1317 scb = (ips_scb_t *) sp->scb_addr;
1318
1319 /*
1320 * use the callback function to finish things up
1321 * NOTE: interrupts are OFF for this
1322 */
1323 (*scb->callback) (ha, scb);
1324 } /* end while */
1325 return 1;
1326 }
1327
1328 /****************************************************************************/
1329 /* */
1330 /* Routine Name: ips_intr_morpheus */
1331 /* */
1332 /* Routine Description: */
1333 /* */
1334 /* Polling interrupt handler */
1335 /* */
1336 /* ASSUMES interrupts are disabled */
1337 /* */
1338 /****************************************************************************/
1339 int
1340 ips_intr_morpheus(ips_ha_t * ha)
1341 {
1342 ips_stat_t *sp;
1343 ips_scb_t *scb;
1344 IPS_STATUS cstatus;
1345 int intrstatus;
1346
1347 METHOD_TRACE("ips_intr_morpheus", 2);
1348
1349 if (!ha)
1350 return 0;
1351
1352 if (!ha->active)
1353 return 0;
1354
1355 intrstatus = (*ha->func.isintr) (ha);
1356
1357 if (!intrstatus) {
1358 /*
1359 * Unexpected/Shared interrupt
1360 */
1361
1362 return 0;
1363 }
1364
1365 while (TRUE) {
1366 sp = &ha->sp;
1367
1368 intrstatus = (*ha->func.isintr) (ha);
1369
1370 if (!intrstatus)
1371 break;
1372 else
1373 cstatus.value = (*ha->func.statupd) (ha);
1374
1375 if (cstatus.value == 0xffffffff)
1376 /* No more to process */
1377 break;
1378
1379 if (cstatus.fields.command_id > (IPS_MAX_CMDS - 1)) {
1380 IPS_PRINTK(KERN_WARNING, ha->pcidev,
1381 "Spurious interrupt; no ccb.\n");
1382
1383 continue;
1384 }
1385
1386 ips_chkstatus(ha, &cstatus);
1387 scb = (ips_scb_t *) sp->scb_addr;
1388
1389 /*
1390 * use the callback function to finish things up
1391 * NOTE: interrupts are OFF for this
1392 */
1393 (*scb->callback) (ha, scb);
1394 } /* end while */
1395 return 1;
1396 }
1397
1398 /****************************************************************************/
1399 /* */
1400 /* Routine Name: ips_info */
1401 /* */
1402 /* Routine Description: */
1403 /* */
1404 /* Return info about the driver */
1405 /* */
1406 /****************************************************************************/
1407 static const char *
1408 ips_info(struct Scsi_Host *SH)
1409 {
1410 static char buffer[256];
1411 char *bp;
1412 ips_ha_t *ha;
1413
1414 METHOD_TRACE("ips_info", 1);
1415
1416 ha = IPS_HA(SH);
1417
1418 if (!ha)
1419 return (NULL);
1420
1421 bp = &buffer[0];
1422 memset(bp, 0, sizeof (buffer));
1423
1424 sprintf(bp, "%s%s%s Build %d", "IBM PCI ServeRAID ",
1425 IPS_VERSION_HIGH, IPS_VERSION_LOW, IPS_BUILD_IDENT);
1426
1427 if (ha->ad_type > 0 && ha->ad_type <= MAX_ADAPTER_NAME) {
1428 strcat(bp, " <");
1429 strcat(bp, ips_adapter_name[ha->ad_type - 1]);
1430 strcat(bp, ">");
1431 }
1432
1433 return (bp);
1434 }
1435
1436 static int
1437 ips_write_info(struct Scsi_Host *host, char *buffer, int length)
1438 {
1439 int i;
1440 ips_ha_t *ha = NULL;
1441
1442 /* Find our host structure */
1443 for (i = 0; i < ips_next_controller; i++) {
1444 if (ips_sh[i]) {
1445 if (ips_sh[i] == host) {
1446 ha = (ips_ha_t *) ips_sh[i]->hostdata;
1447 break;
1448 }
1449 }
1450 }
1451
1452 if (!ha)
1453 return (-EINVAL);
1454
1455 return 0;
1456 }
1457
1458 static int
1459 ips_show_info(struct seq_file *m, struct Scsi_Host *host)
1460 {
1461 int i;
1462 ips_ha_t *ha = NULL;
1463
1464 /* Find our host structure */
1465 for (i = 0; i < ips_next_controller; i++) {
1466 if (ips_sh[i]) {
1467 if (ips_sh[i] == host) {
1468 ha = (ips_ha_t *) ips_sh[i]->hostdata;
1469 break;
1470 }
1471 }
1472 }
1473
1474 if (!ha)
1475 return (-EINVAL);
1476
1477 return ips_host_info(ha, m);
1478 }
1479
1480 /*--------------------------------------------------------------------------*/
1481 /* Helper Functions */
1482 /*--------------------------------------------------------------------------*/
1483
1484 /****************************************************************************/
1485 /* */
1486 /* Routine Name: ips_is_passthru */
1487 /* */
1488 /* Routine Description: */
1489 /* */
1490 /* Determine if the specified SCSI command is really a passthru command */
1491 /* */
1492 /****************************************************************************/
1493 static int ips_is_passthru(struct scsi_cmnd *SC)
1494 {
1495 unsigned long flags;
1496
1497 METHOD_TRACE("ips_is_passthru", 1);
1498
1499 if (!SC)
1500 return (0);
1501
1502 if ((SC->cmnd[0] == IPS_IOCTL_COMMAND) &&
1503 (SC->device->channel == 0) &&
1504 (SC->device->id == IPS_ADAPTER_ID) &&
1505 (SC->device->lun == 0) && scsi_sglist(SC)) {
1506 struct scatterlist *sg = scsi_sglist(SC);
1507 char *buffer;
1508
1509 /* kmap_atomic() ensures addressability of the user buffer.*/
1510 /* local_irq_save() protects the KM_IRQ0 address slot. */
1511 local_irq_save(flags);
1512 buffer = kmap_atomic(sg_page(sg)) + sg->offset;
1513 if (buffer && buffer[0] == 'C' && buffer[1] == 'O' &&
1514 buffer[2] == 'P' && buffer[3] == 'P') {
1515 kunmap_atomic(buffer - sg->offset);
1516 local_irq_restore(flags);
1517 return 1;
1518 }
1519 kunmap_atomic(buffer - sg->offset);
1520 local_irq_restore(flags);
1521 }
1522 return 0;
1523 }
1524
1525 /****************************************************************************/
1526 /* */
1527 /* Routine Name: ips_alloc_passthru_buffer */
1528 /* */
1529 /* Routine Description: */
1530 /* allocate a buffer large enough for the ioctl data if the ioctl buffer */
1531 /* is too small or doesn't exist */
1532 /****************************************************************************/
1533 static int
1534 ips_alloc_passthru_buffer(ips_ha_t * ha, int length)
1535 {
1536 void *bigger_buf;
1537 dma_addr_t dma_busaddr;
1538
1539 if (ha->ioctl_data && length <= ha->ioctl_len)
1540 return 0;
1541 /* there is no buffer or it's not big enough, allocate a new one */
1542 bigger_buf = pci_alloc_consistent(ha->pcidev, length, &dma_busaddr);
1543 if (bigger_buf) {
1544 /* free the old memory */
1545 pci_free_consistent(ha->pcidev, ha->ioctl_len, ha->ioctl_data,
1546 ha->ioctl_busaddr);
1547 /* use the new memory */
1548 ha->ioctl_data = (char *) bigger_buf;
1549 ha->ioctl_len = length;
1550 ha->ioctl_busaddr = dma_busaddr;
1551 } else {
1552 return -1;
1553 }
1554 return 0;
1555 }
1556
1557 /****************************************************************************/
1558 /* */
1559 /* Routine Name: ips_make_passthru */
1560 /* */
1561 /* Routine Description: */
1562 /* */
1563 /* Make a passthru command out of the info in the Scsi block */
1564 /* */
1565 /****************************************************************************/
1566 static int
1567 ips_make_passthru(ips_ha_t *ha, struct scsi_cmnd *SC, ips_scb_t *scb, int intr)
1568 {
1569 ips_passthru_t *pt;
1570 int length = 0;
1571 int i, ret;
1572 struct scatterlist *sg = scsi_sglist(SC);
1573
1574 METHOD_TRACE("ips_make_passthru", 1);
1575
1576 scsi_for_each_sg(SC, sg, scsi_sg_count(SC), i)
1577 length += sg->length;
1578
1579 if (length < sizeof (ips_passthru_t)) {
1580 /* wrong size */
1581 DEBUG_VAR(1, "(%s%d) Passthru structure wrong size",
1582 ips_name, ha->host_num);
1583 return (IPS_FAILURE);
1584 }
1585 if (ips_alloc_passthru_buffer(ha, length)) {
1586 /* allocation failure! If ha->ioctl_data exists, use it to return
1587 some error codes. Return a failed command to the scsi layer. */
1588 if (ha->ioctl_data) {
1589 pt = (ips_passthru_t *) ha->ioctl_data;
1590 ips_scmd_buf_read(SC, pt, sizeof (ips_passthru_t));
1591 pt->BasicStatus = 0x0B;
1592 pt->ExtendedStatus = 0x00;
1593 ips_scmd_buf_write(SC, pt, sizeof (ips_passthru_t));
1594 }
1595 return IPS_FAILURE;
1596 }
1597 ha->ioctl_datasize = length;
1598
1599 ips_scmd_buf_read(SC, ha->ioctl_data, ha->ioctl_datasize);
1600 pt = (ips_passthru_t *) ha->ioctl_data;
1601
1602 /*
1603 * Some notes about the passthru interface used
1604 *
1605 * IF the scsi op_code == 0x0d then we assume
1606 * that the data came along with/goes with the
1607 * packet we received from the sg driver. In this
1608 * case the CmdBSize field of the pt structure is
1609 * used for the size of the buffer.
1610 */
1611
1612 switch (pt->CoppCmd) {
1613 case IPS_NUMCTRLS:
1614 memcpy(ha->ioctl_data + sizeof (ips_passthru_t),
1615 &ips_num_controllers, sizeof (int));
1616 ips_scmd_buf_write(SC, ha->ioctl_data,
1617 sizeof (ips_passthru_t) + sizeof (int));
1618 SC->result = DID_OK << 16;
1619
1620 return (IPS_SUCCESS_IMM);
1621
1622 case IPS_COPPUSRCMD:
1623 case IPS_COPPIOCCMD:
1624 if (SC->cmnd[0] == IPS_IOCTL_COMMAND) {
1625 if (length < (sizeof (ips_passthru_t) + pt->CmdBSize)) {
1626 /* wrong size */
1627 DEBUG_VAR(1,
1628 "(%s%d) Passthru structure wrong size",
1629 ips_name, ha->host_num);
1630
1631 return (IPS_FAILURE);
1632 }
1633
1634 if (ha->pcidev->device == IPS_DEVICEID_COPPERHEAD &&
1635 pt->CoppCP.cmd.flashfw.op_code ==
1636 IPS_CMD_RW_BIOSFW) {
1637 ret = ips_flash_copperhead(ha, pt, scb);
1638 ips_scmd_buf_write(SC, ha->ioctl_data,
1639 sizeof (ips_passthru_t));
1640 return ret;
1641 }
1642 if (ips_usrcmd(ha, pt, scb))
1643 return (IPS_SUCCESS);
1644 else
1645 return (IPS_FAILURE);
1646 }
1647
1648 break;
1649
1650 } /* end switch */
1651
1652 return (IPS_FAILURE);
1653 }
1654
1655 /****************************************************************************/
1656 /* Routine Name: ips_flash_copperhead */
1657 /* Routine Description: */
1658 /* Flash the BIOS/FW on a Copperhead style controller */
1659 /****************************************************************************/
1660 static int
1661 ips_flash_copperhead(ips_ha_t * ha, ips_passthru_t * pt, ips_scb_t * scb)
1662 {
1663 int datasize;
1664
1665 /* Trombone is the only copperhead that can do packet flash, but only
1666 * for firmware. No one said it had to make sense. */
1667 if (IPS_IS_TROMBONE(ha) && pt->CoppCP.cmd.flashfw.type == IPS_FW_IMAGE) {
1668 if (ips_usrcmd(ha, pt, scb))
1669 return IPS_SUCCESS;
1670 else
1671 return IPS_FAILURE;
1672 }
1673 pt->BasicStatus = 0x0B;
1674 pt->ExtendedStatus = 0;
1675 scb->scsi_cmd->result = DID_OK << 16;
1676 /* IF it's OK to Use the "CD BOOT" Flash Buffer, then you can */
1677 /* avoid allocating a huge buffer per adapter ( which can fail ). */
1678 if (pt->CoppCP.cmd.flashfw.type == IPS_BIOS_IMAGE &&
1679 pt->CoppCP.cmd.flashfw.direction == IPS_ERASE_BIOS) {
1680 pt->BasicStatus = 0;
1681 return ips_flash_bios(ha, pt, scb);
1682 } else if (pt->CoppCP.cmd.flashfw.packet_num == 0) {
1683 if (ips_FlashData && !test_and_set_bit(0, &ips_FlashDataInUse)){
1684 ha->flash_data = ips_FlashData;
1685 ha->flash_busaddr = ips_flashbusaddr;
1686 ha->flash_len = PAGE_SIZE << 7;
1687 ha->flash_datasize = 0;
1688 } else if (!ha->flash_data) {
1689 datasize = pt->CoppCP.cmd.flashfw.total_packets *
1690 pt->CoppCP.cmd.flashfw.count;
1691 ha->flash_data = pci_alloc_consistent(ha->pcidev,
1692 datasize,
1693 &ha->flash_busaddr);
1694 if (!ha->flash_data){
1695 printk(KERN_WARNING "Unable to allocate a flash buffer\n");
1696 return IPS_FAILURE;
1697 }
1698 ha->flash_datasize = 0;
1699 ha->flash_len = datasize;
1700 } else
1701 return IPS_FAILURE;
1702 } else {
1703 if (pt->CoppCP.cmd.flashfw.count + ha->flash_datasize >
1704 ha->flash_len) {
1705 ips_free_flash_copperhead(ha);
1706 IPS_PRINTK(KERN_WARNING, ha->pcidev,
1707 "failed size sanity check\n");
1708 return IPS_FAILURE;
1709 }
1710 }
1711 if (!ha->flash_data)
1712 return IPS_FAILURE;
1713 pt->BasicStatus = 0;
1714 memcpy(&ha->flash_data[ha->flash_datasize], pt + 1,
1715 pt->CoppCP.cmd.flashfw.count);
1716 ha->flash_datasize += pt->CoppCP.cmd.flashfw.count;
1717 if (pt->CoppCP.cmd.flashfw.packet_num ==
1718 pt->CoppCP.cmd.flashfw.total_packets - 1) {
1719 if (pt->CoppCP.cmd.flashfw.type == IPS_BIOS_IMAGE)
1720 return ips_flash_bios(ha, pt, scb);
1721 else if (pt->CoppCP.cmd.flashfw.type == IPS_FW_IMAGE)
1722 return ips_flash_firmware(ha, pt, scb);
1723 }
1724 return IPS_SUCCESS_IMM;
1725 }
1726
1727 /****************************************************************************/
1728 /* Routine Name: ips_flash_bios */
1729 /* Routine Description: */
1730 /* flashes the bios of a copperhead adapter */
1731 /****************************************************************************/
1732 static int
1733 ips_flash_bios(ips_ha_t * ha, ips_passthru_t * pt, ips_scb_t * scb)
1734 {
1735
1736 if (pt->CoppCP.cmd.flashfw.type == IPS_BIOS_IMAGE &&
1737 pt->CoppCP.cmd.flashfw.direction == IPS_WRITE_BIOS) {
1738 if ((!ha->func.programbios) || (!ha->func.erasebios) ||
1739 (!ha->func.verifybios))
1740 goto error;
1741 if ((*ha->func.erasebios) (ha)) {
1742 DEBUG_VAR(1,
1743 "(%s%d) flash bios failed - unable to erase flash",
1744 ips_name, ha->host_num);
1745 goto error;
1746 } else
1747 if ((*ha->func.programbios) (ha,
1748 ha->flash_data +
1749 IPS_BIOS_HEADER,
1750 ha->flash_datasize -
1751 IPS_BIOS_HEADER, 0)) {
1752 DEBUG_VAR(1,
1753 "(%s%d) flash bios failed - unable to flash",
1754 ips_name, ha->host_num);
1755 goto error;
1756 } else
1757 if ((*ha->func.verifybios) (ha,
1758 ha->flash_data +
1759 IPS_BIOS_HEADER,
1760 ha->flash_datasize -
1761 IPS_BIOS_HEADER, 0)) {
1762 DEBUG_VAR(1,
1763 "(%s%d) flash bios failed - unable to verify flash",
1764 ips_name, ha->host_num);
1765 goto error;
1766 }
1767 ips_free_flash_copperhead(ha);
1768 return IPS_SUCCESS_IMM;
1769 } else if (pt->CoppCP.cmd.flashfw.type == IPS_BIOS_IMAGE &&
1770 pt->CoppCP.cmd.flashfw.direction == IPS_ERASE_BIOS) {
1771 if (!ha->func.erasebios)
1772 goto error;
1773 if ((*ha->func.erasebios) (ha)) {
1774 DEBUG_VAR(1,
1775 "(%s%d) flash bios failed - unable to erase flash",
1776 ips_name, ha->host_num);
1777 goto error;
1778 }
1779 return IPS_SUCCESS_IMM;
1780 }
1781 error:
1782 pt->BasicStatus = 0x0B;
1783 pt->ExtendedStatus = 0x00;
1784 ips_free_flash_copperhead(ha);
1785 return IPS_FAILURE;
1786 }
1787
1788 /****************************************************************************/
1789 /* */
1790 /* Routine Name: ips_fill_scb_sg_single */
1791 /* */
1792 /* Routine Description: */
1793 /* Fill in a single scb sg_list element from an address */
1794 /* return a -1 if a breakup occurred */
1795 /****************************************************************************/
1796 static int
1797 ips_fill_scb_sg_single(ips_ha_t * ha, dma_addr_t busaddr,
1798 ips_scb_t * scb, int indx, unsigned int e_len)
1799 {
1800
1801 int ret_val = 0;
1802
1803 if ((scb->data_len + e_len) > ha->max_xfer) {
1804 e_len = ha->max_xfer - scb->data_len;
1805 scb->breakup = indx;
1806 ++scb->sg_break;
1807 ret_val = -1;
1808 } else {
1809 scb->breakup = 0;
1810 scb->sg_break = 0;
1811 }
1812 if (IPS_USE_ENH_SGLIST(ha)) {
1813 scb->sg_list.enh_list[indx].address_lo =
1814 cpu_to_le32(pci_dma_lo32(busaddr));
1815 scb->sg_list.enh_list[indx].address_hi =
1816 cpu_to_le32(pci_dma_hi32(busaddr));
1817 scb->sg_list.enh_list[indx].length = cpu_to_le32(e_len);
1818 } else {
1819 scb->sg_list.std_list[indx].address =
1820 cpu_to_le32(pci_dma_lo32(busaddr));
1821 scb->sg_list.std_list[indx].length = cpu_to_le32(e_len);
1822 }
1823
1824 ++scb->sg_len;
1825 scb->data_len += e_len;
1826 return ret_val;
1827 }
1828
1829 /****************************************************************************/
1830 /* Routine Name: ips_flash_firmware */
1831 /* Routine Description: */
1832 /* flashes the firmware of a copperhead adapter */
1833 /****************************************************************************/
1834 static int
1835 ips_flash_firmware(ips_ha_t * ha, ips_passthru_t * pt, ips_scb_t * scb)
1836 {
1837 IPS_SG_LIST sg_list;
1838 uint32_t cmd_busaddr;
1839
1840 if (pt->CoppCP.cmd.flashfw.type == IPS_FW_IMAGE &&
1841 pt->CoppCP.cmd.flashfw.direction == IPS_WRITE_FW) {
1842 memset(&pt->CoppCP.cmd, 0, sizeof (IPS_HOST_COMMAND));
1843 pt->CoppCP.cmd.flashfw.op_code = IPS_CMD_DOWNLOAD;
1844 pt->CoppCP.cmd.flashfw.count = cpu_to_le32(ha->flash_datasize);
1845 } else {
1846 pt->BasicStatus = 0x0B;
1847 pt->ExtendedStatus = 0x00;
1848 ips_free_flash_copperhead(ha);
1849 return IPS_FAILURE;
1850 }
1851 /* Save the S/G list pointer so it doesn't get clobbered */
1852 sg_list.list = scb->sg_list.list;
1853 cmd_busaddr = scb->scb_busaddr;
1854 /* copy in the CP */
1855 memcpy(&scb->cmd, &pt->CoppCP.cmd, sizeof (IPS_IOCTL_CMD));
1856 /* FIX stuff that might be wrong */
1857 scb->sg_list.list = sg_list.list;
1858 scb->scb_busaddr = cmd_busaddr;
1859 scb->bus = scb->scsi_cmd->device->channel;
1860 scb->target_id = scb->scsi_cmd->device->id;
1861 scb->lun = scb->scsi_cmd->device->lun;
1862 scb->sg_len = 0;
1863 scb->data_len = 0;
1864 scb->flags = 0;
1865 scb->op_code = 0;
1866 scb->callback = ipsintr_done;
1867 scb->timeout = ips_cmd_timeout;
1868
1869 scb->data_len = ha->flash_datasize;
1870 scb->data_busaddr =
1871 pci_map_single(ha->pcidev, ha->flash_data, scb->data_len,
1872 IPS_DMA_DIR(scb));
1873 scb->flags |= IPS_SCB_MAP_SINGLE;
1874 scb->cmd.flashfw.command_id = IPS_COMMAND_ID(ha, scb);
1875 scb->cmd.flashfw.buffer_addr = cpu_to_le32(scb->data_busaddr);
1876 if (pt->TimeOut)
1877 scb->timeout = pt->TimeOut;
1878 scb->scsi_cmd->result = DID_OK << 16;
1879 return IPS_SUCCESS;
1880 }
1881
1882 /****************************************************************************/
1883 /* Routine Name: ips_free_flash_copperhead */
1884 /* Routine Description: */
1885 /* release the memory resources used to hold the flash image */
1886 /****************************************************************************/
1887 static void
1888 ips_free_flash_copperhead(ips_ha_t * ha)
1889 {
1890 if (ha->flash_data == ips_FlashData)
1891 test_and_clear_bit(0, &ips_FlashDataInUse);
1892 else if (ha->flash_data)
1893 pci_free_consistent(ha->pcidev, ha->flash_len, ha->flash_data,
1894 ha->flash_busaddr);
1895 ha->flash_data = NULL;
1896 }
1897
1898 /****************************************************************************/
1899 /* */
1900 /* Routine Name: ips_usrcmd */
1901 /* */
1902 /* Routine Description: */
1903 /* */
1904 /* Process a user command and make it ready to send */
1905 /* */
1906 /****************************************************************************/
1907 static int
1908 ips_usrcmd(ips_ha_t * ha, ips_passthru_t * pt, ips_scb_t * scb)
1909 {
1910 IPS_SG_LIST sg_list;
1911 uint32_t cmd_busaddr;
1912
1913 METHOD_TRACE("ips_usrcmd", 1);
1914
1915 if ((!scb) || (!pt) || (!ha))
1916 return (0);
1917
1918 /* Save the S/G list pointer so it doesn't get clobbered */
1919 sg_list.list = scb->sg_list.list;
1920 cmd_busaddr = scb->scb_busaddr;
1921 /* copy in the CP */
1922 memcpy(&scb->cmd, &pt->CoppCP.cmd, sizeof (IPS_IOCTL_CMD));
1923 memcpy(&scb->dcdb, &pt->CoppCP.dcdb, sizeof (IPS_DCDB_TABLE));
1924
1925 /* FIX stuff that might be wrong */
1926 scb->sg_list.list = sg_list.list;
1927 scb->scb_busaddr = cmd_busaddr;
1928 scb->bus = scb->scsi_cmd->device->channel;
1929 scb->target_id = scb->scsi_cmd->device->id;
1930 scb->lun = scb->scsi_cmd->device->lun;
1931 scb->sg_len = 0;
1932 scb->data_len = 0;
1933 scb->flags = 0;
1934 scb->op_code = 0;
1935 scb->callback = ipsintr_done;
1936 scb->timeout = ips_cmd_timeout;
1937 scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
1938
1939 /* we don't support DCDB/READ/WRITE Scatter Gather */
1940 if ((scb->cmd.basic_io.op_code == IPS_CMD_READ_SG) ||
1941 (scb->cmd.basic_io.op_code == IPS_CMD_WRITE_SG) ||
1942 (scb->cmd.basic_io.op_code == IPS_CMD_DCDB_SG))
1943 return (0);
1944
1945 if (pt->CmdBSize) {
1946 scb->data_len = pt->CmdBSize;
1947 scb->data_busaddr = ha->ioctl_busaddr + sizeof (ips_passthru_t);
1948 } else {
1949 scb->data_busaddr = 0L;
1950 }
1951
1952 if (scb->cmd.dcdb.op_code == IPS_CMD_DCDB)
1953 scb->cmd.dcdb.dcdb_address = cpu_to_le32(scb->scb_busaddr +
1954 (unsigned long) &scb->
1955 dcdb -
1956 (unsigned long) scb);
1957
1958 if (pt->CmdBSize) {
1959 if (scb->cmd.dcdb.op_code == IPS_CMD_DCDB)
1960 scb->dcdb.buffer_pointer =
1961 cpu_to_le32(scb->data_busaddr);
1962 else
1963 scb->cmd.basic_io.sg_addr =
1964 cpu_to_le32(scb->data_busaddr);
1965 }
1966
1967 /* set timeouts */
1968 if (pt->TimeOut) {
1969 scb->timeout = pt->TimeOut;
1970
1971 if (pt->TimeOut <= 10)
1972 scb->dcdb.cmd_attribute |= IPS_TIMEOUT10;
1973 else if (pt->TimeOut <= 60)
1974 scb->dcdb.cmd_attribute |= IPS_TIMEOUT60;
1975 else
1976 scb->dcdb.cmd_attribute |= IPS_TIMEOUT20M;
1977 }
1978
1979 /* assume success */
1980 scb->scsi_cmd->result = DID_OK << 16;
1981
1982 /* success */
1983 return (1);
1984 }
1985
1986 /****************************************************************************/
1987 /* */
1988 /* Routine Name: ips_cleanup_passthru */
1989 /* */
1990 /* Routine Description: */
1991 /* */
1992 /* Cleanup after a passthru command */
1993 /* */
1994 /****************************************************************************/
1995 static void
1996 ips_cleanup_passthru(ips_ha_t * ha, ips_scb_t * scb)
1997 {
1998 ips_passthru_t *pt;
1999
2000 METHOD_TRACE("ips_cleanup_passthru", 1);
2001
2002 if ((!scb) || (!scb->scsi_cmd) || (!scsi_sglist(scb->scsi_cmd))) {
2003 DEBUG_VAR(1, "(%s%d) couldn't cleanup after passthru",
2004 ips_name, ha->host_num);
2005
2006 return;
2007 }
2008 pt = (ips_passthru_t *) ha->ioctl_data;
2009
2010 /* Copy data back to the user */
2011 if (scb->cmd.dcdb.op_code == IPS_CMD_DCDB) /* Copy DCDB Back to Caller's Area */
2012 memcpy(&pt->CoppCP.dcdb, &scb->dcdb, sizeof (IPS_DCDB_TABLE));
2013
2014 pt->BasicStatus = scb->basic_status;
2015 pt->ExtendedStatus = scb->extended_status;
2016 pt->AdapterType = ha->ad_type;
2017
2018 if (ha->pcidev->device == IPS_DEVICEID_COPPERHEAD &&
2019 (scb->cmd.flashfw.op_code == IPS_CMD_DOWNLOAD ||
2020 scb->cmd.flashfw.op_code == IPS_CMD_RW_BIOSFW))
2021 ips_free_flash_copperhead(ha);
2022
2023 ips_scmd_buf_write(scb->scsi_cmd, ha->ioctl_data, ha->ioctl_datasize);
2024 }
2025
2026 /****************************************************************************/
2027 /* */
2028 /* Routine Name: ips_host_info */
2029 /* */
2030 /* Routine Description: */
2031 /* */
2032 /* The passthru interface for the driver */
2033 /* */
2034 /****************************************************************************/
2035 static int
2036 ips_host_info(ips_ha_t *ha, struct seq_file *m)
2037 {
2038 METHOD_TRACE("ips_host_info", 1);
2039
2040 seq_printf(m, "\nIBM ServeRAID General Information:\n\n");
2041
2042 if ((le32_to_cpu(ha->nvram->signature) == IPS_NVRAM_P5_SIG) &&
2043 (le16_to_cpu(ha->nvram->adapter_type) != 0))
2044 seq_printf(m, "\tController Type : %s\n",
2045 ips_adapter_name[ha->ad_type - 1]);
2046 else
2047 seq_printf(m,
2048 "\tController Type : Unknown\n");
2049
2050 if (ha->io_addr)
2051 seq_printf(m,
2052 "\tIO region : 0x%x (%d bytes)\n",
2053 ha->io_addr, ha->io_len);
2054
2055 if (ha->mem_addr) {
2056 seq_printf(m,
2057 "\tMemory region : 0x%x (%d bytes)\n",
2058 ha->mem_addr, ha->mem_len);
2059 seq_printf(m,
2060 "\tShared memory address : 0x%lx\n",
2061 (unsigned long)ha->mem_ptr);
2062 }
2063
2064 seq_printf(m, "\tIRQ number : %d\n", ha->pcidev->irq);
2065
2066 /* For the Next 3 lines Check for Binary 0 at the end and don't include it if it's there. */
2067 /* That keeps everything happy for "text" operations on the proc file. */
2068
2069 if (le32_to_cpu(ha->nvram->signature) == IPS_NVRAM_P5_SIG) {
2070 if (ha->nvram->bios_low[3] == 0) {
2071 seq_printf(m,
2072 "\tBIOS Version : %c%c%c%c%c%c%c\n",
2073 ha->nvram->bios_high[0], ha->nvram->bios_high[1],
2074 ha->nvram->bios_high[2], ha->nvram->bios_high[3],
2075 ha->nvram->bios_low[0], ha->nvram->bios_low[1],
2076 ha->nvram->bios_low[2]);
2077
2078 } else {
2079 seq_printf(m,
2080 "\tBIOS Version : %c%c%c%c%c%c%c%c\n",
2081 ha->nvram->bios_high[0], ha->nvram->bios_high[1],
2082 ha->nvram->bios_high[2], ha->nvram->bios_high[3],
2083 ha->nvram->bios_low[0], ha->nvram->bios_low[1],
2084 ha->nvram->bios_low[2], ha->nvram->bios_low[3]);
2085 }
2086
2087 }
2088
2089 if (ha->enq->CodeBlkVersion[7] == 0) {
2090 seq_printf(m,
2091 "\tFirmware Version : %c%c%c%c%c%c%c\n",
2092 ha->enq->CodeBlkVersion[0], ha->enq->CodeBlkVersion[1],
2093 ha->enq->CodeBlkVersion[2], ha->enq->CodeBlkVersion[3],
2094 ha->enq->CodeBlkVersion[4], ha->enq->CodeBlkVersion[5],
2095 ha->enq->CodeBlkVersion[6]);
2096 } else {
2097 seq_printf(m,
2098 "\tFirmware Version : %c%c%c%c%c%c%c%c\n",
2099 ha->enq->CodeBlkVersion[0], ha->enq->CodeBlkVersion[1],
2100 ha->enq->CodeBlkVersion[2], ha->enq->CodeBlkVersion[3],
2101 ha->enq->CodeBlkVersion[4], ha->enq->CodeBlkVersion[5],
2102 ha->enq->CodeBlkVersion[6], ha->enq->CodeBlkVersion[7]);
2103 }
2104
2105 if (ha->enq->BootBlkVersion[7] == 0) {
2106 seq_printf(m,
2107 "\tBoot Block Version : %c%c%c%c%c%c%c\n",
2108 ha->enq->BootBlkVersion[0], ha->enq->BootBlkVersion[1],
2109 ha->enq->BootBlkVersion[2], ha->enq->BootBlkVersion[3],
2110 ha->enq->BootBlkVersion[4], ha->enq->BootBlkVersion[5],
2111 ha->enq->BootBlkVersion[6]);
2112 } else {
2113 seq_printf(m,
2114 "\tBoot Block Version : %c%c%c%c%c%c%c%c\n",
2115 ha->enq->BootBlkVersion[0], ha->enq->BootBlkVersion[1],
2116 ha->enq->BootBlkVersion[2], ha->enq->BootBlkVersion[3],
2117 ha->enq->BootBlkVersion[4], ha->enq->BootBlkVersion[5],
2118 ha->enq->BootBlkVersion[6], ha->enq->BootBlkVersion[7]);
2119 }
2120
2121 seq_printf(m, "\tDriver Version : %s%s\n",
2122 IPS_VERSION_HIGH, IPS_VERSION_LOW);
2123
2124 seq_printf(m, "\tDriver Build : %d\n",
2125 IPS_BUILD_IDENT);
2126
2127 seq_printf(m, "\tMax Physical Devices : %d\n",
2128 ha->enq->ucMaxPhysicalDevices);
2129 seq_printf(m, "\tMax Active Commands : %d\n",
2130 ha->max_cmds);
2131 seq_printf(m, "\tCurrent Queued Commands : %d\n",
2132 ha->scb_waitlist.count);
2133 seq_printf(m, "\tCurrent Active Commands : %d\n",
2134 ha->scb_activelist.count - ha->num_ioctl);
2135 seq_printf(m, "\tCurrent Queued PT Commands : %d\n",
2136 ha->copp_waitlist.count);
2137 seq_printf(m, "\tCurrent Active PT Commands : %d\n",
2138 ha->num_ioctl);
2139
2140 seq_printf(m, "\n");
2141
2142 return 0;
2143 }
2144
2145 /****************************************************************************/
2146 /* */
2147 /* Routine Name: ips_identify_controller */
2148 /* */
2149 /* Routine Description: */
2150 /* */
2151 /* Identify this controller */
2152 /* */
2153 /****************************************************************************/
2154 static void
2155 ips_identify_controller(ips_ha_t * ha)
2156 {
2157 METHOD_TRACE("ips_identify_controller", 1);
2158
2159 switch (ha->pcidev->device) {
2160 case IPS_DEVICEID_COPPERHEAD:
2161 if (ha->pcidev->revision <= IPS_REVID_SERVERAID) {
2162 ha->ad_type = IPS_ADTYPE_SERVERAID;
2163 } else if (ha->pcidev->revision == IPS_REVID_SERVERAID2) {
2164 ha->ad_type = IPS_ADTYPE_SERVERAID2;
2165 } else if (ha->pcidev->revision == IPS_REVID_NAVAJO) {
2166 ha->ad_type = IPS_ADTYPE_NAVAJO;
2167 } else if ((ha->pcidev->revision == IPS_REVID_SERVERAID2)
2168 && (ha->slot_num == 0)) {
2169 ha->ad_type = IPS_ADTYPE_KIOWA;
2170 } else if ((ha->pcidev->revision >= IPS_REVID_CLARINETP1) &&
2171 (ha->pcidev->revision <= IPS_REVID_CLARINETP3)) {
2172 if (ha->enq->ucMaxPhysicalDevices == 15)
2173 ha->ad_type = IPS_ADTYPE_SERVERAID3L;
2174 else
2175 ha->ad_type = IPS_ADTYPE_SERVERAID3;
2176 } else if ((ha->pcidev->revision >= IPS_REVID_TROMBONE32) &&
2177 (ha->pcidev->revision <= IPS_REVID_TROMBONE64)) {
2178 ha->ad_type = IPS_ADTYPE_SERVERAID4H;
2179 }
2180 break;
2181
2182 case IPS_DEVICEID_MORPHEUS:
2183 switch (ha->pcidev->subsystem_device) {
2184 case IPS_SUBDEVICEID_4L:
2185 ha->ad_type = IPS_ADTYPE_SERVERAID4L;
2186 break;
2187
2188 case IPS_SUBDEVICEID_4M:
2189 ha->ad_type = IPS_ADTYPE_SERVERAID4M;
2190 break;
2191
2192 case IPS_SUBDEVICEID_4MX:
2193 ha->ad_type = IPS_ADTYPE_SERVERAID4MX;
2194 break;
2195
2196 case IPS_SUBDEVICEID_4LX:
2197 ha->ad_type = IPS_ADTYPE_SERVERAID4LX;
2198 break;
2199
2200 case IPS_SUBDEVICEID_5I2:
2201 ha->ad_type = IPS_ADTYPE_SERVERAID5I2;
2202 break;
2203
2204 case IPS_SUBDEVICEID_5I1:
2205 ha->ad_type = IPS_ADTYPE_SERVERAID5I1;
2206 break;
2207 }
2208
2209 break;
2210
2211 case IPS_DEVICEID_MARCO:
2212 switch (ha->pcidev->subsystem_device) {
2213 case IPS_SUBDEVICEID_6M:
2214 ha->ad_type = IPS_ADTYPE_SERVERAID6M;
2215 break;
2216 case IPS_SUBDEVICEID_6I:
2217 ha->ad_type = IPS_ADTYPE_SERVERAID6I;
2218 break;
2219 case IPS_SUBDEVICEID_7k:
2220 ha->ad_type = IPS_ADTYPE_SERVERAID7k;
2221 break;
2222 case IPS_SUBDEVICEID_7M:
2223 ha->ad_type = IPS_ADTYPE_SERVERAID7M;
2224 break;
2225 }
2226 break;
2227 }
2228 }
2229
2230 /****************************************************************************/
2231 /* */
2232 /* Routine Name: ips_get_bios_version */
2233 /* */
2234 /* Routine Description: */
2235 /* */
2236 /* Get the BIOS revision number */
2237 /* */
2238 /****************************************************************************/
2239 static void
2240 ips_get_bios_version(ips_ha_t * ha, int intr)
2241 {
2242 ips_scb_t *scb;
2243 int ret;
2244 uint8_t major;
2245 uint8_t minor;
2246 uint8_t subminor;
2247 uint8_t *buffer;
2248 char hexDigits[] =
2249 { '0', '1', '2', '3', '4', '5', '6', '7', '8', '9', 'A', 'B', 'C',
2250 'D', 'E', 'F' };
2251
2252 METHOD_TRACE("ips_get_bios_version", 1);
2253
2254 major = 0;
2255 minor = 0;
2256
2257 strncpy(ha->bios_version, " ?", 8);
2258
2259 if (ha->pcidev->device == IPS_DEVICEID_COPPERHEAD) {
2260 if (IPS_USE_MEMIO(ha)) {
2261 /* Memory Mapped I/O */
2262
2263 /* test 1st byte */
2264 writel(0, ha->mem_ptr + IPS_REG_FLAP);
2265 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2266 udelay(25); /* 25 us */
2267
2268 if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0x55)
2269 return;
2270
2271 writel(1, ha->mem_ptr + IPS_REG_FLAP);
2272 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2273 udelay(25); /* 25 us */
2274
2275 if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0xAA)
2276 return;
2277
2278 /* Get Major version */
2279 writel(0x1FF, ha->mem_ptr + IPS_REG_FLAP);
2280 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2281 udelay(25); /* 25 us */
2282
2283 major = readb(ha->mem_ptr + IPS_REG_FLDP);
2284
2285 /* Get Minor version */
2286 writel(0x1FE, ha->mem_ptr + IPS_REG_FLAP);
2287 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2288 udelay(25); /* 25 us */
2289 minor = readb(ha->mem_ptr + IPS_REG_FLDP);
2290
2291 /* Get SubMinor version */
2292 writel(0x1FD, ha->mem_ptr + IPS_REG_FLAP);
2293 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2294 udelay(25); /* 25 us */
2295 subminor = readb(ha->mem_ptr + IPS_REG_FLDP);
2296
2297 } else {
2298 /* Programmed I/O */
2299
2300 /* test 1st byte */
2301 outl(0, ha->io_addr + IPS_REG_FLAP);
2302 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2303 udelay(25); /* 25 us */
2304
2305 if (inb(ha->io_addr + IPS_REG_FLDP) != 0x55)
2306 return;
2307
2308 outl(1, ha->io_addr + IPS_REG_FLAP);
2309 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2310 udelay(25); /* 25 us */
2311
2312 if (inb(ha->io_addr + IPS_REG_FLDP) != 0xAA)
2313 return;
2314
2315 /* Get Major version */
2316 outl(0x1FF, ha->io_addr + IPS_REG_FLAP);
2317 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2318 udelay(25); /* 25 us */
2319
2320 major = inb(ha->io_addr + IPS_REG_FLDP);
2321
2322 /* Get Minor version */
2323 outl(0x1FE, ha->io_addr + IPS_REG_FLAP);
2324 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2325 udelay(25); /* 25 us */
2326
2327 minor = inb(ha->io_addr + IPS_REG_FLDP);
2328
2329 /* Get SubMinor version */
2330 outl(0x1FD, ha->io_addr + IPS_REG_FLAP);
2331 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2332 udelay(25); /* 25 us */
2333
2334 subminor = inb(ha->io_addr + IPS_REG_FLDP);
2335
2336 }
2337 } else {
2338 /* Morpheus Family - Send Command to the card */
2339
2340 buffer = ha->ioctl_data;
2341
2342 memset(buffer, 0, 0x1000);
2343
2344 scb = &ha->scbs[ha->max_cmds - 1];
2345
2346 ips_init_scb(ha, scb);
2347
2348 scb->timeout = ips_cmd_timeout;
2349 scb->cdb[0] = IPS_CMD_RW_BIOSFW;
2350
2351 scb->cmd.flashfw.op_code = IPS_CMD_RW_BIOSFW;
2352 scb->cmd.flashfw.command_id = IPS_COMMAND_ID(ha, scb);
2353 scb->cmd.flashfw.type = 1;
2354 scb->cmd.flashfw.direction = 0;
2355 scb->cmd.flashfw.count = cpu_to_le32(0x800);
2356 scb->cmd.flashfw.total_packets = 1;
2357 scb->cmd.flashfw.packet_num = 0;
2358 scb->data_len = 0x1000;
2359 scb->cmd.flashfw.buffer_addr = ha->ioctl_busaddr;
2360
2361 /* issue the command */
2362 if (((ret =
2363 ips_send_wait(ha, scb, ips_cmd_timeout,
2364 intr)) == IPS_FAILURE)
2365 || (ret == IPS_SUCCESS_IMM)
2366 || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1)) {
2367 /* Error occurred */
2368
2369 return;
2370 }
2371
2372 if ((buffer[0xC0] == 0x55) && (buffer[0xC1] == 0xAA)) {
2373 major = buffer[0x1ff + 0xC0]; /* Offset 0x1ff after the header (0xc0) */
2374 minor = buffer[0x1fe + 0xC0]; /* Offset 0x1fe after the header (0xc0) */
2375 subminor = buffer[0x1fd + 0xC0]; /* Offset 0x1fd after the header (0xc0) */
2376 } else {
2377 return;
2378 }
2379 }
2380
2381 ha->bios_version[0] = hexDigits[(major & 0xF0) >> 4];
2382 ha->bios_version[1] = '.';
2383 ha->bios_version[2] = hexDigits[major & 0x0F];
2384 ha->bios_version[3] = hexDigits[subminor];
2385 ha->bios_version[4] = '.';
2386 ha->bios_version[5] = hexDigits[(minor & 0xF0) >> 4];
2387 ha->bios_version[6] = hexDigits[minor & 0x0F];
2388 ha->bios_version[7] = 0;
2389 }
2390
2391 /****************************************************************************/
2392 /* */
2393 /* Routine Name: ips_hainit */
2394 /* */
2395 /* Routine Description: */
2396 /* */
2397 /* Initialize the controller */
2398 /* */
2399 /* NOTE: Assumes to be called from with a lock */
2400 /* */
2401 /****************************************************************************/
2402 static int
2403 ips_hainit(ips_ha_t * ha)
2404 {
2405 int i;
2406 struct timeval tv;
2407
2408 METHOD_TRACE("ips_hainit", 1);
2409
2410 if (!ha)
2411 return (0);
2412
2413 if (ha->func.statinit)
2414 (*ha->func.statinit) (ha);
2415
2416 if (ha->func.enableint)
2417 (*ha->func.enableint) (ha);
2418
2419 /* Send FFDC */
2420 ha->reset_count = 1;
2421 do_gettimeofday(&tv);
2422 ha->last_ffdc = tv.tv_sec;
2423 ips_ffdc_reset(ha, IPS_INTR_IORL);
2424
2425 if (!ips_read_config(ha, IPS_INTR_IORL)) {
2426 IPS_PRINTK(KERN_WARNING, ha->pcidev,
2427 "unable to read config from controller.\n");
2428
2429 return (0);
2430 }
2431 /* end if */
2432 if (!ips_read_adapter_status(ha, IPS_INTR_IORL)) {
2433 IPS_PRINTK(KERN_WARNING, ha->pcidev,
2434 "unable to read controller status.\n");
2435
2436 return (0);
2437 }
2438
2439 /* Identify this controller */
2440 ips_identify_controller(ha);
2441
2442 if (!ips_read_subsystem_parameters(ha, IPS_INTR_IORL)) {
2443 IPS_PRINTK(KERN_WARNING, ha->pcidev,
2444 "unable to read subsystem parameters.\n");
2445
2446 return (0);
2447 }
2448
2449 /* write nvram user page 5 */
2450 if (!ips_write_driver_status(ha, IPS_INTR_IORL)) {
2451 IPS_PRINTK(KERN_WARNING, ha->pcidev,
2452 "unable to write driver info to controller.\n");
2453
2454 return (0);
2455 }
2456
2457 /* If there are Logical Drives and a Reset Occurred, then an EraseStripeLock is Needed */
2458 if ((ha->conf->ucLogDriveCount > 0) && (ha->requires_esl == 1))
2459 ips_clear_adapter(ha, IPS_INTR_IORL);
2460
2461 /* set limits on SID, LUN, BUS */
2462 ha->ntargets = IPS_MAX_TARGETS + 1;
2463 ha->nlun = 1;
2464 ha->nbus = (ha->enq->ucMaxPhysicalDevices / IPS_MAX_TARGETS) + 1;
2465
2466 switch (ha->conf->logical_drive[0].ucStripeSize) {
2467 case 4:
2468 ha->max_xfer = 0x10000;
2469 break;
2470
2471 case 5:
2472 ha->max_xfer = 0x20000;
2473 break;
2474
2475 case 6:
2476 ha->max_xfer = 0x40000;
2477 break;
2478
2479 case 7:
2480 default:
2481 ha->max_xfer = 0x80000;
2482 break;
2483 }
2484
2485 /* setup max concurrent commands */
2486 if (le32_to_cpu(ha->subsys->param[4]) & 0x1) {
2487 /* Use the new method */
2488 ha->max_cmds = ha->enq->ucConcurrentCmdCount;
2489 } else {
2490 /* use the old method */
2491 switch (ha->conf->logical_drive[0].ucStripeSize) {
2492 case 4:
2493 ha->max_cmds = 32;
2494 break;
2495
2496 case 5:
2497 ha->max_cmds = 16;
2498 break;
2499
2500 case 6:
2501 ha->max_cmds = 8;
2502 break;
2503
2504 case 7:
2505 default:
2506 ha->max_cmds = 4;
2507 break;
2508 }
2509 }
2510
2511 /* Limit the Active Commands on a Lite Adapter */
2512 if ((ha->ad_type == IPS_ADTYPE_SERVERAID3L) ||
2513 (ha->ad_type == IPS_ADTYPE_SERVERAID4L) ||
2514 (ha->ad_type == IPS_ADTYPE_SERVERAID4LX)) {
2515 if ((ha->max_cmds > MaxLiteCmds) && (MaxLiteCmds))
2516 ha->max_cmds = MaxLiteCmds;
2517 }
2518
2519 /* set controller IDs */
2520 ha->ha_id[0] = IPS_ADAPTER_ID;
2521 for (i = 1; i < ha->nbus; i++) {
2522 ha->ha_id[i] = ha->conf->init_id[i - 1] & 0x1f;
2523 ha->dcdb_active[i - 1] = 0;
2524 }
2525
2526 return (1);
2527 }
2528
2529 /****************************************************************************/
2530 /* */
2531 /* Routine Name: ips_next */
2532 /* */
2533 /* Routine Description: */
2534 /* */
2535 /* Take the next command off the queue and send it to the controller */
2536 /* */
2537 /****************************************************************************/
2538 static void
2539 ips_next(ips_ha_t * ha, int intr)
2540 {
2541 ips_scb_t *scb;
2542 struct scsi_cmnd *SC;
2543 struct scsi_cmnd *p;
2544 struct scsi_cmnd *q;
2545 ips_copp_wait_item_t *item;
2546 int ret;
2547 struct Scsi_Host *host;
2548 METHOD_TRACE("ips_next", 1);
2549
2550 if (!ha)
2551 return;
2552 host = ips_sh[ha->host_num];
2553 /*
2554 * Block access to the queue function so
2555 * this command won't time out
2556 */
2557 if (intr == IPS_INTR_ON)
2558 spin_lock(host->host_lock);
2559
2560 if ((ha->subsys->param[3] & 0x300000)
2561 && (ha->scb_activelist.count == 0)) {
2562 struct timeval tv;
2563
2564 do_gettimeofday(&tv);
2565
2566 if (tv.tv_sec - ha->last_ffdc > IPS_SECS_8HOURS) {
2567 ha->last_ffdc = tv.tv_sec;
2568 ips_ffdc_time(ha);
2569 }
2570 }
2571
2572 /*
2573 * Send passthru commands
2574 * These have priority over normal I/O
2575 * but shouldn't affect performance too much
2576 * since we limit the number that can be active
2577 * on the card at any one time
2578 */
2579 while ((ha->num_ioctl < IPS_MAX_IOCTL) &&
2580 (ha->copp_waitlist.head) && (scb = ips_getscb(ha))) {
2581
2582 item = ips_removeq_copp_head(&ha->copp_waitlist);
2583 ha->num_ioctl++;
2584 if (intr == IPS_INTR_ON)
2585 spin_unlock(host->host_lock);
2586 scb->scsi_cmd = item->scsi_cmd;
2587 kfree(item);
2588
2589 ret = ips_make_passthru(ha, scb->scsi_cmd, scb, intr);
2590
2591 if (intr == IPS_INTR_ON)
2592 spin_lock(host->host_lock);
2593 switch (ret) {
2594 case IPS_FAILURE:
2595 if (scb->scsi_cmd) {
2596 scb->scsi_cmd->result = DID_ERROR << 16;
2597 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
2598 }
2599
2600 ips_freescb(ha, scb);
2601 break;
2602 case IPS_SUCCESS_IMM:
2603 if (scb->scsi_cmd) {
2604 scb->scsi_cmd->result = DID_OK << 16;
2605 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
2606 }
2607
2608 ips_freescb(ha, scb);
2609 break;
2610 default:
2611 break;
2612 } /* end case */
2613
2614 if (ret != IPS_SUCCESS) {
2615 ha->num_ioctl--;
2616 continue;
2617 }
2618
2619 ret = ips_send_cmd(ha, scb);
2620
2621 if (ret == IPS_SUCCESS)
2622 ips_putq_scb_head(&ha->scb_activelist, scb);
2623 else
2624 ha->num_ioctl--;
2625
2626 switch (ret) {
2627 case IPS_FAILURE:
2628 if (scb->scsi_cmd) {
2629 scb->scsi_cmd->result = DID_ERROR << 16;
2630 }
2631
2632 ips_freescb(ha, scb);
2633 break;
2634 case IPS_SUCCESS_IMM:
2635 ips_freescb(ha, scb);
2636 break;
2637 default:
2638 break;
2639 } /* end case */
2640
2641 }
2642
2643 /*
2644 * Send "Normal" I/O commands
2645 */
2646
2647 p = ha->scb_waitlist.head;
2648 while ((p) && (scb = ips_getscb(ha))) {
2649 if ((scmd_channel(p) > 0)
2650 && (ha->
2651 dcdb_active[scmd_channel(p) -
2652 1] & (1 << scmd_id(p)))) {
2653 ips_freescb(ha, scb);
2654 p = (struct scsi_cmnd *) p->host_scribble;
2655 continue;
2656 }
2657
2658 q = p;
2659 SC = ips_removeq_wait(&ha->scb_waitlist, q);
2660
2661 if (intr == IPS_INTR_ON)
2662 spin_unlock(host->host_lock); /* Unlock HA after command is taken off queue */
2663
2664 SC->result = DID_OK;
2665 SC->host_scribble = NULL;
2666
2667 scb->target_id = SC->device->id;
2668 scb->lun = SC->device->lun;
2669 scb->bus = SC->device->channel;
2670 scb->scsi_cmd = SC;
2671 scb->breakup = 0;
2672 scb->data_len = 0;
2673 scb->callback = ipsintr_done;
2674 scb->timeout = ips_cmd_timeout;
2675 memset(&scb->cmd, 0, 16);
2676
2677 /* copy in the CDB */
2678 memcpy(scb->cdb, SC->cmnd, SC->cmd_len);
2679
2680 scb->sg_count = scsi_dma_map(SC);
2681 BUG_ON(scb->sg_count < 0);
2682 if (scb->sg_count) {
2683 struct scatterlist *sg;
2684 int i;
2685
2686 scb->flags |= IPS_SCB_MAP_SG;
2687
2688 scsi_for_each_sg(SC, sg, scb->sg_count, i) {
2689 if (ips_fill_scb_sg_single
2690 (ha, sg_dma_address(sg), scb, i,
2691 sg_dma_len(sg)) < 0)
2692 break;
2693 }
2694 scb->dcdb.transfer_length = scb->data_len;
2695 } else {
2696 scb->data_busaddr = 0L;
2697 scb->sg_len = 0;
2698 scb->data_len = 0;
2699 scb->dcdb.transfer_length = 0;
2700 }
2701
2702 scb->dcdb.cmd_attribute =
2703 ips_command_direction[scb->scsi_cmd->cmnd[0]];
2704
2705 /* Allow a WRITE BUFFER Command to Have no Data */
2706 /* This is Used by Tape Flash Utilites */
2707 if ((scb->scsi_cmd->cmnd[0] == WRITE_BUFFER) &&
2708 (scb->data_len == 0))
2709 scb->dcdb.cmd_attribute = 0;
2710
2711 if (!(scb->dcdb.cmd_attribute & 0x3))
2712 scb->dcdb.transfer_length = 0;
2713
2714 if (scb->data_len >= IPS_MAX_XFER) {
2715 scb->dcdb.cmd_attribute |= IPS_TRANSFER64K;
2716 scb->dcdb.transfer_length = 0;
2717 }
2718 if (intr == IPS_INTR_ON)
2719 spin_lock(host->host_lock);
2720
2721 ret = ips_send_cmd(ha, scb);
2722
2723 switch (ret) {
2724 case IPS_SUCCESS:
2725 ips_putq_scb_head(&ha->scb_activelist, scb);
2726 break;
2727 case IPS_FAILURE:
2728 if (scb->scsi_cmd) {
2729 scb->scsi_cmd->result = DID_ERROR << 16;
2730 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
2731 }
2732
2733 if (scb->bus)
2734 ha->dcdb_active[scb->bus - 1] &=
2735 ~(1 << scb->target_id);
2736
2737 ips_freescb(ha, scb);
2738 break;
2739 case IPS_SUCCESS_IMM:
2740 if (scb->scsi_cmd)
2741 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
2742
2743 if (scb->bus)
2744 ha->dcdb_active[scb->bus - 1] &=
2745 ~(1 << scb->target_id);
2746
2747 ips_freescb(ha, scb);
2748 break;
2749 default:
2750 break;
2751 } /* end case */
2752
2753 p = (struct scsi_cmnd *) p->host_scribble;
2754
2755 } /* end while */
2756
2757 if (intr == IPS_INTR_ON)
2758 spin_unlock(host->host_lock);
2759 }
2760
2761 /****************************************************************************/
2762 /* */
2763 /* Routine Name: ips_putq_scb_head */
2764 /* */
2765 /* Routine Description: */
2766 /* */
2767 /* Add an item to the head of the queue */
2768 /* */
2769 /* ASSUMED to be called from within the HA lock */
2770 /* */
2771 /****************************************************************************/
2772 static void
2773 ips_putq_scb_head(ips_scb_queue_t * queue, ips_scb_t * item)
2774 {
2775 METHOD_TRACE("ips_putq_scb_head", 1);
2776
2777 if (!item)
2778 return;
2779
2780 item->q_next = queue->head;
2781 queue->head = item;
2782
2783 if (!queue->tail)
2784 queue->tail = item;
2785
2786 queue->count++;
2787 }
2788
2789 /****************************************************************************/
2790 /* */
2791 /* Routine Name: ips_removeq_scb_head */
2792 /* */
2793 /* Routine Description: */
2794 /* */
2795 /* Remove the head of the queue */
2796 /* */
2797 /* ASSUMED to be called from within the HA lock */
2798 /* */
2799 /****************************************************************************/
2800 static ips_scb_t *
2801 ips_removeq_scb_head(ips_scb_queue_t * queue)
2802 {
2803 ips_scb_t *item;
2804
2805 METHOD_TRACE("ips_removeq_scb_head", 1);
2806
2807 item = queue->head;
2808
2809 if (!item) {
2810 return (NULL);
2811 }
2812
2813 queue->head = item->q_next;
2814 item->q_next = NULL;
2815
2816 if (queue->tail == item)
2817 queue->tail = NULL;
2818
2819 queue->count--;
2820
2821 return (item);
2822 }
2823
2824 /****************************************************************************/
2825 /* */
2826 /* Routine Name: ips_removeq_scb */
2827 /* */
2828 /* Routine Description: */
2829 /* */
2830 /* Remove an item from a queue */
2831 /* */
2832 /* ASSUMED to be called from within the HA lock */
2833 /* */
2834 /****************************************************************************/
2835 static ips_scb_t *
2836 ips_removeq_scb(ips_scb_queue_t * queue, ips_scb_t * item)
2837 {
2838 ips_scb_t *p;
2839
2840 METHOD_TRACE("ips_removeq_scb", 1);
2841
2842 if (!item)
2843 return (NULL);
2844
2845 if (item == queue->head) {
2846 return (ips_removeq_scb_head(queue));
2847 }
2848
2849 p = queue->head;
2850
2851 while ((p) && (item != p->q_next))
2852 p = p->q_next;
2853
2854 if (p) {
2855 /* found a match */
2856 p->q_next = item->q_next;
2857
2858 if (!item->q_next)
2859 queue->tail = p;
2860
2861 item->q_next = NULL;
2862 queue->count--;
2863
2864 return (item);
2865 }
2866
2867 return (NULL);
2868 }
2869
2870 /****************************************************************************/
2871 /* */
2872 /* Routine Name: ips_putq_wait_tail */
2873 /* */
2874 /* Routine Description: */
2875 /* */
2876 /* Add an item to the tail of the queue */
2877 /* */
2878 /* ASSUMED to be called from within the HA lock */
2879 /* */
2880 /****************************************************************************/
2881 static void ips_putq_wait_tail(ips_wait_queue_t *queue, struct scsi_cmnd *item)
2882 {
2883 METHOD_TRACE("ips_putq_wait_tail", 1);
2884
2885 if (!item)
2886 return;
2887
2888 item->host_scribble = NULL;
2889
2890 if (queue->tail)
2891 queue->tail->host_scribble = (char *) item;
2892
2893 queue->tail = item;
2894
2895 if (!queue->head)
2896 queue->head = item;
2897
2898 queue->count++;
2899 }
2900
2901 /****************************************************************************/
2902 /* */
2903 /* Routine Name: ips_removeq_wait_head */
2904 /* */
2905 /* Routine Description: */
2906 /* */
2907 /* Remove the head of the queue */
2908 /* */
2909 /* ASSUMED to be called from within the HA lock */
2910 /* */
2911 /****************************************************************************/
2912 static struct scsi_cmnd *ips_removeq_wait_head(ips_wait_queue_t *queue)
2913 {
2914 struct scsi_cmnd *item;
2915
2916 METHOD_TRACE("ips_removeq_wait_head", 1);
2917
2918 item = queue->head;
2919
2920 if (!item) {
2921 return (NULL);
2922 }
2923
2924 queue->head = (struct scsi_cmnd *) item->host_scribble;
2925 item->host_scribble = NULL;
2926
2927 if (queue->tail == item)
2928 queue->tail = NULL;
2929
2930 queue->count--;
2931
2932 return (item);
2933 }
2934
2935 /****************************************************************************/
2936 /* */
2937 /* Routine Name: ips_removeq_wait */
2938 /* */
2939 /* Routine Description: */
2940 /* */
2941 /* Remove an item from a queue */
2942 /* */
2943 /* ASSUMED to be called from within the HA lock */
2944 /* */
2945 /****************************************************************************/
2946 static struct scsi_cmnd *ips_removeq_wait(ips_wait_queue_t *queue,
2947 struct scsi_cmnd *item)
2948 {
2949 struct scsi_cmnd *p;
2950
2951 METHOD_TRACE("ips_removeq_wait", 1);
2952
2953 if (!item)
2954 return (NULL);
2955
2956 if (item == queue->head) {
2957 return (ips_removeq_wait_head(queue));
2958 }
2959
2960 p = queue->head;
2961
2962 while ((p) && (item != (struct scsi_cmnd *) p->host_scribble))
2963 p = (struct scsi_cmnd *) p->host_scribble;
2964
2965 if (p) {
2966 /* found a match */
2967 p->host_scribble = item->host_scribble;
2968
2969 if (!item->host_scribble)
2970 queue->tail = p;
2971
2972 item->host_scribble = NULL;
2973 queue->count--;
2974
2975 return (item);
2976 }
2977
2978 return (NULL);
2979 }
2980
2981 /****************************************************************************/
2982 /* */
2983 /* Routine Name: ips_putq_copp_tail */
2984 /* */
2985 /* Routine Description: */
2986 /* */
2987 /* Add an item to the tail of the queue */
2988 /* */
2989 /* ASSUMED to be called from within the HA lock */
2990 /* */
2991 /****************************************************************************/
2992 static void
2993 ips_putq_copp_tail(ips_copp_queue_t * queue, ips_copp_wait_item_t * item)
2994 {
2995 METHOD_TRACE("ips_putq_copp_tail", 1);
2996
2997 if (!item)
2998 return;
2999
3000 item->next = NULL;
3001
3002 if (queue->tail)
3003 queue->tail->next = item;
3004
3005 queue->tail = item;
3006
3007 if (!queue->head)
3008 queue->head = item;
3009
3010 queue->count++;
3011 }
3012
3013 /****************************************************************************/
3014 /* */
3015 /* Routine Name: ips_removeq_copp_head */
3016 /* */
3017 /* Routine Description: */
3018 /* */
3019 /* Remove the head of the queue */
3020 /* */
3021 /* ASSUMED to be called from within the HA lock */
3022 /* */
3023 /****************************************************************************/
3024 static ips_copp_wait_item_t *
3025 ips_removeq_copp_head(ips_copp_queue_t * queue)
3026 {
3027 ips_copp_wait_item_t *item;
3028
3029 METHOD_TRACE("ips_removeq_copp_head", 1);
3030
3031 item = queue->head;
3032
3033 if (!item) {
3034 return (NULL);
3035 }
3036
3037 queue->head = item->next;
3038 item->next = NULL;
3039
3040 if (queue->tail == item)
3041 queue->tail = NULL;
3042
3043 queue->count--;
3044
3045 return (item);
3046 }
3047
3048 /****************************************************************************/
3049 /* */
3050 /* Routine Name: ips_removeq_copp */
3051 /* */
3052 /* Routine Description: */
3053 /* */
3054 /* Remove an item from a queue */
3055 /* */
3056 /* ASSUMED to be called from within the HA lock */
3057 /* */
3058 /****************************************************************************/
3059 static ips_copp_wait_item_t *
3060 ips_removeq_copp(ips_copp_queue_t * queue, ips_copp_wait_item_t * item)
3061 {
3062 ips_copp_wait_item_t *p;
3063
3064 METHOD_TRACE("ips_removeq_copp", 1);
3065
3066 if (!item)
3067 return (NULL);
3068
3069 if (item == queue->head) {
3070 return (ips_removeq_copp_head(queue));
3071 }
3072
3073 p = queue->head;
3074
3075 while ((p) && (item != p->next))
3076 p = p->next;
3077
3078 if (p) {
3079 /* found a match */
3080 p->next = item->next;
3081
3082 if (!item->next)
3083 queue->tail = p;
3084
3085 item->next = NULL;
3086 queue->count--;
3087
3088 return (item);
3089 }
3090
3091 return (NULL);
3092 }
3093
3094 /****************************************************************************/
3095 /* */
3096 /* Routine Name: ipsintr_blocking */
3097 /* */
3098 /* Routine Description: */
3099 /* */
3100 /* Finalize an interrupt for internal commands */
3101 /* */
3102 /****************************************************************************/
3103 static void
3104 ipsintr_blocking(ips_ha_t * ha, ips_scb_t * scb)
3105 {
3106 METHOD_TRACE("ipsintr_blocking", 2);
3107
3108 ips_freescb(ha, scb);
3109 if ((ha->waitflag == TRUE) && (ha->cmd_in_progress == scb->cdb[0])) {
3110 ha->waitflag = FALSE;
3111
3112 return;
3113 }
3114 }
3115
3116 /****************************************************************************/
3117 /* */
3118 /* Routine Name: ipsintr_done */
3119 /* */
3120 /* Routine Description: */
3121 /* */
3122 /* Finalize an interrupt for non-internal commands */
3123 /* */
3124 /****************************************************************************/
3125 static void
3126 ipsintr_done(ips_ha_t * ha, ips_scb_t * scb)
3127 {
3128 METHOD_TRACE("ipsintr_done", 2);
3129
3130 if (!scb) {
3131 IPS_PRINTK(KERN_WARNING, ha->pcidev,
3132 "Spurious interrupt; scb NULL.\n");
3133
3134 return;
3135 }
3136
3137 if (scb->scsi_cmd == NULL) {
3138 /* unexpected interrupt */
3139 IPS_PRINTK(KERN_WARNING, ha->pcidev,
3140 "Spurious interrupt; scsi_cmd not set.\n");
3141
3142 return;
3143 }
3144
3145 ips_done(ha, scb);
3146 }
3147
3148 /****************************************************************************/
3149 /* */
3150 /* Routine Name: ips_done */
3151 /* */
3152 /* Routine Description: */
3153 /* */
3154 /* Do housekeeping on completed commands */
3155 /* ASSUMED to be called form within the request lock */
3156 /****************************************************************************/
3157 static void
3158 ips_done(ips_ha_t * ha, ips_scb_t * scb)
3159 {
3160 int ret;
3161
3162 METHOD_TRACE("ips_done", 1);
3163
3164 if (!scb)
3165 return;
3166
3167 if ((scb->scsi_cmd) && (ips_is_passthru(scb->scsi_cmd))) {
3168 ips_cleanup_passthru(ha, scb);
3169 ha->num_ioctl--;
3170 } else {
3171 /*
3172 * Check to see if this command had too much
3173 * data and had to be broke up. If so, queue
3174 * the rest of the data and continue.
3175 */
3176 if ((scb->breakup) || (scb->sg_break)) {
3177 struct scatterlist *sg;
3178 int i, sg_dma_index, ips_sg_index = 0;
3179
3180 /* we had a data breakup */
3181 scb->data_len = 0;
3182
3183 sg = scsi_sglist(scb->scsi_cmd);
3184
3185 /* Spin forward to last dma chunk */
3186 sg_dma_index = scb->breakup;
3187 for (i = 0; i < scb->breakup; i++)
3188 sg = sg_next(sg);
3189
3190 /* Take care of possible partial on last chunk */
3191 ips_fill_scb_sg_single(ha,
3192 sg_dma_address(sg),
3193 scb, ips_sg_index++,
3194 sg_dma_len(sg));
3195
3196 for (; sg_dma_index < scsi_sg_count(scb->scsi_cmd);
3197 sg_dma_index++, sg = sg_next(sg)) {
3198 if (ips_fill_scb_sg_single
3199 (ha,
3200 sg_dma_address(sg),
3201 scb, ips_sg_index++,
3202 sg_dma_len(sg)) < 0)
3203 break;
3204 }
3205
3206 scb->dcdb.transfer_length = scb->data_len;
3207 scb->dcdb.cmd_attribute |=
3208 ips_command_direction[scb->scsi_cmd->cmnd[0]];
3209
3210 if (!(scb->dcdb.cmd_attribute & 0x3))
3211 scb->dcdb.transfer_length = 0;
3212
3213 if (scb->data_len >= IPS_MAX_XFER) {
3214 scb->dcdb.cmd_attribute |= IPS_TRANSFER64K;
3215 scb->dcdb.transfer_length = 0;
3216 }
3217
3218 ret = ips_send_cmd(ha, scb);
3219
3220 switch (ret) {
3221 case IPS_FAILURE:
3222 if (scb->scsi_cmd) {
3223 scb->scsi_cmd->result = DID_ERROR << 16;
3224 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
3225 }
3226
3227 ips_freescb(ha, scb);
3228 break;
3229 case IPS_SUCCESS_IMM:
3230 if (scb->scsi_cmd) {
3231 scb->scsi_cmd->result = DID_ERROR << 16;
3232 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
3233 }
3234
3235 ips_freescb(ha, scb);
3236 break;
3237 default:
3238 break;
3239 } /* end case */
3240
3241 return;
3242 }
3243 } /* end if passthru */
3244
3245 if (scb->bus) {
3246 ha->dcdb_active[scb->bus - 1] &= ~(1 << scb->target_id);
3247 }
3248
3249 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
3250
3251 ips_freescb(ha, scb);
3252 }
3253
3254 /****************************************************************************/
3255 /* */
3256 /* Routine Name: ips_map_status */
3257 /* */
3258 /* Routine Description: */
3259 /* */
3260 /* Map Controller Error codes to Linux Error Codes */
3261 /* */
3262 /****************************************************************************/
3263 static int
3264 ips_map_status(ips_ha_t * ha, ips_scb_t * scb, ips_stat_t * sp)
3265 {
3266 int errcode;
3267 int device_error;
3268 uint32_t transfer_len;
3269 IPS_DCDB_TABLE_TAPE *tapeDCDB;
3270 IPS_SCSI_INQ_DATA inquiryData;
3271
3272 METHOD_TRACE("ips_map_status", 1);
3273
3274 if (scb->bus) {
3275 DEBUG_VAR(2,
3276 "(%s%d) Physical device error (%d %d %d): %x %x, Sense Key: %x, ASC: %x, ASCQ: %x",
3277 ips_name, ha->host_num,
3278 scb->scsi_cmd->device->channel,
3279 scb->scsi_cmd->device->id, scb->scsi_cmd->device->lun,
3280 scb->basic_status, scb->extended_status,
3281 scb->extended_status ==
3282 IPS_ERR_CKCOND ? scb->dcdb.sense_info[2] & 0xf : 0,
3283 scb->extended_status ==
3284 IPS_ERR_CKCOND ? scb->dcdb.sense_info[12] : 0,
3285 scb->extended_status ==
3286 IPS_ERR_CKCOND ? scb->dcdb.sense_info[13] : 0);
3287 }
3288
3289 /* default driver error */
3290 errcode = DID_ERROR;
3291 device_error = 0;
3292
3293 switch (scb->basic_status & IPS_GSC_STATUS_MASK) {
3294 case IPS_CMD_TIMEOUT:
3295 errcode = DID_TIME_OUT;
3296 break;
3297
3298 case IPS_INVAL_OPCO:
3299 case IPS_INVAL_CMD_BLK:
3300 case IPS_INVAL_PARM_BLK:
3301 case IPS_LD_ERROR:
3302 case IPS_CMD_CMPLT_WERROR:
3303 break;
3304
3305 case IPS_PHYS_DRV_ERROR:
3306 switch (scb->extended_status) {
3307 case IPS_ERR_SEL_TO:
3308 if (scb->bus)
3309 errcode = DID_NO_CONNECT;
3310
3311 break;
3312
3313 case IPS_ERR_OU_RUN:
3314 if ((scb->cmd.dcdb.op_code == IPS_CMD_EXTENDED_DCDB) ||
3315 (scb->cmd.dcdb.op_code ==
3316 IPS_CMD_EXTENDED_DCDB_SG)) {
3317 tapeDCDB = (IPS_DCDB_TABLE_TAPE *) & scb->dcdb;
3318 transfer_len = tapeDCDB->transfer_length;
3319 } else {
3320 transfer_len =
3321 (uint32_t) scb->dcdb.transfer_length;
3322 }
3323
3324 if ((scb->bus) && (transfer_len < scb->data_len)) {
3325 /* Underrun - set default to no error */
3326 errcode = DID_OK;
3327
3328 /* Restrict access to physical DASD */
3329 if (scb->scsi_cmd->cmnd[0] == INQUIRY) {
3330 ips_scmd_buf_read(scb->scsi_cmd,
3331 &inquiryData, sizeof (inquiryData));
3332 if ((inquiryData.DeviceType & 0x1f) == TYPE_DISK) {
3333 errcode = DID_TIME_OUT;
3334 break;
3335 }
3336 }
3337 } else
3338 errcode = DID_ERROR;
3339
3340 break;
3341
3342 case IPS_ERR_RECOVERY:
3343 /* don't fail recovered errors */
3344 if (scb->bus)
3345 errcode = DID_OK;
3346
3347 break;
3348
3349 case IPS_ERR_HOST_RESET:
3350 case IPS_ERR_DEV_RESET:
3351 errcode = DID_RESET;
3352 break;
3353
3354 case IPS_ERR_CKCOND:
3355 if (scb->bus) {
3356 if ((scb->cmd.dcdb.op_code ==
3357 IPS_CMD_EXTENDED_DCDB)
3358 || (scb->cmd.dcdb.op_code ==
3359 IPS_CMD_EXTENDED_DCDB_SG)) {
3360 tapeDCDB =
3361 (IPS_DCDB_TABLE_TAPE *) & scb->dcdb;
3362 memcpy(scb->scsi_cmd->sense_buffer,
3363 tapeDCDB->sense_info,
3364 SCSI_SENSE_BUFFERSIZE);
3365 } else {
3366 memcpy(scb->scsi_cmd->sense_buffer,
3367 scb->dcdb.sense_info,
3368 SCSI_SENSE_BUFFERSIZE);
3369 }
3370 device_error = 2; /* check condition */
3371 }
3372
3373 errcode = DID_OK;
3374
3375 break;
3376
3377 default:
3378 errcode = DID_ERROR;
3379 break;
3380
3381 } /* end switch */
3382 } /* end switch */
3383
3384 scb->scsi_cmd->result = device_error | (errcode << 16);
3385
3386 return (1);
3387 }
3388
3389 /****************************************************************************/
3390 /* */
3391 /* Routine Name: ips_send_wait */
3392 /* */
3393 /* Routine Description: */
3394 /* */
3395 /* Send a command to the controller and wait for it to return */
3396 /* */
3397 /* The FFDC Time Stamp use this function for the callback, but doesn't */
3398 /* actually need to wait. */
3399 /****************************************************************************/
3400 static int
3401 ips_send_wait(ips_ha_t * ha, ips_scb_t * scb, int timeout, int intr)
3402 {
3403 int ret;
3404
3405 METHOD_TRACE("ips_send_wait", 1);
3406
3407 if (intr != IPS_FFDC) { /* Won't be Waiting if this is a Time Stamp */
3408 ha->waitflag = TRUE;
3409 ha->cmd_in_progress = scb->cdb[0];
3410 }
3411 scb->callback = ipsintr_blocking;
3412 ret = ips_send_cmd(ha, scb);
3413
3414 if ((ret == IPS_FAILURE) || (ret == IPS_SUCCESS_IMM))
3415 return (ret);
3416
3417 if (intr != IPS_FFDC) /* Don't Wait around if this is a Time Stamp */
3418 ret = ips_wait(ha, timeout, intr);
3419
3420 return (ret);
3421 }
3422
3423 /****************************************************************************/
3424 /* */
3425 /* Routine Name: ips_scmd_buf_write */
3426 /* */
3427 /* Routine Description: */
3428 /* Write data to struct scsi_cmnd request_buffer at proper offsets */
3429 /****************************************************************************/
3430 static void
3431 ips_scmd_buf_write(struct scsi_cmnd *scmd, void *data, unsigned int count)
3432 {
3433 unsigned long flags;
3434
3435 local_irq_save(flags);
3436 scsi_sg_copy_from_buffer(scmd, data, count);
3437 local_irq_restore(flags);
3438 }
3439
3440 /****************************************************************************/
3441 /* */
3442 /* Routine Name: ips_scmd_buf_read */
3443 /* */
3444 /* Routine Description: */
3445 /* Copy data from a struct scsi_cmnd to a new, linear buffer */
3446 /****************************************************************************/
3447 static void
3448 ips_scmd_buf_read(struct scsi_cmnd *scmd, void *data, unsigned int count)
3449 {
3450 unsigned long flags;
3451
3452 local_irq_save(flags);
3453 scsi_sg_copy_to_buffer(scmd, data, count);
3454 local_irq_restore(flags);
3455 }
3456
3457 /****************************************************************************/
3458 /* */
3459 /* Routine Name: ips_send_cmd */
3460 /* */
3461 /* Routine Description: */
3462 /* */
3463 /* Map SCSI commands to ServeRAID commands for logical drives */
3464 /* */
3465 /****************************************************************************/
3466 static int
3467 ips_send_cmd(ips_ha_t * ha, ips_scb_t * scb)
3468 {
3469 int ret;
3470 char *sp;
3471 int device_error;
3472 IPS_DCDB_TABLE_TAPE *tapeDCDB;
3473 int TimeOut;
3474
3475 METHOD_TRACE("ips_send_cmd", 1);
3476
3477 ret = IPS_SUCCESS;
3478
3479 if (!scb->scsi_cmd) {
3480 /* internal command */
3481
3482 if (scb->bus > 0) {
3483 /* Controller commands can't be issued */
3484 /* to real devices -- fail them */
3485 if ((ha->waitflag == TRUE) &&
3486 (ha->cmd_in_progress == scb->cdb[0])) {
3487 ha->waitflag = FALSE;
3488 }
3489
3490 return (1);
3491 }
3492 } else if ((scb->bus == 0) && (!ips_is_passthru(scb->scsi_cmd))) {
3493 /* command to logical bus -- interpret */
3494 ret = IPS_SUCCESS_IMM;
3495
3496 switch (scb->scsi_cmd->cmnd[0]) {
3497 case ALLOW_MEDIUM_REMOVAL:
3498 case REZERO_UNIT:
3499 case ERASE:
3500 case WRITE_FILEMARKS:
3501 case SPACE:
3502 scb->scsi_cmd->result = DID_ERROR << 16;
3503 break;
3504
3505 case START_STOP:
3506 scb->scsi_cmd->result = DID_OK << 16;
3507
3508 case TEST_UNIT_READY:
3509 case INQUIRY:
3510 if (scb->target_id == IPS_ADAPTER_ID) {
3511 /*
3512 * Either we have a TUR
3513 * or we have a SCSI inquiry
3514 */
3515 if (scb->scsi_cmd->cmnd[0] == TEST_UNIT_READY)
3516 scb->scsi_cmd->result = DID_OK << 16;
3517
3518 if (scb->scsi_cmd->cmnd[0] == INQUIRY) {
3519 IPS_SCSI_INQ_DATA inquiry;
3520
3521 memset(&inquiry, 0,
3522 sizeof (IPS_SCSI_INQ_DATA));
3523
3524 inquiry.DeviceType =
3525 IPS_SCSI_INQ_TYPE_PROCESSOR;
3526 inquiry.DeviceTypeQualifier =
3527 IPS_SCSI_INQ_LU_CONNECTED;
3528 inquiry.Version = IPS_SCSI_INQ_REV2;
3529 inquiry.ResponseDataFormat =
3530 IPS_SCSI_INQ_RD_REV2;
3531 inquiry.AdditionalLength = 31;
3532 inquiry.Flags[0] =
3533 IPS_SCSI_INQ_Address16;
3534 inquiry.Flags[1] =
3535 IPS_SCSI_INQ_WBus16 |
3536 IPS_SCSI_INQ_Sync;
3537 strncpy(inquiry.VendorId, "IBM ",
3538 8);
3539 strncpy(inquiry.ProductId,
3540 "SERVERAID ", 16);
3541 strncpy(inquiry.ProductRevisionLevel,
3542 "1.00", 4);
3543
3544 ips_scmd_buf_write(scb->scsi_cmd,
3545 &inquiry,
3546 sizeof (inquiry));
3547
3548 scb->scsi_cmd->result = DID_OK << 16;
3549 }
3550 } else {
3551 scb->cmd.logical_info.op_code = IPS_CMD_GET_LD_INFO;
3552 scb->cmd.logical_info.command_id = IPS_COMMAND_ID(ha, scb);
3553 scb->cmd.logical_info.reserved = 0;
3554 scb->cmd.logical_info.reserved2 = 0;
3555 scb->data_len = sizeof (IPS_LD_INFO);
3556 scb->data_busaddr = ha->logical_drive_info_dma_addr;
3557 scb->flags = 0;
3558 scb->cmd.logical_info.buffer_addr = scb->data_busaddr;
3559 ret = IPS_SUCCESS;
3560 }
3561
3562 break;
3563
3564 case REQUEST_SENSE:
3565 ips_reqsen(ha, scb);
3566 scb->scsi_cmd->result = DID_OK << 16;
3567 break;
3568
3569 case READ_6:
3570 case WRITE_6:
3571 if (!scb->sg_len) {
3572 scb->cmd.basic_io.op_code =
3573 (scb->scsi_cmd->cmnd[0] ==
3574 READ_6) ? IPS_CMD_READ : IPS_CMD_WRITE;
3575 scb->cmd.basic_io.enhanced_sg = 0;
3576 scb->cmd.basic_io.sg_addr =
3577 cpu_to_le32(scb->data_busaddr);
3578 } else {
3579 scb->cmd.basic_io.op_code =
3580 (scb->scsi_cmd->cmnd[0] ==
3581 READ_6) ? IPS_CMD_READ_SG :
3582 IPS_CMD_WRITE_SG;
3583 scb->cmd.basic_io.enhanced_sg =
3584 IPS_USE_ENH_SGLIST(ha) ? 0xFF : 0;
3585 scb->cmd.basic_io.sg_addr =
3586 cpu_to_le32(scb->sg_busaddr);
3587 }
3588
3589 scb->cmd.basic_io.segment_4G = 0;
3590 scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
3591 scb->cmd.basic_io.log_drv = scb->target_id;
3592 scb->cmd.basic_io.sg_count = scb->sg_len;
3593
3594 if (scb->cmd.basic_io.lba)
3595 le32_add_cpu(&scb->cmd.basic_io.lba,
3596 le16_to_cpu(scb->cmd.basic_io.
3597 sector_count));
3598 else
3599 scb->cmd.basic_io.lba =
3600 (((scb->scsi_cmd->
3601 cmnd[1] & 0x1f) << 16) | (scb->scsi_cmd->
3602 cmnd[2] << 8) |
3603 (scb->scsi_cmd->cmnd[3]));
3604
3605 scb->cmd.basic_io.sector_count =
3606 cpu_to_le16(scb->data_len / IPS_BLKSIZE);
3607
3608 if (le16_to_cpu(scb->cmd.basic_io.sector_count) == 0)
3609 scb->cmd.basic_io.sector_count =
3610 cpu_to_le16(256);
3611
3612 ret = IPS_SUCCESS;
3613 break;
3614
3615 case READ_10:
3616 case WRITE_10:
3617 if (!scb->sg_len) {
3618 scb->cmd.basic_io.op_code =
3619 (scb->scsi_cmd->cmnd[0] ==
3620 READ_10) ? IPS_CMD_READ : IPS_CMD_WRITE;
3621 scb->cmd.basic_io.enhanced_sg = 0;
3622 scb->cmd.basic_io.sg_addr =
3623 cpu_to_le32(scb->data_busaddr);
3624 } else {
3625 scb->cmd.basic_io.op_code =
3626 (scb->scsi_cmd->cmnd[0] ==
3627 READ_10) ? IPS_CMD_READ_SG :
3628 IPS_CMD_WRITE_SG;
3629 scb->cmd.basic_io.enhanced_sg =
3630 IPS_USE_ENH_SGLIST(ha) ? 0xFF : 0;
3631 scb->cmd.basic_io.sg_addr =
3632 cpu_to_le32(scb->sg_busaddr);
3633 }
3634
3635 scb->cmd.basic_io.segment_4G = 0;
3636 scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
3637 scb->cmd.basic_io.log_drv = scb->target_id;
3638 scb->cmd.basic_io.sg_count = scb->sg_len;
3639
3640 if (scb->cmd.basic_io.lba)
3641 le32_add_cpu(&scb->cmd.basic_io.lba,
3642 le16_to_cpu(scb->cmd.basic_io.
3643 sector_count));
3644 else
3645 scb->cmd.basic_io.lba =
3646 ((scb->scsi_cmd->cmnd[2] << 24) | (scb->
3647 scsi_cmd->
3648 cmnd[3]
3649 << 16) |
3650 (scb->scsi_cmd->cmnd[4] << 8) | scb->
3651 scsi_cmd->cmnd[5]);
3652
3653 scb->cmd.basic_io.sector_count =
3654 cpu_to_le16(scb->data_len / IPS_BLKSIZE);
3655
3656 if (cpu_to_le16(scb->cmd.basic_io.sector_count) == 0) {
3657 /*
3658 * This is a null condition
3659 * we don't have to do anything
3660 * so just return
3661 */
3662 scb->scsi_cmd->result = DID_OK << 16;
3663 } else
3664 ret = IPS_SUCCESS;
3665
3666 break;
3667
3668 case RESERVE:
3669 case RELEASE:
3670 scb->scsi_cmd->result = DID_OK << 16;
3671 break;
3672
3673 case MODE_SENSE:
3674 scb->cmd.basic_io.op_code = IPS_CMD_ENQUIRY;
3675 scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
3676 scb->cmd.basic_io.segment_4G = 0;
3677 scb->cmd.basic_io.enhanced_sg = 0;
3678 scb->data_len = sizeof (*ha->enq);
3679 scb->cmd.basic_io.sg_addr = ha->enq_busaddr;
3680 ret = IPS_SUCCESS;
3681 break;
3682
3683 case READ_CAPACITY:
3684 scb->cmd.logical_info.op_code = IPS_CMD_GET_LD_INFO;
3685 scb->cmd.logical_info.command_id = IPS_COMMAND_ID(ha, scb);
3686 scb->cmd.logical_info.reserved = 0;
3687 scb->cmd.logical_info.reserved2 = 0;
3688 scb->cmd.logical_info.reserved3 = 0;
3689 scb->data_len = sizeof (IPS_LD_INFO);
3690 scb->data_busaddr = ha->logical_drive_info_dma_addr;
3691 scb->flags = 0;
3692 scb->cmd.logical_info.buffer_addr = scb->data_busaddr;
3693 ret = IPS_SUCCESS;
3694 break;
3695
3696 case SEND_DIAGNOSTIC:
3697 case REASSIGN_BLOCKS:
3698 case FORMAT_UNIT:
3699 case SEEK_10:
3700 case VERIFY:
3701 case READ_DEFECT_DATA:
3702 case READ_BUFFER:
3703 case WRITE_BUFFER:
3704 scb->scsi_cmd->result = DID_OK << 16;
3705 break;
3706
3707 default:
3708 /* Set the Return Info to appear like the Command was */
3709 /* attempted, a Check Condition occurred, and Sense */
3710 /* Data indicating an Invalid CDB OpCode is returned. */
3711 sp = (char *) scb->scsi_cmd->sense_buffer;
3712
3713 sp[0] = 0x70; /* Error Code */
3714 sp[2] = ILLEGAL_REQUEST; /* Sense Key 5 Illegal Req. */
3715 sp[7] = 0x0A; /* Additional Sense Length */
3716 sp[12] = 0x20; /* ASC = Invalid OpCode */
3717 sp[13] = 0x00; /* ASCQ */
3718
3719 device_error = 2; /* Indicate Check Condition */
3720 scb->scsi_cmd->result = device_error | (DID_OK << 16);
3721 break;
3722 } /* end switch */
3723 }
3724 /* end if */
3725 if (ret == IPS_SUCCESS_IMM)
3726 return (ret);
3727
3728 /* setup DCDB */
3729 if (scb->bus > 0) {
3730
3731 /* If we already know the Device is Not there, no need to attempt a Command */
3732 /* This also protects an NT FailOver Controller from getting CDB's sent to it */
3733 if (ha->conf->dev[scb->bus - 1][scb->target_id].ucState == 0) {
3734 scb->scsi_cmd->result = DID_NO_CONNECT << 16;
3735 return (IPS_SUCCESS_IMM);
3736 }
3737
3738 ha->dcdb_active[scb->bus - 1] |= (1 << scb->target_id);
3739 scb->cmd.dcdb.command_id = IPS_COMMAND_ID(ha, scb);
3740 scb->cmd.dcdb.dcdb_address = cpu_to_le32(scb->scb_busaddr +
3741 (unsigned long) &scb->
3742 dcdb -
3743 (unsigned long) scb);
3744 scb->cmd.dcdb.reserved = 0;
3745 scb->cmd.dcdb.reserved2 = 0;
3746 scb->cmd.dcdb.reserved3 = 0;
3747 scb->cmd.dcdb.segment_4G = 0;
3748 scb->cmd.dcdb.enhanced_sg = 0;
3749
3750 TimeOut = scb->scsi_cmd->request->timeout;
3751
3752 if (ha->subsys->param[4] & 0x00100000) { /* If NEW Tape DCDB is Supported */
3753 if (!scb->sg_len) {
3754 scb->cmd.dcdb.op_code = IPS_CMD_EXTENDED_DCDB;
3755 } else {
3756 scb->cmd.dcdb.op_code =
3757 IPS_CMD_EXTENDED_DCDB_SG;
3758 scb->cmd.dcdb.enhanced_sg =
3759 IPS_USE_ENH_SGLIST(ha) ? 0xFF : 0;
3760 }
3761
3762 tapeDCDB = (IPS_DCDB_TABLE_TAPE *) & scb->dcdb; /* Use Same Data Area as Old DCDB Struct */
3763 tapeDCDB->device_address =
3764 ((scb->bus - 1) << 4) | scb->target_id;
3765 tapeDCDB->cmd_attribute |= IPS_DISCONNECT_ALLOWED;
3766 tapeDCDB->cmd_attribute &= ~IPS_TRANSFER64K; /* Always Turn OFF 64K Size Flag */
3767
3768 if (TimeOut) {
3769 if (TimeOut < (10 * HZ))
3770 tapeDCDB->cmd_attribute |= IPS_TIMEOUT10; /* TimeOut is 10 Seconds */
3771 else if (TimeOut < (60 * HZ))
3772 tapeDCDB->cmd_attribute |= IPS_TIMEOUT60; /* TimeOut is 60 Seconds */
3773 else if (TimeOut < (1200 * HZ))
3774 tapeDCDB->cmd_attribute |= IPS_TIMEOUT20M; /* TimeOut is 20 Minutes */
3775 }
3776
3777 tapeDCDB->cdb_length = scb->scsi_cmd->cmd_len;
3778 tapeDCDB->reserved_for_LUN = 0;
3779 tapeDCDB->transfer_length = scb->data_len;
3780 if (scb->cmd.dcdb.op_code == IPS_CMD_EXTENDED_DCDB_SG)
3781 tapeDCDB->buffer_pointer =
3782 cpu_to_le32(scb->sg_busaddr);
3783 else
3784 tapeDCDB->buffer_pointer =
3785 cpu_to_le32(scb->data_busaddr);
3786 tapeDCDB->sg_count = scb->sg_len;
3787 tapeDCDB->sense_length = sizeof (tapeDCDB->sense_info);
3788 tapeDCDB->scsi_status = 0;
3789 tapeDCDB->reserved = 0;
3790 memcpy(tapeDCDB->scsi_cdb, scb->scsi_cmd->cmnd,
3791 scb->scsi_cmd->cmd_len);
3792 } else {
3793 if (!scb->sg_len) {
3794 scb->cmd.dcdb.op_code = IPS_CMD_DCDB;
3795 } else {
3796 scb->cmd.dcdb.op_code = IPS_CMD_DCDB_SG;
3797 scb->cmd.dcdb.enhanced_sg =
3798 IPS_USE_ENH_SGLIST(ha) ? 0xFF : 0;
3799 }
3800
3801 scb->dcdb.device_address =
3802 ((scb->bus - 1) << 4) | scb->target_id;
3803 scb->dcdb.cmd_attribute |= IPS_DISCONNECT_ALLOWED;
3804
3805 if (TimeOut) {
3806 if (TimeOut < (10 * HZ))
3807 scb->dcdb.cmd_attribute |= IPS_TIMEOUT10; /* TimeOut is 10 Seconds */
3808 else if (TimeOut < (60 * HZ))
3809 scb->dcdb.cmd_attribute |= IPS_TIMEOUT60; /* TimeOut is 60 Seconds */
3810 else if (TimeOut < (1200 * HZ))
3811 scb->dcdb.cmd_attribute |= IPS_TIMEOUT20M; /* TimeOut is 20 Minutes */
3812 }
3813
3814 scb->dcdb.transfer_length = scb->data_len;
3815 if (scb->dcdb.cmd_attribute & IPS_TRANSFER64K)
3816 scb->dcdb.transfer_length = 0;
3817 if (scb->cmd.dcdb.op_code == IPS_CMD_DCDB_SG)
3818 scb->dcdb.buffer_pointer =
3819 cpu_to_le32(scb->sg_busaddr);
3820 else
3821 scb->dcdb.buffer_pointer =
3822 cpu_to_le32(scb->data_busaddr);
3823 scb->dcdb.cdb_length = scb->scsi_cmd->cmd_len;
3824 scb->dcdb.sense_length = sizeof (scb->dcdb.sense_info);
3825 scb->dcdb.sg_count = scb->sg_len;
3826 scb->dcdb.reserved = 0;
3827 memcpy(scb->dcdb.scsi_cdb, scb->scsi_cmd->cmnd,
3828 scb->scsi_cmd->cmd_len);
3829 scb->dcdb.scsi_status = 0;
3830 scb->dcdb.reserved2[0] = 0;
3831 scb->dcdb.reserved2[1] = 0;
3832 scb->dcdb.reserved2[2] = 0;
3833 }
3834 }
3835
3836 return ((*ha->func.issue) (ha, scb));
3837 }
3838
3839 /****************************************************************************/
3840 /* */
3841 /* Routine Name: ips_chk_status */
3842 /* */
3843 /* Routine Description: */
3844 /* */
3845 /* Check the status of commands to logical drives */
3846 /* Assumed to be called with the HA lock */
3847 /****************************************************************************/
3848 static void
3849 ips_chkstatus(ips_ha_t * ha, IPS_STATUS * pstatus)
3850 {
3851 ips_scb_t *scb;
3852 ips_stat_t *sp;
3853 uint8_t basic_status;
3854 uint8_t ext_status;
3855 int errcode;
3856 IPS_SCSI_INQ_DATA inquiryData;
3857
3858 METHOD_TRACE("ips_chkstatus", 1);
3859
3860 scb = &ha->scbs[pstatus->fields.command_id];
3861 scb->basic_status = basic_status =
3862 pstatus->fields.basic_status & IPS_BASIC_STATUS_MASK;
3863 scb->extended_status = ext_status = pstatus->fields.extended_status;
3864
3865 sp = &ha->sp;
3866 sp->residue_len = 0;
3867 sp->scb_addr = (void *) scb;
3868
3869 /* Remove the item from the active queue */
3870 ips_removeq_scb(&ha->scb_activelist, scb);
3871
3872 if (!scb->scsi_cmd)
3873 /* internal commands are handled in do_ipsintr */
3874 return;
3875
3876 DEBUG_VAR(2, "(%s%d) ips_chkstatus: cmd 0x%X id %d (%d %d %d)",
3877 ips_name,
3878 ha->host_num,
3879 scb->cdb[0],
3880 scb->cmd.basic_io.command_id,
3881 scb->bus, scb->target_id, scb->lun);
3882
3883 if ((scb->scsi_cmd) && (ips_is_passthru(scb->scsi_cmd)))
3884 /* passthru - just returns the raw result */
3885 return;
3886
3887 errcode = DID_OK;
3888
3889 if (((basic_status & IPS_GSC_STATUS_MASK) == IPS_CMD_SUCCESS) ||
3890 ((basic_status & IPS_GSC_STATUS_MASK) == IPS_CMD_RECOVERED_ERROR)) {
3891
3892 if (scb->bus == 0) {
3893 if ((basic_status & IPS_GSC_STATUS_MASK) ==
3894 IPS_CMD_RECOVERED_ERROR) {
3895 DEBUG_VAR(1,
3896 "(%s%d) Recovered Logical Drive Error OpCode: %x, BSB: %x, ESB: %x",
3897 ips_name, ha->host_num,
3898 scb->cmd.basic_io.op_code,
3899 basic_status, ext_status);
3900 }
3901
3902 switch (scb->scsi_cmd->cmnd[0]) {
3903 case ALLOW_MEDIUM_REMOVAL:
3904 case REZERO_UNIT:
3905 case ERASE:
3906 case WRITE_FILEMARKS:
3907 case SPACE:
3908 errcode = DID_ERROR;
3909 break;
3910
3911 case START_STOP:
3912 break;
3913
3914 case TEST_UNIT_READY:
3915 if (!ips_online(ha, scb)) {
3916 errcode = DID_TIME_OUT;
3917 }
3918 break;
3919
3920 case INQUIRY:
3921 if (ips_online(ha, scb)) {
3922 ips_inquiry(ha, scb);
3923 } else {
3924 errcode = DID_TIME_OUT;
3925 }
3926 break;
3927
3928 case REQUEST_SENSE:
3929 ips_reqsen(ha, scb);
3930 break;
3931
3932 case READ_6:
3933 case WRITE_6:
3934 case READ_10:
3935 case WRITE_10:
3936 case RESERVE:
3937 case RELEASE:
3938 break;
3939
3940 case MODE_SENSE:
3941 if (!ips_online(ha, scb)
3942 || !ips_msense(ha, scb)) {
3943 errcode = DID_ERROR;
3944 }
3945 break;
3946
3947 case READ_CAPACITY:
3948 if (ips_online(ha, scb))
3949 ips_rdcap(ha, scb);
3950 else {
3951 errcode = DID_TIME_OUT;
3952 }
3953 break;
3954
3955 case SEND_DIAGNOSTIC:
3956 case REASSIGN_BLOCKS:
3957 break;
3958
3959 case FORMAT_UNIT:
3960 errcode = DID_ERROR;
3961 break;
3962
3963 case SEEK_10:
3964 case VERIFY:
3965 case READ_DEFECT_DATA:
3966 case READ_BUFFER:
3967 case WRITE_BUFFER:
3968 break;
3969
3970 default:
3971 errcode = DID_ERROR;
3972 } /* end switch */
3973
3974 scb->scsi_cmd->result = errcode << 16;
3975 } else { /* bus == 0 */
3976 /* restrict access to physical drives */
3977 if (scb->scsi_cmd->cmnd[0] == INQUIRY) {
3978 ips_scmd_buf_read(scb->scsi_cmd,
3979 &inquiryData, sizeof (inquiryData));
3980 if ((inquiryData.DeviceType & 0x1f) == TYPE_DISK)
3981 scb->scsi_cmd->result = DID_TIME_OUT << 16;
3982 }
3983 } /* else */
3984 } else { /* recovered error / success */
3985 if (scb->bus == 0) {
3986 DEBUG_VAR(1,
3987 "(%s%d) Unrecovered Logical Drive Error OpCode: %x, BSB: %x, ESB: %x",
3988 ips_name, ha->host_num,
3989 scb->cmd.basic_io.op_code, basic_status,
3990 ext_status);
3991 }
3992
3993 ips_map_status(ha, scb, sp);
3994 } /* else */
3995 }
3996
3997 /****************************************************************************/
3998 /* */
3999 /* Routine Name: ips_online */
4000 /* */
4001 /* Routine Description: */
4002 /* */
4003 /* Determine if a logical drive is online */
4004 /* */
4005 /****************************************************************************/
4006 static int
4007 ips_online(ips_ha_t * ha, ips_scb_t * scb)
4008 {
4009 METHOD_TRACE("ips_online", 1);
4010
4011 if (scb->target_id >= IPS_MAX_LD)
4012 return (0);
4013
4014 if ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1) {
4015 memset(ha->logical_drive_info, 0, sizeof (IPS_LD_INFO));
4016 return (0);
4017 }
4018
4019 if (ha->logical_drive_info->drive_info[scb->target_id].state !=
4020 IPS_LD_OFFLINE
4021 && ha->logical_drive_info->drive_info[scb->target_id].state !=
4022 IPS_LD_FREE
4023 && ha->logical_drive_info->drive_info[scb->target_id].state !=
4024 IPS_LD_CRS
4025 && ha->logical_drive_info->drive_info[scb->target_id].state !=
4026 IPS_LD_SYS)
4027 return (1);
4028 else
4029 return (0);
4030 }
4031
4032 /****************************************************************************/
4033 /* */
4034 /* Routine Name: ips_inquiry */
4035 /* */
4036 /* Routine Description: */
4037 /* */
4038 /* Simulate an inquiry command to a logical drive */
4039 /* */
4040 /****************************************************************************/
4041 static int
4042 ips_inquiry(ips_ha_t * ha, ips_scb_t * scb)
4043 {
4044 IPS_SCSI_INQ_DATA inquiry;
4045
4046 METHOD_TRACE("ips_inquiry", 1);
4047
4048 memset(&inquiry, 0, sizeof (IPS_SCSI_INQ_DATA));
4049
4050 inquiry.DeviceType = IPS_SCSI_INQ_TYPE_DASD;
4051 inquiry.DeviceTypeQualifier = IPS_SCSI_INQ_LU_CONNECTED;
4052 inquiry.Version = IPS_SCSI_INQ_REV2;
4053 inquiry.ResponseDataFormat = IPS_SCSI_INQ_RD_REV2;
4054 inquiry.AdditionalLength = 31;
4055 inquiry.Flags[0] = IPS_SCSI_INQ_Address16;
4056 inquiry.Flags[1] =
4057 IPS_SCSI_INQ_WBus16 | IPS_SCSI_INQ_Sync | IPS_SCSI_INQ_CmdQue;
4058 strncpy(inquiry.VendorId, "IBM ", 8);
4059 strncpy(inquiry.ProductId, "SERVERAID ", 16);
4060 strncpy(inquiry.ProductRevisionLevel, "1.00", 4);
4061
4062 ips_scmd_buf_write(scb->scsi_cmd, &inquiry, sizeof (inquiry));
4063
4064 return (1);
4065 }
4066
4067 /****************************************************************************/
4068 /* */
4069 /* Routine Name: ips_rdcap */
4070 /* */
4071 /* Routine Description: */
4072 /* */
4073 /* Simulate a read capacity command to a logical drive */
4074 /* */
4075 /****************************************************************************/
4076 static int
4077 ips_rdcap(ips_ha_t * ha, ips_scb_t * scb)
4078 {
4079 IPS_SCSI_CAPACITY cap;
4080
4081 METHOD_TRACE("ips_rdcap", 1);
4082
4083 if (scsi_bufflen(scb->scsi_cmd) < 8)
4084 return (0);
4085
4086 cap.lba =
4087 cpu_to_be32(le32_to_cpu
4088 (ha->logical_drive_info->
4089 drive_info[scb->target_id].sector_count) - 1);
4090 cap.len = cpu_to_be32((uint32_t) IPS_BLKSIZE);
4091
4092 ips_scmd_buf_write(scb->scsi_cmd, &cap, sizeof (cap));
4093
4094 return (1);
4095 }
4096
4097 /****************************************************************************/
4098 /* */
4099 /* Routine Name: ips_msense */
4100 /* */
4101 /* Routine Description: */
4102 /* */
4103 /* Simulate a mode sense command to a logical drive */
4104 /* */
4105 /****************************************************************************/
4106 static int
4107 ips_msense(ips_ha_t * ha, ips_scb_t * scb)
4108 {
4109 uint16_t heads;
4110 uint16_t sectors;
4111 uint32_t cylinders;
4112 IPS_SCSI_MODE_PAGE_DATA mdata;
4113
4114 METHOD_TRACE("ips_msense", 1);
4115
4116 if (le32_to_cpu(ha->enq->ulDriveSize[scb->target_id]) > 0x400000 &&
4117 (ha->enq->ucMiscFlag & 0x8) == 0) {
4118 heads = IPS_NORM_HEADS;
4119 sectors = IPS_NORM_SECTORS;
4120 } else {
4121 heads = IPS_COMP_HEADS;
4122 sectors = IPS_COMP_SECTORS;
4123 }
4124
4125 cylinders =
4126 (le32_to_cpu(ha->enq->ulDriveSize[scb->target_id]) -
4127 1) / (heads * sectors);
4128
4129 memset(&mdata, 0, sizeof (IPS_SCSI_MODE_PAGE_DATA));
4130
4131 mdata.hdr.BlockDescLength = 8;
4132
4133 switch (scb->scsi_cmd->cmnd[2] & 0x3f) {
4134 case 0x03: /* page 3 */
4135 mdata.pdata.pg3.PageCode = 3;
4136 mdata.pdata.pg3.PageLength = sizeof (IPS_SCSI_MODE_PAGE3);
4137 mdata.hdr.DataLength =
4138 3 + mdata.hdr.BlockDescLength + mdata.pdata.pg3.PageLength;
4139 mdata.pdata.pg3.TracksPerZone = 0;
4140 mdata.pdata.pg3.AltSectorsPerZone = 0;
4141 mdata.pdata.pg3.AltTracksPerZone = 0;
4142 mdata.pdata.pg3.AltTracksPerVolume = 0;
4143 mdata.pdata.pg3.SectorsPerTrack = cpu_to_be16(sectors);
4144 mdata.pdata.pg3.BytesPerSector = cpu_to_be16(IPS_BLKSIZE);
4145 mdata.pdata.pg3.Interleave = cpu_to_be16(1);
4146 mdata.pdata.pg3.TrackSkew = 0;
4147 mdata.pdata.pg3.CylinderSkew = 0;
4148 mdata.pdata.pg3.flags = IPS_SCSI_MP3_SoftSector;
4149 break;
4150
4151 case 0x4:
4152 mdata.pdata.pg4.PageCode = 4;
4153 mdata.pdata.pg4.PageLength = sizeof (IPS_SCSI_MODE_PAGE4);
4154 mdata.hdr.DataLength =
4155 3 + mdata.hdr.BlockDescLength + mdata.pdata.pg4.PageLength;
4156 mdata.pdata.pg4.CylindersHigh =
4157 cpu_to_be16((cylinders >> 8) & 0xFFFF);
4158 mdata.pdata.pg4.CylindersLow = (cylinders & 0xFF);
4159 mdata.pdata.pg4.Heads = heads;
4160 mdata.pdata.pg4.WritePrecompHigh = 0;
4161 mdata.pdata.pg4.WritePrecompLow = 0;
4162 mdata.pdata.pg4.ReducedWriteCurrentHigh = 0;
4163 mdata.pdata.pg4.ReducedWriteCurrentLow = 0;
4164 mdata.pdata.pg4.StepRate = cpu_to_be16(1);
4165 mdata.pdata.pg4.LandingZoneHigh = 0;
4166 mdata.pdata.pg4.LandingZoneLow = 0;
4167 mdata.pdata.pg4.flags = 0;
4168 mdata.pdata.pg4.RotationalOffset = 0;
4169 mdata.pdata.pg4.MediumRotationRate = 0;
4170 break;
4171 case 0x8:
4172 mdata.pdata.pg8.PageCode = 8;
4173 mdata.pdata.pg8.PageLength = sizeof (IPS_SCSI_MODE_PAGE8);
4174 mdata.hdr.DataLength =
4175 3 + mdata.hdr.BlockDescLength + mdata.pdata.pg8.PageLength;
4176 /* everything else is left set to 0 */
4177 break;
4178
4179 default:
4180 return (0);
4181 } /* end switch */
4182
4183 ips_scmd_buf_write(scb->scsi_cmd, &mdata, sizeof (mdata));
4184
4185 return (1);
4186 }
4187
4188 /****************************************************************************/
4189 /* */
4190 /* Routine Name: ips_reqsen */
4191 /* */
4192 /* Routine Description: */
4193 /* */
4194 /* Simulate a request sense command to a logical drive */
4195 /* */
4196 /****************************************************************************/
4197 static int
4198 ips_reqsen(ips_ha_t * ha, ips_scb_t * scb)
4199 {
4200 IPS_SCSI_REQSEN reqsen;
4201
4202 METHOD_TRACE("ips_reqsen", 1);
4203
4204 memset(&reqsen, 0, sizeof (IPS_SCSI_REQSEN));
4205
4206 reqsen.ResponseCode =
4207 IPS_SCSI_REQSEN_VALID | IPS_SCSI_REQSEN_CURRENT_ERR;
4208 reqsen.AdditionalLength = 10;
4209 reqsen.AdditionalSenseCode = IPS_SCSI_REQSEN_NO_SENSE;
4210 reqsen.AdditionalSenseCodeQual = IPS_SCSI_REQSEN_NO_SENSE;
4211
4212 ips_scmd_buf_write(scb->scsi_cmd, &reqsen, sizeof (reqsen));
4213
4214 return (1);
4215 }
4216
4217 /****************************************************************************/
4218 /* */
4219 /* Routine Name: ips_free */
4220 /* */
4221 /* Routine Description: */
4222 /* */
4223 /* Free any allocated space for this controller */
4224 /* */
4225 /****************************************************************************/
4226 static void
4227 ips_free(ips_ha_t * ha)
4228 {
4229
4230 METHOD_TRACE("ips_free", 1);
4231
4232 if (ha) {
4233 if (ha->enq) {
4234 pci_free_consistent(ha->pcidev, sizeof(IPS_ENQ),
4235 ha->enq, ha->enq_busaddr);
4236 ha->enq = NULL;
4237 }
4238
4239 kfree(ha->conf);
4240 ha->conf = NULL;
4241
4242 if (ha->adapt) {
4243 pci_free_consistent(ha->pcidev,
4244 sizeof (IPS_ADAPTER) +
4245 sizeof (IPS_IO_CMD), ha->adapt,
4246 ha->adapt->hw_status_start);
4247 ha->adapt = NULL;
4248 }
4249
4250 if (ha->logical_drive_info) {
4251 pci_free_consistent(ha->pcidev,
4252 sizeof (IPS_LD_INFO),
4253 ha->logical_drive_info,
4254 ha->logical_drive_info_dma_addr);
4255 ha->logical_drive_info = NULL;
4256 }
4257
4258 kfree(ha->nvram);
4259 ha->nvram = NULL;
4260
4261 kfree(ha->subsys);
4262 ha->subsys = NULL;
4263
4264 if (ha->ioctl_data) {
4265 pci_free_consistent(ha->pcidev, ha->ioctl_len,
4266 ha->ioctl_data, ha->ioctl_busaddr);
4267 ha->ioctl_data = NULL;
4268 ha->ioctl_datasize = 0;
4269 ha->ioctl_len = 0;
4270 }
4271 ips_deallocatescbs(ha, ha->max_cmds);
4272
4273 /* free memory mapped (if applicable) */
4274 if (ha->mem_ptr) {
4275 iounmap(ha->ioremap_ptr);
4276 ha->ioremap_ptr = NULL;
4277 ha->mem_ptr = NULL;
4278 }
4279
4280 ha->mem_addr = 0;
4281
4282 }
4283 }
4284
4285 /****************************************************************************/
4286 /* */
4287 /* Routine Name: ips_deallocatescbs */
4288 /* */
4289 /* Routine Description: */
4290 /* */
4291 /* Free the command blocks */
4292 /* */
4293 /****************************************************************************/
4294 static int
4295 ips_deallocatescbs(ips_ha_t * ha, int cmds)
4296 {
4297 if (ha->scbs) {
4298 pci_free_consistent(ha->pcidev,
4299 IPS_SGLIST_SIZE(ha) * IPS_MAX_SG * cmds,
4300 ha->scbs->sg_list.list,
4301 ha->scbs->sg_busaddr);
4302 pci_free_consistent(ha->pcidev, sizeof (ips_scb_t) * cmds,
4303 ha->scbs, ha->scbs->scb_busaddr);
4304 ha->scbs = NULL;
4305 } /* end if */
4306 return 1;
4307 }
4308
4309 /****************************************************************************/
4310 /* */
4311 /* Routine Name: ips_allocatescbs */
4312 /* */
4313 /* Routine Description: */
4314 /* */
4315 /* Allocate the command blocks */
4316 /* */
4317 /****************************************************************************/
4318 static int
4319 ips_allocatescbs(ips_ha_t * ha)
4320 {
4321 ips_scb_t *scb_p;
4322 IPS_SG_LIST ips_sg;
4323 int i;
4324 dma_addr_t command_dma, sg_dma;
4325
4326 METHOD_TRACE("ips_allocatescbs", 1);
4327
4328 /* Allocate memory for the SCBs */
4329 ha->scbs =
4330 pci_alloc_consistent(ha->pcidev, ha->max_cmds * sizeof (ips_scb_t),
4331 &command_dma);
4332 if (ha->scbs == NULL)
4333 return 0;
4334 ips_sg.list =
4335 pci_alloc_consistent(ha->pcidev,
4336 IPS_SGLIST_SIZE(ha) * IPS_MAX_SG *
4337 ha->max_cmds, &sg_dma);
4338 if (ips_sg.list == NULL) {
4339 pci_free_consistent(ha->pcidev,
4340 ha->max_cmds * sizeof (ips_scb_t), ha->scbs,
4341 command_dma);
4342 return 0;
4343 }
4344
4345 memset(ha->scbs, 0, ha->max_cmds * sizeof (ips_scb_t));
4346
4347 for (i = 0; i < ha->max_cmds; i++) {
4348 scb_p = &ha->scbs[i];
4349 scb_p->scb_busaddr = command_dma + sizeof (ips_scb_t) * i;
4350 /* set up S/G list */
4351 if (IPS_USE_ENH_SGLIST(ha)) {
4352 scb_p->sg_list.enh_list =
4353 ips_sg.enh_list + i * IPS_MAX_SG;
4354 scb_p->sg_busaddr =
4355 sg_dma + IPS_SGLIST_SIZE(ha) * IPS_MAX_SG * i;
4356 } else {
4357 scb_p->sg_list.std_list =
4358 ips_sg.std_list + i * IPS_MAX_SG;
4359 scb_p->sg_busaddr =
4360 sg_dma + IPS_SGLIST_SIZE(ha) * IPS_MAX_SG * i;
4361 }
4362
4363 /* add to the free list */
4364 if (i < ha->max_cmds - 1) {
4365 scb_p->q_next = ha->scb_freelist;
4366 ha->scb_freelist = scb_p;
4367 }
4368 }
4369
4370 /* success */
4371 return (1);
4372 }
4373
4374 /****************************************************************************/
4375 /* */
4376 /* Routine Name: ips_init_scb */
4377 /* */
4378 /* Routine Description: */
4379 /* */
4380 /* Initialize a CCB to default values */
4381 /* */
4382 /****************************************************************************/
4383 static void
4384 ips_init_scb(ips_ha_t * ha, ips_scb_t * scb)
4385 {
4386 IPS_SG_LIST sg_list;
4387 uint32_t cmd_busaddr, sg_busaddr;
4388 METHOD_TRACE("ips_init_scb", 1);
4389
4390 if (scb == NULL)
4391 return;
4392
4393 sg_list.list = scb->sg_list.list;
4394 cmd_busaddr = scb->scb_busaddr;
4395 sg_busaddr = scb->sg_busaddr;
4396 /* zero fill */
4397 memset(scb, 0, sizeof (ips_scb_t));
4398 memset(ha->dummy, 0, sizeof (IPS_IO_CMD));
4399
4400 /* Initialize dummy command bucket */
4401 ha->dummy->op_code = 0xFF;
4402 ha->dummy->ccsar = cpu_to_le32(ha->adapt->hw_status_start
4403 + sizeof (IPS_ADAPTER));
4404 ha->dummy->command_id = IPS_MAX_CMDS;
4405
4406 /* set bus address of scb */
4407 scb->scb_busaddr = cmd_busaddr;
4408 scb->sg_busaddr = sg_busaddr;
4409 scb->sg_list.list = sg_list.list;
4410
4411 /* Neptune Fix */
4412 scb->cmd.basic_io.cccr = cpu_to_le32((uint32_t) IPS_BIT_ILE);
4413 scb->cmd.basic_io.ccsar = cpu_to_le32(ha->adapt->hw_status_start
4414 + sizeof (IPS_ADAPTER));
4415 }
4416
4417 /****************************************************************************/
4418 /* */
4419 /* Routine Name: ips_get_scb */
4420 /* */
4421 /* Routine Description: */
4422 /* */
4423 /* Initialize a CCB to default values */
4424 /* */
4425 /* ASSUMED to be called from within a lock */
4426 /* */
4427 /****************************************************************************/
4428 static ips_scb_t *
4429 ips_getscb(ips_ha_t * ha)
4430 {
4431 ips_scb_t *scb;
4432
4433 METHOD_TRACE("ips_getscb", 1);
4434
4435 if ((scb = ha->scb_freelist) == NULL) {
4436
4437 return (NULL);
4438 }
4439
4440 ha->scb_freelist = scb->q_next;
4441 scb->flags = 0;
4442 scb->q_next = NULL;
4443
4444 ips_init_scb(ha, scb);
4445
4446 return (scb);
4447 }
4448
4449 /****************************************************************************/
4450 /* */
4451 /* Routine Name: ips_free_scb */
4452 /* */
4453 /* Routine Description: */
4454 /* */
4455 /* Return an unused CCB back to the free list */
4456 /* */
4457 /* ASSUMED to be called from within a lock */
4458 /* */
4459 /****************************************************************************/
4460 static void
4461 ips_freescb(ips_ha_t * ha, ips_scb_t * scb)
4462 {
4463
4464 METHOD_TRACE("ips_freescb", 1);
4465 if (scb->flags & IPS_SCB_MAP_SG)
4466 scsi_dma_unmap(scb->scsi_cmd);
4467 else if (scb->flags & IPS_SCB_MAP_SINGLE)
4468 pci_unmap_single(ha->pcidev, scb->data_busaddr, scb->data_len,
4469 IPS_DMA_DIR(scb));
4470
4471 /* check to make sure this is not our "special" scb */
4472 if (IPS_COMMAND_ID(ha, scb) < (ha->max_cmds - 1)) {
4473 scb->q_next = ha->scb_freelist;
4474 ha->scb_freelist = scb;
4475 }
4476 }
4477
4478 /****************************************************************************/
4479 /* */
4480 /* Routine Name: ips_isinit_copperhead */
4481 /* */
4482 /* Routine Description: */
4483 /* */
4484 /* Is controller initialized ? */
4485 /* */
4486 /****************************************************************************/
4487 static int
4488 ips_isinit_copperhead(ips_ha_t * ha)
4489 {
4490 uint8_t scpr;
4491 uint8_t isr;
4492
4493 METHOD_TRACE("ips_isinit_copperhead", 1);
4494
4495 isr = inb(ha->io_addr + IPS_REG_HISR);
4496 scpr = inb(ha->io_addr + IPS_REG_SCPR);
4497
4498 if (((isr & IPS_BIT_EI) == 0) && ((scpr & IPS_BIT_EBM) == 0))
4499 return (0);
4500 else
4501 return (1);
4502 }
4503
4504 /****************************************************************************/
4505 /* */
4506 /* Routine Name: ips_isinit_copperhead_memio */
4507 /* */
4508 /* Routine Description: */
4509 /* */
4510 /* Is controller initialized ? */
4511 /* */
4512 /****************************************************************************/
4513 static int
4514 ips_isinit_copperhead_memio(ips_ha_t * ha)
4515 {
4516 uint8_t isr = 0;
4517 uint8_t scpr;
4518
4519 METHOD_TRACE("ips_is_init_copperhead_memio", 1);
4520
4521 isr = readb(ha->mem_ptr + IPS_REG_HISR);
4522 scpr = readb(ha->mem_ptr + IPS_REG_SCPR);
4523
4524 if (((isr & IPS_BIT_EI) == 0) && ((scpr & IPS_BIT_EBM) == 0))
4525 return (0);
4526 else
4527 return (1);
4528 }
4529
4530 /****************************************************************************/
4531 /* */
4532 /* Routine Name: ips_isinit_morpheus */
4533 /* */
4534 /* Routine Description: */
4535 /* */
4536 /* Is controller initialized ? */
4537 /* */
4538 /****************************************************************************/
4539 static int
4540 ips_isinit_morpheus(ips_ha_t * ha)
4541 {
4542 uint32_t post;
4543 uint32_t bits;
4544
4545 METHOD_TRACE("ips_is_init_morpheus", 1);
4546
4547 if (ips_isintr_morpheus(ha))
4548 ips_flush_and_reset(ha);
4549
4550 post = readl(ha->mem_ptr + IPS_REG_I960_MSG0);
4551 bits = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
4552
4553 if (post == 0)
4554 return (0);
4555 else if (bits & 0x3)
4556 return (0);
4557 else
4558 return (1);
4559 }
4560
4561 /****************************************************************************/
4562 /* */
4563 /* Routine Name: ips_flush_and_reset */
4564 /* */
4565 /* Routine Description: */
4566 /* */
4567 /* Perform cleanup ( FLUSH and RESET ) when the adapter is in an unknown */
4568 /* state ( was trying to INIT and an interrupt was already pending ) ... */
4569 /* */
4570 /****************************************************************************/
4571 static void
4572 ips_flush_and_reset(ips_ha_t *ha)
4573 {
4574 ips_scb_t *scb;
4575 int ret;
4576 int time;
4577 int done;
4578 dma_addr_t command_dma;
4579
4580 /* Create a usuable SCB */
4581 scb = pci_alloc_consistent(ha->pcidev, sizeof(ips_scb_t), &command_dma);
4582 if (scb) {
4583 memset(scb, 0, sizeof(ips_scb_t));
4584 ips_init_scb(ha, scb);
4585 scb->scb_busaddr = command_dma;
4586
4587 scb->timeout = ips_cmd_timeout;
4588 scb->cdb[0] = IPS_CMD_FLUSH;
4589
4590 scb->cmd.flush_cache.op_code = IPS_CMD_FLUSH;
4591 scb->cmd.flush_cache.command_id = IPS_MAX_CMDS; /* Use an ID that would otherwise not exist */
4592 scb->cmd.flush_cache.state = IPS_NORM_STATE;
4593 scb->cmd.flush_cache.reserved = 0;
4594 scb->cmd.flush_cache.reserved2 = 0;
4595 scb->cmd.flush_cache.reserved3 = 0;
4596 scb->cmd.flush_cache.reserved4 = 0;
4597
4598 ret = ips_send_cmd(ha, scb); /* Send the Flush Command */
4599
4600 if (ret == IPS_SUCCESS) {
4601 time = 60 * IPS_ONE_SEC; /* Max Wait time is 60 seconds */
4602 done = 0;
4603
4604 while ((time > 0) && (!done)) {
4605 done = ips_poll_for_flush_complete(ha);
4606 /* This may look evil, but it's only done during extremely rare start-up conditions ! */
4607 udelay(1000);
4608 time--;
4609 }
4610 }
4611 }
4612
4613 /* Now RESET and INIT the adapter */
4614 (*ha->func.reset) (ha);
4615
4616 pci_free_consistent(ha->pcidev, sizeof(ips_scb_t), scb, command_dma);
4617 return;
4618 }
4619
4620 /****************************************************************************/
4621 /* */
4622 /* Routine Name: ips_poll_for_flush_complete */
4623 /* */
4624 /* Routine Description: */
4625 /* */
4626 /* Poll for the Flush Command issued by ips_flush_and_reset() to complete */
4627 /* All other responses are just taken off the queue and ignored */
4628 /* */
4629 /****************************************************************************/
4630 static int
4631 ips_poll_for_flush_complete(ips_ha_t * ha)
4632 {
4633 IPS_STATUS cstatus;
4634
4635 while (TRUE) {
4636 cstatus.value = (*ha->func.statupd) (ha);
4637
4638 if (cstatus.value == 0xffffffff) /* If No Interrupt to process */
4639 break;
4640
4641 /* Success is when we see the Flush Command ID */
4642 if (cstatus.fields.command_id == IPS_MAX_CMDS)
4643 return 1;
4644 }
4645
4646 return 0;
4647 }
4648
4649 /****************************************************************************/
4650 /* */
4651 /* Routine Name: ips_enable_int_copperhead */
4652 /* */
4653 /* Routine Description: */
4654 /* Turn on interrupts */
4655 /* */
4656 /****************************************************************************/
4657 static void
4658 ips_enable_int_copperhead(ips_ha_t * ha)
4659 {
4660 METHOD_TRACE("ips_enable_int_copperhead", 1);
4661
4662 outb(ha->io_addr + IPS_REG_HISR, IPS_BIT_EI);
4663 inb(ha->io_addr + IPS_REG_HISR); /*Ensure PCI Posting Completes*/
4664 }
4665
4666 /****************************************************************************/
4667 /* */
4668 /* Routine Name: ips_enable_int_copperhead_memio */
4669 /* */
4670 /* Routine Description: */
4671 /* Turn on interrupts */
4672 /* */
4673 /****************************************************************************/
4674 static void
4675 ips_enable_int_copperhead_memio(ips_ha_t * ha)
4676 {
4677 METHOD_TRACE("ips_enable_int_copperhead_memio", 1);
4678
4679 writeb(IPS_BIT_EI, ha->mem_ptr + IPS_REG_HISR);
4680 readb(ha->mem_ptr + IPS_REG_HISR); /*Ensure PCI Posting Completes*/
4681 }
4682
4683 /****************************************************************************/
4684 /* */
4685 /* Routine Name: ips_enable_int_morpheus */
4686 /* */
4687 /* Routine Description: */
4688 /* Turn on interrupts */
4689 /* */
4690 /****************************************************************************/
4691 static void
4692 ips_enable_int_morpheus(ips_ha_t * ha)
4693 {
4694 uint32_t Oimr;
4695
4696 METHOD_TRACE("ips_enable_int_morpheus", 1);
4697
4698 Oimr = readl(ha->mem_ptr + IPS_REG_I960_OIMR);
4699 Oimr &= ~0x08;
4700 writel(Oimr, ha->mem_ptr + IPS_REG_I960_OIMR);
4701 readl(ha->mem_ptr + IPS_REG_I960_OIMR); /*Ensure PCI Posting Completes*/
4702 }
4703
4704 /****************************************************************************/
4705 /* */
4706 /* Routine Name: ips_init_copperhead */
4707 /* */
4708 /* Routine Description: */
4709 /* */
4710 /* Initialize a copperhead controller */
4711 /* */
4712 /****************************************************************************/
4713 static int
4714 ips_init_copperhead(ips_ha_t * ha)
4715 {
4716 uint8_t Isr;
4717 uint8_t Cbsp;
4718 uint8_t PostByte[IPS_MAX_POST_BYTES];
4719 uint8_t ConfigByte[IPS_MAX_CONFIG_BYTES];
4720 int i, j;
4721
4722 METHOD_TRACE("ips_init_copperhead", 1);
4723
4724 for (i = 0; i < IPS_MAX_POST_BYTES; i++) {
4725 for (j = 0; j < 45; j++) {
4726 Isr = inb(ha->io_addr + IPS_REG_HISR);
4727 if (Isr & IPS_BIT_GHI)
4728 break;
4729
4730 /* Delay for 1 Second */
4731 MDELAY(IPS_ONE_SEC);
4732 }
4733
4734 if (j >= 45)
4735 /* error occurred */
4736 return (0);
4737
4738 PostByte[i] = inb(ha->io_addr + IPS_REG_ISPR);
4739 outb(Isr, ha->io_addr + IPS_REG_HISR);
4740 }
4741
4742 if (PostByte[0] < IPS_GOOD_POST_STATUS) {
4743 IPS_PRINTK(KERN_WARNING, ha->pcidev,
4744 "reset controller fails (post status %x %x).\n",
4745 PostByte[0], PostByte[1]);
4746
4747 return (0);
4748 }
4749
4750 for (i = 0; i < IPS_MAX_CONFIG_BYTES; i++) {
4751 for (j = 0; j < 240; j++) {
4752 Isr = inb(ha->io_addr + IPS_REG_HISR);
4753 if (Isr & IPS_BIT_GHI)
4754 break;
4755
4756 /* Delay for 1 Second */
4757 MDELAY(IPS_ONE_SEC);
4758 }
4759
4760 if (j >= 240)
4761 /* error occurred */
4762 return (0);
4763
4764 ConfigByte[i] = inb(ha->io_addr + IPS_REG_ISPR);
4765 outb(Isr, ha->io_addr + IPS_REG_HISR);
4766 }
4767
4768 for (i = 0; i < 240; i++) {
4769 Cbsp = inb(ha->io_addr + IPS_REG_CBSP);
4770
4771 if ((Cbsp & IPS_BIT_OP) == 0)
4772 break;
4773
4774 /* Delay for 1 Second */
4775 MDELAY(IPS_ONE_SEC);
4776 }
4777
4778 if (i >= 240)
4779 /* reset failed */
4780 return (0);
4781
4782 /* setup CCCR */
4783 outl(0x1010, ha->io_addr + IPS_REG_CCCR);
4784
4785 /* Enable busmastering */
4786 outb(IPS_BIT_EBM, ha->io_addr + IPS_REG_SCPR);
4787
4788 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
4789 /* fix for anaconda64 */
4790 outl(0, ha->io_addr + IPS_REG_NDAE);
4791
4792 /* Enable interrupts */
4793 outb(IPS_BIT_EI, ha->io_addr + IPS_REG_HISR);
4794
4795 return (1);
4796 }
4797
4798 /****************************************************************************/
4799 /* */
4800 /* Routine Name: ips_init_copperhead_memio */
4801 /* */
4802 /* Routine Description: */
4803 /* */
4804 /* Initialize a copperhead controller with memory mapped I/O */
4805 /* */
4806 /****************************************************************************/
4807 static int
4808 ips_init_copperhead_memio(ips_ha_t * ha)
4809 {
4810 uint8_t Isr = 0;
4811 uint8_t Cbsp;
4812 uint8_t PostByte[IPS_MAX_POST_BYTES];
4813 uint8_t ConfigByte[IPS_MAX_CONFIG_BYTES];
4814 int i, j;
4815
4816 METHOD_TRACE("ips_init_copperhead_memio", 1);
4817
4818 for (i = 0; i < IPS_MAX_POST_BYTES; i++) {
4819 for (j = 0; j < 45; j++) {
4820 Isr = readb(ha->mem_ptr + IPS_REG_HISR);
4821 if (Isr & IPS_BIT_GHI)
4822 break;
4823
4824 /* Delay for 1 Second */
4825 MDELAY(IPS_ONE_SEC);
4826 }
4827
4828 if (j >= 45)
4829 /* error occurred */
4830 return (0);
4831
4832 PostByte[i] = readb(ha->mem_ptr + IPS_REG_ISPR);
4833 writeb(Isr, ha->mem_ptr + IPS_REG_HISR);
4834 }
4835
4836 if (PostByte[0] < IPS_GOOD_POST_STATUS) {
4837 IPS_PRINTK(KERN_WARNING, ha->pcidev,
4838 "reset controller fails (post status %x %x).\n",
4839 PostByte[0], PostByte[1]);
4840
4841 return (0);
4842 }
4843
4844 for (i = 0; i < IPS_MAX_CONFIG_BYTES; i++) {
4845 for (j = 0; j < 240; j++) {
4846 Isr = readb(ha->mem_ptr + IPS_REG_HISR);
4847 if (Isr & IPS_BIT_GHI)
4848 break;
4849
4850 /* Delay for 1 Second */
4851 MDELAY(IPS_ONE_SEC);
4852 }
4853
4854 if (j >= 240)
4855 /* error occurred */
4856 return (0);
4857
4858 ConfigByte[i] = readb(ha->mem_ptr + IPS_REG_ISPR);
4859 writeb(Isr, ha->mem_ptr + IPS_REG_HISR);
4860 }
4861
4862 for (i = 0; i < 240; i++) {
4863 Cbsp = readb(ha->mem_ptr + IPS_REG_CBSP);
4864
4865 if ((Cbsp & IPS_BIT_OP) == 0)
4866 break;
4867
4868 /* Delay for 1 Second */
4869 MDELAY(IPS_ONE_SEC);
4870 }
4871
4872 if (i >= 240)
4873 /* error occurred */
4874 return (0);
4875
4876 /* setup CCCR */
4877 writel(0x1010, ha->mem_ptr + IPS_REG_CCCR);
4878
4879 /* Enable busmastering */
4880 writeb(IPS_BIT_EBM, ha->mem_ptr + IPS_REG_SCPR);
4881
4882 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
4883 /* fix for anaconda64 */
4884 writel(0, ha->mem_ptr + IPS_REG_NDAE);
4885
4886 /* Enable interrupts */
4887 writeb(IPS_BIT_EI, ha->mem_ptr + IPS_REG_HISR);
4888
4889 /* if we get here then everything went OK */
4890 return (1);
4891 }
4892
4893 /****************************************************************************/
4894 /* */
4895 /* Routine Name: ips_init_morpheus */
4896 /* */
4897 /* Routine Description: */
4898 /* */
4899 /* Initialize a morpheus controller */
4900 /* */
4901 /****************************************************************************/
4902 static int
4903 ips_init_morpheus(ips_ha_t * ha)
4904 {
4905 uint32_t Post;
4906 uint32_t Config;
4907 uint32_t Isr;
4908 uint32_t Oimr;
4909 int i;
4910
4911 METHOD_TRACE("ips_init_morpheus", 1);
4912
4913 /* Wait up to 45 secs for Post */
4914 for (i = 0; i < 45; i++) {
4915 Isr = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
4916
4917 if (Isr & IPS_BIT_I960_MSG0I)
4918 break;
4919
4920 /* Delay for 1 Second */
4921 MDELAY(IPS_ONE_SEC);
4922 }
4923
4924 if (i >= 45) {
4925 /* error occurred */
4926 IPS_PRINTK(KERN_WARNING, ha->pcidev,
4927 "timeout waiting for post.\n");
4928
4929 return (0);
4930 }
4931
4932 Post = readl(ha->mem_ptr + IPS_REG_I960_MSG0);
4933
4934 if (Post == 0x4F00) { /* If Flashing the Battery PIC */
4935 IPS_PRINTK(KERN_WARNING, ha->pcidev,
4936 "Flashing Battery PIC, Please wait ...\n");
4937
4938 /* Clear the interrupt bit */
4939 Isr = (uint32_t) IPS_BIT_I960_MSG0I;
4940 writel(Isr, ha->mem_ptr + IPS_REG_I2O_HIR);
4941
4942 for (i = 0; i < 120; i++) { /* Wait Up to 2 Min. for Completion */
4943 Post = readl(ha->mem_ptr + IPS_REG_I960_MSG0);
4944 if (Post != 0x4F00)
4945 break;
4946 /* Delay for 1 Second */
4947 MDELAY(IPS_ONE_SEC);
4948 }
4949
4950 if (i >= 120) {
4951 IPS_PRINTK(KERN_WARNING, ha->pcidev,
4952 "timeout waiting for Battery PIC Flash\n");
4953 return (0);
4954 }
4955
4956 }
4957
4958 /* Clear the interrupt bit */
4959 Isr = (uint32_t) IPS_BIT_I960_MSG0I;
4960 writel(Isr, ha->mem_ptr + IPS_REG_I2O_HIR);
4961
4962 if (Post < (IPS_GOOD_POST_STATUS << 8)) {
4963 IPS_PRINTK(KERN_WARNING, ha->pcidev,
4964 "reset controller fails (post status %x).\n", Post);
4965
4966 return (0);
4967 }
4968
4969 /* Wait up to 240 secs for config bytes */
4970 for (i = 0; i < 240; i++) {
4971 Isr = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
4972
4973 if (Isr & IPS_BIT_I960_MSG1I)
4974 break;
4975
4976 /* Delay for 1 Second */
4977 MDELAY(IPS_ONE_SEC);
4978 }
4979
4980 if (i >= 240) {
4981 /* error occurred */
4982 IPS_PRINTK(KERN_WARNING, ha->pcidev,
4983 "timeout waiting for config.\n");
4984
4985 return (0);
4986 }
4987
4988 Config = readl(ha->mem_ptr + IPS_REG_I960_MSG1);
4989
4990 /* Clear interrupt bit */
4991 Isr = (uint32_t) IPS_BIT_I960_MSG1I;
4992 writel(Isr, ha->mem_ptr + IPS_REG_I2O_HIR);
4993
4994 /* Turn on the interrupts */
4995 Oimr = readl(ha->mem_ptr + IPS_REG_I960_OIMR);
4996 Oimr &= ~0x8;
4997 writel(Oimr, ha->mem_ptr + IPS_REG_I960_OIMR);
4998
4999 /* if we get here then everything went OK */
5000
5001 /* Since we did a RESET, an EraseStripeLock may be needed */
5002 if (Post == 0xEF10) {
5003 if ((Config == 0x000F) || (Config == 0x0009))
5004 ha->requires_esl = 1;
5005 }
5006
5007 return (1);
5008 }
5009
5010 /****************************************************************************/
5011 /* */
5012 /* Routine Name: ips_reset_copperhead */
5013 /* */
5014 /* Routine Description: */
5015 /* */
5016 /* Reset the controller */
5017 /* */
5018 /****************************************************************************/
5019 static int
5020 ips_reset_copperhead(ips_ha_t * ha)
5021 {
5022 int reset_counter;
5023
5024 METHOD_TRACE("ips_reset_copperhead", 1);
5025
5026 DEBUG_VAR(1, "(%s%d) ips_reset_copperhead: io addr: %x, irq: %d",
5027 ips_name, ha->host_num, ha->io_addr, ha->pcidev->irq);
5028
5029 reset_counter = 0;
5030
5031 while (reset_counter < 2) {
5032 reset_counter++;
5033
5034 outb(IPS_BIT_RST, ha->io_addr + IPS_REG_SCPR);
5035
5036 /* Delay for 1 Second */
5037 MDELAY(IPS_ONE_SEC);
5038
5039 outb(0, ha->io_addr + IPS_REG_SCPR);
5040
5041 /* Delay for 1 Second */
5042 MDELAY(IPS_ONE_SEC);
5043
5044 if ((*ha->func.init) (ha))
5045 break;
5046 else if (reset_counter >= 2) {
5047
5048 return (0);
5049 }
5050 }
5051
5052 return (1);
5053 }
5054
5055 /****************************************************************************/
5056 /* */
5057 /* Routine Name: ips_reset_copperhead_memio */
5058 /* */
5059 /* Routine Description: */
5060 /* */
5061 /* Reset the controller */
5062 /* */
5063 /****************************************************************************/
5064 static int
5065 ips_reset_copperhead_memio(ips_ha_t * ha)
5066 {
5067 int reset_counter;
5068
5069 METHOD_TRACE("ips_reset_copperhead_memio", 1);
5070
5071 DEBUG_VAR(1, "(%s%d) ips_reset_copperhead_memio: mem addr: %x, irq: %d",
5072 ips_name, ha->host_num, ha->mem_addr, ha->pcidev->irq);
5073
5074 reset_counter = 0;
5075
5076 while (reset_counter < 2) {
5077 reset_counter++;
5078
5079 writeb(IPS_BIT_RST, ha->mem_ptr + IPS_REG_SCPR);
5080
5081 /* Delay for 1 Second */
5082 MDELAY(IPS_ONE_SEC);
5083
5084 writeb(0, ha->mem_ptr + IPS_REG_SCPR);
5085
5086 /* Delay for 1 Second */
5087 MDELAY(IPS_ONE_SEC);
5088
5089 if ((*ha->func.init) (ha))
5090 break;
5091 else if (reset_counter >= 2) {
5092
5093 return (0);
5094 }
5095 }
5096
5097 return (1);
5098 }
5099
5100 /****************************************************************************/
5101 /* */
5102 /* Routine Name: ips_reset_morpheus */
5103 /* */
5104 /* Routine Description: */
5105 /* */
5106 /* Reset the controller */
5107 /* */
5108 /****************************************************************************/
5109 static int
5110 ips_reset_morpheus(ips_ha_t * ha)
5111 {
5112 int reset_counter;
5113 uint8_t junk;
5114
5115 METHOD_TRACE("ips_reset_morpheus", 1);
5116
5117 DEBUG_VAR(1, "(%s%d) ips_reset_morpheus: mem addr: %x, irq: %d",
5118 ips_name, ha->host_num, ha->mem_addr, ha->pcidev->irq);
5119
5120 reset_counter = 0;
5121
5122 while (reset_counter < 2) {
5123 reset_counter++;
5124
5125 writel(0x80000000, ha->mem_ptr + IPS_REG_I960_IDR);
5126
5127 /* Delay for 5 Seconds */
5128 MDELAY(5 * IPS_ONE_SEC);
5129
5130 /* Do a PCI config read to wait for adapter */
5131 pci_read_config_byte(ha->pcidev, 4, &junk);
5132
5133 if ((*ha->func.init) (ha))
5134 break;
5135 else if (reset_counter >= 2) {
5136
5137 return (0);
5138 }
5139 }
5140
5141 return (1);
5142 }
5143
5144 /****************************************************************************/
5145 /* */
5146 /* Routine Name: ips_statinit */
5147 /* */
5148 /* Routine Description: */
5149 /* */
5150 /* Initialize the status queues on the controller */
5151 /* */
5152 /****************************************************************************/
5153 static void
5154 ips_statinit(ips_ha_t * ha)
5155 {
5156 uint32_t phys_status_start;
5157
5158 METHOD_TRACE("ips_statinit", 1);
5159
5160 ha->adapt->p_status_start = ha->adapt->status;
5161 ha->adapt->p_status_end = ha->adapt->status + IPS_MAX_CMDS;
5162 ha->adapt->p_status_tail = ha->adapt->status;
5163
5164 phys_status_start = ha->adapt->hw_status_start;
5165 outl(phys_status_start, ha->io_addr + IPS_REG_SQSR);
5166 outl(phys_status_start + IPS_STATUS_Q_SIZE,
5167 ha->io_addr + IPS_REG_SQER);
5168 outl(phys_status_start + IPS_STATUS_SIZE,
5169 ha->io_addr + IPS_REG_SQHR);
5170 outl(phys_status_start, ha->io_addr + IPS_REG_SQTR);
5171
5172 ha->adapt->hw_status_tail = phys_status_start;
5173 }
5174
5175 /****************************************************************************/
5176 /* */
5177 /* Routine Name: ips_statinit_memio */
5178 /* */
5179 /* Routine Description: */
5180 /* */
5181 /* Initialize the status queues on the controller */
5182 /* */
5183 /****************************************************************************/
5184 static void
5185 ips_statinit_memio(ips_ha_t * ha)
5186 {
5187 uint32_t phys_status_start;
5188
5189 METHOD_TRACE("ips_statinit_memio", 1);
5190
5191 ha->adapt->p_status_start = ha->adapt->status;
5192 ha->adapt->p_status_end = ha->adapt->status + IPS_MAX_CMDS;
5193 ha->adapt->p_status_tail = ha->adapt->status;
5194
5195 phys_status_start = ha->adapt->hw_status_start;
5196 writel(phys_status_start, ha->mem_ptr + IPS_REG_SQSR);
5197 writel(phys_status_start + IPS_STATUS_Q_SIZE,
5198 ha->mem_ptr + IPS_REG_SQER);
5199 writel(phys_status_start + IPS_STATUS_SIZE, ha->mem_ptr + IPS_REG_SQHR);
5200 writel(phys_status_start, ha->mem_ptr + IPS_REG_SQTR);
5201
5202 ha->adapt->hw_status_tail = phys_status_start;
5203 }
5204
5205 /****************************************************************************/
5206 /* */
5207 /* Routine Name: ips_statupd_copperhead */
5208 /* */
5209 /* Routine Description: */
5210 /* */
5211 /* Remove an element from the status queue */
5212 /* */
5213 /****************************************************************************/
5214 static uint32_t
5215 ips_statupd_copperhead(ips_ha_t * ha)
5216 {
5217 METHOD_TRACE("ips_statupd_copperhead", 1);
5218
5219 if (ha->adapt->p_status_tail != ha->adapt->p_status_end) {
5220 ha->adapt->p_status_tail++;
5221 ha->adapt->hw_status_tail += sizeof (IPS_STATUS);
5222 } else {
5223 ha->adapt->p_status_tail = ha->adapt->p_status_start;
5224 ha->adapt->hw_status_tail = ha->adapt->hw_status_start;
5225 }
5226
5227 outl(ha->adapt->hw_status_tail,
5228 ha->io_addr + IPS_REG_SQTR);
5229
5230 return (ha->adapt->p_status_tail->value);
5231 }
5232
5233 /****************************************************************************/
5234 /* */
5235 /* Routine Name: ips_statupd_copperhead_memio */
5236 /* */
5237 /* Routine Description: */
5238 /* */
5239 /* Remove an element from the status queue */
5240 /* */
5241 /****************************************************************************/
5242 static uint32_t
5243 ips_statupd_copperhead_memio(ips_ha_t * ha)
5244 {
5245 METHOD_TRACE("ips_statupd_copperhead_memio", 1);
5246
5247 if (ha->adapt->p_status_tail != ha->adapt->p_status_end) {
5248 ha->adapt->p_status_tail++;
5249 ha->adapt->hw_status_tail += sizeof (IPS_STATUS);
5250 } else {
5251 ha->adapt->p_status_tail = ha->adapt->p_status_start;
5252 ha->adapt->hw_status_tail = ha->adapt->hw_status_start;
5253 }
5254
5255 writel(ha->adapt->hw_status_tail, ha->mem_ptr + IPS_REG_SQTR);
5256
5257 return (ha->adapt->p_status_tail->value);
5258 }
5259
5260 /****************************************************************************/
5261 /* */
5262 /* Routine Name: ips_statupd_morpheus */
5263 /* */
5264 /* Routine Description: */
5265 /* */
5266 /* Remove an element from the status queue */
5267 /* */
5268 /****************************************************************************/
5269 static uint32_t
5270 ips_statupd_morpheus(ips_ha_t * ha)
5271 {
5272 uint32_t val;
5273
5274 METHOD_TRACE("ips_statupd_morpheus", 1);
5275
5276 val = readl(ha->mem_ptr + IPS_REG_I2O_OUTMSGQ);
5277
5278 return (val);
5279 }
5280
5281 /****************************************************************************/
5282 /* */
5283 /* Routine Name: ips_issue_copperhead */
5284 /* */
5285 /* Routine Description: */
5286 /* */
5287 /* Send a command down to the controller */
5288 /* */
5289 /****************************************************************************/
5290 static int
5291 ips_issue_copperhead(ips_ha_t * ha, ips_scb_t * scb)
5292 {
5293 uint32_t TimeOut;
5294 uint32_t val;
5295
5296 METHOD_TRACE("ips_issue_copperhead", 1);
5297
5298 if (scb->scsi_cmd) {
5299 DEBUG_VAR(2, "(%s%d) ips_issue: cmd 0x%X id %d (%d %d %d)",
5300 ips_name,
5301 ha->host_num,
5302 scb->cdb[0],
5303 scb->cmd.basic_io.command_id,
5304 scb->bus, scb->target_id, scb->lun);
5305 } else {
5306 DEBUG_VAR(2, KERN_NOTICE "(%s%d) ips_issue: logical cmd id %d",
5307 ips_name, ha->host_num, scb->cmd.basic_io.command_id);
5308 }
5309
5310 TimeOut = 0;
5311
5312 while ((val =
5313 le32_to_cpu(inl(ha->io_addr + IPS_REG_CCCR))) & IPS_BIT_SEM) {
5314 udelay(1000);
5315
5316 if (++TimeOut >= IPS_SEM_TIMEOUT) {
5317 if (!(val & IPS_BIT_START_STOP))
5318 break;
5319
5320 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5321 "ips_issue val [0x%x].\n", val);
5322 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5323 "ips_issue semaphore chk timeout.\n");
5324
5325 return (IPS_FAILURE);
5326 } /* end if */
5327 } /* end while */
5328
5329 outl(scb->scb_busaddr, ha->io_addr + IPS_REG_CCSAR);
5330 outw(IPS_BIT_START_CMD, ha->io_addr + IPS_REG_CCCR);
5331
5332 return (IPS_SUCCESS);
5333 }
5334
5335 /****************************************************************************/
5336 /* */
5337 /* Routine Name: ips_issue_copperhead_memio */
5338 /* */
5339 /* Routine Description: */
5340 /* */
5341 /* Send a command down to the controller */
5342 /* */
5343 /****************************************************************************/
5344 static int
5345 ips_issue_copperhead_memio(ips_ha_t * ha, ips_scb_t * scb)
5346 {
5347 uint32_t TimeOut;
5348 uint32_t val;
5349
5350 METHOD_TRACE("ips_issue_copperhead_memio", 1);
5351
5352 if (scb->scsi_cmd) {
5353 DEBUG_VAR(2, "(%s%d) ips_issue: cmd 0x%X id %d (%d %d %d)",
5354 ips_name,
5355 ha->host_num,
5356 scb->cdb[0],
5357 scb->cmd.basic_io.command_id,
5358 scb->bus, scb->target_id, scb->lun);
5359 } else {
5360 DEBUG_VAR(2, "(%s%d) ips_issue: logical cmd id %d",
5361 ips_name, ha->host_num, scb->cmd.basic_io.command_id);
5362 }
5363
5364 TimeOut = 0;
5365
5366 while ((val = readl(ha->mem_ptr + IPS_REG_CCCR)) & IPS_BIT_SEM) {
5367 udelay(1000);
5368
5369 if (++TimeOut >= IPS_SEM_TIMEOUT) {
5370 if (!(val & IPS_BIT_START_STOP))
5371 break;
5372
5373 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5374 "ips_issue val [0x%x].\n", val);
5375 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5376 "ips_issue semaphore chk timeout.\n");
5377
5378 return (IPS_FAILURE);
5379 } /* end if */
5380 } /* end while */
5381
5382 writel(scb->scb_busaddr, ha->mem_ptr + IPS_REG_CCSAR);
5383 writel(IPS_BIT_START_CMD, ha->mem_ptr + IPS_REG_CCCR);
5384
5385 return (IPS_SUCCESS);
5386 }
5387
5388 /****************************************************************************/
5389 /* */
5390 /* Routine Name: ips_issue_i2o */
5391 /* */
5392 /* Routine Description: */
5393 /* */
5394 /* Send a command down to the controller */
5395 /* */
5396 /****************************************************************************/
5397 static int
5398 ips_issue_i2o(ips_ha_t * ha, ips_scb_t * scb)
5399 {
5400
5401 METHOD_TRACE("ips_issue_i2o", 1);
5402
5403 if (scb->scsi_cmd) {
5404 DEBUG_VAR(2, "(%s%d) ips_issue: cmd 0x%X id %d (%d %d %d)",
5405 ips_name,
5406 ha->host_num,
5407 scb->cdb[0],
5408 scb->cmd.basic_io.command_id,
5409 scb->bus, scb->target_id, scb->lun);
5410 } else {
5411 DEBUG_VAR(2, "(%s%d) ips_issue: logical cmd id %d",
5412 ips_name, ha->host_num, scb->cmd.basic_io.command_id);
5413 }
5414
5415 outl(scb->scb_busaddr, ha->io_addr + IPS_REG_I2O_INMSGQ);
5416
5417 return (IPS_SUCCESS);
5418 }
5419
5420 /****************************************************************************/
5421 /* */
5422 /* Routine Name: ips_issue_i2o_memio */
5423 /* */
5424 /* Routine Description: */
5425 /* */
5426 /* Send a command down to the controller */
5427 /* */
5428 /****************************************************************************/
5429 static int
5430 ips_issue_i2o_memio(ips_ha_t * ha, ips_scb_t * scb)
5431 {
5432
5433 METHOD_TRACE("ips_issue_i2o_memio", 1);
5434
5435 if (scb->scsi_cmd) {
5436 DEBUG_VAR(2, "(%s%d) ips_issue: cmd 0x%X id %d (%d %d %d)",
5437 ips_name,
5438 ha->host_num,
5439 scb->cdb[0],
5440 scb->cmd.basic_io.command_id,
5441 scb->bus, scb->target_id, scb->lun);
5442 } else {
5443 DEBUG_VAR(2, "(%s%d) ips_issue: logical cmd id %d",
5444 ips_name, ha->host_num, scb->cmd.basic_io.command_id);
5445 }
5446
5447 writel(scb->scb_busaddr, ha->mem_ptr + IPS_REG_I2O_INMSGQ);
5448
5449 return (IPS_SUCCESS);
5450 }
5451
5452 /****************************************************************************/
5453 /* */
5454 /* Routine Name: ips_isintr_copperhead */
5455 /* */
5456 /* Routine Description: */
5457 /* */
5458 /* Test to see if an interrupt is for us */
5459 /* */
5460 /****************************************************************************/
5461 static int
5462 ips_isintr_copperhead(ips_ha_t * ha)
5463 {
5464 uint8_t Isr;
5465
5466 METHOD_TRACE("ips_isintr_copperhead", 2);
5467
5468 Isr = inb(ha->io_addr + IPS_REG_HISR);
5469
5470 if (Isr == 0xFF)
5471 /* ?!?! Nothing really there */
5472 return (0);
5473
5474 if (Isr & IPS_BIT_SCE)
5475 return (1);
5476 else if (Isr & (IPS_BIT_SQO | IPS_BIT_GHI)) {
5477 /* status queue overflow or GHI */
5478 /* just clear the interrupt */
5479 outb(Isr, ha->io_addr + IPS_REG_HISR);
5480 }
5481
5482 return (0);
5483 }
5484
5485 /****************************************************************************/
5486 /* */
5487 /* Routine Name: ips_isintr_copperhead_memio */
5488 /* */
5489 /* Routine Description: */
5490 /* */
5491 /* Test to see if an interrupt is for us */
5492 /* */
5493 /****************************************************************************/
5494 static int
5495 ips_isintr_copperhead_memio(ips_ha_t * ha)
5496 {
5497 uint8_t Isr;
5498
5499 METHOD_TRACE("ips_isintr_memio", 2);
5500
5501 Isr = readb(ha->mem_ptr + IPS_REG_HISR);
5502
5503 if (Isr == 0xFF)
5504 /* ?!?! Nothing really there */
5505 return (0);
5506
5507 if (Isr & IPS_BIT_SCE)
5508 return (1);
5509 else if (Isr & (IPS_BIT_SQO | IPS_BIT_GHI)) {
5510 /* status queue overflow or GHI */
5511 /* just clear the interrupt */
5512 writeb(Isr, ha->mem_ptr + IPS_REG_HISR);
5513 }
5514
5515 return (0);
5516 }
5517
5518 /****************************************************************************/
5519 /* */
5520 /* Routine Name: ips_isintr_morpheus */
5521 /* */
5522 /* Routine Description: */
5523 /* */
5524 /* Test to see if an interrupt is for us */
5525 /* */
5526 /****************************************************************************/
5527 static int
5528 ips_isintr_morpheus(ips_ha_t * ha)
5529 {
5530 uint32_t Isr;
5531
5532 METHOD_TRACE("ips_isintr_morpheus", 2);
5533
5534 Isr = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
5535
5536 if (Isr & IPS_BIT_I2O_OPQI)
5537 return (1);
5538 else
5539 return (0);
5540 }
5541
5542 /****************************************************************************/
5543 /* */
5544 /* Routine Name: ips_wait */
5545 /* */
5546 /* Routine Description: */
5547 /* */
5548 /* Wait for a command to complete */
5549 /* */
5550 /****************************************************************************/
5551 static int
5552 ips_wait(ips_ha_t * ha, int time, int intr)
5553 {
5554 int ret;
5555 int done;
5556
5557 METHOD_TRACE("ips_wait", 1);
5558
5559 ret = IPS_FAILURE;
5560 done = FALSE;
5561
5562 time *= IPS_ONE_SEC; /* convert seconds */
5563
5564 while ((time > 0) && (!done)) {
5565 if (intr == IPS_INTR_ON) {
5566 if (ha->waitflag == FALSE) {
5567 ret = IPS_SUCCESS;
5568 done = TRUE;
5569 break;
5570 }
5571 } else if (intr == IPS_INTR_IORL) {
5572 if (ha->waitflag == FALSE) {
5573 /*
5574 * controller generated an interrupt to
5575 * acknowledge completion of the command
5576 * and ips_intr() has serviced the interrupt.
5577 */
5578 ret = IPS_SUCCESS;
5579 done = TRUE;
5580 break;
5581 }
5582
5583 /*
5584 * NOTE: we already have the io_request_lock so
5585 * even if we get an interrupt it won't get serviced
5586 * until after we finish.
5587 */
5588
5589 (*ha->func.intr) (ha);
5590 }
5591
5592 /* This looks like a very evil loop, but it only does this during start-up */
5593 udelay(1000);
5594 time--;
5595 }
5596
5597 return (ret);
5598 }
5599
5600 /****************************************************************************/
5601 /* */
5602 /* Routine Name: ips_write_driver_status */
5603 /* */
5604 /* Routine Description: */
5605 /* */
5606 /* Write OS/Driver version to Page 5 of the nvram on the controller */
5607 /* */
5608 /****************************************************************************/
5609 static int
5610 ips_write_driver_status(ips_ha_t * ha, int intr)
5611 {
5612 METHOD_TRACE("ips_write_driver_status", 1);
5613
5614 if (!ips_readwrite_page5(ha, FALSE, intr)) {
5615 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5616 "unable to read NVRAM page 5.\n");
5617
5618 return (0);
5619 }
5620
5621 /* check to make sure the page has a valid */
5622 /* signature */
5623 if (le32_to_cpu(ha->nvram->signature) != IPS_NVRAM_P5_SIG) {
5624 DEBUG_VAR(1,
5625 "(%s%d) NVRAM page 5 has an invalid signature: %X.",
5626 ips_name, ha->host_num, ha->nvram->signature);
5627 ha->nvram->signature = IPS_NVRAM_P5_SIG;
5628 }
5629
5630 DEBUG_VAR(2,
5631 "(%s%d) Ad Type: %d, Ad Slot: %d, BIOS: %c%c%c%c %c%c%c%c.",
5632 ips_name, ha->host_num, le16_to_cpu(ha->nvram->adapter_type),
5633 ha->nvram->adapter_slot, ha->nvram->bios_high[0],
5634 ha->nvram->bios_high[1], ha->nvram->bios_high[2],
5635 ha->nvram->bios_high[3], ha->nvram->bios_low[0],
5636 ha->nvram->bios_low[1], ha->nvram->bios_low[2],
5637 ha->nvram->bios_low[3]);
5638
5639 ips_get_bios_version(ha, intr);
5640
5641 /* change values (as needed) */
5642 ha->nvram->operating_system = IPS_OS_LINUX;
5643 ha->nvram->adapter_type = ha->ad_type;
5644 strncpy((char *) ha->nvram->driver_high, IPS_VERSION_HIGH, 4);
5645 strncpy((char *) ha->nvram->driver_low, IPS_VERSION_LOW, 4);
5646 strncpy((char *) ha->nvram->bios_high, ha->bios_version, 4);
5647 strncpy((char *) ha->nvram->bios_low, ha->bios_version + 4, 4);
5648
5649 ha->nvram->versioning = 0; /* Indicate the Driver Does Not Support Versioning */
5650
5651 /* now update the page */
5652 if (!ips_readwrite_page5(ha, TRUE, intr)) {
5653 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5654 "unable to write NVRAM page 5.\n");
5655
5656 return (0);
5657 }
5658
5659 /* IF NVRAM Page 5 is OK, Use it for Slot Number Info Because Linux Doesn't Do Slots */
5660 ha->slot_num = ha->nvram->adapter_slot;
5661
5662 return (1);
5663 }
5664
5665 /****************************************************************************/
5666 /* */
5667 /* Routine Name: ips_read_adapter_status */
5668 /* */
5669 /* Routine Description: */
5670 /* */
5671 /* Do an Inquiry command to the adapter */
5672 /* */
5673 /****************************************************************************/
5674 static int
5675 ips_read_adapter_status(ips_ha_t * ha, int intr)
5676 {
5677 ips_scb_t *scb;
5678 int ret;
5679
5680 METHOD_TRACE("ips_read_adapter_status", 1);
5681
5682 scb = &ha->scbs[ha->max_cmds - 1];
5683
5684 ips_init_scb(ha, scb);
5685
5686 scb->timeout = ips_cmd_timeout;
5687 scb->cdb[0] = IPS_CMD_ENQUIRY;
5688
5689 scb->cmd.basic_io.op_code = IPS_CMD_ENQUIRY;
5690 scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
5691 scb->cmd.basic_io.sg_count = 0;
5692 scb->cmd.basic_io.lba = 0;
5693 scb->cmd.basic_io.sector_count = 0;
5694 scb->cmd.basic_io.log_drv = 0;
5695 scb->data_len = sizeof (*ha->enq);
5696 scb->cmd.basic_io.sg_addr = ha->enq_busaddr;
5697
5698 /* send command */
5699 if (((ret =
5700 ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5701 || (ret == IPS_SUCCESS_IMM)
5702 || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1))
5703 return (0);
5704
5705 return (1);
5706 }
5707
5708 /****************************************************************************/
5709 /* */
5710 /* Routine Name: ips_read_subsystem_parameters */
5711 /* */
5712 /* Routine Description: */
5713 /* */
5714 /* Read subsystem parameters from the adapter */
5715 /* */
5716 /****************************************************************************/
5717 static int
5718 ips_read_subsystem_parameters(ips_ha_t * ha, int intr)
5719 {
5720 ips_scb_t *scb;
5721 int ret;
5722
5723 METHOD_TRACE("ips_read_subsystem_parameters", 1);
5724
5725 scb = &ha->scbs[ha->max_cmds - 1];
5726
5727 ips_init_scb(ha, scb);
5728
5729 scb->timeout = ips_cmd_timeout;
5730 scb->cdb[0] = IPS_CMD_GET_SUBSYS;
5731
5732 scb->cmd.basic_io.op_code = IPS_CMD_GET_SUBSYS;
5733 scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
5734 scb->cmd.basic_io.sg_count = 0;
5735 scb->cmd.basic_io.lba = 0;
5736 scb->cmd.basic_io.sector_count = 0;
5737 scb->cmd.basic_io.log_drv = 0;
5738 scb->data_len = sizeof (*ha->subsys);
5739 scb->cmd.basic_io.sg_addr = ha->ioctl_busaddr;
5740
5741 /* send command */
5742 if (((ret =
5743 ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5744 || (ret == IPS_SUCCESS_IMM)
5745 || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1))
5746 return (0);
5747
5748 memcpy(ha->subsys, ha->ioctl_data, sizeof(*ha->subsys));
5749 return (1);
5750 }
5751
5752 /****************************************************************************/
5753 /* */
5754 /* Routine Name: ips_read_config */
5755 /* */
5756 /* Routine Description: */
5757 /* */
5758 /* Read the configuration on the adapter */
5759 /* */
5760 /****************************************************************************/
5761 static int
5762 ips_read_config(ips_ha_t * ha, int intr)
5763 {
5764 ips_scb_t *scb;
5765 int i;
5766 int ret;
5767
5768 METHOD_TRACE("ips_read_config", 1);
5769
5770 /* set defaults for initiator IDs */
5771 for (i = 0; i < 4; i++)
5772 ha->conf->init_id[i] = 7;
5773
5774 scb = &ha->scbs[ha->max_cmds - 1];
5775
5776 ips_init_scb(ha, scb);
5777
5778 scb->timeout = ips_cmd_timeout;
5779 scb->cdb[0] = IPS_CMD_READ_CONF;
5780
5781 scb->cmd.basic_io.op_code = IPS_CMD_READ_CONF;
5782 scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
5783 scb->data_len = sizeof (*ha->conf);
5784 scb->cmd.basic_io.sg_addr = ha->ioctl_busaddr;
5785
5786 /* send command */
5787 if (((ret =
5788 ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5789 || (ret == IPS_SUCCESS_IMM)
5790 || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1)) {
5791
5792 memset(ha->conf, 0, sizeof (IPS_CONF));
5793
5794 /* reset initiator IDs */
5795 for (i = 0; i < 4; i++)
5796 ha->conf->init_id[i] = 7;
5797
5798 /* Allow Completed with Errors, so JCRM can access the Adapter to fix the problems */
5799 if ((scb->basic_status & IPS_GSC_STATUS_MASK) ==
5800 IPS_CMD_CMPLT_WERROR)
5801 return (1);
5802
5803 return (0);
5804 }
5805
5806 memcpy(ha->conf, ha->ioctl_data, sizeof(*ha->conf));
5807 return (1);
5808 }
5809
5810 /****************************************************************************/
5811 /* */
5812 /* Routine Name: ips_readwrite_page5 */
5813 /* */
5814 /* Routine Description: */
5815 /* */
5816 /* Read nvram page 5 from the adapter */
5817 /* */
5818 /****************************************************************************/
5819 static int
5820 ips_readwrite_page5(ips_ha_t * ha, int write, int intr)
5821 {
5822 ips_scb_t *scb;
5823 int ret;
5824
5825 METHOD_TRACE("ips_readwrite_page5", 1);
5826
5827 scb = &ha->scbs[ha->max_cmds - 1];
5828
5829 ips_init_scb(ha, scb);
5830
5831 scb->timeout = ips_cmd_timeout;
5832 scb->cdb[0] = IPS_CMD_RW_NVRAM_PAGE;
5833
5834 scb->cmd.nvram.op_code = IPS_CMD_RW_NVRAM_PAGE;
5835 scb->cmd.nvram.command_id = IPS_COMMAND_ID(ha, scb);
5836 scb->cmd.nvram.page = 5;
5837 scb->cmd.nvram.write = write;
5838 scb->cmd.nvram.reserved = 0;
5839 scb->cmd.nvram.reserved2 = 0;
5840 scb->data_len = sizeof (*ha->nvram);
5841 scb->cmd.nvram.buffer_addr = ha->ioctl_busaddr;
5842 if (write)
5843 memcpy(ha->ioctl_data, ha->nvram, sizeof(*ha->nvram));
5844
5845 /* issue the command */
5846 if (((ret =
5847 ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5848 || (ret == IPS_SUCCESS_IMM)
5849 || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1)) {
5850
5851 memset(ha->nvram, 0, sizeof (IPS_NVRAM_P5));
5852
5853 return (0);
5854 }
5855 if (!write)
5856 memcpy(ha->nvram, ha->ioctl_data, sizeof(*ha->nvram));
5857 return (1);
5858 }
5859
5860 /****************************************************************************/
5861 /* */
5862 /* Routine Name: ips_clear_adapter */
5863 /* */
5864 /* Routine Description: */
5865 /* */
5866 /* Clear the stripe lock tables */
5867 /* */
5868 /****************************************************************************/
5869 static int
5870 ips_clear_adapter(ips_ha_t * ha, int intr)
5871 {
5872 ips_scb_t *scb;
5873 int ret;
5874
5875 METHOD_TRACE("ips_clear_adapter", 1);
5876
5877 scb = &ha->scbs[ha->max_cmds - 1];
5878
5879 ips_init_scb(ha, scb);
5880
5881 scb->timeout = ips_reset_timeout;
5882 scb->cdb[0] = IPS_CMD_CONFIG_SYNC;
5883
5884 scb->cmd.config_sync.op_code = IPS_CMD_CONFIG_SYNC;
5885 scb->cmd.config_sync.command_id = IPS_COMMAND_ID(ha, scb);
5886 scb->cmd.config_sync.channel = 0;
5887 scb->cmd.config_sync.source_target = IPS_POCL;
5888 scb->cmd.config_sync.reserved = 0;
5889 scb->cmd.config_sync.reserved2 = 0;
5890 scb->cmd.config_sync.reserved3 = 0;
5891
5892 /* issue command */
5893 if (((ret =
5894 ips_send_wait(ha, scb, ips_reset_timeout, intr)) == IPS_FAILURE)
5895 || (ret == IPS_SUCCESS_IMM)
5896 || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1))
5897 return (0);
5898
5899 /* send unlock stripe command */
5900 ips_init_scb(ha, scb);
5901
5902 scb->cdb[0] = IPS_CMD_ERROR_TABLE;
5903 scb->timeout = ips_reset_timeout;
5904
5905 scb->cmd.unlock_stripe.op_code = IPS_CMD_ERROR_TABLE;
5906 scb->cmd.unlock_stripe.command_id = IPS_COMMAND_ID(ha, scb);
5907 scb->cmd.unlock_stripe.log_drv = 0;
5908 scb->cmd.unlock_stripe.control = IPS_CSL;
5909 scb->cmd.unlock_stripe.reserved = 0;
5910 scb->cmd.unlock_stripe.reserved2 = 0;
5911 scb->cmd.unlock_stripe.reserved3 = 0;
5912
5913 /* issue command */
5914 if (((ret =
5915 ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5916 || (ret == IPS_SUCCESS_IMM)
5917 || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1))
5918 return (0);
5919
5920 return (1);
5921 }
5922
5923 /****************************************************************************/
5924 /* */
5925 /* Routine Name: ips_ffdc_reset */
5926 /* */
5927 /* Routine Description: */
5928 /* */
5929 /* FFDC: write reset info */
5930 /* */
5931 /****************************************************************************/
5932 static void
5933 ips_ffdc_reset(ips_ha_t * ha, int intr)
5934 {
5935 ips_scb_t *scb;
5936
5937 METHOD_TRACE("ips_ffdc_reset", 1);
5938
5939 scb = &ha->scbs[ha->max_cmds - 1];
5940
5941 ips_init_scb(ha, scb);
5942
5943 scb->timeout = ips_cmd_timeout;
5944 scb->cdb[0] = IPS_CMD_FFDC;
5945 scb->cmd.ffdc.op_code = IPS_CMD_FFDC;
5946 scb->cmd.ffdc.command_id = IPS_COMMAND_ID(ha, scb);
5947 scb->cmd.ffdc.reset_count = ha->reset_count;
5948 scb->cmd.ffdc.reset_type = 0x80;
5949
5950 /* convert time to what the card wants */
5951 ips_fix_ffdc_time(ha, scb, ha->last_ffdc);
5952
5953 /* issue command */
5954 ips_send_wait(ha, scb, ips_cmd_timeout, intr);
5955 }
5956
5957 /****************************************************************************/
5958 /* */
5959 /* Routine Name: ips_ffdc_time */
5960 /* */
5961 /* Routine Description: */
5962 /* */
5963 /* FFDC: write time info */
5964 /* */
5965 /****************************************************************************/
5966 static void
5967 ips_ffdc_time(ips_ha_t * ha)
5968 {
5969 ips_scb_t *scb;
5970
5971 METHOD_TRACE("ips_ffdc_time", 1);
5972
5973 DEBUG_VAR(1, "(%s%d) Sending time update.", ips_name, ha->host_num);
5974
5975 scb = &ha->scbs[ha->max_cmds - 1];
5976
5977 ips_init_scb(ha, scb);
5978
5979 scb->timeout = ips_cmd_timeout;
5980 scb->cdb[0] = IPS_CMD_FFDC;
5981 scb->cmd.ffdc.op_code = IPS_CMD_FFDC;
5982 scb->cmd.ffdc.command_id = IPS_COMMAND_ID(ha, scb);
5983 scb->cmd.ffdc.reset_count = 0;
5984 scb->cmd.ffdc.reset_type = 0;
5985
5986 /* convert time to what the card wants */
5987 ips_fix_ffdc_time(ha, scb, ha->last_ffdc);
5988
5989 /* issue command */
5990 ips_send_wait(ha, scb, ips_cmd_timeout, IPS_FFDC);
5991 }
5992
5993 /****************************************************************************/
5994 /* */
5995 /* Routine Name: ips_fix_ffdc_time */
5996 /* */
5997 /* Routine Description: */
5998 /* Adjust time_t to what the card wants */
5999 /* */
6000 /****************************************************************************/
6001 static void
6002 ips_fix_ffdc_time(ips_ha_t * ha, ips_scb_t * scb, time_t current_time)
6003 {
6004 long days;
6005 long rem;
6006 int i;
6007 int year;
6008 int yleap;
6009 int year_lengths[2] = { IPS_DAYS_NORMAL_YEAR, IPS_DAYS_LEAP_YEAR };
6010 int month_lengths[12][2] = { {31, 31},
6011 {28, 29},
6012 {31, 31},
6013 {30, 30},
6014 {31, 31},
6015 {30, 30},
6016 {31, 31},
6017 {31, 31},
6018 {30, 30},
6019 {31, 31},
6020 {30, 30},
6021 {31, 31}
6022 };
6023
6024 METHOD_TRACE("ips_fix_ffdc_time", 1);
6025
6026 days = current_time / IPS_SECS_DAY;
6027 rem = current_time % IPS_SECS_DAY;
6028
6029 scb->cmd.ffdc.hour = (rem / IPS_SECS_HOUR);
6030 rem = rem % IPS_SECS_HOUR;
6031 scb->cmd.ffdc.minute = (rem / IPS_SECS_MIN);
6032 scb->cmd.ffdc.second = (rem % IPS_SECS_MIN);
6033
6034 year = IPS_EPOCH_YEAR;
6035 while (days < 0 || days >= year_lengths[yleap = IPS_IS_LEAP_YEAR(year)]) {
6036 int newy;
6037
6038 newy = year + (days / IPS_DAYS_NORMAL_YEAR);
6039 if (days < 0)
6040 --newy;
6041 days -= (newy - year) * IPS_DAYS_NORMAL_YEAR +
6042 IPS_NUM_LEAP_YEARS_THROUGH(newy - 1) -
6043 IPS_NUM_LEAP_YEARS_THROUGH(year - 1);
6044 year = newy;
6045 }
6046
6047 scb->cmd.ffdc.yearH = year / 100;
6048 scb->cmd.ffdc.yearL = year % 100;
6049
6050 for (i = 0; days >= month_lengths[i][yleap]; ++i)
6051 days -= month_lengths[i][yleap];
6052
6053 scb->cmd.ffdc.month = i + 1;
6054 scb->cmd.ffdc.day = days + 1;
6055 }
6056
6057 /****************************************************************************
6058 * BIOS Flash Routines *
6059 ****************************************************************************/
6060
6061 /****************************************************************************/
6062 /* */
6063 /* Routine Name: ips_erase_bios */
6064 /* */
6065 /* Routine Description: */
6066 /* Erase the BIOS on the adapter */
6067 /* */
6068 /****************************************************************************/
6069 static int
6070 ips_erase_bios(ips_ha_t * ha)
6071 {
6072 int timeout;
6073 uint8_t status = 0;
6074
6075 METHOD_TRACE("ips_erase_bios", 1);
6076
6077 status = 0;
6078
6079 /* Clear the status register */
6080 outl(0, ha->io_addr + IPS_REG_FLAP);
6081 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6082 udelay(25); /* 25 us */
6083
6084 outb(0x50, ha->io_addr + IPS_REG_FLDP);
6085 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6086 udelay(25); /* 25 us */
6087
6088 /* Erase Setup */
6089 outb(0x20, ha->io_addr + IPS_REG_FLDP);
6090 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6091 udelay(25); /* 25 us */
6092
6093 /* Erase Confirm */
6094 outb(0xD0, ha->io_addr + IPS_REG_FLDP);
6095 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6096 udelay(25); /* 25 us */
6097
6098 /* Erase Status */
6099 outb(0x70, ha->io_addr + IPS_REG_FLDP);
6100 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6101 udelay(25); /* 25 us */
6102
6103 timeout = 80000; /* 80 seconds */
6104
6105 while (timeout > 0) {
6106 if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6107 outl(0, ha->io_addr + IPS_REG_FLAP);
6108 udelay(25); /* 25 us */
6109 }
6110
6111 status = inb(ha->io_addr + IPS_REG_FLDP);
6112
6113 if (status & 0x80)
6114 break;
6115
6116 MDELAY(1);
6117 timeout--;
6118 }
6119
6120 /* check for timeout */
6121 if (timeout <= 0) {
6122 /* timeout */
6123
6124 /* try to suspend the erase */
6125 outb(0xB0, ha->io_addr + IPS_REG_FLDP);
6126 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6127 udelay(25); /* 25 us */
6128
6129 /* wait for 10 seconds */
6130 timeout = 10000;
6131 while (timeout > 0) {
6132 if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6133 outl(0, ha->io_addr + IPS_REG_FLAP);
6134 udelay(25); /* 25 us */
6135 }
6136
6137 status = inb(ha->io_addr + IPS_REG_FLDP);
6138
6139 if (status & 0xC0)
6140 break;
6141
6142 MDELAY(1);
6143 timeout--;
6144 }
6145
6146 return (1);
6147 }
6148
6149 /* check for valid VPP */
6150 if (status & 0x08)
6151 /* VPP failure */
6152 return (1);
6153
6154 /* check for successful flash */
6155 if (status & 0x30)
6156 /* sequence error */
6157 return (1);
6158
6159 /* Otherwise, we were successful */
6160 /* clear status */
6161 outb(0x50, ha->io_addr + IPS_REG_FLDP);
6162 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6163 udelay(25); /* 25 us */
6164
6165 /* enable reads */
6166 outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6167 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6168 udelay(25); /* 25 us */
6169
6170 return (0);
6171 }
6172
6173 /****************************************************************************/
6174 /* */
6175 /* Routine Name: ips_erase_bios_memio */
6176 /* */
6177 /* Routine Description: */
6178 /* Erase the BIOS on the adapter */
6179 /* */
6180 /****************************************************************************/
6181 static int
6182 ips_erase_bios_memio(ips_ha_t * ha)
6183 {
6184 int timeout;
6185 uint8_t status;
6186
6187 METHOD_TRACE("ips_erase_bios_memio", 1);
6188
6189 status = 0;
6190
6191 /* Clear the status register */
6192 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6193 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6194 udelay(25); /* 25 us */
6195
6196 writeb(0x50, ha->mem_ptr + IPS_REG_FLDP);
6197 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6198 udelay(25); /* 25 us */
6199
6200 /* Erase Setup */
6201 writeb(0x20, ha->mem_ptr + IPS_REG_FLDP);
6202 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6203 udelay(25); /* 25 us */
6204
6205 /* Erase Confirm */
6206 writeb(0xD0, ha->mem_ptr + IPS_REG_FLDP);
6207 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6208 udelay(25); /* 25 us */
6209
6210 /* Erase Status */
6211 writeb(0x70, ha->mem_ptr + IPS_REG_FLDP);
6212 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6213 udelay(25); /* 25 us */
6214
6215 timeout = 80000; /* 80 seconds */
6216
6217 while (timeout > 0) {
6218 if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6219 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6220 udelay(25); /* 25 us */
6221 }
6222
6223 status = readb(ha->mem_ptr + IPS_REG_FLDP);
6224
6225 if (status & 0x80)
6226 break;
6227
6228 MDELAY(1);
6229 timeout--;
6230 }
6231
6232 /* check for timeout */
6233 if (timeout <= 0) {
6234 /* timeout */
6235
6236 /* try to suspend the erase */
6237 writeb(0xB0, ha->mem_ptr + IPS_REG_FLDP);
6238 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6239 udelay(25); /* 25 us */
6240
6241 /* wait for 10 seconds */
6242 timeout = 10000;
6243 while (timeout > 0) {
6244 if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6245 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6246 udelay(25); /* 25 us */
6247 }
6248
6249 status = readb(ha->mem_ptr + IPS_REG_FLDP);
6250
6251 if (status & 0xC0)
6252 break;
6253
6254 MDELAY(1);
6255 timeout--;
6256 }
6257
6258 return (1);
6259 }
6260
6261 /* check for valid VPP */
6262 if (status & 0x08)
6263 /* VPP failure */
6264 return (1);
6265
6266 /* check for successful flash */
6267 if (status & 0x30)
6268 /* sequence error */
6269 return (1);
6270
6271 /* Otherwise, we were successful */
6272 /* clear status */
6273 writeb(0x50, ha->mem_ptr + IPS_REG_FLDP);
6274 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6275 udelay(25); /* 25 us */
6276
6277 /* enable reads */
6278 writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6279 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6280 udelay(25); /* 25 us */
6281
6282 return (0);
6283 }
6284
6285 /****************************************************************************/
6286 /* */
6287 /* Routine Name: ips_program_bios */
6288 /* */
6289 /* Routine Description: */
6290 /* Program the BIOS on the adapter */
6291 /* */
6292 /****************************************************************************/
6293 static int
6294 ips_program_bios(ips_ha_t * ha, char *buffer, uint32_t buffersize,
6295 uint32_t offset)
6296 {
6297 int i;
6298 int timeout;
6299 uint8_t status = 0;
6300
6301 METHOD_TRACE("ips_program_bios", 1);
6302
6303 status = 0;
6304
6305 for (i = 0; i < buffersize; i++) {
6306 /* write a byte */
6307 outl(i + offset, ha->io_addr + IPS_REG_FLAP);
6308 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6309 udelay(25); /* 25 us */
6310
6311 outb(0x40, ha->io_addr + IPS_REG_FLDP);
6312 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6313 udelay(25); /* 25 us */
6314
6315 outb(buffer[i], ha->io_addr + IPS_REG_FLDP);
6316 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6317 udelay(25); /* 25 us */
6318
6319 /* wait up to one second */
6320 timeout = 1000;
6321 while (timeout > 0) {
6322 if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6323 outl(0, ha->io_addr + IPS_REG_FLAP);
6324 udelay(25); /* 25 us */
6325 }
6326
6327 status = inb(ha->io_addr + IPS_REG_FLDP);
6328
6329 if (status & 0x80)
6330 break;
6331
6332 MDELAY(1);
6333 timeout--;
6334 }
6335
6336 if (timeout == 0) {
6337 /* timeout error */
6338 outl(0, ha->io_addr + IPS_REG_FLAP);
6339 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6340 udelay(25); /* 25 us */
6341
6342 outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6343 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6344 udelay(25); /* 25 us */
6345
6346 return (1);
6347 }
6348
6349 /* check the status */
6350 if (status & 0x18) {
6351 /* programming error */
6352 outl(0, ha->io_addr + IPS_REG_FLAP);
6353 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6354 udelay(25); /* 25 us */
6355
6356 outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6357 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6358 udelay(25); /* 25 us */
6359
6360 return (1);
6361 }
6362 } /* end for */
6363
6364 /* Enable reading */
6365 outl(0, ha->io_addr + IPS_REG_FLAP);
6366 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6367 udelay(25); /* 25 us */
6368
6369 outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6370 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6371 udelay(25); /* 25 us */
6372
6373 return (0);
6374 }
6375
6376 /****************************************************************************/
6377 /* */
6378 /* Routine Name: ips_program_bios_memio */
6379 /* */
6380 /* Routine Description: */
6381 /* Program the BIOS on the adapter */
6382 /* */
6383 /****************************************************************************/
6384 static int
6385 ips_program_bios_memio(ips_ha_t * ha, char *buffer, uint32_t buffersize,
6386 uint32_t offset)
6387 {
6388 int i;
6389 int timeout;
6390 uint8_t status = 0;
6391
6392 METHOD_TRACE("ips_program_bios_memio", 1);
6393
6394 status = 0;
6395
6396 for (i = 0; i < buffersize; i++) {
6397 /* write a byte */
6398 writel(i + offset, ha->mem_ptr + IPS_REG_FLAP);
6399 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6400 udelay(25); /* 25 us */
6401
6402 writeb(0x40, ha->mem_ptr + IPS_REG_FLDP);
6403 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6404 udelay(25); /* 25 us */
6405
6406 writeb(buffer[i], ha->mem_ptr + IPS_REG_FLDP);
6407 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6408 udelay(25); /* 25 us */
6409
6410 /* wait up to one second */
6411 timeout = 1000;
6412 while (timeout > 0) {
6413 if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6414 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6415 udelay(25); /* 25 us */
6416 }
6417
6418 status = readb(ha->mem_ptr + IPS_REG_FLDP);
6419
6420 if (status & 0x80)
6421 break;
6422
6423 MDELAY(1);
6424 timeout--;
6425 }
6426
6427 if (timeout == 0) {
6428 /* timeout error */
6429 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6430 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6431 udelay(25); /* 25 us */
6432
6433 writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6434 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6435 udelay(25); /* 25 us */
6436
6437 return (1);
6438 }
6439
6440 /* check the status */
6441 if (status & 0x18) {
6442 /* programming error */
6443 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6444 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6445 udelay(25); /* 25 us */
6446
6447 writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6448 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6449 udelay(25); /* 25 us */
6450
6451 return (1);
6452 }
6453 } /* end for */
6454
6455 /* Enable reading */
6456 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6457 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6458 udelay(25); /* 25 us */
6459
6460 writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6461 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6462 udelay(25); /* 25 us */
6463
6464 return (0);
6465 }
6466
6467 /****************************************************************************/
6468 /* */
6469 /* Routine Name: ips_verify_bios */
6470 /* */
6471 /* Routine Description: */
6472 /* Verify the BIOS on the adapter */
6473 /* */
6474 /****************************************************************************/
6475 static int
6476 ips_verify_bios(ips_ha_t * ha, char *buffer, uint32_t buffersize,
6477 uint32_t offset)
6478 {
6479 uint8_t checksum;
6480 int i;
6481
6482 METHOD_TRACE("ips_verify_bios", 1);
6483
6484 /* test 1st byte */
6485 outl(0, ha->io_addr + IPS_REG_FLAP);
6486 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6487 udelay(25); /* 25 us */
6488
6489 if (inb(ha->io_addr + IPS_REG_FLDP) != 0x55)
6490 return (1);
6491
6492 outl(1, ha->io_addr + IPS_REG_FLAP);
6493 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6494 udelay(25); /* 25 us */
6495 if (inb(ha->io_addr + IPS_REG_FLDP) != 0xAA)
6496 return (1);
6497
6498 checksum = 0xff;
6499 for (i = 2; i < buffersize; i++) {
6500
6501 outl(i + offset, ha->io_addr + IPS_REG_FLAP);
6502 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6503 udelay(25); /* 25 us */
6504
6505 checksum = (uint8_t) checksum + inb(ha->io_addr + IPS_REG_FLDP);
6506 }
6507
6508 if (checksum != 0)
6509 /* failure */
6510 return (1);
6511 else
6512 /* success */
6513 return (0);
6514 }
6515
6516 /****************************************************************************/
6517 /* */
6518 /* Routine Name: ips_verify_bios_memio */
6519 /* */
6520 /* Routine Description: */
6521 /* Verify the BIOS on the adapter */
6522 /* */
6523 /****************************************************************************/
6524 static int
6525 ips_verify_bios_memio(ips_ha_t * ha, char *buffer, uint32_t buffersize,
6526 uint32_t offset)
6527 {
6528 uint8_t checksum;
6529 int i;
6530
6531 METHOD_TRACE("ips_verify_bios_memio", 1);
6532
6533 /* test 1st byte */
6534 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6535 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6536 udelay(25); /* 25 us */
6537
6538 if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0x55)
6539 return (1);
6540
6541 writel(1, ha->mem_ptr + IPS_REG_FLAP);
6542 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6543 udelay(25); /* 25 us */
6544 if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0xAA)
6545 return (1);
6546
6547 checksum = 0xff;
6548 for (i = 2; i < buffersize; i++) {
6549
6550 writel(i + offset, ha->mem_ptr + IPS_REG_FLAP);
6551 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6552 udelay(25); /* 25 us */
6553
6554 checksum =
6555 (uint8_t) checksum + readb(ha->mem_ptr + IPS_REG_FLDP);
6556 }
6557
6558 if (checksum != 0)
6559 /* failure */
6560 return (1);
6561 else
6562 /* success */
6563 return (0);
6564 }
6565
6566 /****************************************************************************/
6567 /* */
6568 /* Routine Name: ips_abort_init */
6569 /* */
6570 /* Routine Description: */
6571 /* cleanup routine for a failed adapter initialization */
6572 /****************************************************************************/
6573 static int
6574 ips_abort_init(ips_ha_t * ha, int index)
6575 {
6576 ha->active = 0;
6577 ips_free(ha);
6578 ips_ha[index] = NULL;
6579 ips_sh[index] = NULL;
6580 return -1;
6581 }
6582
6583 /****************************************************************************/
6584 /* */
6585 /* Routine Name: ips_shift_controllers */
6586 /* */
6587 /* Routine Description: */
6588 /* helper function for ordering adapters */
6589 /****************************************************************************/
6590 static void
6591 ips_shift_controllers(int lowindex, int highindex)
6592 {
6593 ips_ha_t *ha_sav = ips_ha[highindex];
6594 struct Scsi_Host *sh_sav = ips_sh[highindex];
6595 int i;
6596
6597 for (i = highindex; i > lowindex; i--) {
6598 ips_ha[i] = ips_ha[i - 1];
6599 ips_sh[i] = ips_sh[i - 1];
6600 ips_ha[i]->host_num = i;
6601 }
6602 ha_sav->host_num = lowindex;
6603 ips_ha[lowindex] = ha_sav;
6604 ips_sh[lowindex] = sh_sav;
6605 }
6606
6607 /****************************************************************************/
6608 /* */
6609 /* Routine Name: ips_order_controllers */
6610 /* */
6611 /* Routine Description: */
6612 /* place controllers is the "proper" boot order */
6613 /****************************************************************************/
6614 static void
6615 ips_order_controllers(void)
6616 {
6617 int i, j, tmp, position = 0;
6618 IPS_NVRAM_P5 *nvram;
6619 if (!ips_ha[0])
6620 return;
6621 nvram = ips_ha[0]->nvram;
6622
6623 if (nvram->adapter_order[0]) {
6624 for (i = 1; i <= nvram->adapter_order[0]; i++) {
6625 for (j = position; j < ips_num_controllers; j++) {
6626 switch (ips_ha[j]->ad_type) {
6627 case IPS_ADTYPE_SERVERAID6M:
6628 case IPS_ADTYPE_SERVERAID7M:
6629 if (nvram->adapter_order[i] == 'M') {
6630 ips_shift_controllers(position,
6631 j);
6632 position++;
6633 }
6634 break;
6635 case IPS_ADTYPE_SERVERAID4L:
6636 case IPS_ADTYPE_SERVERAID4M:
6637 case IPS_ADTYPE_SERVERAID4MX:
6638 case IPS_ADTYPE_SERVERAID4LX:
6639 if (nvram->adapter_order[i] == 'N') {
6640 ips_shift_controllers(position,
6641 j);
6642 position++;
6643 }
6644 break;
6645 case IPS_ADTYPE_SERVERAID6I:
6646 case IPS_ADTYPE_SERVERAID5I2:
6647 case IPS_ADTYPE_SERVERAID5I1:
6648 case IPS_ADTYPE_SERVERAID7k:
6649 if (nvram->adapter_order[i] == 'S') {
6650 ips_shift_controllers(position,
6651 j);
6652 position++;
6653 }
6654 break;
6655 case IPS_ADTYPE_SERVERAID:
6656 case IPS_ADTYPE_SERVERAID2:
6657 case IPS_ADTYPE_NAVAJO:
6658 case IPS_ADTYPE_KIOWA:
6659 case IPS_ADTYPE_SERVERAID3L:
6660 case IPS_ADTYPE_SERVERAID3:
6661 case IPS_ADTYPE_SERVERAID4H:
6662 if (nvram->adapter_order[i] == 'A') {
6663 ips_shift_controllers(position,
6664 j);
6665 position++;
6666 }
6667 break;
6668 default:
6669 break;
6670 }
6671 }
6672 }
6673 /* if adapter_order[0], then ordering is complete */
6674 return;
6675 }
6676 /* old bios, use older ordering */
6677 tmp = 0;
6678 for (i = position; i < ips_num_controllers; i++) {
6679 if (ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID5I2 ||
6680 ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID5I1) {
6681 ips_shift_controllers(position, i);
6682 position++;
6683 tmp = 1;
6684 }
6685 }
6686 /* if there were no 5I cards, then don't do any extra ordering */
6687 if (!tmp)
6688 return;
6689 for (i = position; i < ips_num_controllers; i++) {
6690 if (ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID4L ||
6691 ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID4M ||
6692 ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID4LX ||
6693 ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID4MX) {
6694 ips_shift_controllers(position, i);
6695 position++;
6696 }
6697 }
6698
6699 return;
6700 }
6701
6702 /****************************************************************************/
6703 /* */
6704 /* Routine Name: ips_register_scsi */
6705 /* */
6706 /* Routine Description: */
6707 /* perform any registration and setup with the scsi layer */
6708 /****************************************************************************/
6709 static int
6710 ips_register_scsi(int index)
6711 {
6712 struct Scsi_Host *sh;
6713 ips_ha_t *ha, *oldha = ips_ha[index];
6714 sh = scsi_host_alloc(&ips_driver_template, sizeof (ips_ha_t));
6715 if (!sh) {
6716 IPS_PRINTK(KERN_WARNING, oldha->pcidev,
6717 "Unable to register controller with SCSI subsystem\n");
6718 return -1;
6719 }
6720 ha = IPS_HA(sh);
6721 memcpy(ha, oldha, sizeof (ips_ha_t));
6722 free_irq(oldha->pcidev->irq, oldha);
6723 /* Install the interrupt handler with the new ha */
6724 if (request_irq(ha->pcidev->irq, do_ipsintr, IRQF_SHARED, ips_name, ha)) {
6725 IPS_PRINTK(KERN_WARNING, ha->pcidev,
6726 "Unable to install interrupt handler\n");
6727 goto err_out_sh;
6728 }
6729
6730 kfree(oldha);
6731
6732 /* Store away needed values for later use */
6733 sh->unique_id = (ha->io_addr) ? ha->io_addr : ha->mem_addr;
6734 sh->sg_tablesize = sh->hostt->sg_tablesize;
6735 sh->can_queue = sh->hostt->can_queue;
6736 sh->cmd_per_lun = sh->hostt->cmd_per_lun;
6737 sh->use_clustering = sh->hostt->use_clustering;
6738 sh->max_sectors = 128;
6739
6740 sh->max_id = ha->ntargets;
6741 sh->max_lun = ha->nlun;
6742 sh->max_channel = ha->nbus - 1;
6743 sh->can_queue = ha->max_cmds - 1;
6744
6745 if (scsi_add_host(sh, &ha->pcidev->dev))
6746 goto err_out;
6747
6748 ips_sh[index] = sh;
6749 ips_ha[index] = ha;
6750
6751 scsi_scan_host(sh);
6752
6753 return 0;
6754
6755 err_out:
6756 free_irq(ha->pcidev->irq, ha);
6757 err_out_sh:
6758 scsi_host_put(sh);
6759 return -1;
6760 }
6761
6762 /*---------------------------------------------------------------------------*/
6763 /* Routine Name: ips_remove_device */
6764 /* */
6765 /* Routine Description: */
6766 /* Remove one Adapter ( Hot Plugging ) */
6767 /*---------------------------------------------------------------------------*/
6768 static void
6769 ips_remove_device(struct pci_dev *pci_dev)
6770 {
6771 struct Scsi_Host *sh = pci_get_drvdata(pci_dev);
6772
6773 pci_set_drvdata(pci_dev, NULL);
6774
6775 ips_release(sh);
6776
6777 pci_release_regions(pci_dev);
6778 pci_disable_device(pci_dev);
6779 }
6780
6781 /****************************************************************************/
6782 /* */
6783 /* Routine Name: ips_module_init */
6784 /* */
6785 /* Routine Description: */
6786 /* function called on module load */
6787 /****************************************************************************/
6788 static int __init
6789 ips_module_init(void)
6790 {
6791 if (pci_register_driver(&ips_pci_driver) < 0)
6792 return -ENODEV;
6793 ips_driver_template.module = THIS_MODULE;
6794 ips_order_controllers();
6795 if (!ips_detect(&ips_driver_template)) {
6796 pci_unregister_driver(&ips_pci_driver);
6797 return -ENODEV;
6798 }
6799 register_reboot_notifier(&ips_notifier);
6800 return 0;
6801 }
6802
6803 /****************************************************************************/
6804 /* */
6805 /* Routine Name: ips_module_exit */
6806 /* */
6807 /* Routine Description: */
6808 /* function called on module unload */
6809 /****************************************************************************/
6810 static void __exit
6811 ips_module_exit(void)
6812 {
6813 pci_unregister_driver(&ips_pci_driver);
6814 unregister_reboot_notifier(&ips_notifier);
6815 }
6816
6817 module_init(ips_module_init);
6818 module_exit(ips_module_exit);
6819
6820 /*---------------------------------------------------------------------------*/
6821 /* Routine Name: ips_insert_device */
6822 /* */
6823 /* Routine Description: */
6824 /* Add One Adapter ( Hot Plug ) */
6825 /* */
6826 /* Return Value: */
6827 /* 0 if Successful, else non-zero */
6828 /*---------------------------------------------------------------------------*/
6829 static int
6830 ips_insert_device(struct pci_dev *pci_dev, const struct pci_device_id *ent)
6831 {
6832 int index = -1;
6833 int rc;
6834
6835 METHOD_TRACE("ips_insert_device", 1);
6836 rc = pci_enable_device(pci_dev);
6837 if (rc)
6838 return rc;
6839
6840 rc = pci_request_regions(pci_dev, "ips");
6841 if (rc)
6842 goto err_out;
6843
6844 rc = ips_init_phase1(pci_dev, &index);
6845 if (rc == SUCCESS)
6846 rc = ips_init_phase2(index);
6847
6848 if (ips_hotplug)
6849 if (ips_register_scsi(index)) {
6850 ips_free(ips_ha[index]);
6851 rc = -1;
6852 }
6853
6854 if (rc == SUCCESS)
6855 ips_num_controllers++;
6856
6857 ips_next_controller = ips_num_controllers;
6858
6859 if (rc < 0) {
6860 rc = -ENODEV;
6861 goto err_out_regions;
6862 }
6863
6864 pci_set_drvdata(pci_dev, ips_sh[index]);
6865 return 0;
6866
6867 err_out_regions:
6868 pci_release_regions(pci_dev);
6869 err_out:
6870 pci_disable_device(pci_dev);
6871 return rc;
6872 }
6873
6874 /*---------------------------------------------------------------------------*/
6875 /* Routine Name: ips_init_phase1 */
6876 /* */
6877 /* Routine Description: */
6878 /* Adapter Initialization */
6879 /* */
6880 /* Return Value: */
6881 /* 0 if Successful, else non-zero */
6882 /*---------------------------------------------------------------------------*/
6883 static int
6884 ips_init_phase1(struct pci_dev *pci_dev, int *indexPtr)
6885 {
6886 ips_ha_t *ha;
6887 uint32_t io_addr;
6888 uint32_t mem_addr;
6889 uint32_t io_len;
6890 uint32_t mem_len;
6891 uint8_t bus;
6892 uint8_t func;
6893 int j;
6894 int index;
6895 dma_addr_t dma_address;
6896 char __iomem *ioremap_ptr;
6897 char __iomem *mem_ptr;
6898 uint32_t IsDead;
6899
6900 METHOD_TRACE("ips_init_phase1", 1);
6901 index = IPS_MAX_ADAPTERS;
6902 for (j = 0; j < IPS_MAX_ADAPTERS; j++) {
6903 if (ips_ha[j] == NULL) {
6904 index = j;
6905 break;
6906 }
6907 }
6908
6909 if (index >= IPS_MAX_ADAPTERS)
6910 return -1;
6911
6912 /* stuff that we get in dev */
6913 bus = pci_dev->bus->number;
6914 func = pci_dev->devfn;
6915
6916 /* Init MEM/IO addresses to 0 */
6917 mem_addr = 0;
6918 io_addr = 0;
6919 mem_len = 0;
6920 io_len = 0;
6921
6922 for (j = 0; j < 2; j++) {
6923 if (!pci_resource_start(pci_dev, j))
6924 break;
6925
6926 if (pci_resource_flags(pci_dev, j) & IORESOURCE_IO) {
6927 io_addr = pci_resource_start(pci_dev, j);
6928 io_len = pci_resource_len(pci_dev, j);
6929 } else {
6930 mem_addr = pci_resource_start(pci_dev, j);
6931 mem_len = pci_resource_len(pci_dev, j);
6932 }
6933 }
6934
6935 /* setup memory mapped area (if applicable) */
6936 if (mem_addr) {
6937 uint32_t base;
6938 uint32_t offs;
6939
6940 base = mem_addr & PAGE_MASK;
6941 offs = mem_addr - base;
6942 ioremap_ptr = ioremap(base, PAGE_SIZE);
6943 if (!ioremap_ptr)
6944 return -1;
6945 mem_ptr = ioremap_ptr + offs;
6946 } else {
6947 ioremap_ptr = NULL;
6948 mem_ptr = NULL;
6949 }
6950
6951 /* found a controller */
6952 ha = kzalloc(sizeof (ips_ha_t), GFP_KERNEL);
6953 if (ha == NULL) {
6954 IPS_PRINTK(KERN_WARNING, pci_dev,
6955 "Unable to allocate temporary ha struct\n");
6956 return -1;
6957 }
6958
6959 ips_sh[index] = NULL;
6960 ips_ha[index] = ha;
6961 ha->active = 1;
6962
6963 /* Store info in HA structure */
6964 ha->io_addr = io_addr;
6965 ha->io_len = io_len;
6966 ha->mem_addr = mem_addr;
6967 ha->mem_len = mem_len;
6968 ha->mem_ptr = mem_ptr;
6969 ha->ioremap_ptr = ioremap_ptr;
6970 ha->host_num = (uint32_t) index;
6971 ha->slot_num = PCI_SLOT(pci_dev->devfn);
6972 ha->pcidev = pci_dev;
6973
6974 /*
6975 * Set the pci_dev's dma_mask. Not all adapters support 64bit
6976 * addressing so don't enable it if the adapter can't support
6977 * it! Also, don't use 64bit addressing if dma addresses
6978 * are guaranteed to be < 4G.
6979 */
6980 if (IPS_ENABLE_DMA64 && IPS_HAS_ENH_SGLIST(ha) &&
6981 !pci_set_dma_mask(ha->pcidev, DMA_BIT_MASK(64))) {
6982 (ha)->flags |= IPS_HA_ENH_SG;
6983 } else {
6984 if (pci_set_dma_mask(ha->pcidev, DMA_BIT_MASK(32)) != 0) {
6985 printk(KERN_WARNING "Unable to set DMA Mask\n");
6986 return ips_abort_init(ha, index);
6987 }
6988 }
6989 if(ips_cd_boot && !ips_FlashData){
6990 ips_FlashData = pci_alloc_consistent(pci_dev, PAGE_SIZE << 7,
6991 &ips_flashbusaddr);
6992 }
6993
6994 ha->enq = pci_alloc_consistent(pci_dev, sizeof (IPS_ENQ),
6995 &ha->enq_busaddr);
6996 if (!ha->enq) {
6997 IPS_PRINTK(KERN_WARNING, pci_dev,
6998 "Unable to allocate host inquiry structure\n");
6999 return ips_abort_init(ha, index);
7000 }
7001
7002 ha->adapt = pci_alloc_consistent(pci_dev, sizeof (IPS_ADAPTER) +
7003 sizeof (IPS_IO_CMD), &dma_address);
7004 if (!ha->adapt) {
7005 IPS_PRINTK(KERN_WARNING, pci_dev,
7006 "Unable to allocate host adapt & dummy structures\n");
7007 return ips_abort_init(ha, index);
7008 }
7009 ha->adapt->hw_status_start = dma_address;
7010 ha->dummy = (void *) (ha->adapt + 1);
7011
7012
7013
7014 ha->logical_drive_info = pci_alloc_consistent(pci_dev, sizeof (IPS_LD_INFO), &dma_address);
7015 if (!ha->logical_drive_info) {
7016 IPS_PRINTK(KERN_WARNING, pci_dev,
7017 "Unable to allocate logical drive info structure\n");
7018 return ips_abort_init(ha, index);
7019 }
7020 ha->logical_drive_info_dma_addr = dma_address;
7021
7022
7023 ha->conf = kmalloc(sizeof (IPS_CONF), GFP_KERNEL);
7024
7025 if (!ha->conf) {
7026 IPS_PRINTK(KERN_WARNING, pci_dev,
7027 "Unable to allocate host conf structure\n");
7028 return ips_abort_init(ha, index);
7029 }
7030
7031 ha->nvram = kmalloc(sizeof (IPS_NVRAM_P5), GFP_KERNEL);
7032
7033 if (!ha->nvram) {
7034 IPS_PRINTK(KERN_WARNING, pci_dev,
7035 "Unable to allocate host NVRAM structure\n");
7036 return ips_abort_init(ha, index);
7037 }
7038
7039 ha->subsys = kmalloc(sizeof (IPS_SUBSYS), GFP_KERNEL);
7040
7041 if (!ha->subsys) {
7042 IPS_PRINTK(KERN_WARNING, pci_dev,
7043 "Unable to allocate host subsystem structure\n");
7044 return ips_abort_init(ha, index);
7045 }
7046
7047 /* the ioctl buffer is now used during adapter initialization, so its
7048 * successful allocation is now required */
7049 if (ips_ioctlsize < PAGE_SIZE)
7050 ips_ioctlsize = PAGE_SIZE;
7051
7052 ha->ioctl_data = pci_alloc_consistent(pci_dev, ips_ioctlsize,
7053 &ha->ioctl_busaddr);
7054 ha->ioctl_len = ips_ioctlsize;
7055 if (!ha->ioctl_data) {
7056 IPS_PRINTK(KERN_WARNING, pci_dev,
7057 "Unable to allocate IOCTL data\n");
7058 return ips_abort_init(ha, index);
7059 }
7060
7061 /*
7062 * Setup Functions
7063 */
7064 ips_setup_funclist(ha);
7065
7066 if ((IPS_IS_MORPHEUS(ha)) || (IPS_IS_MARCO(ha))) {
7067 /* If Morpheus appears dead, reset it */
7068 IsDead = readl(ha->mem_ptr + IPS_REG_I960_MSG1);
7069 if (IsDead == 0xDEADBEEF) {
7070 ips_reset_morpheus(ha);
7071 }
7072 }
7073
7074 /*
7075 * Initialize the card if it isn't already
7076 */
7077
7078 if (!(*ha->func.isinit) (ha)) {
7079 if (!(*ha->func.init) (ha)) {
7080 /*
7081 * Initialization failed
7082 */
7083 IPS_PRINTK(KERN_WARNING, pci_dev,
7084 "Unable to initialize controller\n");
7085 return ips_abort_init(ha, index);
7086 }
7087 }
7088
7089 *indexPtr = index;
7090 return SUCCESS;
7091 }
7092
7093 /*---------------------------------------------------------------------------*/
7094 /* Routine Name: ips_init_phase2 */
7095 /* */
7096 /* Routine Description: */
7097 /* Adapter Initialization Phase 2 */
7098 /* */
7099 /* Return Value: */
7100 /* 0 if Successful, else non-zero */
7101 /*---------------------------------------------------------------------------*/
7102 static int
7103 ips_init_phase2(int index)
7104 {
7105 ips_ha_t *ha;
7106
7107 ha = ips_ha[index];
7108
7109 METHOD_TRACE("ips_init_phase2", 1);
7110 if (!ha->active) {
7111 ips_ha[index] = NULL;
7112 return -1;
7113 }
7114
7115 /* Install the interrupt handler */
7116 if (request_irq(ha->pcidev->irq, do_ipsintr, IRQF_SHARED, ips_name, ha)) {
7117 IPS_PRINTK(KERN_WARNING, ha->pcidev,
7118 "Unable to install interrupt handler\n");
7119 return ips_abort_init(ha, index);
7120 }
7121
7122 /*
7123 * Allocate a temporary SCB for initialization
7124 */
7125 ha->max_cmds = 1;
7126 if (!ips_allocatescbs(ha)) {
7127 IPS_PRINTK(KERN_WARNING, ha->pcidev,
7128 "Unable to allocate a CCB\n");
7129 free_irq(ha->pcidev->irq, ha);
7130 return ips_abort_init(ha, index);
7131 }
7132
7133 if (!ips_hainit(ha)) {
7134 IPS_PRINTK(KERN_WARNING, ha->pcidev,
7135 "Unable to initialize controller\n");
7136 free_irq(ha->pcidev->irq, ha);
7137 return ips_abort_init(ha, index);
7138 }
7139 /* Free the temporary SCB */
7140 ips_deallocatescbs(ha, 1);
7141
7142 /* allocate CCBs */
7143 if (!ips_allocatescbs(ha)) {
7144 IPS_PRINTK(KERN_WARNING, ha->pcidev,
7145 "Unable to allocate CCBs\n");
7146 free_irq(ha->pcidev->irq, ha);
7147 return ips_abort_init(ha, index);
7148 }
7149
7150 return SUCCESS;
7151 }
7152
7153 MODULE_LICENSE("GPL");
7154 MODULE_DESCRIPTION("IBM ServeRAID Adapter Driver " IPS_VER_STRING);
7155 MODULE_VERSION(IPS_VER_STRING);
7156
7157
7158 /*
7159 * Overrides for Emacs so that we almost follow Linus's tabbing style.
7160 * Emacs will notice this stuff at the end of the file and automatically
7161 * adjust the settings for this buffer only. This must remain at the end
7162 * of the file.
7163 * ---------------------------------------------------------------------------
7164 * Local variables:
7165 * c-indent-level: 2
7166 * c-brace-imaginary-offset: 0
7167 * c-brace-offset: -2
7168 * c-argdecl-indent: 2
7169 * c-label-offset: -2
7170 * c-continued-statement-offset: 2
7171 * c-continued-brace-offset: 0
7172 * indent-tabs-mode: nil
7173 * tab-width: 8
7174 * End:
7175 */