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