Loading...
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
199static char *ips = NULL;
200module_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#define IPS_DMA_DIR(scb) ((!scb->scsi_cmd || ips_is_passthru(scb->scsi_cmd) || \
210 DMA_NONE == scb->scsi_cmd->sc_data_direction) ? \
211 PCI_DMA_BIDIRECTIONAL : \
212 scb->scsi_cmd->sc_data_direction)
213
214#ifdef IPS_DEBUG
215#define METHOD_TRACE(s, i) if (ips_debug >= (i+10)) printk(KERN_NOTICE s "\n");
216#define DEBUG(i, s) if (ips_debug >= i) printk(KERN_NOTICE s "\n");
217#define DEBUG_VAR(i, s, v...) if (ips_debug >= i) printk(KERN_NOTICE s "\n", v);
218#else
219#define METHOD_TRACE(s, i)
220#define DEBUG(i, s)
221#define DEBUG_VAR(i, s, v...)
222#endif
223
224/*
225 * Function prototypes
226 */
227static int ips_detect(struct scsi_host_template *);
228static int ips_release(struct Scsi_Host *);
229static int ips_eh_abort(struct scsi_cmnd *);
230static int ips_eh_reset(struct scsi_cmnd *);
231static int ips_queue(struct Scsi_Host *, struct scsi_cmnd *);
232static const char *ips_info(struct Scsi_Host *);
233static irqreturn_t do_ipsintr(int, void *);
234static int ips_hainit(ips_ha_t *);
235static int ips_map_status(ips_ha_t *, ips_scb_t *, ips_stat_t *);
236static int ips_send_wait(ips_ha_t *, ips_scb_t *, int, int);
237static int ips_send_cmd(ips_ha_t *, ips_scb_t *);
238static int ips_online(ips_ha_t *, ips_scb_t *);
239static int ips_inquiry(ips_ha_t *, ips_scb_t *);
240static int ips_rdcap(ips_ha_t *, ips_scb_t *);
241static int ips_msense(ips_ha_t *, ips_scb_t *);
242static int ips_reqsen(ips_ha_t *, ips_scb_t *);
243static int ips_deallocatescbs(ips_ha_t *, int);
244static int ips_allocatescbs(ips_ha_t *);
245static int ips_reset_copperhead(ips_ha_t *);
246static int ips_reset_copperhead_memio(ips_ha_t *);
247static int ips_reset_morpheus(ips_ha_t *);
248static int ips_issue_copperhead(ips_ha_t *, ips_scb_t *);
249static int ips_issue_copperhead_memio(ips_ha_t *, ips_scb_t *);
250static int ips_issue_i2o(ips_ha_t *, ips_scb_t *);
251static int ips_issue_i2o_memio(ips_ha_t *, ips_scb_t *);
252static int ips_isintr_copperhead(ips_ha_t *);
253static int ips_isintr_copperhead_memio(ips_ha_t *);
254static int ips_isintr_morpheus(ips_ha_t *);
255static int ips_wait(ips_ha_t *, int, int);
256static int ips_write_driver_status(ips_ha_t *, int);
257static int ips_read_adapter_status(ips_ha_t *, int);
258static int ips_read_subsystem_parameters(ips_ha_t *, int);
259static int ips_read_config(ips_ha_t *, int);
260static int ips_clear_adapter(ips_ha_t *, int);
261static int ips_readwrite_page5(ips_ha_t *, int, int);
262static int ips_init_copperhead(ips_ha_t *);
263static int ips_init_copperhead_memio(ips_ha_t *);
264static int ips_init_morpheus(ips_ha_t *);
265static int ips_isinit_copperhead(ips_ha_t *);
266static int ips_isinit_copperhead_memio(ips_ha_t *);
267static int ips_isinit_morpheus(ips_ha_t *);
268static int ips_erase_bios(ips_ha_t *);
269static int ips_program_bios(ips_ha_t *, char *, uint32_t, uint32_t);
270static int ips_verify_bios(ips_ha_t *, char *, uint32_t, uint32_t);
271static int ips_erase_bios_memio(ips_ha_t *);
272static int ips_program_bios_memio(ips_ha_t *, char *, uint32_t, uint32_t);
273static int ips_verify_bios_memio(ips_ha_t *, char *, uint32_t, uint32_t);
274static int ips_flash_copperhead(ips_ha_t *, ips_passthru_t *, ips_scb_t *);
275static int ips_flash_bios(ips_ha_t *, ips_passthru_t *, ips_scb_t *);
276static int ips_flash_firmware(ips_ha_t *, ips_passthru_t *, ips_scb_t *);
277static void ips_free_flash_copperhead(ips_ha_t * ha);
278static void ips_get_bios_version(ips_ha_t *, int);
279static void ips_identify_controller(ips_ha_t *);
280static void ips_chkstatus(ips_ha_t *, IPS_STATUS *);
281static void ips_enable_int_copperhead(ips_ha_t *);
282static void ips_enable_int_copperhead_memio(ips_ha_t *);
283static void ips_enable_int_morpheus(ips_ha_t *);
284static int ips_intr_copperhead(ips_ha_t *);
285static int ips_intr_morpheus(ips_ha_t *);
286static void ips_next(ips_ha_t *, int);
287static void ipsintr_blocking(ips_ha_t *, struct ips_scb *);
288static void ipsintr_done(ips_ha_t *, struct ips_scb *);
289static void ips_done(ips_ha_t *, ips_scb_t *);
290static void ips_free(ips_ha_t *);
291static void ips_init_scb(ips_ha_t *, ips_scb_t *);
292static void ips_freescb(ips_ha_t *, ips_scb_t *);
293static void ips_setup_funclist(ips_ha_t *);
294static void ips_statinit(ips_ha_t *);
295static void ips_statinit_memio(ips_ha_t *);
296static void ips_fix_ffdc_time(ips_ha_t *, ips_scb_t *, time_t);
297static void ips_ffdc_reset(ips_ha_t *, int);
298static void ips_ffdc_time(ips_ha_t *);
299static uint32_t ips_statupd_copperhead(ips_ha_t *);
300static uint32_t ips_statupd_copperhead_memio(ips_ha_t *);
301static uint32_t ips_statupd_morpheus(ips_ha_t *);
302static ips_scb_t *ips_getscb(ips_ha_t *);
303static void ips_putq_scb_head(ips_scb_queue_t *, ips_scb_t *);
304static void ips_putq_wait_tail(ips_wait_queue_t *, struct scsi_cmnd *);
305static void ips_putq_copp_tail(ips_copp_queue_t *,
306 ips_copp_wait_item_t *);
307static ips_scb_t *ips_removeq_scb_head(ips_scb_queue_t *);
308static ips_scb_t *ips_removeq_scb(ips_scb_queue_t *, ips_scb_t *);
309static struct scsi_cmnd *ips_removeq_wait_head(ips_wait_queue_t *);
310static struct scsi_cmnd *ips_removeq_wait(ips_wait_queue_t *,
311 struct scsi_cmnd *);
312static ips_copp_wait_item_t *ips_removeq_copp(ips_copp_queue_t *,
313 ips_copp_wait_item_t *);
314static ips_copp_wait_item_t *ips_removeq_copp_head(ips_copp_queue_t *);
315
316static int ips_is_passthru(struct scsi_cmnd *);
317static int ips_make_passthru(ips_ha_t *, struct scsi_cmnd *, ips_scb_t *, int);
318static int ips_usrcmd(ips_ha_t *, ips_passthru_t *, ips_scb_t *);
319static void ips_cleanup_passthru(ips_ha_t *, ips_scb_t *);
320static void ips_scmd_buf_write(struct scsi_cmnd * scmd, void *data,
321 unsigned int count);
322static void ips_scmd_buf_read(struct scsi_cmnd * scmd, void *data,
323 unsigned int count);
324
325static int ips_write_info(struct Scsi_Host *, char *, int);
326static int ips_show_info(struct seq_file *, struct Scsi_Host *);
327static int ips_host_info(ips_ha_t *, struct seq_file *);
328static int ips_abort_init(ips_ha_t * ha, int index);
329static int ips_init_phase2(int index);
330
331static int ips_init_phase1(struct pci_dev *pci_dev, int *indexPtr);
332static int ips_register_scsi(int index);
333
334static int ips_poll_for_flush_complete(ips_ha_t * ha);
335static void ips_flush_and_reset(ips_ha_t *ha);
336
337/*
338 * global variables
339 */
340static const char ips_name[] = "ips";
341static struct Scsi_Host *ips_sh[IPS_MAX_ADAPTERS]; /* Array of host controller structures */
342static ips_ha_t *ips_ha[IPS_MAX_ADAPTERS]; /* Array of HA structures */
343static unsigned int ips_next_controller;
344static unsigned int ips_num_controllers;
345static unsigned int ips_released_controllers;
346static int ips_hotplug;
347static int ips_cmd_timeout = 60;
348static int ips_reset_timeout = 60 * 5;
349static int ips_force_memio = 1; /* Always use Memory Mapped I/O */
350static int ips_force_i2o = 1; /* Always use I2O command delivery */
351static int ips_ioctlsize = IPS_IOCTL_SIZE; /* Size of the ioctl buffer */
352static int ips_cd_boot; /* Booting from Manager CD */
353static char *ips_FlashData = NULL; /* CD Boot - Flash Data Buffer */
354static dma_addr_t ips_flashbusaddr;
355static long ips_FlashDataInUse; /* CD Boot - Flash Data In Use Flag */
356static uint32_t MaxLiteCmds = 32; /* Max Active Cmds for a Lite Adapter */
357static struct scsi_host_template ips_driver_template = {
358 .detect = ips_detect,
359 .release = ips_release,
360 .info = ips_info,
361 .queuecommand = ips_queue,
362 .eh_abort_handler = ips_eh_abort,
363 .eh_host_reset_handler = ips_eh_reset,
364 .proc_name = "ips",
365 .show_info = ips_show_info,
366 .write_info = ips_write_info,
367 .slave_configure = ips_slave_configure,
368 .bios_param = ips_biosparam,
369 .this_id = -1,
370 .sg_tablesize = IPS_MAX_SG,
371 .cmd_per_lun = 3,
372 .use_clustering = ENABLE_CLUSTERING,
373 .no_write_same = 1,
374};
375
376
377/* This table describes all ServeRAID Adapters */
378static struct pci_device_id ips_pci_table[] = {
379 { 0x1014, 0x002E, PCI_ANY_ID, PCI_ANY_ID, 0, 0 },
380 { 0x1014, 0x01BD, PCI_ANY_ID, PCI_ANY_ID, 0, 0 },
381 { 0x9005, 0x0250, PCI_ANY_ID, PCI_ANY_ID, 0, 0 },
382 { 0, }
383};
384
385MODULE_DEVICE_TABLE( pci, ips_pci_table );
386
387static char ips_hot_plug_name[] = "ips";
388
389static int ips_insert_device(struct pci_dev *pci_dev, const struct pci_device_id *ent);
390static void ips_remove_device(struct pci_dev *pci_dev);
391
392static struct pci_driver ips_pci_driver = {
393 .name = ips_hot_plug_name,
394 .id_table = ips_pci_table,
395 .probe = ips_insert_device,
396 .remove = ips_remove_device,
397};
398
399
400/*
401 * Necessary forward function protoypes
402 */
403static int ips_halt(struct notifier_block *nb, ulong event, void *buf);
404
405#define MAX_ADAPTER_NAME 15
406
407static char ips_adapter_name[][30] = {
408 "ServeRAID",
409 "ServeRAID II",
410 "ServeRAID on motherboard",
411 "ServeRAID on motherboard",
412 "ServeRAID 3H",
413 "ServeRAID 3L",
414 "ServeRAID 4H",
415 "ServeRAID 4M",
416 "ServeRAID 4L",
417 "ServeRAID 4Mx",
418 "ServeRAID 4Lx",
419 "ServeRAID 5i",
420 "ServeRAID 5i",
421 "ServeRAID 6M",
422 "ServeRAID 6i",
423 "ServeRAID 7t",
424 "ServeRAID 7k",
425 "ServeRAID 7M"
426};
427
428static struct notifier_block ips_notifier = {
429 ips_halt, NULL, 0
430};
431
432/*
433 * Direction table
434 */
435static char ips_command_direction[] = {
436 IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_IN, IPS_DATA_IN, IPS_DATA_OUT,
437 IPS_DATA_IN, IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_UNK,
438 IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
439 IPS_DATA_IN, IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_IN, IPS_DATA_OUT,
440 IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_OUT,
441 IPS_DATA_NONE, IPS_DATA_IN, IPS_DATA_NONE, IPS_DATA_IN, IPS_DATA_OUT,
442 IPS_DATA_NONE, IPS_DATA_UNK, IPS_DATA_IN, IPS_DATA_UNK, IPS_DATA_IN,
443 IPS_DATA_UNK, IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_UNK, IPS_DATA_UNK,
444 IPS_DATA_IN, IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_NONE, IPS_DATA_UNK,
445 IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT,
446 IPS_DATA_OUT, IPS_DATA_NONE, IPS_DATA_IN, IPS_DATA_NONE, IPS_DATA_NONE,
447 IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT,
448 IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_OUT,
449 IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_IN, IPS_DATA_IN, IPS_DATA_NONE,
450 IPS_DATA_UNK, IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_UNK,
451 IPS_DATA_NONE, IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_UNK, IPS_DATA_UNK,
452 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
453 IPS_DATA_OUT, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
454 IPS_DATA_IN, IPS_DATA_UNK, IPS_DATA_UNK, 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_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
457 IPS_DATA_UNK, 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_NONE, IPS_DATA_NONE, IPS_DATA_UNK, IPS_DATA_IN, IPS_DATA_NONE,
470 IPS_DATA_OUT, IPS_DATA_UNK, IPS_DATA_NONE, IPS_DATA_UNK, IPS_DATA_OUT,
471 IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_NONE,
472 IPS_DATA_UNK, IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_IN,
473 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
474 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
475 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
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_OUT,
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_UNK,
486 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK
487};
488
489
490/****************************************************************************/
491/* */
492/* Routine Name: ips_setup */
493/* */
494/* Routine Description: */
495/* */
496/* setup parameters to the driver */
497/* */
498/****************************************************************************/
499static int
500ips_setup(char *ips_str)
501{
502
503 int i;
504 char *key;
505 char *value;
506 IPS_OPTION options[] = {
507 {"noi2o", &ips_force_i2o, 0},
508 {"nommap", &ips_force_memio, 0},
509 {"ioctlsize", &ips_ioctlsize, IPS_IOCTL_SIZE},
510 {"cdboot", &ips_cd_boot, 0},
511 {"maxcmds", &MaxLiteCmds, 32},
512 };
513
514 /* Don't use strtok() anymore ( if 2.4 Kernel or beyond ) */
515 /* Search for value */
516 while ((key = strsep(&ips_str, ",."))) {
517 if (!*key)
518 continue;
519 value = strchr(key, ':');
520 if (value)
521 *value++ = '\0';
522 /*
523 * We now have key/value pairs.
524 * Update the variables
525 */
526 for (i = 0; i < ARRAY_SIZE(options); i++) {
527 if (strncasecmp
528 (key, options[i].option_name,
529 strlen(options[i].option_name)) == 0) {
530 if (value)
531 *options[i].option_flag =
532 simple_strtoul(value, NULL, 0);
533 else
534 *options[i].option_flag =
535 options[i].option_value;
536 break;
537 }
538 }
539 }
540
541 return (1);
542}
543
544__setup("ips=", ips_setup);
545
546/****************************************************************************/
547/* */
548/* Routine Name: ips_detect */
549/* */
550/* Routine Description: */
551/* */
552/* Detect and initialize the driver */
553/* */
554/* NOTE: this routine is called under the io_request_lock spinlock */
555/* */
556/****************************************************************************/
557static int
558ips_detect(struct scsi_host_template * SHT)
559{
560 int i;
561
562 METHOD_TRACE("ips_detect", 1);
563
564#ifdef MODULE
565 if (ips)
566 ips_setup(ips);
567#endif
568
569 for (i = 0; i < ips_num_controllers; i++) {
570 if (ips_register_scsi(i))
571 ips_free(ips_ha[i]);
572 ips_released_controllers++;
573 }
574 ips_hotplug = 1;
575 return (ips_num_controllers);
576}
577
578/****************************************************************************/
579/* configure the function pointers to use the functions that will work */
580/* with the found version of the adapter */
581/****************************************************************************/
582static void
583ips_setup_funclist(ips_ha_t * ha)
584{
585
586 /*
587 * Setup Functions
588 */
589 if (IPS_IS_MORPHEUS(ha) || IPS_IS_MARCO(ha)) {
590 /* morpheus / marco / sebring */
591 ha->func.isintr = ips_isintr_morpheus;
592 ha->func.isinit = ips_isinit_morpheus;
593 ha->func.issue = ips_issue_i2o_memio;
594 ha->func.init = ips_init_morpheus;
595 ha->func.statupd = ips_statupd_morpheus;
596 ha->func.reset = ips_reset_morpheus;
597 ha->func.intr = ips_intr_morpheus;
598 ha->func.enableint = ips_enable_int_morpheus;
599 } else if (IPS_USE_MEMIO(ha)) {
600 /* copperhead w/MEMIO */
601 ha->func.isintr = ips_isintr_copperhead_memio;
602 ha->func.isinit = ips_isinit_copperhead_memio;
603 ha->func.init = ips_init_copperhead_memio;
604 ha->func.statupd = ips_statupd_copperhead_memio;
605 ha->func.statinit = ips_statinit_memio;
606 ha->func.reset = ips_reset_copperhead_memio;
607 ha->func.intr = ips_intr_copperhead;
608 ha->func.erasebios = ips_erase_bios_memio;
609 ha->func.programbios = ips_program_bios_memio;
610 ha->func.verifybios = ips_verify_bios_memio;
611 ha->func.enableint = ips_enable_int_copperhead_memio;
612 if (IPS_USE_I2O_DELIVER(ha))
613 ha->func.issue = ips_issue_i2o_memio;
614 else
615 ha->func.issue = ips_issue_copperhead_memio;
616 } else {
617 /* copperhead */
618 ha->func.isintr = ips_isintr_copperhead;
619 ha->func.isinit = ips_isinit_copperhead;
620 ha->func.init = ips_init_copperhead;
621 ha->func.statupd = ips_statupd_copperhead;
622 ha->func.statinit = ips_statinit;
623 ha->func.reset = ips_reset_copperhead;
624 ha->func.intr = ips_intr_copperhead;
625 ha->func.erasebios = ips_erase_bios;
626 ha->func.programbios = ips_program_bios;
627 ha->func.verifybios = ips_verify_bios;
628 ha->func.enableint = ips_enable_int_copperhead;
629
630 if (IPS_USE_I2O_DELIVER(ha))
631 ha->func.issue = ips_issue_i2o;
632 else
633 ha->func.issue = ips_issue_copperhead;
634 }
635}
636
637/****************************************************************************/
638/* */
639/* Routine Name: ips_release */
640/* */
641/* Routine Description: */
642/* */
643/* Remove a driver */
644/* */
645/****************************************************************************/
646static int
647ips_release(struct Scsi_Host *sh)
648{
649 ips_scb_t *scb;
650 ips_ha_t *ha;
651 int i;
652
653 METHOD_TRACE("ips_release", 1);
654
655 scsi_remove_host(sh);
656
657 for (i = 0; i < IPS_MAX_ADAPTERS && ips_sh[i] != sh; i++) ;
658
659 if (i == IPS_MAX_ADAPTERS) {
660 printk(KERN_WARNING
661 "(%s) release, invalid Scsi_Host pointer.\n", ips_name);
662 BUG();
663 return (FALSE);
664 }
665
666 ha = IPS_HA(sh);
667
668 if (!ha)
669 return (FALSE);
670
671 /* flush the cache on the controller */
672 scb = &ha->scbs[ha->max_cmds - 1];
673
674 ips_init_scb(ha, scb);
675
676 scb->timeout = ips_cmd_timeout;
677 scb->cdb[0] = IPS_CMD_FLUSH;
678
679 scb->cmd.flush_cache.op_code = IPS_CMD_FLUSH;
680 scb->cmd.flush_cache.command_id = IPS_COMMAND_ID(ha, scb);
681 scb->cmd.flush_cache.state = IPS_NORM_STATE;
682 scb->cmd.flush_cache.reserved = 0;
683 scb->cmd.flush_cache.reserved2 = 0;
684 scb->cmd.flush_cache.reserved3 = 0;
685 scb->cmd.flush_cache.reserved4 = 0;
686
687 IPS_PRINTK(KERN_WARNING, ha->pcidev, "Flushing Cache.\n");
688
689 /* send command */
690 if (ips_send_wait(ha, scb, ips_cmd_timeout, IPS_INTR_ON) == IPS_FAILURE)
691 IPS_PRINTK(KERN_WARNING, ha->pcidev, "Incomplete Flush.\n");
692
693 IPS_PRINTK(KERN_WARNING, ha->pcidev, "Flushing Complete.\n");
694
695 ips_sh[i] = NULL;
696 ips_ha[i] = NULL;
697
698 /* free extra memory */
699 ips_free(ha);
700
701 /* free IRQ */
702 free_irq(ha->pcidev->irq, ha);
703
704 scsi_host_put(sh);
705
706 ips_released_controllers++;
707
708 return (FALSE);
709}
710
711/****************************************************************************/
712/* */
713/* Routine Name: ips_halt */
714/* */
715/* Routine Description: */
716/* */
717/* Perform cleanup when the system reboots */
718/* */
719/****************************************************************************/
720static int
721ips_halt(struct notifier_block *nb, ulong event, void *buf)
722{
723 ips_scb_t *scb;
724 ips_ha_t *ha;
725 int i;
726
727 if ((event != SYS_RESTART) && (event != SYS_HALT) &&
728 (event != SYS_POWER_OFF))
729 return (NOTIFY_DONE);
730
731 for (i = 0; i < ips_next_controller; i++) {
732 ha = (ips_ha_t *) ips_ha[i];
733
734 if (!ha)
735 continue;
736
737 if (!ha->active)
738 continue;
739
740 /* flush the cache on the controller */
741 scb = &ha->scbs[ha->max_cmds - 1];
742
743 ips_init_scb(ha, scb);
744
745 scb->timeout = ips_cmd_timeout;
746 scb->cdb[0] = IPS_CMD_FLUSH;
747
748 scb->cmd.flush_cache.op_code = IPS_CMD_FLUSH;
749 scb->cmd.flush_cache.command_id = IPS_COMMAND_ID(ha, scb);
750 scb->cmd.flush_cache.state = IPS_NORM_STATE;
751 scb->cmd.flush_cache.reserved = 0;
752 scb->cmd.flush_cache.reserved2 = 0;
753 scb->cmd.flush_cache.reserved3 = 0;
754 scb->cmd.flush_cache.reserved4 = 0;
755
756 IPS_PRINTK(KERN_WARNING, ha->pcidev, "Flushing Cache.\n");
757
758 /* send command */
759 if (ips_send_wait(ha, scb, ips_cmd_timeout, IPS_INTR_ON) ==
760 IPS_FAILURE)
761 IPS_PRINTK(KERN_WARNING, ha->pcidev,
762 "Incomplete Flush.\n");
763 else
764 IPS_PRINTK(KERN_WARNING, ha->pcidev,
765 "Flushing Complete.\n");
766 }
767
768 return (NOTIFY_OK);
769}
770
771/****************************************************************************/
772/* */
773/* Routine Name: ips_eh_abort */
774/* */
775/* Routine Description: */
776/* */
777/* Abort a command (using the new error code stuff) */
778/* Note: this routine is called under the io_request_lock */
779/****************************************************************************/
780int ips_eh_abort(struct scsi_cmnd *SC)
781{
782 ips_ha_t *ha;
783 ips_copp_wait_item_t *item;
784 int ret;
785 struct Scsi_Host *host;
786
787 METHOD_TRACE("ips_eh_abort", 1);
788
789 if (!SC)
790 return (FAILED);
791
792 host = SC->device->host;
793 ha = (ips_ha_t *) SC->device->host->hostdata;
794
795 if (!ha)
796 return (FAILED);
797
798 if (!ha->active)
799 return (FAILED);
800
801 spin_lock(host->host_lock);
802
803 /* See if the command is on the copp queue */
804 item = ha->copp_waitlist.head;
805 while ((item) && (item->scsi_cmd != SC))
806 item = item->next;
807
808 if (item) {
809 /* Found it */
810 ips_removeq_copp(&ha->copp_waitlist, item);
811 ret = (SUCCESS);
812
813 /* See if the command is on the wait queue */
814 } else if (ips_removeq_wait(&ha->scb_waitlist, SC)) {
815 /* command not sent yet */
816 ret = (SUCCESS);
817 } else {
818 /* command must have already been sent */
819 ret = (FAILED);
820 }
821
822 spin_unlock(host->host_lock);
823 return ret;
824}
825
826/****************************************************************************/
827/* */
828/* Routine Name: ips_eh_reset */
829/* */
830/* Routine Description: */
831/* */
832/* Reset the controller (with new eh error code) */
833/* */
834/* NOTE: this routine is called under the io_request_lock spinlock */
835/* */
836/****************************************************************************/
837static int __ips_eh_reset(struct scsi_cmnd *SC)
838{
839 int ret;
840 int i;
841 ips_ha_t *ha;
842 ips_scb_t *scb;
843 ips_copp_wait_item_t *item;
844
845 METHOD_TRACE("ips_eh_reset", 1);
846
847#ifdef NO_IPS_RESET
848 return (FAILED);
849#else
850
851 if (!SC) {
852 DEBUG(1, "Reset called with NULL scsi command");
853
854 return (FAILED);
855 }
856
857 ha = (ips_ha_t *) SC->device->host->hostdata;
858
859 if (!ha) {
860 DEBUG(1, "Reset called with NULL ha struct");
861
862 return (FAILED);
863 }
864
865 if (!ha->active)
866 return (FAILED);
867
868 /* See if the command is on the copp queue */
869 item = ha->copp_waitlist.head;
870 while ((item) && (item->scsi_cmd != SC))
871 item = item->next;
872
873 if (item) {
874 /* Found it */
875 ips_removeq_copp(&ha->copp_waitlist, item);
876 return (SUCCESS);
877 }
878
879 /* See if the command is on the wait queue */
880 if (ips_removeq_wait(&ha->scb_waitlist, SC)) {
881 /* command not sent yet */
882 return (SUCCESS);
883 }
884
885 /* An explanation for the casual observer: */
886 /* Part of the function of a RAID controller is automatic error */
887 /* detection and recovery. As such, the only problem that physically */
888 /* resetting an adapter will ever fix is when, for some reason, */
889 /* the driver is not successfully communicating with the adapter. */
890 /* Therefore, we will attempt to flush this adapter. If that succeeds, */
891 /* then there's no real purpose in a physical reset. This will complete */
892 /* much faster and avoids any problems that might be caused by a */
893 /* physical reset ( such as having to fail all the outstanding I/O's ). */
894
895 if (ha->ioctl_reset == 0) { /* IF Not an IOCTL Requested Reset */
896 scb = &ha->scbs[ha->max_cmds - 1];
897
898 ips_init_scb(ha, scb);
899
900 scb->timeout = ips_cmd_timeout;
901 scb->cdb[0] = IPS_CMD_FLUSH;
902
903 scb->cmd.flush_cache.op_code = IPS_CMD_FLUSH;
904 scb->cmd.flush_cache.command_id = IPS_COMMAND_ID(ha, scb);
905 scb->cmd.flush_cache.state = IPS_NORM_STATE;
906 scb->cmd.flush_cache.reserved = 0;
907 scb->cmd.flush_cache.reserved2 = 0;
908 scb->cmd.flush_cache.reserved3 = 0;
909 scb->cmd.flush_cache.reserved4 = 0;
910
911 /* Attempt the flush command */
912 ret = ips_send_wait(ha, scb, ips_cmd_timeout, IPS_INTR_IORL);
913 if (ret == IPS_SUCCESS) {
914 IPS_PRINTK(KERN_NOTICE, ha->pcidev,
915 "Reset Request - Flushed Cache\n");
916 return (SUCCESS);
917 }
918 }
919
920 /* Either we can't communicate with the adapter or it's an IOCTL request */
921 /* from a utility. A physical reset is needed at this point. */
922
923 ha->ioctl_reset = 0; /* Reset the IOCTL Requested Reset Flag */
924
925 /*
926 * command must have already been sent
927 * reset the controller
928 */
929 IPS_PRINTK(KERN_NOTICE, ha->pcidev, "Resetting controller.\n");
930 ret = (*ha->func.reset) (ha);
931
932 if (!ret) {
933 struct scsi_cmnd *scsi_cmd;
934
935 IPS_PRINTK(KERN_NOTICE, ha->pcidev,
936 "Controller reset failed - controller now offline.\n");
937
938 /* Now fail all of the active commands */
939 DEBUG_VAR(1, "(%s%d) Failing active commands",
940 ips_name, ha->host_num);
941
942 while ((scb = ips_removeq_scb_head(&ha->scb_activelist))) {
943 scb->scsi_cmd->result = DID_ERROR << 16;
944 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
945 ips_freescb(ha, scb);
946 }
947
948 /* Now fail all of the pending commands */
949 DEBUG_VAR(1, "(%s%d) Failing pending commands",
950 ips_name, ha->host_num);
951
952 while ((scsi_cmd = ips_removeq_wait_head(&ha->scb_waitlist))) {
953 scsi_cmd->result = DID_ERROR;
954 scsi_cmd->scsi_done(scsi_cmd);
955 }
956
957 ha->active = FALSE;
958 return (FAILED);
959 }
960
961 if (!ips_clear_adapter(ha, IPS_INTR_IORL)) {
962 struct scsi_cmnd *scsi_cmd;
963
964 IPS_PRINTK(KERN_NOTICE, ha->pcidev,
965 "Controller reset failed - controller now offline.\n");
966
967 /* Now fail all of the active commands */
968 DEBUG_VAR(1, "(%s%d) Failing active commands",
969 ips_name, ha->host_num);
970
971 while ((scb = ips_removeq_scb_head(&ha->scb_activelist))) {
972 scb->scsi_cmd->result = DID_ERROR << 16;
973 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
974 ips_freescb(ha, scb);
975 }
976
977 /* Now fail all of the pending commands */
978 DEBUG_VAR(1, "(%s%d) Failing pending commands",
979 ips_name, ha->host_num);
980
981 while ((scsi_cmd = ips_removeq_wait_head(&ha->scb_waitlist))) {
982 scsi_cmd->result = DID_ERROR << 16;
983 scsi_cmd->scsi_done(scsi_cmd);
984 }
985
986 ha->active = FALSE;
987 return (FAILED);
988 }
989
990 /* FFDC */
991 if (le32_to_cpu(ha->subsys->param[3]) & 0x300000) {
992 struct timeval tv;
993
994 do_gettimeofday(&tv);
995 ha->last_ffdc = tv.tv_sec;
996 ha->reset_count++;
997 ips_ffdc_reset(ha, IPS_INTR_IORL);
998 }
999
1000 /* Now fail all of the active commands */
1001 DEBUG_VAR(1, "(%s%d) Failing active commands", ips_name, ha->host_num);
1002
1003 while ((scb = ips_removeq_scb_head(&ha->scb_activelist))) {
1004 scb->scsi_cmd->result = DID_RESET << 16;
1005 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
1006 ips_freescb(ha, scb);
1007 }
1008
1009 /* Reset DCDB active command bits */
1010 for (i = 1; i < ha->nbus; i++)
1011 ha->dcdb_active[i - 1] = 0;
1012
1013 /* Reset the number of active IOCTLs */
1014 ha->num_ioctl = 0;
1015
1016 ips_next(ha, IPS_INTR_IORL);
1017
1018 return (SUCCESS);
1019#endif /* NO_IPS_RESET */
1020
1021}
1022
1023static int ips_eh_reset(struct scsi_cmnd *SC)
1024{
1025 int rc;
1026
1027 spin_lock_irq(SC->device->host->host_lock);
1028 rc = __ips_eh_reset(SC);
1029 spin_unlock_irq(SC->device->host->host_lock);
1030
1031 return rc;
1032}
1033
1034/****************************************************************************/
1035/* */
1036/* Routine Name: ips_queue */
1037/* */
1038/* Routine Description: */
1039/* */
1040/* Send a command to the controller */
1041/* */
1042/* NOTE: */
1043/* Linux obtains io_request_lock before calling this function */
1044/* */
1045/****************************************************************************/
1046static int ips_queue_lck(struct scsi_cmnd *SC, void (*done) (struct scsi_cmnd *))
1047{
1048 ips_ha_t *ha;
1049 ips_passthru_t *pt;
1050
1051 METHOD_TRACE("ips_queue", 1);
1052
1053 ha = (ips_ha_t *) SC->device->host->hostdata;
1054
1055 if (!ha)
1056 return (1);
1057
1058 if (!ha->active)
1059 return (DID_ERROR);
1060
1061 if (ips_is_passthru(SC)) {
1062 if (ha->copp_waitlist.count == IPS_MAX_IOCTL_QUEUE) {
1063 SC->result = DID_BUS_BUSY << 16;
1064 done(SC);
1065
1066 return (0);
1067 }
1068 } else if (ha->scb_waitlist.count == IPS_MAX_QUEUE) {
1069 SC->result = DID_BUS_BUSY << 16;
1070 done(SC);
1071
1072 return (0);
1073 }
1074
1075 SC->scsi_done = done;
1076
1077 DEBUG_VAR(2, "(%s%d): ips_queue: cmd 0x%X (%d %d %d)",
1078 ips_name,
1079 ha->host_num,
1080 SC->cmnd[0],
1081 SC->device->channel, SC->device->id, SC->device->lun);
1082
1083 /* Check for command to initiator IDs */
1084 if ((scmd_channel(SC) > 0)
1085 && (scmd_id(SC) == ha->ha_id[scmd_channel(SC)])) {
1086 SC->result = DID_NO_CONNECT << 16;
1087 done(SC);
1088
1089 return (0);
1090 }
1091
1092 if (ips_is_passthru(SC)) {
1093
1094 ips_copp_wait_item_t *scratch;
1095
1096 /* A Reset IOCTL is only sent by the boot CD in extreme cases. */
1097 /* There can never be any system activity ( network or disk ), but check */
1098 /* anyway just as a good practice. */
1099 pt = (ips_passthru_t *) scsi_sglist(SC);
1100 if ((pt->CoppCP.cmd.reset.op_code == IPS_CMD_RESET_CHANNEL) &&
1101 (pt->CoppCP.cmd.reset.adapter_flag == 1)) {
1102 if (ha->scb_activelist.count != 0) {
1103 SC->result = DID_BUS_BUSY << 16;
1104 done(SC);
1105 return (0);
1106 }
1107 ha->ioctl_reset = 1; /* This reset request is from an IOCTL */
1108 __ips_eh_reset(SC);
1109 SC->result = DID_OK << 16;
1110 SC->scsi_done(SC);
1111 return (0);
1112 }
1113
1114 /* allocate space for the scribble */
1115 scratch = kmalloc(sizeof (ips_copp_wait_item_t), GFP_ATOMIC);
1116
1117 if (!scratch) {
1118 SC->result = DID_ERROR << 16;
1119 done(SC);
1120
1121 return (0);
1122 }
1123
1124 scratch->scsi_cmd = SC;
1125 scratch->next = NULL;
1126
1127 ips_putq_copp_tail(&ha->copp_waitlist, scratch);
1128 } else {
1129 ips_putq_wait_tail(&ha->scb_waitlist, SC);
1130 }
1131
1132 ips_next(ha, IPS_INTR_IORL);
1133
1134 return (0);
1135}
1136
1137static DEF_SCSI_QCMD(ips_queue)
1138
1139/****************************************************************************/
1140/* */
1141/* Routine Name: ips_biosparam */
1142/* */
1143/* Routine Description: */
1144/* */
1145/* Set bios geometry for the controller */
1146/* */
1147/****************************************************************************/
1148static int ips_biosparam(struct scsi_device *sdev, struct block_device *bdev,
1149 sector_t capacity, int geom[])
1150{
1151 ips_ha_t *ha = (ips_ha_t *) sdev->host->hostdata;
1152 int heads;
1153 int sectors;
1154 int cylinders;
1155
1156 METHOD_TRACE("ips_biosparam", 1);
1157
1158 if (!ha)
1159 /* ?!?! host adater info invalid */
1160 return (0);
1161
1162 if (!ha->active)
1163 return (0);
1164
1165 if (!ips_read_adapter_status(ha, IPS_INTR_ON))
1166 /* ?!?! Enquiry command failed */
1167 return (0);
1168
1169 if ((capacity > 0x400000) && ((ha->enq->ucMiscFlag & 0x8) == 0)) {
1170 heads = IPS_NORM_HEADS;
1171 sectors = IPS_NORM_SECTORS;
1172 } else {
1173 heads = IPS_COMP_HEADS;
1174 sectors = IPS_COMP_SECTORS;
1175 }
1176
1177 cylinders = (unsigned long) capacity / (heads * sectors);
1178
1179 DEBUG_VAR(2, "Geometry: heads: %d, sectors: %d, cylinders: %d",
1180 heads, sectors, cylinders);
1181
1182 geom[0] = heads;
1183 geom[1] = sectors;
1184 geom[2] = cylinders;
1185
1186 return (0);
1187}
1188
1189/****************************************************************************/
1190/* */
1191/* Routine Name: ips_slave_configure */
1192/* */
1193/* Routine Description: */
1194/* */
1195/* Set queue depths on devices once scan is complete */
1196/* */
1197/****************************************************************************/
1198static int
1199ips_slave_configure(struct scsi_device * SDptr)
1200{
1201 ips_ha_t *ha;
1202 int min;
1203
1204 ha = IPS_HA(SDptr->host);
1205 if (SDptr->tagged_supported && SDptr->type == TYPE_DISK) {
1206 min = ha->max_cmds / 2;
1207 if (ha->enq->ucLogDriveCount <= 2)
1208 min = ha->max_cmds - 1;
1209 scsi_change_queue_depth(SDptr, min);
1210 }
1211
1212 SDptr->skip_ms_page_8 = 1;
1213 SDptr->skip_ms_page_3f = 1;
1214 return 0;
1215}
1216
1217/****************************************************************************/
1218/* */
1219/* Routine Name: do_ipsintr */
1220/* */
1221/* Routine Description: */
1222/* */
1223/* Wrapper for the interrupt handler */
1224/* */
1225/****************************************************************************/
1226static irqreturn_t
1227do_ipsintr(int irq, void *dev_id)
1228{
1229 ips_ha_t *ha;
1230 struct Scsi_Host *host;
1231 int irqstatus;
1232
1233 METHOD_TRACE("do_ipsintr", 2);
1234
1235 ha = (ips_ha_t *) dev_id;
1236 if (!ha)
1237 return IRQ_NONE;
1238 host = ips_sh[ha->host_num];
1239 /* interrupt during initialization */
1240 if (!host) {
1241 (*ha->func.intr) (ha);
1242 return IRQ_HANDLED;
1243 }
1244
1245 spin_lock(host->host_lock);
1246
1247 if (!ha->active) {
1248 spin_unlock(host->host_lock);
1249 return IRQ_HANDLED;
1250 }
1251
1252 irqstatus = (*ha->func.intr) (ha);
1253
1254 spin_unlock(host->host_lock);
1255
1256 /* start the next command */
1257 ips_next(ha, IPS_INTR_ON);
1258 return IRQ_RETVAL(irqstatus);
1259}
1260
1261/****************************************************************************/
1262/* */
1263/* Routine Name: ips_intr_copperhead */
1264/* */
1265/* Routine Description: */
1266/* */
1267/* Polling interrupt handler */
1268/* */
1269/* ASSUMES interrupts are disabled */
1270/* */
1271/****************************************************************************/
1272int
1273ips_intr_copperhead(ips_ha_t * ha)
1274{
1275 ips_stat_t *sp;
1276 ips_scb_t *scb;
1277 IPS_STATUS cstatus;
1278 int intrstatus;
1279
1280 METHOD_TRACE("ips_intr", 2);
1281
1282 if (!ha)
1283 return 0;
1284
1285 if (!ha->active)
1286 return 0;
1287
1288 intrstatus = (*ha->func.isintr) (ha);
1289
1290 if (!intrstatus) {
1291 /*
1292 * Unexpected/Shared interrupt
1293 */
1294
1295 return 0;
1296 }
1297
1298 while (TRUE) {
1299 sp = &ha->sp;
1300
1301 intrstatus = (*ha->func.isintr) (ha);
1302
1303 if (!intrstatus)
1304 break;
1305 else
1306 cstatus.value = (*ha->func.statupd) (ha);
1307
1308 if (cstatus.fields.command_id > (IPS_MAX_CMDS - 1)) {
1309 /* Spurious Interrupt ? */
1310 continue;
1311 }
1312
1313 ips_chkstatus(ha, &cstatus);
1314 scb = (ips_scb_t *) sp->scb_addr;
1315
1316 /*
1317 * use the callback function to finish things up
1318 * NOTE: interrupts are OFF for this
1319 */
1320 (*scb->callback) (ha, scb);
1321 } /* end while */
1322 return 1;
1323}
1324
1325/****************************************************************************/
1326/* */
1327/* Routine Name: ips_intr_morpheus */
1328/* */
1329/* Routine Description: */
1330/* */
1331/* Polling interrupt handler */
1332/* */
1333/* ASSUMES interrupts are disabled */
1334/* */
1335/****************************************************************************/
1336int
1337ips_intr_morpheus(ips_ha_t * ha)
1338{
1339 ips_stat_t *sp;
1340 ips_scb_t *scb;
1341 IPS_STATUS cstatus;
1342 int intrstatus;
1343
1344 METHOD_TRACE("ips_intr_morpheus", 2);
1345
1346 if (!ha)
1347 return 0;
1348
1349 if (!ha->active)
1350 return 0;
1351
1352 intrstatus = (*ha->func.isintr) (ha);
1353
1354 if (!intrstatus) {
1355 /*
1356 * Unexpected/Shared interrupt
1357 */
1358
1359 return 0;
1360 }
1361
1362 while (TRUE) {
1363 sp = &ha->sp;
1364
1365 intrstatus = (*ha->func.isintr) (ha);
1366
1367 if (!intrstatus)
1368 break;
1369 else
1370 cstatus.value = (*ha->func.statupd) (ha);
1371
1372 if (cstatus.value == 0xffffffff)
1373 /* No more to process */
1374 break;
1375
1376 if (cstatus.fields.command_id > (IPS_MAX_CMDS - 1)) {
1377 IPS_PRINTK(KERN_WARNING, ha->pcidev,
1378 "Spurious interrupt; no ccb.\n");
1379
1380 continue;
1381 }
1382
1383 ips_chkstatus(ha, &cstatus);
1384 scb = (ips_scb_t *) sp->scb_addr;
1385
1386 /*
1387 * use the callback function to finish things up
1388 * NOTE: interrupts are OFF for this
1389 */
1390 (*scb->callback) (ha, scb);
1391 } /* end while */
1392 return 1;
1393}
1394
1395/****************************************************************************/
1396/* */
1397/* Routine Name: ips_info */
1398/* */
1399/* Routine Description: */
1400/* */
1401/* Return info about the driver */
1402/* */
1403/****************************************************************************/
1404static const char *
1405ips_info(struct Scsi_Host *SH)
1406{
1407 static char buffer[256];
1408 char *bp;
1409 ips_ha_t *ha;
1410
1411 METHOD_TRACE("ips_info", 1);
1412
1413 ha = IPS_HA(SH);
1414
1415 if (!ha)
1416 return (NULL);
1417
1418 bp = &buffer[0];
1419 memset(bp, 0, sizeof (buffer));
1420
1421 sprintf(bp, "%s%s%s Build %d", "IBM PCI ServeRAID ",
1422 IPS_VERSION_HIGH, IPS_VERSION_LOW, IPS_BUILD_IDENT);
1423
1424 if (ha->ad_type > 0 && ha->ad_type <= MAX_ADAPTER_NAME) {
1425 strcat(bp, " <");
1426 strcat(bp, ips_adapter_name[ha->ad_type - 1]);
1427 strcat(bp, ">");
1428 }
1429
1430 return (bp);
1431}
1432
1433static int
1434ips_write_info(struct Scsi_Host *host, char *buffer, int length)
1435{
1436 int i;
1437 ips_ha_t *ha = NULL;
1438
1439 /* Find our host structure */
1440 for (i = 0; i < ips_next_controller; i++) {
1441 if (ips_sh[i]) {
1442 if (ips_sh[i] == host) {
1443 ha = (ips_ha_t *) ips_sh[i]->hostdata;
1444 break;
1445 }
1446 }
1447 }
1448
1449 if (!ha)
1450 return (-EINVAL);
1451
1452 return 0;
1453}
1454
1455static int
1456ips_show_info(struct seq_file *m, struct Scsi_Host *host)
1457{
1458 int i;
1459 ips_ha_t *ha = NULL;
1460
1461 /* Find our host structure */
1462 for (i = 0; i < ips_next_controller; i++) {
1463 if (ips_sh[i]) {
1464 if (ips_sh[i] == host) {
1465 ha = (ips_ha_t *) ips_sh[i]->hostdata;
1466 break;
1467 }
1468 }
1469 }
1470
1471 if (!ha)
1472 return (-EINVAL);
1473
1474 return ips_host_info(ha, m);
1475}
1476
1477/*--------------------------------------------------------------------------*/
1478/* Helper Functions */
1479/*--------------------------------------------------------------------------*/
1480
1481/****************************************************************************/
1482/* */
1483/* Routine Name: ips_is_passthru */
1484/* */
1485/* Routine Description: */
1486/* */
1487/* Determine if the specified SCSI command is really a passthru command */
1488/* */
1489/****************************************************************************/
1490static int ips_is_passthru(struct scsi_cmnd *SC)
1491{
1492 unsigned long flags;
1493
1494 METHOD_TRACE("ips_is_passthru", 1);
1495
1496 if (!SC)
1497 return (0);
1498
1499 if ((SC->cmnd[0] == IPS_IOCTL_COMMAND) &&
1500 (SC->device->channel == 0) &&
1501 (SC->device->id == IPS_ADAPTER_ID) &&
1502 (SC->device->lun == 0) && scsi_sglist(SC)) {
1503 struct scatterlist *sg = scsi_sglist(SC);
1504 char *buffer;
1505
1506 /* kmap_atomic() ensures addressability of the user buffer.*/
1507 /* local_irq_save() protects the KM_IRQ0 address slot. */
1508 local_irq_save(flags);
1509 buffer = kmap_atomic(sg_page(sg)) + sg->offset;
1510 if (buffer && buffer[0] == 'C' && buffer[1] == 'O' &&
1511 buffer[2] == 'P' && buffer[3] == 'P') {
1512 kunmap_atomic(buffer - sg->offset);
1513 local_irq_restore(flags);
1514 return 1;
1515 }
1516 kunmap_atomic(buffer - sg->offset);
1517 local_irq_restore(flags);
1518 }
1519 return 0;
1520}
1521
1522/****************************************************************************/
1523/* */
1524/* Routine Name: ips_alloc_passthru_buffer */
1525/* */
1526/* Routine Description: */
1527/* allocate a buffer large enough for the ioctl data if the ioctl buffer */
1528/* is too small or doesn't exist */
1529/****************************************************************************/
1530static int
1531ips_alloc_passthru_buffer(ips_ha_t * ha, int length)
1532{
1533 void *bigger_buf;
1534 dma_addr_t dma_busaddr;
1535
1536 if (ha->ioctl_data && length <= ha->ioctl_len)
1537 return 0;
1538 /* there is no buffer or it's not big enough, allocate a new one */
1539 bigger_buf = pci_alloc_consistent(ha->pcidev, length, &dma_busaddr);
1540 if (bigger_buf) {
1541 /* free the old memory */
1542 pci_free_consistent(ha->pcidev, ha->ioctl_len, ha->ioctl_data,
1543 ha->ioctl_busaddr);
1544 /* use the new memory */
1545 ha->ioctl_data = (char *) bigger_buf;
1546 ha->ioctl_len = length;
1547 ha->ioctl_busaddr = dma_busaddr;
1548 } else {
1549 return -1;
1550 }
1551 return 0;
1552}
1553
1554/****************************************************************************/
1555/* */
1556/* Routine Name: ips_make_passthru */
1557/* */
1558/* Routine Description: */
1559/* */
1560/* Make a passthru command out of the info in the Scsi block */
1561/* */
1562/****************************************************************************/
1563static int
1564ips_make_passthru(ips_ha_t *ha, struct scsi_cmnd *SC, ips_scb_t *scb, int intr)
1565{
1566 ips_passthru_t *pt;
1567 int length = 0;
1568 int i, ret;
1569 struct scatterlist *sg = scsi_sglist(SC);
1570
1571 METHOD_TRACE("ips_make_passthru", 1);
1572
1573 scsi_for_each_sg(SC, sg, scsi_sg_count(SC), i)
1574 length += sg->length;
1575
1576 if (length < sizeof (ips_passthru_t)) {
1577 /* wrong size */
1578 DEBUG_VAR(1, "(%s%d) Passthru structure wrong size",
1579 ips_name, ha->host_num);
1580 return (IPS_FAILURE);
1581 }
1582 if (ips_alloc_passthru_buffer(ha, length)) {
1583 /* allocation failure! If ha->ioctl_data exists, use it to return
1584 some error codes. Return a failed command to the scsi layer. */
1585 if (ha->ioctl_data) {
1586 pt = (ips_passthru_t *) ha->ioctl_data;
1587 ips_scmd_buf_read(SC, pt, sizeof (ips_passthru_t));
1588 pt->BasicStatus = 0x0B;
1589 pt->ExtendedStatus = 0x00;
1590 ips_scmd_buf_write(SC, pt, sizeof (ips_passthru_t));
1591 }
1592 return IPS_FAILURE;
1593 }
1594 ha->ioctl_datasize = length;
1595
1596 ips_scmd_buf_read(SC, ha->ioctl_data, ha->ioctl_datasize);
1597 pt = (ips_passthru_t *) ha->ioctl_data;
1598
1599 /*
1600 * Some notes about the passthru interface used
1601 *
1602 * IF the scsi op_code == 0x0d then we assume
1603 * that the data came along with/goes with the
1604 * packet we received from the sg driver. In this
1605 * case the CmdBSize field of the pt structure is
1606 * used for the size of the buffer.
1607 */
1608
1609 switch (pt->CoppCmd) {
1610 case IPS_NUMCTRLS:
1611 memcpy(ha->ioctl_data + sizeof (ips_passthru_t),
1612 &ips_num_controllers, sizeof (int));
1613 ips_scmd_buf_write(SC, ha->ioctl_data,
1614 sizeof (ips_passthru_t) + sizeof (int));
1615 SC->result = DID_OK << 16;
1616
1617 return (IPS_SUCCESS_IMM);
1618
1619 case IPS_COPPUSRCMD:
1620 case IPS_COPPIOCCMD:
1621 if (SC->cmnd[0] == IPS_IOCTL_COMMAND) {
1622 if (length < (sizeof (ips_passthru_t) + pt->CmdBSize)) {
1623 /* wrong size */
1624 DEBUG_VAR(1,
1625 "(%s%d) Passthru structure wrong size",
1626 ips_name, ha->host_num);
1627
1628 return (IPS_FAILURE);
1629 }
1630
1631 if (ha->pcidev->device == IPS_DEVICEID_COPPERHEAD &&
1632 pt->CoppCP.cmd.flashfw.op_code ==
1633 IPS_CMD_RW_BIOSFW) {
1634 ret = ips_flash_copperhead(ha, pt, scb);
1635 ips_scmd_buf_write(SC, ha->ioctl_data,
1636 sizeof (ips_passthru_t));
1637 return ret;
1638 }
1639 if (ips_usrcmd(ha, pt, scb))
1640 return (IPS_SUCCESS);
1641 else
1642 return (IPS_FAILURE);
1643 }
1644
1645 break;
1646
1647 } /* end switch */
1648
1649 return (IPS_FAILURE);
1650}
1651
1652/****************************************************************************/
1653/* Routine Name: ips_flash_copperhead */
1654/* Routine Description: */
1655/* Flash the BIOS/FW on a Copperhead style controller */
1656/****************************************************************************/
1657static int
1658ips_flash_copperhead(ips_ha_t * ha, ips_passthru_t * pt, ips_scb_t * scb)
1659{
1660 int datasize;
1661
1662 /* Trombone is the only copperhead that can do packet flash, but only
1663 * for firmware. No one said it had to make sense. */
1664 if (IPS_IS_TROMBONE(ha) && pt->CoppCP.cmd.flashfw.type == IPS_FW_IMAGE) {
1665 if (ips_usrcmd(ha, pt, scb))
1666 return IPS_SUCCESS;
1667 else
1668 return IPS_FAILURE;
1669 }
1670 pt->BasicStatus = 0x0B;
1671 pt->ExtendedStatus = 0;
1672 scb->scsi_cmd->result = DID_OK << 16;
1673 /* IF it's OK to Use the "CD BOOT" Flash Buffer, then you can */
1674 /* avoid allocating a huge buffer per adapter ( which can fail ). */
1675 if (pt->CoppCP.cmd.flashfw.type == IPS_BIOS_IMAGE &&
1676 pt->CoppCP.cmd.flashfw.direction == IPS_ERASE_BIOS) {
1677 pt->BasicStatus = 0;
1678 return ips_flash_bios(ha, pt, scb);
1679 } else if (pt->CoppCP.cmd.flashfw.packet_num == 0) {
1680 if (ips_FlashData && !test_and_set_bit(0, &ips_FlashDataInUse)){
1681 ha->flash_data = ips_FlashData;
1682 ha->flash_busaddr = ips_flashbusaddr;
1683 ha->flash_len = PAGE_SIZE << 7;
1684 ha->flash_datasize = 0;
1685 } else if (!ha->flash_data) {
1686 datasize = pt->CoppCP.cmd.flashfw.total_packets *
1687 pt->CoppCP.cmd.flashfw.count;
1688 ha->flash_data = pci_alloc_consistent(ha->pcidev,
1689 datasize,
1690 &ha->flash_busaddr);
1691 if (!ha->flash_data){
1692 printk(KERN_WARNING "Unable to allocate a flash buffer\n");
1693 return IPS_FAILURE;
1694 }
1695 ha->flash_datasize = 0;
1696 ha->flash_len = datasize;
1697 } else
1698 return IPS_FAILURE;
1699 } else {
1700 if (pt->CoppCP.cmd.flashfw.count + ha->flash_datasize >
1701 ha->flash_len) {
1702 ips_free_flash_copperhead(ha);
1703 IPS_PRINTK(KERN_WARNING, ha->pcidev,
1704 "failed size sanity check\n");
1705 return IPS_FAILURE;
1706 }
1707 }
1708 if (!ha->flash_data)
1709 return IPS_FAILURE;
1710 pt->BasicStatus = 0;
1711 memcpy(&ha->flash_data[ha->flash_datasize], pt + 1,
1712 pt->CoppCP.cmd.flashfw.count);
1713 ha->flash_datasize += pt->CoppCP.cmd.flashfw.count;
1714 if (pt->CoppCP.cmd.flashfw.packet_num ==
1715 pt->CoppCP.cmd.flashfw.total_packets - 1) {
1716 if (pt->CoppCP.cmd.flashfw.type == IPS_BIOS_IMAGE)
1717 return ips_flash_bios(ha, pt, scb);
1718 else if (pt->CoppCP.cmd.flashfw.type == IPS_FW_IMAGE)
1719 return ips_flash_firmware(ha, pt, scb);
1720 }
1721 return IPS_SUCCESS_IMM;
1722}
1723
1724/****************************************************************************/
1725/* Routine Name: ips_flash_bios */
1726/* Routine Description: */
1727/* flashes the bios of a copperhead adapter */
1728/****************************************************************************/
1729static int
1730ips_flash_bios(ips_ha_t * ha, ips_passthru_t * pt, ips_scb_t * scb)
1731{
1732
1733 if (pt->CoppCP.cmd.flashfw.type == IPS_BIOS_IMAGE &&
1734 pt->CoppCP.cmd.flashfw.direction == IPS_WRITE_BIOS) {
1735 if ((!ha->func.programbios) || (!ha->func.erasebios) ||
1736 (!ha->func.verifybios))
1737 goto error;
1738 if ((*ha->func.erasebios) (ha)) {
1739 DEBUG_VAR(1,
1740 "(%s%d) flash bios failed - unable to erase flash",
1741 ips_name, ha->host_num);
1742 goto error;
1743 } else
1744 if ((*ha->func.programbios) (ha,
1745 ha->flash_data +
1746 IPS_BIOS_HEADER,
1747 ha->flash_datasize -
1748 IPS_BIOS_HEADER, 0)) {
1749 DEBUG_VAR(1,
1750 "(%s%d) flash bios failed - unable to flash",
1751 ips_name, ha->host_num);
1752 goto error;
1753 } else
1754 if ((*ha->func.verifybios) (ha,
1755 ha->flash_data +
1756 IPS_BIOS_HEADER,
1757 ha->flash_datasize -
1758 IPS_BIOS_HEADER, 0)) {
1759 DEBUG_VAR(1,
1760 "(%s%d) flash bios failed - unable to verify flash",
1761 ips_name, ha->host_num);
1762 goto error;
1763 }
1764 ips_free_flash_copperhead(ha);
1765 return IPS_SUCCESS_IMM;
1766 } else if (pt->CoppCP.cmd.flashfw.type == IPS_BIOS_IMAGE &&
1767 pt->CoppCP.cmd.flashfw.direction == IPS_ERASE_BIOS) {
1768 if (!ha->func.erasebios)
1769 goto error;
1770 if ((*ha->func.erasebios) (ha)) {
1771 DEBUG_VAR(1,
1772 "(%s%d) flash bios failed - unable to erase flash",
1773 ips_name, ha->host_num);
1774 goto error;
1775 }
1776 return IPS_SUCCESS_IMM;
1777 }
1778 error:
1779 pt->BasicStatus = 0x0B;
1780 pt->ExtendedStatus = 0x00;
1781 ips_free_flash_copperhead(ha);
1782 return IPS_FAILURE;
1783}
1784
1785/****************************************************************************/
1786/* */
1787/* Routine Name: ips_fill_scb_sg_single */
1788/* */
1789/* Routine Description: */
1790/* Fill in a single scb sg_list element from an address */
1791/* return a -1 if a breakup occurred */
1792/****************************************************************************/
1793static int
1794ips_fill_scb_sg_single(ips_ha_t * ha, dma_addr_t busaddr,
1795 ips_scb_t * scb, int indx, unsigned int e_len)
1796{
1797
1798 int ret_val = 0;
1799
1800 if ((scb->data_len + e_len) > ha->max_xfer) {
1801 e_len = ha->max_xfer - scb->data_len;
1802 scb->breakup = indx;
1803 ++scb->sg_break;
1804 ret_val = -1;
1805 } else {
1806 scb->breakup = 0;
1807 scb->sg_break = 0;
1808 }
1809 if (IPS_USE_ENH_SGLIST(ha)) {
1810 scb->sg_list.enh_list[indx].address_lo =
1811 cpu_to_le32(pci_dma_lo32(busaddr));
1812 scb->sg_list.enh_list[indx].address_hi =
1813 cpu_to_le32(pci_dma_hi32(busaddr));
1814 scb->sg_list.enh_list[indx].length = cpu_to_le32(e_len);
1815 } else {
1816 scb->sg_list.std_list[indx].address =
1817 cpu_to_le32(pci_dma_lo32(busaddr));
1818 scb->sg_list.std_list[indx].length = cpu_to_le32(e_len);
1819 }
1820
1821 ++scb->sg_len;
1822 scb->data_len += e_len;
1823 return ret_val;
1824}
1825
1826/****************************************************************************/
1827/* Routine Name: ips_flash_firmware */
1828/* Routine Description: */
1829/* flashes the firmware of a copperhead adapter */
1830/****************************************************************************/
1831static int
1832ips_flash_firmware(ips_ha_t * ha, ips_passthru_t * pt, ips_scb_t * scb)
1833{
1834 IPS_SG_LIST sg_list;
1835 uint32_t cmd_busaddr;
1836
1837 if (pt->CoppCP.cmd.flashfw.type == IPS_FW_IMAGE &&
1838 pt->CoppCP.cmd.flashfw.direction == IPS_WRITE_FW) {
1839 memset(&pt->CoppCP.cmd, 0, sizeof (IPS_HOST_COMMAND));
1840 pt->CoppCP.cmd.flashfw.op_code = IPS_CMD_DOWNLOAD;
1841 pt->CoppCP.cmd.flashfw.count = cpu_to_le32(ha->flash_datasize);
1842 } else {
1843 pt->BasicStatus = 0x0B;
1844 pt->ExtendedStatus = 0x00;
1845 ips_free_flash_copperhead(ha);
1846 return IPS_FAILURE;
1847 }
1848 /* Save the S/G list pointer so it doesn't get clobbered */
1849 sg_list.list = scb->sg_list.list;
1850 cmd_busaddr = scb->scb_busaddr;
1851 /* copy in the CP */
1852 memcpy(&scb->cmd, &pt->CoppCP.cmd, sizeof (IPS_IOCTL_CMD));
1853 /* FIX stuff that might be wrong */
1854 scb->sg_list.list = sg_list.list;
1855 scb->scb_busaddr = cmd_busaddr;
1856 scb->bus = scb->scsi_cmd->device->channel;
1857 scb->target_id = scb->scsi_cmd->device->id;
1858 scb->lun = scb->scsi_cmd->device->lun;
1859 scb->sg_len = 0;
1860 scb->data_len = 0;
1861 scb->flags = 0;
1862 scb->op_code = 0;
1863 scb->callback = ipsintr_done;
1864 scb->timeout = ips_cmd_timeout;
1865
1866 scb->data_len = ha->flash_datasize;
1867 scb->data_busaddr =
1868 pci_map_single(ha->pcidev, ha->flash_data, scb->data_len,
1869 IPS_DMA_DIR(scb));
1870 scb->flags |= IPS_SCB_MAP_SINGLE;
1871 scb->cmd.flashfw.command_id = IPS_COMMAND_ID(ha, scb);
1872 scb->cmd.flashfw.buffer_addr = cpu_to_le32(scb->data_busaddr);
1873 if (pt->TimeOut)
1874 scb->timeout = pt->TimeOut;
1875 scb->scsi_cmd->result = DID_OK << 16;
1876 return IPS_SUCCESS;
1877}
1878
1879/****************************************************************************/
1880/* Routine Name: ips_free_flash_copperhead */
1881/* Routine Description: */
1882/* release the memory resources used to hold the flash image */
1883/****************************************************************************/
1884static void
1885ips_free_flash_copperhead(ips_ha_t * ha)
1886{
1887 if (ha->flash_data == ips_FlashData)
1888 test_and_clear_bit(0, &ips_FlashDataInUse);
1889 else if (ha->flash_data)
1890 pci_free_consistent(ha->pcidev, ha->flash_len, ha->flash_data,
1891 ha->flash_busaddr);
1892 ha->flash_data = NULL;
1893}
1894
1895/****************************************************************************/
1896/* */
1897/* Routine Name: ips_usrcmd */
1898/* */
1899/* Routine Description: */
1900/* */
1901/* Process a user command and make it ready to send */
1902/* */
1903/****************************************************************************/
1904static int
1905ips_usrcmd(ips_ha_t * ha, ips_passthru_t * pt, ips_scb_t * scb)
1906{
1907 IPS_SG_LIST sg_list;
1908 uint32_t cmd_busaddr;
1909
1910 METHOD_TRACE("ips_usrcmd", 1);
1911
1912 if ((!scb) || (!pt) || (!ha))
1913 return (0);
1914
1915 /* Save the S/G list pointer so it doesn't get clobbered */
1916 sg_list.list = scb->sg_list.list;
1917 cmd_busaddr = scb->scb_busaddr;
1918 /* copy in the CP */
1919 memcpy(&scb->cmd, &pt->CoppCP.cmd, sizeof (IPS_IOCTL_CMD));
1920 memcpy(&scb->dcdb, &pt->CoppCP.dcdb, sizeof (IPS_DCDB_TABLE));
1921
1922 /* FIX stuff that might be wrong */
1923 scb->sg_list.list = sg_list.list;
1924 scb->scb_busaddr = cmd_busaddr;
1925 scb->bus = scb->scsi_cmd->device->channel;
1926 scb->target_id = scb->scsi_cmd->device->id;
1927 scb->lun = scb->scsi_cmd->device->lun;
1928 scb->sg_len = 0;
1929 scb->data_len = 0;
1930 scb->flags = 0;
1931 scb->op_code = 0;
1932 scb->callback = ipsintr_done;
1933 scb->timeout = ips_cmd_timeout;
1934 scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
1935
1936 /* we don't support DCDB/READ/WRITE Scatter Gather */
1937 if ((scb->cmd.basic_io.op_code == IPS_CMD_READ_SG) ||
1938 (scb->cmd.basic_io.op_code == IPS_CMD_WRITE_SG) ||
1939 (scb->cmd.basic_io.op_code == IPS_CMD_DCDB_SG))
1940 return (0);
1941
1942 if (pt->CmdBSize) {
1943 scb->data_len = pt->CmdBSize;
1944 scb->data_busaddr = ha->ioctl_busaddr + sizeof (ips_passthru_t);
1945 } else {
1946 scb->data_busaddr = 0L;
1947 }
1948
1949 if (scb->cmd.dcdb.op_code == IPS_CMD_DCDB)
1950 scb->cmd.dcdb.dcdb_address = cpu_to_le32(scb->scb_busaddr +
1951 (unsigned long) &scb->
1952 dcdb -
1953 (unsigned long) scb);
1954
1955 if (pt->CmdBSize) {
1956 if (scb->cmd.dcdb.op_code == IPS_CMD_DCDB)
1957 scb->dcdb.buffer_pointer =
1958 cpu_to_le32(scb->data_busaddr);
1959 else
1960 scb->cmd.basic_io.sg_addr =
1961 cpu_to_le32(scb->data_busaddr);
1962 }
1963
1964 /* set timeouts */
1965 if (pt->TimeOut) {
1966 scb->timeout = pt->TimeOut;
1967
1968 if (pt->TimeOut <= 10)
1969 scb->dcdb.cmd_attribute |= IPS_TIMEOUT10;
1970 else if (pt->TimeOut <= 60)
1971 scb->dcdb.cmd_attribute |= IPS_TIMEOUT60;
1972 else
1973 scb->dcdb.cmd_attribute |= IPS_TIMEOUT20M;
1974 }
1975
1976 /* assume success */
1977 scb->scsi_cmd->result = DID_OK << 16;
1978
1979 /* success */
1980 return (1);
1981}
1982
1983/****************************************************************************/
1984/* */
1985/* Routine Name: ips_cleanup_passthru */
1986/* */
1987/* Routine Description: */
1988/* */
1989/* Cleanup after a passthru command */
1990/* */
1991/****************************************************************************/
1992static void
1993ips_cleanup_passthru(ips_ha_t * ha, ips_scb_t * scb)
1994{
1995 ips_passthru_t *pt;
1996
1997 METHOD_TRACE("ips_cleanup_passthru", 1);
1998
1999 if ((!scb) || (!scb->scsi_cmd) || (!scsi_sglist(scb->scsi_cmd))) {
2000 DEBUG_VAR(1, "(%s%d) couldn't cleanup after passthru",
2001 ips_name, ha->host_num);
2002
2003 return;
2004 }
2005 pt = (ips_passthru_t *) ha->ioctl_data;
2006
2007 /* Copy data back to the user */
2008 if (scb->cmd.dcdb.op_code == IPS_CMD_DCDB) /* Copy DCDB Back to Caller's Area */
2009 memcpy(&pt->CoppCP.dcdb, &scb->dcdb, sizeof (IPS_DCDB_TABLE));
2010
2011 pt->BasicStatus = scb->basic_status;
2012 pt->ExtendedStatus = scb->extended_status;
2013 pt->AdapterType = ha->ad_type;
2014
2015 if (ha->pcidev->device == IPS_DEVICEID_COPPERHEAD &&
2016 (scb->cmd.flashfw.op_code == IPS_CMD_DOWNLOAD ||
2017 scb->cmd.flashfw.op_code == IPS_CMD_RW_BIOSFW))
2018 ips_free_flash_copperhead(ha);
2019
2020 ips_scmd_buf_write(scb->scsi_cmd, ha->ioctl_data, ha->ioctl_datasize);
2021}
2022
2023/****************************************************************************/
2024/* */
2025/* Routine Name: ips_host_info */
2026/* */
2027/* Routine Description: */
2028/* */
2029/* The passthru interface for the driver */
2030/* */
2031/****************************************************************************/
2032static int
2033ips_host_info(ips_ha_t *ha, struct seq_file *m)
2034{
2035 METHOD_TRACE("ips_host_info", 1);
2036
2037 seq_puts(m, "\nIBM ServeRAID General Information:\n\n");
2038
2039 if ((le32_to_cpu(ha->nvram->signature) == IPS_NVRAM_P5_SIG) &&
2040 (le16_to_cpu(ha->nvram->adapter_type) != 0))
2041 seq_printf(m, "\tController Type : %s\n",
2042 ips_adapter_name[ha->ad_type - 1]);
2043 else
2044 seq_puts(m, "\tController Type : Unknown\n");
2045
2046 if (ha->io_addr)
2047 seq_printf(m,
2048 "\tIO region : 0x%x (%d bytes)\n",
2049 ha->io_addr, ha->io_len);
2050
2051 if (ha->mem_addr) {
2052 seq_printf(m,
2053 "\tMemory region : 0x%x (%d bytes)\n",
2054 ha->mem_addr, ha->mem_len);
2055 seq_printf(m,
2056 "\tShared memory address : 0x%lx\n",
2057 (unsigned long)ha->mem_ptr);
2058 }
2059
2060 seq_printf(m, "\tIRQ number : %d\n", ha->pcidev->irq);
2061
2062 /* For the Next 3 lines Check for Binary 0 at the end and don't include it if it's there. */
2063 /* That keeps everything happy for "text" operations on the proc file. */
2064
2065 if (le32_to_cpu(ha->nvram->signature) == IPS_NVRAM_P5_SIG) {
2066 if (ha->nvram->bios_low[3] == 0) {
2067 seq_printf(m,
2068 "\tBIOS Version : %c%c%c%c%c%c%c\n",
2069 ha->nvram->bios_high[0], ha->nvram->bios_high[1],
2070 ha->nvram->bios_high[2], ha->nvram->bios_high[3],
2071 ha->nvram->bios_low[0], ha->nvram->bios_low[1],
2072 ha->nvram->bios_low[2]);
2073
2074 } else {
2075 seq_printf(m,
2076 "\tBIOS Version : %c%c%c%c%c%c%c%c\n",
2077 ha->nvram->bios_high[0], ha->nvram->bios_high[1],
2078 ha->nvram->bios_high[2], ha->nvram->bios_high[3],
2079 ha->nvram->bios_low[0], ha->nvram->bios_low[1],
2080 ha->nvram->bios_low[2], ha->nvram->bios_low[3]);
2081 }
2082
2083 }
2084
2085 if (ha->enq->CodeBlkVersion[7] == 0) {
2086 seq_printf(m,
2087 "\tFirmware Version : %c%c%c%c%c%c%c\n",
2088 ha->enq->CodeBlkVersion[0], ha->enq->CodeBlkVersion[1],
2089 ha->enq->CodeBlkVersion[2], ha->enq->CodeBlkVersion[3],
2090 ha->enq->CodeBlkVersion[4], ha->enq->CodeBlkVersion[5],
2091 ha->enq->CodeBlkVersion[6]);
2092 } else {
2093 seq_printf(m,
2094 "\tFirmware Version : %c%c%c%c%c%c%c%c\n",
2095 ha->enq->CodeBlkVersion[0], ha->enq->CodeBlkVersion[1],
2096 ha->enq->CodeBlkVersion[2], ha->enq->CodeBlkVersion[3],
2097 ha->enq->CodeBlkVersion[4], ha->enq->CodeBlkVersion[5],
2098 ha->enq->CodeBlkVersion[6], ha->enq->CodeBlkVersion[7]);
2099 }
2100
2101 if (ha->enq->BootBlkVersion[7] == 0) {
2102 seq_printf(m,
2103 "\tBoot Block Version : %c%c%c%c%c%c%c\n",
2104 ha->enq->BootBlkVersion[0], ha->enq->BootBlkVersion[1],
2105 ha->enq->BootBlkVersion[2], ha->enq->BootBlkVersion[3],
2106 ha->enq->BootBlkVersion[4], ha->enq->BootBlkVersion[5],
2107 ha->enq->BootBlkVersion[6]);
2108 } else {
2109 seq_printf(m,
2110 "\tBoot Block Version : %c%c%c%c%c%c%c%c\n",
2111 ha->enq->BootBlkVersion[0], ha->enq->BootBlkVersion[1],
2112 ha->enq->BootBlkVersion[2], ha->enq->BootBlkVersion[3],
2113 ha->enq->BootBlkVersion[4], ha->enq->BootBlkVersion[5],
2114 ha->enq->BootBlkVersion[6], ha->enq->BootBlkVersion[7]);
2115 }
2116
2117 seq_printf(m, "\tDriver Version : %s%s\n",
2118 IPS_VERSION_HIGH, IPS_VERSION_LOW);
2119
2120 seq_printf(m, "\tDriver Build : %d\n",
2121 IPS_BUILD_IDENT);
2122
2123 seq_printf(m, "\tMax Physical Devices : %d\n",
2124 ha->enq->ucMaxPhysicalDevices);
2125 seq_printf(m, "\tMax Active Commands : %d\n",
2126 ha->max_cmds);
2127 seq_printf(m, "\tCurrent Queued Commands : %d\n",
2128 ha->scb_waitlist.count);
2129 seq_printf(m, "\tCurrent Active Commands : %d\n",
2130 ha->scb_activelist.count - ha->num_ioctl);
2131 seq_printf(m, "\tCurrent Queued PT Commands : %d\n",
2132 ha->copp_waitlist.count);
2133 seq_printf(m, "\tCurrent Active PT Commands : %d\n",
2134 ha->num_ioctl);
2135
2136 seq_putc(m, '\n');
2137
2138 return 0;
2139}
2140
2141/****************************************************************************/
2142/* */
2143/* Routine Name: ips_identify_controller */
2144/* */
2145/* Routine Description: */
2146/* */
2147/* Identify this controller */
2148/* */
2149/****************************************************************************/
2150static void
2151ips_identify_controller(ips_ha_t * ha)
2152{
2153 METHOD_TRACE("ips_identify_controller", 1);
2154
2155 switch (ha->pcidev->device) {
2156 case IPS_DEVICEID_COPPERHEAD:
2157 if (ha->pcidev->revision <= IPS_REVID_SERVERAID) {
2158 ha->ad_type = IPS_ADTYPE_SERVERAID;
2159 } else if (ha->pcidev->revision == IPS_REVID_SERVERAID2) {
2160 ha->ad_type = IPS_ADTYPE_SERVERAID2;
2161 } else if (ha->pcidev->revision == IPS_REVID_NAVAJO) {
2162 ha->ad_type = IPS_ADTYPE_NAVAJO;
2163 } else if ((ha->pcidev->revision == IPS_REVID_SERVERAID2)
2164 && (ha->slot_num == 0)) {
2165 ha->ad_type = IPS_ADTYPE_KIOWA;
2166 } else if ((ha->pcidev->revision >= IPS_REVID_CLARINETP1) &&
2167 (ha->pcidev->revision <= IPS_REVID_CLARINETP3)) {
2168 if (ha->enq->ucMaxPhysicalDevices == 15)
2169 ha->ad_type = IPS_ADTYPE_SERVERAID3L;
2170 else
2171 ha->ad_type = IPS_ADTYPE_SERVERAID3;
2172 } else if ((ha->pcidev->revision >= IPS_REVID_TROMBONE32) &&
2173 (ha->pcidev->revision <= IPS_REVID_TROMBONE64)) {
2174 ha->ad_type = IPS_ADTYPE_SERVERAID4H;
2175 }
2176 break;
2177
2178 case IPS_DEVICEID_MORPHEUS:
2179 switch (ha->pcidev->subsystem_device) {
2180 case IPS_SUBDEVICEID_4L:
2181 ha->ad_type = IPS_ADTYPE_SERVERAID4L;
2182 break;
2183
2184 case IPS_SUBDEVICEID_4M:
2185 ha->ad_type = IPS_ADTYPE_SERVERAID4M;
2186 break;
2187
2188 case IPS_SUBDEVICEID_4MX:
2189 ha->ad_type = IPS_ADTYPE_SERVERAID4MX;
2190 break;
2191
2192 case IPS_SUBDEVICEID_4LX:
2193 ha->ad_type = IPS_ADTYPE_SERVERAID4LX;
2194 break;
2195
2196 case IPS_SUBDEVICEID_5I2:
2197 ha->ad_type = IPS_ADTYPE_SERVERAID5I2;
2198 break;
2199
2200 case IPS_SUBDEVICEID_5I1:
2201 ha->ad_type = IPS_ADTYPE_SERVERAID5I1;
2202 break;
2203 }
2204
2205 break;
2206
2207 case IPS_DEVICEID_MARCO:
2208 switch (ha->pcidev->subsystem_device) {
2209 case IPS_SUBDEVICEID_6M:
2210 ha->ad_type = IPS_ADTYPE_SERVERAID6M;
2211 break;
2212 case IPS_SUBDEVICEID_6I:
2213 ha->ad_type = IPS_ADTYPE_SERVERAID6I;
2214 break;
2215 case IPS_SUBDEVICEID_7k:
2216 ha->ad_type = IPS_ADTYPE_SERVERAID7k;
2217 break;
2218 case IPS_SUBDEVICEID_7M:
2219 ha->ad_type = IPS_ADTYPE_SERVERAID7M;
2220 break;
2221 }
2222 break;
2223 }
2224}
2225
2226/****************************************************************************/
2227/* */
2228/* Routine Name: ips_get_bios_version */
2229/* */
2230/* Routine Description: */
2231/* */
2232/* Get the BIOS revision number */
2233/* */
2234/****************************************************************************/
2235static void
2236ips_get_bios_version(ips_ha_t * ha, int intr)
2237{
2238 ips_scb_t *scb;
2239 int ret;
2240 uint8_t major;
2241 uint8_t minor;
2242 uint8_t subminor;
2243 uint8_t *buffer;
2244
2245 METHOD_TRACE("ips_get_bios_version", 1);
2246
2247 major = 0;
2248 minor = 0;
2249
2250 strncpy(ha->bios_version, " ?", 8);
2251
2252 if (ha->pcidev->device == IPS_DEVICEID_COPPERHEAD) {
2253 if (IPS_USE_MEMIO(ha)) {
2254 /* Memory Mapped I/O */
2255
2256 /* test 1st byte */
2257 writel(0, ha->mem_ptr + IPS_REG_FLAP);
2258 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2259 udelay(25); /* 25 us */
2260
2261 if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0x55)
2262 return;
2263
2264 writel(1, 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) != 0xAA)
2269 return;
2270
2271 /* Get Major version */
2272 writel(0x1FF, ha->mem_ptr + IPS_REG_FLAP);
2273 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2274 udelay(25); /* 25 us */
2275
2276 major = readb(ha->mem_ptr + IPS_REG_FLDP);
2277
2278 /* Get Minor version */
2279 writel(0x1FE, ha->mem_ptr + IPS_REG_FLAP);
2280 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2281 udelay(25); /* 25 us */
2282 minor = readb(ha->mem_ptr + IPS_REG_FLDP);
2283
2284 /* Get SubMinor version */
2285 writel(0x1FD, ha->mem_ptr + IPS_REG_FLAP);
2286 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2287 udelay(25); /* 25 us */
2288 subminor = readb(ha->mem_ptr + IPS_REG_FLDP);
2289
2290 } else {
2291 /* Programmed I/O */
2292
2293 /* test 1st byte */
2294 outl(0, ha->io_addr + IPS_REG_FLAP);
2295 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2296 udelay(25); /* 25 us */
2297
2298 if (inb(ha->io_addr + IPS_REG_FLDP) != 0x55)
2299 return;
2300
2301 outl(1, 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) != 0xAA)
2306 return;
2307
2308 /* Get Major version */
2309 outl(0x1FF, ha->io_addr + IPS_REG_FLAP);
2310 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2311 udelay(25); /* 25 us */
2312
2313 major = inb(ha->io_addr + IPS_REG_FLDP);
2314
2315 /* Get Minor version */
2316 outl(0x1FE, ha->io_addr + IPS_REG_FLAP);
2317 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2318 udelay(25); /* 25 us */
2319
2320 minor = inb(ha->io_addr + IPS_REG_FLDP);
2321
2322 /* Get SubMinor version */
2323 outl(0x1FD, ha->io_addr + IPS_REG_FLAP);
2324 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2325 udelay(25); /* 25 us */
2326
2327 subminor = inb(ha->io_addr + IPS_REG_FLDP);
2328
2329 }
2330 } else {
2331 /* Morpheus Family - Send Command to the card */
2332
2333 buffer = ha->ioctl_data;
2334
2335 memset(buffer, 0, 0x1000);
2336
2337 scb = &ha->scbs[ha->max_cmds - 1];
2338
2339 ips_init_scb(ha, scb);
2340
2341 scb->timeout = ips_cmd_timeout;
2342 scb->cdb[0] = IPS_CMD_RW_BIOSFW;
2343
2344 scb->cmd.flashfw.op_code = IPS_CMD_RW_BIOSFW;
2345 scb->cmd.flashfw.command_id = IPS_COMMAND_ID(ha, scb);
2346 scb->cmd.flashfw.type = 1;
2347 scb->cmd.flashfw.direction = 0;
2348 scb->cmd.flashfw.count = cpu_to_le32(0x800);
2349 scb->cmd.flashfw.total_packets = 1;
2350 scb->cmd.flashfw.packet_num = 0;
2351 scb->data_len = 0x1000;
2352 scb->cmd.flashfw.buffer_addr = ha->ioctl_busaddr;
2353
2354 /* issue the command */
2355 if (((ret =
2356 ips_send_wait(ha, scb, ips_cmd_timeout,
2357 intr)) == IPS_FAILURE)
2358 || (ret == IPS_SUCCESS_IMM)
2359 || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1)) {
2360 /* Error occurred */
2361
2362 return;
2363 }
2364
2365 if ((buffer[0xC0] == 0x55) && (buffer[0xC1] == 0xAA)) {
2366 major = buffer[0x1ff + 0xC0]; /* Offset 0x1ff after the header (0xc0) */
2367 minor = buffer[0x1fe + 0xC0]; /* Offset 0x1fe after the header (0xc0) */
2368 subminor = buffer[0x1fd + 0xC0]; /* Offset 0x1fd after the header (0xc0) */
2369 } else {
2370 return;
2371 }
2372 }
2373
2374 ha->bios_version[0] = hex_asc_upper_hi(major);
2375 ha->bios_version[1] = '.';
2376 ha->bios_version[2] = hex_asc_upper_lo(major);
2377 ha->bios_version[3] = hex_asc_upper_lo(subminor);
2378 ha->bios_version[4] = '.';
2379 ha->bios_version[5] = hex_asc_upper_hi(minor);
2380 ha->bios_version[6] = hex_asc_upper_lo(minor);
2381 ha->bios_version[7] = 0;
2382}
2383
2384/****************************************************************************/
2385/* */
2386/* Routine Name: ips_hainit */
2387/* */
2388/* Routine Description: */
2389/* */
2390/* Initialize the controller */
2391/* */
2392/* NOTE: Assumes to be called from with a lock */
2393/* */
2394/****************************************************************************/
2395static int
2396ips_hainit(ips_ha_t * ha)
2397{
2398 int i;
2399 struct timeval tv;
2400
2401 METHOD_TRACE("ips_hainit", 1);
2402
2403 if (!ha)
2404 return (0);
2405
2406 if (ha->func.statinit)
2407 (*ha->func.statinit) (ha);
2408
2409 if (ha->func.enableint)
2410 (*ha->func.enableint) (ha);
2411
2412 /* Send FFDC */
2413 ha->reset_count = 1;
2414 do_gettimeofday(&tv);
2415 ha->last_ffdc = tv.tv_sec;
2416 ips_ffdc_reset(ha, IPS_INTR_IORL);
2417
2418 if (!ips_read_config(ha, IPS_INTR_IORL)) {
2419 IPS_PRINTK(KERN_WARNING, ha->pcidev,
2420 "unable to read config from controller.\n");
2421
2422 return (0);
2423 }
2424 /* end if */
2425 if (!ips_read_adapter_status(ha, IPS_INTR_IORL)) {
2426 IPS_PRINTK(KERN_WARNING, ha->pcidev,
2427 "unable to read controller status.\n");
2428
2429 return (0);
2430 }
2431
2432 /* Identify this controller */
2433 ips_identify_controller(ha);
2434
2435 if (!ips_read_subsystem_parameters(ha, IPS_INTR_IORL)) {
2436 IPS_PRINTK(KERN_WARNING, ha->pcidev,
2437 "unable to read subsystem parameters.\n");
2438
2439 return (0);
2440 }
2441
2442 /* write nvram user page 5 */
2443 if (!ips_write_driver_status(ha, IPS_INTR_IORL)) {
2444 IPS_PRINTK(KERN_WARNING, ha->pcidev,
2445 "unable to write driver info to controller.\n");
2446
2447 return (0);
2448 }
2449
2450 /* If there are Logical Drives and a Reset Occurred, then an EraseStripeLock is Needed */
2451 if ((ha->conf->ucLogDriveCount > 0) && (ha->requires_esl == 1))
2452 ips_clear_adapter(ha, IPS_INTR_IORL);
2453
2454 /* set limits on SID, LUN, BUS */
2455 ha->ntargets = IPS_MAX_TARGETS + 1;
2456 ha->nlun = 1;
2457 ha->nbus = (ha->enq->ucMaxPhysicalDevices / IPS_MAX_TARGETS) + 1;
2458
2459 switch (ha->conf->logical_drive[0].ucStripeSize) {
2460 case 4:
2461 ha->max_xfer = 0x10000;
2462 break;
2463
2464 case 5:
2465 ha->max_xfer = 0x20000;
2466 break;
2467
2468 case 6:
2469 ha->max_xfer = 0x40000;
2470 break;
2471
2472 case 7:
2473 default:
2474 ha->max_xfer = 0x80000;
2475 break;
2476 }
2477
2478 /* setup max concurrent commands */
2479 if (le32_to_cpu(ha->subsys->param[4]) & 0x1) {
2480 /* Use the new method */
2481 ha->max_cmds = ha->enq->ucConcurrentCmdCount;
2482 } else {
2483 /* use the old method */
2484 switch (ha->conf->logical_drive[0].ucStripeSize) {
2485 case 4:
2486 ha->max_cmds = 32;
2487 break;
2488
2489 case 5:
2490 ha->max_cmds = 16;
2491 break;
2492
2493 case 6:
2494 ha->max_cmds = 8;
2495 break;
2496
2497 case 7:
2498 default:
2499 ha->max_cmds = 4;
2500 break;
2501 }
2502 }
2503
2504 /* Limit the Active Commands on a Lite Adapter */
2505 if ((ha->ad_type == IPS_ADTYPE_SERVERAID3L) ||
2506 (ha->ad_type == IPS_ADTYPE_SERVERAID4L) ||
2507 (ha->ad_type == IPS_ADTYPE_SERVERAID4LX)) {
2508 if ((ha->max_cmds > MaxLiteCmds) && (MaxLiteCmds))
2509 ha->max_cmds = MaxLiteCmds;
2510 }
2511
2512 /* set controller IDs */
2513 ha->ha_id[0] = IPS_ADAPTER_ID;
2514 for (i = 1; i < ha->nbus; i++) {
2515 ha->ha_id[i] = ha->conf->init_id[i - 1] & 0x1f;
2516 ha->dcdb_active[i - 1] = 0;
2517 }
2518
2519 return (1);
2520}
2521
2522/****************************************************************************/
2523/* */
2524/* Routine Name: ips_next */
2525/* */
2526/* Routine Description: */
2527/* */
2528/* Take the next command off the queue and send it to the controller */
2529/* */
2530/****************************************************************************/
2531static void
2532ips_next(ips_ha_t * ha, int intr)
2533{
2534 ips_scb_t *scb;
2535 struct scsi_cmnd *SC;
2536 struct scsi_cmnd *p;
2537 struct scsi_cmnd *q;
2538 ips_copp_wait_item_t *item;
2539 int ret;
2540 struct Scsi_Host *host;
2541 METHOD_TRACE("ips_next", 1);
2542
2543 if (!ha)
2544 return;
2545 host = ips_sh[ha->host_num];
2546 /*
2547 * Block access to the queue function so
2548 * this command won't time out
2549 */
2550 if (intr == IPS_INTR_ON)
2551 spin_lock(host->host_lock);
2552
2553 if ((ha->subsys->param[3] & 0x300000)
2554 && (ha->scb_activelist.count == 0)) {
2555 struct timeval tv;
2556
2557 do_gettimeofday(&tv);
2558
2559 if (tv.tv_sec - ha->last_ffdc > IPS_SECS_8HOURS) {
2560 ha->last_ffdc = tv.tv_sec;
2561 ips_ffdc_time(ha);
2562 }
2563 }
2564
2565 /*
2566 * Send passthru commands
2567 * These have priority over normal I/O
2568 * but shouldn't affect performance too much
2569 * since we limit the number that can be active
2570 * on the card at any one time
2571 */
2572 while ((ha->num_ioctl < IPS_MAX_IOCTL) &&
2573 (ha->copp_waitlist.head) && (scb = ips_getscb(ha))) {
2574
2575 item = ips_removeq_copp_head(&ha->copp_waitlist);
2576 ha->num_ioctl++;
2577 if (intr == IPS_INTR_ON)
2578 spin_unlock(host->host_lock);
2579 scb->scsi_cmd = item->scsi_cmd;
2580 kfree(item);
2581
2582 ret = ips_make_passthru(ha, scb->scsi_cmd, scb, intr);
2583
2584 if (intr == IPS_INTR_ON)
2585 spin_lock(host->host_lock);
2586 switch (ret) {
2587 case IPS_FAILURE:
2588 if (scb->scsi_cmd) {
2589 scb->scsi_cmd->result = DID_ERROR << 16;
2590 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
2591 }
2592
2593 ips_freescb(ha, scb);
2594 break;
2595 case IPS_SUCCESS_IMM:
2596 if (scb->scsi_cmd) {
2597 scb->scsi_cmd->result = DID_OK << 16;
2598 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
2599 }
2600
2601 ips_freescb(ha, scb);
2602 break;
2603 default:
2604 break;
2605 } /* end case */
2606
2607 if (ret != IPS_SUCCESS) {
2608 ha->num_ioctl--;
2609 continue;
2610 }
2611
2612 ret = ips_send_cmd(ha, scb);
2613
2614 if (ret == IPS_SUCCESS)
2615 ips_putq_scb_head(&ha->scb_activelist, scb);
2616 else
2617 ha->num_ioctl--;
2618
2619 switch (ret) {
2620 case IPS_FAILURE:
2621 if (scb->scsi_cmd) {
2622 scb->scsi_cmd->result = DID_ERROR << 16;
2623 }
2624
2625 ips_freescb(ha, scb);
2626 break;
2627 case IPS_SUCCESS_IMM:
2628 ips_freescb(ha, scb);
2629 break;
2630 default:
2631 break;
2632 } /* end case */
2633
2634 }
2635
2636 /*
2637 * Send "Normal" I/O commands
2638 */
2639
2640 p = ha->scb_waitlist.head;
2641 while ((p) && (scb = ips_getscb(ha))) {
2642 if ((scmd_channel(p) > 0)
2643 && (ha->
2644 dcdb_active[scmd_channel(p) -
2645 1] & (1 << scmd_id(p)))) {
2646 ips_freescb(ha, scb);
2647 p = (struct scsi_cmnd *) p->host_scribble;
2648 continue;
2649 }
2650
2651 q = p;
2652 SC = ips_removeq_wait(&ha->scb_waitlist, q);
2653
2654 if (intr == IPS_INTR_ON)
2655 spin_unlock(host->host_lock); /* Unlock HA after command is taken off queue */
2656
2657 SC->result = DID_OK;
2658 SC->host_scribble = NULL;
2659
2660 scb->target_id = SC->device->id;
2661 scb->lun = SC->device->lun;
2662 scb->bus = SC->device->channel;
2663 scb->scsi_cmd = SC;
2664 scb->breakup = 0;
2665 scb->data_len = 0;
2666 scb->callback = ipsintr_done;
2667 scb->timeout = ips_cmd_timeout;
2668 memset(&scb->cmd, 0, 16);
2669
2670 /* copy in the CDB */
2671 memcpy(scb->cdb, SC->cmnd, SC->cmd_len);
2672
2673 scb->sg_count = scsi_dma_map(SC);
2674 BUG_ON(scb->sg_count < 0);
2675 if (scb->sg_count) {
2676 struct scatterlist *sg;
2677 int i;
2678
2679 scb->flags |= IPS_SCB_MAP_SG;
2680
2681 scsi_for_each_sg(SC, sg, scb->sg_count, i) {
2682 if (ips_fill_scb_sg_single
2683 (ha, sg_dma_address(sg), scb, i,
2684 sg_dma_len(sg)) < 0)
2685 break;
2686 }
2687 scb->dcdb.transfer_length = scb->data_len;
2688 } else {
2689 scb->data_busaddr = 0L;
2690 scb->sg_len = 0;
2691 scb->data_len = 0;
2692 scb->dcdb.transfer_length = 0;
2693 }
2694
2695 scb->dcdb.cmd_attribute =
2696 ips_command_direction[scb->scsi_cmd->cmnd[0]];
2697
2698 /* Allow a WRITE BUFFER Command to Have no Data */
2699 /* This is Used by Tape Flash Utilites */
2700 if ((scb->scsi_cmd->cmnd[0] == WRITE_BUFFER) &&
2701 (scb->data_len == 0))
2702 scb->dcdb.cmd_attribute = 0;
2703
2704 if (!(scb->dcdb.cmd_attribute & 0x3))
2705 scb->dcdb.transfer_length = 0;
2706
2707 if (scb->data_len >= IPS_MAX_XFER) {
2708 scb->dcdb.cmd_attribute |= IPS_TRANSFER64K;
2709 scb->dcdb.transfer_length = 0;
2710 }
2711 if (intr == IPS_INTR_ON)
2712 spin_lock(host->host_lock);
2713
2714 ret = ips_send_cmd(ha, scb);
2715
2716 switch (ret) {
2717 case IPS_SUCCESS:
2718 ips_putq_scb_head(&ha->scb_activelist, scb);
2719 break;
2720 case IPS_FAILURE:
2721 if (scb->scsi_cmd) {
2722 scb->scsi_cmd->result = DID_ERROR << 16;
2723 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
2724 }
2725
2726 if (scb->bus)
2727 ha->dcdb_active[scb->bus - 1] &=
2728 ~(1 << scb->target_id);
2729
2730 ips_freescb(ha, scb);
2731 break;
2732 case IPS_SUCCESS_IMM:
2733 if (scb->scsi_cmd)
2734 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
2735
2736 if (scb->bus)
2737 ha->dcdb_active[scb->bus - 1] &=
2738 ~(1 << scb->target_id);
2739
2740 ips_freescb(ha, scb);
2741 break;
2742 default:
2743 break;
2744 } /* end case */
2745
2746 p = (struct scsi_cmnd *) p->host_scribble;
2747
2748 } /* end while */
2749
2750 if (intr == IPS_INTR_ON)
2751 spin_unlock(host->host_lock);
2752}
2753
2754/****************************************************************************/
2755/* */
2756/* Routine Name: ips_putq_scb_head */
2757/* */
2758/* Routine Description: */
2759/* */
2760/* Add an item to the head of the queue */
2761/* */
2762/* ASSUMED to be called from within the HA lock */
2763/* */
2764/****************************************************************************/
2765static void
2766ips_putq_scb_head(ips_scb_queue_t * queue, ips_scb_t * item)
2767{
2768 METHOD_TRACE("ips_putq_scb_head", 1);
2769
2770 if (!item)
2771 return;
2772
2773 item->q_next = queue->head;
2774 queue->head = item;
2775
2776 if (!queue->tail)
2777 queue->tail = item;
2778
2779 queue->count++;
2780}
2781
2782/****************************************************************************/
2783/* */
2784/* Routine Name: ips_removeq_scb_head */
2785/* */
2786/* Routine Description: */
2787/* */
2788/* Remove the head of the queue */
2789/* */
2790/* ASSUMED to be called from within the HA lock */
2791/* */
2792/****************************************************************************/
2793static ips_scb_t *
2794ips_removeq_scb_head(ips_scb_queue_t * queue)
2795{
2796 ips_scb_t *item;
2797
2798 METHOD_TRACE("ips_removeq_scb_head", 1);
2799
2800 item = queue->head;
2801
2802 if (!item) {
2803 return (NULL);
2804 }
2805
2806 queue->head = item->q_next;
2807 item->q_next = NULL;
2808
2809 if (queue->tail == item)
2810 queue->tail = NULL;
2811
2812 queue->count--;
2813
2814 return (item);
2815}
2816
2817/****************************************************************************/
2818/* */
2819/* Routine Name: ips_removeq_scb */
2820/* */
2821/* Routine Description: */
2822/* */
2823/* Remove an item from a queue */
2824/* */
2825/* ASSUMED to be called from within the HA lock */
2826/* */
2827/****************************************************************************/
2828static ips_scb_t *
2829ips_removeq_scb(ips_scb_queue_t * queue, ips_scb_t * item)
2830{
2831 ips_scb_t *p;
2832
2833 METHOD_TRACE("ips_removeq_scb", 1);
2834
2835 if (!item)
2836 return (NULL);
2837
2838 if (item == queue->head) {
2839 return (ips_removeq_scb_head(queue));
2840 }
2841
2842 p = queue->head;
2843
2844 while ((p) && (item != p->q_next))
2845 p = p->q_next;
2846
2847 if (p) {
2848 /* found a match */
2849 p->q_next = item->q_next;
2850
2851 if (!item->q_next)
2852 queue->tail = p;
2853
2854 item->q_next = NULL;
2855 queue->count--;
2856
2857 return (item);
2858 }
2859
2860 return (NULL);
2861}
2862
2863/****************************************************************************/
2864/* */
2865/* Routine Name: ips_putq_wait_tail */
2866/* */
2867/* Routine Description: */
2868/* */
2869/* Add an item to the tail of the queue */
2870/* */
2871/* ASSUMED to be called from within the HA lock */
2872/* */
2873/****************************************************************************/
2874static void ips_putq_wait_tail(ips_wait_queue_t *queue, struct scsi_cmnd *item)
2875{
2876 METHOD_TRACE("ips_putq_wait_tail", 1);
2877
2878 if (!item)
2879 return;
2880
2881 item->host_scribble = NULL;
2882
2883 if (queue->tail)
2884 queue->tail->host_scribble = (char *) item;
2885
2886 queue->tail = item;
2887
2888 if (!queue->head)
2889 queue->head = item;
2890
2891 queue->count++;
2892}
2893
2894/****************************************************************************/
2895/* */
2896/* Routine Name: ips_removeq_wait_head */
2897/* */
2898/* Routine Description: */
2899/* */
2900/* Remove the head of the queue */
2901/* */
2902/* ASSUMED to be called from within the HA lock */
2903/* */
2904/****************************************************************************/
2905static struct scsi_cmnd *ips_removeq_wait_head(ips_wait_queue_t *queue)
2906{
2907 struct scsi_cmnd *item;
2908
2909 METHOD_TRACE("ips_removeq_wait_head", 1);
2910
2911 item = queue->head;
2912
2913 if (!item) {
2914 return (NULL);
2915 }
2916
2917 queue->head = (struct scsi_cmnd *) item->host_scribble;
2918 item->host_scribble = NULL;
2919
2920 if (queue->tail == item)
2921 queue->tail = NULL;
2922
2923 queue->count--;
2924
2925 return (item);
2926}
2927
2928/****************************************************************************/
2929/* */
2930/* Routine Name: ips_removeq_wait */
2931/* */
2932/* Routine Description: */
2933/* */
2934/* Remove an item from a queue */
2935/* */
2936/* ASSUMED to be called from within the HA lock */
2937/* */
2938/****************************************************************************/
2939static struct scsi_cmnd *ips_removeq_wait(ips_wait_queue_t *queue,
2940 struct scsi_cmnd *item)
2941{
2942 struct scsi_cmnd *p;
2943
2944 METHOD_TRACE("ips_removeq_wait", 1);
2945
2946 if (!item)
2947 return (NULL);
2948
2949 if (item == queue->head) {
2950 return (ips_removeq_wait_head(queue));
2951 }
2952
2953 p = queue->head;
2954
2955 while ((p) && (item != (struct scsi_cmnd *) p->host_scribble))
2956 p = (struct scsi_cmnd *) p->host_scribble;
2957
2958 if (p) {
2959 /* found a match */
2960 p->host_scribble = item->host_scribble;
2961
2962 if (!item->host_scribble)
2963 queue->tail = p;
2964
2965 item->host_scribble = NULL;
2966 queue->count--;
2967
2968 return (item);
2969 }
2970
2971 return (NULL);
2972}
2973
2974/****************************************************************************/
2975/* */
2976/* Routine Name: ips_putq_copp_tail */
2977/* */
2978/* Routine Description: */
2979/* */
2980/* Add an item to the tail of the queue */
2981/* */
2982/* ASSUMED to be called from within the HA lock */
2983/* */
2984/****************************************************************************/
2985static void
2986ips_putq_copp_tail(ips_copp_queue_t * queue, ips_copp_wait_item_t * item)
2987{
2988 METHOD_TRACE("ips_putq_copp_tail", 1);
2989
2990 if (!item)
2991 return;
2992
2993 item->next = NULL;
2994
2995 if (queue->tail)
2996 queue->tail->next = item;
2997
2998 queue->tail = item;
2999
3000 if (!queue->head)
3001 queue->head = item;
3002
3003 queue->count++;
3004}
3005
3006/****************************************************************************/
3007/* */
3008/* Routine Name: ips_removeq_copp_head */
3009/* */
3010/* Routine Description: */
3011/* */
3012/* Remove the head of the queue */
3013/* */
3014/* ASSUMED to be called from within the HA lock */
3015/* */
3016/****************************************************************************/
3017static ips_copp_wait_item_t *
3018ips_removeq_copp_head(ips_copp_queue_t * queue)
3019{
3020 ips_copp_wait_item_t *item;
3021
3022 METHOD_TRACE("ips_removeq_copp_head", 1);
3023
3024 item = queue->head;
3025
3026 if (!item) {
3027 return (NULL);
3028 }
3029
3030 queue->head = item->next;
3031 item->next = NULL;
3032
3033 if (queue->tail == item)
3034 queue->tail = NULL;
3035
3036 queue->count--;
3037
3038 return (item);
3039}
3040
3041/****************************************************************************/
3042/* */
3043/* Routine Name: ips_removeq_copp */
3044/* */
3045/* Routine Description: */
3046/* */
3047/* Remove an item from a queue */
3048/* */
3049/* ASSUMED to be called from within the HA lock */
3050/* */
3051/****************************************************************************/
3052static ips_copp_wait_item_t *
3053ips_removeq_copp(ips_copp_queue_t * queue, ips_copp_wait_item_t * item)
3054{
3055 ips_copp_wait_item_t *p;
3056
3057 METHOD_TRACE("ips_removeq_copp", 1);
3058
3059 if (!item)
3060 return (NULL);
3061
3062 if (item == queue->head) {
3063 return (ips_removeq_copp_head(queue));
3064 }
3065
3066 p = queue->head;
3067
3068 while ((p) && (item != p->next))
3069 p = p->next;
3070
3071 if (p) {
3072 /* found a match */
3073 p->next = item->next;
3074
3075 if (!item->next)
3076 queue->tail = p;
3077
3078 item->next = NULL;
3079 queue->count--;
3080
3081 return (item);
3082 }
3083
3084 return (NULL);
3085}
3086
3087/****************************************************************************/
3088/* */
3089/* Routine Name: ipsintr_blocking */
3090/* */
3091/* Routine Description: */
3092/* */
3093/* Finalize an interrupt for internal commands */
3094/* */
3095/****************************************************************************/
3096static void
3097ipsintr_blocking(ips_ha_t * ha, ips_scb_t * scb)
3098{
3099 METHOD_TRACE("ipsintr_blocking", 2);
3100
3101 ips_freescb(ha, scb);
3102 if ((ha->waitflag == TRUE) && (ha->cmd_in_progress == scb->cdb[0])) {
3103 ha->waitflag = FALSE;
3104
3105 return;
3106 }
3107}
3108
3109/****************************************************************************/
3110/* */
3111/* Routine Name: ipsintr_done */
3112/* */
3113/* Routine Description: */
3114/* */
3115/* Finalize an interrupt for non-internal commands */
3116/* */
3117/****************************************************************************/
3118static void
3119ipsintr_done(ips_ha_t * ha, ips_scb_t * scb)
3120{
3121 METHOD_TRACE("ipsintr_done", 2);
3122
3123 if (!scb) {
3124 IPS_PRINTK(KERN_WARNING, ha->pcidev,
3125 "Spurious interrupt; scb NULL.\n");
3126
3127 return;
3128 }
3129
3130 if (scb->scsi_cmd == NULL) {
3131 /* unexpected interrupt */
3132 IPS_PRINTK(KERN_WARNING, ha->pcidev,
3133 "Spurious interrupt; scsi_cmd not set.\n");
3134
3135 return;
3136 }
3137
3138 ips_done(ha, scb);
3139}
3140
3141/****************************************************************************/
3142/* */
3143/* Routine Name: ips_done */
3144/* */
3145/* Routine Description: */
3146/* */
3147/* Do housekeeping on completed commands */
3148/* ASSUMED to be called form within the request lock */
3149/****************************************************************************/
3150static void
3151ips_done(ips_ha_t * ha, ips_scb_t * scb)
3152{
3153 int ret;
3154
3155 METHOD_TRACE("ips_done", 1);
3156
3157 if (!scb)
3158 return;
3159
3160 if ((scb->scsi_cmd) && (ips_is_passthru(scb->scsi_cmd))) {
3161 ips_cleanup_passthru(ha, scb);
3162 ha->num_ioctl--;
3163 } else {
3164 /*
3165 * Check to see if this command had too much
3166 * data and had to be broke up. If so, queue
3167 * the rest of the data and continue.
3168 */
3169 if ((scb->breakup) || (scb->sg_break)) {
3170 struct scatterlist *sg;
3171 int i, sg_dma_index, ips_sg_index = 0;
3172
3173 /* we had a data breakup */
3174 scb->data_len = 0;
3175
3176 sg = scsi_sglist(scb->scsi_cmd);
3177
3178 /* Spin forward to last dma chunk */
3179 sg_dma_index = scb->breakup;
3180 for (i = 0; i < scb->breakup; i++)
3181 sg = sg_next(sg);
3182
3183 /* Take care of possible partial on last chunk */
3184 ips_fill_scb_sg_single(ha,
3185 sg_dma_address(sg),
3186 scb, ips_sg_index++,
3187 sg_dma_len(sg));
3188
3189 for (; sg_dma_index < scsi_sg_count(scb->scsi_cmd);
3190 sg_dma_index++, sg = sg_next(sg)) {
3191 if (ips_fill_scb_sg_single
3192 (ha,
3193 sg_dma_address(sg),
3194 scb, ips_sg_index++,
3195 sg_dma_len(sg)) < 0)
3196 break;
3197 }
3198
3199 scb->dcdb.transfer_length = scb->data_len;
3200 scb->dcdb.cmd_attribute |=
3201 ips_command_direction[scb->scsi_cmd->cmnd[0]];
3202
3203 if (!(scb->dcdb.cmd_attribute & 0x3))
3204 scb->dcdb.transfer_length = 0;
3205
3206 if (scb->data_len >= IPS_MAX_XFER) {
3207 scb->dcdb.cmd_attribute |= IPS_TRANSFER64K;
3208 scb->dcdb.transfer_length = 0;
3209 }
3210
3211 ret = ips_send_cmd(ha, scb);
3212
3213 switch (ret) {
3214 case IPS_FAILURE:
3215 if (scb->scsi_cmd) {
3216 scb->scsi_cmd->result = DID_ERROR << 16;
3217 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
3218 }
3219
3220 ips_freescb(ha, scb);
3221 break;
3222 case IPS_SUCCESS_IMM:
3223 if (scb->scsi_cmd) {
3224 scb->scsi_cmd->result = DID_ERROR << 16;
3225 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
3226 }
3227
3228 ips_freescb(ha, scb);
3229 break;
3230 default:
3231 break;
3232 } /* end case */
3233
3234 return;
3235 }
3236 } /* end if passthru */
3237
3238 if (scb->bus) {
3239 ha->dcdb_active[scb->bus - 1] &= ~(1 << scb->target_id);
3240 }
3241
3242 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
3243
3244 ips_freescb(ha, scb);
3245}
3246
3247/****************************************************************************/
3248/* */
3249/* Routine Name: ips_map_status */
3250/* */
3251/* Routine Description: */
3252/* */
3253/* Map Controller Error codes to Linux Error Codes */
3254/* */
3255/****************************************************************************/
3256static int
3257ips_map_status(ips_ha_t * ha, ips_scb_t * scb, ips_stat_t * sp)
3258{
3259 int errcode;
3260 int device_error;
3261 uint32_t transfer_len;
3262 IPS_DCDB_TABLE_TAPE *tapeDCDB;
3263 IPS_SCSI_INQ_DATA inquiryData;
3264
3265 METHOD_TRACE("ips_map_status", 1);
3266
3267 if (scb->bus) {
3268 DEBUG_VAR(2,
3269 "(%s%d) Physical device error (%d %d %d): %x %x, Sense Key: %x, ASC: %x, ASCQ: %x",
3270 ips_name, ha->host_num,
3271 scb->scsi_cmd->device->channel,
3272 scb->scsi_cmd->device->id, scb->scsi_cmd->device->lun,
3273 scb->basic_status, scb->extended_status,
3274 scb->extended_status ==
3275 IPS_ERR_CKCOND ? scb->dcdb.sense_info[2] & 0xf : 0,
3276 scb->extended_status ==
3277 IPS_ERR_CKCOND ? scb->dcdb.sense_info[12] : 0,
3278 scb->extended_status ==
3279 IPS_ERR_CKCOND ? scb->dcdb.sense_info[13] : 0);
3280 }
3281
3282 /* default driver error */
3283 errcode = DID_ERROR;
3284 device_error = 0;
3285
3286 switch (scb->basic_status & IPS_GSC_STATUS_MASK) {
3287 case IPS_CMD_TIMEOUT:
3288 errcode = DID_TIME_OUT;
3289 break;
3290
3291 case IPS_INVAL_OPCO:
3292 case IPS_INVAL_CMD_BLK:
3293 case IPS_INVAL_PARM_BLK:
3294 case IPS_LD_ERROR:
3295 case IPS_CMD_CMPLT_WERROR:
3296 break;
3297
3298 case IPS_PHYS_DRV_ERROR:
3299 switch (scb->extended_status) {
3300 case IPS_ERR_SEL_TO:
3301 if (scb->bus)
3302 errcode = DID_NO_CONNECT;
3303
3304 break;
3305
3306 case IPS_ERR_OU_RUN:
3307 if ((scb->cmd.dcdb.op_code == IPS_CMD_EXTENDED_DCDB) ||
3308 (scb->cmd.dcdb.op_code ==
3309 IPS_CMD_EXTENDED_DCDB_SG)) {
3310 tapeDCDB = (IPS_DCDB_TABLE_TAPE *) & scb->dcdb;
3311 transfer_len = tapeDCDB->transfer_length;
3312 } else {
3313 transfer_len =
3314 (uint32_t) scb->dcdb.transfer_length;
3315 }
3316
3317 if ((scb->bus) && (transfer_len < scb->data_len)) {
3318 /* Underrun - set default to no error */
3319 errcode = DID_OK;
3320
3321 /* Restrict access to physical DASD */
3322 if (scb->scsi_cmd->cmnd[0] == INQUIRY) {
3323 ips_scmd_buf_read(scb->scsi_cmd,
3324 &inquiryData, sizeof (inquiryData));
3325 if ((inquiryData.DeviceType & 0x1f) == TYPE_DISK) {
3326 errcode = DID_TIME_OUT;
3327 break;
3328 }
3329 }
3330 } else
3331 errcode = DID_ERROR;
3332
3333 break;
3334
3335 case IPS_ERR_RECOVERY:
3336 /* don't fail recovered errors */
3337 if (scb->bus)
3338 errcode = DID_OK;
3339
3340 break;
3341
3342 case IPS_ERR_HOST_RESET:
3343 case IPS_ERR_DEV_RESET:
3344 errcode = DID_RESET;
3345 break;
3346
3347 case IPS_ERR_CKCOND:
3348 if (scb->bus) {
3349 if ((scb->cmd.dcdb.op_code ==
3350 IPS_CMD_EXTENDED_DCDB)
3351 || (scb->cmd.dcdb.op_code ==
3352 IPS_CMD_EXTENDED_DCDB_SG)) {
3353 tapeDCDB =
3354 (IPS_DCDB_TABLE_TAPE *) & scb->dcdb;
3355 memcpy(scb->scsi_cmd->sense_buffer,
3356 tapeDCDB->sense_info,
3357 SCSI_SENSE_BUFFERSIZE);
3358 } else {
3359 memcpy(scb->scsi_cmd->sense_buffer,
3360 scb->dcdb.sense_info,
3361 SCSI_SENSE_BUFFERSIZE);
3362 }
3363 device_error = 2; /* check condition */
3364 }
3365
3366 errcode = DID_OK;
3367
3368 break;
3369
3370 default:
3371 errcode = DID_ERROR;
3372 break;
3373
3374 } /* end switch */
3375 } /* end switch */
3376
3377 scb->scsi_cmd->result = device_error | (errcode << 16);
3378
3379 return (1);
3380}
3381
3382/****************************************************************************/
3383/* */
3384/* Routine Name: ips_send_wait */
3385/* */
3386/* Routine Description: */
3387/* */
3388/* Send a command to the controller and wait for it to return */
3389/* */
3390/* The FFDC Time Stamp use this function for the callback, but doesn't */
3391/* actually need to wait. */
3392/****************************************************************************/
3393static int
3394ips_send_wait(ips_ha_t * ha, ips_scb_t * scb, int timeout, int intr)
3395{
3396 int ret;
3397
3398 METHOD_TRACE("ips_send_wait", 1);
3399
3400 if (intr != IPS_FFDC) { /* Won't be Waiting if this is a Time Stamp */
3401 ha->waitflag = TRUE;
3402 ha->cmd_in_progress = scb->cdb[0];
3403 }
3404 scb->callback = ipsintr_blocking;
3405 ret = ips_send_cmd(ha, scb);
3406
3407 if ((ret == IPS_FAILURE) || (ret == IPS_SUCCESS_IMM))
3408 return (ret);
3409
3410 if (intr != IPS_FFDC) /* Don't Wait around if this is a Time Stamp */
3411 ret = ips_wait(ha, timeout, intr);
3412
3413 return (ret);
3414}
3415
3416/****************************************************************************/
3417/* */
3418/* Routine Name: ips_scmd_buf_write */
3419/* */
3420/* Routine Description: */
3421/* Write data to struct scsi_cmnd request_buffer at proper offsets */
3422/****************************************************************************/
3423static void
3424ips_scmd_buf_write(struct scsi_cmnd *scmd, void *data, unsigned int count)
3425{
3426 unsigned long flags;
3427
3428 local_irq_save(flags);
3429 scsi_sg_copy_from_buffer(scmd, data, count);
3430 local_irq_restore(flags);
3431}
3432
3433/****************************************************************************/
3434/* */
3435/* Routine Name: ips_scmd_buf_read */
3436/* */
3437/* Routine Description: */
3438/* Copy data from a struct scsi_cmnd to a new, linear buffer */
3439/****************************************************************************/
3440static void
3441ips_scmd_buf_read(struct scsi_cmnd *scmd, void *data, unsigned int count)
3442{
3443 unsigned long flags;
3444
3445 local_irq_save(flags);
3446 scsi_sg_copy_to_buffer(scmd, data, count);
3447 local_irq_restore(flags);
3448}
3449
3450/****************************************************************************/
3451/* */
3452/* Routine Name: ips_send_cmd */
3453/* */
3454/* Routine Description: */
3455/* */
3456/* Map SCSI commands to ServeRAID commands for logical drives */
3457/* */
3458/****************************************************************************/
3459static int
3460ips_send_cmd(ips_ha_t * ha, ips_scb_t * scb)
3461{
3462 int ret;
3463 char *sp;
3464 int device_error;
3465 IPS_DCDB_TABLE_TAPE *tapeDCDB;
3466 int TimeOut;
3467
3468 METHOD_TRACE("ips_send_cmd", 1);
3469
3470 ret = IPS_SUCCESS;
3471
3472 if (!scb->scsi_cmd) {
3473 /* internal command */
3474
3475 if (scb->bus > 0) {
3476 /* Controller commands can't be issued */
3477 /* to real devices -- fail them */
3478 if ((ha->waitflag == TRUE) &&
3479 (ha->cmd_in_progress == scb->cdb[0])) {
3480 ha->waitflag = FALSE;
3481 }
3482
3483 return (1);
3484 }
3485 } else if ((scb->bus == 0) && (!ips_is_passthru(scb->scsi_cmd))) {
3486 /* command to logical bus -- interpret */
3487 ret = IPS_SUCCESS_IMM;
3488
3489 switch (scb->scsi_cmd->cmnd[0]) {
3490 case ALLOW_MEDIUM_REMOVAL:
3491 case REZERO_UNIT:
3492 case ERASE:
3493 case WRITE_FILEMARKS:
3494 case SPACE:
3495 scb->scsi_cmd->result = DID_ERROR << 16;
3496 break;
3497
3498 case START_STOP:
3499 scb->scsi_cmd->result = DID_OK << 16;
3500
3501 case TEST_UNIT_READY:
3502 case INQUIRY:
3503 if (scb->target_id == IPS_ADAPTER_ID) {
3504 /*
3505 * Either we have a TUR
3506 * or we have a SCSI inquiry
3507 */
3508 if (scb->scsi_cmd->cmnd[0] == TEST_UNIT_READY)
3509 scb->scsi_cmd->result = DID_OK << 16;
3510
3511 if (scb->scsi_cmd->cmnd[0] == INQUIRY) {
3512 IPS_SCSI_INQ_DATA inquiry;
3513
3514 memset(&inquiry, 0,
3515 sizeof (IPS_SCSI_INQ_DATA));
3516
3517 inquiry.DeviceType =
3518 IPS_SCSI_INQ_TYPE_PROCESSOR;
3519 inquiry.DeviceTypeQualifier =
3520 IPS_SCSI_INQ_LU_CONNECTED;
3521 inquiry.Version = IPS_SCSI_INQ_REV2;
3522 inquiry.ResponseDataFormat =
3523 IPS_SCSI_INQ_RD_REV2;
3524 inquiry.AdditionalLength = 31;
3525 inquiry.Flags[0] =
3526 IPS_SCSI_INQ_Address16;
3527 inquiry.Flags[1] =
3528 IPS_SCSI_INQ_WBus16 |
3529 IPS_SCSI_INQ_Sync;
3530 strncpy(inquiry.VendorId, "IBM ",
3531 8);
3532 strncpy(inquiry.ProductId,
3533 "SERVERAID ", 16);
3534 strncpy(inquiry.ProductRevisionLevel,
3535 "1.00", 4);
3536
3537 ips_scmd_buf_write(scb->scsi_cmd,
3538 &inquiry,
3539 sizeof (inquiry));
3540
3541 scb->scsi_cmd->result = DID_OK << 16;
3542 }
3543 } else {
3544 scb->cmd.logical_info.op_code = IPS_CMD_GET_LD_INFO;
3545 scb->cmd.logical_info.command_id = IPS_COMMAND_ID(ha, scb);
3546 scb->cmd.logical_info.reserved = 0;
3547 scb->cmd.logical_info.reserved2 = 0;
3548 scb->data_len = sizeof (IPS_LD_INFO);
3549 scb->data_busaddr = ha->logical_drive_info_dma_addr;
3550 scb->flags = 0;
3551 scb->cmd.logical_info.buffer_addr = scb->data_busaddr;
3552 ret = IPS_SUCCESS;
3553 }
3554
3555 break;
3556
3557 case REQUEST_SENSE:
3558 ips_reqsen(ha, scb);
3559 scb->scsi_cmd->result = DID_OK << 16;
3560 break;
3561
3562 case READ_6:
3563 case WRITE_6:
3564 if (!scb->sg_len) {
3565 scb->cmd.basic_io.op_code =
3566 (scb->scsi_cmd->cmnd[0] ==
3567 READ_6) ? IPS_CMD_READ : IPS_CMD_WRITE;
3568 scb->cmd.basic_io.enhanced_sg = 0;
3569 scb->cmd.basic_io.sg_addr =
3570 cpu_to_le32(scb->data_busaddr);
3571 } else {
3572 scb->cmd.basic_io.op_code =
3573 (scb->scsi_cmd->cmnd[0] ==
3574 READ_6) ? IPS_CMD_READ_SG :
3575 IPS_CMD_WRITE_SG;
3576 scb->cmd.basic_io.enhanced_sg =
3577 IPS_USE_ENH_SGLIST(ha) ? 0xFF : 0;
3578 scb->cmd.basic_io.sg_addr =
3579 cpu_to_le32(scb->sg_busaddr);
3580 }
3581
3582 scb->cmd.basic_io.segment_4G = 0;
3583 scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
3584 scb->cmd.basic_io.log_drv = scb->target_id;
3585 scb->cmd.basic_io.sg_count = scb->sg_len;
3586
3587 if (scb->cmd.basic_io.lba)
3588 le32_add_cpu(&scb->cmd.basic_io.lba,
3589 le16_to_cpu(scb->cmd.basic_io.
3590 sector_count));
3591 else
3592 scb->cmd.basic_io.lba =
3593 (((scb->scsi_cmd->
3594 cmnd[1] & 0x1f) << 16) | (scb->scsi_cmd->
3595 cmnd[2] << 8) |
3596 (scb->scsi_cmd->cmnd[3]));
3597
3598 scb->cmd.basic_io.sector_count =
3599 cpu_to_le16(scb->data_len / IPS_BLKSIZE);
3600
3601 if (le16_to_cpu(scb->cmd.basic_io.sector_count) == 0)
3602 scb->cmd.basic_io.sector_count =
3603 cpu_to_le16(256);
3604
3605 ret = IPS_SUCCESS;
3606 break;
3607
3608 case READ_10:
3609 case WRITE_10:
3610 if (!scb->sg_len) {
3611 scb->cmd.basic_io.op_code =
3612 (scb->scsi_cmd->cmnd[0] ==
3613 READ_10) ? IPS_CMD_READ : IPS_CMD_WRITE;
3614 scb->cmd.basic_io.enhanced_sg = 0;
3615 scb->cmd.basic_io.sg_addr =
3616 cpu_to_le32(scb->data_busaddr);
3617 } else {
3618 scb->cmd.basic_io.op_code =
3619 (scb->scsi_cmd->cmnd[0] ==
3620 READ_10) ? IPS_CMD_READ_SG :
3621 IPS_CMD_WRITE_SG;
3622 scb->cmd.basic_io.enhanced_sg =
3623 IPS_USE_ENH_SGLIST(ha) ? 0xFF : 0;
3624 scb->cmd.basic_io.sg_addr =
3625 cpu_to_le32(scb->sg_busaddr);
3626 }
3627
3628 scb->cmd.basic_io.segment_4G = 0;
3629 scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
3630 scb->cmd.basic_io.log_drv = scb->target_id;
3631 scb->cmd.basic_io.sg_count = scb->sg_len;
3632
3633 if (scb->cmd.basic_io.lba)
3634 le32_add_cpu(&scb->cmd.basic_io.lba,
3635 le16_to_cpu(scb->cmd.basic_io.
3636 sector_count));
3637 else
3638 scb->cmd.basic_io.lba =
3639 ((scb->scsi_cmd->cmnd[2] << 24) | (scb->
3640 scsi_cmd->
3641 cmnd[3]
3642 << 16) |
3643 (scb->scsi_cmd->cmnd[4] << 8) | scb->
3644 scsi_cmd->cmnd[5]);
3645
3646 scb->cmd.basic_io.sector_count =
3647 cpu_to_le16(scb->data_len / IPS_BLKSIZE);
3648
3649 if (cpu_to_le16(scb->cmd.basic_io.sector_count) == 0) {
3650 /*
3651 * This is a null condition
3652 * we don't have to do anything
3653 * so just return
3654 */
3655 scb->scsi_cmd->result = DID_OK << 16;
3656 } else
3657 ret = IPS_SUCCESS;
3658
3659 break;
3660
3661 case RESERVE:
3662 case RELEASE:
3663 scb->scsi_cmd->result = DID_OK << 16;
3664 break;
3665
3666 case MODE_SENSE:
3667 scb->cmd.basic_io.op_code = IPS_CMD_ENQUIRY;
3668 scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
3669 scb->cmd.basic_io.segment_4G = 0;
3670 scb->cmd.basic_io.enhanced_sg = 0;
3671 scb->data_len = sizeof (*ha->enq);
3672 scb->cmd.basic_io.sg_addr = ha->enq_busaddr;
3673 ret = IPS_SUCCESS;
3674 break;
3675
3676 case READ_CAPACITY:
3677 scb->cmd.logical_info.op_code = IPS_CMD_GET_LD_INFO;
3678 scb->cmd.logical_info.command_id = IPS_COMMAND_ID(ha, scb);
3679 scb->cmd.logical_info.reserved = 0;
3680 scb->cmd.logical_info.reserved2 = 0;
3681 scb->cmd.logical_info.reserved3 = 0;
3682 scb->data_len = sizeof (IPS_LD_INFO);
3683 scb->data_busaddr = ha->logical_drive_info_dma_addr;
3684 scb->flags = 0;
3685 scb->cmd.logical_info.buffer_addr = scb->data_busaddr;
3686 ret = IPS_SUCCESS;
3687 break;
3688
3689 case SEND_DIAGNOSTIC:
3690 case REASSIGN_BLOCKS:
3691 case FORMAT_UNIT:
3692 case SEEK_10:
3693 case VERIFY:
3694 case READ_DEFECT_DATA:
3695 case READ_BUFFER:
3696 case WRITE_BUFFER:
3697 scb->scsi_cmd->result = DID_OK << 16;
3698 break;
3699
3700 default:
3701 /* Set the Return Info to appear like the Command was */
3702 /* attempted, a Check Condition occurred, and Sense */
3703 /* Data indicating an Invalid CDB OpCode is returned. */
3704 sp = (char *) scb->scsi_cmd->sense_buffer;
3705
3706 sp[0] = 0x70; /* Error Code */
3707 sp[2] = ILLEGAL_REQUEST; /* Sense Key 5 Illegal Req. */
3708 sp[7] = 0x0A; /* Additional Sense Length */
3709 sp[12] = 0x20; /* ASC = Invalid OpCode */
3710 sp[13] = 0x00; /* ASCQ */
3711
3712 device_error = 2; /* Indicate Check Condition */
3713 scb->scsi_cmd->result = device_error | (DID_OK << 16);
3714 break;
3715 } /* end switch */
3716 }
3717 /* end if */
3718 if (ret == IPS_SUCCESS_IMM)
3719 return (ret);
3720
3721 /* setup DCDB */
3722 if (scb->bus > 0) {
3723
3724 /* If we already know the Device is Not there, no need to attempt a Command */
3725 /* This also protects an NT FailOver Controller from getting CDB's sent to it */
3726 if (ha->conf->dev[scb->bus - 1][scb->target_id].ucState == 0) {
3727 scb->scsi_cmd->result = DID_NO_CONNECT << 16;
3728 return (IPS_SUCCESS_IMM);
3729 }
3730
3731 ha->dcdb_active[scb->bus - 1] |= (1 << scb->target_id);
3732 scb->cmd.dcdb.command_id = IPS_COMMAND_ID(ha, scb);
3733 scb->cmd.dcdb.dcdb_address = cpu_to_le32(scb->scb_busaddr +
3734 (unsigned long) &scb->
3735 dcdb -
3736 (unsigned long) scb);
3737 scb->cmd.dcdb.reserved = 0;
3738 scb->cmd.dcdb.reserved2 = 0;
3739 scb->cmd.dcdb.reserved3 = 0;
3740 scb->cmd.dcdb.segment_4G = 0;
3741 scb->cmd.dcdb.enhanced_sg = 0;
3742
3743 TimeOut = scb->scsi_cmd->request->timeout;
3744
3745 if (ha->subsys->param[4] & 0x00100000) { /* If NEW Tape DCDB is Supported */
3746 if (!scb->sg_len) {
3747 scb->cmd.dcdb.op_code = IPS_CMD_EXTENDED_DCDB;
3748 } else {
3749 scb->cmd.dcdb.op_code =
3750 IPS_CMD_EXTENDED_DCDB_SG;
3751 scb->cmd.dcdb.enhanced_sg =
3752 IPS_USE_ENH_SGLIST(ha) ? 0xFF : 0;
3753 }
3754
3755 tapeDCDB = (IPS_DCDB_TABLE_TAPE *) & scb->dcdb; /* Use Same Data Area as Old DCDB Struct */
3756 tapeDCDB->device_address =
3757 ((scb->bus - 1) << 4) | scb->target_id;
3758 tapeDCDB->cmd_attribute |= IPS_DISCONNECT_ALLOWED;
3759 tapeDCDB->cmd_attribute &= ~IPS_TRANSFER64K; /* Always Turn OFF 64K Size Flag */
3760
3761 if (TimeOut) {
3762 if (TimeOut < (10 * HZ))
3763 tapeDCDB->cmd_attribute |= IPS_TIMEOUT10; /* TimeOut is 10 Seconds */
3764 else if (TimeOut < (60 * HZ))
3765 tapeDCDB->cmd_attribute |= IPS_TIMEOUT60; /* TimeOut is 60 Seconds */
3766 else if (TimeOut < (1200 * HZ))
3767 tapeDCDB->cmd_attribute |= IPS_TIMEOUT20M; /* TimeOut is 20 Minutes */
3768 }
3769
3770 tapeDCDB->cdb_length = scb->scsi_cmd->cmd_len;
3771 tapeDCDB->reserved_for_LUN = 0;
3772 tapeDCDB->transfer_length = scb->data_len;
3773 if (scb->cmd.dcdb.op_code == IPS_CMD_EXTENDED_DCDB_SG)
3774 tapeDCDB->buffer_pointer =
3775 cpu_to_le32(scb->sg_busaddr);
3776 else
3777 tapeDCDB->buffer_pointer =
3778 cpu_to_le32(scb->data_busaddr);
3779 tapeDCDB->sg_count = scb->sg_len;
3780 tapeDCDB->sense_length = sizeof (tapeDCDB->sense_info);
3781 tapeDCDB->scsi_status = 0;
3782 tapeDCDB->reserved = 0;
3783 memcpy(tapeDCDB->scsi_cdb, scb->scsi_cmd->cmnd,
3784 scb->scsi_cmd->cmd_len);
3785 } else {
3786 if (!scb->sg_len) {
3787 scb->cmd.dcdb.op_code = IPS_CMD_DCDB;
3788 } else {
3789 scb->cmd.dcdb.op_code = IPS_CMD_DCDB_SG;
3790 scb->cmd.dcdb.enhanced_sg =
3791 IPS_USE_ENH_SGLIST(ha) ? 0xFF : 0;
3792 }
3793
3794 scb->dcdb.device_address =
3795 ((scb->bus - 1) << 4) | scb->target_id;
3796 scb->dcdb.cmd_attribute |= IPS_DISCONNECT_ALLOWED;
3797
3798 if (TimeOut) {
3799 if (TimeOut < (10 * HZ))
3800 scb->dcdb.cmd_attribute |= IPS_TIMEOUT10; /* TimeOut is 10 Seconds */
3801 else if (TimeOut < (60 * HZ))
3802 scb->dcdb.cmd_attribute |= IPS_TIMEOUT60; /* TimeOut is 60 Seconds */
3803 else if (TimeOut < (1200 * HZ))
3804 scb->dcdb.cmd_attribute |= IPS_TIMEOUT20M; /* TimeOut is 20 Minutes */
3805 }
3806
3807 scb->dcdb.transfer_length = scb->data_len;
3808 if (scb->dcdb.cmd_attribute & IPS_TRANSFER64K)
3809 scb->dcdb.transfer_length = 0;
3810 if (scb->cmd.dcdb.op_code == IPS_CMD_DCDB_SG)
3811 scb->dcdb.buffer_pointer =
3812 cpu_to_le32(scb->sg_busaddr);
3813 else
3814 scb->dcdb.buffer_pointer =
3815 cpu_to_le32(scb->data_busaddr);
3816 scb->dcdb.cdb_length = scb->scsi_cmd->cmd_len;
3817 scb->dcdb.sense_length = sizeof (scb->dcdb.sense_info);
3818 scb->dcdb.sg_count = scb->sg_len;
3819 scb->dcdb.reserved = 0;
3820 memcpy(scb->dcdb.scsi_cdb, scb->scsi_cmd->cmnd,
3821 scb->scsi_cmd->cmd_len);
3822 scb->dcdb.scsi_status = 0;
3823 scb->dcdb.reserved2[0] = 0;
3824 scb->dcdb.reserved2[1] = 0;
3825 scb->dcdb.reserved2[2] = 0;
3826 }
3827 }
3828
3829 return ((*ha->func.issue) (ha, scb));
3830}
3831
3832/****************************************************************************/
3833/* */
3834/* Routine Name: ips_chk_status */
3835/* */
3836/* Routine Description: */
3837/* */
3838/* Check the status of commands to logical drives */
3839/* Assumed to be called with the HA lock */
3840/****************************************************************************/
3841static void
3842ips_chkstatus(ips_ha_t * ha, IPS_STATUS * pstatus)
3843{
3844 ips_scb_t *scb;
3845 ips_stat_t *sp;
3846 uint8_t basic_status;
3847 uint8_t ext_status;
3848 int errcode;
3849 IPS_SCSI_INQ_DATA inquiryData;
3850
3851 METHOD_TRACE("ips_chkstatus", 1);
3852
3853 scb = &ha->scbs[pstatus->fields.command_id];
3854 scb->basic_status = basic_status =
3855 pstatus->fields.basic_status & IPS_BASIC_STATUS_MASK;
3856 scb->extended_status = ext_status = pstatus->fields.extended_status;
3857
3858 sp = &ha->sp;
3859 sp->residue_len = 0;
3860 sp->scb_addr = (void *) scb;
3861
3862 /* Remove the item from the active queue */
3863 ips_removeq_scb(&ha->scb_activelist, scb);
3864
3865 if (!scb->scsi_cmd)
3866 /* internal commands are handled in do_ipsintr */
3867 return;
3868
3869 DEBUG_VAR(2, "(%s%d) ips_chkstatus: cmd 0x%X id %d (%d %d %d)",
3870 ips_name,
3871 ha->host_num,
3872 scb->cdb[0],
3873 scb->cmd.basic_io.command_id,
3874 scb->bus, scb->target_id, scb->lun);
3875
3876 if ((scb->scsi_cmd) && (ips_is_passthru(scb->scsi_cmd)))
3877 /* passthru - just returns the raw result */
3878 return;
3879
3880 errcode = DID_OK;
3881
3882 if (((basic_status & IPS_GSC_STATUS_MASK) == IPS_CMD_SUCCESS) ||
3883 ((basic_status & IPS_GSC_STATUS_MASK) == IPS_CMD_RECOVERED_ERROR)) {
3884
3885 if (scb->bus == 0) {
3886 if ((basic_status & IPS_GSC_STATUS_MASK) ==
3887 IPS_CMD_RECOVERED_ERROR) {
3888 DEBUG_VAR(1,
3889 "(%s%d) Recovered Logical Drive Error OpCode: %x, BSB: %x, ESB: %x",
3890 ips_name, ha->host_num,
3891 scb->cmd.basic_io.op_code,
3892 basic_status, ext_status);
3893 }
3894
3895 switch (scb->scsi_cmd->cmnd[0]) {
3896 case ALLOW_MEDIUM_REMOVAL:
3897 case REZERO_UNIT:
3898 case ERASE:
3899 case WRITE_FILEMARKS:
3900 case SPACE:
3901 errcode = DID_ERROR;
3902 break;
3903
3904 case START_STOP:
3905 break;
3906
3907 case TEST_UNIT_READY:
3908 if (!ips_online(ha, scb)) {
3909 errcode = DID_TIME_OUT;
3910 }
3911 break;
3912
3913 case INQUIRY:
3914 if (ips_online(ha, scb)) {
3915 ips_inquiry(ha, scb);
3916 } else {
3917 errcode = DID_TIME_OUT;
3918 }
3919 break;
3920
3921 case REQUEST_SENSE:
3922 ips_reqsen(ha, scb);
3923 break;
3924
3925 case READ_6:
3926 case WRITE_6:
3927 case READ_10:
3928 case WRITE_10:
3929 case RESERVE:
3930 case RELEASE:
3931 break;
3932
3933 case MODE_SENSE:
3934 if (!ips_online(ha, scb)
3935 || !ips_msense(ha, scb)) {
3936 errcode = DID_ERROR;
3937 }
3938 break;
3939
3940 case READ_CAPACITY:
3941 if (ips_online(ha, scb))
3942 ips_rdcap(ha, scb);
3943 else {
3944 errcode = DID_TIME_OUT;
3945 }
3946 break;
3947
3948 case SEND_DIAGNOSTIC:
3949 case REASSIGN_BLOCKS:
3950 break;
3951
3952 case FORMAT_UNIT:
3953 errcode = DID_ERROR;
3954 break;
3955
3956 case SEEK_10:
3957 case VERIFY:
3958 case READ_DEFECT_DATA:
3959 case READ_BUFFER:
3960 case WRITE_BUFFER:
3961 break;
3962
3963 default:
3964 errcode = DID_ERROR;
3965 } /* end switch */
3966
3967 scb->scsi_cmd->result = errcode << 16;
3968 } else { /* bus == 0 */
3969 /* restrict access to physical drives */
3970 if (scb->scsi_cmd->cmnd[0] == INQUIRY) {
3971 ips_scmd_buf_read(scb->scsi_cmd,
3972 &inquiryData, sizeof (inquiryData));
3973 if ((inquiryData.DeviceType & 0x1f) == TYPE_DISK)
3974 scb->scsi_cmd->result = DID_TIME_OUT << 16;
3975 }
3976 } /* else */
3977 } else { /* recovered error / success */
3978 if (scb->bus == 0) {
3979 DEBUG_VAR(1,
3980 "(%s%d) Unrecovered Logical Drive Error OpCode: %x, BSB: %x, ESB: %x",
3981 ips_name, ha->host_num,
3982 scb->cmd.basic_io.op_code, basic_status,
3983 ext_status);
3984 }
3985
3986 ips_map_status(ha, scb, sp);
3987 } /* else */
3988}
3989
3990/****************************************************************************/
3991/* */
3992/* Routine Name: ips_online */
3993/* */
3994/* Routine Description: */
3995/* */
3996/* Determine if a logical drive is online */
3997/* */
3998/****************************************************************************/
3999static int
4000ips_online(ips_ha_t * ha, ips_scb_t * scb)
4001{
4002 METHOD_TRACE("ips_online", 1);
4003
4004 if (scb->target_id >= IPS_MAX_LD)
4005 return (0);
4006
4007 if ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1) {
4008 memset(ha->logical_drive_info, 0, sizeof (IPS_LD_INFO));
4009 return (0);
4010 }
4011
4012 if (ha->logical_drive_info->drive_info[scb->target_id].state !=
4013 IPS_LD_OFFLINE
4014 && ha->logical_drive_info->drive_info[scb->target_id].state !=
4015 IPS_LD_FREE
4016 && ha->logical_drive_info->drive_info[scb->target_id].state !=
4017 IPS_LD_CRS
4018 && ha->logical_drive_info->drive_info[scb->target_id].state !=
4019 IPS_LD_SYS)
4020 return (1);
4021 else
4022 return (0);
4023}
4024
4025/****************************************************************************/
4026/* */
4027/* Routine Name: ips_inquiry */
4028/* */
4029/* Routine Description: */
4030/* */
4031/* Simulate an inquiry command to a logical drive */
4032/* */
4033/****************************************************************************/
4034static int
4035ips_inquiry(ips_ha_t * ha, ips_scb_t * scb)
4036{
4037 IPS_SCSI_INQ_DATA inquiry;
4038
4039 METHOD_TRACE("ips_inquiry", 1);
4040
4041 memset(&inquiry, 0, sizeof (IPS_SCSI_INQ_DATA));
4042
4043 inquiry.DeviceType = IPS_SCSI_INQ_TYPE_DASD;
4044 inquiry.DeviceTypeQualifier = IPS_SCSI_INQ_LU_CONNECTED;
4045 inquiry.Version = IPS_SCSI_INQ_REV2;
4046 inquiry.ResponseDataFormat = IPS_SCSI_INQ_RD_REV2;
4047 inquiry.AdditionalLength = 31;
4048 inquiry.Flags[0] = IPS_SCSI_INQ_Address16;
4049 inquiry.Flags[1] =
4050 IPS_SCSI_INQ_WBus16 | IPS_SCSI_INQ_Sync | IPS_SCSI_INQ_CmdQue;
4051 strncpy(inquiry.VendorId, "IBM ", 8);
4052 strncpy(inquiry.ProductId, "SERVERAID ", 16);
4053 strncpy(inquiry.ProductRevisionLevel, "1.00", 4);
4054
4055 ips_scmd_buf_write(scb->scsi_cmd, &inquiry, sizeof (inquiry));
4056
4057 return (1);
4058}
4059
4060/****************************************************************************/
4061/* */
4062/* Routine Name: ips_rdcap */
4063/* */
4064/* Routine Description: */
4065/* */
4066/* Simulate a read capacity command to a logical drive */
4067/* */
4068/****************************************************************************/
4069static int
4070ips_rdcap(ips_ha_t * ha, ips_scb_t * scb)
4071{
4072 IPS_SCSI_CAPACITY cap;
4073
4074 METHOD_TRACE("ips_rdcap", 1);
4075
4076 if (scsi_bufflen(scb->scsi_cmd) < 8)
4077 return (0);
4078
4079 cap.lba =
4080 cpu_to_be32(le32_to_cpu
4081 (ha->logical_drive_info->
4082 drive_info[scb->target_id].sector_count) - 1);
4083 cap.len = cpu_to_be32((uint32_t) IPS_BLKSIZE);
4084
4085 ips_scmd_buf_write(scb->scsi_cmd, &cap, sizeof (cap));
4086
4087 return (1);
4088}
4089
4090/****************************************************************************/
4091/* */
4092/* Routine Name: ips_msense */
4093/* */
4094/* Routine Description: */
4095/* */
4096/* Simulate a mode sense command to a logical drive */
4097/* */
4098/****************************************************************************/
4099static int
4100ips_msense(ips_ha_t * ha, ips_scb_t * scb)
4101{
4102 uint16_t heads;
4103 uint16_t sectors;
4104 uint32_t cylinders;
4105 IPS_SCSI_MODE_PAGE_DATA mdata;
4106
4107 METHOD_TRACE("ips_msense", 1);
4108
4109 if (le32_to_cpu(ha->enq->ulDriveSize[scb->target_id]) > 0x400000 &&
4110 (ha->enq->ucMiscFlag & 0x8) == 0) {
4111 heads = IPS_NORM_HEADS;
4112 sectors = IPS_NORM_SECTORS;
4113 } else {
4114 heads = IPS_COMP_HEADS;
4115 sectors = IPS_COMP_SECTORS;
4116 }
4117
4118 cylinders =
4119 (le32_to_cpu(ha->enq->ulDriveSize[scb->target_id]) -
4120 1) / (heads * sectors);
4121
4122 memset(&mdata, 0, sizeof (IPS_SCSI_MODE_PAGE_DATA));
4123
4124 mdata.hdr.BlockDescLength = 8;
4125
4126 switch (scb->scsi_cmd->cmnd[2] & 0x3f) {
4127 case 0x03: /* page 3 */
4128 mdata.pdata.pg3.PageCode = 3;
4129 mdata.pdata.pg3.PageLength = sizeof (IPS_SCSI_MODE_PAGE3);
4130 mdata.hdr.DataLength =
4131 3 + mdata.hdr.BlockDescLength + mdata.pdata.pg3.PageLength;
4132 mdata.pdata.pg3.TracksPerZone = 0;
4133 mdata.pdata.pg3.AltSectorsPerZone = 0;
4134 mdata.pdata.pg3.AltTracksPerZone = 0;
4135 mdata.pdata.pg3.AltTracksPerVolume = 0;
4136 mdata.pdata.pg3.SectorsPerTrack = cpu_to_be16(sectors);
4137 mdata.pdata.pg3.BytesPerSector = cpu_to_be16(IPS_BLKSIZE);
4138 mdata.pdata.pg3.Interleave = cpu_to_be16(1);
4139 mdata.pdata.pg3.TrackSkew = 0;
4140 mdata.pdata.pg3.CylinderSkew = 0;
4141 mdata.pdata.pg3.flags = IPS_SCSI_MP3_SoftSector;
4142 break;
4143
4144 case 0x4:
4145 mdata.pdata.pg4.PageCode = 4;
4146 mdata.pdata.pg4.PageLength = sizeof (IPS_SCSI_MODE_PAGE4);
4147 mdata.hdr.DataLength =
4148 3 + mdata.hdr.BlockDescLength + mdata.pdata.pg4.PageLength;
4149 mdata.pdata.pg4.CylindersHigh =
4150 cpu_to_be16((cylinders >> 8) & 0xFFFF);
4151 mdata.pdata.pg4.CylindersLow = (cylinders & 0xFF);
4152 mdata.pdata.pg4.Heads = heads;
4153 mdata.pdata.pg4.WritePrecompHigh = 0;
4154 mdata.pdata.pg4.WritePrecompLow = 0;
4155 mdata.pdata.pg4.ReducedWriteCurrentHigh = 0;
4156 mdata.pdata.pg4.ReducedWriteCurrentLow = 0;
4157 mdata.pdata.pg4.StepRate = cpu_to_be16(1);
4158 mdata.pdata.pg4.LandingZoneHigh = 0;
4159 mdata.pdata.pg4.LandingZoneLow = 0;
4160 mdata.pdata.pg4.flags = 0;
4161 mdata.pdata.pg4.RotationalOffset = 0;
4162 mdata.pdata.pg4.MediumRotationRate = 0;
4163 break;
4164 case 0x8:
4165 mdata.pdata.pg8.PageCode = 8;
4166 mdata.pdata.pg8.PageLength = sizeof (IPS_SCSI_MODE_PAGE8);
4167 mdata.hdr.DataLength =
4168 3 + mdata.hdr.BlockDescLength + mdata.pdata.pg8.PageLength;
4169 /* everything else is left set to 0 */
4170 break;
4171
4172 default:
4173 return (0);
4174 } /* end switch */
4175
4176 ips_scmd_buf_write(scb->scsi_cmd, &mdata, sizeof (mdata));
4177
4178 return (1);
4179}
4180
4181/****************************************************************************/
4182/* */
4183/* Routine Name: ips_reqsen */
4184/* */
4185/* Routine Description: */
4186/* */
4187/* Simulate a request sense command to a logical drive */
4188/* */
4189/****************************************************************************/
4190static int
4191ips_reqsen(ips_ha_t * ha, ips_scb_t * scb)
4192{
4193 IPS_SCSI_REQSEN reqsen;
4194
4195 METHOD_TRACE("ips_reqsen", 1);
4196
4197 memset(&reqsen, 0, sizeof (IPS_SCSI_REQSEN));
4198
4199 reqsen.ResponseCode =
4200 IPS_SCSI_REQSEN_VALID | IPS_SCSI_REQSEN_CURRENT_ERR;
4201 reqsen.AdditionalLength = 10;
4202 reqsen.AdditionalSenseCode = IPS_SCSI_REQSEN_NO_SENSE;
4203 reqsen.AdditionalSenseCodeQual = IPS_SCSI_REQSEN_NO_SENSE;
4204
4205 ips_scmd_buf_write(scb->scsi_cmd, &reqsen, sizeof (reqsen));
4206
4207 return (1);
4208}
4209
4210/****************************************************************************/
4211/* */
4212/* Routine Name: ips_free */
4213/* */
4214/* Routine Description: */
4215/* */
4216/* Free any allocated space for this controller */
4217/* */
4218/****************************************************************************/
4219static void
4220ips_free(ips_ha_t * ha)
4221{
4222
4223 METHOD_TRACE("ips_free", 1);
4224
4225 if (ha) {
4226 if (ha->enq) {
4227 pci_free_consistent(ha->pcidev, sizeof(IPS_ENQ),
4228 ha->enq, ha->enq_busaddr);
4229 ha->enq = NULL;
4230 }
4231
4232 kfree(ha->conf);
4233 ha->conf = NULL;
4234
4235 if (ha->adapt) {
4236 pci_free_consistent(ha->pcidev,
4237 sizeof (IPS_ADAPTER) +
4238 sizeof (IPS_IO_CMD), ha->adapt,
4239 ha->adapt->hw_status_start);
4240 ha->adapt = NULL;
4241 }
4242
4243 if (ha->logical_drive_info) {
4244 pci_free_consistent(ha->pcidev,
4245 sizeof (IPS_LD_INFO),
4246 ha->logical_drive_info,
4247 ha->logical_drive_info_dma_addr);
4248 ha->logical_drive_info = NULL;
4249 }
4250
4251 kfree(ha->nvram);
4252 ha->nvram = NULL;
4253
4254 kfree(ha->subsys);
4255 ha->subsys = NULL;
4256
4257 if (ha->ioctl_data) {
4258 pci_free_consistent(ha->pcidev, ha->ioctl_len,
4259 ha->ioctl_data, ha->ioctl_busaddr);
4260 ha->ioctl_data = NULL;
4261 ha->ioctl_datasize = 0;
4262 ha->ioctl_len = 0;
4263 }
4264 ips_deallocatescbs(ha, ha->max_cmds);
4265
4266 /* free memory mapped (if applicable) */
4267 if (ha->mem_ptr) {
4268 iounmap(ha->ioremap_ptr);
4269 ha->ioremap_ptr = NULL;
4270 ha->mem_ptr = NULL;
4271 }
4272
4273 ha->mem_addr = 0;
4274
4275 }
4276}
4277
4278/****************************************************************************/
4279/* */
4280/* Routine Name: ips_deallocatescbs */
4281/* */
4282/* Routine Description: */
4283/* */
4284/* Free the command blocks */
4285/* */
4286/****************************************************************************/
4287static int
4288ips_deallocatescbs(ips_ha_t * ha, int cmds)
4289{
4290 if (ha->scbs) {
4291 pci_free_consistent(ha->pcidev,
4292 IPS_SGLIST_SIZE(ha) * IPS_MAX_SG * cmds,
4293 ha->scbs->sg_list.list,
4294 ha->scbs->sg_busaddr);
4295 pci_free_consistent(ha->pcidev, sizeof (ips_scb_t) * cmds,
4296 ha->scbs, ha->scbs->scb_busaddr);
4297 ha->scbs = NULL;
4298 } /* end if */
4299 return 1;
4300}
4301
4302/****************************************************************************/
4303/* */
4304/* Routine Name: ips_allocatescbs */
4305/* */
4306/* Routine Description: */
4307/* */
4308/* Allocate the command blocks */
4309/* */
4310/****************************************************************************/
4311static int
4312ips_allocatescbs(ips_ha_t * ha)
4313{
4314 ips_scb_t *scb_p;
4315 IPS_SG_LIST ips_sg;
4316 int i;
4317 dma_addr_t command_dma, sg_dma;
4318
4319 METHOD_TRACE("ips_allocatescbs", 1);
4320
4321 /* Allocate memory for the SCBs */
4322 ha->scbs =
4323 pci_alloc_consistent(ha->pcidev, ha->max_cmds * sizeof (ips_scb_t),
4324 &command_dma);
4325 if (ha->scbs == NULL)
4326 return 0;
4327 ips_sg.list =
4328 pci_alloc_consistent(ha->pcidev,
4329 IPS_SGLIST_SIZE(ha) * IPS_MAX_SG *
4330 ha->max_cmds, &sg_dma);
4331 if (ips_sg.list == NULL) {
4332 pci_free_consistent(ha->pcidev,
4333 ha->max_cmds * sizeof (ips_scb_t), ha->scbs,
4334 command_dma);
4335 return 0;
4336 }
4337
4338 memset(ha->scbs, 0, ha->max_cmds * sizeof (ips_scb_t));
4339
4340 for (i = 0; i < ha->max_cmds; i++) {
4341 scb_p = &ha->scbs[i];
4342 scb_p->scb_busaddr = command_dma + sizeof (ips_scb_t) * i;
4343 /* set up S/G list */
4344 if (IPS_USE_ENH_SGLIST(ha)) {
4345 scb_p->sg_list.enh_list =
4346 ips_sg.enh_list + i * IPS_MAX_SG;
4347 scb_p->sg_busaddr =
4348 sg_dma + IPS_SGLIST_SIZE(ha) * IPS_MAX_SG * i;
4349 } else {
4350 scb_p->sg_list.std_list =
4351 ips_sg.std_list + i * IPS_MAX_SG;
4352 scb_p->sg_busaddr =
4353 sg_dma + IPS_SGLIST_SIZE(ha) * IPS_MAX_SG * i;
4354 }
4355
4356 /* add to the free list */
4357 if (i < ha->max_cmds - 1) {
4358 scb_p->q_next = ha->scb_freelist;
4359 ha->scb_freelist = scb_p;
4360 }
4361 }
4362
4363 /* success */
4364 return (1);
4365}
4366
4367/****************************************************************************/
4368/* */
4369/* Routine Name: ips_init_scb */
4370/* */
4371/* Routine Description: */
4372/* */
4373/* Initialize a CCB to default values */
4374/* */
4375/****************************************************************************/
4376static void
4377ips_init_scb(ips_ha_t * ha, ips_scb_t * scb)
4378{
4379 IPS_SG_LIST sg_list;
4380 uint32_t cmd_busaddr, sg_busaddr;
4381 METHOD_TRACE("ips_init_scb", 1);
4382
4383 if (scb == NULL)
4384 return;
4385
4386 sg_list.list = scb->sg_list.list;
4387 cmd_busaddr = scb->scb_busaddr;
4388 sg_busaddr = scb->sg_busaddr;
4389 /* zero fill */
4390 memset(scb, 0, sizeof (ips_scb_t));
4391 memset(ha->dummy, 0, sizeof (IPS_IO_CMD));
4392
4393 /* Initialize dummy command bucket */
4394 ha->dummy->op_code = 0xFF;
4395 ha->dummy->ccsar = cpu_to_le32(ha->adapt->hw_status_start
4396 + sizeof (IPS_ADAPTER));
4397 ha->dummy->command_id = IPS_MAX_CMDS;
4398
4399 /* set bus address of scb */
4400 scb->scb_busaddr = cmd_busaddr;
4401 scb->sg_busaddr = sg_busaddr;
4402 scb->sg_list.list = sg_list.list;
4403
4404 /* Neptune Fix */
4405 scb->cmd.basic_io.cccr = cpu_to_le32((uint32_t) IPS_BIT_ILE);
4406 scb->cmd.basic_io.ccsar = cpu_to_le32(ha->adapt->hw_status_start
4407 + sizeof (IPS_ADAPTER));
4408}
4409
4410/****************************************************************************/
4411/* */
4412/* Routine Name: ips_get_scb */
4413/* */
4414/* Routine Description: */
4415/* */
4416/* Initialize a CCB to default values */
4417/* */
4418/* ASSUMED to be called from within a lock */
4419/* */
4420/****************************************************************************/
4421static ips_scb_t *
4422ips_getscb(ips_ha_t * ha)
4423{
4424 ips_scb_t *scb;
4425
4426 METHOD_TRACE("ips_getscb", 1);
4427
4428 if ((scb = ha->scb_freelist) == NULL) {
4429
4430 return (NULL);
4431 }
4432
4433 ha->scb_freelist = scb->q_next;
4434 scb->flags = 0;
4435 scb->q_next = NULL;
4436
4437 ips_init_scb(ha, scb);
4438
4439 return (scb);
4440}
4441
4442/****************************************************************************/
4443/* */
4444/* Routine Name: ips_free_scb */
4445/* */
4446/* Routine Description: */
4447/* */
4448/* Return an unused CCB back to the free list */
4449/* */
4450/* ASSUMED to be called from within a lock */
4451/* */
4452/****************************************************************************/
4453static void
4454ips_freescb(ips_ha_t * ha, ips_scb_t * scb)
4455{
4456
4457 METHOD_TRACE("ips_freescb", 1);
4458 if (scb->flags & IPS_SCB_MAP_SG)
4459 scsi_dma_unmap(scb->scsi_cmd);
4460 else if (scb->flags & IPS_SCB_MAP_SINGLE)
4461 pci_unmap_single(ha->pcidev, scb->data_busaddr, scb->data_len,
4462 IPS_DMA_DIR(scb));
4463
4464 /* check to make sure this is not our "special" scb */
4465 if (IPS_COMMAND_ID(ha, scb) < (ha->max_cmds - 1)) {
4466 scb->q_next = ha->scb_freelist;
4467 ha->scb_freelist = scb;
4468 }
4469}
4470
4471/****************************************************************************/
4472/* */
4473/* Routine Name: ips_isinit_copperhead */
4474/* */
4475/* Routine Description: */
4476/* */
4477/* Is controller initialized ? */
4478/* */
4479/****************************************************************************/
4480static int
4481ips_isinit_copperhead(ips_ha_t * ha)
4482{
4483 uint8_t scpr;
4484 uint8_t isr;
4485
4486 METHOD_TRACE("ips_isinit_copperhead", 1);
4487
4488 isr = inb(ha->io_addr + IPS_REG_HISR);
4489 scpr = inb(ha->io_addr + IPS_REG_SCPR);
4490
4491 if (((isr & IPS_BIT_EI) == 0) && ((scpr & IPS_BIT_EBM) == 0))
4492 return (0);
4493 else
4494 return (1);
4495}
4496
4497/****************************************************************************/
4498/* */
4499/* Routine Name: ips_isinit_copperhead_memio */
4500/* */
4501/* Routine Description: */
4502/* */
4503/* Is controller initialized ? */
4504/* */
4505/****************************************************************************/
4506static int
4507ips_isinit_copperhead_memio(ips_ha_t * ha)
4508{
4509 uint8_t isr = 0;
4510 uint8_t scpr;
4511
4512 METHOD_TRACE("ips_is_init_copperhead_memio", 1);
4513
4514 isr = readb(ha->mem_ptr + IPS_REG_HISR);
4515 scpr = readb(ha->mem_ptr + IPS_REG_SCPR);
4516
4517 if (((isr & IPS_BIT_EI) == 0) && ((scpr & IPS_BIT_EBM) == 0))
4518 return (0);
4519 else
4520 return (1);
4521}
4522
4523/****************************************************************************/
4524/* */
4525/* Routine Name: ips_isinit_morpheus */
4526/* */
4527/* Routine Description: */
4528/* */
4529/* Is controller initialized ? */
4530/* */
4531/****************************************************************************/
4532static int
4533ips_isinit_morpheus(ips_ha_t * ha)
4534{
4535 uint32_t post;
4536 uint32_t bits;
4537
4538 METHOD_TRACE("ips_is_init_morpheus", 1);
4539
4540 if (ips_isintr_morpheus(ha))
4541 ips_flush_and_reset(ha);
4542
4543 post = readl(ha->mem_ptr + IPS_REG_I960_MSG0);
4544 bits = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
4545
4546 if (post == 0)
4547 return (0);
4548 else if (bits & 0x3)
4549 return (0);
4550 else
4551 return (1);
4552}
4553
4554/****************************************************************************/
4555/* */
4556/* Routine Name: ips_flush_and_reset */
4557/* */
4558/* Routine Description: */
4559/* */
4560/* Perform cleanup ( FLUSH and RESET ) when the adapter is in an unknown */
4561/* state ( was trying to INIT and an interrupt was already pending ) ... */
4562/* */
4563/****************************************************************************/
4564static void
4565ips_flush_and_reset(ips_ha_t *ha)
4566{
4567 ips_scb_t *scb;
4568 int ret;
4569 int time;
4570 int done;
4571 dma_addr_t command_dma;
4572
4573 /* Create a usuable SCB */
4574 scb = pci_alloc_consistent(ha->pcidev, sizeof(ips_scb_t), &command_dma);
4575 if (scb) {
4576 memset(scb, 0, sizeof(ips_scb_t));
4577 ips_init_scb(ha, scb);
4578 scb->scb_busaddr = command_dma;
4579
4580 scb->timeout = ips_cmd_timeout;
4581 scb->cdb[0] = IPS_CMD_FLUSH;
4582
4583 scb->cmd.flush_cache.op_code = IPS_CMD_FLUSH;
4584 scb->cmd.flush_cache.command_id = IPS_MAX_CMDS; /* Use an ID that would otherwise not exist */
4585 scb->cmd.flush_cache.state = IPS_NORM_STATE;
4586 scb->cmd.flush_cache.reserved = 0;
4587 scb->cmd.flush_cache.reserved2 = 0;
4588 scb->cmd.flush_cache.reserved3 = 0;
4589 scb->cmd.flush_cache.reserved4 = 0;
4590
4591 ret = ips_send_cmd(ha, scb); /* Send the Flush Command */
4592
4593 if (ret == IPS_SUCCESS) {
4594 time = 60 * IPS_ONE_SEC; /* Max Wait time is 60 seconds */
4595 done = 0;
4596
4597 while ((time > 0) && (!done)) {
4598 done = ips_poll_for_flush_complete(ha);
4599 /* This may look evil, but it's only done during extremely rare start-up conditions ! */
4600 udelay(1000);
4601 time--;
4602 }
4603 }
4604 }
4605
4606 /* Now RESET and INIT the adapter */
4607 (*ha->func.reset) (ha);
4608
4609 pci_free_consistent(ha->pcidev, sizeof(ips_scb_t), scb, command_dma);
4610 return;
4611}
4612
4613/****************************************************************************/
4614/* */
4615/* Routine Name: ips_poll_for_flush_complete */
4616/* */
4617/* Routine Description: */
4618/* */
4619/* Poll for the Flush Command issued by ips_flush_and_reset() to complete */
4620/* All other responses are just taken off the queue and ignored */
4621/* */
4622/****************************************************************************/
4623static int
4624ips_poll_for_flush_complete(ips_ha_t * ha)
4625{
4626 IPS_STATUS cstatus;
4627
4628 while (TRUE) {
4629 cstatus.value = (*ha->func.statupd) (ha);
4630
4631 if (cstatus.value == 0xffffffff) /* If No Interrupt to process */
4632 break;
4633
4634 /* Success is when we see the Flush Command ID */
4635 if (cstatus.fields.command_id == IPS_MAX_CMDS)
4636 return 1;
4637 }
4638
4639 return 0;
4640}
4641
4642/****************************************************************************/
4643/* */
4644/* Routine Name: ips_enable_int_copperhead */
4645/* */
4646/* Routine Description: */
4647/* Turn on interrupts */
4648/* */
4649/****************************************************************************/
4650static void
4651ips_enable_int_copperhead(ips_ha_t * ha)
4652{
4653 METHOD_TRACE("ips_enable_int_copperhead", 1);
4654
4655 outb(ha->io_addr + IPS_REG_HISR, IPS_BIT_EI);
4656 inb(ha->io_addr + IPS_REG_HISR); /*Ensure PCI Posting Completes*/
4657}
4658
4659/****************************************************************************/
4660/* */
4661/* Routine Name: ips_enable_int_copperhead_memio */
4662/* */
4663/* Routine Description: */
4664/* Turn on interrupts */
4665/* */
4666/****************************************************************************/
4667static void
4668ips_enable_int_copperhead_memio(ips_ha_t * ha)
4669{
4670 METHOD_TRACE("ips_enable_int_copperhead_memio", 1);
4671
4672 writeb(IPS_BIT_EI, ha->mem_ptr + IPS_REG_HISR);
4673 readb(ha->mem_ptr + IPS_REG_HISR); /*Ensure PCI Posting Completes*/
4674}
4675
4676/****************************************************************************/
4677/* */
4678/* Routine Name: ips_enable_int_morpheus */
4679/* */
4680/* Routine Description: */
4681/* Turn on interrupts */
4682/* */
4683/****************************************************************************/
4684static void
4685ips_enable_int_morpheus(ips_ha_t * ha)
4686{
4687 uint32_t Oimr;
4688
4689 METHOD_TRACE("ips_enable_int_morpheus", 1);
4690
4691 Oimr = readl(ha->mem_ptr + IPS_REG_I960_OIMR);
4692 Oimr &= ~0x08;
4693 writel(Oimr, ha->mem_ptr + IPS_REG_I960_OIMR);
4694 readl(ha->mem_ptr + IPS_REG_I960_OIMR); /*Ensure PCI Posting Completes*/
4695}
4696
4697/****************************************************************************/
4698/* */
4699/* Routine Name: ips_init_copperhead */
4700/* */
4701/* Routine Description: */
4702/* */
4703/* Initialize a copperhead controller */
4704/* */
4705/****************************************************************************/
4706static int
4707ips_init_copperhead(ips_ha_t * ha)
4708{
4709 uint8_t Isr;
4710 uint8_t Cbsp;
4711 uint8_t PostByte[IPS_MAX_POST_BYTES];
4712 uint8_t ConfigByte[IPS_MAX_CONFIG_BYTES];
4713 int i, j;
4714
4715 METHOD_TRACE("ips_init_copperhead", 1);
4716
4717 for (i = 0; i < IPS_MAX_POST_BYTES; i++) {
4718 for (j = 0; j < 45; j++) {
4719 Isr = inb(ha->io_addr + IPS_REG_HISR);
4720 if (Isr & IPS_BIT_GHI)
4721 break;
4722
4723 /* Delay for 1 Second */
4724 MDELAY(IPS_ONE_SEC);
4725 }
4726
4727 if (j >= 45)
4728 /* error occurred */
4729 return (0);
4730
4731 PostByte[i] = inb(ha->io_addr + IPS_REG_ISPR);
4732 outb(Isr, ha->io_addr + IPS_REG_HISR);
4733 }
4734
4735 if (PostByte[0] < IPS_GOOD_POST_STATUS) {
4736 IPS_PRINTK(KERN_WARNING, ha->pcidev,
4737 "reset controller fails (post status %x %x).\n",
4738 PostByte[0], PostByte[1]);
4739
4740 return (0);
4741 }
4742
4743 for (i = 0; i < IPS_MAX_CONFIG_BYTES; i++) {
4744 for (j = 0; j < 240; j++) {
4745 Isr = inb(ha->io_addr + IPS_REG_HISR);
4746 if (Isr & IPS_BIT_GHI)
4747 break;
4748
4749 /* Delay for 1 Second */
4750 MDELAY(IPS_ONE_SEC);
4751 }
4752
4753 if (j >= 240)
4754 /* error occurred */
4755 return (0);
4756
4757 ConfigByte[i] = inb(ha->io_addr + IPS_REG_ISPR);
4758 outb(Isr, ha->io_addr + IPS_REG_HISR);
4759 }
4760
4761 for (i = 0; i < 240; i++) {
4762 Cbsp = inb(ha->io_addr + IPS_REG_CBSP);
4763
4764 if ((Cbsp & IPS_BIT_OP) == 0)
4765 break;
4766
4767 /* Delay for 1 Second */
4768 MDELAY(IPS_ONE_SEC);
4769 }
4770
4771 if (i >= 240)
4772 /* reset failed */
4773 return (0);
4774
4775 /* setup CCCR */
4776 outl(0x1010, ha->io_addr + IPS_REG_CCCR);
4777
4778 /* Enable busmastering */
4779 outb(IPS_BIT_EBM, ha->io_addr + IPS_REG_SCPR);
4780
4781 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
4782 /* fix for anaconda64 */
4783 outl(0, ha->io_addr + IPS_REG_NDAE);
4784
4785 /* Enable interrupts */
4786 outb(IPS_BIT_EI, ha->io_addr + IPS_REG_HISR);
4787
4788 return (1);
4789}
4790
4791/****************************************************************************/
4792/* */
4793/* Routine Name: ips_init_copperhead_memio */
4794/* */
4795/* Routine Description: */
4796/* */
4797/* Initialize a copperhead controller with memory mapped I/O */
4798/* */
4799/****************************************************************************/
4800static int
4801ips_init_copperhead_memio(ips_ha_t * ha)
4802{
4803 uint8_t Isr = 0;
4804 uint8_t Cbsp;
4805 uint8_t PostByte[IPS_MAX_POST_BYTES];
4806 uint8_t ConfigByte[IPS_MAX_CONFIG_BYTES];
4807 int i, j;
4808
4809 METHOD_TRACE("ips_init_copperhead_memio", 1);
4810
4811 for (i = 0; i < IPS_MAX_POST_BYTES; i++) {
4812 for (j = 0; j < 45; j++) {
4813 Isr = readb(ha->mem_ptr + IPS_REG_HISR);
4814 if (Isr & IPS_BIT_GHI)
4815 break;
4816
4817 /* Delay for 1 Second */
4818 MDELAY(IPS_ONE_SEC);
4819 }
4820
4821 if (j >= 45)
4822 /* error occurred */
4823 return (0);
4824
4825 PostByte[i] = readb(ha->mem_ptr + IPS_REG_ISPR);
4826 writeb(Isr, ha->mem_ptr + IPS_REG_HISR);
4827 }
4828
4829 if (PostByte[0] < IPS_GOOD_POST_STATUS) {
4830 IPS_PRINTK(KERN_WARNING, ha->pcidev,
4831 "reset controller fails (post status %x %x).\n",
4832 PostByte[0], PostByte[1]);
4833
4834 return (0);
4835 }
4836
4837 for (i = 0; i < IPS_MAX_CONFIG_BYTES; i++) {
4838 for (j = 0; j < 240; j++) {
4839 Isr = readb(ha->mem_ptr + IPS_REG_HISR);
4840 if (Isr & IPS_BIT_GHI)
4841 break;
4842
4843 /* Delay for 1 Second */
4844 MDELAY(IPS_ONE_SEC);
4845 }
4846
4847 if (j >= 240)
4848 /* error occurred */
4849 return (0);
4850
4851 ConfigByte[i] = readb(ha->mem_ptr + IPS_REG_ISPR);
4852 writeb(Isr, ha->mem_ptr + IPS_REG_HISR);
4853 }
4854
4855 for (i = 0; i < 240; i++) {
4856 Cbsp = readb(ha->mem_ptr + IPS_REG_CBSP);
4857
4858 if ((Cbsp & IPS_BIT_OP) == 0)
4859 break;
4860
4861 /* Delay for 1 Second */
4862 MDELAY(IPS_ONE_SEC);
4863 }
4864
4865 if (i >= 240)
4866 /* error occurred */
4867 return (0);
4868
4869 /* setup CCCR */
4870 writel(0x1010, ha->mem_ptr + IPS_REG_CCCR);
4871
4872 /* Enable busmastering */
4873 writeb(IPS_BIT_EBM, ha->mem_ptr + IPS_REG_SCPR);
4874
4875 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
4876 /* fix for anaconda64 */
4877 writel(0, ha->mem_ptr + IPS_REG_NDAE);
4878
4879 /* Enable interrupts */
4880 writeb(IPS_BIT_EI, ha->mem_ptr + IPS_REG_HISR);
4881
4882 /* if we get here then everything went OK */
4883 return (1);
4884}
4885
4886/****************************************************************************/
4887/* */
4888/* Routine Name: ips_init_morpheus */
4889/* */
4890/* Routine Description: */
4891/* */
4892/* Initialize a morpheus controller */
4893/* */
4894/****************************************************************************/
4895static int
4896ips_init_morpheus(ips_ha_t * ha)
4897{
4898 uint32_t Post;
4899 uint32_t Config;
4900 uint32_t Isr;
4901 uint32_t Oimr;
4902 int i;
4903
4904 METHOD_TRACE("ips_init_morpheus", 1);
4905
4906 /* Wait up to 45 secs for Post */
4907 for (i = 0; i < 45; i++) {
4908 Isr = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
4909
4910 if (Isr & IPS_BIT_I960_MSG0I)
4911 break;
4912
4913 /* Delay for 1 Second */
4914 MDELAY(IPS_ONE_SEC);
4915 }
4916
4917 if (i >= 45) {
4918 /* error occurred */
4919 IPS_PRINTK(KERN_WARNING, ha->pcidev,
4920 "timeout waiting for post.\n");
4921
4922 return (0);
4923 }
4924
4925 Post = readl(ha->mem_ptr + IPS_REG_I960_MSG0);
4926
4927 if (Post == 0x4F00) { /* If Flashing the Battery PIC */
4928 IPS_PRINTK(KERN_WARNING, ha->pcidev,
4929 "Flashing Battery PIC, Please wait ...\n");
4930
4931 /* Clear the interrupt bit */
4932 Isr = (uint32_t) IPS_BIT_I960_MSG0I;
4933 writel(Isr, ha->mem_ptr + IPS_REG_I2O_HIR);
4934
4935 for (i = 0; i < 120; i++) { /* Wait Up to 2 Min. for Completion */
4936 Post = readl(ha->mem_ptr + IPS_REG_I960_MSG0);
4937 if (Post != 0x4F00)
4938 break;
4939 /* Delay for 1 Second */
4940 MDELAY(IPS_ONE_SEC);
4941 }
4942
4943 if (i >= 120) {
4944 IPS_PRINTK(KERN_WARNING, ha->pcidev,
4945 "timeout waiting for Battery PIC Flash\n");
4946 return (0);
4947 }
4948
4949 }
4950
4951 /* Clear the interrupt bit */
4952 Isr = (uint32_t) IPS_BIT_I960_MSG0I;
4953 writel(Isr, ha->mem_ptr + IPS_REG_I2O_HIR);
4954
4955 if (Post < (IPS_GOOD_POST_STATUS << 8)) {
4956 IPS_PRINTK(KERN_WARNING, ha->pcidev,
4957 "reset controller fails (post status %x).\n", Post);
4958
4959 return (0);
4960 }
4961
4962 /* Wait up to 240 secs for config bytes */
4963 for (i = 0; i < 240; i++) {
4964 Isr = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
4965
4966 if (Isr & IPS_BIT_I960_MSG1I)
4967 break;
4968
4969 /* Delay for 1 Second */
4970 MDELAY(IPS_ONE_SEC);
4971 }
4972
4973 if (i >= 240) {
4974 /* error occurred */
4975 IPS_PRINTK(KERN_WARNING, ha->pcidev,
4976 "timeout waiting for config.\n");
4977
4978 return (0);
4979 }
4980
4981 Config = readl(ha->mem_ptr + IPS_REG_I960_MSG1);
4982
4983 /* Clear interrupt bit */
4984 Isr = (uint32_t) IPS_BIT_I960_MSG1I;
4985 writel(Isr, ha->mem_ptr + IPS_REG_I2O_HIR);
4986
4987 /* Turn on the interrupts */
4988 Oimr = readl(ha->mem_ptr + IPS_REG_I960_OIMR);
4989 Oimr &= ~0x8;
4990 writel(Oimr, ha->mem_ptr + IPS_REG_I960_OIMR);
4991
4992 /* if we get here then everything went OK */
4993
4994 /* Since we did a RESET, an EraseStripeLock may be needed */
4995 if (Post == 0xEF10) {
4996 if ((Config == 0x000F) || (Config == 0x0009))
4997 ha->requires_esl = 1;
4998 }
4999
5000 return (1);
5001}
5002
5003/****************************************************************************/
5004/* */
5005/* Routine Name: ips_reset_copperhead */
5006/* */
5007/* Routine Description: */
5008/* */
5009/* Reset the controller */
5010/* */
5011/****************************************************************************/
5012static int
5013ips_reset_copperhead(ips_ha_t * ha)
5014{
5015 int reset_counter;
5016
5017 METHOD_TRACE("ips_reset_copperhead", 1);
5018
5019 DEBUG_VAR(1, "(%s%d) ips_reset_copperhead: io addr: %x, irq: %d",
5020 ips_name, ha->host_num, ha->io_addr, ha->pcidev->irq);
5021
5022 reset_counter = 0;
5023
5024 while (reset_counter < 2) {
5025 reset_counter++;
5026
5027 outb(IPS_BIT_RST, ha->io_addr + IPS_REG_SCPR);
5028
5029 /* Delay for 1 Second */
5030 MDELAY(IPS_ONE_SEC);
5031
5032 outb(0, ha->io_addr + IPS_REG_SCPR);
5033
5034 /* Delay for 1 Second */
5035 MDELAY(IPS_ONE_SEC);
5036
5037 if ((*ha->func.init) (ha))
5038 break;
5039 else if (reset_counter >= 2) {
5040
5041 return (0);
5042 }
5043 }
5044
5045 return (1);
5046}
5047
5048/****************************************************************************/
5049/* */
5050/* Routine Name: ips_reset_copperhead_memio */
5051/* */
5052/* Routine Description: */
5053/* */
5054/* Reset the controller */
5055/* */
5056/****************************************************************************/
5057static int
5058ips_reset_copperhead_memio(ips_ha_t * ha)
5059{
5060 int reset_counter;
5061
5062 METHOD_TRACE("ips_reset_copperhead_memio", 1);
5063
5064 DEBUG_VAR(1, "(%s%d) ips_reset_copperhead_memio: mem addr: %x, irq: %d",
5065 ips_name, ha->host_num, ha->mem_addr, ha->pcidev->irq);
5066
5067 reset_counter = 0;
5068
5069 while (reset_counter < 2) {
5070 reset_counter++;
5071
5072 writeb(IPS_BIT_RST, ha->mem_ptr + IPS_REG_SCPR);
5073
5074 /* Delay for 1 Second */
5075 MDELAY(IPS_ONE_SEC);
5076
5077 writeb(0, ha->mem_ptr + IPS_REG_SCPR);
5078
5079 /* Delay for 1 Second */
5080 MDELAY(IPS_ONE_SEC);
5081
5082 if ((*ha->func.init) (ha))
5083 break;
5084 else if (reset_counter >= 2) {
5085
5086 return (0);
5087 }
5088 }
5089
5090 return (1);
5091}
5092
5093/****************************************************************************/
5094/* */
5095/* Routine Name: ips_reset_morpheus */
5096/* */
5097/* Routine Description: */
5098/* */
5099/* Reset the controller */
5100/* */
5101/****************************************************************************/
5102static int
5103ips_reset_morpheus(ips_ha_t * ha)
5104{
5105 int reset_counter;
5106 uint8_t junk;
5107
5108 METHOD_TRACE("ips_reset_morpheus", 1);
5109
5110 DEBUG_VAR(1, "(%s%d) ips_reset_morpheus: mem addr: %x, irq: %d",
5111 ips_name, ha->host_num, ha->mem_addr, ha->pcidev->irq);
5112
5113 reset_counter = 0;
5114
5115 while (reset_counter < 2) {
5116 reset_counter++;
5117
5118 writel(0x80000000, ha->mem_ptr + IPS_REG_I960_IDR);
5119
5120 /* Delay for 5 Seconds */
5121 MDELAY(5 * IPS_ONE_SEC);
5122
5123 /* Do a PCI config read to wait for adapter */
5124 pci_read_config_byte(ha->pcidev, 4, &junk);
5125
5126 if ((*ha->func.init) (ha))
5127 break;
5128 else if (reset_counter >= 2) {
5129
5130 return (0);
5131 }
5132 }
5133
5134 return (1);
5135}
5136
5137/****************************************************************************/
5138/* */
5139/* Routine Name: ips_statinit */
5140/* */
5141/* Routine Description: */
5142/* */
5143/* Initialize the status queues on the controller */
5144/* */
5145/****************************************************************************/
5146static void
5147ips_statinit(ips_ha_t * ha)
5148{
5149 uint32_t phys_status_start;
5150
5151 METHOD_TRACE("ips_statinit", 1);
5152
5153 ha->adapt->p_status_start = ha->adapt->status;
5154 ha->adapt->p_status_end = ha->adapt->status + IPS_MAX_CMDS;
5155 ha->adapt->p_status_tail = ha->adapt->status;
5156
5157 phys_status_start = ha->adapt->hw_status_start;
5158 outl(phys_status_start, ha->io_addr + IPS_REG_SQSR);
5159 outl(phys_status_start + IPS_STATUS_Q_SIZE,
5160 ha->io_addr + IPS_REG_SQER);
5161 outl(phys_status_start + IPS_STATUS_SIZE,
5162 ha->io_addr + IPS_REG_SQHR);
5163 outl(phys_status_start, ha->io_addr + IPS_REG_SQTR);
5164
5165 ha->adapt->hw_status_tail = phys_status_start;
5166}
5167
5168/****************************************************************************/
5169/* */
5170/* Routine Name: ips_statinit_memio */
5171/* */
5172/* Routine Description: */
5173/* */
5174/* Initialize the status queues on the controller */
5175/* */
5176/****************************************************************************/
5177static void
5178ips_statinit_memio(ips_ha_t * ha)
5179{
5180 uint32_t phys_status_start;
5181
5182 METHOD_TRACE("ips_statinit_memio", 1);
5183
5184 ha->adapt->p_status_start = ha->adapt->status;
5185 ha->adapt->p_status_end = ha->adapt->status + IPS_MAX_CMDS;
5186 ha->adapt->p_status_tail = ha->adapt->status;
5187
5188 phys_status_start = ha->adapt->hw_status_start;
5189 writel(phys_status_start, ha->mem_ptr + IPS_REG_SQSR);
5190 writel(phys_status_start + IPS_STATUS_Q_SIZE,
5191 ha->mem_ptr + IPS_REG_SQER);
5192 writel(phys_status_start + IPS_STATUS_SIZE, ha->mem_ptr + IPS_REG_SQHR);
5193 writel(phys_status_start, ha->mem_ptr + IPS_REG_SQTR);
5194
5195 ha->adapt->hw_status_tail = phys_status_start;
5196}
5197
5198/****************************************************************************/
5199/* */
5200/* Routine Name: ips_statupd_copperhead */
5201/* */
5202/* Routine Description: */
5203/* */
5204/* Remove an element from the status queue */
5205/* */
5206/****************************************************************************/
5207static uint32_t
5208ips_statupd_copperhead(ips_ha_t * ha)
5209{
5210 METHOD_TRACE("ips_statupd_copperhead", 1);
5211
5212 if (ha->adapt->p_status_tail != ha->adapt->p_status_end) {
5213 ha->adapt->p_status_tail++;
5214 ha->adapt->hw_status_tail += sizeof (IPS_STATUS);
5215 } else {
5216 ha->adapt->p_status_tail = ha->adapt->p_status_start;
5217 ha->adapt->hw_status_tail = ha->adapt->hw_status_start;
5218 }
5219
5220 outl(ha->adapt->hw_status_tail,
5221 ha->io_addr + IPS_REG_SQTR);
5222
5223 return (ha->adapt->p_status_tail->value);
5224}
5225
5226/****************************************************************************/
5227/* */
5228/* Routine Name: ips_statupd_copperhead_memio */
5229/* */
5230/* Routine Description: */
5231/* */
5232/* Remove an element from the status queue */
5233/* */
5234/****************************************************************************/
5235static uint32_t
5236ips_statupd_copperhead_memio(ips_ha_t * ha)
5237{
5238 METHOD_TRACE("ips_statupd_copperhead_memio", 1);
5239
5240 if (ha->adapt->p_status_tail != ha->adapt->p_status_end) {
5241 ha->adapt->p_status_tail++;
5242 ha->adapt->hw_status_tail += sizeof (IPS_STATUS);
5243 } else {
5244 ha->adapt->p_status_tail = ha->adapt->p_status_start;
5245 ha->adapt->hw_status_tail = ha->adapt->hw_status_start;
5246 }
5247
5248 writel(ha->adapt->hw_status_tail, ha->mem_ptr + IPS_REG_SQTR);
5249
5250 return (ha->adapt->p_status_tail->value);
5251}
5252
5253/****************************************************************************/
5254/* */
5255/* Routine Name: ips_statupd_morpheus */
5256/* */
5257/* Routine Description: */
5258/* */
5259/* Remove an element from the status queue */
5260/* */
5261/****************************************************************************/
5262static uint32_t
5263ips_statupd_morpheus(ips_ha_t * ha)
5264{
5265 uint32_t val;
5266
5267 METHOD_TRACE("ips_statupd_morpheus", 1);
5268
5269 val = readl(ha->mem_ptr + IPS_REG_I2O_OUTMSGQ);
5270
5271 return (val);
5272}
5273
5274/****************************************************************************/
5275/* */
5276/* Routine Name: ips_issue_copperhead */
5277/* */
5278/* Routine Description: */
5279/* */
5280/* Send a command down to the controller */
5281/* */
5282/****************************************************************************/
5283static int
5284ips_issue_copperhead(ips_ha_t * ha, ips_scb_t * scb)
5285{
5286 uint32_t TimeOut;
5287 uint32_t val;
5288
5289 METHOD_TRACE("ips_issue_copperhead", 1);
5290
5291 if (scb->scsi_cmd) {
5292 DEBUG_VAR(2, "(%s%d) ips_issue: cmd 0x%X id %d (%d %d %d)",
5293 ips_name,
5294 ha->host_num,
5295 scb->cdb[0],
5296 scb->cmd.basic_io.command_id,
5297 scb->bus, scb->target_id, scb->lun);
5298 } else {
5299 DEBUG_VAR(2, KERN_NOTICE "(%s%d) ips_issue: logical cmd id %d",
5300 ips_name, ha->host_num, scb->cmd.basic_io.command_id);
5301 }
5302
5303 TimeOut = 0;
5304
5305 while ((val =
5306 le32_to_cpu(inl(ha->io_addr + IPS_REG_CCCR))) & IPS_BIT_SEM) {
5307 udelay(1000);
5308
5309 if (++TimeOut >= IPS_SEM_TIMEOUT) {
5310 if (!(val & IPS_BIT_START_STOP))
5311 break;
5312
5313 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5314 "ips_issue val [0x%x].\n", val);
5315 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5316 "ips_issue semaphore chk timeout.\n");
5317
5318 return (IPS_FAILURE);
5319 } /* end if */
5320 } /* end while */
5321
5322 outl(scb->scb_busaddr, ha->io_addr + IPS_REG_CCSAR);
5323 outw(IPS_BIT_START_CMD, ha->io_addr + IPS_REG_CCCR);
5324
5325 return (IPS_SUCCESS);
5326}
5327
5328/****************************************************************************/
5329/* */
5330/* Routine Name: ips_issue_copperhead_memio */
5331/* */
5332/* Routine Description: */
5333/* */
5334/* Send a command down to the controller */
5335/* */
5336/****************************************************************************/
5337static int
5338ips_issue_copperhead_memio(ips_ha_t * ha, ips_scb_t * scb)
5339{
5340 uint32_t TimeOut;
5341 uint32_t val;
5342
5343 METHOD_TRACE("ips_issue_copperhead_memio", 1);
5344
5345 if (scb->scsi_cmd) {
5346 DEBUG_VAR(2, "(%s%d) ips_issue: cmd 0x%X id %d (%d %d %d)",
5347 ips_name,
5348 ha->host_num,
5349 scb->cdb[0],
5350 scb->cmd.basic_io.command_id,
5351 scb->bus, scb->target_id, scb->lun);
5352 } else {
5353 DEBUG_VAR(2, "(%s%d) ips_issue: logical cmd id %d",
5354 ips_name, ha->host_num, scb->cmd.basic_io.command_id);
5355 }
5356
5357 TimeOut = 0;
5358
5359 while ((val = readl(ha->mem_ptr + IPS_REG_CCCR)) & IPS_BIT_SEM) {
5360 udelay(1000);
5361
5362 if (++TimeOut >= IPS_SEM_TIMEOUT) {
5363 if (!(val & IPS_BIT_START_STOP))
5364 break;
5365
5366 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5367 "ips_issue val [0x%x].\n", val);
5368 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5369 "ips_issue semaphore chk timeout.\n");
5370
5371 return (IPS_FAILURE);
5372 } /* end if */
5373 } /* end while */
5374
5375 writel(scb->scb_busaddr, ha->mem_ptr + IPS_REG_CCSAR);
5376 writel(IPS_BIT_START_CMD, ha->mem_ptr + IPS_REG_CCCR);
5377
5378 return (IPS_SUCCESS);
5379}
5380
5381/****************************************************************************/
5382/* */
5383/* Routine Name: ips_issue_i2o */
5384/* */
5385/* Routine Description: */
5386/* */
5387/* Send a command down to the controller */
5388/* */
5389/****************************************************************************/
5390static int
5391ips_issue_i2o(ips_ha_t * ha, ips_scb_t * scb)
5392{
5393
5394 METHOD_TRACE("ips_issue_i2o", 1);
5395
5396 if (scb->scsi_cmd) {
5397 DEBUG_VAR(2, "(%s%d) ips_issue: cmd 0x%X id %d (%d %d %d)",
5398 ips_name,
5399 ha->host_num,
5400 scb->cdb[0],
5401 scb->cmd.basic_io.command_id,
5402 scb->bus, scb->target_id, scb->lun);
5403 } else {
5404 DEBUG_VAR(2, "(%s%d) ips_issue: logical cmd id %d",
5405 ips_name, ha->host_num, scb->cmd.basic_io.command_id);
5406 }
5407
5408 outl(scb->scb_busaddr, ha->io_addr + IPS_REG_I2O_INMSGQ);
5409
5410 return (IPS_SUCCESS);
5411}
5412
5413/****************************************************************************/
5414/* */
5415/* Routine Name: ips_issue_i2o_memio */
5416/* */
5417/* Routine Description: */
5418/* */
5419/* Send a command down to the controller */
5420/* */
5421/****************************************************************************/
5422static int
5423ips_issue_i2o_memio(ips_ha_t * ha, ips_scb_t * scb)
5424{
5425
5426 METHOD_TRACE("ips_issue_i2o_memio", 1);
5427
5428 if (scb->scsi_cmd) {
5429 DEBUG_VAR(2, "(%s%d) ips_issue: cmd 0x%X id %d (%d %d %d)",
5430 ips_name,
5431 ha->host_num,
5432 scb->cdb[0],
5433 scb->cmd.basic_io.command_id,
5434 scb->bus, scb->target_id, scb->lun);
5435 } else {
5436 DEBUG_VAR(2, "(%s%d) ips_issue: logical cmd id %d",
5437 ips_name, ha->host_num, scb->cmd.basic_io.command_id);
5438 }
5439
5440 writel(scb->scb_busaddr, ha->mem_ptr + IPS_REG_I2O_INMSGQ);
5441
5442 return (IPS_SUCCESS);
5443}
5444
5445/****************************************************************************/
5446/* */
5447/* Routine Name: ips_isintr_copperhead */
5448/* */
5449/* Routine Description: */
5450/* */
5451/* Test to see if an interrupt is for us */
5452/* */
5453/****************************************************************************/
5454static int
5455ips_isintr_copperhead(ips_ha_t * ha)
5456{
5457 uint8_t Isr;
5458
5459 METHOD_TRACE("ips_isintr_copperhead", 2);
5460
5461 Isr = inb(ha->io_addr + IPS_REG_HISR);
5462
5463 if (Isr == 0xFF)
5464 /* ?!?! Nothing really there */
5465 return (0);
5466
5467 if (Isr & IPS_BIT_SCE)
5468 return (1);
5469 else if (Isr & (IPS_BIT_SQO | IPS_BIT_GHI)) {
5470 /* status queue overflow or GHI */
5471 /* just clear the interrupt */
5472 outb(Isr, ha->io_addr + IPS_REG_HISR);
5473 }
5474
5475 return (0);
5476}
5477
5478/****************************************************************************/
5479/* */
5480/* Routine Name: ips_isintr_copperhead_memio */
5481/* */
5482/* Routine Description: */
5483/* */
5484/* Test to see if an interrupt is for us */
5485/* */
5486/****************************************************************************/
5487static int
5488ips_isintr_copperhead_memio(ips_ha_t * ha)
5489{
5490 uint8_t Isr;
5491
5492 METHOD_TRACE("ips_isintr_memio", 2);
5493
5494 Isr = readb(ha->mem_ptr + IPS_REG_HISR);
5495
5496 if (Isr == 0xFF)
5497 /* ?!?! Nothing really there */
5498 return (0);
5499
5500 if (Isr & IPS_BIT_SCE)
5501 return (1);
5502 else if (Isr & (IPS_BIT_SQO | IPS_BIT_GHI)) {
5503 /* status queue overflow or GHI */
5504 /* just clear the interrupt */
5505 writeb(Isr, ha->mem_ptr + IPS_REG_HISR);
5506 }
5507
5508 return (0);
5509}
5510
5511/****************************************************************************/
5512/* */
5513/* Routine Name: ips_isintr_morpheus */
5514/* */
5515/* Routine Description: */
5516/* */
5517/* Test to see if an interrupt is for us */
5518/* */
5519/****************************************************************************/
5520static int
5521ips_isintr_morpheus(ips_ha_t * ha)
5522{
5523 uint32_t Isr;
5524
5525 METHOD_TRACE("ips_isintr_morpheus", 2);
5526
5527 Isr = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
5528
5529 if (Isr & IPS_BIT_I2O_OPQI)
5530 return (1);
5531 else
5532 return (0);
5533}
5534
5535/****************************************************************************/
5536/* */
5537/* Routine Name: ips_wait */
5538/* */
5539/* Routine Description: */
5540/* */
5541/* Wait for a command to complete */
5542/* */
5543/****************************************************************************/
5544static int
5545ips_wait(ips_ha_t * ha, int time, int intr)
5546{
5547 int ret;
5548 int done;
5549
5550 METHOD_TRACE("ips_wait", 1);
5551
5552 ret = IPS_FAILURE;
5553 done = FALSE;
5554
5555 time *= IPS_ONE_SEC; /* convert seconds */
5556
5557 while ((time > 0) && (!done)) {
5558 if (intr == IPS_INTR_ON) {
5559 if (ha->waitflag == FALSE) {
5560 ret = IPS_SUCCESS;
5561 done = TRUE;
5562 break;
5563 }
5564 } else if (intr == IPS_INTR_IORL) {
5565 if (ha->waitflag == FALSE) {
5566 /*
5567 * controller generated an interrupt to
5568 * acknowledge completion of the command
5569 * and ips_intr() has serviced the interrupt.
5570 */
5571 ret = IPS_SUCCESS;
5572 done = TRUE;
5573 break;
5574 }
5575
5576 /*
5577 * NOTE: we already have the io_request_lock so
5578 * even if we get an interrupt it won't get serviced
5579 * until after we finish.
5580 */
5581
5582 (*ha->func.intr) (ha);
5583 }
5584
5585 /* This looks like a very evil loop, but it only does this during start-up */
5586 udelay(1000);
5587 time--;
5588 }
5589
5590 return (ret);
5591}
5592
5593/****************************************************************************/
5594/* */
5595/* Routine Name: ips_write_driver_status */
5596/* */
5597/* Routine Description: */
5598/* */
5599/* Write OS/Driver version to Page 5 of the nvram on the controller */
5600/* */
5601/****************************************************************************/
5602static int
5603ips_write_driver_status(ips_ha_t * ha, int intr)
5604{
5605 METHOD_TRACE("ips_write_driver_status", 1);
5606
5607 if (!ips_readwrite_page5(ha, FALSE, intr)) {
5608 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5609 "unable to read NVRAM page 5.\n");
5610
5611 return (0);
5612 }
5613
5614 /* check to make sure the page has a valid */
5615 /* signature */
5616 if (le32_to_cpu(ha->nvram->signature) != IPS_NVRAM_P5_SIG) {
5617 DEBUG_VAR(1,
5618 "(%s%d) NVRAM page 5 has an invalid signature: %X.",
5619 ips_name, ha->host_num, ha->nvram->signature);
5620 ha->nvram->signature = IPS_NVRAM_P5_SIG;
5621 }
5622
5623 DEBUG_VAR(2,
5624 "(%s%d) Ad Type: %d, Ad Slot: %d, BIOS: %c%c%c%c %c%c%c%c.",
5625 ips_name, ha->host_num, le16_to_cpu(ha->nvram->adapter_type),
5626 ha->nvram->adapter_slot, ha->nvram->bios_high[0],
5627 ha->nvram->bios_high[1], ha->nvram->bios_high[2],
5628 ha->nvram->bios_high[3], ha->nvram->bios_low[0],
5629 ha->nvram->bios_low[1], ha->nvram->bios_low[2],
5630 ha->nvram->bios_low[3]);
5631
5632 ips_get_bios_version(ha, intr);
5633
5634 /* change values (as needed) */
5635 ha->nvram->operating_system = IPS_OS_LINUX;
5636 ha->nvram->adapter_type = ha->ad_type;
5637 strncpy((char *) ha->nvram->driver_high, IPS_VERSION_HIGH, 4);
5638 strncpy((char *) ha->nvram->driver_low, IPS_VERSION_LOW, 4);
5639 strncpy((char *) ha->nvram->bios_high, ha->bios_version, 4);
5640 strncpy((char *) ha->nvram->bios_low, ha->bios_version + 4, 4);
5641
5642 ha->nvram->versioning = 0; /* Indicate the Driver Does Not Support Versioning */
5643
5644 /* now update the page */
5645 if (!ips_readwrite_page5(ha, TRUE, intr)) {
5646 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5647 "unable to write NVRAM page 5.\n");
5648
5649 return (0);
5650 }
5651
5652 /* IF NVRAM Page 5 is OK, Use it for Slot Number Info Because Linux Doesn't Do Slots */
5653 ha->slot_num = ha->nvram->adapter_slot;
5654
5655 return (1);
5656}
5657
5658/****************************************************************************/
5659/* */
5660/* Routine Name: ips_read_adapter_status */
5661/* */
5662/* Routine Description: */
5663/* */
5664/* Do an Inquiry command to the adapter */
5665/* */
5666/****************************************************************************/
5667static int
5668ips_read_adapter_status(ips_ha_t * ha, int intr)
5669{
5670 ips_scb_t *scb;
5671 int ret;
5672
5673 METHOD_TRACE("ips_read_adapter_status", 1);
5674
5675 scb = &ha->scbs[ha->max_cmds - 1];
5676
5677 ips_init_scb(ha, scb);
5678
5679 scb->timeout = ips_cmd_timeout;
5680 scb->cdb[0] = IPS_CMD_ENQUIRY;
5681
5682 scb->cmd.basic_io.op_code = IPS_CMD_ENQUIRY;
5683 scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
5684 scb->cmd.basic_io.sg_count = 0;
5685 scb->cmd.basic_io.lba = 0;
5686 scb->cmd.basic_io.sector_count = 0;
5687 scb->cmd.basic_io.log_drv = 0;
5688 scb->data_len = sizeof (*ha->enq);
5689 scb->cmd.basic_io.sg_addr = ha->enq_busaddr;
5690
5691 /* send command */
5692 if (((ret =
5693 ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5694 || (ret == IPS_SUCCESS_IMM)
5695 || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1))
5696 return (0);
5697
5698 return (1);
5699}
5700
5701/****************************************************************************/
5702/* */
5703/* Routine Name: ips_read_subsystem_parameters */
5704/* */
5705/* Routine Description: */
5706/* */
5707/* Read subsystem parameters from the adapter */
5708/* */
5709/****************************************************************************/
5710static int
5711ips_read_subsystem_parameters(ips_ha_t * ha, int intr)
5712{
5713 ips_scb_t *scb;
5714 int ret;
5715
5716 METHOD_TRACE("ips_read_subsystem_parameters", 1);
5717
5718 scb = &ha->scbs[ha->max_cmds - 1];
5719
5720 ips_init_scb(ha, scb);
5721
5722 scb->timeout = ips_cmd_timeout;
5723 scb->cdb[0] = IPS_CMD_GET_SUBSYS;
5724
5725 scb->cmd.basic_io.op_code = IPS_CMD_GET_SUBSYS;
5726 scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
5727 scb->cmd.basic_io.sg_count = 0;
5728 scb->cmd.basic_io.lba = 0;
5729 scb->cmd.basic_io.sector_count = 0;
5730 scb->cmd.basic_io.log_drv = 0;
5731 scb->data_len = sizeof (*ha->subsys);
5732 scb->cmd.basic_io.sg_addr = ha->ioctl_busaddr;
5733
5734 /* send command */
5735 if (((ret =
5736 ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5737 || (ret == IPS_SUCCESS_IMM)
5738 || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1))
5739 return (0);
5740
5741 memcpy(ha->subsys, ha->ioctl_data, sizeof(*ha->subsys));
5742 return (1);
5743}
5744
5745/****************************************************************************/
5746/* */
5747/* Routine Name: ips_read_config */
5748/* */
5749/* Routine Description: */
5750/* */
5751/* Read the configuration on the adapter */
5752/* */
5753/****************************************************************************/
5754static int
5755ips_read_config(ips_ha_t * ha, int intr)
5756{
5757 ips_scb_t *scb;
5758 int i;
5759 int ret;
5760
5761 METHOD_TRACE("ips_read_config", 1);
5762
5763 /* set defaults for initiator IDs */
5764 for (i = 0; i < 4; i++)
5765 ha->conf->init_id[i] = 7;
5766
5767 scb = &ha->scbs[ha->max_cmds - 1];
5768
5769 ips_init_scb(ha, scb);
5770
5771 scb->timeout = ips_cmd_timeout;
5772 scb->cdb[0] = IPS_CMD_READ_CONF;
5773
5774 scb->cmd.basic_io.op_code = IPS_CMD_READ_CONF;
5775 scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
5776 scb->data_len = sizeof (*ha->conf);
5777 scb->cmd.basic_io.sg_addr = ha->ioctl_busaddr;
5778
5779 /* send command */
5780 if (((ret =
5781 ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5782 || (ret == IPS_SUCCESS_IMM)
5783 || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1)) {
5784
5785 memset(ha->conf, 0, sizeof (IPS_CONF));
5786
5787 /* reset initiator IDs */
5788 for (i = 0; i < 4; i++)
5789 ha->conf->init_id[i] = 7;
5790
5791 /* Allow Completed with Errors, so JCRM can access the Adapter to fix the problems */
5792 if ((scb->basic_status & IPS_GSC_STATUS_MASK) ==
5793 IPS_CMD_CMPLT_WERROR)
5794 return (1);
5795
5796 return (0);
5797 }
5798
5799 memcpy(ha->conf, ha->ioctl_data, sizeof(*ha->conf));
5800 return (1);
5801}
5802
5803/****************************************************************************/
5804/* */
5805/* Routine Name: ips_readwrite_page5 */
5806/* */
5807/* Routine Description: */
5808/* */
5809/* Read nvram page 5 from the adapter */
5810/* */
5811/****************************************************************************/
5812static int
5813ips_readwrite_page5(ips_ha_t * ha, int write, int intr)
5814{
5815 ips_scb_t *scb;
5816 int ret;
5817
5818 METHOD_TRACE("ips_readwrite_page5", 1);
5819
5820 scb = &ha->scbs[ha->max_cmds - 1];
5821
5822 ips_init_scb(ha, scb);
5823
5824 scb->timeout = ips_cmd_timeout;
5825 scb->cdb[0] = IPS_CMD_RW_NVRAM_PAGE;
5826
5827 scb->cmd.nvram.op_code = IPS_CMD_RW_NVRAM_PAGE;
5828 scb->cmd.nvram.command_id = IPS_COMMAND_ID(ha, scb);
5829 scb->cmd.nvram.page = 5;
5830 scb->cmd.nvram.write = write;
5831 scb->cmd.nvram.reserved = 0;
5832 scb->cmd.nvram.reserved2 = 0;
5833 scb->data_len = sizeof (*ha->nvram);
5834 scb->cmd.nvram.buffer_addr = ha->ioctl_busaddr;
5835 if (write)
5836 memcpy(ha->ioctl_data, ha->nvram, sizeof(*ha->nvram));
5837
5838 /* issue the command */
5839 if (((ret =
5840 ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5841 || (ret == IPS_SUCCESS_IMM)
5842 || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1)) {
5843
5844 memset(ha->nvram, 0, sizeof (IPS_NVRAM_P5));
5845
5846 return (0);
5847 }
5848 if (!write)
5849 memcpy(ha->nvram, ha->ioctl_data, sizeof(*ha->nvram));
5850 return (1);
5851}
5852
5853/****************************************************************************/
5854/* */
5855/* Routine Name: ips_clear_adapter */
5856/* */
5857/* Routine Description: */
5858/* */
5859/* Clear the stripe lock tables */
5860/* */
5861/****************************************************************************/
5862static int
5863ips_clear_adapter(ips_ha_t * ha, int intr)
5864{
5865 ips_scb_t *scb;
5866 int ret;
5867
5868 METHOD_TRACE("ips_clear_adapter", 1);
5869
5870 scb = &ha->scbs[ha->max_cmds - 1];
5871
5872 ips_init_scb(ha, scb);
5873
5874 scb->timeout = ips_reset_timeout;
5875 scb->cdb[0] = IPS_CMD_CONFIG_SYNC;
5876
5877 scb->cmd.config_sync.op_code = IPS_CMD_CONFIG_SYNC;
5878 scb->cmd.config_sync.command_id = IPS_COMMAND_ID(ha, scb);
5879 scb->cmd.config_sync.channel = 0;
5880 scb->cmd.config_sync.source_target = IPS_POCL;
5881 scb->cmd.config_sync.reserved = 0;
5882 scb->cmd.config_sync.reserved2 = 0;
5883 scb->cmd.config_sync.reserved3 = 0;
5884
5885 /* issue command */
5886 if (((ret =
5887 ips_send_wait(ha, scb, ips_reset_timeout, intr)) == IPS_FAILURE)
5888 || (ret == IPS_SUCCESS_IMM)
5889 || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1))
5890 return (0);
5891
5892 /* send unlock stripe command */
5893 ips_init_scb(ha, scb);
5894
5895 scb->cdb[0] = IPS_CMD_ERROR_TABLE;
5896 scb->timeout = ips_reset_timeout;
5897
5898 scb->cmd.unlock_stripe.op_code = IPS_CMD_ERROR_TABLE;
5899 scb->cmd.unlock_stripe.command_id = IPS_COMMAND_ID(ha, scb);
5900 scb->cmd.unlock_stripe.log_drv = 0;
5901 scb->cmd.unlock_stripe.control = IPS_CSL;
5902 scb->cmd.unlock_stripe.reserved = 0;
5903 scb->cmd.unlock_stripe.reserved2 = 0;
5904 scb->cmd.unlock_stripe.reserved3 = 0;
5905
5906 /* issue command */
5907 if (((ret =
5908 ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5909 || (ret == IPS_SUCCESS_IMM)
5910 || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1))
5911 return (0);
5912
5913 return (1);
5914}
5915
5916/****************************************************************************/
5917/* */
5918/* Routine Name: ips_ffdc_reset */
5919/* */
5920/* Routine Description: */
5921/* */
5922/* FFDC: write reset info */
5923/* */
5924/****************************************************************************/
5925static void
5926ips_ffdc_reset(ips_ha_t * ha, int intr)
5927{
5928 ips_scb_t *scb;
5929
5930 METHOD_TRACE("ips_ffdc_reset", 1);
5931
5932 scb = &ha->scbs[ha->max_cmds - 1];
5933
5934 ips_init_scb(ha, scb);
5935
5936 scb->timeout = ips_cmd_timeout;
5937 scb->cdb[0] = IPS_CMD_FFDC;
5938 scb->cmd.ffdc.op_code = IPS_CMD_FFDC;
5939 scb->cmd.ffdc.command_id = IPS_COMMAND_ID(ha, scb);
5940 scb->cmd.ffdc.reset_count = ha->reset_count;
5941 scb->cmd.ffdc.reset_type = 0x80;
5942
5943 /* convert time to what the card wants */
5944 ips_fix_ffdc_time(ha, scb, ha->last_ffdc);
5945
5946 /* issue command */
5947 ips_send_wait(ha, scb, ips_cmd_timeout, intr);
5948}
5949
5950/****************************************************************************/
5951/* */
5952/* Routine Name: ips_ffdc_time */
5953/* */
5954/* Routine Description: */
5955/* */
5956/* FFDC: write time info */
5957/* */
5958/****************************************************************************/
5959static void
5960ips_ffdc_time(ips_ha_t * ha)
5961{
5962 ips_scb_t *scb;
5963
5964 METHOD_TRACE("ips_ffdc_time", 1);
5965
5966 DEBUG_VAR(1, "(%s%d) Sending time update.", ips_name, ha->host_num);
5967
5968 scb = &ha->scbs[ha->max_cmds - 1];
5969
5970 ips_init_scb(ha, scb);
5971
5972 scb->timeout = ips_cmd_timeout;
5973 scb->cdb[0] = IPS_CMD_FFDC;
5974 scb->cmd.ffdc.op_code = IPS_CMD_FFDC;
5975 scb->cmd.ffdc.command_id = IPS_COMMAND_ID(ha, scb);
5976 scb->cmd.ffdc.reset_count = 0;
5977 scb->cmd.ffdc.reset_type = 0;
5978
5979 /* convert time to what the card wants */
5980 ips_fix_ffdc_time(ha, scb, ha->last_ffdc);
5981
5982 /* issue command */
5983 ips_send_wait(ha, scb, ips_cmd_timeout, IPS_FFDC);
5984}
5985
5986/****************************************************************************/
5987/* */
5988/* Routine Name: ips_fix_ffdc_time */
5989/* */
5990/* Routine Description: */
5991/* Adjust time_t to what the card wants */
5992/* */
5993/****************************************************************************/
5994static void
5995ips_fix_ffdc_time(ips_ha_t * ha, ips_scb_t * scb, time_t current_time)
5996{
5997 long days;
5998 long rem;
5999 int i;
6000 int year;
6001 int yleap;
6002 int year_lengths[2] = { IPS_DAYS_NORMAL_YEAR, IPS_DAYS_LEAP_YEAR };
6003 int month_lengths[12][2] = { {31, 31},
6004 {28, 29},
6005 {31, 31},
6006 {30, 30},
6007 {31, 31},
6008 {30, 30},
6009 {31, 31},
6010 {31, 31},
6011 {30, 30},
6012 {31, 31},
6013 {30, 30},
6014 {31, 31}
6015 };
6016
6017 METHOD_TRACE("ips_fix_ffdc_time", 1);
6018
6019 days = current_time / IPS_SECS_DAY;
6020 rem = current_time % IPS_SECS_DAY;
6021
6022 scb->cmd.ffdc.hour = (rem / IPS_SECS_HOUR);
6023 rem = rem % IPS_SECS_HOUR;
6024 scb->cmd.ffdc.minute = (rem / IPS_SECS_MIN);
6025 scb->cmd.ffdc.second = (rem % IPS_SECS_MIN);
6026
6027 year = IPS_EPOCH_YEAR;
6028 while (days < 0 || days >= year_lengths[yleap = IPS_IS_LEAP_YEAR(year)]) {
6029 int newy;
6030
6031 newy = year + (days / IPS_DAYS_NORMAL_YEAR);
6032 if (days < 0)
6033 --newy;
6034 days -= (newy - year) * IPS_DAYS_NORMAL_YEAR +
6035 IPS_NUM_LEAP_YEARS_THROUGH(newy - 1) -
6036 IPS_NUM_LEAP_YEARS_THROUGH(year - 1);
6037 year = newy;
6038 }
6039
6040 scb->cmd.ffdc.yearH = year / 100;
6041 scb->cmd.ffdc.yearL = year % 100;
6042
6043 for (i = 0; days >= month_lengths[i][yleap]; ++i)
6044 days -= month_lengths[i][yleap];
6045
6046 scb->cmd.ffdc.month = i + 1;
6047 scb->cmd.ffdc.day = days + 1;
6048}
6049
6050/****************************************************************************
6051 * BIOS Flash Routines *
6052 ****************************************************************************/
6053
6054/****************************************************************************/
6055/* */
6056/* Routine Name: ips_erase_bios */
6057/* */
6058/* Routine Description: */
6059/* Erase the BIOS on the adapter */
6060/* */
6061/****************************************************************************/
6062static int
6063ips_erase_bios(ips_ha_t * ha)
6064{
6065 int timeout;
6066 uint8_t status = 0;
6067
6068 METHOD_TRACE("ips_erase_bios", 1);
6069
6070 status = 0;
6071
6072 /* Clear the status register */
6073 outl(0, ha->io_addr + IPS_REG_FLAP);
6074 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6075 udelay(25); /* 25 us */
6076
6077 outb(0x50, ha->io_addr + IPS_REG_FLDP);
6078 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6079 udelay(25); /* 25 us */
6080
6081 /* Erase Setup */
6082 outb(0x20, ha->io_addr + IPS_REG_FLDP);
6083 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6084 udelay(25); /* 25 us */
6085
6086 /* Erase Confirm */
6087 outb(0xD0, ha->io_addr + IPS_REG_FLDP);
6088 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6089 udelay(25); /* 25 us */
6090
6091 /* Erase Status */
6092 outb(0x70, ha->io_addr + IPS_REG_FLDP);
6093 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6094 udelay(25); /* 25 us */
6095
6096 timeout = 80000; /* 80 seconds */
6097
6098 while (timeout > 0) {
6099 if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6100 outl(0, ha->io_addr + IPS_REG_FLAP);
6101 udelay(25); /* 25 us */
6102 }
6103
6104 status = inb(ha->io_addr + IPS_REG_FLDP);
6105
6106 if (status & 0x80)
6107 break;
6108
6109 MDELAY(1);
6110 timeout--;
6111 }
6112
6113 /* check for timeout */
6114 if (timeout <= 0) {
6115 /* timeout */
6116
6117 /* try to suspend the erase */
6118 outb(0xB0, ha->io_addr + IPS_REG_FLDP);
6119 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6120 udelay(25); /* 25 us */
6121
6122 /* wait for 10 seconds */
6123 timeout = 10000;
6124 while (timeout > 0) {
6125 if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6126 outl(0, ha->io_addr + IPS_REG_FLAP);
6127 udelay(25); /* 25 us */
6128 }
6129
6130 status = inb(ha->io_addr + IPS_REG_FLDP);
6131
6132 if (status & 0xC0)
6133 break;
6134
6135 MDELAY(1);
6136 timeout--;
6137 }
6138
6139 return (1);
6140 }
6141
6142 /* check for valid VPP */
6143 if (status & 0x08)
6144 /* VPP failure */
6145 return (1);
6146
6147 /* check for successful flash */
6148 if (status & 0x30)
6149 /* sequence error */
6150 return (1);
6151
6152 /* Otherwise, we were successful */
6153 /* clear status */
6154 outb(0x50, ha->io_addr + IPS_REG_FLDP);
6155 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6156 udelay(25); /* 25 us */
6157
6158 /* enable reads */
6159 outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6160 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6161 udelay(25); /* 25 us */
6162
6163 return (0);
6164}
6165
6166/****************************************************************************/
6167/* */
6168/* Routine Name: ips_erase_bios_memio */
6169/* */
6170/* Routine Description: */
6171/* Erase the BIOS on the adapter */
6172/* */
6173/****************************************************************************/
6174static int
6175ips_erase_bios_memio(ips_ha_t * ha)
6176{
6177 int timeout;
6178 uint8_t status;
6179
6180 METHOD_TRACE("ips_erase_bios_memio", 1);
6181
6182 status = 0;
6183
6184 /* Clear the status register */
6185 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6186 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6187 udelay(25); /* 25 us */
6188
6189 writeb(0x50, ha->mem_ptr + IPS_REG_FLDP);
6190 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6191 udelay(25); /* 25 us */
6192
6193 /* Erase Setup */
6194 writeb(0x20, ha->mem_ptr + IPS_REG_FLDP);
6195 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6196 udelay(25); /* 25 us */
6197
6198 /* Erase Confirm */
6199 writeb(0xD0, ha->mem_ptr + IPS_REG_FLDP);
6200 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6201 udelay(25); /* 25 us */
6202
6203 /* Erase Status */
6204 writeb(0x70, ha->mem_ptr + IPS_REG_FLDP);
6205 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6206 udelay(25); /* 25 us */
6207
6208 timeout = 80000; /* 80 seconds */
6209
6210 while (timeout > 0) {
6211 if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6212 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6213 udelay(25); /* 25 us */
6214 }
6215
6216 status = readb(ha->mem_ptr + IPS_REG_FLDP);
6217
6218 if (status & 0x80)
6219 break;
6220
6221 MDELAY(1);
6222 timeout--;
6223 }
6224
6225 /* check for timeout */
6226 if (timeout <= 0) {
6227 /* timeout */
6228
6229 /* try to suspend the erase */
6230 writeb(0xB0, ha->mem_ptr + IPS_REG_FLDP);
6231 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6232 udelay(25); /* 25 us */
6233
6234 /* wait for 10 seconds */
6235 timeout = 10000;
6236 while (timeout > 0) {
6237 if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6238 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6239 udelay(25); /* 25 us */
6240 }
6241
6242 status = readb(ha->mem_ptr + IPS_REG_FLDP);
6243
6244 if (status & 0xC0)
6245 break;
6246
6247 MDELAY(1);
6248 timeout--;
6249 }
6250
6251 return (1);
6252 }
6253
6254 /* check for valid VPP */
6255 if (status & 0x08)
6256 /* VPP failure */
6257 return (1);
6258
6259 /* check for successful flash */
6260 if (status & 0x30)
6261 /* sequence error */
6262 return (1);
6263
6264 /* Otherwise, we were successful */
6265 /* clear status */
6266 writeb(0x50, ha->mem_ptr + IPS_REG_FLDP);
6267 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6268 udelay(25); /* 25 us */
6269
6270 /* enable reads */
6271 writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6272 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6273 udelay(25); /* 25 us */
6274
6275 return (0);
6276}
6277
6278/****************************************************************************/
6279/* */
6280/* Routine Name: ips_program_bios */
6281/* */
6282/* Routine Description: */
6283/* Program the BIOS on the adapter */
6284/* */
6285/****************************************************************************/
6286static int
6287ips_program_bios(ips_ha_t * ha, char *buffer, uint32_t buffersize,
6288 uint32_t offset)
6289{
6290 int i;
6291 int timeout;
6292 uint8_t status = 0;
6293
6294 METHOD_TRACE("ips_program_bios", 1);
6295
6296 status = 0;
6297
6298 for (i = 0; i < buffersize; i++) {
6299 /* write a byte */
6300 outl(i + offset, ha->io_addr + IPS_REG_FLAP);
6301 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6302 udelay(25); /* 25 us */
6303
6304 outb(0x40, ha->io_addr + IPS_REG_FLDP);
6305 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6306 udelay(25); /* 25 us */
6307
6308 outb(buffer[i], ha->io_addr + IPS_REG_FLDP);
6309 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6310 udelay(25); /* 25 us */
6311
6312 /* wait up to one second */
6313 timeout = 1000;
6314 while (timeout > 0) {
6315 if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6316 outl(0, ha->io_addr + IPS_REG_FLAP);
6317 udelay(25); /* 25 us */
6318 }
6319
6320 status = inb(ha->io_addr + IPS_REG_FLDP);
6321
6322 if (status & 0x80)
6323 break;
6324
6325 MDELAY(1);
6326 timeout--;
6327 }
6328
6329 if (timeout == 0) {
6330 /* timeout error */
6331 outl(0, ha->io_addr + IPS_REG_FLAP);
6332 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6333 udelay(25); /* 25 us */
6334
6335 outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6336 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6337 udelay(25); /* 25 us */
6338
6339 return (1);
6340 }
6341
6342 /* check the status */
6343 if (status & 0x18) {
6344 /* programming error */
6345 outl(0, ha->io_addr + IPS_REG_FLAP);
6346 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6347 udelay(25); /* 25 us */
6348
6349 outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6350 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6351 udelay(25); /* 25 us */
6352
6353 return (1);
6354 }
6355 } /* end for */
6356
6357 /* Enable reading */
6358 outl(0, ha->io_addr + IPS_REG_FLAP);
6359 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6360 udelay(25); /* 25 us */
6361
6362 outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6363 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6364 udelay(25); /* 25 us */
6365
6366 return (0);
6367}
6368
6369/****************************************************************************/
6370/* */
6371/* Routine Name: ips_program_bios_memio */
6372/* */
6373/* Routine Description: */
6374/* Program the BIOS on the adapter */
6375/* */
6376/****************************************************************************/
6377static int
6378ips_program_bios_memio(ips_ha_t * ha, char *buffer, uint32_t buffersize,
6379 uint32_t offset)
6380{
6381 int i;
6382 int timeout;
6383 uint8_t status = 0;
6384
6385 METHOD_TRACE("ips_program_bios_memio", 1);
6386
6387 status = 0;
6388
6389 for (i = 0; i < buffersize; i++) {
6390 /* write a byte */
6391 writel(i + offset, ha->mem_ptr + IPS_REG_FLAP);
6392 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6393 udelay(25); /* 25 us */
6394
6395 writeb(0x40, ha->mem_ptr + IPS_REG_FLDP);
6396 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6397 udelay(25); /* 25 us */
6398
6399 writeb(buffer[i], ha->mem_ptr + IPS_REG_FLDP);
6400 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6401 udelay(25); /* 25 us */
6402
6403 /* wait up to one second */
6404 timeout = 1000;
6405 while (timeout > 0) {
6406 if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6407 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6408 udelay(25); /* 25 us */
6409 }
6410
6411 status = readb(ha->mem_ptr + IPS_REG_FLDP);
6412
6413 if (status & 0x80)
6414 break;
6415
6416 MDELAY(1);
6417 timeout--;
6418 }
6419
6420 if (timeout == 0) {
6421 /* timeout error */
6422 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6423 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6424 udelay(25); /* 25 us */
6425
6426 writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6427 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6428 udelay(25); /* 25 us */
6429
6430 return (1);
6431 }
6432
6433 /* check the status */
6434 if (status & 0x18) {
6435 /* programming error */
6436 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6437 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6438 udelay(25); /* 25 us */
6439
6440 writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6441 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6442 udelay(25); /* 25 us */
6443
6444 return (1);
6445 }
6446 } /* end for */
6447
6448 /* Enable reading */
6449 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6450 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6451 udelay(25); /* 25 us */
6452
6453 writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6454 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6455 udelay(25); /* 25 us */
6456
6457 return (0);
6458}
6459
6460/****************************************************************************/
6461/* */
6462/* Routine Name: ips_verify_bios */
6463/* */
6464/* Routine Description: */
6465/* Verify the BIOS on the adapter */
6466/* */
6467/****************************************************************************/
6468static int
6469ips_verify_bios(ips_ha_t * ha, char *buffer, uint32_t buffersize,
6470 uint32_t offset)
6471{
6472 uint8_t checksum;
6473 int i;
6474
6475 METHOD_TRACE("ips_verify_bios", 1);
6476
6477 /* test 1st byte */
6478 outl(0, ha->io_addr + IPS_REG_FLAP);
6479 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6480 udelay(25); /* 25 us */
6481
6482 if (inb(ha->io_addr + IPS_REG_FLDP) != 0x55)
6483 return (1);
6484
6485 outl(1, ha->io_addr + IPS_REG_FLAP);
6486 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6487 udelay(25); /* 25 us */
6488 if (inb(ha->io_addr + IPS_REG_FLDP) != 0xAA)
6489 return (1);
6490
6491 checksum = 0xff;
6492 for (i = 2; i < buffersize; i++) {
6493
6494 outl(i + offset, ha->io_addr + IPS_REG_FLAP);
6495 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6496 udelay(25); /* 25 us */
6497
6498 checksum = (uint8_t) checksum + inb(ha->io_addr + IPS_REG_FLDP);
6499 }
6500
6501 if (checksum != 0)
6502 /* failure */
6503 return (1);
6504 else
6505 /* success */
6506 return (0);
6507}
6508
6509/****************************************************************************/
6510/* */
6511/* Routine Name: ips_verify_bios_memio */
6512/* */
6513/* Routine Description: */
6514/* Verify the BIOS on the adapter */
6515/* */
6516/****************************************************************************/
6517static int
6518ips_verify_bios_memio(ips_ha_t * ha, char *buffer, uint32_t buffersize,
6519 uint32_t offset)
6520{
6521 uint8_t checksum;
6522 int i;
6523
6524 METHOD_TRACE("ips_verify_bios_memio", 1);
6525
6526 /* test 1st byte */
6527 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6528 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6529 udelay(25); /* 25 us */
6530
6531 if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0x55)
6532 return (1);
6533
6534 writel(1, ha->mem_ptr + IPS_REG_FLAP);
6535 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6536 udelay(25); /* 25 us */
6537 if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0xAA)
6538 return (1);
6539
6540 checksum = 0xff;
6541 for (i = 2; i < buffersize; i++) {
6542
6543 writel(i + offset, ha->mem_ptr + IPS_REG_FLAP);
6544 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6545 udelay(25); /* 25 us */
6546
6547 checksum =
6548 (uint8_t) checksum + readb(ha->mem_ptr + IPS_REG_FLDP);
6549 }
6550
6551 if (checksum != 0)
6552 /* failure */
6553 return (1);
6554 else
6555 /* success */
6556 return (0);
6557}
6558
6559/****************************************************************************/
6560/* */
6561/* Routine Name: ips_abort_init */
6562/* */
6563/* Routine Description: */
6564/* cleanup routine for a failed adapter initialization */
6565/****************************************************************************/
6566static int
6567ips_abort_init(ips_ha_t * ha, int index)
6568{
6569 ha->active = 0;
6570 ips_free(ha);
6571 ips_ha[index] = NULL;
6572 ips_sh[index] = NULL;
6573 return -1;
6574}
6575
6576/****************************************************************************/
6577/* */
6578/* Routine Name: ips_shift_controllers */
6579/* */
6580/* Routine Description: */
6581/* helper function for ordering adapters */
6582/****************************************************************************/
6583static void
6584ips_shift_controllers(int lowindex, int highindex)
6585{
6586 ips_ha_t *ha_sav = ips_ha[highindex];
6587 struct Scsi_Host *sh_sav = ips_sh[highindex];
6588 int i;
6589
6590 for (i = highindex; i > lowindex; i--) {
6591 ips_ha[i] = ips_ha[i - 1];
6592 ips_sh[i] = ips_sh[i - 1];
6593 ips_ha[i]->host_num = i;
6594 }
6595 ha_sav->host_num = lowindex;
6596 ips_ha[lowindex] = ha_sav;
6597 ips_sh[lowindex] = sh_sav;
6598}
6599
6600/****************************************************************************/
6601/* */
6602/* Routine Name: ips_order_controllers */
6603/* */
6604/* Routine Description: */
6605/* place controllers is the "proper" boot order */
6606/****************************************************************************/
6607static void
6608ips_order_controllers(void)
6609{
6610 int i, j, tmp, position = 0;
6611 IPS_NVRAM_P5 *nvram;
6612 if (!ips_ha[0])
6613 return;
6614 nvram = ips_ha[0]->nvram;
6615
6616 if (nvram->adapter_order[0]) {
6617 for (i = 1; i <= nvram->adapter_order[0]; i++) {
6618 for (j = position; j < ips_num_controllers; j++) {
6619 switch (ips_ha[j]->ad_type) {
6620 case IPS_ADTYPE_SERVERAID6M:
6621 case IPS_ADTYPE_SERVERAID7M:
6622 if (nvram->adapter_order[i] == 'M') {
6623 ips_shift_controllers(position,
6624 j);
6625 position++;
6626 }
6627 break;
6628 case IPS_ADTYPE_SERVERAID4L:
6629 case IPS_ADTYPE_SERVERAID4M:
6630 case IPS_ADTYPE_SERVERAID4MX:
6631 case IPS_ADTYPE_SERVERAID4LX:
6632 if (nvram->adapter_order[i] == 'N') {
6633 ips_shift_controllers(position,
6634 j);
6635 position++;
6636 }
6637 break;
6638 case IPS_ADTYPE_SERVERAID6I:
6639 case IPS_ADTYPE_SERVERAID5I2:
6640 case IPS_ADTYPE_SERVERAID5I1:
6641 case IPS_ADTYPE_SERVERAID7k:
6642 if (nvram->adapter_order[i] == 'S') {
6643 ips_shift_controllers(position,
6644 j);
6645 position++;
6646 }
6647 break;
6648 case IPS_ADTYPE_SERVERAID:
6649 case IPS_ADTYPE_SERVERAID2:
6650 case IPS_ADTYPE_NAVAJO:
6651 case IPS_ADTYPE_KIOWA:
6652 case IPS_ADTYPE_SERVERAID3L:
6653 case IPS_ADTYPE_SERVERAID3:
6654 case IPS_ADTYPE_SERVERAID4H:
6655 if (nvram->adapter_order[i] == 'A') {
6656 ips_shift_controllers(position,
6657 j);
6658 position++;
6659 }
6660 break;
6661 default:
6662 break;
6663 }
6664 }
6665 }
6666 /* if adapter_order[0], then ordering is complete */
6667 return;
6668 }
6669 /* old bios, use older ordering */
6670 tmp = 0;
6671 for (i = position; i < ips_num_controllers; i++) {
6672 if (ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID5I2 ||
6673 ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID5I1) {
6674 ips_shift_controllers(position, i);
6675 position++;
6676 tmp = 1;
6677 }
6678 }
6679 /* if there were no 5I cards, then don't do any extra ordering */
6680 if (!tmp)
6681 return;
6682 for (i = position; i < ips_num_controllers; i++) {
6683 if (ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID4L ||
6684 ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID4M ||
6685 ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID4LX ||
6686 ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID4MX) {
6687 ips_shift_controllers(position, i);
6688 position++;
6689 }
6690 }
6691
6692 return;
6693}
6694
6695/****************************************************************************/
6696/* */
6697/* Routine Name: ips_register_scsi */
6698/* */
6699/* Routine Description: */
6700/* perform any registration and setup with the scsi layer */
6701/****************************************************************************/
6702static int
6703ips_register_scsi(int index)
6704{
6705 struct Scsi_Host *sh;
6706 ips_ha_t *ha, *oldha = ips_ha[index];
6707 sh = scsi_host_alloc(&ips_driver_template, sizeof (ips_ha_t));
6708 if (!sh) {
6709 IPS_PRINTK(KERN_WARNING, oldha->pcidev,
6710 "Unable to register controller with SCSI subsystem\n");
6711 return -1;
6712 }
6713 ha = IPS_HA(sh);
6714 memcpy(ha, oldha, sizeof (ips_ha_t));
6715 free_irq(oldha->pcidev->irq, oldha);
6716 /* Install the interrupt handler with the new ha */
6717 if (request_irq(ha->pcidev->irq, do_ipsintr, IRQF_SHARED, ips_name, ha)) {
6718 IPS_PRINTK(KERN_WARNING, ha->pcidev,
6719 "Unable to install interrupt handler\n");
6720 goto err_out_sh;
6721 }
6722
6723 kfree(oldha);
6724
6725 /* Store away needed values for later use */
6726 sh->unique_id = (ha->io_addr) ? ha->io_addr : ha->mem_addr;
6727 sh->sg_tablesize = sh->hostt->sg_tablesize;
6728 sh->can_queue = sh->hostt->can_queue;
6729 sh->cmd_per_lun = sh->hostt->cmd_per_lun;
6730 sh->use_clustering = sh->hostt->use_clustering;
6731 sh->max_sectors = 128;
6732
6733 sh->max_id = ha->ntargets;
6734 sh->max_lun = ha->nlun;
6735 sh->max_channel = ha->nbus - 1;
6736 sh->can_queue = ha->max_cmds - 1;
6737
6738 if (scsi_add_host(sh, &ha->pcidev->dev))
6739 goto err_out;
6740
6741 ips_sh[index] = sh;
6742 ips_ha[index] = ha;
6743
6744 scsi_scan_host(sh);
6745
6746 return 0;
6747
6748err_out:
6749 free_irq(ha->pcidev->irq, ha);
6750err_out_sh:
6751 scsi_host_put(sh);
6752 return -1;
6753}
6754
6755/*---------------------------------------------------------------------------*/
6756/* Routine Name: ips_remove_device */
6757/* */
6758/* Routine Description: */
6759/* Remove one Adapter ( Hot Plugging ) */
6760/*---------------------------------------------------------------------------*/
6761static void
6762ips_remove_device(struct pci_dev *pci_dev)
6763{
6764 struct Scsi_Host *sh = pci_get_drvdata(pci_dev);
6765
6766 pci_set_drvdata(pci_dev, NULL);
6767
6768 ips_release(sh);
6769
6770 pci_release_regions(pci_dev);
6771 pci_disable_device(pci_dev);
6772}
6773
6774/****************************************************************************/
6775/* */
6776/* Routine Name: ips_module_init */
6777/* */
6778/* Routine Description: */
6779/* function called on module load */
6780/****************************************************************************/
6781static int __init
6782ips_module_init(void)
6783{
6784#if !defined(__i386__) && !defined(__ia64__) && !defined(__x86_64__)
6785 printk(KERN_ERR "ips: This driver has only been tested on the x86/ia64/x86_64 platforms\n");
6786 add_taint(TAINT_CPU_OUT_OF_SPEC, LOCKDEP_STILL_OK);
6787#endif
6788
6789 if (pci_register_driver(&ips_pci_driver) < 0)
6790 return -ENODEV;
6791 ips_driver_template.module = THIS_MODULE;
6792 ips_order_controllers();
6793 if (!ips_detect(&ips_driver_template)) {
6794 pci_unregister_driver(&ips_pci_driver);
6795 return -ENODEV;
6796 }
6797 register_reboot_notifier(&ips_notifier);
6798 return 0;
6799}
6800
6801/****************************************************************************/
6802/* */
6803/* Routine Name: ips_module_exit */
6804/* */
6805/* Routine Description: */
6806/* function called on module unload */
6807/****************************************************************************/
6808static void __exit
6809ips_module_exit(void)
6810{
6811 pci_unregister_driver(&ips_pci_driver);
6812 unregister_reboot_notifier(&ips_notifier);
6813}
6814
6815module_init(ips_module_init);
6816module_exit(ips_module_exit);
6817
6818/*---------------------------------------------------------------------------*/
6819/* Routine Name: ips_insert_device */
6820/* */
6821/* Routine Description: */
6822/* Add One Adapter ( Hot Plug ) */
6823/* */
6824/* Return Value: */
6825/* 0 if Successful, else non-zero */
6826/*---------------------------------------------------------------------------*/
6827static int
6828ips_insert_device(struct pci_dev *pci_dev, const struct pci_device_id *ent)
6829{
6830 int index = -1;
6831 int rc;
6832
6833 METHOD_TRACE("ips_insert_device", 1);
6834 rc = pci_enable_device(pci_dev);
6835 if (rc)
6836 return rc;
6837
6838 rc = pci_request_regions(pci_dev, "ips");
6839 if (rc)
6840 goto err_out;
6841
6842 rc = ips_init_phase1(pci_dev, &index);
6843 if (rc == SUCCESS)
6844 rc = ips_init_phase2(index);
6845
6846 if (ips_hotplug)
6847 if (ips_register_scsi(index)) {
6848 ips_free(ips_ha[index]);
6849 rc = -1;
6850 }
6851
6852 if (rc == SUCCESS)
6853 ips_num_controllers++;
6854
6855 ips_next_controller = ips_num_controllers;
6856
6857 if (rc < 0) {
6858 rc = -ENODEV;
6859 goto err_out_regions;
6860 }
6861
6862 pci_set_drvdata(pci_dev, ips_sh[index]);
6863 return 0;
6864
6865err_out_regions:
6866 pci_release_regions(pci_dev);
6867err_out:
6868 pci_disable_device(pci_dev);
6869 return rc;
6870}
6871
6872/*---------------------------------------------------------------------------*/
6873/* Routine Name: ips_init_phase1 */
6874/* */
6875/* Routine Description: */
6876/* Adapter Initialization */
6877/* */
6878/* Return Value: */
6879/* 0 if Successful, else non-zero */
6880/*---------------------------------------------------------------------------*/
6881static int
6882ips_init_phase1(struct pci_dev *pci_dev, int *indexPtr)
6883{
6884 ips_ha_t *ha;
6885 uint32_t io_addr;
6886 uint32_t mem_addr;
6887 uint32_t io_len;
6888 uint32_t mem_len;
6889 uint8_t bus;
6890 uint8_t func;
6891 int j;
6892 int index;
6893 dma_addr_t dma_address;
6894 char __iomem *ioremap_ptr;
6895 char __iomem *mem_ptr;
6896 uint32_t IsDead;
6897
6898 METHOD_TRACE("ips_init_phase1", 1);
6899 index = IPS_MAX_ADAPTERS;
6900 for (j = 0; j < IPS_MAX_ADAPTERS; j++) {
6901 if (ips_ha[j] == NULL) {
6902 index = j;
6903 break;
6904 }
6905 }
6906
6907 if (index >= IPS_MAX_ADAPTERS)
6908 return -1;
6909
6910 /* stuff that we get in dev */
6911 bus = pci_dev->bus->number;
6912 func = pci_dev->devfn;
6913
6914 /* Init MEM/IO addresses to 0 */
6915 mem_addr = 0;
6916 io_addr = 0;
6917 mem_len = 0;
6918 io_len = 0;
6919
6920 for (j = 0; j < 2; j++) {
6921 if (!pci_resource_start(pci_dev, j))
6922 break;
6923
6924 if (pci_resource_flags(pci_dev, j) & IORESOURCE_IO) {
6925 io_addr = pci_resource_start(pci_dev, j);
6926 io_len = pci_resource_len(pci_dev, j);
6927 } else {
6928 mem_addr = pci_resource_start(pci_dev, j);
6929 mem_len = pci_resource_len(pci_dev, j);
6930 }
6931 }
6932
6933 /* setup memory mapped area (if applicable) */
6934 if (mem_addr) {
6935 uint32_t base;
6936 uint32_t offs;
6937
6938 base = mem_addr & PAGE_MASK;
6939 offs = mem_addr - base;
6940 ioremap_ptr = ioremap(base, PAGE_SIZE);
6941 if (!ioremap_ptr)
6942 return -1;
6943 mem_ptr = ioremap_ptr + offs;
6944 } else {
6945 ioremap_ptr = NULL;
6946 mem_ptr = NULL;
6947 }
6948
6949 /* found a controller */
6950 ha = kzalloc(sizeof (ips_ha_t), GFP_KERNEL);
6951 if (ha == NULL) {
6952 IPS_PRINTK(KERN_WARNING, pci_dev,
6953 "Unable to allocate temporary ha struct\n");
6954 return -1;
6955 }
6956
6957 ips_sh[index] = NULL;
6958 ips_ha[index] = ha;
6959 ha->active = 1;
6960
6961 /* Store info in HA structure */
6962 ha->io_addr = io_addr;
6963 ha->io_len = io_len;
6964 ha->mem_addr = mem_addr;
6965 ha->mem_len = mem_len;
6966 ha->mem_ptr = mem_ptr;
6967 ha->ioremap_ptr = ioremap_ptr;
6968 ha->host_num = (uint32_t) index;
6969 ha->slot_num = PCI_SLOT(pci_dev->devfn);
6970 ha->pcidev = pci_dev;
6971
6972 /*
6973 * Set the pci_dev's dma_mask. Not all adapters support 64bit
6974 * addressing so don't enable it if the adapter can't support
6975 * it! Also, don't use 64bit addressing if dma addresses
6976 * are guaranteed to be < 4G.
6977 */
6978 if (IPS_ENABLE_DMA64 && IPS_HAS_ENH_SGLIST(ha) &&
6979 !pci_set_dma_mask(ha->pcidev, DMA_BIT_MASK(64))) {
6980 (ha)->flags |= IPS_HA_ENH_SG;
6981 } else {
6982 if (pci_set_dma_mask(ha->pcidev, DMA_BIT_MASK(32)) != 0) {
6983 printk(KERN_WARNING "Unable to set DMA Mask\n");
6984 return ips_abort_init(ha, index);
6985 }
6986 }
6987 if(ips_cd_boot && !ips_FlashData){
6988 ips_FlashData = pci_alloc_consistent(pci_dev, PAGE_SIZE << 7,
6989 &ips_flashbusaddr);
6990 }
6991
6992 ha->enq = pci_alloc_consistent(pci_dev, sizeof (IPS_ENQ),
6993 &ha->enq_busaddr);
6994 if (!ha->enq) {
6995 IPS_PRINTK(KERN_WARNING, pci_dev,
6996 "Unable to allocate host inquiry structure\n");
6997 return ips_abort_init(ha, index);
6998 }
6999
7000 ha->adapt = pci_alloc_consistent(pci_dev, sizeof (IPS_ADAPTER) +
7001 sizeof (IPS_IO_CMD), &dma_address);
7002 if (!ha->adapt) {
7003 IPS_PRINTK(KERN_WARNING, pci_dev,
7004 "Unable to allocate host adapt & dummy structures\n");
7005 return ips_abort_init(ha, index);
7006 }
7007 ha->adapt->hw_status_start = dma_address;
7008 ha->dummy = (void *) (ha->adapt + 1);
7009
7010
7011
7012 ha->logical_drive_info = pci_alloc_consistent(pci_dev, sizeof (IPS_LD_INFO), &dma_address);
7013 if (!ha->logical_drive_info) {
7014 IPS_PRINTK(KERN_WARNING, pci_dev,
7015 "Unable to allocate logical drive info structure\n");
7016 return ips_abort_init(ha, index);
7017 }
7018 ha->logical_drive_info_dma_addr = dma_address;
7019
7020
7021 ha->conf = kmalloc(sizeof (IPS_CONF), GFP_KERNEL);
7022
7023 if (!ha->conf) {
7024 IPS_PRINTK(KERN_WARNING, pci_dev,
7025 "Unable to allocate host conf structure\n");
7026 return ips_abort_init(ha, index);
7027 }
7028
7029 ha->nvram = kmalloc(sizeof (IPS_NVRAM_P5), GFP_KERNEL);
7030
7031 if (!ha->nvram) {
7032 IPS_PRINTK(KERN_WARNING, pci_dev,
7033 "Unable to allocate host NVRAM structure\n");
7034 return ips_abort_init(ha, index);
7035 }
7036
7037 ha->subsys = kmalloc(sizeof (IPS_SUBSYS), GFP_KERNEL);
7038
7039 if (!ha->subsys) {
7040 IPS_PRINTK(KERN_WARNING, pci_dev,
7041 "Unable to allocate host subsystem structure\n");
7042 return ips_abort_init(ha, index);
7043 }
7044
7045 /* the ioctl buffer is now used during adapter initialization, so its
7046 * successful allocation is now required */
7047 if (ips_ioctlsize < PAGE_SIZE)
7048 ips_ioctlsize = PAGE_SIZE;
7049
7050 ha->ioctl_data = pci_alloc_consistent(pci_dev, ips_ioctlsize,
7051 &ha->ioctl_busaddr);
7052 ha->ioctl_len = ips_ioctlsize;
7053 if (!ha->ioctl_data) {
7054 IPS_PRINTK(KERN_WARNING, pci_dev,
7055 "Unable to allocate IOCTL data\n");
7056 return ips_abort_init(ha, index);
7057 }
7058
7059 /*
7060 * Setup Functions
7061 */
7062 ips_setup_funclist(ha);
7063
7064 if ((IPS_IS_MORPHEUS(ha)) || (IPS_IS_MARCO(ha))) {
7065 /* If Morpheus appears dead, reset it */
7066 IsDead = readl(ha->mem_ptr + IPS_REG_I960_MSG1);
7067 if (IsDead == 0xDEADBEEF) {
7068 ips_reset_morpheus(ha);
7069 }
7070 }
7071
7072 /*
7073 * Initialize the card if it isn't already
7074 */
7075
7076 if (!(*ha->func.isinit) (ha)) {
7077 if (!(*ha->func.init) (ha)) {
7078 /*
7079 * Initialization failed
7080 */
7081 IPS_PRINTK(KERN_WARNING, pci_dev,
7082 "Unable to initialize controller\n");
7083 return ips_abort_init(ha, index);
7084 }
7085 }
7086
7087 *indexPtr = index;
7088 return SUCCESS;
7089}
7090
7091/*---------------------------------------------------------------------------*/
7092/* Routine Name: ips_init_phase2 */
7093/* */
7094/* Routine Description: */
7095/* Adapter Initialization Phase 2 */
7096/* */
7097/* Return Value: */
7098/* 0 if Successful, else non-zero */
7099/*---------------------------------------------------------------------------*/
7100static int
7101ips_init_phase2(int index)
7102{
7103 ips_ha_t *ha;
7104
7105 ha = ips_ha[index];
7106
7107 METHOD_TRACE("ips_init_phase2", 1);
7108 if (!ha->active) {
7109 ips_ha[index] = NULL;
7110 return -1;
7111 }
7112
7113 /* Install the interrupt handler */
7114 if (request_irq(ha->pcidev->irq, do_ipsintr, IRQF_SHARED, ips_name, ha)) {
7115 IPS_PRINTK(KERN_WARNING, ha->pcidev,
7116 "Unable to install interrupt handler\n");
7117 return ips_abort_init(ha, index);
7118 }
7119
7120 /*
7121 * Allocate a temporary SCB for initialization
7122 */
7123 ha->max_cmds = 1;
7124 if (!ips_allocatescbs(ha)) {
7125 IPS_PRINTK(KERN_WARNING, ha->pcidev,
7126 "Unable to allocate a CCB\n");
7127 free_irq(ha->pcidev->irq, ha);
7128 return ips_abort_init(ha, index);
7129 }
7130
7131 if (!ips_hainit(ha)) {
7132 IPS_PRINTK(KERN_WARNING, ha->pcidev,
7133 "Unable to initialize controller\n");
7134 free_irq(ha->pcidev->irq, ha);
7135 return ips_abort_init(ha, index);
7136 }
7137 /* Free the temporary SCB */
7138 ips_deallocatescbs(ha, 1);
7139
7140 /* allocate CCBs */
7141 if (!ips_allocatescbs(ha)) {
7142 IPS_PRINTK(KERN_WARNING, ha->pcidev,
7143 "Unable to allocate CCBs\n");
7144 free_irq(ha->pcidev->irq, ha);
7145 return ips_abort_init(ha, index);
7146 }
7147
7148 return SUCCESS;
7149}
7150
7151MODULE_LICENSE("GPL");
7152MODULE_DESCRIPTION("IBM ServeRAID Adapter Driver " IPS_VER_STRING);
7153MODULE_VERSION(IPS_VER_STRING);
7154
7155
7156/*
7157 * Overrides for Emacs so that we almost follow Linus's tabbing style.
7158 * Emacs will notice this stuff at the end of the file and automatically
7159 * adjust the settings for this buffer only. This must remain at the end
7160 * of the file.
7161 * ---------------------------------------------------------------------------
7162 * Local variables:
7163 * c-indent-level: 2
7164 * c-brace-imaginary-offset: 0
7165 * c-brace-offset: -2
7166 * c-argdecl-indent: 2
7167 * c-label-offset: -2
7168 * c-continued-statement-offset: 2
7169 * c-continued-brace-offset: 0
7170 * indent-tabs-mode: nil
7171 * tab-width: 8
7172 * End:
7173 */
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
199static char *ips = NULL;
200module_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 */
231static int ips_detect(struct scsi_host_template *);
232static int ips_release(struct Scsi_Host *);
233static int ips_eh_abort(struct scsi_cmnd *);
234static int ips_eh_reset(struct scsi_cmnd *);
235static int ips_queue(struct Scsi_Host *, struct scsi_cmnd *);
236static const char *ips_info(struct Scsi_Host *);
237static irqreturn_t do_ipsintr(int, void *);
238static int ips_hainit(ips_ha_t *);
239static int ips_map_status(ips_ha_t *, ips_scb_t *, ips_stat_t *);
240static int ips_send_wait(ips_ha_t *, ips_scb_t *, int, int);
241static int ips_send_cmd(ips_ha_t *, ips_scb_t *);
242static int ips_online(ips_ha_t *, ips_scb_t *);
243static int ips_inquiry(ips_ha_t *, ips_scb_t *);
244static int ips_rdcap(ips_ha_t *, ips_scb_t *);
245static int ips_msense(ips_ha_t *, ips_scb_t *);
246static int ips_reqsen(ips_ha_t *, ips_scb_t *);
247static int ips_deallocatescbs(ips_ha_t *, int);
248static int ips_allocatescbs(ips_ha_t *);
249static int ips_reset_copperhead(ips_ha_t *);
250static int ips_reset_copperhead_memio(ips_ha_t *);
251static int ips_reset_morpheus(ips_ha_t *);
252static int ips_issue_copperhead(ips_ha_t *, ips_scb_t *);
253static int ips_issue_copperhead_memio(ips_ha_t *, ips_scb_t *);
254static int ips_issue_i2o(ips_ha_t *, ips_scb_t *);
255static int ips_issue_i2o_memio(ips_ha_t *, ips_scb_t *);
256static int ips_isintr_copperhead(ips_ha_t *);
257static int ips_isintr_copperhead_memio(ips_ha_t *);
258static int ips_isintr_morpheus(ips_ha_t *);
259static int ips_wait(ips_ha_t *, int, int);
260static int ips_write_driver_status(ips_ha_t *, int);
261static int ips_read_adapter_status(ips_ha_t *, int);
262static int ips_read_subsystem_parameters(ips_ha_t *, int);
263static int ips_read_config(ips_ha_t *, int);
264static int ips_clear_adapter(ips_ha_t *, int);
265static int ips_readwrite_page5(ips_ha_t *, int, int);
266static int ips_init_copperhead(ips_ha_t *);
267static int ips_init_copperhead_memio(ips_ha_t *);
268static int ips_init_morpheus(ips_ha_t *);
269static int ips_isinit_copperhead(ips_ha_t *);
270static int ips_isinit_copperhead_memio(ips_ha_t *);
271static int ips_isinit_morpheus(ips_ha_t *);
272static int ips_erase_bios(ips_ha_t *);
273static int ips_program_bios(ips_ha_t *, char *, uint32_t, uint32_t);
274static int ips_verify_bios(ips_ha_t *, char *, uint32_t, uint32_t);
275static int ips_erase_bios_memio(ips_ha_t *);
276static int ips_program_bios_memio(ips_ha_t *, char *, uint32_t, uint32_t);
277static int ips_verify_bios_memio(ips_ha_t *, char *, uint32_t, uint32_t);
278static int ips_flash_copperhead(ips_ha_t *, ips_passthru_t *, ips_scb_t *);
279static int ips_flash_bios(ips_ha_t *, ips_passthru_t *, ips_scb_t *);
280static int ips_flash_firmware(ips_ha_t *, ips_passthru_t *, ips_scb_t *);
281static void ips_free_flash_copperhead(ips_ha_t * ha);
282static void ips_get_bios_version(ips_ha_t *, int);
283static void ips_identify_controller(ips_ha_t *);
284static void ips_chkstatus(ips_ha_t *, IPS_STATUS *);
285static void ips_enable_int_copperhead(ips_ha_t *);
286static void ips_enable_int_copperhead_memio(ips_ha_t *);
287static void ips_enable_int_morpheus(ips_ha_t *);
288static int ips_intr_copperhead(ips_ha_t *);
289static int ips_intr_morpheus(ips_ha_t *);
290static void ips_next(ips_ha_t *, int);
291static void ipsintr_blocking(ips_ha_t *, struct ips_scb *);
292static void ipsintr_done(ips_ha_t *, struct ips_scb *);
293static void ips_done(ips_ha_t *, ips_scb_t *);
294static void ips_free(ips_ha_t *);
295static void ips_init_scb(ips_ha_t *, ips_scb_t *);
296static void ips_freescb(ips_ha_t *, ips_scb_t *);
297static void ips_setup_funclist(ips_ha_t *);
298static void ips_statinit(ips_ha_t *);
299static void ips_statinit_memio(ips_ha_t *);
300static void ips_fix_ffdc_time(ips_ha_t *, ips_scb_t *, time_t);
301static void ips_ffdc_reset(ips_ha_t *, int);
302static void ips_ffdc_time(ips_ha_t *);
303static uint32_t ips_statupd_copperhead(ips_ha_t *);
304static uint32_t ips_statupd_copperhead_memio(ips_ha_t *);
305static uint32_t ips_statupd_morpheus(ips_ha_t *);
306static ips_scb_t *ips_getscb(ips_ha_t *);
307static void ips_putq_scb_head(ips_scb_queue_t *, ips_scb_t *);
308static void ips_putq_wait_tail(ips_wait_queue_t *, struct scsi_cmnd *);
309static void ips_putq_copp_tail(ips_copp_queue_t *,
310 ips_copp_wait_item_t *);
311static ips_scb_t *ips_removeq_scb_head(ips_scb_queue_t *);
312static ips_scb_t *ips_removeq_scb(ips_scb_queue_t *, ips_scb_t *);
313static struct scsi_cmnd *ips_removeq_wait_head(ips_wait_queue_t *);
314static struct scsi_cmnd *ips_removeq_wait(ips_wait_queue_t *,
315 struct scsi_cmnd *);
316static ips_copp_wait_item_t *ips_removeq_copp(ips_copp_queue_t *,
317 ips_copp_wait_item_t *);
318static ips_copp_wait_item_t *ips_removeq_copp_head(ips_copp_queue_t *);
319
320static int ips_is_passthru(struct scsi_cmnd *);
321static int ips_make_passthru(ips_ha_t *, struct scsi_cmnd *, ips_scb_t *, int);
322static int ips_usrcmd(ips_ha_t *, ips_passthru_t *, ips_scb_t *);
323static void ips_cleanup_passthru(ips_ha_t *, ips_scb_t *);
324static void ips_scmd_buf_write(struct scsi_cmnd * scmd, void *data,
325 unsigned int count);
326static void ips_scmd_buf_read(struct scsi_cmnd * scmd, void *data,
327 unsigned int count);
328
329static int ips_write_info(struct Scsi_Host *, char *, int);
330static int ips_show_info(struct seq_file *, struct Scsi_Host *);
331static int ips_host_info(ips_ha_t *, struct seq_file *);
332static int ips_abort_init(ips_ha_t * ha, int index);
333static int ips_init_phase2(int index);
334
335static int ips_init_phase1(struct pci_dev *pci_dev, int *indexPtr);
336static int ips_register_scsi(int index);
337
338static int ips_poll_for_flush_complete(ips_ha_t * ha);
339static void ips_flush_and_reset(ips_ha_t *ha);
340
341/*
342 * global variables
343 */
344static const char ips_name[] = "ips";
345static struct Scsi_Host *ips_sh[IPS_MAX_ADAPTERS]; /* Array of host controller structures */
346static ips_ha_t *ips_ha[IPS_MAX_ADAPTERS]; /* Array of HA structures */
347static unsigned int ips_next_controller;
348static unsigned int ips_num_controllers;
349static unsigned int ips_released_controllers;
350static int ips_hotplug;
351static int ips_cmd_timeout = 60;
352static int ips_reset_timeout = 60 * 5;
353static int ips_force_memio = 1; /* Always use Memory Mapped I/O */
354static int ips_force_i2o = 1; /* Always use I2O command delivery */
355static int ips_ioctlsize = IPS_IOCTL_SIZE; /* Size of the ioctl buffer */
356static int ips_cd_boot; /* Booting from Manager CD */
357static char *ips_FlashData = NULL; /* CD Boot - Flash Data Buffer */
358static dma_addr_t ips_flashbusaddr;
359static long ips_FlashDataInUse; /* CD Boot - Flash Data In Use Flag */
360static uint32_t MaxLiteCmds = 32; /* Max Active Cmds for a Lite Adapter */
361static 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 .no_write_same = 1,
378};
379
380
381/* This table describes all ServeRAID Adapters */
382static struct pci_device_id ips_pci_table[] = {
383 { 0x1014, 0x002E, PCI_ANY_ID, PCI_ANY_ID, 0, 0 },
384 { 0x1014, 0x01BD, PCI_ANY_ID, PCI_ANY_ID, 0, 0 },
385 { 0x9005, 0x0250, PCI_ANY_ID, PCI_ANY_ID, 0, 0 },
386 { 0, }
387};
388
389MODULE_DEVICE_TABLE( pci, ips_pci_table );
390
391static char ips_hot_plug_name[] = "ips";
392
393static int ips_insert_device(struct pci_dev *pci_dev, const struct pci_device_id *ent);
394static void ips_remove_device(struct pci_dev *pci_dev);
395
396static struct pci_driver ips_pci_driver = {
397 .name = ips_hot_plug_name,
398 .id_table = ips_pci_table,
399 .probe = ips_insert_device,
400 .remove = ips_remove_device,
401};
402
403
404/*
405 * Necessary forward function protoypes
406 */
407static int ips_halt(struct notifier_block *nb, ulong event, void *buf);
408
409#define MAX_ADAPTER_NAME 15
410
411static char ips_adapter_name[][30] = {
412 "ServeRAID",
413 "ServeRAID II",
414 "ServeRAID on motherboard",
415 "ServeRAID on motherboard",
416 "ServeRAID 3H",
417 "ServeRAID 3L",
418 "ServeRAID 4H",
419 "ServeRAID 4M",
420 "ServeRAID 4L",
421 "ServeRAID 4Mx",
422 "ServeRAID 4Lx",
423 "ServeRAID 5i",
424 "ServeRAID 5i",
425 "ServeRAID 6M",
426 "ServeRAID 6i",
427 "ServeRAID 7t",
428 "ServeRAID 7k",
429 "ServeRAID 7M"
430};
431
432static struct notifier_block ips_notifier = {
433 ips_halt, NULL, 0
434};
435
436/*
437 * Direction table
438 */
439static char ips_command_direction[] = {
440 IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_IN, IPS_DATA_IN, IPS_DATA_OUT,
441 IPS_DATA_IN, IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_UNK,
442 IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
443 IPS_DATA_IN, IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_IN, IPS_DATA_OUT,
444 IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_OUT,
445 IPS_DATA_NONE, IPS_DATA_IN, IPS_DATA_NONE, IPS_DATA_IN, IPS_DATA_OUT,
446 IPS_DATA_NONE, IPS_DATA_UNK, IPS_DATA_IN, IPS_DATA_UNK, IPS_DATA_IN,
447 IPS_DATA_UNK, IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_UNK, IPS_DATA_UNK,
448 IPS_DATA_IN, IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_NONE, IPS_DATA_UNK,
449 IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT,
450 IPS_DATA_OUT, IPS_DATA_NONE, IPS_DATA_IN, IPS_DATA_NONE, IPS_DATA_NONE,
451 IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT,
452 IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_OUT,
453 IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_IN, IPS_DATA_IN, IPS_DATA_NONE,
454 IPS_DATA_UNK, IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_UNK,
455 IPS_DATA_NONE, IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_UNK, IPS_DATA_UNK,
456 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
457 IPS_DATA_OUT, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
458 IPS_DATA_IN, 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_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
473 IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_UNK, IPS_DATA_IN, IPS_DATA_NONE,
474 IPS_DATA_OUT, IPS_DATA_UNK, IPS_DATA_NONE, IPS_DATA_UNK, IPS_DATA_OUT,
475 IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_NONE,
476 IPS_DATA_UNK, IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_IN,
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_UNK,
486 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_OUT,
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 IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK
491};
492
493
494/****************************************************************************/
495/* */
496/* Routine Name: ips_setup */
497/* */
498/* Routine Description: */
499/* */
500/* setup parameters to the driver */
501/* */
502/****************************************************************************/
503static int
504ips_setup(char *ips_str)
505{
506
507 int i;
508 char *key;
509 char *value;
510 IPS_OPTION options[] = {
511 {"noi2o", &ips_force_i2o, 0},
512 {"nommap", &ips_force_memio, 0},
513 {"ioctlsize", &ips_ioctlsize, IPS_IOCTL_SIZE},
514 {"cdboot", &ips_cd_boot, 0},
515 {"maxcmds", &MaxLiteCmds, 32},
516 };
517
518 /* Don't use strtok() anymore ( if 2.4 Kernel or beyond ) */
519 /* Search for value */
520 while ((key = strsep(&ips_str, ",."))) {
521 if (!*key)
522 continue;
523 value = strchr(key, ':');
524 if (value)
525 *value++ = '\0';
526 /*
527 * We now have key/value pairs.
528 * Update the variables
529 */
530 for (i = 0; i < ARRAY_SIZE(options); i++) {
531 if (strnicmp
532 (key, options[i].option_name,
533 strlen(options[i].option_name)) == 0) {
534 if (value)
535 *options[i].option_flag =
536 simple_strtoul(value, NULL, 0);
537 else
538 *options[i].option_flag =
539 options[i].option_value;
540 break;
541 }
542 }
543 }
544
545 return (1);
546}
547
548__setup("ips=", ips_setup);
549
550/****************************************************************************/
551/* */
552/* Routine Name: ips_detect */
553/* */
554/* Routine Description: */
555/* */
556/* Detect and initialize the driver */
557/* */
558/* NOTE: this routine is called under the io_request_lock spinlock */
559/* */
560/****************************************************************************/
561static int
562ips_detect(struct scsi_host_template * SHT)
563{
564 int i;
565
566 METHOD_TRACE("ips_detect", 1);
567
568#ifdef MODULE
569 if (ips)
570 ips_setup(ips);
571#endif
572
573 for (i = 0; i < ips_num_controllers; i++) {
574 if (ips_register_scsi(i))
575 ips_free(ips_ha[i]);
576 ips_released_controllers++;
577 }
578 ips_hotplug = 1;
579 return (ips_num_controllers);
580}
581
582/****************************************************************************/
583/* configure the function pointers to use the functions that will work */
584/* with the found version of the adapter */
585/****************************************************************************/
586static void
587ips_setup_funclist(ips_ha_t * ha)
588{
589
590 /*
591 * Setup Functions
592 */
593 if (IPS_IS_MORPHEUS(ha) || IPS_IS_MARCO(ha)) {
594 /* morpheus / marco / sebring */
595 ha->func.isintr = ips_isintr_morpheus;
596 ha->func.isinit = ips_isinit_morpheus;
597 ha->func.issue = ips_issue_i2o_memio;
598 ha->func.init = ips_init_morpheus;
599 ha->func.statupd = ips_statupd_morpheus;
600 ha->func.reset = ips_reset_morpheus;
601 ha->func.intr = ips_intr_morpheus;
602 ha->func.enableint = ips_enable_int_morpheus;
603 } else if (IPS_USE_MEMIO(ha)) {
604 /* copperhead w/MEMIO */
605 ha->func.isintr = ips_isintr_copperhead_memio;
606 ha->func.isinit = ips_isinit_copperhead_memio;
607 ha->func.init = ips_init_copperhead_memio;
608 ha->func.statupd = ips_statupd_copperhead_memio;
609 ha->func.statinit = ips_statinit_memio;
610 ha->func.reset = ips_reset_copperhead_memio;
611 ha->func.intr = ips_intr_copperhead;
612 ha->func.erasebios = ips_erase_bios_memio;
613 ha->func.programbios = ips_program_bios_memio;
614 ha->func.verifybios = ips_verify_bios_memio;
615 ha->func.enableint = ips_enable_int_copperhead_memio;
616 if (IPS_USE_I2O_DELIVER(ha))
617 ha->func.issue = ips_issue_i2o_memio;
618 else
619 ha->func.issue = ips_issue_copperhead_memio;
620 } else {
621 /* copperhead */
622 ha->func.isintr = ips_isintr_copperhead;
623 ha->func.isinit = ips_isinit_copperhead;
624 ha->func.init = ips_init_copperhead;
625 ha->func.statupd = ips_statupd_copperhead;
626 ha->func.statinit = ips_statinit;
627 ha->func.reset = ips_reset_copperhead;
628 ha->func.intr = ips_intr_copperhead;
629 ha->func.erasebios = ips_erase_bios;
630 ha->func.programbios = ips_program_bios;
631 ha->func.verifybios = ips_verify_bios;
632 ha->func.enableint = ips_enable_int_copperhead;
633
634 if (IPS_USE_I2O_DELIVER(ha))
635 ha->func.issue = ips_issue_i2o;
636 else
637 ha->func.issue = ips_issue_copperhead;
638 }
639}
640
641/****************************************************************************/
642/* */
643/* Routine Name: ips_release */
644/* */
645/* Routine Description: */
646/* */
647/* Remove a driver */
648/* */
649/****************************************************************************/
650static int
651ips_release(struct Scsi_Host *sh)
652{
653 ips_scb_t *scb;
654 ips_ha_t *ha;
655 int i;
656
657 METHOD_TRACE("ips_release", 1);
658
659 scsi_remove_host(sh);
660
661 for (i = 0; i < IPS_MAX_ADAPTERS && ips_sh[i] != sh; i++) ;
662
663 if (i == IPS_MAX_ADAPTERS) {
664 printk(KERN_WARNING
665 "(%s) release, invalid Scsi_Host pointer.\n", ips_name);
666 BUG();
667 return (FALSE);
668 }
669
670 ha = IPS_HA(sh);
671
672 if (!ha)
673 return (FALSE);
674
675 /* flush the cache on the controller */
676 scb = &ha->scbs[ha->max_cmds - 1];
677
678 ips_init_scb(ha, scb);
679
680 scb->timeout = ips_cmd_timeout;
681 scb->cdb[0] = IPS_CMD_FLUSH;
682
683 scb->cmd.flush_cache.op_code = IPS_CMD_FLUSH;
684 scb->cmd.flush_cache.command_id = IPS_COMMAND_ID(ha, scb);
685 scb->cmd.flush_cache.state = IPS_NORM_STATE;
686 scb->cmd.flush_cache.reserved = 0;
687 scb->cmd.flush_cache.reserved2 = 0;
688 scb->cmd.flush_cache.reserved3 = 0;
689 scb->cmd.flush_cache.reserved4 = 0;
690
691 IPS_PRINTK(KERN_WARNING, ha->pcidev, "Flushing Cache.\n");
692
693 /* send command */
694 if (ips_send_wait(ha, scb, ips_cmd_timeout, IPS_INTR_ON) == IPS_FAILURE)
695 IPS_PRINTK(KERN_WARNING, ha->pcidev, "Incomplete Flush.\n");
696
697 IPS_PRINTK(KERN_WARNING, ha->pcidev, "Flushing Complete.\n");
698
699 ips_sh[i] = NULL;
700 ips_ha[i] = NULL;
701
702 /* free extra memory */
703 ips_free(ha);
704
705 /* free IRQ */
706 free_irq(ha->pcidev->irq, ha);
707
708 scsi_host_put(sh);
709
710 ips_released_controllers++;
711
712 return (FALSE);
713}
714
715/****************************************************************************/
716/* */
717/* Routine Name: ips_halt */
718/* */
719/* Routine Description: */
720/* */
721/* Perform cleanup when the system reboots */
722/* */
723/****************************************************************************/
724static int
725ips_halt(struct notifier_block *nb, ulong event, void *buf)
726{
727 ips_scb_t *scb;
728 ips_ha_t *ha;
729 int i;
730
731 if ((event != SYS_RESTART) && (event != SYS_HALT) &&
732 (event != SYS_POWER_OFF))
733 return (NOTIFY_DONE);
734
735 for (i = 0; i < ips_next_controller; i++) {
736 ha = (ips_ha_t *) ips_ha[i];
737
738 if (!ha)
739 continue;
740
741 if (!ha->active)
742 continue;
743
744 /* flush the cache on the controller */
745 scb = &ha->scbs[ha->max_cmds - 1];
746
747 ips_init_scb(ha, scb);
748
749 scb->timeout = ips_cmd_timeout;
750 scb->cdb[0] = IPS_CMD_FLUSH;
751
752 scb->cmd.flush_cache.op_code = IPS_CMD_FLUSH;
753 scb->cmd.flush_cache.command_id = IPS_COMMAND_ID(ha, scb);
754 scb->cmd.flush_cache.state = IPS_NORM_STATE;
755 scb->cmd.flush_cache.reserved = 0;
756 scb->cmd.flush_cache.reserved2 = 0;
757 scb->cmd.flush_cache.reserved3 = 0;
758 scb->cmd.flush_cache.reserved4 = 0;
759
760 IPS_PRINTK(KERN_WARNING, ha->pcidev, "Flushing Cache.\n");
761
762 /* send command */
763 if (ips_send_wait(ha, scb, ips_cmd_timeout, IPS_INTR_ON) ==
764 IPS_FAILURE)
765 IPS_PRINTK(KERN_WARNING, ha->pcidev,
766 "Incomplete Flush.\n");
767 else
768 IPS_PRINTK(KERN_WARNING, ha->pcidev,
769 "Flushing Complete.\n");
770 }
771
772 return (NOTIFY_OK);
773}
774
775/****************************************************************************/
776/* */
777/* Routine Name: ips_eh_abort */
778/* */
779/* Routine Description: */
780/* */
781/* Abort a command (using the new error code stuff) */
782/* Note: this routine is called under the io_request_lock */
783/****************************************************************************/
784int ips_eh_abort(struct scsi_cmnd *SC)
785{
786 ips_ha_t *ha;
787 ips_copp_wait_item_t *item;
788 int ret;
789 struct Scsi_Host *host;
790
791 METHOD_TRACE("ips_eh_abort", 1);
792
793 if (!SC)
794 return (FAILED);
795
796 host = SC->device->host;
797 ha = (ips_ha_t *) SC->device->host->hostdata;
798
799 if (!ha)
800 return (FAILED);
801
802 if (!ha->active)
803 return (FAILED);
804
805 spin_lock(host->host_lock);
806
807 /* See if the command is on the copp queue */
808 item = ha->copp_waitlist.head;
809 while ((item) && (item->scsi_cmd != SC))
810 item = item->next;
811
812 if (item) {
813 /* Found it */
814 ips_removeq_copp(&ha->copp_waitlist, item);
815 ret = (SUCCESS);
816
817 /* See if the command is on the wait queue */
818 } else if (ips_removeq_wait(&ha->scb_waitlist, SC)) {
819 /* command not sent yet */
820 ret = (SUCCESS);
821 } else {
822 /* command must have already been sent */
823 ret = (FAILED);
824 }
825
826 spin_unlock(host->host_lock);
827 return ret;
828}
829
830/****************************************************************************/
831/* */
832/* Routine Name: ips_eh_reset */
833/* */
834/* Routine Description: */
835/* */
836/* Reset the controller (with new eh error code) */
837/* */
838/* NOTE: this routine is called under the io_request_lock spinlock */
839/* */
840/****************************************************************************/
841static int __ips_eh_reset(struct scsi_cmnd *SC)
842{
843 int ret;
844 int i;
845 ips_ha_t *ha;
846 ips_scb_t *scb;
847 ips_copp_wait_item_t *item;
848
849 METHOD_TRACE("ips_eh_reset", 1);
850
851#ifdef NO_IPS_RESET
852 return (FAILED);
853#else
854
855 if (!SC) {
856 DEBUG(1, "Reset called with NULL scsi command");
857
858 return (FAILED);
859 }
860
861 ha = (ips_ha_t *) SC->device->host->hostdata;
862
863 if (!ha) {
864 DEBUG(1, "Reset called with NULL ha struct");
865
866 return (FAILED);
867 }
868
869 if (!ha->active)
870 return (FAILED);
871
872 /* See if the command is on the copp queue */
873 item = ha->copp_waitlist.head;
874 while ((item) && (item->scsi_cmd != SC))
875 item = item->next;
876
877 if (item) {
878 /* Found it */
879 ips_removeq_copp(&ha->copp_waitlist, item);
880 return (SUCCESS);
881 }
882
883 /* See if the command is on the wait queue */
884 if (ips_removeq_wait(&ha->scb_waitlist, SC)) {
885 /* command not sent yet */
886 return (SUCCESS);
887 }
888
889 /* An explanation for the casual observer: */
890 /* Part of the function of a RAID controller is automatic error */
891 /* detection and recovery. As such, the only problem that physically */
892 /* resetting an adapter will ever fix is when, for some reason, */
893 /* the driver is not successfully communicating with the adapter. */
894 /* Therefore, we will attempt to flush this adapter. If that succeeds, */
895 /* then there's no real purpose in a physical reset. This will complete */
896 /* much faster and avoids any problems that might be caused by a */
897 /* physical reset ( such as having to fail all the outstanding I/O's ). */
898
899 if (ha->ioctl_reset == 0) { /* IF Not an IOCTL Requested Reset */
900 scb = &ha->scbs[ha->max_cmds - 1];
901
902 ips_init_scb(ha, scb);
903
904 scb->timeout = ips_cmd_timeout;
905 scb->cdb[0] = IPS_CMD_FLUSH;
906
907 scb->cmd.flush_cache.op_code = IPS_CMD_FLUSH;
908 scb->cmd.flush_cache.command_id = IPS_COMMAND_ID(ha, scb);
909 scb->cmd.flush_cache.state = IPS_NORM_STATE;
910 scb->cmd.flush_cache.reserved = 0;
911 scb->cmd.flush_cache.reserved2 = 0;
912 scb->cmd.flush_cache.reserved3 = 0;
913 scb->cmd.flush_cache.reserved4 = 0;
914
915 /* Attempt the flush command */
916 ret = ips_send_wait(ha, scb, ips_cmd_timeout, IPS_INTR_IORL);
917 if (ret == IPS_SUCCESS) {
918 IPS_PRINTK(KERN_NOTICE, ha->pcidev,
919 "Reset Request - Flushed Cache\n");
920 return (SUCCESS);
921 }
922 }
923
924 /* Either we can't communicate with the adapter or it's an IOCTL request */
925 /* from a utility. A physical reset is needed at this point. */
926
927 ha->ioctl_reset = 0; /* Reset the IOCTL Requested Reset Flag */
928
929 /*
930 * command must have already been sent
931 * reset the controller
932 */
933 IPS_PRINTK(KERN_NOTICE, ha->pcidev, "Resetting controller.\n");
934 ret = (*ha->func.reset) (ha);
935
936 if (!ret) {
937 struct scsi_cmnd *scsi_cmd;
938
939 IPS_PRINTK(KERN_NOTICE, ha->pcidev,
940 "Controller reset failed - controller now offline.\n");
941
942 /* Now fail all of the active commands */
943 DEBUG_VAR(1, "(%s%d) Failing active commands",
944 ips_name, ha->host_num);
945
946 while ((scb = ips_removeq_scb_head(&ha->scb_activelist))) {
947 scb->scsi_cmd->result = DID_ERROR << 16;
948 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
949 ips_freescb(ha, scb);
950 }
951
952 /* Now fail all of the pending commands */
953 DEBUG_VAR(1, "(%s%d) Failing pending commands",
954 ips_name, ha->host_num);
955
956 while ((scsi_cmd = ips_removeq_wait_head(&ha->scb_waitlist))) {
957 scsi_cmd->result = DID_ERROR;
958 scsi_cmd->scsi_done(scsi_cmd);
959 }
960
961 ha->active = FALSE;
962 return (FAILED);
963 }
964
965 if (!ips_clear_adapter(ha, IPS_INTR_IORL)) {
966 struct scsi_cmnd *scsi_cmd;
967
968 IPS_PRINTK(KERN_NOTICE, ha->pcidev,
969 "Controller reset failed - controller now offline.\n");
970
971 /* Now fail all of the active commands */
972 DEBUG_VAR(1, "(%s%d) Failing active commands",
973 ips_name, ha->host_num);
974
975 while ((scb = ips_removeq_scb_head(&ha->scb_activelist))) {
976 scb->scsi_cmd->result = DID_ERROR << 16;
977 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
978 ips_freescb(ha, scb);
979 }
980
981 /* Now fail all of the pending commands */
982 DEBUG_VAR(1, "(%s%d) Failing pending commands",
983 ips_name, ha->host_num);
984
985 while ((scsi_cmd = ips_removeq_wait_head(&ha->scb_waitlist))) {
986 scsi_cmd->result = DID_ERROR << 16;
987 scsi_cmd->scsi_done(scsi_cmd);
988 }
989
990 ha->active = FALSE;
991 return (FAILED);
992 }
993
994 /* FFDC */
995 if (le32_to_cpu(ha->subsys->param[3]) & 0x300000) {
996 struct timeval tv;
997
998 do_gettimeofday(&tv);
999 ha->last_ffdc = tv.tv_sec;
1000 ha->reset_count++;
1001 ips_ffdc_reset(ha, IPS_INTR_IORL);
1002 }
1003
1004 /* Now fail all of the active commands */
1005 DEBUG_VAR(1, "(%s%d) Failing active commands", ips_name, ha->host_num);
1006
1007 while ((scb = ips_removeq_scb_head(&ha->scb_activelist))) {
1008 scb->scsi_cmd->result = DID_RESET << 16;
1009 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
1010 ips_freescb(ha, scb);
1011 }
1012
1013 /* Reset DCDB active command bits */
1014 for (i = 1; i < ha->nbus; i++)
1015 ha->dcdb_active[i - 1] = 0;
1016
1017 /* Reset the number of active IOCTLs */
1018 ha->num_ioctl = 0;
1019
1020 ips_next(ha, IPS_INTR_IORL);
1021
1022 return (SUCCESS);
1023#endif /* NO_IPS_RESET */
1024
1025}
1026
1027static int ips_eh_reset(struct scsi_cmnd *SC)
1028{
1029 int rc;
1030
1031 spin_lock_irq(SC->device->host->host_lock);
1032 rc = __ips_eh_reset(SC);
1033 spin_unlock_irq(SC->device->host->host_lock);
1034
1035 return rc;
1036}
1037
1038/****************************************************************************/
1039/* */
1040/* Routine Name: ips_queue */
1041/* */
1042/* Routine Description: */
1043/* */
1044/* Send a command to the controller */
1045/* */
1046/* NOTE: */
1047/* Linux obtains io_request_lock before calling this function */
1048/* */
1049/****************************************************************************/
1050static int ips_queue_lck(struct scsi_cmnd *SC, void (*done) (struct scsi_cmnd *))
1051{
1052 ips_ha_t *ha;
1053 ips_passthru_t *pt;
1054
1055 METHOD_TRACE("ips_queue", 1);
1056
1057 ha = (ips_ha_t *) SC->device->host->hostdata;
1058
1059 if (!ha)
1060 return (1);
1061
1062 if (!ha->active)
1063 return (DID_ERROR);
1064
1065 if (ips_is_passthru(SC)) {
1066 if (ha->copp_waitlist.count == IPS_MAX_IOCTL_QUEUE) {
1067 SC->result = DID_BUS_BUSY << 16;
1068 done(SC);
1069
1070 return (0);
1071 }
1072 } else if (ha->scb_waitlist.count == IPS_MAX_QUEUE) {
1073 SC->result = DID_BUS_BUSY << 16;
1074 done(SC);
1075
1076 return (0);
1077 }
1078
1079 SC->scsi_done = done;
1080
1081 DEBUG_VAR(2, "(%s%d): ips_queue: cmd 0x%X (%d %d %d)",
1082 ips_name,
1083 ha->host_num,
1084 SC->cmnd[0],
1085 SC->device->channel, SC->device->id, SC->device->lun);
1086
1087 /* Check for command to initiator IDs */
1088 if ((scmd_channel(SC) > 0)
1089 && (scmd_id(SC) == ha->ha_id[scmd_channel(SC)])) {
1090 SC->result = DID_NO_CONNECT << 16;
1091 done(SC);
1092
1093 return (0);
1094 }
1095
1096 if (ips_is_passthru(SC)) {
1097
1098 ips_copp_wait_item_t *scratch;
1099
1100 /* A Reset IOCTL is only sent by the boot CD in extreme cases. */
1101 /* There can never be any system activity ( network or disk ), but check */
1102 /* anyway just as a good practice. */
1103 pt = (ips_passthru_t *) scsi_sglist(SC);
1104 if ((pt->CoppCP.cmd.reset.op_code == IPS_CMD_RESET_CHANNEL) &&
1105 (pt->CoppCP.cmd.reset.adapter_flag == 1)) {
1106 if (ha->scb_activelist.count != 0) {
1107 SC->result = DID_BUS_BUSY << 16;
1108 done(SC);
1109 return (0);
1110 }
1111 ha->ioctl_reset = 1; /* This reset request is from an IOCTL */
1112 __ips_eh_reset(SC);
1113 SC->result = DID_OK << 16;
1114 SC->scsi_done(SC);
1115 return (0);
1116 }
1117
1118 /* allocate space for the scribble */
1119 scratch = kmalloc(sizeof (ips_copp_wait_item_t), GFP_ATOMIC);
1120
1121 if (!scratch) {
1122 SC->result = DID_ERROR << 16;
1123 done(SC);
1124
1125 return (0);
1126 }
1127
1128 scratch->scsi_cmd = SC;
1129 scratch->next = NULL;
1130
1131 ips_putq_copp_tail(&ha->copp_waitlist, scratch);
1132 } else {
1133 ips_putq_wait_tail(&ha->scb_waitlist, SC);
1134 }
1135
1136 ips_next(ha, IPS_INTR_IORL);
1137
1138 return (0);
1139}
1140
1141static DEF_SCSI_QCMD(ips_queue)
1142
1143/****************************************************************************/
1144/* */
1145/* Routine Name: ips_biosparam */
1146/* */
1147/* Routine Description: */
1148/* */
1149/* Set bios geometry for the controller */
1150/* */
1151/****************************************************************************/
1152static int ips_biosparam(struct scsi_device *sdev, struct block_device *bdev,
1153 sector_t capacity, int geom[])
1154{
1155 ips_ha_t *ha = (ips_ha_t *) sdev->host->hostdata;
1156 int heads;
1157 int sectors;
1158 int cylinders;
1159
1160 METHOD_TRACE("ips_biosparam", 1);
1161
1162 if (!ha)
1163 /* ?!?! host adater info invalid */
1164 return (0);
1165
1166 if (!ha->active)
1167 return (0);
1168
1169 if (!ips_read_adapter_status(ha, IPS_INTR_ON))
1170 /* ?!?! Enquiry command failed */
1171 return (0);
1172
1173 if ((capacity > 0x400000) && ((ha->enq->ucMiscFlag & 0x8) == 0)) {
1174 heads = IPS_NORM_HEADS;
1175 sectors = IPS_NORM_SECTORS;
1176 } else {
1177 heads = IPS_COMP_HEADS;
1178 sectors = IPS_COMP_SECTORS;
1179 }
1180
1181 cylinders = (unsigned long) capacity / (heads * sectors);
1182
1183 DEBUG_VAR(2, "Geometry: heads: %d, sectors: %d, cylinders: %d",
1184 heads, sectors, cylinders);
1185
1186 geom[0] = heads;
1187 geom[1] = sectors;
1188 geom[2] = cylinders;
1189
1190 return (0);
1191}
1192
1193/****************************************************************************/
1194/* */
1195/* Routine Name: ips_slave_configure */
1196/* */
1197/* Routine Description: */
1198/* */
1199/* Set queue depths on devices once scan is complete */
1200/* */
1201/****************************************************************************/
1202static int
1203ips_slave_configure(struct scsi_device * SDptr)
1204{
1205 ips_ha_t *ha;
1206 int min;
1207
1208 ha = IPS_HA(SDptr->host);
1209 if (SDptr->tagged_supported && SDptr->type == TYPE_DISK) {
1210 min = ha->max_cmds / 2;
1211 if (ha->enq->ucLogDriveCount <= 2)
1212 min = ha->max_cmds - 1;
1213 scsi_adjust_queue_depth(SDptr, MSG_ORDERED_TAG, min);
1214 }
1215
1216 SDptr->skip_ms_page_8 = 1;
1217 SDptr->skip_ms_page_3f = 1;
1218 return 0;
1219}
1220
1221/****************************************************************************/
1222/* */
1223/* Routine Name: do_ipsintr */
1224/* */
1225/* Routine Description: */
1226/* */
1227/* Wrapper for the interrupt handler */
1228/* */
1229/****************************************************************************/
1230static irqreturn_t
1231do_ipsintr(int irq, void *dev_id)
1232{
1233 ips_ha_t *ha;
1234 struct Scsi_Host *host;
1235 int irqstatus;
1236
1237 METHOD_TRACE("do_ipsintr", 2);
1238
1239 ha = (ips_ha_t *) dev_id;
1240 if (!ha)
1241 return IRQ_NONE;
1242 host = ips_sh[ha->host_num];
1243 /* interrupt during initialization */
1244 if (!host) {
1245 (*ha->func.intr) (ha);
1246 return IRQ_HANDLED;
1247 }
1248
1249 spin_lock(host->host_lock);
1250
1251 if (!ha->active) {
1252 spin_unlock(host->host_lock);
1253 return IRQ_HANDLED;
1254 }
1255
1256 irqstatus = (*ha->func.intr) (ha);
1257
1258 spin_unlock(host->host_lock);
1259
1260 /* start the next command */
1261 ips_next(ha, IPS_INTR_ON);
1262 return IRQ_RETVAL(irqstatus);
1263}
1264
1265/****************************************************************************/
1266/* */
1267/* Routine Name: ips_intr_copperhead */
1268/* */
1269/* Routine Description: */
1270/* */
1271/* Polling interrupt handler */
1272/* */
1273/* ASSUMES interrupts are disabled */
1274/* */
1275/****************************************************************************/
1276int
1277ips_intr_copperhead(ips_ha_t * ha)
1278{
1279 ips_stat_t *sp;
1280 ips_scb_t *scb;
1281 IPS_STATUS cstatus;
1282 int intrstatus;
1283
1284 METHOD_TRACE("ips_intr", 2);
1285
1286 if (!ha)
1287 return 0;
1288
1289 if (!ha->active)
1290 return 0;
1291
1292 intrstatus = (*ha->func.isintr) (ha);
1293
1294 if (!intrstatus) {
1295 /*
1296 * Unexpected/Shared interrupt
1297 */
1298
1299 return 0;
1300 }
1301
1302 while (TRUE) {
1303 sp = &ha->sp;
1304
1305 intrstatus = (*ha->func.isintr) (ha);
1306
1307 if (!intrstatus)
1308 break;
1309 else
1310 cstatus.value = (*ha->func.statupd) (ha);
1311
1312 if (cstatus.fields.command_id > (IPS_MAX_CMDS - 1)) {
1313 /* Spurious Interrupt ? */
1314 continue;
1315 }
1316
1317 ips_chkstatus(ha, &cstatus);
1318 scb = (ips_scb_t *) sp->scb_addr;
1319
1320 /*
1321 * use the callback function to finish things up
1322 * NOTE: interrupts are OFF for this
1323 */
1324 (*scb->callback) (ha, scb);
1325 } /* end while */
1326 return 1;
1327}
1328
1329/****************************************************************************/
1330/* */
1331/* Routine Name: ips_intr_morpheus */
1332/* */
1333/* Routine Description: */
1334/* */
1335/* Polling interrupt handler */
1336/* */
1337/* ASSUMES interrupts are disabled */
1338/* */
1339/****************************************************************************/
1340int
1341ips_intr_morpheus(ips_ha_t * ha)
1342{
1343 ips_stat_t *sp;
1344 ips_scb_t *scb;
1345 IPS_STATUS cstatus;
1346 int intrstatus;
1347
1348 METHOD_TRACE("ips_intr_morpheus", 2);
1349
1350 if (!ha)
1351 return 0;
1352
1353 if (!ha->active)
1354 return 0;
1355
1356 intrstatus = (*ha->func.isintr) (ha);
1357
1358 if (!intrstatus) {
1359 /*
1360 * Unexpected/Shared interrupt
1361 */
1362
1363 return 0;
1364 }
1365
1366 while (TRUE) {
1367 sp = &ha->sp;
1368
1369 intrstatus = (*ha->func.isintr) (ha);
1370
1371 if (!intrstatus)
1372 break;
1373 else
1374 cstatus.value = (*ha->func.statupd) (ha);
1375
1376 if (cstatus.value == 0xffffffff)
1377 /* No more to process */
1378 break;
1379
1380 if (cstatus.fields.command_id > (IPS_MAX_CMDS - 1)) {
1381 IPS_PRINTK(KERN_WARNING, ha->pcidev,
1382 "Spurious interrupt; no ccb.\n");
1383
1384 continue;
1385 }
1386
1387 ips_chkstatus(ha, &cstatus);
1388 scb = (ips_scb_t *) sp->scb_addr;
1389
1390 /*
1391 * use the callback function to finish things up
1392 * NOTE: interrupts are OFF for this
1393 */
1394 (*scb->callback) (ha, scb);
1395 } /* end while */
1396 return 1;
1397}
1398
1399/****************************************************************************/
1400/* */
1401/* Routine Name: ips_info */
1402/* */
1403/* Routine Description: */
1404/* */
1405/* Return info about the driver */
1406/* */
1407/****************************************************************************/
1408static const char *
1409ips_info(struct Scsi_Host *SH)
1410{
1411 static char buffer[256];
1412 char *bp;
1413 ips_ha_t *ha;
1414
1415 METHOD_TRACE("ips_info", 1);
1416
1417 ha = IPS_HA(SH);
1418
1419 if (!ha)
1420 return (NULL);
1421
1422 bp = &buffer[0];
1423 memset(bp, 0, sizeof (buffer));
1424
1425 sprintf(bp, "%s%s%s Build %d", "IBM PCI ServeRAID ",
1426 IPS_VERSION_HIGH, IPS_VERSION_LOW, IPS_BUILD_IDENT);
1427
1428 if (ha->ad_type > 0 && ha->ad_type <= MAX_ADAPTER_NAME) {
1429 strcat(bp, " <");
1430 strcat(bp, ips_adapter_name[ha->ad_type - 1]);
1431 strcat(bp, ">");
1432 }
1433
1434 return (bp);
1435}
1436
1437static int
1438ips_write_info(struct Scsi_Host *host, char *buffer, int length)
1439{
1440 int i;
1441 ips_ha_t *ha = NULL;
1442
1443 /* Find our host structure */
1444 for (i = 0; i < ips_next_controller; i++) {
1445 if (ips_sh[i]) {
1446 if (ips_sh[i] == host) {
1447 ha = (ips_ha_t *) ips_sh[i]->hostdata;
1448 break;
1449 }
1450 }
1451 }
1452
1453 if (!ha)
1454 return (-EINVAL);
1455
1456 return 0;
1457}
1458
1459static int
1460ips_show_info(struct seq_file *m, struct Scsi_Host *host)
1461{
1462 int i;
1463 ips_ha_t *ha = NULL;
1464
1465 /* Find our host structure */
1466 for (i = 0; i < ips_next_controller; i++) {
1467 if (ips_sh[i]) {
1468 if (ips_sh[i] == host) {
1469 ha = (ips_ha_t *) ips_sh[i]->hostdata;
1470 break;
1471 }
1472 }
1473 }
1474
1475 if (!ha)
1476 return (-EINVAL);
1477
1478 return ips_host_info(ha, m);
1479}
1480
1481/*--------------------------------------------------------------------------*/
1482/* Helper Functions */
1483/*--------------------------------------------------------------------------*/
1484
1485/****************************************************************************/
1486/* */
1487/* Routine Name: ips_is_passthru */
1488/* */
1489/* Routine Description: */
1490/* */
1491/* Determine if the specified SCSI command is really a passthru command */
1492/* */
1493/****************************************************************************/
1494static int ips_is_passthru(struct scsi_cmnd *SC)
1495{
1496 unsigned long flags;
1497
1498 METHOD_TRACE("ips_is_passthru", 1);
1499
1500 if (!SC)
1501 return (0);
1502
1503 if ((SC->cmnd[0] == IPS_IOCTL_COMMAND) &&
1504 (SC->device->channel == 0) &&
1505 (SC->device->id == IPS_ADAPTER_ID) &&
1506 (SC->device->lun == 0) && scsi_sglist(SC)) {
1507 struct scatterlist *sg = scsi_sglist(SC);
1508 char *buffer;
1509
1510 /* kmap_atomic() ensures addressability of the user buffer.*/
1511 /* local_irq_save() protects the KM_IRQ0 address slot. */
1512 local_irq_save(flags);
1513 buffer = kmap_atomic(sg_page(sg)) + sg->offset;
1514 if (buffer && buffer[0] == 'C' && buffer[1] == 'O' &&
1515 buffer[2] == 'P' && buffer[3] == 'P') {
1516 kunmap_atomic(buffer - sg->offset);
1517 local_irq_restore(flags);
1518 return 1;
1519 }
1520 kunmap_atomic(buffer - sg->offset);
1521 local_irq_restore(flags);
1522 }
1523 return 0;
1524}
1525
1526/****************************************************************************/
1527/* */
1528/* Routine Name: ips_alloc_passthru_buffer */
1529/* */
1530/* Routine Description: */
1531/* allocate a buffer large enough for the ioctl data if the ioctl buffer */
1532/* is too small or doesn't exist */
1533/****************************************************************************/
1534static int
1535ips_alloc_passthru_buffer(ips_ha_t * ha, int length)
1536{
1537 void *bigger_buf;
1538 dma_addr_t dma_busaddr;
1539
1540 if (ha->ioctl_data && length <= ha->ioctl_len)
1541 return 0;
1542 /* there is no buffer or it's not big enough, allocate a new one */
1543 bigger_buf = pci_alloc_consistent(ha->pcidev, length, &dma_busaddr);
1544 if (bigger_buf) {
1545 /* free the old memory */
1546 pci_free_consistent(ha->pcidev, ha->ioctl_len, ha->ioctl_data,
1547 ha->ioctl_busaddr);
1548 /* use the new memory */
1549 ha->ioctl_data = (char *) bigger_buf;
1550 ha->ioctl_len = length;
1551 ha->ioctl_busaddr = dma_busaddr;
1552 } else {
1553 return -1;
1554 }
1555 return 0;
1556}
1557
1558/****************************************************************************/
1559/* */
1560/* Routine Name: ips_make_passthru */
1561/* */
1562/* Routine Description: */
1563/* */
1564/* Make a passthru command out of the info in the Scsi block */
1565/* */
1566/****************************************************************************/
1567static int
1568ips_make_passthru(ips_ha_t *ha, struct scsi_cmnd *SC, ips_scb_t *scb, int intr)
1569{
1570 ips_passthru_t *pt;
1571 int length = 0;
1572 int i, ret;
1573 struct scatterlist *sg = scsi_sglist(SC);
1574
1575 METHOD_TRACE("ips_make_passthru", 1);
1576
1577 scsi_for_each_sg(SC, sg, scsi_sg_count(SC), i)
1578 length += sg->length;
1579
1580 if (length < sizeof (ips_passthru_t)) {
1581 /* wrong size */
1582 DEBUG_VAR(1, "(%s%d) Passthru structure wrong size",
1583 ips_name, ha->host_num);
1584 return (IPS_FAILURE);
1585 }
1586 if (ips_alloc_passthru_buffer(ha, length)) {
1587 /* allocation failure! If ha->ioctl_data exists, use it to return
1588 some error codes. Return a failed command to the scsi layer. */
1589 if (ha->ioctl_data) {
1590 pt = (ips_passthru_t *) ha->ioctl_data;
1591 ips_scmd_buf_read(SC, pt, sizeof (ips_passthru_t));
1592 pt->BasicStatus = 0x0B;
1593 pt->ExtendedStatus = 0x00;
1594 ips_scmd_buf_write(SC, pt, sizeof (ips_passthru_t));
1595 }
1596 return IPS_FAILURE;
1597 }
1598 ha->ioctl_datasize = length;
1599
1600 ips_scmd_buf_read(SC, ha->ioctl_data, ha->ioctl_datasize);
1601 pt = (ips_passthru_t *) ha->ioctl_data;
1602
1603 /*
1604 * Some notes about the passthru interface used
1605 *
1606 * IF the scsi op_code == 0x0d then we assume
1607 * that the data came along with/goes with the
1608 * packet we received from the sg driver. In this
1609 * case the CmdBSize field of the pt structure is
1610 * used for the size of the buffer.
1611 */
1612
1613 switch (pt->CoppCmd) {
1614 case IPS_NUMCTRLS:
1615 memcpy(ha->ioctl_data + sizeof (ips_passthru_t),
1616 &ips_num_controllers, sizeof (int));
1617 ips_scmd_buf_write(SC, ha->ioctl_data,
1618 sizeof (ips_passthru_t) + sizeof (int));
1619 SC->result = DID_OK << 16;
1620
1621 return (IPS_SUCCESS_IMM);
1622
1623 case IPS_COPPUSRCMD:
1624 case IPS_COPPIOCCMD:
1625 if (SC->cmnd[0] == IPS_IOCTL_COMMAND) {
1626 if (length < (sizeof (ips_passthru_t) + pt->CmdBSize)) {
1627 /* wrong size */
1628 DEBUG_VAR(1,
1629 "(%s%d) Passthru structure wrong size",
1630 ips_name, ha->host_num);
1631
1632 return (IPS_FAILURE);
1633 }
1634
1635 if (ha->pcidev->device == IPS_DEVICEID_COPPERHEAD &&
1636 pt->CoppCP.cmd.flashfw.op_code ==
1637 IPS_CMD_RW_BIOSFW) {
1638 ret = ips_flash_copperhead(ha, pt, scb);
1639 ips_scmd_buf_write(SC, ha->ioctl_data,
1640 sizeof (ips_passthru_t));
1641 return ret;
1642 }
1643 if (ips_usrcmd(ha, pt, scb))
1644 return (IPS_SUCCESS);
1645 else
1646 return (IPS_FAILURE);
1647 }
1648
1649 break;
1650
1651 } /* end switch */
1652
1653 return (IPS_FAILURE);
1654}
1655
1656/****************************************************************************/
1657/* Routine Name: ips_flash_copperhead */
1658/* Routine Description: */
1659/* Flash the BIOS/FW on a Copperhead style controller */
1660/****************************************************************************/
1661static int
1662ips_flash_copperhead(ips_ha_t * ha, ips_passthru_t * pt, ips_scb_t * scb)
1663{
1664 int datasize;
1665
1666 /* Trombone is the only copperhead that can do packet flash, but only
1667 * for firmware. No one said it had to make sense. */
1668 if (IPS_IS_TROMBONE(ha) && pt->CoppCP.cmd.flashfw.type == IPS_FW_IMAGE) {
1669 if (ips_usrcmd(ha, pt, scb))
1670 return IPS_SUCCESS;
1671 else
1672 return IPS_FAILURE;
1673 }
1674 pt->BasicStatus = 0x0B;
1675 pt->ExtendedStatus = 0;
1676 scb->scsi_cmd->result = DID_OK << 16;
1677 /* IF it's OK to Use the "CD BOOT" Flash Buffer, then you can */
1678 /* avoid allocating a huge buffer per adapter ( which can fail ). */
1679 if (pt->CoppCP.cmd.flashfw.type == IPS_BIOS_IMAGE &&
1680 pt->CoppCP.cmd.flashfw.direction == IPS_ERASE_BIOS) {
1681 pt->BasicStatus = 0;
1682 return ips_flash_bios(ha, pt, scb);
1683 } else if (pt->CoppCP.cmd.flashfw.packet_num == 0) {
1684 if (ips_FlashData && !test_and_set_bit(0, &ips_FlashDataInUse)){
1685 ha->flash_data = ips_FlashData;
1686 ha->flash_busaddr = ips_flashbusaddr;
1687 ha->flash_len = PAGE_SIZE << 7;
1688 ha->flash_datasize = 0;
1689 } else if (!ha->flash_data) {
1690 datasize = pt->CoppCP.cmd.flashfw.total_packets *
1691 pt->CoppCP.cmd.flashfw.count;
1692 ha->flash_data = pci_alloc_consistent(ha->pcidev,
1693 datasize,
1694 &ha->flash_busaddr);
1695 if (!ha->flash_data){
1696 printk(KERN_WARNING "Unable to allocate a flash buffer\n");
1697 return IPS_FAILURE;
1698 }
1699 ha->flash_datasize = 0;
1700 ha->flash_len = datasize;
1701 } else
1702 return IPS_FAILURE;
1703 } else {
1704 if (pt->CoppCP.cmd.flashfw.count + ha->flash_datasize >
1705 ha->flash_len) {
1706 ips_free_flash_copperhead(ha);
1707 IPS_PRINTK(KERN_WARNING, ha->pcidev,
1708 "failed size sanity check\n");
1709 return IPS_FAILURE;
1710 }
1711 }
1712 if (!ha->flash_data)
1713 return IPS_FAILURE;
1714 pt->BasicStatus = 0;
1715 memcpy(&ha->flash_data[ha->flash_datasize], pt + 1,
1716 pt->CoppCP.cmd.flashfw.count);
1717 ha->flash_datasize += pt->CoppCP.cmd.flashfw.count;
1718 if (pt->CoppCP.cmd.flashfw.packet_num ==
1719 pt->CoppCP.cmd.flashfw.total_packets - 1) {
1720 if (pt->CoppCP.cmd.flashfw.type == IPS_BIOS_IMAGE)
1721 return ips_flash_bios(ha, pt, scb);
1722 else if (pt->CoppCP.cmd.flashfw.type == IPS_FW_IMAGE)
1723 return ips_flash_firmware(ha, pt, scb);
1724 }
1725 return IPS_SUCCESS_IMM;
1726}
1727
1728/****************************************************************************/
1729/* Routine Name: ips_flash_bios */
1730/* Routine Description: */
1731/* flashes the bios of a copperhead adapter */
1732/****************************************************************************/
1733static int
1734ips_flash_bios(ips_ha_t * ha, ips_passthru_t * pt, ips_scb_t * scb)
1735{
1736
1737 if (pt->CoppCP.cmd.flashfw.type == IPS_BIOS_IMAGE &&
1738 pt->CoppCP.cmd.flashfw.direction == IPS_WRITE_BIOS) {
1739 if ((!ha->func.programbios) || (!ha->func.erasebios) ||
1740 (!ha->func.verifybios))
1741 goto error;
1742 if ((*ha->func.erasebios) (ha)) {
1743 DEBUG_VAR(1,
1744 "(%s%d) flash bios failed - unable to erase flash",
1745 ips_name, ha->host_num);
1746 goto error;
1747 } else
1748 if ((*ha->func.programbios) (ha,
1749 ha->flash_data +
1750 IPS_BIOS_HEADER,
1751 ha->flash_datasize -
1752 IPS_BIOS_HEADER, 0)) {
1753 DEBUG_VAR(1,
1754 "(%s%d) flash bios failed - unable to flash",
1755 ips_name, ha->host_num);
1756 goto error;
1757 } else
1758 if ((*ha->func.verifybios) (ha,
1759 ha->flash_data +
1760 IPS_BIOS_HEADER,
1761 ha->flash_datasize -
1762 IPS_BIOS_HEADER, 0)) {
1763 DEBUG_VAR(1,
1764 "(%s%d) flash bios failed - unable to verify flash",
1765 ips_name, ha->host_num);
1766 goto error;
1767 }
1768 ips_free_flash_copperhead(ha);
1769 return IPS_SUCCESS_IMM;
1770 } else if (pt->CoppCP.cmd.flashfw.type == IPS_BIOS_IMAGE &&
1771 pt->CoppCP.cmd.flashfw.direction == IPS_ERASE_BIOS) {
1772 if (!ha->func.erasebios)
1773 goto error;
1774 if ((*ha->func.erasebios) (ha)) {
1775 DEBUG_VAR(1,
1776 "(%s%d) flash bios failed - unable to erase flash",
1777 ips_name, ha->host_num);
1778 goto error;
1779 }
1780 return IPS_SUCCESS_IMM;
1781 }
1782 error:
1783 pt->BasicStatus = 0x0B;
1784 pt->ExtendedStatus = 0x00;
1785 ips_free_flash_copperhead(ha);
1786 return IPS_FAILURE;
1787}
1788
1789/****************************************************************************/
1790/* */
1791/* Routine Name: ips_fill_scb_sg_single */
1792/* */
1793/* Routine Description: */
1794/* Fill in a single scb sg_list element from an address */
1795/* return a -1 if a breakup occurred */
1796/****************************************************************************/
1797static int
1798ips_fill_scb_sg_single(ips_ha_t * ha, dma_addr_t busaddr,
1799 ips_scb_t * scb, int indx, unsigned int e_len)
1800{
1801
1802 int ret_val = 0;
1803
1804 if ((scb->data_len + e_len) > ha->max_xfer) {
1805 e_len = ha->max_xfer - scb->data_len;
1806 scb->breakup = indx;
1807 ++scb->sg_break;
1808 ret_val = -1;
1809 } else {
1810 scb->breakup = 0;
1811 scb->sg_break = 0;
1812 }
1813 if (IPS_USE_ENH_SGLIST(ha)) {
1814 scb->sg_list.enh_list[indx].address_lo =
1815 cpu_to_le32(pci_dma_lo32(busaddr));
1816 scb->sg_list.enh_list[indx].address_hi =
1817 cpu_to_le32(pci_dma_hi32(busaddr));
1818 scb->sg_list.enh_list[indx].length = cpu_to_le32(e_len);
1819 } else {
1820 scb->sg_list.std_list[indx].address =
1821 cpu_to_le32(pci_dma_lo32(busaddr));
1822 scb->sg_list.std_list[indx].length = cpu_to_le32(e_len);
1823 }
1824
1825 ++scb->sg_len;
1826 scb->data_len += e_len;
1827 return ret_val;
1828}
1829
1830/****************************************************************************/
1831/* Routine Name: ips_flash_firmware */
1832/* Routine Description: */
1833/* flashes the firmware of a copperhead adapter */
1834/****************************************************************************/
1835static int
1836ips_flash_firmware(ips_ha_t * ha, ips_passthru_t * pt, ips_scb_t * scb)
1837{
1838 IPS_SG_LIST sg_list;
1839 uint32_t cmd_busaddr;
1840
1841 if (pt->CoppCP.cmd.flashfw.type == IPS_FW_IMAGE &&
1842 pt->CoppCP.cmd.flashfw.direction == IPS_WRITE_FW) {
1843 memset(&pt->CoppCP.cmd, 0, sizeof (IPS_HOST_COMMAND));
1844 pt->CoppCP.cmd.flashfw.op_code = IPS_CMD_DOWNLOAD;
1845 pt->CoppCP.cmd.flashfw.count = cpu_to_le32(ha->flash_datasize);
1846 } else {
1847 pt->BasicStatus = 0x0B;
1848 pt->ExtendedStatus = 0x00;
1849 ips_free_flash_copperhead(ha);
1850 return IPS_FAILURE;
1851 }
1852 /* Save the S/G list pointer so it doesn't get clobbered */
1853 sg_list.list = scb->sg_list.list;
1854 cmd_busaddr = scb->scb_busaddr;
1855 /* copy in the CP */
1856 memcpy(&scb->cmd, &pt->CoppCP.cmd, sizeof (IPS_IOCTL_CMD));
1857 /* FIX stuff that might be wrong */
1858 scb->sg_list.list = sg_list.list;
1859 scb->scb_busaddr = cmd_busaddr;
1860 scb->bus = scb->scsi_cmd->device->channel;
1861 scb->target_id = scb->scsi_cmd->device->id;
1862 scb->lun = scb->scsi_cmd->device->lun;
1863 scb->sg_len = 0;
1864 scb->data_len = 0;
1865 scb->flags = 0;
1866 scb->op_code = 0;
1867 scb->callback = ipsintr_done;
1868 scb->timeout = ips_cmd_timeout;
1869
1870 scb->data_len = ha->flash_datasize;
1871 scb->data_busaddr =
1872 pci_map_single(ha->pcidev, ha->flash_data, scb->data_len,
1873 IPS_DMA_DIR(scb));
1874 scb->flags |= IPS_SCB_MAP_SINGLE;
1875 scb->cmd.flashfw.command_id = IPS_COMMAND_ID(ha, scb);
1876 scb->cmd.flashfw.buffer_addr = cpu_to_le32(scb->data_busaddr);
1877 if (pt->TimeOut)
1878 scb->timeout = pt->TimeOut;
1879 scb->scsi_cmd->result = DID_OK << 16;
1880 return IPS_SUCCESS;
1881}
1882
1883/****************************************************************************/
1884/* Routine Name: ips_free_flash_copperhead */
1885/* Routine Description: */
1886/* release the memory resources used to hold the flash image */
1887/****************************************************************************/
1888static void
1889ips_free_flash_copperhead(ips_ha_t * ha)
1890{
1891 if (ha->flash_data == ips_FlashData)
1892 test_and_clear_bit(0, &ips_FlashDataInUse);
1893 else if (ha->flash_data)
1894 pci_free_consistent(ha->pcidev, ha->flash_len, ha->flash_data,
1895 ha->flash_busaddr);
1896 ha->flash_data = NULL;
1897}
1898
1899/****************************************************************************/
1900/* */
1901/* Routine Name: ips_usrcmd */
1902/* */
1903/* Routine Description: */
1904/* */
1905/* Process a user command and make it ready to send */
1906/* */
1907/****************************************************************************/
1908static int
1909ips_usrcmd(ips_ha_t * ha, ips_passthru_t * pt, ips_scb_t * scb)
1910{
1911 IPS_SG_LIST sg_list;
1912 uint32_t cmd_busaddr;
1913
1914 METHOD_TRACE("ips_usrcmd", 1);
1915
1916 if ((!scb) || (!pt) || (!ha))
1917 return (0);
1918
1919 /* Save the S/G list pointer so it doesn't get clobbered */
1920 sg_list.list = scb->sg_list.list;
1921 cmd_busaddr = scb->scb_busaddr;
1922 /* copy in the CP */
1923 memcpy(&scb->cmd, &pt->CoppCP.cmd, sizeof (IPS_IOCTL_CMD));
1924 memcpy(&scb->dcdb, &pt->CoppCP.dcdb, sizeof (IPS_DCDB_TABLE));
1925
1926 /* FIX stuff that might be wrong */
1927 scb->sg_list.list = sg_list.list;
1928 scb->scb_busaddr = cmd_busaddr;
1929 scb->bus = scb->scsi_cmd->device->channel;
1930 scb->target_id = scb->scsi_cmd->device->id;
1931 scb->lun = scb->scsi_cmd->device->lun;
1932 scb->sg_len = 0;
1933 scb->data_len = 0;
1934 scb->flags = 0;
1935 scb->op_code = 0;
1936 scb->callback = ipsintr_done;
1937 scb->timeout = ips_cmd_timeout;
1938 scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
1939
1940 /* we don't support DCDB/READ/WRITE Scatter Gather */
1941 if ((scb->cmd.basic_io.op_code == IPS_CMD_READ_SG) ||
1942 (scb->cmd.basic_io.op_code == IPS_CMD_WRITE_SG) ||
1943 (scb->cmd.basic_io.op_code == IPS_CMD_DCDB_SG))
1944 return (0);
1945
1946 if (pt->CmdBSize) {
1947 scb->data_len = pt->CmdBSize;
1948 scb->data_busaddr = ha->ioctl_busaddr + sizeof (ips_passthru_t);
1949 } else {
1950 scb->data_busaddr = 0L;
1951 }
1952
1953 if (scb->cmd.dcdb.op_code == IPS_CMD_DCDB)
1954 scb->cmd.dcdb.dcdb_address = cpu_to_le32(scb->scb_busaddr +
1955 (unsigned long) &scb->
1956 dcdb -
1957 (unsigned long) scb);
1958
1959 if (pt->CmdBSize) {
1960 if (scb->cmd.dcdb.op_code == IPS_CMD_DCDB)
1961 scb->dcdb.buffer_pointer =
1962 cpu_to_le32(scb->data_busaddr);
1963 else
1964 scb->cmd.basic_io.sg_addr =
1965 cpu_to_le32(scb->data_busaddr);
1966 }
1967
1968 /* set timeouts */
1969 if (pt->TimeOut) {
1970 scb->timeout = pt->TimeOut;
1971
1972 if (pt->TimeOut <= 10)
1973 scb->dcdb.cmd_attribute |= IPS_TIMEOUT10;
1974 else if (pt->TimeOut <= 60)
1975 scb->dcdb.cmd_attribute |= IPS_TIMEOUT60;
1976 else
1977 scb->dcdb.cmd_attribute |= IPS_TIMEOUT20M;
1978 }
1979
1980 /* assume success */
1981 scb->scsi_cmd->result = DID_OK << 16;
1982
1983 /* success */
1984 return (1);
1985}
1986
1987/****************************************************************************/
1988/* */
1989/* Routine Name: ips_cleanup_passthru */
1990/* */
1991/* Routine Description: */
1992/* */
1993/* Cleanup after a passthru command */
1994/* */
1995/****************************************************************************/
1996static void
1997ips_cleanup_passthru(ips_ha_t * ha, ips_scb_t * scb)
1998{
1999 ips_passthru_t *pt;
2000
2001 METHOD_TRACE("ips_cleanup_passthru", 1);
2002
2003 if ((!scb) || (!scb->scsi_cmd) || (!scsi_sglist(scb->scsi_cmd))) {
2004 DEBUG_VAR(1, "(%s%d) couldn't cleanup after passthru",
2005 ips_name, ha->host_num);
2006
2007 return;
2008 }
2009 pt = (ips_passthru_t *) ha->ioctl_data;
2010
2011 /* Copy data back to the user */
2012 if (scb->cmd.dcdb.op_code == IPS_CMD_DCDB) /* Copy DCDB Back to Caller's Area */
2013 memcpy(&pt->CoppCP.dcdb, &scb->dcdb, sizeof (IPS_DCDB_TABLE));
2014
2015 pt->BasicStatus = scb->basic_status;
2016 pt->ExtendedStatus = scb->extended_status;
2017 pt->AdapterType = ha->ad_type;
2018
2019 if (ha->pcidev->device == IPS_DEVICEID_COPPERHEAD &&
2020 (scb->cmd.flashfw.op_code == IPS_CMD_DOWNLOAD ||
2021 scb->cmd.flashfw.op_code == IPS_CMD_RW_BIOSFW))
2022 ips_free_flash_copperhead(ha);
2023
2024 ips_scmd_buf_write(scb->scsi_cmd, ha->ioctl_data, ha->ioctl_datasize);
2025}
2026
2027/****************************************************************************/
2028/* */
2029/* Routine Name: ips_host_info */
2030/* */
2031/* Routine Description: */
2032/* */
2033/* The passthru interface for the driver */
2034/* */
2035/****************************************************************************/
2036static int
2037ips_host_info(ips_ha_t *ha, struct seq_file *m)
2038{
2039 METHOD_TRACE("ips_host_info", 1);
2040
2041 seq_printf(m, "\nIBM ServeRAID General Information:\n\n");
2042
2043 if ((le32_to_cpu(ha->nvram->signature) == IPS_NVRAM_P5_SIG) &&
2044 (le16_to_cpu(ha->nvram->adapter_type) != 0))
2045 seq_printf(m, "\tController Type : %s\n",
2046 ips_adapter_name[ha->ad_type - 1]);
2047 else
2048 seq_printf(m,
2049 "\tController Type : Unknown\n");
2050
2051 if (ha->io_addr)
2052 seq_printf(m,
2053 "\tIO region : 0x%x (%d bytes)\n",
2054 ha->io_addr, ha->io_len);
2055
2056 if (ha->mem_addr) {
2057 seq_printf(m,
2058 "\tMemory region : 0x%x (%d bytes)\n",
2059 ha->mem_addr, ha->mem_len);
2060 seq_printf(m,
2061 "\tShared memory address : 0x%lx\n",
2062 (unsigned long)ha->mem_ptr);
2063 }
2064
2065 seq_printf(m, "\tIRQ number : %d\n", ha->pcidev->irq);
2066
2067 /* For the Next 3 lines Check for Binary 0 at the end and don't include it if it's there. */
2068 /* That keeps everything happy for "text" operations on the proc file. */
2069
2070 if (le32_to_cpu(ha->nvram->signature) == IPS_NVRAM_P5_SIG) {
2071 if (ha->nvram->bios_low[3] == 0) {
2072 seq_printf(m,
2073 "\tBIOS Version : %c%c%c%c%c%c%c\n",
2074 ha->nvram->bios_high[0], ha->nvram->bios_high[1],
2075 ha->nvram->bios_high[2], ha->nvram->bios_high[3],
2076 ha->nvram->bios_low[0], ha->nvram->bios_low[1],
2077 ha->nvram->bios_low[2]);
2078
2079 } else {
2080 seq_printf(m,
2081 "\tBIOS Version : %c%c%c%c%c%c%c%c\n",
2082 ha->nvram->bios_high[0], ha->nvram->bios_high[1],
2083 ha->nvram->bios_high[2], ha->nvram->bios_high[3],
2084 ha->nvram->bios_low[0], ha->nvram->bios_low[1],
2085 ha->nvram->bios_low[2], ha->nvram->bios_low[3]);
2086 }
2087
2088 }
2089
2090 if (ha->enq->CodeBlkVersion[7] == 0) {
2091 seq_printf(m,
2092 "\tFirmware Version : %c%c%c%c%c%c%c\n",
2093 ha->enq->CodeBlkVersion[0], ha->enq->CodeBlkVersion[1],
2094 ha->enq->CodeBlkVersion[2], ha->enq->CodeBlkVersion[3],
2095 ha->enq->CodeBlkVersion[4], ha->enq->CodeBlkVersion[5],
2096 ha->enq->CodeBlkVersion[6]);
2097 } else {
2098 seq_printf(m,
2099 "\tFirmware Version : %c%c%c%c%c%c%c%c\n",
2100 ha->enq->CodeBlkVersion[0], ha->enq->CodeBlkVersion[1],
2101 ha->enq->CodeBlkVersion[2], ha->enq->CodeBlkVersion[3],
2102 ha->enq->CodeBlkVersion[4], ha->enq->CodeBlkVersion[5],
2103 ha->enq->CodeBlkVersion[6], ha->enq->CodeBlkVersion[7]);
2104 }
2105
2106 if (ha->enq->BootBlkVersion[7] == 0) {
2107 seq_printf(m,
2108 "\tBoot Block Version : %c%c%c%c%c%c%c\n",
2109 ha->enq->BootBlkVersion[0], ha->enq->BootBlkVersion[1],
2110 ha->enq->BootBlkVersion[2], ha->enq->BootBlkVersion[3],
2111 ha->enq->BootBlkVersion[4], ha->enq->BootBlkVersion[5],
2112 ha->enq->BootBlkVersion[6]);
2113 } else {
2114 seq_printf(m,
2115 "\tBoot Block Version : %c%c%c%c%c%c%c%c\n",
2116 ha->enq->BootBlkVersion[0], ha->enq->BootBlkVersion[1],
2117 ha->enq->BootBlkVersion[2], ha->enq->BootBlkVersion[3],
2118 ha->enq->BootBlkVersion[4], ha->enq->BootBlkVersion[5],
2119 ha->enq->BootBlkVersion[6], ha->enq->BootBlkVersion[7]);
2120 }
2121
2122 seq_printf(m, "\tDriver Version : %s%s\n",
2123 IPS_VERSION_HIGH, IPS_VERSION_LOW);
2124
2125 seq_printf(m, "\tDriver Build : %d\n",
2126 IPS_BUILD_IDENT);
2127
2128 seq_printf(m, "\tMax Physical Devices : %d\n",
2129 ha->enq->ucMaxPhysicalDevices);
2130 seq_printf(m, "\tMax Active Commands : %d\n",
2131 ha->max_cmds);
2132 seq_printf(m, "\tCurrent Queued Commands : %d\n",
2133 ha->scb_waitlist.count);
2134 seq_printf(m, "\tCurrent Active Commands : %d\n",
2135 ha->scb_activelist.count - ha->num_ioctl);
2136 seq_printf(m, "\tCurrent Queued PT Commands : %d\n",
2137 ha->copp_waitlist.count);
2138 seq_printf(m, "\tCurrent Active PT Commands : %d\n",
2139 ha->num_ioctl);
2140
2141 seq_printf(m, "\n");
2142
2143 return 0;
2144}
2145
2146/****************************************************************************/
2147/* */
2148/* Routine Name: ips_identify_controller */
2149/* */
2150/* Routine Description: */
2151/* */
2152/* Identify this controller */
2153/* */
2154/****************************************************************************/
2155static void
2156ips_identify_controller(ips_ha_t * ha)
2157{
2158 METHOD_TRACE("ips_identify_controller", 1);
2159
2160 switch (ha->pcidev->device) {
2161 case IPS_DEVICEID_COPPERHEAD:
2162 if (ha->pcidev->revision <= IPS_REVID_SERVERAID) {
2163 ha->ad_type = IPS_ADTYPE_SERVERAID;
2164 } else if (ha->pcidev->revision == IPS_REVID_SERVERAID2) {
2165 ha->ad_type = IPS_ADTYPE_SERVERAID2;
2166 } else if (ha->pcidev->revision == IPS_REVID_NAVAJO) {
2167 ha->ad_type = IPS_ADTYPE_NAVAJO;
2168 } else if ((ha->pcidev->revision == IPS_REVID_SERVERAID2)
2169 && (ha->slot_num == 0)) {
2170 ha->ad_type = IPS_ADTYPE_KIOWA;
2171 } else if ((ha->pcidev->revision >= IPS_REVID_CLARINETP1) &&
2172 (ha->pcidev->revision <= IPS_REVID_CLARINETP3)) {
2173 if (ha->enq->ucMaxPhysicalDevices == 15)
2174 ha->ad_type = IPS_ADTYPE_SERVERAID3L;
2175 else
2176 ha->ad_type = IPS_ADTYPE_SERVERAID3;
2177 } else if ((ha->pcidev->revision >= IPS_REVID_TROMBONE32) &&
2178 (ha->pcidev->revision <= IPS_REVID_TROMBONE64)) {
2179 ha->ad_type = IPS_ADTYPE_SERVERAID4H;
2180 }
2181 break;
2182
2183 case IPS_DEVICEID_MORPHEUS:
2184 switch (ha->pcidev->subsystem_device) {
2185 case IPS_SUBDEVICEID_4L:
2186 ha->ad_type = IPS_ADTYPE_SERVERAID4L;
2187 break;
2188
2189 case IPS_SUBDEVICEID_4M:
2190 ha->ad_type = IPS_ADTYPE_SERVERAID4M;
2191 break;
2192
2193 case IPS_SUBDEVICEID_4MX:
2194 ha->ad_type = IPS_ADTYPE_SERVERAID4MX;
2195 break;
2196
2197 case IPS_SUBDEVICEID_4LX:
2198 ha->ad_type = IPS_ADTYPE_SERVERAID4LX;
2199 break;
2200
2201 case IPS_SUBDEVICEID_5I2:
2202 ha->ad_type = IPS_ADTYPE_SERVERAID5I2;
2203 break;
2204
2205 case IPS_SUBDEVICEID_5I1:
2206 ha->ad_type = IPS_ADTYPE_SERVERAID5I1;
2207 break;
2208 }
2209
2210 break;
2211
2212 case IPS_DEVICEID_MARCO:
2213 switch (ha->pcidev->subsystem_device) {
2214 case IPS_SUBDEVICEID_6M:
2215 ha->ad_type = IPS_ADTYPE_SERVERAID6M;
2216 break;
2217 case IPS_SUBDEVICEID_6I:
2218 ha->ad_type = IPS_ADTYPE_SERVERAID6I;
2219 break;
2220 case IPS_SUBDEVICEID_7k:
2221 ha->ad_type = IPS_ADTYPE_SERVERAID7k;
2222 break;
2223 case IPS_SUBDEVICEID_7M:
2224 ha->ad_type = IPS_ADTYPE_SERVERAID7M;
2225 break;
2226 }
2227 break;
2228 }
2229}
2230
2231/****************************************************************************/
2232/* */
2233/* Routine Name: ips_get_bios_version */
2234/* */
2235/* Routine Description: */
2236/* */
2237/* Get the BIOS revision number */
2238/* */
2239/****************************************************************************/
2240static void
2241ips_get_bios_version(ips_ha_t * ha, int intr)
2242{
2243 ips_scb_t *scb;
2244 int ret;
2245 uint8_t major;
2246 uint8_t minor;
2247 uint8_t subminor;
2248 uint8_t *buffer;
2249 char hexDigits[] =
2250 { '0', '1', '2', '3', '4', '5', '6', '7', '8', '9', 'A', 'B', 'C',
2251 'D', 'E', 'F' };
2252
2253 METHOD_TRACE("ips_get_bios_version", 1);
2254
2255 major = 0;
2256 minor = 0;
2257
2258 strncpy(ha->bios_version, " ?", 8);
2259
2260 if (ha->pcidev->device == IPS_DEVICEID_COPPERHEAD) {
2261 if (IPS_USE_MEMIO(ha)) {
2262 /* Memory Mapped I/O */
2263
2264 /* test 1st byte */
2265 writel(0, ha->mem_ptr + IPS_REG_FLAP);
2266 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2267 udelay(25); /* 25 us */
2268
2269 if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0x55)
2270 return;
2271
2272 writel(1, ha->mem_ptr + IPS_REG_FLAP);
2273 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2274 udelay(25); /* 25 us */
2275
2276 if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0xAA)
2277 return;
2278
2279 /* Get Major version */
2280 writel(0x1FF, ha->mem_ptr + IPS_REG_FLAP);
2281 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2282 udelay(25); /* 25 us */
2283
2284 major = readb(ha->mem_ptr + IPS_REG_FLDP);
2285
2286 /* Get Minor version */
2287 writel(0x1FE, ha->mem_ptr + IPS_REG_FLAP);
2288 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2289 udelay(25); /* 25 us */
2290 minor = readb(ha->mem_ptr + IPS_REG_FLDP);
2291
2292 /* Get SubMinor version */
2293 writel(0x1FD, ha->mem_ptr + IPS_REG_FLAP);
2294 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2295 udelay(25); /* 25 us */
2296 subminor = readb(ha->mem_ptr + IPS_REG_FLDP);
2297
2298 } else {
2299 /* Programmed I/O */
2300
2301 /* test 1st byte */
2302 outl(0, ha->io_addr + IPS_REG_FLAP);
2303 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2304 udelay(25); /* 25 us */
2305
2306 if (inb(ha->io_addr + IPS_REG_FLDP) != 0x55)
2307 return;
2308
2309 outl(1, ha->io_addr + IPS_REG_FLAP);
2310 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2311 udelay(25); /* 25 us */
2312
2313 if (inb(ha->io_addr + IPS_REG_FLDP) != 0xAA)
2314 return;
2315
2316 /* Get Major version */
2317 outl(0x1FF, ha->io_addr + IPS_REG_FLAP);
2318 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2319 udelay(25); /* 25 us */
2320
2321 major = inb(ha->io_addr + IPS_REG_FLDP);
2322
2323 /* Get Minor version */
2324 outl(0x1FE, ha->io_addr + IPS_REG_FLAP);
2325 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2326 udelay(25); /* 25 us */
2327
2328 minor = inb(ha->io_addr + IPS_REG_FLDP);
2329
2330 /* Get SubMinor version */
2331 outl(0x1FD, ha->io_addr + IPS_REG_FLAP);
2332 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2333 udelay(25); /* 25 us */
2334
2335 subminor = inb(ha->io_addr + IPS_REG_FLDP);
2336
2337 }
2338 } else {
2339 /* Morpheus Family - Send Command to the card */
2340
2341 buffer = ha->ioctl_data;
2342
2343 memset(buffer, 0, 0x1000);
2344
2345 scb = &ha->scbs[ha->max_cmds - 1];
2346
2347 ips_init_scb(ha, scb);
2348
2349 scb->timeout = ips_cmd_timeout;
2350 scb->cdb[0] = IPS_CMD_RW_BIOSFW;
2351
2352 scb->cmd.flashfw.op_code = IPS_CMD_RW_BIOSFW;
2353 scb->cmd.flashfw.command_id = IPS_COMMAND_ID(ha, scb);
2354 scb->cmd.flashfw.type = 1;
2355 scb->cmd.flashfw.direction = 0;
2356 scb->cmd.flashfw.count = cpu_to_le32(0x800);
2357 scb->cmd.flashfw.total_packets = 1;
2358 scb->cmd.flashfw.packet_num = 0;
2359 scb->data_len = 0x1000;
2360 scb->cmd.flashfw.buffer_addr = ha->ioctl_busaddr;
2361
2362 /* issue the command */
2363 if (((ret =
2364 ips_send_wait(ha, scb, ips_cmd_timeout,
2365 intr)) == IPS_FAILURE)
2366 || (ret == IPS_SUCCESS_IMM)
2367 || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1)) {
2368 /* Error occurred */
2369
2370 return;
2371 }
2372
2373 if ((buffer[0xC0] == 0x55) && (buffer[0xC1] == 0xAA)) {
2374 major = buffer[0x1ff + 0xC0]; /* Offset 0x1ff after the header (0xc0) */
2375 minor = buffer[0x1fe + 0xC0]; /* Offset 0x1fe after the header (0xc0) */
2376 subminor = buffer[0x1fd + 0xC0]; /* Offset 0x1fd after the header (0xc0) */
2377 } else {
2378 return;
2379 }
2380 }
2381
2382 ha->bios_version[0] = hexDigits[(major & 0xF0) >> 4];
2383 ha->bios_version[1] = '.';
2384 ha->bios_version[2] = hexDigits[major & 0x0F];
2385 ha->bios_version[3] = hexDigits[subminor];
2386 ha->bios_version[4] = '.';
2387 ha->bios_version[5] = hexDigits[(minor & 0xF0) >> 4];
2388 ha->bios_version[6] = hexDigits[minor & 0x0F];
2389 ha->bios_version[7] = 0;
2390}
2391
2392/****************************************************************************/
2393/* */
2394/* Routine Name: ips_hainit */
2395/* */
2396/* Routine Description: */
2397/* */
2398/* Initialize the controller */
2399/* */
2400/* NOTE: Assumes to be called from with a lock */
2401/* */
2402/****************************************************************************/
2403static int
2404ips_hainit(ips_ha_t * ha)
2405{
2406 int i;
2407 struct timeval tv;
2408
2409 METHOD_TRACE("ips_hainit", 1);
2410
2411 if (!ha)
2412 return (0);
2413
2414 if (ha->func.statinit)
2415 (*ha->func.statinit) (ha);
2416
2417 if (ha->func.enableint)
2418 (*ha->func.enableint) (ha);
2419
2420 /* Send FFDC */
2421 ha->reset_count = 1;
2422 do_gettimeofday(&tv);
2423 ha->last_ffdc = tv.tv_sec;
2424 ips_ffdc_reset(ha, IPS_INTR_IORL);
2425
2426 if (!ips_read_config(ha, IPS_INTR_IORL)) {
2427 IPS_PRINTK(KERN_WARNING, ha->pcidev,
2428 "unable to read config from controller.\n");
2429
2430 return (0);
2431 }
2432 /* end if */
2433 if (!ips_read_adapter_status(ha, IPS_INTR_IORL)) {
2434 IPS_PRINTK(KERN_WARNING, ha->pcidev,
2435 "unable to read controller status.\n");
2436
2437 return (0);
2438 }
2439
2440 /* Identify this controller */
2441 ips_identify_controller(ha);
2442
2443 if (!ips_read_subsystem_parameters(ha, IPS_INTR_IORL)) {
2444 IPS_PRINTK(KERN_WARNING, ha->pcidev,
2445 "unable to read subsystem parameters.\n");
2446
2447 return (0);
2448 }
2449
2450 /* write nvram user page 5 */
2451 if (!ips_write_driver_status(ha, IPS_INTR_IORL)) {
2452 IPS_PRINTK(KERN_WARNING, ha->pcidev,
2453 "unable to write driver info to controller.\n");
2454
2455 return (0);
2456 }
2457
2458 /* If there are Logical Drives and a Reset Occurred, then an EraseStripeLock is Needed */
2459 if ((ha->conf->ucLogDriveCount > 0) && (ha->requires_esl == 1))
2460 ips_clear_adapter(ha, IPS_INTR_IORL);
2461
2462 /* set limits on SID, LUN, BUS */
2463 ha->ntargets = IPS_MAX_TARGETS + 1;
2464 ha->nlun = 1;
2465 ha->nbus = (ha->enq->ucMaxPhysicalDevices / IPS_MAX_TARGETS) + 1;
2466
2467 switch (ha->conf->logical_drive[0].ucStripeSize) {
2468 case 4:
2469 ha->max_xfer = 0x10000;
2470 break;
2471
2472 case 5:
2473 ha->max_xfer = 0x20000;
2474 break;
2475
2476 case 6:
2477 ha->max_xfer = 0x40000;
2478 break;
2479
2480 case 7:
2481 default:
2482 ha->max_xfer = 0x80000;
2483 break;
2484 }
2485
2486 /* setup max concurrent commands */
2487 if (le32_to_cpu(ha->subsys->param[4]) & 0x1) {
2488 /* Use the new method */
2489 ha->max_cmds = ha->enq->ucConcurrentCmdCount;
2490 } else {
2491 /* use the old method */
2492 switch (ha->conf->logical_drive[0].ucStripeSize) {
2493 case 4:
2494 ha->max_cmds = 32;
2495 break;
2496
2497 case 5:
2498 ha->max_cmds = 16;
2499 break;
2500
2501 case 6:
2502 ha->max_cmds = 8;
2503 break;
2504
2505 case 7:
2506 default:
2507 ha->max_cmds = 4;
2508 break;
2509 }
2510 }
2511
2512 /* Limit the Active Commands on a Lite Adapter */
2513 if ((ha->ad_type == IPS_ADTYPE_SERVERAID3L) ||
2514 (ha->ad_type == IPS_ADTYPE_SERVERAID4L) ||
2515 (ha->ad_type == IPS_ADTYPE_SERVERAID4LX)) {
2516 if ((ha->max_cmds > MaxLiteCmds) && (MaxLiteCmds))
2517 ha->max_cmds = MaxLiteCmds;
2518 }
2519
2520 /* set controller IDs */
2521 ha->ha_id[0] = IPS_ADAPTER_ID;
2522 for (i = 1; i < ha->nbus; i++) {
2523 ha->ha_id[i] = ha->conf->init_id[i - 1] & 0x1f;
2524 ha->dcdb_active[i - 1] = 0;
2525 }
2526
2527 return (1);
2528}
2529
2530/****************************************************************************/
2531/* */
2532/* Routine Name: ips_next */
2533/* */
2534/* Routine Description: */
2535/* */
2536/* Take the next command off the queue and send it to the controller */
2537/* */
2538/****************************************************************************/
2539static void
2540ips_next(ips_ha_t * ha, int intr)
2541{
2542 ips_scb_t *scb;
2543 struct scsi_cmnd *SC;
2544 struct scsi_cmnd *p;
2545 struct scsi_cmnd *q;
2546 ips_copp_wait_item_t *item;
2547 int ret;
2548 struct Scsi_Host *host;
2549 METHOD_TRACE("ips_next", 1);
2550
2551 if (!ha)
2552 return;
2553 host = ips_sh[ha->host_num];
2554 /*
2555 * Block access to the queue function so
2556 * this command won't time out
2557 */
2558 if (intr == IPS_INTR_ON)
2559 spin_lock(host->host_lock);
2560
2561 if ((ha->subsys->param[3] & 0x300000)
2562 && (ha->scb_activelist.count == 0)) {
2563 struct timeval tv;
2564
2565 do_gettimeofday(&tv);
2566
2567 if (tv.tv_sec - ha->last_ffdc > IPS_SECS_8HOURS) {
2568 ha->last_ffdc = tv.tv_sec;
2569 ips_ffdc_time(ha);
2570 }
2571 }
2572
2573 /*
2574 * Send passthru commands
2575 * These have priority over normal I/O
2576 * but shouldn't affect performance too much
2577 * since we limit the number that can be active
2578 * on the card at any one time
2579 */
2580 while ((ha->num_ioctl < IPS_MAX_IOCTL) &&
2581 (ha->copp_waitlist.head) && (scb = ips_getscb(ha))) {
2582
2583 item = ips_removeq_copp_head(&ha->copp_waitlist);
2584 ha->num_ioctl++;
2585 if (intr == IPS_INTR_ON)
2586 spin_unlock(host->host_lock);
2587 scb->scsi_cmd = item->scsi_cmd;
2588 kfree(item);
2589
2590 ret = ips_make_passthru(ha, scb->scsi_cmd, scb, intr);
2591
2592 if (intr == IPS_INTR_ON)
2593 spin_lock(host->host_lock);
2594 switch (ret) {
2595 case IPS_FAILURE:
2596 if (scb->scsi_cmd) {
2597 scb->scsi_cmd->result = DID_ERROR << 16;
2598 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
2599 }
2600
2601 ips_freescb(ha, scb);
2602 break;
2603 case IPS_SUCCESS_IMM:
2604 if (scb->scsi_cmd) {
2605 scb->scsi_cmd->result = DID_OK << 16;
2606 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
2607 }
2608
2609 ips_freescb(ha, scb);
2610 break;
2611 default:
2612 break;
2613 } /* end case */
2614
2615 if (ret != IPS_SUCCESS) {
2616 ha->num_ioctl--;
2617 continue;
2618 }
2619
2620 ret = ips_send_cmd(ha, scb);
2621
2622 if (ret == IPS_SUCCESS)
2623 ips_putq_scb_head(&ha->scb_activelist, scb);
2624 else
2625 ha->num_ioctl--;
2626
2627 switch (ret) {
2628 case IPS_FAILURE:
2629 if (scb->scsi_cmd) {
2630 scb->scsi_cmd->result = DID_ERROR << 16;
2631 }
2632
2633 ips_freescb(ha, scb);
2634 break;
2635 case IPS_SUCCESS_IMM:
2636 ips_freescb(ha, scb);
2637 break;
2638 default:
2639 break;
2640 } /* end case */
2641
2642 }
2643
2644 /*
2645 * Send "Normal" I/O commands
2646 */
2647
2648 p = ha->scb_waitlist.head;
2649 while ((p) && (scb = ips_getscb(ha))) {
2650 if ((scmd_channel(p) > 0)
2651 && (ha->
2652 dcdb_active[scmd_channel(p) -
2653 1] & (1 << scmd_id(p)))) {
2654 ips_freescb(ha, scb);
2655 p = (struct scsi_cmnd *) p->host_scribble;
2656 continue;
2657 }
2658
2659 q = p;
2660 SC = ips_removeq_wait(&ha->scb_waitlist, q);
2661
2662 if (intr == IPS_INTR_ON)
2663 spin_unlock(host->host_lock); /* Unlock HA after command is taken off queue */
2664
2665 SC->result = DID_OK;
2666 SC->host_scribble = NULL;
2667
2668 scb->target_id = SC->device->id;
2669 scb->lun = SC->device->lun;
2670 scb->bus = SC->device->channel;
2671 scb->scsi_cmd = SC;
2672 scb->breakup = 0;
2673 scb->data_len = 0;
2674 scb->callback = ipsintr_done;
2675 scb->timeout = ips_cmd_timeout;
2676 memset(&scb->cmd, 0, 16);
2677
2678 /* copy in the CDB */
2679 memcpy(scb->cdb, SC->cmnd, SC->cmd_len);
2680
2681 scb->sg_count = scsi_dma_map(SC);
2682 BUG_ON(scb->sg_count < 0);
2683 if (scb->sg_count) {
2684 struct scatterlist *sg;
2685 int i;
2686
2687 scb->flags |= IPS_SCB_MAP_SG;
2688
2689 scsi_for_each_sg(SC, sg, scb->sg_count, i) {
2690 if (ips_fill_scb_sg_single
2691 (ha, sg_dma_address(sg), scb, i,
2692 sg_dma_len(sg)) < 0)
2693 break;
2694 }
2695 scb->dcdb.transfer_length = scb->data_len;
2696 } else {
2697 scb->data_busaddr = 0L;
2698 scb->sg_len = 0;
2699 scb->data_len = 0;
2700 scb->dcdb.transfer_length = 0;
2701 }
2702
2703 scb->dcdb.cmd_attribute =
2704 ips_command_direction[scb->scsi_cmd->cmnd[0]];
2705
2706 /* Allow a WRITE BUFFER Command to Have no Data */
2707 /* This is Used by Tape Flash Utilites */
2708 if ((scb->scsi_cmd->cmnd[0] == WRITE_BUFFER) &&
2709 (scb->data_len == 0))
2710 scb->dcdb.cmd_attribute = 0;
2711
2712 if (!(scb->dcdb.cmd_attribute & 0x3))
2713 scb->dcdb.transfer_length = 0;
2714
2715 if (scb->data_len >= IPS_MAX_XFER) {
2716 scb->dcdb.cmd_attribute |= IPS_TRANSFER64K;
2717 scb->dcdb.transfer_length = 0;
2718 }
2719 if (intr == IPS_INTR_ON)
2720 spin_lock(host->host_lock);
2721
2722 ret = ips_send_cmd(ha, scb);
2723
2724 switch (ret) {
2725 case IPS_SUCCESS:
2726 ips_putq_scb_head(&ha->scb_activelist, scb);
2727 break;
2728 case IPS_FAILURE:
2729 if (scb->scsi_cmd) {
2730 scb->scsi_cmd->result = DID_ERROR << 16;
2731 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
2732 }
2733
2734 if (scb->bus)
2735 ha->dcdb_active[scb->bus - 1] &=
2736 ~(1 << scb->target_id);
2737
2738 ips_freescb(ha, scb);
2739 break;
2740 case IPS_SUCCESS_IMM:
2741 if (scb->scsi_cmd)
2742 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
2743
2744 if (scb->bus)
2745 ha->dcdb_active[scb->bus - 1] &=
2746 ~(1 << scb->target_id);
2747
2748 ips_freescb(ha, scb);
2749 break;
2750 default:
2751 break;
2752 } /* end case */
2753
2754 p = (struct scsi_cmnd *) p->host_scribble;
2755
2756 } /* end while */
2757
2758 if (intr == IPS_INTR_ON)
2759 spin_unlock(host->host_lock);
2760}
2761
2762/****************************************************************************/
2763/* */
2764/* Routine Name: ips_putq_scb_head */
2765/* */
2766/* Routine Description: */
2767/* */
2768/* Add an item to the head of the queue */
2769/* */
2770/* ASSUMED to be called from within the HA lock */
2771/* */
2772/****************************************************************************/
2773static void
2774ips_putq_scb_head(ips_scb_queue_t * queue, ips_scb_t * item)
2775{
2776 METHOD_TRACE("ips_putq_scb_head", 1);
2777
2778 if (!item)
2779 return;
2780
2781 item->q_next = queue->head;
2782 queue->head = item;
2783
2784 if (!queue->tail)
2785 queue->tail = item;
2786
2787 queue->count++;
2788}
2789
2790/****************************************************************************/
2791/* */
2792/* Routine Name: ips_removeq_scb_head */
2793/* */
2794/* Routine Description: */
2795/* */
2796/* Remove the head of the queue */
2797/* */
2798/* ASSUMED to be called from within the HA lock */
2799/* */
2800/****************************************************************************/
2801static ips_scb_t *
2802ips_removeq_scb_head(ips_scb_queue_t * queue)
2803{
2804 ips_scb_t *item;
2805
2806 METHOD_TRACE("ips_removeq_scb_head", 1);
2807
2808 item = queue->head;
2809
2810 if (!item) {
2811 return (NULL);
2812 }
2813
2814 queue->head = item->q_next;
2815 item->q_next = NULL;
2816
2817 if (queue->tail == item)
2818 queue->tail = NULL;
2819
2820 queue->count--;
2821
2822 return (item);
2823}
2824
2825/****************************************************************************/
2826/* */
2827/* Routine Name: ips_removeq_scb */
2828/* */
2829/* Routine Description: */
2830/* */
2831/* Remove an item from a queue */
2832/* */
2833/* ASSUMED to be called from within the HA lock */
2834/* */
2835/****************************************************************************/
2836static ips_scb_t *
2837ips_removeq_scb(ips_scb_queue_t * queue, ips_scb_t * item)
2838{
2839 ips_scb_t *p;
2840
2841 METHOD_TRACE("ips_removeq_scb", 1);
2842
2843 if (!item)
2844 return (NULL);
2845
2846 if (item == queue->head) {
2847 return (ips_removeq_scb_head(queue));
2848 }
2849
2850 p = queue->head;
2851
2852 while ((p) && (item != p->q_next))
2853 p = p->q_next;
2854
2855 if (p) {
2856 /* found a match */
2857 p->q_next = item->q_next;
2858
2859 if (!item->q_next)
2860 queue->tail = p;
2861
2862 item->q_next = NULL;
2863 queue->count--;
2864
2865 return (item);
2866 }
2867
2868 return (NULL);
2869}
2870
2871/****************************************************************************/
2872/* */
2873/* Routine Name: ips_putq_wait_tail */
2874/* */
2875/* Routine Description: */
2876/* */
2877/* Add an item to the tail of the queue */
2878/* */
2879/* ASSUMED to be called from within the HA lock */
2880/* */
2881/****************************************************************************/
2882static void ips_putq_wait_tail(ips_wait_queue_t *queue, struct scsi_cmnd *item)
2883{
2884 METHOD_TRACE("ips_putq_wait_tail", 1);
2885
2886 if (!item)
2887 return;
2888
2889 item->host_scribble = NULL;
2890
2891 if (queue->tail)
2892 queue->tail->host_scribble = (char *) item;
2893
2894 queue->tail = item;
2895
2896 if (!queue->head)
2897 queue->head = item;
2898
2899 queue->count++;
2900}
2901
2902/****************************************************************************/
2903/* */
2904/* Routine Name: ips_removeq_wait_head */
2905/* */
2906/* Routine Description: */
2907/* */
2908/* Remove the head of the queue */
2909/* */
2910/* ASSUMED to be called from within the HA lock */
2911/* */
2912/****************************************************************************/
2913static struct scsi_cmnd *ips_removeq_wait_head(ips_wait_queue_t *queue)
2914{
2915 struct scsi_cmnd *item;
2916
2917 METHOD_TRACE("ips_removeq_wait_head", 1);
2918
2919 item = queue->head;
2920
2921 if (!item) {
2922 return (NULL);
2923 }
2924
2925 queue->head = (struct scsi_cmnd *) item->host_scribble;
2926 item->host_scribble = NULL;
2927
2928 if (queue->tail == item)
2929 queue->tail = NULL;
2930
2931 queue->count--;
2932
2933 return (item);
2934}
2935
2936/****************************************************************************/
2937/* */
2938/* Routine Name: ips_removeq_wait */
2939/* */
2940/* Routine Description: */
2941/* */
2942/* Remove an item from a queue */
2943/* */
2944/* ASSUMED to be called from within the HA lock */
2945/* */
2946/****************************************************************************/
2947static struct scsi_cmnd *ips_removeq_wait(ips_wait_queue_t *queue,
2948 struct scsi_cmnd *item)
2949{
2950 struct scsi_cmnd *p;
2951
2952 METHOD_TRACE("ips_removeq_wait", 1);
2953
2954 if (!item)
2955 return (NULL);
2956
2957 if (item == queue->head) {
2958 return (ips_removeq_wait_head(queue));
2959 }
2960
2961 p = queue->head;
2962
2963 while ((p) && (item != (struct scsi_cmnd *) p->host_scribble))
2964 p = (struct scsi_cmnd *) p->host_scribble;
2965
2966 if (p) {
2967 /* found a match */
2968 p->host_scribble = item->host_scribble;
2969
2970 if (!item->host_scribble)
2971 queue->tail = p;
2972
2973 item->host_scribble = NULL;
2974 queue->count--;
2975
2976 return (item);
2977 }
2978
2979 return (NULL);
2980}
2981
2982/****************************************************************************/
2983/* */
2984/* Routine Name: ips_putq_copp_tail */
2985/* */
2986/* Routine Description: */
2987/* */
2988/* Add an item to the tail of the queue */
2989/* */
2990/* ASSUMED to be called from within the HA lock */
2991/* */
2992/****************************************************************************/
2993static void
2994ips_putq_copp_tail(ips_copp_queue_t * queue, ips_copp_wait_item_t * item)
2995{
2996 METHOD_TRACE("ips_putq_copp_tail", 1);
2997
2998 if (!item)
2999 return;
3000
3001 item->next = NULL;
3002
3003 if (queue->tail)
3004 queue->tail->next = item;
3005
3006 queue->tail = item;
3007
3008 if (!queue->head)
3009 queue->head = item;
3010
3011 queue->count++;
3012}
3013
3014/****************************************************************************/
3015/* */
3016/* Routine Name: ips_removeq_copp_head */
3017/* */
3018/* Routine Description: */
3019/* */
3020/* Remove the head of the queue */
3021/* */
3022/* ASSUMED to be called from within the HA lock */
3023/* */
3024/****************************************************************************/
3025static ips_copp_wait_item_t *
3026ips_removeq_copp_head(ips_copp_queue_t * queue)
3027{
3028 ips_copp_wait_item_t *item;
3029
3030 METHOD_TRACE("ips_removeq_copp_head", 1);
3031
3032 item = queue->head;
3033
3034 if (!item) {
3035 return (NULL);
3036 }
3037
3038 queue->head = item->next;
3039 item->next = NULL;
3040
3041 if (queue->tail == item)
3042 queue->tail = NULL;
3043
3044 queue->count--;
3045
3046 return (item);
3047}
3048
3049/****************************************************************************/
3050/* */
3051/* Routine Name: ips_removeq_copp */
3052/* */
3053/* Routine Description: */
3054/* */
3055/* Remove an item from a queue */
3056/* */
3057/* ASSUMED to be called from within the HA lock */
3058/* */
3059/****************************************************************************/
3060static ips_copp_wait_item_t *
3061ips_removeq_copp(ips_copp_queue_t * queue, ips_copp_wait_item_t * item)
3062{
3063 ips_copp_wait_item_t *p;
3064
3065 METHOD_TRACE("ips_removeq_copp", 1);
3066
3067 if (!item)
3068 return (NULL);
3069
3070 if (item == queue->head) {
3071 return (ips_removeq_copp_head(queue));
3072 }
3073
3074 p = queue->head;
3075
3076 while ((p) && (item != p->next))
3077 p = p->next;
3078
3079 if (p) {
3080 /* found a match */
3081 p->next = item->next;
3082
3083 if (!item->next)
3084 queue->tail = p;
3085
3086 item->next = NULL;
3087 queue->count--;
3088
3089 return (item);
3090 }
3091
3092 return (NULL);
3093}
3094
3095/****************************************************************************/
3096/* */
3097/* Routine Name: ipsintr_blocking */
3098/* */
3099/* Routine Description: */
3100/* */
3101/* Finalize an interrupt for internal commands */
3102/* */
3103/****************************************************************************/
3104static void
3105ipsintr_blocking(ips_ha_t * ha, ips_scb_t * scb)
3106{
3107 METHOD_TRACE("ipsintr_blocking", 2);
3108
3109 ips_freescb(ha, scb);
3110 if ((ha->waitflag == TRUE) && (ha->cmd_in_progress == scb->cdb[0])) {
3111 ha->waitflag = FALSE;
3112
3113 return;
3114 }
3115}
3116
3117/****************************************************************************/
3118/* */
3119/* Routine Name: ipsintr_done */
3120/* */
3121/* Routine Description: */
3122/* */
3123/* Finalize an interrupt for non-internal commands */
3124/* */
3125/****************************************************************************/
3126static void
3127ipsintr_done(ips_ha_t * ha, ips_scb_t * scb)
3128{
3129 METHOD_TRACE("ipsintr_done", 2);
3130
3131 if (!scb) {
3132 IPS_PRINTK(KERN_WARNING, ha->pcidev,
3133 "Spurious interrupt; scb NULL.\n");
3134
3135 return;
3136 }
3137
3138 if (scb->scsi_cmd == NULL) {
3139 /* unexpected interrupt */
3140 IPS_PRINTK(KERN_WARNING, ha->pcidev,
3141 "Spurious interrupt; scsi_cmd not set.\n");
3142
3143 return;
3144 }
3145
3146 ips_done(ha, scb);
3147}
3148
3149/****************************************************************************/
3150/* */
3151/* Routine Name: ips_done */
3152/* */
3153/* Routine Description: */
3154/* */
3155/* Do housekeeping on completed commands */
3156/* ASSUMED to be called form within the request lock */
3157/****************************************************************************/
3158static void
3159ips_done(ips_ha_t * ha, ips_scb_t * scb)
3160{
3161 int ret;
3162
3163 METHOD_TRACE("ips_done", 1);
3164
3165 if (!scb)
3166 return;
3167
3168 if ((scb->scsi_cmd) && (ips_is_passthru(scb->scsi_cmd))) {
3169 ips_cleanup_passthru(ha, scb);
3170 ha->num_ioctl--;
3171 } else {
3172 /*
3173 * Check to see if this command had too much
3174 * data and had to be broke up. If so, queue
3175 * the rest of the data and continue.
3176 */
3177 if ((scb->breakup) || (scb->sg_break)) {
3178 struct scatterlist *sg;
3179 int i, sg_dma_index, ips_sg_index = 0;
3180
3181 /* we had a data breakup */
3182 scb->data_len = 0;
3183
3184 sg = scsi_sglist(scb->scsi_cmd);
3185
3186 /* Spin forward to last dma chunk */
3187 sg_dma_index = scb->breakup;
3188 for (i = 0; i < scb->breakup; i++)
3189 sg = sg_next(sg);
3190
3191 /* Take care of possible partial on last chunk */
3192 ips_fill_scb_sg_single(ha,
3193 sg_dma_address(sg),
3194 scb, ips_sg_index++,
3195 sg_dma_len(sg));
3196
3197 for (; sg_dma_index < scsi_sg_count(scb->scsi_cmd);
3198 sg_dma_index++, sg = sg_next(sg)) {
3199 if (ips_fill_scb_sg_single
3200 (ha,
3201 sg_dma_address(sg),
3202 scb, ips_sg_index++,
3203 sg_dma_len(sg)) < 0)
3204 break;
3205 }
3206
3207 scb->dcdb.transfer_length = scb->data_len;
3208 scb->dcdb.cmd_attribute |=
3209 ips_command_direction[scb->scsi_cmd->cmnd[0]];
3210
3211 if (!(scb->dcdb.cmd_attribute & 0x3))
3212 scb->dcdb.transfer_length = 0;
3213
3214 if (scb->data_len >= IPS_MAX_XFER) {
3215 scb->dcdb.cmd_attribute |= IPS_TRANSFER64K;
3216 scb->dcdb.transfer_length = 0;
3217 }
3218
3219 ret = ips_send_cmd(ha, scb);
3220
3221 switch (ret) {
3222 case IPS_FAILURE:
3223 if (scb->scsi_cmd) {
3224 scb->scsi_cmd->result = DID_ERROR << 16;
3225 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
3226 }
3227
3228 ips_freescb(ha, scb);
3229 break;
3230 case IPS_SUCCESS_IMM:
3231 if (scb->scsi_cmd) {
3232 scb->scsi_cmd->result = DID_ERROR << 16;
3233 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
3234 }
3235
3236 ips_freescb(ha, scb);
3237 break;
3238 default:
3239 break;
3240 } /* end case */
3241
3242 return;
3243 }
3244 } /* end if passthru */
3245
3246 if (scb->bus) {
3247 ha->dcdb_active[scb->bus - 1] &= ~(1 << scb->target_id);
3248 }
3249
3250 scb->scsi_cmd->scsi_done(scb->scsi_cmd);
3251
3252 ips_freescb(ha, scb);
3253}
3254
3255/****************************************************************************/
3256/* */
3257/* Routine Name: ips_map_status */
3258/* */
3259/* Routine Description: */
3260/* */
3261/* Map Controller Error codes to Linux Error Codes */
3262/* */
3263/****************************************************************************/
3264static int
3265ips_map_status(ips_ha_t * ha, ips_scb_t * scb, ips_stat_t * sp)
3266{
3267 int errcode;
3268 int device_error;
3269 uint32_t transfer_len;
3270 IPS_DCDB_TABLE_TAPE *tapeDCDB;
3271 IPS_SCSI_INQ_DATA inquiryData;
3272
3273 METHOD_TRACE("ips_map_status", 1);
3274
3275 if (scb->bus) {
3276 DEBUG_VAR(2,
3277 "(%s%d) Physical device error (%d %d %d): %x %x, Sense Key: %x, ASC: %x, ASCQ: %x",
3278 ips_name, ha->host_num,
3279 scb->scsi_cmd->device->channel,
3280 scb->scsi_cmd->device->id, scb->scsi_cmd->device->lun,
3281 scb->basic_status, scb->extended_status,
3282 scb->extended_status ==
3283 IPS_ERR_CKCOND ? scb->dcdb.sense_info[2] & 0xf : 0,
3284 scb->extended_status ==
3285 IPS_ERR_CKCOND ? scb->dcdb.sense_info[12] : 0,
3286 scb->extended_status ==
3287 IPS_ERR_CKCOND ? scb->dcdb.sense_info[13] : 0);
3288 }
3289
3290 /* default driver error */
3291 errcode = DID_ERROR;
3292 device_error = 0;
3293
3294 switch (scb->basic_status & IPS_GSC_STATUS_MASK) {
3295 case IPS_CMD_TIMEOUT:
3296 errcode = DID_TIME_OUT;
3297 break;
3298
3299 case IPS_INVAL_OPCO:
3300 case IPS_INVAL_CMD_BLK:
3301 case IPS_INVAL_PARM_BLK:
3302 case IPS_LD_ERROR:
3303 case IPS_CMD_CMPLT_WERROR:
3304 break;
3305
3306 case IPS_PHYS_DRV_ERROR:
3307 switch (scb->extended_status) {
3308 case IPS_ERR_SEL_TO:
3309 if (scb->bus)
3310 errcode = DID_NO_CONNECT;
3311
3312 break;
3313
3314 case IPS_ERR_OU_RUN:
3315 if ((scb->cmd.dcdb.op_code == IPS_CMD_EXTENDED_DCDB) ||
3316 (scb->cmd.dcdb.op_code ==
3317 IPS_CMD_EXTENDED_DCDB_SG)) {
3318 tapeDCDB = (IPS_DCDB_TABLE_TAPE *) & scb->dcdb;
3319 transfer_len = tapeDCDB->transfer_length;
3320 } else {
3321 transfer_len =
3322 (uint32_t) scb->dcdb.transfer_length;
3323 }
3324
3325 if ((scb->bus) && (transfer_len < scb->data_len)) {
3326 /* Underrun - set default to no error */
3327 errcode = DID_OK;
3328
3329 /* Restrict access to physical DASD */
3330 if (scb->scsi_cmd->cmnd[0] == INQUIRY) {
3331 ips_scmd_buf_read(scb->scsi_cmd,
3332 &inquiryData, sizeof (inquiryData));
3333 if ((inquiryData.DeviceType & 0x1f) == TYPE_DISK) {
3334 errcode = DID_TIME_OUT;
3335 break;
3336 }
3337 }
3338 } else
3339 errcode = DID_ERROR;
3340
3341 break;
3342
3343 case IPS_ERR_RECOVERY:
3344 /* don't fail recovered errors */
3345 if (scb->bus)
3346 errcode = DID_OK;
3347
3348 break;
3349
3350 case IPS_ERR_HOST_RESET:
3351 case IPS_ERR_DEV_RESET:
3352 errcode = DID_RESET;
3353 break;
3354
3355 case IPS_ERR_CKCOND:
3356 if (scb->bus) {
3357 if ((scb->cmd.dcdb.op_code ==
3358 IPS_CMD_EXTENDED_DCDB)
3359 || (scb->cmd.dcdb.op_code ==
3360 IPS_CMD_EXTENDED_DCDB_SG)) {
3361 tapeDCDB =
3362 (IPS_DCDB_TABLE_TAPE *) & scb->dcdb;
3363 memcpy(scb->scsi_cmd->sense_buffer,
3364 tapeDCDB->sense_info,
3365 SCSI_SENSE_BUFFERSIZE);
3366 } else {
3367 memcpy(scb->scsi_cmd->sense_buffer,
3368 scb->dcdb.sense_info,
3369 SCSI_SENSE_BUFFERSIZE);
3370 }
3371 device_error = 2; /* check condition */
3372 }
3373
3374 errcode = DID_OK;
3375
3376 break;
3377
3378 default:
3379 errcode = DID_ERROR;
3380 break;
3381
3382 } /* end switch */
3383 } /* end switch */
3384
3385 scb->scsi_cmd->result = device_error | (errcode << 16);
3386
3387 return (1);
3388}
3389
3390/****************************************************************************/
3391/* */
3392/* Routine Name: ips_send_wait */
3393/* */
3394/* Routine Description: */
3395/* */
3396/* Send a command to the controller and wait for it to return */
3397/* */
3398/* The FFDC Time Stamp use this function for the callback, but doesn't */
3399/* actually need to wait. */
3400/****************************************************************************/
3401static int
3402ips_send_wait(ips_ha_t * ha, ips_scb_t * scb, int timeout, int intr)
3403{
3404 int ret;
3405
3406 METHOD_TRACE("ips_send_wait", 1);
3407
3408 if (intr != IPS_FFDC) { /* Won't be Waiting if this is a Time Stamp */
3409 ha->waitflag = TRUE;
3410 ha->cmd_in_progress = scb->cdb[0];
3411 }
3412 scb->callback = ipsintr_blocking;
3413 ret = ips_send_cmd(ha, scb);
3414
3415 if ((ret == IPS_FAILURE) || (ret == IPS_SUCCESS_IMM))
3416 return (ret);
3417
3418 if (intr != IPS_FFDC) /* Don't Wait around if this is a Time Stamp */
3419 ret = ips_wait(ha, timeout, intr);
3420
3421 return (ret);
3422}
3423
3424/****************************************************************************/
3425/* */
3426/* Routine Name: ips_scmd_buf_write */
3427/* */
3428/* Routine Description: */
3429/* Write data to struct scsi_cmnd request_buffer at proper offsets */
3430/****************************************************************************/
3431static void
3432ips_scmd_buf_write(struct scsi_cmnd *scmd, void *data, unsigned int count)
3433{
3434 unsigned long flags;
3435
3436 local_irq_save(flags);
3437 scsi_sg_copy_from_buffer(scmd, data, count);
3438 local_irq_restore(flags);
3439}
3440
3441/****************************************************************************/
3442/* */
3443/* Routine Name: ips_scmd_buf_read */
3444/* */
3445/* Routine Description: */
3446/* Copy data from a struct scsi_cmnd to a new, linear buffer */
3447/****************************************************************************/
3448static void
3449ips_scmd_buf_read(struct scsi_cmnd *scmd, void *data, unsigned int count)
3450{
3451 unsigned long flags;
3452
3453 local_irq_save(flags);
3454 scsi_sg_copy_to_buffer(scmd, data, count);
3455 local_irq_restore(flags);
3456}
3457
3458/****************************************************************************/
3459/* */
3460/* Routine Name: ips_send_cmd */
3461/* */
3462/* Routine Description: */
3463/* */
3464/* Map SCSI commands to ServeRAID commands for logical drives */
3465/* */
3466/****************************************************************************/
3467static int
3468ips_send_cmd(ips_ha_t * ha, ips_scb_t * scb)
3469{
3470 int ret;
3471 char *sp;
3472 int device_error;
3473 IPS_DCDB_TABLE_TAPE *tapeDCDB;
3474 int TimeOut;
3475
3476 METHOD_TRACE("ips_send_cmd", 1);
3477
3478 ret = IPS_SUCCESS;
3479
3480 if (!scb->scsi_cmd) {
3481 /* internal command */
3482
3483 if (scb->bus > 0) {
3484 /* Controller commands can't be issued */
3485 /* to real devices -- fail them */
3486 if ((ha->waitflag == TRUE) &&
3487 (ha->cmd_in_progress == scb->cdb[0])) {
3488 ha->waitflag = FALSE;
3489 }
3490
3491 return (1);
3492 }
3493 } else if ((scb->bus == 0) && (!ips_is_passthru(scb->scsi_cmd))) {
3494 /* command to logical bus -- interpret */
3495 ret = IPS_SUCCESS_IMM;
3496
3497 switch (scb->scsi_cmd->cmnd[0]) {
3498 case ALLOW_MEDIUM_REMOVAL:
3499 case REZERO_UNIT:
3500 case ERASE:
3501 case WRITE_FILEMARKS:
3502 case SPACE:
3503 scb->scsi_cmd->result = DID_ERROR << 16;
3504 break;
3505
3506 case START_STOP:
3507 scb->scsi_cmd->result = DID_OK << 16;
3508
3509 case TEST_UNIT_READY:
3510 case INQUIRY:
3511 if (scb->target_id == IPS_ADAPTER_ID) {
3512 /*
3513 * Either we have a TUR
3514 * or we have a SCSI inquiry
3515 */
3516 if (scb->scsi_cmd->cmnd[0] == TEST_UNIT_READY)
3517 scb->scsi_cmd->result = DID_OK << 16;
3518
3519 if (scb->scsi_cmd->cmnd[0] == INQUIRY) {
3520 IPS_SCSI_INQ_DATA inquiry;
3521
3522 memset(&inquiry, 0,
3523 sizeof (IPS_SCSI_INQ_DATA));
3524
3525 inquiry.DeviceType =
3526 IPS_SCSI_INQ_TYPE_PROCESSOR;
3527 inquiry.DeviceTypeQualifier =
3528 IPS_SCSI_INQ_LU_CONNECTED;
3529 inquiry.Version = IPS_SCSI_INQ_REV2;
3530 inquiry.ResponseDataFormat =
3531 IPS_SCSI_INQ_RD_REV2;
3532 inquiry.AdditionalLength = 31;
3533 inquiry.Flags[0] =
3534 IPS_SCSI_INQ_Address16;
3535 inquiry.Flags[1] =
3536 IPS_SCSI_INQ_WBus16 |
3537 IPS_SCSI_INQ_Sync;
3538 strncpy(inquiry.VendorId, "IBM ",
3539 8);
3540 strncpy(inquiry.ProductId,
3541 "SERVERAID ", 16);
3542 strncpy(inquiry.ProductRevisionLevel,
3543 "1.00", 4);
3544
3545 ips_scmd_buf_write(scb->scsi_cmd,
3546 &inquiry,
3547 sizeof (inquiry));
3548
3549 scb->scsi_cmd->result = DID_OK << 16;
3550 }
3551 } else {
3552 scb->cmd.logical_info.op_code = IPS_CMD_GET_LD_INFO;
3553 scb->cmd.logical_info.command_id = IPS_COMMAND_ID(ha, scb);
3554 scb->cmd.logical_info.reserved = 0;
3555 scb->cmd.logical_info.reserved2 = 0;
3556 scb->data_len = sizeof (IPS_LD_INFO);
3557 scb->data_busaddr = ha->logical_drive_info_dma_addr;
3558 scb->flags = 0;
3559 scb->cmd.logical_info.buffer_addr = scb->data_busaddr;
3560 ret = IPS_SUCCESS;
3561 }
3562
3563 break;
3564
3565 case REQUEST_SENSE:
3566 ips_reqsen(ha, scb);
3567 scb->scsi_cmd->result = DID_OK << 16;
3568 break;
3569
3570 case READ_6:
3571 case WRITE_6:
3572 if (!scb->sg_len) {
3573 scb->cmd.basic_io.op_code =
3574 (scb->scsi_cmd->cmnd[0] ==
3575 READ_6) ? IPS_CMD_READ : IPS_CMD_WRITE;
3576 scb->cmd.basic_io.enhanced_sg = 0;
3577 scb->cmd.basic_io.sg_addr =
3578 cpu_to_le32(scb->data_busaddr);
3579 } else {
3580 scb->cmd.basic_io.op_code =
3581 (scb->scsi_cmd->cmnd[0] ==
3582 READ_6) ? IPS_CMD_READ_SG :
3583 IPS_CMD_WRITE_SG;
3584 scb->cmd.basic_io.enhanced_sg =
3585 IPS_USE_ENH_SGLIST(ha) ? 0xFF : 0;
3586 scb->cmd.basic_io.sg_addr =
3587 cpu_to_le32(scb->sg_busaddr);
3588 }
3589
3590 scb->cmd.basic_io.segment_4G = 0;
3591 scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
3592 scb->cmd.basic_io.log_drv = scb->target_id;
3593 scb->cmd.basic_io.sg_count = scb->sg_len;
3594
3595 if (scb->cmd.basic_io.lba)
3596 le32_add_cpu(&scb->cmd.basic_io.lba,
3597 le16_to_cpu(scb->cmd.basic_io.
3598 sector_count));
3599 else
3600 scb->cmd.basic_io.lba =
3601 (((scb->scsi_cmd->
3602 cmnd[1] & 0x1f) << 16) | (scb->scsi_cmd->
3603 cmnd[2] << 8) |
3604 (scb->scsi_cmd->cmnd[3]));
3605
3606 scb->cmd.basic_io.sector_count =
3607 cpu_to_le16(scb->data_len / IPS_BLKSIZE);
3608
3609 if (le16_to_cpu(scb->cmd.basic_io.sector_count) == 0)
3610 scb->cmd.basic_io.sector_count =
3611 cpu_to_le16(256);
3612
3613 ret = IPS_SUCCESS;
3614 break;
3615
3616 case READ_10:
3617 case WRITE_10:
3618 if (!scb->sg_len) {
3619 scb->cmd.basic_io.op_code =
3620 (scb->scsi_cmd->cmnd[0] ==
3621 READ_10) ? IPS_CMD_READ : IPS_CMD_WRITE;
3622 scb->cmd.basic_io.enhanced_sg = 0;
3623 scb->cmd.basic_io.sg_addr =
3624 cpu_to_le32(scb->data_busaddr);
3625 } else {
3626 scb->cmd.basic_io.op_code =
3627 (scb->scsi_cmd->cmnd[0] ==
3628 READ_10) ? IPS_CMD_READ_SG :
3629 IPS_CMD_WRITE_SG;
3630 scb->cmd.basic_io.enhanced_sg =
3631 IPS_USE_ENH_SGLIST(ha) ? 0xFF : 0;
3632 scb->cmd.basic_io.sg_addr =
3633 cpu_to_le32(scb->sg_busaddr);
3634 }
3635
3636 scb->cmd.basic_io.segment_4G = 0;
3637 scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
3638 scb->cmd.basic_io.log_drv = scb->target_id;
3639 scb->cmd.basic_io.sg_count = scb->sg_len;
3640
3641 if (scb->cmd.basic_io.lba)
3642 le32_add_cpu(&scb->cmd.basic_io.lba,
3643 le16_to_cpu(scb->cmd.basic_io.
3644 sector_count));
3645 else
3646 scb->cmd.basic_io.lba =
3647 ((scb->scsi_cmd->cmnd[2] << 24) | (scb->
3648 scsi_cmd->
3649 cmnd[3]
3650 << 16) |
3651 (scb->scsi_cmd->cmnd[4] << 8) | scb->
3652 scsi_cmd->cmnd[5]);
3653
3654 scb->cmd.basic_io.sector_count =
3655 cpu_to_le16(scb->data_len / IPS_BLKSIZE);
3656
3657 if (cpu_to_le16(scb->cmd.basic_io.sector_count) == 0) {
3658 /*
3659 * This is a null condition
3660 * we don't have to do anything
3661 * so just return
3662 */
3663 scb->scsi_cmd->result = DID_OK << 16;
3664 } else
3665 ret = IPS_SUCCESS;
3666
3667 break;
3668
3669 case RESERVE:
3670 case RELEASE:
3671 scb->scsi_cmd->result = DID_OK << 16;
3672 break;
3673
3674 case MODE_SENSE:
3675 scb->cmd.basic_io.op_code = IPS_CMD_ENQUIRY;
3676 scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
3677 scb->cmd.basic_io.segment_4G = 0;
3678 scb->cmd.basic_io.enhanced_sg = 0;
3679 scb->data_len = sizeof (*ha->enq);
3680 scb->cmd.basic_io.sg_addr = ha->enq_busaddr;
3681 ret = IPS_SUCCESS;
3682 break;
3683
3684 case READ_CAPACITY:
3685 scb->cmd.logical_info.op_code = IPS_CMD_GET_LD_INFO;
3686 scb->cmd.logical_info.command_id = IPS_COMMAND_ID(ha, scb);
3687 scb->cmd.logical_info.reserved = 0;
3688 scb->cmd.logical_info.reserved2 = 0;
3689 scb->cmd.logical_info.reserved3 = 0;
3690 scb->data_len = sizeof (IPS_LD_INFO);
3691 scb->data_busaddr = ha->logical_drive_info_dma_addr;
3692 scb->flags = 0;
3693 scb->cmd.logical_info.buffer_addr = scb->data_busaddr;
3694 ret = IPS_SUCCESS;
3695 break;
3696
3697 case SEND_DIAGNOSTIC:
3698 case REASSIGN_BLOCKS:
3699 case FORMAT_UNIT:
3700 case SEEK_10:
3701 case VERIFY:
3702 case READ_DEFECT_DATA:
3703 case READ_BUFFER:
3704 case WRITE_BUFFER:
3705 scb->scsi_cmd->result = DID_OK << 16;
3706 break;
3707
3708 default:
3709 /* Set the Return Info to appear like the Command was */
3710 /* attempted, a Check Condition occurred, and Sense */
3711 /* Data indicating an Invalid CDB OpCode is returned. */
3712 sp = (char *) scb->scsi_cmd->sense_buffer;
3713
3714 sp[0] = 0x70; /* Error Code */
3715 sp[2] = ILLEGAL_REQUEST; /* Sense Key 5 Illegal Req. */
3716 sp[7] = 0x0A; /* Additional Sense Length */
3717 sp[12] = 0x20; /* ASC = Invalid OpCode */
3718 sp[13] = 0x00; /* ASCQ */
3719
3720 device_error = 2; /* Indicate Check Condition */
3721 scb->scsi_cmd->result = device_error | (DID_OK << 16);
3722 break;
3723 } /* end switch */
3724 }
3725 /* end if */
3726 if (ret == IPS_SUCCESS_IMM)
3727 return (ret);
3728
3729 /* setup DCDB */
3730 if (scb->bus > 0) {
3731
3732 /* If we already know the Device is Not there, no need to attempt a Command */
3733 /* This also protects an NT FailOver Controller from getting CDB's sent to it */
3734 if (ha->conf->dev[scb->bus - 1][scb->target_id].ucState == 0) {
3735 scb->scsi_cmd->result = DID_NO_CONNECT << 16;
3736 return (IPS_SUCCESS_IMM);
3737 }
3738
3739 ha->dcdb_active[scb->bus - 1] |= (1 << scb->target_id);
3740 scb->cmd.dcdb.command_id = IPS_COMMAND_ID(ha, scb);
3741 scb->cmd.dcdb.dcdb_address = cpu_to_le32(scb->scb_busaddr +
3742 (unsigned long) &scb->
3743 dcdb -
3744 (unsigned long) scb);
3745 scb->cmd.dcdb.reserved = 0;
3746 scb->cmd.dcdb.reserved2 = 0;
3747 scb->cmd.dcdb.reserved3 = 0;
3748 scb->cmd.dcdb.segment_4G = 0;
3749 scb->cmd.dcdb.enhanced_sg = 0;
3750
3751 TimeOut = scb->scsi_cmd->request->timeout;
3752
3753 if (ha->subsys->param[4] & 0x00100000) { /* If NEW Tape DCDB is Supported */
3754 if (!scb->sg_len) {
3755 scb->cmd.dcdb.op_code = IPS_CMD_EXTENDED_DCDB;
3756 } else {
3757 scb->cmd.dcdb.op_code =
3758 IPS_CMD_EXTENDED_DCDB_SG;
3759 scb->cmd.dcdb.enhanced_sg =
3760 IPS_USE_ENH_SGLIST(ha) ? 0xFF : 0;
3761 }
3762
3763 tapeDCDB = (IPS_DCDB_TABLE_TAPE *) & scb->dcdb; /* Use Same Data Area as Old DCDB Struct */
3764 tapeDCDB->device_address =
3765 ((scb->bus - 1) << 4) | scb->target_id;
3766 tapeDCDB->cmd_attribute |= IPS_DISCONNECT_ALLOWED;
3767 tapeDCDB->cmd_attribute &= ~IPS_TRANSFER64K; /* Always Turn OFF 64K Size Flag */
3768
3769 if (TimeOut) {
3770 if (TimeOut < (10 * HZ))
3771 tapeDCDB->cmd_attribute |= IPS_TIMEOUT10; /* TimeOut is 10 Seconds */
3772 else if (TimeOut < (60 * HZ))
3773 tapeDCDB->cmd_attribute |= IPS_TIMEOUT60; /* TimeOut is 60 Seconds */
3774 else if (TimeOut < (1200 * HZ))
3775 tapeDCDB->cmd_attribute |= IPS_TIMEOUT20M; /* TimeOut is 20 Minutes */
3776 }
3777
3778 tapeDCDB->cdb_length = scb->scsi_cmd->cmd_len;
3779 tapeDCDB->reserved_for_LUN = 0;
3780 tapeDCDB->transfer_length = scb->data_len;
3781 if (scb->cmd.dcdb.op_code == IPS_CMD_EXTENDED_DCDB_SG)
3782 tapeDCDB->buffer_pointer =
3783 cpu_to_le32(scb->sg_busaddr);
3784 else
3785 tapeDCDB->buffer_pointer =
3786 cpu_to_le32(scb->data_busaddr);
3787 tapeDCDB->sg_count = scb->sg_len;
3788 tapeDCDB->sense_length = sizeof (tapeDCDB->sense_info);
3789 tapeDCDB->scsi_status = 0;
3790 tapeDCDB->reserved = 0;
3791 memcpy(tapeDCDB->scsi_cdb, scb->scsi_cmd->cmnd,
3792 scb->scsi_cmd->cmd_len);
3793 } else {
3794 if (!scb->sg_len) {
3795 scb->cmd.dcdb.op_code = IPS_CMD_DCDB;
3796 } else {
3797 scb->cmd.dcdb.op_code = IPS_CMD_DCDB_SG;
3798 scb->cmd.dcdb.enhanced_sg =
3799 IPS_USE_ENH_SGLIST(ha) ? 0xFF : 0;
3800 }
3801
3802 scb->dcdb.device_address =
3803 ((scb->bus - 1) << 4) | scb->target_id;
3804 scb->dcdb.cmd_attribute |= IPS_DISCONNECT_ALLOWED;
3805
3806 if (TimeOut) {
3807 if (TimeOut < (10 * HZ))
3808 scb->dcdb.cmd_attribute |= IPS_TIMEOUT10; /* TimeOut is 10 Seconds */
3809 else if (TimeOut < (60 * HZ))
3810 scb->dcdb.cmd_attribute |= IPS_TIMEOUT60; /* TimeOut is 60 Seconds */
3811 else if (TimeOut < (1200 * HZ))
3812 scb->dcdb.cmd_attribute |= IPS_TIMEOUT20M; /* TimeOut is 20 Minutes */
3813 }
3814
3815 scb->dcdb.transfer_length = scb->data_len;
3816 if (scb->dcdb.cmd_attribute & IPS_TRANSFER64K)
3817 scb->dcdb.transfer_length = 0;
3818 if (scb->cmd.dcdb.op_code == IPS_CMD_DCDB_SG)
3819 scb->dcdb.buffer_pointer =
3820 cpu_to_le32(scb->sg_busaddr);
3821 else
3822 scb->dcdb.buffer_pointer =
3823 cpu_to_le32(scb->data_busaddr);
3824 scb->dcdb.cdb_length = scb->scsi_cmd->cmd_len;
3825 scb->dcdb.sense_length = sizeof (scb->dcdb.sense_info);
3826 scb->dcdb.sg_count = scb->sg_len;
3827 scb->dcdb.reserved = 0;
3828 memcpy(scb->dcdb.scsi_cdb, scb->scsi_cmd->cmnd,
3829 scb->scsi_cmd->cmd_len);
3830 scb->dcdb.scsi_status = 0;
3831 scb->dcdb.reserved2[0] = 0;
3832 scb->dcdb.reserved2[1] = 0;
3833 scb->dcdb.reserved2[2] = 0;
3834 }
3835 }
3836
3837 return ((*ha->func.issue) (ha, scb));
3838}
3839
3840/****************************************************************************/
3841/* */
3842/* Routine Name: ips_chk_status */
3843/* */
3844/* Routine Description: */
3845/* */
3846/* Check the status of commands to logical drives */
3847/* Assumed to be called with the HA lock */
3848/****************************************************************************/
3849static void
3850ips_chkstatus(ips_ha_t * ha, IPS_STATUS * pstatus)
3851{
3852 ips_scb_t *scb;
3853 ips_stat_t *sp;
3854 uint8_t basic_status;
3855 uint8_t ext_status;
3856 int errcode;
3857 IPS_SCSI_INQ_DATA inquiryData;
3858
3859 METHOD_TRACE("ips_chkstatus", 1);
3860
3861 scb = &ha->scbs[pstatus->fields.command_id];
3862 scb->basic_status = basic_status =
3863 pstatus->fields.basic_status & IPS_BASIC_STATUS_MASK;
3864 scb->extended_status = ext_status = pstatus->fields.extended_status;
3865
3866 sp = &ha->sp;
3867 sp->residue_len = 0;
3868 sp->scb_addr = (void *) scb;
3869
3870 /* Remove the item from the active queue */
3871 ips_removeq_scb(&ha->scb_activelist, scb);
3872
3873 if (!scb->scsi_cmd)
3874 /* internal commands are handled in do_ipsintr */
3875 return;
3876
3877 DEBUG_VAR(2, "(%s%d) ips_chkstatus: cmd 0x%X id %d (%d %d %d)",
3878 ips_name,
3879 ha->host_num,
3880 scb->cdb[0],
3881 scb->cmd.basic_io.command_id,
3882 scb->bus, scb->target_id, scb->lun);
3883
3884 if ((scb->scsi_cmd) && (ips_is_passthru(scb->scsi_cmd)))
3885 /* passthru - just returns the raw result */
3886 return;
3887
3888 errcode = DID_OK;
3889
3890 if (((basic_status & IPS_GSC_STATUS_MASK) == IPS_CMD_SUCCESS) ||
3891 ((basic_status & IPS_GSC_STATUS_MASK) == IPS_CMD_RECOVERED_ERROR)) {
3892
3893 if (scb->bus == 0) {
3894 if ((basic_status & IPS_GSC_STATUS_MASK) ==
3895 IPS_CMD_RECOVERED_ERROR) {
3896 DEBUG_VAR(1,
3897 "(%s%d) Recovered Logical Drive Error OpCode: %x, BSB: %x, ESB: %x",
3898 ips_name, ha->host_num,
3899 scb->cmd.basic_io.op_code,
3900 basic_status, ext_status);
3901 }
3902
3903 switch (scb->scsi_cmd->cmnd[0]) {
3904 case ALLOW_MEDIUM_REMOVAL:
3905 case REZERO_UNIT:
3906 case ERASE:
3907 case WRITE_FILEMARKS:
3908 case SPACE:
3909 errcode = DID_ERROR;
3910 break;
3911
3912 case START_STOP:
3913 break;
3914
3915 case TEST_UNIT_READY:
3916 if (!ips_online(ha, scb)) {
3917 errcode = DID_TIME_OUT;
3918 }
3919 break;
3920
3921 case INQUIRY:
3922 if (ips_online(ha, scb)) {
3923 ips_inquiry(ha, scb);
3924 } else {
3925 errcode = DID_TIME_OUT;
3926 }
3927 break;
3928
3929 case REQUEST_SENSE:
3930 ips_reqsen(ha, scb);
3931 break;
3932
3933 case READ_6:
3934 case WRITE_6:
3935 case READ_10:
3936 case WRITE_10:
3937 case RESERVE:
3938 case RELEASE:
3939 break;
3940
3941 case MODE_SENSE:
3942 if (!ips_online(ha, scb)
3943 || !ips_msense(ha, scb)) {
3944 errcode = DID_ERROR;
3945 }
3946 break;
3947
3948 case READ_CAPACITY:
3949 if (ips_online(ha, scb))
3950 ips_rdcap(ha, scb);
3951 else {
3952 errcode = DID_TIME_OUT;
3953 }
3954 break;
3955
3956 case SEND_DIAGNOSTIC:
3957 case REASSIGN_BLOCKS:
3958 break;
3959
3960 case FORMAT_UNIT:
3961 errcode = DID_ERROR;
3962 break;
3963
3964 case SEEK_10:
3965 case VERIFY:
3966 case READ_DEFECT_DATA:
3967 case READ_BUFFER:
3968 case WRITE_BUFFER:
3969 break;
3970
3971 default:
3972 errcode = DID_ERROR;
3973 } /* end switch */
3974
3975 scb->scsi_cmd->result = errcode << 16;
3976 } else { /* bus == 0 */
3977 /* restrict access to physical drives */
3978 if (scb->scsi_cmd->cmnd[0] == INQUIRY) {
3979 ips_scmd_buf_read(scb->scsi_cmd,
3980 &inquiryData, sizeof (inquiryData));
3981 if ((inquiryData.DeviceType & 0x1f) == TYPE_DISK)
3982 scb->scsi_cmd->result = DID_TIME_OUT << 16;
3983 }
3984 } /* else */
3985 } else { /* recovered error / success */
3986 if (scb->bus == 0) {
3987 DEBUG_VAR(1,
3988 "(%s%d) Unrecovered Logical Drive Error OpCode: %x, BSB: %x, ESB: %x",
3989 ips_name, ha->host_num,
3990 scb->cmd.basic_io.op_code, basic_status,
3991 ext_status);
3992 }
3993
3994 ips_map_status(ha, scb, sp);
3995 } /* else */
3996}
3997
3998/****************************************************************************/
3999/* */
4000/* Routine Name: ips_online */
4001/* */
4002/* Routine Description: */
4003/* */
4004/* Determine if a logical drive is online */
4005/* */
4006/****************************************************************************/
4007static int
4008ips_online(ips_ha_t * ha, ips_scb_t * scb)
4009{
4010 METHOD_TRACE("ips_online", 1);
4011
4012 if (scb->target_id >= IPS_MAX_LD)
4013 return (0);
4014
4015 if ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1) {
4016 memset(ha->logical_drive_info, 0, sizeof (IPS_LD_INFO));
4017 return (0);
4018 }
4019
4020 if (ha->logical_drive_info->drive_info[scb->target_id].state !=
4021 IPS_LD_OFFLINE
4022 && ha->logical_drive_info->drive_info[scb->target_id].state !=
4023 IPS_LD_FREE
4024 && ha->logical_drive_info->drive_info[scb->target_id].state !=
4025 IPS_LD_CRS
4026 && ha->logical_drive_info->drive_info[scb->target_id].state !=
4027 IPS_LD_SYS)
4028 return (1);
4029 else
4030 return (0);
4031}
4032
4033/****************************************************************************/
4034/* */
4035/* Routine Name: ips_inquiry */
4036/* */
4037/* Routine Description: */
4038/* */
4039/* Simulate an inquiry command to a logical drive */
4040/* */
4041/****************************************************************************/
4042static int
4043ips_inquiry(ips_ha_t * ha, ips_scb_t * scb)
4044{
4045 IPS_SCSI_INQ_DATA inquiry;
4046
4047 METHOD_TRACE("ips_inquiry", 1);
4048
4049 memset(&inquiry, 0, sizeof (IPS_SCSI_INQ_DATA));
4050
4051 inquiry.DeviceType = IPS_SCSI_INQ_TYPE_DASD;
4052 inquiry.DeviceTypeQualifier = IPS_SCSI_INQ_LU_CONNECTED;
4053 inquiry.Version = IPS_SCSI_INQ_REV2;
4054 inquiry.ResponseDataFormat = IPS_SCSI_INQ_RD_REV2;
4055 inquiry.AdditionalLength = 31;
4056 inquiry.Flags[0] = IPS_SCSI_INQ_Address16;
4057 inquiry.Flags[1] =
4058 IPS_SCSI_INQ_WBus16 | IPS_SCSI_INQ_Sync | IPS_SCSI_INQ_CmdQue;
4059 strncpy(inquiry.VendorId, "IBM ", 8);
4060 strncpy(inquiry.ProductId, "SERVERAID ", 16);
4061 strncpy(inquiry.ProductRevisionLevel, "1.00", 4);
4062
4063 ips_scmd_buf_write(scb->scsi_cmd, &inquiry, sizeof (inquiry));
4064
4065 return (1);
4066}
4067
4068/****************************************************************************/
4069/* */
4070/* Routine Name: ips_rdcap */
4071/* */
4072/* Routine Description: */
4073/* */
4074/* Simulate a read capacity command to a logical drive */
4075/* */
4076/****************************************************************************/
4077static int
4078ips_rdcap(ips_ha_t * ha, ips_scb_t * scb)
4079{
4080 IPS_SCSI_CAPACITY cap;
4081
4082 METHOD_TRACE("ips_rdcap", 1);
4083
4084 if (scsi_bufflen(scb->scsi_cmd) < 8)
4085 return (0);
4086
4087 cap.lba =
4088 cpu_to_be32(le32_to_cpu
4089 (ha->logical_drive_info->
4090 drive_info[scb->target_id].sector_count) - 1);
4091 cap.len = cpu_to_be32((uint32_t) IPS_BLKSIZE);
4092
4093 ips_scmd_buf_write(scb->scsi_cmd, &cap, sizeof (cap));
4094
4095 return (1);
4096}
4097
4098/****************************************************************************/
4099/* */
4100/* Routine Name: ips_msense */
4101/* */
4102/* Routine Description: */
4103/* */
4104/* Simulate a mode sense command to a logical drive */
4105/* */
4106/****************************************************************************/
4107static int
4108ips_msense(ips_ha_t * ha, ips_scb_t * scb)
4109{
4110 uint16_t heads;
4111 uint16_t sectors;
4112 uint32_t cylinders;
4113 IPS_SCSI_MODE_PAGE_DATA mdata;
4114
4115 METHOD_TRACE("ips_msense", 1);
4116
4117 if (le32_to_cpu(ha->enq->ulDriveSize[scb->target_id]) > 0x400000 &&
4118 (ha->enq->ucMiscFlag & 0x8) == 0) {
4119 heads = IPS_NORM_HEADS;
4120 sectors = IPS_NORM_SECTORS;
4121 } else {
4122 heads = IPS_COMP_HEADS;
4123 sectors = IPS_COMP_SECTORS;
4124 }
4125
4126 cylinders =
4127 (le32_to_cpu(ha->enq->ulDriveSize[scb->target_id]) -
4128 1) / (heads * sectors);
4129
4130 memset(&mdata, 0, sizeof (IPS_SCSI_MODE_PAGE_DATA));
4131
4132 mdata.hdr.BlockDescLength = 8;
4133
4134 switch (scb->scsi_cmd->cmnd[2] & 0x3f) {
4135 case 0x03: /* page 3 */
4136 mdata.pdata.pg3.PageCode = 3;
4137 mdata.pdata.pg3.PageLength = sizeof (IPS_SCSI_MODE_PAGE3);
4138 mdata.hdr.DataLength =
4139 3 + mdata.hdr.BlockDescLength + mdata.pdata.pg3.PageLength;
4140 mdata.pdata.pg3.TracksPerZone = 0;
4141 mdata.pdata.pg3.AltSectorsPerZone = 0;
4142 mdata.pdata.pg3.AltTracksPerZone = 0;
4143 mdata.pdata.pg3.AltTracksPerVolume = 0;
4144 mdata.pdata.pg3.SectorsPerTrack = cpu_to_be16(sectors);
4145 mdata.pdata.pg3.BytesPerSector = cpu_to_be16(IPS_BLKSIZE);
4146 mdata.pdata.pg3.Interleave = cpu_to_be16(1);
4147 mdata.pdata.pg3.TrackSkew = 0;
4148 mdata.pdata.pg3.CylinderSkew = 0;
4149 mdata.pdata.pg3.flags = IPS_SCSI_MP3_SoftSector;
4150 break;
4151
4152 case 0x4:
4153 mdata.pdata.pg4.PageCode = 4;
4154 mdata.pdata.pg4.PageLength = sizeof (IPS_SCSI_MODE_PAGE4);
4155 mdata.hdr.DataLength =
4156 3 + mdata.hdr.BlockDescLength + mdata.pdata.pg4.PageLength;
4157 mdata.pdata.pg4.CylindersHigh =
4158 cpu_to_be16((cylinders >> 8) & 0xFFFF);
4159 mdata.pdata.pg4.CylindersLow = (cylinders & 0xFF);
4160 mdata.pdata.pg4.Heads = heads;
4161 mdata.pdata.pg4.WritePrecompHigh = 0;
4162 mdata.pdata.pg4.WritePrecompLow = 0;
4163 mdata.pdata.pg4.ReducedWriteCurrentHigh = 0;
4164 mdata.pdata.pg4.ReducedWriteCurrentLow = 0;
4165 mdata.pdata.pg4.StepRate = cpu_to_be16(1);
4166 mdata.pdata.pg4.LandingZoneHigh = 0;
4167 mdata.pdata.pg4.LandingZoneLow = 0;
4168 mdata.pdata.pg4.flags = 0;
4169 mdata.pdata.pg4.RotationalOffset = 0;
4170 mdata.pdata.pg4.MediumRotationRate = 0;
4171 break;
4172 case 0x8:
4173 mdata.pdata.pg8.PageCode = 8;
4174 mdata.pdata.pg8.PageLength = sizeof (IPS_SCSI_MODE_PAGE8);
4175 mdata.hdr.DataLength =
4176 3 + mdata.hdr.BlockDescLength + mdata.pdata.pg8.PageLength;
4177 /* everything else is left set to 0 */
4178 break;
4179
4180 default:
4181 return (0);
4182 } /* end switch */
4183
4184 ips_scmd_buf_write(scb->scsi_cmd, &mdata, sizeof (mdata));
4185
4186 return (1);
4187}
4188
4189/****************************************************************************/
4190/* */
4191/* Routine Name: ips_reqsen */
4192/* */
4193/* Routine Description: */
4194/* */
4195/* Simulate a request sense command to a logical drive */
4196/* */
4197/****************************************************************************/
4198static int
4199ips_reqsen(ips_ha_t * ha, ips_scb_t * scb)
4200{
4201 IPS_SCSI_REQSEN reqsen;
4202
4203 METHOD_TRACE("ips_reqsen", 1);
4204
4205 memset(&reqsen, 0, sizeof (IPS_SCSI_REQSEN));
4206
4207 reqsen.ResponseCode =
4208 IPS_SCSI_REQSEN_VALID | IPS_SCSI_REQSEN_CURRENT_ERR;
4209 reqsen.AdditionalLength = 10;
4210 reqsen.AdditionalSenseCode = IPS_SCSI_REQSEN_NO_SENSE;
4211 reqsen.AdditionalSenseCodeQual = IPS_SCSI_REQSEN_NO_SENSE;
4212
4213 ips_scmd_buf_write(scb->scsi_cmd, &reqsen, sizeof (reqsen));
4214
4215 return (1);
4216}
4217
4218/****************************************************************************/
4219/* */
4220/* Routine Name: ips_free */
4221/* */
4222/* Routine Description: */
4223/* */
4224/* Free any allocated space for this controller */
4225/* */
4226/****************************************************************************/
4227static void
4228ips_free(ips_ha_t * ha)
4229{
4230
4231 METHOD_TRACE("ips_free", 1);
4232
4233 if (ha) {
4234 if (ha->enq) {
4235 pci_free_consistent(ha->pcidev, sizeof(IPS_ENQ),
4236 ha->enq, ha->enq_busaddr);
4237 ha->enq = NULL;
4238 }
4239
4240 kfree(ha->conf);
4241 ha->conf = NULL;
4242
4243 if (ha->adapt) {
4244 pci_free_consistent(ha->pcidev,
4245 sizeof (IPS_ADAPTER) +
4246 sizeof (IPS_IO_CMD), ha->adapt,
4247 ha->adapt->hw_status_start);
4248 ha->adapt = NULL;
4249 }
4250
4251 if (ha->logical_drive_info) {
4252 pci_free_consistent(ha->pcidev,
4253 sizeof (IPS_LD_INFO),
4254 ha->logical_drive_info,
4255 ha->logical_drive_info_dma_addr);
4256 ha->logical_drive_info = NULL;
4257 }
4258
4259 kfree(ha->nvram);
4260 ha->nvram = NULL;
4261
4262 kfree(ha->subsys);
4263 ha->subsys = NULL;
4264
4265 if (ha->ioctl_data) {
4266 pci_free_consistent(ha->pcidev, ha->ioctl_len,
4267 ha->ioctl_data, ha->ioctl_busaddr);
4268 ha->ioctl_data = NULL;
4269 ha->ioctl_datasize = 0;
4270 ha->ioctl_len = 0;
4271 }
4272 ips_deallocatescbs(ha, ha->max_cmds);
4273
4274 /* free memory mapped (if applicable) */
4275 if (ha->mem_ptr) {
4276 iounmap(ha->ioremap_ptr);
4277 ha->ioremap_ptr = NULL;
4278 ha->mem_ptr = NULL;
4279 }
4280
4281 ha->mem_addr = 0;
4282
4283 }
4284}
4285
4286/****************************************************************************/
4287/* */
4288/* Routine Name: ips_deallocatescbs */
4289/* */
4290/* Routine Description: */
4291/* */
4292/* Free the command blocks */
4293/* */
4294/****************************************************************************/
4295static int
4296ips_deallocatescbs(ips_ha_t * ha, int cmds)
4297{
4298 if (ha->scbs) {
4299 pci_free_consistent(ha->pcidev,
4300 IPS_SGLIST_SIZE(ha) * IPS_MAX_SG * cmds,
4301 ha->scbs->sg_list.list,
4302 ha->scbs->sg_busaddr);
4303 pci_free_consistent(ha->pcidev, sizeof (ips_scb_t) * cmds,
4304 ha->scbs, ha->scbs->scb_busaddr);
4305 ha->scbs = NULL;
4306 } /* end if */
4307 return 1;
4308}
4309
4310/****************************************************************************/
4311/* */
4312/* Routine Name: ips_allocatescbs */
4313/* */
4314/* Routine Description: */
4315/* */
4316/* Allocate the command blocks */
4317/* */
4318/****************************************************************************/
4319static int
4320ips_allocatescbs(ips_ha_t * ha)
4321{
4322 ips_scb_t *scb_p;
4323 IPS_SG_LIST ips_sg;
4324 int i;
4325 dma_addr_t command_dma, sg_dma;
4326
4327 METHOD_TRACE("ips_allocatescbs", 1);
4328
4329 /* Allocate memory for the SCBs */
4330 ha->scbs =
4331 pci_alloc_consistent(ha->pcidev, ha->max_cmds * sizeof (ips_scb_t),
4332 &command_dma);
4333 if (ha->scbs == NULL)
4334 return 0;
4335 ips_sg.list =
4336 pci_alloc_consistent(ha->pcidev,
4337 IPS_SGLIST_SIZE(ha) * IPS_MAX_SG *
4338 ha->max_cmds, &sg_dma);
4339 if (ips_sg.list == NULL) {
4340 pci_free_consistent(ha->pcidev,
4341 ha->max_cmds * sizeof (ips_scb_t), ha->scbs,
4342 command_dma);
4343 return 0;
4344 }
4345
4346 memset(ha->scbs, 0, ha->max_cmds * sizeof (ips_scb_t));
4347
4348 for (i = 0; i < ha->max_cmds; i++) {
4349 scb_p = &ha->scbs[i];
4350 scb_p->scb_busaddr = command_dma + sizeof (ips_scb_t) * i;
4351 /* set up S/G list */
4352 if (IPS_USE_ENH_SGLIST(ha)) {
4353 scb_p->sg_list.enh_list =
4354 ips_sg.enh_list + i * IPS_MAX_SG;
4355 scb_p->sg_busaddr =
4356 sg_dma + IPS_SGLIST_SIZE(ha) * IPS_MAX_SG * i;
4357 } else {
4358 scb_p->sg_list.std_list =
4359 ips_sg.std_list + i * IPS_MAX_SG;
4360 scb_p->sg_busaddr =
4361 sg_dma + IPS_SGLIST_SIZE(ha) * IPS_MAX_SG * i;
4362 }
4363
4364 /* add to the free list */
4365 if (i < ha->max_cmds - 1) {
4366 scb_p->q_next = ha->scb_freelist;
4367 ha->scb_freelist = scb_p;
4368 }
4369 }
4370
4371 /* success */
4372 return (1);
4373}
4374
4375/****************************************************************************/
4376/* */
4377/* Routine Name: ips_init_scb */
4378/* */
4379/* Routine Description: */
4380/* */
4381/* Initialize a CCB to default values */
4382/* */
4383/****************************************************************************/
4384static void
4385ips_init_scb(ips_ha_t * ha, ips_scb_t * scb)
4386{
4387 IPS_SG_LIST sg_list;
4388 uint32_t cmd_busaddr, sg_busaddr;
4389 METHOD_TRACE("ips_init_scb", 1);
4390
4391 if (scb == NULL)
4392 return;
4393
4394 sg_list.list = scb->sg_list.list;
4395 cmd_busaddr = scb->scb_busaddr;
4396 sg_busaddr = scb->sg_busaddr;
4397 /* zero fill */
4398 memset(scb, 0, sizeof (ips_scb_t));
4399 memset(ha->dummy, 0, sizeof (IPS_IO_CMD));
4400
4401 /* Initialize dummy command bucket */
4402 ha->dummy->op_code = 0xFF;
4403 ha->dummy->ccsar = cpu_to_le32(ha->adapt->hw_status_start
4404 + sizeof (IPS_ADAPTER));
4405 ha->dummy->command_id = IPS_MAX_CMDS;
4406
4407 /* set bus address of scb */
4408 scb->scb_busaddr = cmd_busaddr;
4409 scb->sg_busaddr = sg_busaddr;
4410 scb->sg_list.list = sg_list.list;
4411
4412 /* Neptune Fix */
4413 scb->cmd.basic_io.cccr = cpu_to_le32((uint32_t) IPS_BIT_ILE);
4414 scb->cmd.basic_io.ccsar = cpu_to_le32(ha->adapt->hw_status_start
4415 + sizeof (IPS_ADAPTER));
4416}
4417
4418/****************************************************************************/
4419/* */
4420/* Routine Name: ips_get_scb */
4421/* */
4422/* Routine Description: */
4423/* */
4424/* Initialize a CCB to default values */
4425/* */
4426/* ASSUMED to be called from within a lock */
4427/* */
4428/****************************************************************************/
4429static ips_scb_t *
4430ips_getscb(ips_ha_t * ha)
4431{
4432 ips_scb_t *scb;
4433
4434 METHOD_TRACE("ips_getscb", 1);
4435
4436 if ((scb = ha->scb_freelist) == NULL) {
4437
4438 return (NULL);
4439 }
4440
4441 ha->scb_freelist = scb->q_next;
4442 scb->flags = 0;
4443 scb->q_next = NULL;
4444
4445 ips_init_scb(ha, scb);
4446
4447 return (scb);
4448}
4449
4450/****************************************************************************/
4451/* */
4452/* Routine Name: ips_free_scb */
4453/* */
4454/* Routine Description: */
4455/* */
4456/* Return an unused CCB back to the free list */
4457/* */
4458/* ASSUMED to be called from within a lock */
4459/* */
4460/****************************************************************************/
4461static void
4462ips_freescb(ips_ha_t * ha, ips_scb_t * scb)
4463{
4464
4465 METHOD_TRACE("ips_freescb", 1);
4466 if (scb->flags & IPS_SCB_MAP_SG)
4467 scsi_dma_unmap(scb->scsi_cmd);
4468 else if (scb->flags & IPS_SCB_MAP_SINGLE)
4469 pci_unmap_single(ha->pcidev, scb->data_busaddr, scb->data_len,
4470 IPS_DMA_DIR(scb));
4471
4472 /* check to make sure this is not our "special" scb */
4473 if (IPS_COMMAND_ID(ha, scb) < (ha->max_cmds - 1)) {
4474 scb->q_next = ha->scb_freelist;
4475 ha->scb_freelist = scb;
4476 }
4477}
4478
4479/****************************************************************************/
4480/* */
4481/* Routine Name: ips_isinit_copperhead */
4482/* */
4483/* Routine Description: */
4484/* */
4485/* Is controller initialized ? */
4486/* */
4487/****************************************************************************/
4488static int
4489ips_isinit_copperhead(ips_ha_t * ha)
4490{
4491 uint8_t scpr;
4492 uint8_t isr;
4493
4494 METHOD_TRACE("ips_isinit_copperhead", 1);
4495
4496 isr = inb(ha->io_addr + IPS_REG_HISR);
4497 scpr = inb(ha->io_addr + IPS_REG_SCPR);
4498
4499 if (((isr & IPS_BIT_EI) == 0) && ((scpr & IPS_BIT_EBM) == 0))
4500 return (0);
4501 else
4502 return (1);
4503}
4504
4505/****************************************************************************/
4506/* */
4507/* Routine Name: ips_isinit_copperhead_memio */
4508/* */
4509/* Routine Description: */
4510/* */
4511/* Is controller initialized ? */
4512/* */
4513/****************************************************************************/
4514static int
4515ips_isinit_copperhead_memio(ips_ha_t * ha)
4516{
4517 uint8_t isr = 0;
4518 uint8_t scpr;
4519
4520 METHOD_TRACE("ips_is_init_copperhead_memio", 1);
4521
4522 isr = readb(ha->mem_ptr + IPS_REG_HISR);
4523 scpr = readb(ha->mem_ptr + IPS_REG_SCPR);
4524
4525 if (((isr & IPS_BIT_EI) == 0) && ((scpr & IPS_BIT_EBM) == 0))
4526 return (0);
4527 else
4528 return (1);
4529}
4530
4531/****************************************************************************/
4532/* */
4533/* Routine Name: ips_isinit_morpheus */
4534/* */
4535/* Routine Description: */
4536/* */
4537/* Is controller initialized ? */
4538/* */
4539/****************************************************************************/
4540static int
4541ips_isinit_morpheus(ips_ha_t * ha)
4542{
4543 uint32_t post;
4544 uint32_t bits;
4545
4546 METHOD_TRACE("ips_is_init_morpheus", 1);
4547
4548 if (ips_isintr_morpheus(ha))
4549 ips_flush_and_reset(ha);
4550
4551 post = readl(ha->mem_ptr + IPS_REG_I960_MSG0);
4552 bits = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
4553
4554 if (post == 0)
4555 return (0);
4556 else if (bits & 0x3)
4557 return (0);
4558 else
4559 return (1);
4560}
4561
4562/****************************************************************************/
4563/* */
4564/* Routine Name: ips_flush_and_reset */
4565/* */
4566/* Routine Description: */
4567/* */
4568/* Perform cleanup ( FLUSH and RESET ) when the adapter is in an unknown */
4569/* state ( was trying to INIT and an interrupt was already pending ) ... */
4570/* */
4571/****************************************************************************/
4572static void
4573ips_flush_and_reset(ips_ha_t *ha)
4574{
4575 ips_scb_t *scb;
4576 int ret;
4577 int time;
4578 int done;
4579 dma_addr_t command_dma;
4580
4581 /* Create a usuable SCB */
4582 scb = pci_alloc_consistent(ha->pcidev, sizeof(ips_scb_t), &command_dma);
4583 if (scb) {
4584 memset(scb, 0, sizeof(ips_scb_t));
4585 ips_init_scb(ha, scb);
4586 scb->scb_busaddr = command_dma;
4587
4588 scb->timeout = ips_cmd_timeout;
4589 scb->cdb[0] = IPS_CMD_FLUSH;
4590
4591 scb->cmd.flush_cache.op_code = IPS_CMD_FLUSH;
4592 scb->cmd.flush_cache.command_id = IPS_MAX_CMDS; /* Use an ID that would otherwise not exist */
4593 scb->cmd.flush_cache.state = IPS_NORM_STATE;
4594 scb->cmd.flush_cache.reserved = 0;
4595 scb->cmd.flush_cache.reserved2 = 0;
4596 scb->cmd.flush_cache.reserved3 = 0;
4597 scb->cmd.flush_cache.reserved4 = 0;
4598
4599 ret = ips_send_cmd(ha, scb); /* Send the Flush Command */
4600
4601 if (ret == IPS_SUCCESS) {
4602 time = 60 * IPS_ONE_SEC; /* Max Wait time is 60 seconds */
4603 done = 0;
4604
4605 while ((time > 0) && (!done)) {
4606 done = ips_poll_for_flush_complete(ha);
4607 /* This may look evil, but it's only done during extremely rare start-up conditions ! */
4608 udelay(1000);
4609 time--;
4610 }
4611 }
4612 }
4613
4614 /* Now RESET and INIT the adapter */
4615 (*ha->func.reset) (ha);
4616
4617 pci_free_consistent(ha->pcidev, sizeof(ips_scb_t), scb, command_dma);
4618 return;
4619}
4620
4621/****************************************************************************/
4622/* */
4623/* Routine Name: ips_poll_for_flush_complete */
4624/* */
4625/* Routine Description: */
4626/* */
4627/* Poll for the Flush Command issued by ips_flush_and_reset() to complete */
4628/* All other responses are just taken off the queue and ignored */
4629/* */
4630/****************************************************************************/
4631static int
4632ips_poll_for_flush_complete(ips_ha_t * ha)
4633{
4634 IPS_STATUS cstatus;
4635
4636 while (TRUE) {
4637 cstatus.value = (*ha->func.statupd) (ha);
4638
4639 if (cstatus.value == 0xffffffff) /* If No Interrupt to process */
4640 break;
4641
4642 /* Success is when we see the Flush Command ID */
4643 if (cstatus.fields.command_id == IPS_MAX_CMDS)
4644 return 1;
4645 }
4646
4647 return 0;
4648}
4649
4650/****************************************************************************/
4651/* */
4652/* Routine Name: ips_enable_int_copperhead */
4653/* */
4654/* Routine Description: */
4655/* Turn on interrupts */
4656/* */
4657/****************************************************************************/
4658static void
4659ips_enable_int_copperhead(ips_ha_t * ha)
4660{
4661 METHOD_TRACE("ips_enable_int_copperhead", 1);
4662
4663 outb(ha->io_addr + IPS_REG_HISR, IPS_BIT_EI);
4664 inb(ha->io_addr + IPS_REG_HISR); /*Ensure PCI Posting Completes*/
4665}
4666
4667/****************************************************************************/
4668/* */
4669/* Routine Name: ips_enable_int_copperhead_memio */
4670/* */
4671/* Routine Description: */
4672/* Turn on interrupts */
4673/* */
4674/****************************************************************************/
4675static void
4676ips_enable_int_copperhead_memio(ips_ha_t * ha)
4677{
4678 METHOD_TRACE("ips_enable_int_copperhead_memio", 1);
4679
4680 writeb(IPS_BIT_EI, ha->mem_ptr + IPS_REG_HISR);
4681 readb(ha->mem_ptr + IPS_REG_HISR); /*Ensure PCI Posting Completes*/
4682}
4683
4684/****************************************************************************/
4685/* */
4686/* Routine Name: ips_enable_int_morpheus */
4687/* */
4688/* Routine Description: */
4689/* Turn on interrupts */
4690/* */
4691/****************************************************************************/
4692static void
4693ips_enable_int_morpheus(ips_ha_t * ha)
4694{
4695 uint32_t Oimr;
4696
4697 METHOD_TRACE("ips_enable_int_morpheus", 1);
4698
4699 Oimr = readl(ha->mem_ptr + IPS_REG_I960_OIMR);
4700 Oimr &= ~0x08;
4701 writel(Oimr, ha->mem_ptr + IPS_REG_I960_OIMR);
4702 readl(ha->mem_ptr + IPS_REG_I960_OIMR); /*Ensure PCI Posting Completes*/
4703}
4704
4705/****************************************************************************/
4706/* */
4707/* Routine Name: ips_init_copperhead */
4708/* */
4709/* Routine Description: */
4710/* */
4711/* Initialize a copperhead controller */
4712/* */
4713/****************************************************************************/
4714static int
4715ips_init_copperhead(ips_ha_t * ha)
4716{
4717 uint8_t Isr;
4718 uint8_t Cbsp;
4719 uint8_t PostByte[IPS_MAX_POST_BYTES];
4720 uint8_t ConfigByte[IPS_MAX_CONFIG_BYTES];
4721 int i, j;
4722
4723 METHOD_TRACE("ips_init_copperhead", 1);
4724
4725 for (i = 0; i < IPS_MAX_POST_BYTES; i++) {
4726 for (j = 0; j < 45; j++) {
4727 Isr = inb(ha->io_addr + IPS_REG_HISR);
4728 if (Isr & IPS_BIT_GHI)
4729 break;
4730
4731 /* Delay for 1 Second */
4732 MDELAY(IPS_ONE_SEC);
4733 }
4734
4735 if (j >= 45)
4736 /* error occurred */
4737 return (0);
4738
4739 PostByte[i] = inb(ha->io_addr + IPS_REG_ISPR);
4740 outb(Isr, ha->io_addr + IPS_REG_HISR);
4741 }
4742
4743 if (PostByte[0] < IPS_GOOD_POST_STATUS) {
4744 IPS_PRINTK(KERN_WARNING, ha->pcidev,
4745 "reset controller fails (post status %x %x).\n",
4746 PostByte[0], PostByte[1]);
4747
4748 return (0);
4749 }
4750
4751 for (i = 0; i < IPS_MAX_CONFIG_BYTES; i++) {
4752 for (j = 0; j < 240; j++) {
4753 Isr = inb(ha->io_addr + IPS_REG_HISR);
4754 if (Isr & IPS_BIT_GHI)
4755 break;
4756
4757 /* Delay for 1 Second */
4758 MDELAY(IPS_ONE_SEC);
4759 }
4760
4761 if (j >= 240)
4762 /* error occurred */
4763 return (0);
4764
4765 ConfigByte[i] = inb(ha->io_addr + IPS_REG_ISPR);
4766 outb(Isr, ha->io_addr + IPS_REG_HISR);
4767 }
4768
4769 for (i = 0; i < 240; i++) {
4770 Cbsp = inb(ha->io_addr + IPS_REG_CBSP);
4771
4772 if ((Cbsp & IPS_BIT_OP) == 0)
4773 break;
4774
4775 /* Delay for 1 Second */
4776 MDELAY(IPS_ONE_SEC);
4777 }
4778
4779 if (i >= 240)
4780 /* reset failed */
4781 return (0);
4782
4783 /* setup CCCR */
4784 outl(0x1010, ha->io_addr + IPS_REG_CCCR);
4785
4786 /* Enable busmastering */
4787 outb(IPS_BIT_EBM, ha->io_addr + IPS_REG_SCPR);
4788
4789 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
4790 /* fix for anaconda64 */
4791 outl(0, ha->io_addr + IPS_REG_NDAE);
4792
4793 /* Enable interrupts */
4794 outb(IPS_BIT_EI, ha->io_addr + IPS_REG_HISR);
4795
4796 return (1);
4797}
4798
4799/****************************************************************************/
4800/* */
4801/* Routine Name: ips_init_copperhead_memio */
4802/* */
4803/* Routine Description: */
4804/* */
4805/* Initialize a copperhead controller with memory mapped I/O */
4806/* */
4807/****************************************************************************/
4808static int
4809ips_init_copperhead_memio(ips_ha_t * ha)
4810{
4811 uint8_t Isr = 0;
4812 uint8_t Cbsp;
4813 uint8_t PostByte[IPS_MAX_POST_BYTES];
4814 uint8_t ConfigByte[IPS_MAX_CONFIG_BYTES];
4815 int i, j;
4816
4817 METHOD_TRACE("ips_init_copperhead_memio", 1);
4818
4819 for (i = 0; i < IPS_MAX_POST_BYTES; i++) {
4820 for (j = 0; j < 45; j++) {
4821 Isr = readb(ha->mem_ptr + IPS_REG_HISR);
4822 if (Isr & IPS_BIT_GHI)
4823 break;
4824
4825 /* Delay for 1 Second */
4826 MDELAY(IPS_ONE_SEC);
4827 }
4828
4829 if (j >= 45)
4830 /* error occurred */
4831 return (0);
4832
4833 PostByte[i] = readb(ha->mem_ptr + IPS_REG_ISPR);
4834 writeb(Isr, ha->mem_ptr + IPS_REG_HISR);
4835 }
4836
4837 if (PostByte[0] < IPS_GOOD_POST_STATUS) {
4838 IPS_PRINTK(KERN_WARNING, ha->pcidev,
4839 "reset controller fails (post status %x %x).\n",
4840 PostByte[0], PostByte[1]);
4841
4842 return (0);
4843 }
4844
4845 for (i = 0; i < IPS_MAX_CONFIG_BYTES; i++) {
4846 for (j = 0; j < 240; j++) {
4847 Isr = readb(ha->mem_ptr + IPS_REG_HISR);
4848 if (Isr & IPS_BIT_GHI)
4849 break;
4850
4851 /* Delay for 1 Second */
4852 MDELAY(IPS_ONE_SEC);
4853 }
4854
4855 if (j >= 240)
4856 /* error occurred */
4857 return (0);
4858
4859 ConfigByte[i] = readb(ha->mem_ptr + IPS_REG_ISPR);
4860 writeb(Isr, ha->mem_ptr + IPS_REG_HISR);
4861 }
4862
4863 for (i = 0; i < 240; i++) {
4864 Cbsp = readb(ha->mem_ptr + IPS_REG_CBSP);
4865
4866 if ((Cbsp & IPS_BIT_OP) == 0)
4867 break;
4868
4869 /* Delay for 1 Second */
4870 MDELAY(IPS_ONE_SEC);
4871 }
4872
4873 if (i >= 240)
4874 /* error occurred */
4875 return (0);
4876
4877 /* setup CCCR */
4878 writel(0x1010, ha->mem_ptr + IPS_REG_CCCR);
4879
4880 /* Enable busmastering */
4881 writeb(IPS_BIT_EBM, ha->mem_ptr + IPS_REG_SCPR);
4882
4883 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
4884 /* fix for anaconda64 */
4885 writel(0, ha->mem_ptr + IPS_REG_NDAE);
4886
4887 /* Enable interrupts */
4888 writeb(IPS_BIT_EI, ha->mem_ptr + IPS_REG_HISR);
4889
4890 /* if we get here then everything went OK */
4891 return (1);
4892}
4893
4894/****************************************************************************/
4895/* */
4896/* Routine Name: ips_init_morpheus */
4897/* */
4898/* Routine Description: */
4899/* */
4900/* Initialize a morpheus controller */
4901/* */
4902/****************************************************************************/
4903static int
4904ips_init_morpheus(ips_ha_t * ha)
4905{
4906 uint32_t Post;
4907 uint32_t Config;
4908 uint32_t Isr;
4909 uint32_t Oimr;
4910 int i;
4911
4912 METHOD_TRACE("ips_init_morpheus", 1);
4913
4914 /* Wait up to 45 secs for Post */
4915 for (i = 0; i < 45; i++) {
4916 Isr = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
4917
4918 if (Isr & IPS_BIT_I960_MSG0I)
4919 break;
4920
4921 /* Delay for 1 Second */
4922 MDELAY(IPS_ONE_SEC);
4923 }
4924
4925 if (i >= 45) {
4926 /* error occurred */
4927 IPS_PRINTK(KERN_WARNING, ha->pcidev,
4928 "timeout waiting for post.\n");
4929
4930 return (0);
4931 }
4932
4933 Post = readl(ha->mem_ptr + IPS_REG_I960_MSG0);
4934
4935 if (Post == 0x4F00) { /* If Flashing the Battery PIC */
4936 IPS_PRINTK(KERN_WARNING, ha->pcidev,
4937 "Flashing Battery PIC, Please wait ...\n");
4938
4939 /* Clear the interrupt bit */
4940 Isr = (uint32_t) IPS_BIT_I960_MSG0I;
4941 writel(Isr, ha->mem_ptr + IPS_REG_I2O_HIR);
4942
4943 for (i = 0; i < 120; i++) { /* Wait Up to 2 Min. for Completion */
4944 Post = readl(ha->mem_ptr + IPS_REG_I960_MSG0);
4945 if (Post != 0x4F00)
4946 break;
4947 /* Delay for 1 Second */
4948 MDELAY(IPS_ONE_SEC);
4949 }
4950
4951 if (i >= 120) {
4952 IPS_PRINTK(KERN_WARNING, ha->pcidev,
4953 "timeout waiting for Battery PIC Flash\n");
4954 return (0);
4955 }
4956
4957 }
4958
4959 /* Clear the interrupt bit */
4960 Isr = (uint32_t) IPS_BIT_I960_MSG0I;
4961 writel(Isr, ha->mem_ptr + IPS_REG_I2O_HIR);
4962
4963 if (Post < (IPS_GOOD_POST_STATUS << 8)) {
4964 IPS_PRINTK(KERN_WARNING, ha->pcidev,
4965 "reset controller fails (post status %x).\n", Post);
4966
4967 return (0);
4968 }
4969
4970 /* Wait up to 240 secs for config bytes */
4971 for (i = 0; i < 240; i++) {
4972 Isr = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
4973
4974 if (Isr & IPS_BIT_I960_MSG1I)
4975 break;
4976
4977 /* Delay for 1 Second */
4978 MDELAY(IPS_ONE_SEC);
4979 }
4980
4981 if (i >= 240) {
4982 /* error occurred */
4983 IPS_PRINTK(KERN_WARNING, ha->pcidev,
4984 "timeout waiting for config.\n");
4985
4986 return (0);
4987 }
4988
4989 Config = readl(ha->mem_ptr + IPS_REG_I960_MSG1);
4990
4991 /* Clear interrupt bit */
4992 Isr = (uint32_t) IPS_BIT_I960_MSG1I;
4993 writel(Isr, ha->mem_ptr + IPS_REG_I2O_HIR);
4994
4995 /* Turn on the interrupts */
4996 Oimr = readl(ha->mem_ptr + IPS_REG_I960_OIMR);
4997 Oimr &= ~0x8;
4998 writel(Oimr, ha->mem_ptr + IPS_REG_I960_OIMR);
4999
5000 /* if we get here then everything went OK */
5001
5002 /* Since we did a RESET, an EraseStripeLock may be needed */
5003 if (Post == 0xEF10) {
5004 if ((Config == 0x000F) || (Config == 0x0009))
5005 ha->requires_esl = 1;
5006 }
5007
5008 return (1);
5009}
5010
5011/****************************************************************************/
5012/* */
5013/* Routine Name: ips_reset_copperhead */
5014/* */
5015/* Routine Description: */
5016/* */
5017/* Reset the controller */
5018/* */
5019/****************************************************************************/
5020static int
5021ips_reset_copperhead(ips_ha_t * ha)
5022{
5023 int reset_counter;
5024
5025 METHOD_TRACE("ips_reset_copperhead", 1);
5026
5027 DEBUG_VAR(1, "(%s%d) ips_reset_copperhead: io addr: %x, irq: %d",
5028 ips_name, ha->host_num, ha->io_addr, ha->pcidev->irq);
5029
5030 reset_counter = 0;
5031
5032 while (reset_counter < 2) {
5033 reset_counter++;
5034
5035 outb(IPS_BIT_RST, ha->io_addr + IPS_REG_SCPR);
5036
5037 /* Delay for 1 Second */
5038 MDELAY(IPS_ONE_SEC);
5039
5040 outb(0, ha->io_addr + IPS_REG_SCPR);
5041
5042 /* Delay for 1 Second */
5043 MDELAY(IPS_ONE_SEC);
5044
5045 if ((*ha->func.init) (ha))
5046 break;
5047 else if (reset_counter >= 2) {
5048
5049 return (0);
5050 }
5051 }
5052
5053 return (1);
5054}
5055
5056/****************************************************************************/
5057/* */
5058/* Routine Name: ips_reset_copperhead_memio */
5059/* */
5060/* Routine Description: */
5061/* */
5062/* Reset the controller */
5063/* */
5064/****************************************************************************/
5065static int
5066ips_reset_copperhead_memio(ips_ha_t * ha)
5067{
5068 int reset_counter;
5069
5070 METHOD_TRACE("ips_reset_copperhead_memio", 1);
5071
5072 DEBUG_VAR(1, "(%s%d) ips_reset_copperhead_memio: mem addr: %x, irq: %d",
5073 ips_name, ha->host_num, ha->mem_addr, ha->pcidev->irq);
5074
5075 reset_counter = 0;
5076
5077 while (reset_counter < 2) {
5078 reset_counter++;
5079
5080 writeb(IPS_BIT_RST, ha->mem_ptr + IPS_REG_SCPR);
5081
5082 /* Delay for 1 Second */
5083 MDELAY(IPS_ONE_SEC);
5084
5085 writeb(0, ha->mem_ptr + IPS_REG_SCPR);
5086
5087 /* Delay for 1 Second */
5088 MDELAY(IPS_ONE_SEC);
5089
5090 if ((*ha->func.init) (ha))
5091 break;
5092 else if (reset_counter >= 2) {
5093
5094 return (0);
5095 }
5096 }
5097
5098 return (1);
5099}
5100
5101/****************************************************************************/
5102/* */
5103/* Routine Name: ips_reset_morpheus */
5104/* */
5105/* Routine Description: */
5106/* */
5107/* Reset the controller */
5108/* */
5109/****************************************************************************/
5110static int
5111ips_reset_morpheus(ips_ha_t * ha)
5112{
5113 int reset_counter;
5114 uint8_t junk;
5115
5116 METHOD_TRACE("ips_reset_morpheus", 1);
5117
5118 DEBUG_VAR(1, "(%s%d) ips_reset_morpheus: mem addr: %x, irq: %d",
5119 ips_name, ha->host_num, ha->mem_addr, ha->pcidev->irq);
5120
5121 reset_counter = 0;
5122
5123 while (reset_counter < 2) {
5124 reset_counter++;
5125
5126 writel(0x80000000, ha->mem_ptr + IPS_REG_I960_IDR);
5127
5128 /* Delay for 5 Seconds */
5129 MDELAY(5 * IPS_ONE_SEC);
5130
5131 /* Do a PCI config read to wait for adapter */
5132 pci_read_config_byte(ha->pcidev, 4, &junk);
5133
5134 if ((*ha->func.init) (ha))
5135 break;
5136 else if (reset_counter >= 2) {
5137
5138 return (0);
5139 }
5140 }
5141
5142 return (1);
5143}
5144
5145/****************************************************************************/
5146/* */
5147/* Routine Name: ips_statinit */
5148/* */
5149/* Routine Description: */
5150/* */
5151/* Initialize the status queues on the controller */
5152/* */
5153/****************************************************************************/
5154static void
5155ips_statinit(ips_ha_t * ha)
5156{
5157 uint32_t phys_status_start;
5158
5159 METHOD_TRACE("ips_statinit", 1);
5160
5161 ha->adapt->p_status_start = ha->adapt->status;
5162 ha->adapt->p_status_end = ha->adapt->status + IPS_MAX_CMDS;
5163 ha->adapt->p_status_tail = ha->adapt->status;
5164
5165 phys_status_start = ha->adapt->hw_status_start;
5166 outl(phys_status_start, ha->io_addr + IPS_REG_SQSR);
5167 outl(phys_status_start + IPS_STATUS_Q_SIZE,
5168 ha->io_addr + IPS_REG_SQER);
5169 outl(phys_status_start + IPS_STATUS_SIZE,
5170 ha->io_addr + IPS_REG_SQHR);
5171 outl(phys_status_start, ha->io_addr + IPS_REG_SQTR);
5172
5173 ha->adapt->hw_status_tail = phys_status_start;
5174}
5175
5176/****************************************************************************/
5177/* */
5178/* Routine Name: ips_statinit_memio */
5179/* */
5180/* Routine Description: */
5181/* */
5182/* Initialize the status queues on the controller */
5183/* */
5184/****************************************************************************/
5185static void
5186ips_statinit_memio(ips_ha_t * ha)
5187{
5188 uint32_t phys_status_start;
5189
5190 METHOD_TRACE("ips_statinit_memio", 1);
5191
5192 ha->adapt->p_status_start = ha->adapt->status;
5193 ha->adapt->p_status_end = ha->adapt->status + IPS_MAX_CMDS;
5194 ha->adapt->p_status_tail = ha->adapt->status;
5195
5196 phys_status_start = ha->adapt->hw_status_start;
5197 writel(phys_status_start, ha->mem_ptr + IPS_REG_SQSR);
5198 writel(phys_status_start + IPS_STATUS_Q_SIZE,
5199 ha->mem_ptr + IPS_REG_SQER);
5200 writel(phys_status_start + IPS_STATUS_SIZE, ha->mem_ptr + IPS_REG_SQHR);
5201 writel(phys_status_start, ha->mem_ptr + IPS_REG_SQTR);
5202
5203 ha->adapt->hw_status_tail = phys_status_start;
5204}
5205
5206/****************************************************************************/
5207/* */
5208/* Routine Name: ips_statupd_copperhead */
5209/* */
5210/* Routine Description: */
5211/* */
5212/* Remove an element from the status queue */
5213/* */
5214/****************************************************************************/
5215static uint32_t
5216ips_statupd_copperhead(ips_ha_t * ha)
5217{
5218 METHOD_TRACE("ips_statupd_copperhead", 1);
5219
5220 if (ha->adapt->p_status_tail != ha->adapt->p_status_end) {
5221 ha->adapt->p_status_tail++;
5222 ha->adapt->hw_status_tail += sizeof (IPS_STATUS);
5223 } else {
5224 ha->adapt->p_status_tail = ha->adapt->p_status_start;
5225 ha->adapt->hw_status_tail = ha->adapt->hw_status_start;
5226 }
5227
5228 outl(ha->adapt->hw_status_tail,
5229 ha->io_addr + IPS_REG_SQTR);
5230
5231 return (ha->adapt->p_status_tail->value);
5232}
5233
5234/****************************************************************************/
5235/* */
5236/* Routine Name: ips_statupd_copperhead_memio */
5237/* */
5238/* Routine Description: */
5239/* */
5240/* Remove an element from the status queue */
5241/* */
5242/****************************************************************************/
5243static uint32_t
5244ips_statupd_copperhead_memio(ips_ha_t * ha)
5245{
5246 METHOD_TRACE("ips_statupd_copperhead_memio", 1);
5247
5248 if (ha->adapt->p_status_tail != ha->adapt->p_status_end) {
5249 ha->adapt->p_status_tail++;
5250 ha->adapt->hw_status_tail += sizeof (IPS_STATUS);
5251 } else {
5252 ha->adapt->p_status_tail = ha->adapt->p_status_start;
5253 ha->adapt->hw_status_tail = ha->adapt->hw_status_start;
5254 }
5255
5256 writel(ha->adapt->hw_status_tail, ha->mem_ptr + IPS_REG_SQTR);
5257
5258 return (ha->adapt->p_status_tail->value);
5259}
5260
5261/****************************************************************************/
5262/* */
5263/* Routine Name: ips_statupd_morpheus */
5264/* */
5265/* Routine Description: */
5266/* */
5267/* Remove an element from the status queue */
5268/* */
5269/****************************************************************************/
5270static uint32_t
5271ips_statupd_morpheus(ips_ha_t * ha)
5272{
5273 uint32_t val;
5274
5275 METHOD_TRACE("ips_statupd_morpheus", 1);
5276
5277 val = readl(ha->mem_ptr + IPS_REG_I2O_OUTMSGQ);
5278
5279 return (val);
5280}
5281
5282/****************************************************************************/
5283/* */
5284/* Routine Name: ips_issue_copperhead */
5285/* */
5286/* Routine Description: */
5287/* */
5288/* Send a command down to the controller */
5289/* */
5290/****************************************************************************/
5291static int
5292ips_issue_copperhead(ips_ha_t * ha, ips_scb_t * scb)
5293{
5294 uint32_t TimeOut;
5295 uint32_t val;
5296
5297 METHOD_TRACE("ips_issue_copperhead", 1);
5298
5299 if (scb->scsi_cmd) {
5300 DEBUG_VAR(2, "(%s%d) ips_issue: cmd 0x%X id %d (%d %d %d)",
5301 ips_name,
5302 ha->host_num,
5303 scb->cdb[0],
5304 scb->cmd.basic_io.command_id,
5305 scb->bus, scb->target_id, scb->lun);
5306 } else {
5307 DEBUG_VAR(2, KERN_NOTICE "(%s%d) ips_issue: logical cmd id %d",
5308 ips_name, ha->host_num, scb->cmd.basic_io.command_id);
5309 }
5310
5311 TimeOut = 0;
5312
5313 while ((val =
5314 le32_to_cpu(inl(ha->io_addr + IPS_REG_CCCR))) & IPS_BIT_SEM) {
5315 udelay(1000);
5316
5317 if (++TimeOut >= IPS_SEM_TIMEOUT) {
5318 if (!(val & IPS_BIT_START_STOP))
5319 break;
5320
5321 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5322 "ips_issue val [0x%x].\n", val);
5323 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5324 "ips_issue semaphore chk timeout.\n");
5325
5326 return (IPS_FAILURE);
5327 } /* end if */
5328 } /* end while */
5329
5330 outl(scb->scb_busaddr, ha->io_addr + IPS_REG_CCSAR);
5331 outw(IPS_BIT_START_CMD, ha->io_addr + IPS_REG_CCCR);
5332
5333 return (IPS_SUCCESS);
5334}
5335
5336/****************************************************************************/
5337/* */
5338/* Routine Name: ips_issue_copperhead_memio */
5339/* */
5340/* Routine Description: */
5341/* */
5342/* Send a command down to the controller */
5343/* */
5344/****************************************************************************/
5345static int
5346ips_issue_copperhead_memio(ips_ha_t * ha, ips_scb_t * scb)
5347{
5348 uint32_t TimeOut;
5349 uint32_t val;
5350
5351 METHOD_TRACE("ips_issue_copperhead_memio", 1);
5352
5353 if (scb->scsi_cmd) {
5354 DEBUG_VAR(2, "(%s%d) ips_issue: cmd 0x%X id %d (%d %d %d)",
5355 ips_name,
5356 ha->host_num,
5357 scb->cdb[0],
5358 scb->cmd.basic_io.command_id,
5359 scb->bus, scb->target_id, scb->lun);
5360 } else {
5361 DEBUG_VAR(2, "(%s%d) ips_issue: logical cmd id %d",
5362 ips_name, ha->host_num, scb->cmd.basic_io.command_id);
5363 }
5364
5365 TimeOut = 0;
5366
5367 while ((val = readl(ha->mem_ptr + IPS_REG_CCCR)) & IPS_BIT_SEM) {
5368 udelay(1000);
5369
5370 if (++TimeOut >= IPS_SEM_TIMEOUT) {
5371 if (!(val & IPS_BIT_START_STOP))
5372 break;
5373
5374 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5375 "ips_issue val [0x%x].\n", val);
5376 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5377 "ips_issue semaphore chk timeout.\n");
5378
5379 return (IPS_FAILURE);
5380 } /* end if */
5381 } /* end while */
5382
5383 writel(scb->scb_busaddr, ha->mem_ptr + IPS_REG_CCSAR);
5384 writel(IPS_BIT_START_CMD, ha->mem_ptr + IPS_REG_CCCR);
5385
5386 return (IPS_SUCCESS);
5387}
5388
5389/****************************************************************************/
5390/* */
5391/* Routine Name: ips_issue_i2o */
5392/* */
5393/* Routine Description: */
5394/* */
5395/* Send a command down to the controller */
5396/* */
5397/****************************************************************************/
5398static int
5399ips_issue_i2o(ips_ha_t * ha, ips_scb_t * scb)
5400{
5401
5402 METHOD_TRACE("ips_issue_i2o", 1);
5403
5404 if (scb->scsi_cmd) {
5405 DEBUG_VAR(2, "(%s%d) ips_issue: cmd 0x%X id %d (%d %d %d)",
5406 ips_name,
5407 ha->host_num,
5408 scb->cdb[0],
5409 scb->cmd.basic_io.command_id,
5410 scb->bus, scb->target_id, scb->lun);
5411 } else {
5412 DEBUG_VAR(2, "(%s%d) ips_issue: logical cmd id %d",
5413 ips_name, ha->host_num, scb->cmd.basic_io.command_id);
5414 }
5415
5416 outl(scb->scb_busaddr, ha->io_addr + IPS_REG_I2O_INMSGQ);
5417
5418 return (IPS_SUCCESS);
5419}
5420
5421/****************************************************************************/
5422/* */
5423/* Routine Name: ips_issue_i2o_memio */
5424/* */
5425/* Routine Description: */
5426/* */
5427/* Send a command down to the controller */
5428/* */
5429/****************************************************************************/
5430static int
5431ips_issue_i2o_memio(ips_ha_t * ha, ips_scb_t * scb)
5432{
5433
5434 METHOD_TRACE("ips_issue_i2o_memio", 1);
5435
5436 if (scb->scsi_cmd) {
5437 DEBUG_VAR(2, "(%s%d) ips_issue: cmd 0x%X id %d (%d %d %d)",
5438 ips_name,
5439 ha->host_num,
5440 scb->cdb[0],
5441 scb->cmd.basic_io.command_id,
5442 scb->bus, scb->target_id, scb->lun);
5443 } else {
5444 DEBUG_VAR(2, "(%s%d) ips_issue: logical cmd id %d",
5445 ips_name, ha->host_num, scb->cmd.basic_io.command_id);
5446 }
5447
5448 writel(scb->scb_busaddr, ha->mem_ptr + IPS_REG_I2O_INMSGQ);
5449
5450 return (IPS_SUCCESS);
5451}
5452
5453/****************************************************************************/
5454/* */
5455/* Routine Name: ips_isintr_copperhead */
5456/* */
5457/* Routine Description: */
5458/* */
5459/* Test to see if an interrupt is for us */
5460/* */
5461/****************************************************************************/
5462static int
5463ips_isintr_copperhead(ips_ha_t * ha)
5464{
5465 uint8_t Isr;
5466
5467 METHOD_TRACE("ips_isintr_copperhead", 2);
5468
5469 Isr = inb(ha->io_addr + IPS_REG_HISR);
5470
5471 if (Isr == 0xFF)
5472 /* ?!?! Nothing really there */
5473 return (0);
5474
5475 if (Isr & IPS_BIT_SCE)
5476 return (1);
5477 else if (Isr & (IPS_BIT_SQO | IPS_BIT_GHI)) {
5478 /* status queue overflow or GHI */
5479 /* just clear the interrupt */
5480 outb(Isr, ha->io_addr + IPS_REG_HISR);
5481 }
5482
5483 return (0);
5484}
5485
5486/****************************************************************************/
5487/* */
5488/* Routine Name: ips_isintr_copperhead_memio */
5489/* */
5490/* Routine Description: */
5491/* */
5492/* Test to see if an interrupt is for us */
5493/* */
5494/****************************************************************************/
5495static int
5496ips_isintr_copperhead_memio(ips_ha_t * ha)
5497{
5498 uint8_t Isr;
5499
5500 METHOD_TRACE("ips_isintr_memio", 2);
5501
5502 Isr = readb(ha->mem_ptr + IPS_REG_HISR);
5503
5504 if (Isr == 0xFF)
5505 /* ?!?! Nothing really there */
5506 return (0);
5507
5508 if (Isr & IPS_BIT_SCE)
5509 return (1);
5510 else if (Isr & (IPS_BIT_SQO | IPS_BIT_GHI)) {
5511 /* status queue overflow or GHI */
5512 /* just clear the interrupt */
5513 writeb(Isr, ha->mem_ptr + IPS_REG_HISR);
5514 }
5515
5516 return (0);
5517}
5518
5519/****************************************************************************/
5520/* */
5521/* Routine Name: ips_isintr_morpheus */
5522/* */
5523/* Routine Description: */
5524/* */
5525/* Test to see if an interrupt is for us */
5526/* */
5527/****************************************************************************/
5528static int
5529ips_isintr_morpheus(ips_ha_t * ha)
5530{
5531 uint32_t Isr;
5532
5533 METHOD_TRACE("ips_isintr_morpheus", 2);
5534
5535 Isr = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
5536
5537 if (Isr & IPS_BIT_I2O_OPQI)
5538 return (1);
5539 else
5540 return (0);
5541}
5542
5543/****************************************************************************/
5544/* */
5545/* Routine Name: ips_wait */
5546/* */
5547/* Routine Description: */
5548/* */
5549/* Wait for a command to complete */
5550/* */
5551/****************************************************************************/
5552static int
5553ips_wait(ips_ha_t * ha, int time, int intr)
5554{
5555 int ret;
5556 int done;
5557
5558 METHOD_TRACE("ips_wait", 1);
5559
5560 ret = IPS_FAILURE;
5561 done = FALSE;
5562
5563 time *= IPS_ONE_SEC; /* convert seconds */
5564
5565 while ((time > 0) && (!done)) {
5566 if (intr == IPS_INTR_ON) {
5567 if (ha->waitflag == FALSE) {
5568 ret = IPS_SUCCESS;
5569 done = TRUE;
5570 break;
5571 }
5572 } else if (intr == IPS_INTR_IORL) {
5573 if (ha->waitflag == FALSE) {
5574 /*
5575 * controller generated an interrupt to
5576 * acknowledge completion of the command
5577 * and ips_intr() has serviced the interrupt.
5578 */
5579 ret = IPS_SUCCESS;
5580 done = TRUE;
5581 break;
5582 }
5583
5584 /*
5585 * NOTE: we already have the io_request_lock so
5586 * even if we get an interrupt it won't get serviced
5587 * until after we finish.
5588 */
5589
5590 (*ha->func.intr) (ha);
5591 }
5592
5593 /* This looks like a very evil loop, but it only does this during start-up */
5594 udelay(1000);
5595 time--;
5596 }
5597
5598 return (ret);
5599}
5600
5601/****************************************************************************/
5602/* */
5603/* Routine Name: ips_write_driver_status */
5604/* */
5605/* Routine Description: */
5606/* */
5607/* Write OS/Driver version to Page 5 of the nvram on the controller */
5608/* */
5609/****************************************************************************/
5610static int
5611ips_write_driver_status(ips_ha_t * ha, int intr)
5612{
5613 METHOD_TRACE("ips_write_driver_status", 1);
5614
5615 if (!ips_readwrite_page5(ha, FALSE, intr)) {
5616 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5617 "unable to read NVRAM page 5.\n");
5618
5619 return (0);
5620 }
5621
5622 /* check to make sure the page has a valid */
5623 /* signature */
5624 if (le32_to_cpu(ha->nvram->signature) != IPS_NVRAM_P5_SIG) {
5625 DEBUG_VAR(1,
5626 "(%s%d) NVRAM page 5 has an invalid signature: %X.",
5627 ips_name, ha->host_num, ha->nvram->signature);
5628 ha->nvram->signature = IPS_NVRAM_P5_SIG;
5629 }
5630
5631 DEBUG_VAR(2,
5632 "(%s%d) Ad Type: %d, Ad Slot: %d, BIOS: %c%c%c%c %c%c%c%c.",
5633 ips_name, ha->host_num, le16_to_cpu(ha->nvram->adapter_type),
5634 ha->nvram->adapter_slot, ha->nvram->bios_high[0],
5635 ha->nvram->bios_high[1], ha->nvram->bios_high[2],
5636 ha->nvram->bios_high[3], ha->nvram->bios_low[0],
5637 ha->nvram->bios_low[1], ha->nvram->bios_low[2],
5638 ha->nvram->bios_low[3]);
5639
5640 ips_get_bios_version(ha, intr);
5641
5642 /* change values (as needed) */
5643 ha->nvram->operating_system = IPS_OS_LINUX;
5644 ha->nvram->adapter_type = ha->ad_type;
5645 strncpy((char *) ha->nvram->driver_high, IPS_VERSION_HIGH, 4);
5646 strncpy((char *) ha->nvram->driver_low, IPS_VERSION_LOW, 4);
5647 strncpy((char *) ha->nvram->bios_high, ha->bios_version, 4);
5648 strncpy((char *) ha->nvram->bios_low, ha->bios_version + 4, 4);
5649
5650 ha->nvram->versioning = 0; /* Indicate the Driver Does Not Support Versioning */
5651
5652 /* now update the page */
5653 if (!ips_readwrite_page5(ha, TRUE, intr)) {
5654 IPS_PRINTK(KERN_WARNING, ha->pcidev,
5655 "unable to write NVRAM page 5.\n");
5656
5657 return (0);
5658 }
5659
5660 /* IF NVRAM Page 5 is OK, Use it for Slot Number Info Because Linux Doesn't Do Slots */
5661 ha->slot_num = ha->nvram->adapter_slot;
5662
5663 return (1);
5664}
5665
5666/****************************************************************************/
5667/* */
5668/* Routine Name: ips_read_adapter_status */
5669/* */
5670/* Routine Description: */
5671/* */
5672/* Do an Inquiry command to the adapter */
5673/* */
5674/****************************************************************************/
5675static int
5676ips_read_adapter_status(ips_ha_t * ha, int intr)
5677{
5678 ips_scb_t *scb;
5679 int ret;
5680
5681 METHOD_TRACE("ips_read_adapter_status", 1);
5682
5683 scb = &ha->scbs[ha->max_cmds - 1];
5684
5685 ips_init_scb(ha, scb);
5686
5687 scb->timeout = ips_cmd_timeout;
5688 scb->cdb[0] = IPS_CMD_ENQUIRY;
5689
5690 scb->cmd.basic_io.op_code = IPS_CMD_ENQUIRY;
5691 scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
5692 scb->cmd.basic_io.sg_count = 0;
5693 scb->cmd.basic_io.lba = 0;
5694 scb->cmd.basic_io.sector_count = 0;
5695 scb->cmd.basic_io.log_drv = 0;
5696 scb->data_len = sizeof (*ha->enq);
5697 scb->cmd.basic_io.sg_addr = ha->enq_busaddr;
5698
5699 /* send command */
5700 if (((ret =
5701 ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5702 || (ret == IPS_SUCCESS_IMM)
5703 || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1))
5704 return (0);
5705
5706 return (1);
5707}
5708
5709/****************************************************************************/
5710/* */
5711/* Routine Name: ips_read_subsystem_parameters */
5712/* */
5713/* Routine Description: */
5714/* */
5715/* Read subsystem parameters from the adapter */
5716/* */
5717/****************************************************************************/
5718static int
5719ips_read_subsystem_parameters(ips_ha_t * ha, int intr)
5720{
5721 ips_scb_t *scb;
5722 int ret;
5723
5724 METHOD_TRACE("ips_read_subsystem_parameters", 1);
5725
5726 scb = &ha->scbs[ha->max_cmds - 1];
5727
5728 ips_init_scb(ha, scb);
5729
5730 scb->timeout = ips_cmd_timeout;
5731 scb->cdb[0] = IPS_CMD_GET_SUBSYS;
5732
5733 scb->cmd.basic_io.op_code = IPS_CMD_GET_SUBSYS;
5734 scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
5735 scb->cmd.basic_io.sg_count = 0;
5736 scb->cmd.basic_io.lba = 0;
5737 scb->cmd.basic_io.sector_count = 0;
5738 scb->cmd.basic_io.log_drv = 0;
5739 scb->data_len = sizeof (*ha->subsys);
5740 scb->cmd.basic_io.sg_addr = ha->ioctl_busaddr;
5741
5742 /* send command */
5743 if (((ret =
5744 ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5745 || (ret == IPS_SUCCESS_IMM)
5746 || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1))
5747 return (0);
5748
5749 memcpy(ha->subsys, ha->ioctl_data, sizeof(*ha->subsys));
5750 return (1);
5751}
5752
5753/****************************************************************************/
5754/* */
5755/* Routine Name: ips_read_config */
5756/* */
5757/* Routine Description: */
5758/* */
5759/* Read the configuration on the adapter */
5760/* */
5761/****************************************************************************/
5762static int
5763ips_read_config(ips_ha_t * ha, int intr)
5764{
5765 ips_scb_t *scb;
5766 int i;
5767 int ret;
5768
5769 METHOD_TRACE("ips_read_config", 1);
5770
5771 /* set defaults for initiator IDs */
5772 for (i = 0; i < 4; i++)
5773 ha->conf->init_id[i] = 7;
5774
5775 scb = &ha->scbs[ha->max_cmds - 1];
5776
5777 ips_init_scb(ha, scb);
5778
5779 scb->timeout = ips_cmd_timeout;
5780 scb->cdb[0] = IPS_CMD_READ_CONF;
5781
5782 scb->cmd.basic_io.op_code = IPS_CMD_READ_CONF;
5783 scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
5784 scb->data_len = sizeof (*ha->conf);
5785 scb->cmd.basic_io.sg_addr = ha->ioctl_busaddr;
5786
5787 /* send command */
5788 if (((ret =
5789 ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5790 || (ret == IPS_SUCCESS_IMM)
5791 || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1)) {
5792
5793 memset(ha->conf, 0, sizeof (IPS_CONF));
5794
5795 /* reset initiator IDs */
5796 for (i = 0; i < 4; i++)
5797 ha->conf->init_id[i] = 7;
5798
5799 /* Allow Completed with Errors, so JCRM can access the Adapter to fix the problems */
5800 if ((scb->basic_status & IPS_GSC_STATUS_MASK) ==
5801 IPS_CMD_CMPLT_WERROR)
5802 return (1);
5803
5804 return (0);
5805 }
5806
5807 memcpy(ha->conf, ha->ioctl_data, sizeof(*ha->conf));
5808 return (1);
5809}
5810
5811/****************************************************************************/
5812/* */
5813/* Routine Name: ips_readwrite_page5 */
5814/* */
5815/* Routine Description: */
5816/* */
5817/* Read nvram page 5 from the adapter */
5818/* */
5819/****************************************************************************/
5820static int
5821ips_readwrite_page5(ips_ha_t * ha, int write, int intr)
5822{
5823 ips_scb_t *scb;
5824 int ret;
5825
5826 METHOD_TRACE("ips_readwrite_page5", 1);
5827
5828 scb = &ha->scbs[ha->max_cmds - 1];
5829
5830 ips_init_scb(ha, scb);
5831
5832 scb->timeout = ips_cmd_timeout;
5833 scb->cdb[0] = IPS_CMD_RW_NVRAM_PAGE;
5834
5835 scb->cmd.nvram.op_code = IPS_CMD_RW_NVRAM_PAGE;
5836 scb->cmd.nvram.command_id = IPS_COMMAND_ID(ha, scb);
5837 scb->cmd.nvram.page = 5;
5838 scb->cmd.nvram.write = write;
5839 scb->cmd.nvram.reserved = 0;
5840 scb->cmd.nvram.reserved2 = 0;
5841 scb->data_len = sizeof (*ha->nvram);
5842 scb->cmd.nvram.buffer_addr = ha->ioctl_busaddr;
5843 if (write)
5844 memcpy(ha->ioctl_data, ha->nvram, sizeof(*ha->nvram));
5845
5846 /* issue the command */
5847 if (((ret =
5848 ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5849 || (ret == IPS_SUCCESS_IMM)
5850 || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1)) {
5851
5852 memset(ha->nvram, 0, sizeof (IPS_NVRAM_P5));
5853
5854 return (0);
5855 }
5856 if (!write)
5857 memcpy(ha->nvram, ha->ioctl_data, sizeof(*ha->nvram));
5858 return (1);
5859}
5860
5861/****************************************************************************/
5862/* */
5863/* Routine Name: ips_clear_adapter */
5864/* */
5865/* Routine Description: */
5866/* */
5867/* Clear the stripe lock tables */
5868/* */
5869/****************************************************************************/
5870static int
5871ips_clear_adapter(ips_ha_t * ha, int intr)
5872{
5873 ips_scb_t *scb;
5874 int ret;
5875
5876 METHOD_TRACE("ips_clear_adapter", 1);
5877
5878 scb = &ha->scbs[ha->max_cmds - 1];
5879
5880 ips_init_scb(ha, scb);
5881
5882 scb->timeout = ips_reset_timeout;
5883 scb->cdb[0] = IPS_CMD_CONFIG_SYNC;
5884
5885 scb->cmd.config_sync.op_code = IPS_CMD_CONFIG_SYNC;
5886 scb->cmd.config_sync.command_id = IPS_COMMAND_ID(ha, scb);
5887 scb->cmd.config_sync.channel = 0;
5888 scb->cmd.config_sync.source_target = IPS_POCL;
5889 scb->cmd.config_sync.reserved = 0;
5890 scb->cmd.config_sync.reserved2 = 0;
5891 scb->cmd.config_sync.reserved3 = 0;
5892
5893 /* issue command */
5894 if (((ret =
5895 ips_send_wait(ha, scb, ips_reset_timeout, intr)) == IPS_FAILURE)
5896 || (ret == IPS_SUCCESS_IMM)
5897 || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1))
5898 return (0);
5899
5900 /* send unlock stripe command */
5901 ips_init_scb(ha, scb);
5902
5903 scb->cdb[0] = IPS_CMD_ERROR_TABLE;
5904 scb->timeout = ips_reset_timeout;
5905
5906 scb->cmd.unlock_stripe.op_code = IPS_CMD_ERROR_TABLE;
5907 scb->cmd.unlock_stripe.command_id = IPS_COMMAND_ID(ha, scb);
5908 scb->cmd.unlock_stripe.log_drv = 0;
5909 scb->cmd.unlock_stripe.control = IPS_CSL;
5910 scb->cmd.unlock_stripe.reserved = 0;
5911 scb->cmd.unlock_stripe.reserved2 = 0;
5912 scb->cmd.unlock_stripe.reserved3 = 0;
5913
5914 /* issue command */
5915 if (((ret =
5916 ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5917 || (ret == IPS_SUCCESS_IMM)
5918 || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1))
5919 return (0);
5920
5921 return (1);
5922}
5923
5924/****************************************************************************/
5925/* */
5926/* Routine Name: ips_ffdc_reset */
5927/* */
5928/* Routine Description: */
5929/* */
5930/* FFDC: write reset info */
5931/* */
5932/****************************************************************************/
5933static void
5934ips_ffdc_reset(ips_ha_t * ha, int intr)
5935{
5936 ips_scb_t *scb;
5937
5938 METHOD_TRACE("ips_ffdc_reset", 1);
5939
5940 scb = &ha->scbs[ha->max_cmds - 1];
5941
5942 ips_init_scb(ha, scb);
5943
5944 scb->timeout = ips_cmd_timeout;
5945 scb->cdb[0] = IPS_CMD_FFDC;
5946 scb->cmd.ffdc.op_code = IPS_CMD_FFDC;
5947 scb->cmd.ffdc.command_id = IPS_COMMAND_ID(ha, scb);
5948 scb->cmd.ffdc.reset_count = ha->reset_count;
5949 scb->cmd.ffdc.reset_type = 0x80;
5950
5951 /* convert time to what the card wants */
5952 ips_fix_ffdc_time(ha, scb, ha->last_ffdc);
5953
5954 /* issue command */
5955 ips_send_wait(ha, scb, ips_cmd_timeout, intr);
5956}
5957
5958/****************************************************************************/
5959/* */
5960/* Routine Name: ips_ffdc_time */
5961/* */
5962/* Routine Description: */
5963/* */
5964/* FFDC: write time info */
5965/* */
5966/****************************************************************************/
5967static void
5968ips_ffdc_time(ips_ha_t * ha)
5969{
5970 ips_scb_t *scb;
5971
5972 METHOD_TRACE("ips_ffdc_time", 1);
5973
5974 DEBUG_VAR(1, "(%s%d) Sending time update.", ips_name, ha->host_num);
5975
5976 scb = &ha->scbs[ha->max_cmds - 1];
5977
5978 ips_init_scb(ha, scb);
5979
5980 scb->timeout = ips_cmd_timeout;
5981 scb->cdb[0] = IPS_CMD_FFDC;
5982 scb->cmd.ffdc.op_code = IPS_CMD_FFDC;
5983 scb->cmd.ffdc.command_id = IPS_COMMAND_ID(ha, scb);
5984 scb->cmd.ffdc.reset_count = 0;
5985 scb->cmd.ffdc.reset_type = 0;
5986
5987 /* convert time to what the card wants */
5988 ips_fix_ffdc_time(ha, scb, ha->last_ffdc);
5989
5990 /* issue command */
5991 ips_send_wait(ha, scb, ips_cmd_timeout, IPS_FFDC);
5992}
5993
5994/****************************************************************************/
5995/* */
5996/* Routine Name: ips_fix_ffdc_time */
5997/* */
5998/* Routine Description: */
5999/* Adjust time_t to what the card wants */
6000/* */
6001/****************************************************************************/
6002static void
6003ips_fix_ffdc_time(ips_ha_t * ha, ips_scb_t * scb, time_t current_time)
6004{
6005 long days;
6006 long rem;
6007 int i;
6008 int year;
6009 int yleap;
6010 int year_lengths[2] = { IPS_DAYS_NORMAL_YEAR, IPS_DAYS_LEAP_YEAR };
6011 int month_lengths[12][2] = { {31, 31},
6012 {28, 29},
6013 {31, 31},
6014 {30, 30},
6015 {31, 31},
6016 {30, 30},
6017 {31, 31},
6018 {31, 31},
6019 {30, 30},
6020 {31, 31},
6021 {30, 30},
6022 {31, 31}
6023 };
6024
6025 METHOD_TRACE("ips_fix_ffdc_time", 1);
6026
6027 days = current_time / IPS_SECS_DAY;
6028 rem = current_time % IPS_SECS_DAY;
6029
6030 scb->cmd.ffdc.hour = (rem / IPS_SECS_HOUR);
6031 rem = rem % IPS_SECS_HOUR;
6032 scb->cmd.ffdc.minute = (rem / IPS_SECS_MIN);
6033 scb->cmd.ffdc.second = (rem % IPS_SECS_MIN);
6034
6035 year = IPS_EPOCH_YEAR;
6036 while (days < 0 || days >= year_lengths[yleap = IPS_IS_LEAP_YEAR(year)]) {
6037 int newy;
6038
6039 newy = year + (days / IPS_DAYS_NORMAL_YEAR);
6040 if (days < 0)
6041 --newy;
6042 days -= (newy - year) * IPS_DAYS_NORMAL_YEAR +
6043 IPS_NUM_LEAP_YEARS_THROUGH(newy - 1) -
6044 IPS_NUM_LEAP_YEARS_THROUGH(year - 1);
6045 year = newy;
6046 }
6047
6048 scb->cmd.ffdc.yearH = year / 100;
6049 scb->cmd.ffdc.yearL = year % 100;
6050
6051 for (i = 0; days >= month_lengths[i][yleap]; ++i)
6052 days -= month_lengths[i][yleap];
6053
6054 scb->cmd.ffdc.month = i + 1;
6055 scb->cmd.ffdc.day = days + 1;
6056}
6057
6058/****************************************************************************
6059 * BIOS Flash Routines *
6060 ****************************************************************************/
6061
6062/****************************************************************************/
6063/* */
6064/* Routine Name: ips_erase_bios */
6065/* */
6066/* Routine Description: */
6067/* Erase the BIOS on the adapter */
6068/* */
6069/****************************************************************************/
6070static int
6071ips_erase_bios(ips_ha_t * ha)
6072{
6073 int timeout;
6074 uint8_t status = 0;
6075
6076 METHOD_TRACE("ips_erase_bios", 1);
6077
6078 status = 0;
6079
6080 /* Clear the status register */
6081 outl(0, ha->io_addr + IPS_REG_FLAP);
6082 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6083 udelay(25); /* 25 us */
6084
6085 outb(0x50, ha->io_addr + IPS_REG_FLDP);
6086 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6087 udelay(25); /* 25 us */
6088
6089 /* Erase Setup */
6090 outb(0x20, ha->io_addr + IPS_REG_FLDP);
6091 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6092 udelay(25); /* 25 us */
6093
6094 /* Erase Confirm */
6095 outb(0xD0, ha->io_addr + IPS_REG_FLDP);
6096 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6097 udelay(25); /* 25 us */
6098
6099 /* Erase Status */
6100 outb(0x70, ha->io_addr + IPS_REG_FLDP);
6101 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6102 udelay(25); /* 25 us */
6103
6104 timeout = 80000; /* 80 seconds */
6105
6106 while (timeout > 0) {
6107 if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6108 outl(0, ha->io_addr + IPS_REG_FLAP);
6109 udelay(25); /* 25 us */
6110 }
6111
6112 status = inb(ha->io_addr + IPS_REG_FLDP);
6113
6114 if (status & 0x80)
6115 break;
6116
6117 MDELAY(1);
6118 timeout--;
6119 }
6120
6121 /* check for timeout */
6122 if (timeout <= 0) {
6123 /* timeout */
6124
6125 /* try to suspend the erase */
6126 outb(0xB0, ha->io_addr + IPS_REG_FLDP);
6127 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6128 udelay(25); /* 25 us */
6129
6130 /* wait for 10 seconds */
6131 timeout = 10000;
6132 while (timeout > 0) {
6133 if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6134 outl(0, ha->io_addr + IPS_REG_FLAP);
6135 udelay(25); /* 25 us */
6136 }
6137
6138 status = inb(ha->io_addr + IPS_REG_FLDP);
6139
6140 if (status & 0xC0)
6141 break;
6142
6143 MDELAY(1);
6144 timeout--;
6145 }
6146
6147 return (1);
6148 }
6149
6150 /* check for valid VPP */
6151 if (status & 0x08)
6152 /* VPP failure */
6153 return (1);
6154
6155 /* check for successful flash */
6156 if (status & 0x30)
6157 /* sequence error */
6158 return (1);
6159
6160 /* Otherwise, we were successful */
6161 /* clear status */
6162 outb(0x50, ha->io_addr + IPS_REG_FLDP);
6163 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6164 udelay(25); /* 25 us */
6165
6166 /* enable reads */
6167 outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6168 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6169 udelay(25); /* 25 us */
6170
6171 return (0);
6172}
6173
6174/****************************************************************************/
6175/* */
6176/* Routine Name: ips_erase_bios_memio */
6177/* */
6178/* Routine Description: */
6179/* Erase the BIOS on the adapter */
6180/* */
6181/****************************************************************************/
6182static int
6183ips_erase_bios_memio(ips_ha_t * ha)
6184{
6185 int timeout;
6186 uint8_t status;
6187
6188 METHOD_TRACE("ips_erase_bios_memio", 1);
6189
6190 status = 0;
6191
6192 /* Clear the status register */
6193 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6194 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6195 udelay(25); /* 25 us */
6196
6197 writeb(0x50, ha->mem_ptr + IPS_REG_FLDP);
6198 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6199 udelay(25); /* 25 us */
6200
6201 /* Erase Setup */
6202 writeb(0x20, ha->mem_ptr + IPS_REG_FLDP);
6203 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6204 udelay(25); /* 25 us */
6205
6206 /* Erase Confirm */
6207 writeb(0xD0, ha->mem_ptr + IPS_REG_FLDP);
6208 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6209 udelay(25); /* 25 us */
6210
6211 /* Erase Status */
6212 writeb(0x70, ha->mem_ptr + IPS_REG_FLDP);
6213 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6214 udelay(25); /* 25 us */
6215
6216 timeout = 80000; /* 80 seconds */
6217
6218 while (timeout > 0) {
6219 if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6220 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6221 udelay(25); /* 25 us */
6222 }
6223
6224 status = readb(ha->mem_ptr + IPS_REG_FLDP);
6225
6226 if (status & 0x80)
6227 break;
6228
6229 MDELAY(1);
6230 timeout--;
6231 }
6232
6233 /* check for timeout */
6234 if (timeout <= 0) {
6235 /* timeout */
6236
6237 /* try to suspend the erase */
6238 writeb(0xB0, ha->mem_ptr + IPS_REG_FLDP);
6239 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6240 udelay(25); /* 25 us */
6241
6242 /* wait for 10 seconds */
6243 timeout = 10000;
6244 while (timeout > 0) {
6245 if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6246 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6247 udelay(25); /* 25 us */
6248 }
6249
6250 status = readb(ha->mem_ptr + IPS_REG_FLDP);
6251
6252 if (status & 0xC0)
6253 break;
6254
6255 MDELAY(1);
6256 timeout--;
6257 }
6258
6259 return (1);
6260 }
6261
6262 /* check for valid VPP */
6263 if (status & 0x08)
6264 /* VPP failure */
6265 return (1);
6266
6267 /* check for successful flash */
6268 if (status & 0x30)
6269 /* sequence error */
6270 return (1);
6271
6272 /* Otherwise, we were successful */
6273 /* clear status */
6274 writeb(0x50, ha->mem_ptr + IPS_REG_FLDP);
6275 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6276 udelay(25); /* 25 us */
6277
6278 /* enable reads */
6279 writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6280 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6281 udelay(25); /* 25 us */
6282
6283 return (0);
6284}
6285
6286/****************************************************************************/
6287/* */
6288/* Routine Name: ips_program_bios */
6289/* */
6290/* Routine Description: */
6291/* Program the BIOS on the adapter */
6292/* */
6293/****************************************************************************/
6294static int
6295ips_program_bios(ips_ha_t * ha, char *buffer, uint32_t buffersize,
6296 uint32_t offset)
6297{
6298 int i;
6299 int timeout;
6300 uint8_t status = 0;
6301
6302 METHOD_TRACE("ips_program_bios", 1);
6303
6304 status = 0;
6305
6306 for (i = 0; i < buffersize; i++) {
6307 /* write a byte */
6308 outl(i + offset, ha->io_addr + IPS_REG_FLAP);
6309 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6310 udelay(25); /* 25 us */
6311
6312 outb(0x40, ha->io_addr + IPS_REG_FLDP);
6313 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6314 udelay(25); /* 25 us */
6315
6316 outb(buffer[i], ha->io_addr + IPS_REG_FLDP);
6317 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6318 udelay(25); /* 25 us */
6319
6320 /* wait up to one second */
6321 timeout = 1000;
6322 while (timeout > 0) {
6323 if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6324 outl(0, ha->io_addr + IPS_REG_FLAP);
6325 udelay(25); /* 25 us */
6326 }
6327
6328 status = inb(ha->io_addr + IPS_REG_FLDP);
6329
6330 if (status & 0x80)
6331 break;
6332
6333 MDELAY(1);
6334 timeout--;
6335 }
6336
6337 if (timeout == 0) {
6338 /* timeout error */
6339 outl(0, ha->io_addr + IPS_REG_FLAP);
6340 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6341 udelay(25); /* 25 us */
6342
6343 outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6344 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6345 udelay(25); /* 25 us */
6346
6347 return (1);
6348 }
6349
6350 /* check the status */
6351 if (status & 0x18) {
6352 /* programming error */
6353 outl(0, ha->io_addr + IPS_REG_FLAP);
6354 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6355 udelay(25); /* 25 us */
6356
6357 outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6358 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6359 udelay(25); /* 25 us */
6360
6361 return (1);
6362 }
6363 } /* end for */
6364
6365 /* Enable reading */
6366 outl(0, ha->io_addr + IPS_REG_FLAP);
6367 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6368 udelay(25); /* 25 us */
6369
6370 outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6371 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6372 udelay(25); /* 25 us */
6373
6374 return (0);
6375}
6376
6377/****************************************************************************/
6378/* */
6379/* Routine Name: ips_program_bios_memio */
6380/* */
6381/* Routine Description: */
6382/* Program the BIOS on the adapter */
6383/* */
6384/****************************************************************************/
6385static int
6386ips_program_bios_memio(ips_ha_t * ha, char *buffer, uint32_t buffersize,
6387 uint32_t offset)
6388{
6389 int i;
6390 int timeout;
6391 uint8_t status = 0;
6392
6393 METHOD_TRACE("ips_program_bios_memio", 1);
6394
6395 status = 0;
6396
6397 for (i = 0; i < buffersize; i++) {
6398 /* write a byte */
6399 writel(i + offset, ha->mem_ptr + IPS_REG_FLAP);
6400 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6401 udelay(25); /* 25 us */
6402
6403 writeb(0x40, ha->mem_ptr + IPS_REG_FLDP);
6404 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6405 udelay(25); /* 25 us */
6406
6407 writeb(buffer[i], ha->mem_ptr + IPS_REG_FLDP);
6408 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6409 udelay(25); /* 25 us */
6410
6411 /* wait up to one second */
6412 timeout = 1000;
6413 while (timeout > 0) {
6414 if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6415 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6416 udelay(25); /* 25 us */
6417 }
6418
6419 status = readb(ha->mem_ptr + IPS_REG_FLDP);
6420
6421 if (status & 0x80)
6422 break;
6423
6424 MDELAY(1);
6425 timeout--;
6426 }
6427
6428 if (timeout == 0) {
6429 /* timeout error */
6430 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6431 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6432 udelay(25); /* 25 us */
6433
6434 writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6435 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6436 udelay(25); /* 25 us */
6437
6438 return (1);
6439 }
6440
6441 /* check the status */
6442 if (status & 0x18) {
6443 /* programming error */
6444 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6445 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6446 udelay(25); /* 25 us */
6447
6448 writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6449 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6450 udelay(25); /* 25 us */
6451
6452 return (1);
6453 }
6454 } /* end for */
6455
6456 /* Enable reading */
6457 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6458 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6459 udelay(25); /* 25 us */
6460
6461 writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6462 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6463 udelay(25); /* 25 us */
6464
6465 return (0);
6466}
6467
6468/****************************************************************************/
6469/* */
6470/* Routine Name: ips_verify_bios */
6471/* */
6472/* Routine Description: */
6473/* Verify the BIOS on the adapter */
6474/* */
6475/****************************************************************************/
6476static int
6477ips_verify_bios(ips_ha_t * ha, char *buffer, uint32_t buffersize,
6478 uint32_t offset)
6479{
6480 uint8_t checksum;
6481 int i;
6482
6483 METHOD_TRACE("ips_verify_bios", 1);
6484
6485 /* test 1st byte */
6486 outl(0, ha->io_addr + IPS_REG_FLAP);
6487 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6488 udelay(25); /* 25 us */
6489
6490 if (inb(ha->io_addr + IPS_REG_FLDP) != 0x55)
6491 return (1);
6492
6493 outl(1, ha->io_addr + IPS_REG_FLAP);
6494 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6495 udelay(25); /* 25 us */
6496 if (inb(ha->io_addr + IPS_REG_FLDP) != 0xAA)
6497 return (1);
6498
6499 checksum = 0xff;
6500 for (i = 2; i < buffersize; i++) {
6501
6502 outl(i + offset, ha->io_addr + IPS_REG_FLAP);
6503 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6504 udelay(25); /* 25 us */
6505
6506 checksum = (uint8_t) checksum + inb(ha->io_addr + IPS_REG_FLDP);
6507 }
6508
6509 if (checksum != 0)
6510 /* failure */
6511 return (1);
6512 else
6513 /* success */
6514 return (0);
6515}
6516
6517/****************************************************************************/
6518/* */
6519/* Routine Name: ips_verify_bios_memio */
6520/* */
6521/* Routine Description: */
6522/* Verify the BIOS on the adapter */
6523/* */
6524/****************************************************************************/
6525static int
6526ips_verify_bios_memio(ips_ha_t * ha, char *buffer, uint32_t buffersize,
6527 uint32_t offset)
6528{
6529 uint8_t checksum;
6530 int i;
6531
6532 METHOD_TRACE("ips_verify_bios_memio", 1);
6533
6534 /* test 1st byte */
6535 writel(0, ha->mem_ptr + IPS_REG_FLAP);
6536 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6537 udelay(25); /* 25 us */
6538
6539 if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0x55)
6540 return (1);
6541
6542 writel(1, ha->mem_ptr + IPS_REG_FLAP);
6543 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6544 udelay(25); /* 25 us */
6545 if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0xAA)
6546 return (1);
6547
6548 checksum = 0xff;
6549 for (i = 2; i < buffersize; i++) {
6550
6551 writel(i + offset, ha->mem_ptr + IPS_REG_FLAP);
6552 if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6553 udelay(25); /* 25 us */
6554
6555 checksum =
6556 (uint8_t) checksum + readb(ha->mem_ptr + IPS_REG_FLDP);
6557 }
6558
6559 if (checksum != 0)
6560 /* failure */
6561 return (1);
6562 else
6563 /* success */
6564 return (0);
6565}
6566
6567/****************************************************************************/
6568/* */
6569/* Routine Name: ips_abort_init */
6570/* */
6571/* Routine Description: */
6572/* cleanup routine for a failed adapter initialization */
6573/****************************************************************************/
6574static int
6575ips_abort_init(ips_ha_t * ha, int index)
6576{
6577 ha->active = 0;
6578 ips_free(ha);
6579 ips_ha[index] = NULL;
6580 ips_sh[index] = NULL;
6581 return -1;
6582}
6583
6584/****************************************************************************/
6585/* */
6586/* Routine Name: ips_shift_controllers */
6587/* */
6588/* Routine Description: */
6589/* helper function for ordering adapters */
6590/****************************************************************************/
6591static void
6592ips_shift_controllers(int lowindex, int highindex)
6593{
6594 ips_ha_t *ha_sav = ips_ha[highindex];
6595 struct Scsi_Host *sh_sav = ips_sh[highindex];
6596 int i;
6597
6598 for (i = highindex; i > lowindex; i--) {
6599 ips_ha[i] = ips_ha[i - 1];
6600 ips_sh[i] = ips_sh[i - 1];
6601 ips_ha[i]->host_num = i;
6602 }
6603 ha_sav->host_num = lowindex;
6604 ips_ha[lowindex] = ha_sav;
6605 ips_sh[lowindex] = sh_sav;
6606}
6607
6608/****************************************************************************/
6609/* */
6610/* Routine Name: ips_order_controllers */
6611/* */
6612/* Routine Description: */
6613/* place controllers is the "proper" boot order */
6614/****************************************************************************/
6615static void
6616ips_order_controllers(void)
6617{
6618 int i, j, tmp, position = 0;
6619 IPS_NVRAM_P5 *nvram;
6620 if (!ips_ha[0])
6621 return;
6622 nvram = ips_ha[0]->nvram;
6623
6624 if (nvram->adapter_order[0]) {
6625 for (i = 1; i <= nvram->adapter_order[0]; i++) {
6626 for (j = position; j < ips_num_controllers; j++) {
6627 switch (ips_ha[j]->ad_type) {
6628 case IPS_ADTYPE_SERVERAID6M:
6629 case IPS_ADTYPE_SERVERAID7M:
6630 if (nvram->adapter_order[i] == 'M') {
6631 ips_shift_controllers(position,
6632 j);
6633 position++;
6634 }
6635 break;
6636 case IPS_ADTYPE_SERVERAID4L:
6637 case IPS_ADTYPE_SERVERAID4M:
6638 case IPS_ADTYPE_SERVERAID4MX:
6639 case IPS_ADTYPE_SERVERAID4LX:
6640 if (nvram->adapter_order[i] == 'N') {
6641 ips_shift_controllers(position,
6642 j);
6643 position++;
6644 }
6645 break;
6646 case IPS_ADTYPE_SERVERAID6I:
6647 case IPS_ADTYPE_SERVERAID5I2:
6648 case IPS_ADTYPE_SERVERAID5I1:
6649 case IPS_ADTYPE_SERVERAID7k:
6650 if (nvram->adapter_order[i] == 'S') {
6651 ips_shift_controllers(position,
6652 j);
6653 position++;
6654 }
6655 break;
6656 case IPS_ADTYPE_SERVERAID:
6657 case IPS_ADTYPE_SERVERAID2:
6658 case IPS_ADTYPE_NAVAJO:
6659 case IPS_ADTYPE_KIOWA:
6660 case IPS_ADTYPE_SERVERAID3L:
6661 case IPS_ADTYPE_SERVERAID3:
6662 case IPS_ADTYPE_SERVERAID4H:
6663 if (nvram->adapter_order[i] == 'A') {
6664 ips_shift_controllers(position,
6665 j);
6666 position++;
6667 }
6668 break;
6669 default:
6670 break;
6671 }
6672 }
6673 }
6674 /* if adapter_order[0], then ordering is complete */
6675 return;
6676 }
6677 /* old bios, use older ordering */
6678 tmp = 0;
6679 for (i = position; i < ips_num_controllers; i++) {
6680 if (ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID5I2 ||
6681 ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID5I1) {
6682 ips_shift_controllers(position, i);
6683 position++;
6684 tmp = 1;
6685 }
6686 }
6687 /* if there were no 5I cards, then don't do any extra ordering */
6688 if (!tmp)
6689 return;
6690 for (i = position; i < ips_num_controllers; i++) {
6691 if (ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID4L ||
6692 ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID4M ||
6693 ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID4LX ||
6694 ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID4MX) {
6695 ips_shift_controllers(position, i);
6696 position++;
6697 }
6698 }
6699
6700 return;
6701}
6702
6703/****************************************************************************/
6704/* */
6705/* Routine Name: ips_register_scsi */
6706/* */
6707/* Routine Description: */
6708/* perform any registration and setup with the scsi layer */
6709/****************************************************************************/
6710static int
6711ips_register_scsi(int index)
6712{
6713 struct Scsi_Host *sh;
6714 ips_ha_t *ha, *oldha = ips_ha[index];
6715 sh = scsi_host_alloc(&ips_driver_template, sizeof (ips_ha_t));
6716 if (!sh) {
6717 IPS_PRINTK(KERN_WARNING, oldha->pcidev,
6718 "Unable to register controller with SCSI subsystem\n");
6719 return -1;
6720 }
6721 ha = IPS_HA(sh);
6722 memcpy(ha, oldha, sizeof (ips_ha_t));
6723 free_irq(oldha->pcidev->irq, oldha);
6724 /* Install the interrupt handler with the new ha */
6725 if (request_irq(ha->pcidev->irq, do_ipsintr, IRQF_SHARED, ips_name, ha)) {
6726 IPS_PRINTK(KERN_WARNING, ha->pcidev,
6727 "Unable to install interrupt handler\n");
6728 goto err_out_sh;
6729 }
6730
6731 kfree(oldha);
6732
6733 /* Store away needed values for later use */
6734 sh->unique_id = (ha->io_addr) ? ha->io_addr : ha->mem_addr;
6735 sh->sg_tablesize = sh->hostt->sg_tablesize;
6736 sh->can_queue = sh->hostt->can_queue;
6737 sh->cmd_per_lun = sh->hostt->cmd_per_lun;
6738 sh->use_clustering = sh->hostt->use_clustering;
6739 sh->max_sectors = 128;
6740
6741 sh->max_id = ha->ntargets;
6742 sh->max_lun = ha->nlun;
6743 sh->max_channel = ha->nbus - 1;
6744 sh->can_queue = ha->max_cmds - 1;
6745
6746 if (scsi_add_host(sh, &ha->pcidev->dev))
6747 goto err_out;
6748
6749 ips_sh[index] = sh;
6750 ips_ha[index] = ha;
6751
6752 scsi_scan_host(sh);
6753
6754 return 0;
6755
6756err_out:
6757 free_irq(ha->pcidev->irq, ha);
6758err_out_sh:
6759 scsi_host_put(sh);
6760 return -1;
6761}
6762
6763/*---------------------------------------------------------------------------*/
6764/* Routine Name: ips_remove_device */
6765/* */
6766/* Routine Description: */
6767/* Remove one Adapter ( Hot Plugging ) */
6768/*---------------------------------------------------------------------------*/
6769static void
6770ips_remove_device(struct pci_dev *pci_dev)
6771{
6772 struct Scsi_Host *sh = pci_get_drvdata(pci_dev);
6773
6774 pci_set_drvdata(pci_dev, NULL);
6775
6776 ips_release(sh);
6777
6778 pci_release_regions(pci_dev);
6779 pci_disable_device(pci_dev);
6780}
6781
6782/****************************************************************************/
6783/* */
6784/* Routine Name: ips_module_init */
6785/* */
6786/* Routine Description: */
6787/* function called on module load */
6788/****************************************************************************/
6789static int __init
6790ips_module_init(void)
6791{
6792 if (pci_register_driver(&ips_pci_driver) < 0)
6793 return -ENODEV;
6794 ips_driver_template.module = THIS_MODULE;
6795 ips_order_controllers();
6796 if (!ips_detect(&ips_driver_template)) {
6797 pci_unregister_driver(&ips_pci_driver);
6798 return -ENODEV;
6799 }
6800 register_reboot_notifier(&ips_notifier);
6801 return 0;
6802}
6803
6804/****************************************************************************/
6805/* */
6806/* Routine Name: ips_module_exit */
6807/* */
6808/* Routine Description: */
6809/* function called on module unload */
6810/****************************************************************************/
6811static void __exit
6812ips_module_exit(void)
6813{
6814 pci_unregister_driver(&ips_pci_driver);
6815 unregister_reboot_notifier(&ips_notifier);
6816}
6817
6818module_init(ips_module_init);
6819module_exit(ips_module_exit);
6820
6821/*---------------------------------------------------------------------------*/
6822/* Routine Name: ips_insert_device */
6823/* */
6824/* Routine Description: */
6825/* Add One Adapter ( Hot Plug ) */
6826/* */
6827/* Return Value: */
6828/* 0 if Successful, else non-zero */
6829/*---------------------------------------------------------------------------*/
6830static int
6831ips_insert_device(struct pci_dev *pci_dev, const struct pci_device_id *ent)
6832{
6833 int index = -1;
6834 int rc;
6835
6836 METHOD_TRACE("ips_insert_device", 1);
6837 rc = pci_enable_device(pci_dev);
6838 if (rc)
6839 return rc;
6840
6841 rc = pci_request_regions(pci_dev, "ips");
6842 if (rc)
6843 goto err_out;
6844
6845 rc = ips_init_phase1(pci_dev, &index);
6846 if (rc == SUCCESS)
6847 rc = ips_init_phase2(index);
6848
6849 if (ips_hotplug)
6850 if (ips_register_scsi(index)) {
6851 ips_free(ips_ha[index]);
6852 rc = -1;
6853 }
6854
6855 if (rc == SUCCESS)
6856 ips_num_controllers++;
6857
6858 ips_next_controller = ips_num_controllers;
6859
6860 if (rc < 0) {
6861 rc = -ENODEV;
6862 goto err_out_regions;
6863 }
6864
6865 pci_set_drvdata(pci_dev, ips_sh[index]);
6866 return 0;
6867
6868err_out_regions:
6869 pci_release_regions(pci_dev);
6870err_out:
6871 pci_disable_device(pci_dev);
6872 return rc;
6873}
6874
6875/*---------------------------------------------------------------------------*/
6876/* Routine Name: ips_init_phase1 */
6877/* */
6878/* Routine Description: */
6879/* Adapter Initialization */
6880/* */
6881/* Return Value: */
6882/* 0 if Successful, else non-zero */
6883/*---------------------------------------------------------------------------*/
6884static int
6885ips_init_phase1(struct pci_dev *pci_dev, int *indexPtr)
6886{
6887 ips_ha_t *ha;
6888 uint32_t io_addr;
6889 uint32_t mem_addr;
6890 uint32_t io_len;
6891 uint32_t mem_len;
6892 uint8_t bus;
6893 uint8_t func;
6894 int j;
6895 int index;
6896 dma_addr_t dma_address;
6897 char __iomem *ioremap_ptr;
6898 char __iomem *mem_ptr;
6899 uint32_t IsDead;
6900
6901 METHOD_TRACE("ips_init_phase1", 1);
6902 index = IPS_MAX_ADAPTERS;
6903 for (j = 0; j < IPS_MAX_ADAPTERS; j++) {
6904 if (ips_ha[j] == NULL) {
6905 index = j;
6906 break;
6907 }
6908 }
6909
6910 if (index >= IPS_MAX_ADAPTERS)
6911 return -1;
6912
6913 /* stuff that we get in dev */
6914 bus = pci_dev->bus->number;
6915 func = pci_dev->devfn;
6916
6917 /* Init MEM/IO addresses to 0 */
6918 mem_addr = 0;
6919 io_addr = 0;
6920 mem_len = 0;
6921 io_len = 0;
6922
6923 for (j = 0; j < 2; j++) {
6924 if (!pci_resource_start(pci_dev, j))
6925 break;
6926
6927 if (pci_resource_flags(pci_dev, j) & IORESOURCE_IO) {
6928 io_addr = pci_resource_start(pci_dev, j);
6929 io_len = pci_resource_len(pci_dev, j);
6930 } else {
6931 mem_addr = pci_resource_start(pci_dev, j);
6932 mem_len = pci_resource_len(pci_dev, j);
6933 }
6934 }
6935
6936 /* setup memory mapped area (if applicable) */
6937 if (mem_addr) {
6938 uint32_t base;
6939 uint32_t offs;
6940
6941 base = mem_addr & PAGE_MASK;
6942 offs = mem_addr - base;
6943 ioremap_ptr = ioremap(base, PAGE_SIZE);
6944 if (!ioremap_ptr)
6945 return -1;
6946 mem_ptr = ioremap_ptr + offs;
6947 } else {
6948 ioremap_ptr = NULL;
6949 mem_ptr = NULL;
6950 }
6951
6952 /* found a controller */
6953 ha = kzalloc(sizeof (ips_ha_t), GFP_KERNEL);
6954 if (ha == NULL) {
6955 IPS_PRINTK(KERN_WARNING, pci_dev,
6956 "Unable to allocate temporary ha struct\n");
6957 return -1;
6958 }
6959
6960 ips_sh[index] = NULL;
6961 ips_ha[index] = ha;
6962 ha->active = 1;
6963
6964 /* Store info in HA structure */
6965 ha->io_addr = io_addr;
6966 ha->io_len = io_len;
6967 ha->mem_addr = mem_addr;
6968 ha->mem_len = mem_len;
6969 ha->mem_ptr = mem_ptr;
6970 ha->ioremap_ptr = ioremap_ptr;
6971 ha->host_num = (uint32_t) index;
6972 ha->slot_num = PCI_SLOT(pci_dev->devfn);
6973 ha->pcidev = pci_dev;
6974
6975 /*
6976 * Set the pci_dev's dma_mask. Not all adapters support 64bit
6977 * addressing so don't enable it if the adapter can't support
6978 * it! Also, don't use 64bit addressing if dma addresses
6979 * are guaranteed to be < 4G.
6980 */
6981 if (IPS_ENABLE_DMA64 && IPS_HAS_ENH_SGLIST(ha) &&
6982 !pci_set_dma_mask(ha->pcidev, DMA_BIT_MASK(64))) {
6983 (ha)->flags |= IPS_HA_ENH_SG;
6984 } else {
6985 if (pci_set_dma_mask(ha->pcidev, DMA_BIT_MASK(32)) != 0) {
6986 printk(KERN_WARNING "Unable to set DMA Mask\n");
6987 return ips_abort_init(ha, index);
6988 }
6989 }
6990 if(ips_cd_boot && !ips_FlashData){
6991 ips_FlashData = pci_alloc_consistent(pci_dev, PAGE_SIZE << 7,
6992 &ips_flashbusaddr);
6993 }
6994
6995 ha->enq = pci_alloc_consistent(pci_dev, sizeof (IPS_ENQ),
6996 &ha->enq_busaddr);
6997 if (!ha->enq) {
6998 IPS_PRINTK(KERN_WARNING, pci_dev,
6999 "Unable to allocate host inquiry structure\n");
7000 return ips_abort_init(ha, index);
7001 }
7002
7003 ha->adapt = pci_alloc_consistent(pci_dev, sizeof (IPS_ADAPTER) +
7004 sizeof (IPS_IO_CMD), &dma_address);
7005 if (!ha->adapt) {
7006 IPS_PRINTK(KERN_WARNING, pci_dev,
7007 "Unable to allocate host adapt & dummy structures\n");
7008 return ips_abort_init(ha, index);
7009 }
7010 ha->adapt->hw_status_start = dma_address;
7011 ha->dummy = (void *) (ha->adapt + 1);
7012
7013
7014
7015 ha->logical_drive_info = pci_alloc_consistent(pci_dev, sizeof (IPS_LD_INFO), &dma_address);
7016 if (!ha->logical_drive_info) {
7017 IPS_PRINTK(KERN_WARNING, pci_dev,
7018 "Unable to allocate logical drive info structure\n");
7019 return ips_abort_init(ha, index);
7020 }
7021 ha->logical_drive_info_dma_addr = dma_address;
7022
7023
7024 ha->conf = kmalloc(sizeof (IPS_CONF), GFP_KERNEL);
7025
7026 if (!ha->conf) {
7027 IPS_PRINTK(KERN_WARNING, pci_dev,
7028 "Unable to allocate host conf structure\n");
7029 return ips_abort_init(ha, index);
7030 }
7031
7032 ha->nvram = kmalloc(sizeof (IPS_NVRAM_P5), GFP_KERNEL);
7033
7034 if (!ha->nvram) {
7035 IPS_PRINTK(KERN_WARNING, pci_dev,
7036 "Unable to allocate host NVRAM structure\n");
7037 return ips_abort_init(ha, index);
7038 }
7039
7040 ha->subsys = kmalloc(sizeof (IPS_SUBSYS), GFP_KERNEL);
7041
7042 if (!ha->subsys) {
7043 IPS_PRINTK(KERN_WARNING, pci_dev,
7044 "Unable to allocate host subsystem structure\n");
7045 return ips_abort_init(ha, index);
7046 }
7047
7048 /* the ioctl buffer is now used during adapter initialization, so its
7049 * successful allocation is now required */
7050 if (ips_ioctlsize < PAGE_SIZE)
7051 ips_ioctlsize = PAGE_SIZE;
7052
7053 ha->ioctl_data = pci_alloc_consistent(pci_dev, ips_ioctlsize,
7054 &ha->ioctl_busaddr);
7055 ha->ioctl_len = ips_ioctlsize;
7056 if (!ha->ioctl_data) {
7057 IPS_PRINTK(KERN_WARNING, pci_dev,
7058 "Unable to allocate IOCTL data\n");
7059 return ips_abort_init(ha, index);
7060 }
7061
7062 /*
7063 * Setup Functions
7064 */
7065 ips_setup_funclist(ha);
7066
7067 if ((IPS_IS_MORPHEUS(ha)) || (IPS_IS_MARCO(ha))) {
7068 /* If Morpheus appears dead, reset it */
7069 IsDead = readl(ha->mem_ptr + IPS_REG_I960_MSG1);
7070 if (IsDead == 0xDEADBEEF) {
7071 ips_reset_morpheus(ha);
7072 }
7073 }
7074
7075 /*
7076 * Initialize the card if it isn't already
7077 */
7078
7079 if (!(*ha->func.isinit) (ha)) {
7080 if (!(*ha->func.init) (ha)) {
7081 /*
7082 * Initialization failed
7083 */
7084 IPS_PRINTK(KERN_WARNING, pci_dev,
7085 "Unable to initialize controller\n");
7086 return ips_abort_init(ha, index);
7087 }
7088 }
7089
7090 *indexPtr = index;
7091 return SUCCESS;
7092}
7093
7094/*---------------------------------------------------------------------------*/
7095/* Routine Name: ips_init_phase2 */
7096/* */
7097/* Routine Description: */
7098/* Adapter Initialization Phase 2 */
7099/* */
7100/* Return Value: */
7101/* 0 if Successful, else non-zero */
7102/*---------------------------------------------------------------------------*/
7103static int
7104ips_init_phase2(int index)
7105{
7106 ips_ha_t *ha;
7107
7108 ha = ips_ha[index];
7109
7110 METHOD_TRACE("ips_init_phase2", 1);
7111 if (!ha->active) {
7112 ips_ha[index] = NULL;
7113 return -1;
7114 }
7115
7116 /* Install the interrupt handler */
7117 if (request_irq(ha->pcidev->irq, do_ipsintr, IRQF_SHARED, ips_name, ha)) {
7118 IPS_PRINTK(KERN_WARNING, ha->pcidev,
7119 "Unable to install interrupt handler\n");
7120 return ips_abort_init(ha, index);
7121 }
7122
7123 /*
7124 * Allocate a temporary SCB for initialization
7125 */
7126 ha->max_cmds = 1;
7127 if (!ips_allocatescbs(ha)) {
7128 IPS_PRINTK(KERN_WARNING, ha->pcidev,
7129 "Unable to allocate a CCB\n");
7130 free_irq(ha->pcidev->irq, ha);
7131 return ips_abort_init(ha, index);
7132 }
7133
7134 if (!ips_hainit(ha)) {
7135 IPS_PRINTK(KERN_WARNING, ha->pcidev,
7136 "Unable to initialize controller\n");
7137 free_irq(ha->pcidev->irq, ha);
7138 return ips_abort_init(ha, index);
7139 }
7140 /* Free the temporary SCB */
7141 ips_deallocatescbs(ha, 1);
7142
7143 /* allocate CCBs */
7144 if (!ips_allocatescbs(ha)) {
7145 IPS_PRINTK(KERN_WARNING, ha->pcidev,
7146 "Unable to allocate CCBs\n");
7147 free_irq(ha->pcidev->irq, ha);
7148 return ips_abort_init(ha, index);
7149 }
7150
7151 return SUCCESS;
7152}
7153
7154MODULE_LICENSE("GPL");
7155MODULE_DESCRIPTION("IBM ServeRAID Adapter Driver " IPS_VER_STRING);
7156MODULE_VERSION(IPS_VER_STRING);
7157
7158
7159/*
7160 * Overrides for Emacs so that we almost follow Linus's tabbing style.
7161 * Emacs will notice this stuff at the end of the file and automatically
7162 * adjust the settings for this buffer only. This must remain at the end
7163 * of the file.
7164 * ---------------------------------------------------------------------------
7165 * Local variables:
7166 * c-indent-level: 2
7167 * c-brace-imaginary-offset: 0
7168 * c-brace-offset: -2
7169 * c-argdecl-indent: 2
7170 * c-label-offset: -2
7171 * c-continued-statement-offset: 2
7172 * c-continued-brace-offset: 0
7173 * indent-tabs-mode: nil
7174 * tab-width: 8
7175 * End:
7176 */