]> git.proxmox.com Git - mirror_ubuntu-artful-kernel.git/blame - drivers/scsi/a100u2w.c
block_dev: Suppress bdev_cache_init() kmemleak warninig
[mirror_ubuntu-artful-kernel.git] / drivers / scsi / a100u2w.c
CommitLineData
1da177e4
LT
1/*
2 * Initio A100 device driver for Linux.
3 *
4 * Copyright (c) 1994-1998 Initio Corporation
5 * Copyright (c) 2003-2004 Christoph Hellwig
6 * All rights reserved.
7 *
8 * This program is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; either version 2, or (at your option)
11 * any later version.
12 *
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
17 *
18 * You should have received a copy of the GNU General Public License
19 * along with this program; see the file COPYING. If not, write to
20 * the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
21 *
1da177e4
LT
22 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
23 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
26 * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32 * SUCH DAMAGE.
33 */
34
35/*
36 * Revision History:
37 * 07/02/98 hl - v.91n Initial drivers.
38 * 09/14/98 hl - v1.01 Support new Kernel.
39 * 09/22/98 hl - v1.01a Support reset.
40 * 09/24/98 hl - v1.01b Fixed reset.
41 * 10/05/98 hl - v1.02 split the source code and release.
42 * 12/19/98 bv - v1.02a Use spinlocks for 2.1.95 and up
43 * 01/31/99 bv - v1.02b Use mdelay instead of waitForPause
44 * 08/08/99 bv - v1.02c Use waitForPause again.
45 * 06/25/02 Doug Ledford <dledford@redhat.com> - v1.02d
46 * - Remove limit on number of controllers
47 * - Port to DMA mapping API
48 * - Clean up interrupt handler registration
49 * - Fix memory leaks
50 * - Fix allocation of scsi host structs and private data
51 * 11/18/03 Christoph Hellwig <hch@lst.de>
52 * - Port to new probing API
53 * - Fix some more leaks in init failure cases
54 * 9/28/04 Christoph Hellwig <hch@lst.de>
55 * - merge the two source files
56 * - remove internal queueing code
fa195afe 57 * 14/06/07 Alan Cox <alan@lxorguk.ukuu.org.uk>
4023c474 58 * - Grand cleanup and Linuxisation
1da177e4
LT
59 */
60
61#include <linux/module.h>
62#include <linux/errno.h>
63#include <linux/delay.h>
64#include <linux/interrupt.h>
65#include <linux/pci.h>
66#include <linux/init.h>
67#include <linux/blkdev.h>
68#include <linux/spinlock.h>
69#include <linux/kernel.h>
70#include <linux/string.h>
71#include <linux/ioport.h>
910638ae 72#include <linux/dma-mapping.h>
1da177e4
LT
73
74#include <asm/io.h>
75#include <asm/irq.h>
76
77#include <scsi/scsi.h>
78#include <scsi/scsi_cmnd.h>
79#include <scsi/scsi_device.h>
80#include <scsi/scsi_host.h>
81
82#include "a100u2w.h"
83
84
4023c474
AC
85static struct orc_scb *__orc_alloc_scb(struct orc_host * host);
86static void inia100_scb_handler(struct orc_host *host, struct orc_scb *scb);
1da177e4 87
4023c474 88static struct orc_nvram nvram, *nvramp = &nvram;
1da177e4 89
4023c474 90static u8 default_nvram[64] =
1da177e4
LT
91{
92/*----------header -------------*/
93 0x01, /* 0x00: Sub System Vendor ID 0 */
94 0x11, /* 0x01: Sub System Vendor ID 1 */
95 0x60, /* 0x02: Sub System ID 0 */
96 0x10, /* 0x03: Sub System ID 1 */
97 0x00, /* 0x04: SubClass */
98 0x01, /* 0x05: Vendor ID 0 */
99 0x11, /* 0x06: Vendor ID 1 */
100 0x60, /* 0x07: Device ID 0 */
101 0x10, /* 0x08: Device ID 1 */
102 0x00, /* 0x09: Reserved */
103 0x00, /* 0x0A: Reserved */
104 0x01, /* 0x0B: Revision of Data Structure */
105 /* -- Host Adapter Structure --- */
106 0x01, /* 0x0C: Number Of SCSI Channel */
107 0x01, /* 0x0D: BIOS Configuration 1 */
108 0x00, /* 0x0E: BIOS Configuration 2 */
109 0x00, /* 0x0F: BIOS Configuration 3 */
110 /* --- SCSI Channel 0 Configuration --- */
111 0x07, /* 0x10: H/A ID */
112 0x83, /* 0x11: Channel Configuration */
113 0x20, /* 0x12: MAX TAG per target */
114 0x0A, /* 0x13: SCSI Reset Recovering time */
115 0x00, /* 0x14: Channel Configuration4 */
116 0x00, /* 0x15: Channel Configuration5 */
117 /* SCSI Channel 0 Target Configuration */
118 /* 0x16-0x25 */
119 0xC8, 0xC8, 0xC8, 0xC8, 0xC8, 0xC8, 0xC8, 0xC8,
120 0xC8, 0xC8, 0xC8, 0xC8, 0xC8, 0xC8, 0xC8, 0xC8,
121 /* --- SCSI Channel 1 Configuration --- */
122 0x07, /* 0x26: H/A ID */
123 0x83, /* 0x27: Channel Configuration */
124 0x20, /* 0x28: MAX TAG per target */
125 0x0A, /* 0x29: SCSI Reset Recovering time */
126 0x00, /* 0x2A: Channel Configuration4 */
127 0x00, /* 0x2B: Channel Configuration5 */
128 /* SCSI Channel 1 Target Configuration */
129 /* 0x2C-0x3B */
130 0xC8, 0xC8, 0xC8, 0xC8, 0xC8, 0xC8, 0xC8, 0xC8,
131 0xC8, 0xC8, 0xC8, 0xC8, 0xC8, 0xC8, 0xC8, 0xC8,
132 0x00, /* 0x3C: Reserved */
133 0x00, /* 0x3D: Reserved */
134 0x00, /* 0x3E: Reserved */
135 0x00 /* 0x3F: Checksum */
136};
137
138
4023c474 139static u8 wait_chip_ready(struct orc_host * host)
1da177e4
LT
140{
141 int i;
142
143 for (i = 0; i < 10; i++) { /* Wait 1 second for report timeout */
4023c474 144 if (inb(host->base + ORC_HCTRL) & HOSTSTOP) /* Wait HOSTSTOP set */
1da177e4 145 return 1;
4023c474 146 mdelay(100);
1da177e4
LT
147 }
148 return 0;
149}
150
4023c474 151static u8 wait_firmware_ready(struct orc_host * host)
1da177e4
LT
152{
153 int i;
154
155 for (i = 0; i < 10; i++) { /* Wait 1 second for report timeout */
4023c474 156 if (inb(host->base + ORC_HSTUS) & RREADY) /* Wait READY set */
1da177e4 157 return 1;
4023c474 158 mdelay(100); /* wait 100ms before try again */
1da177e4
LT
159 }
160 return 0;
161}
162
163/***************************************************************************/
4023c474 164static u8 wait_scsi_reset_done(struct orc_host * host)
1da177e4
LT
165{
166 int i;
167
168 for (i = 0; i < 10; i++) { /* Wait 1 second for report timeout */
4023c474 169 if (!(inb(host->base + ORC_HCTRL) & SCSIRST)) /* Wait SCSIRST done */
1da177e4 170 return 1;
4023c474 171 mdelay(100); /* wait 100ms before try again */
1da177e4
LT
172 }
173 return 0;
174}
175
176/***************************************************************************/
4023c474 177static u8 wait_HDO_off(struct orc_host * host)
1da177e4
LT
178{
179 int i;
180
181 for (i = 0; i < 10; i++) { /* Wait 1 second for report timeout */
4023c474 182 if (!(inb(host->base + ORC_HCTRL) & HDO)) /* Wait HDO off */
1da177e4 183 return 1;
4023c474 184 mdelay(100); /* wait 100ms before try again */
1da177e4
LT
185 }
186 return 0;
187}
188
189/***************************************************************************/
4023c474 190static u8 wait_hdi_set(struct orc_host * host, u8 * data)
1da177e4
LT
191{
192 int i;
193
194 for (i = 0; i < 10; i++) { /* Wait 1 second for report timeout */
4023c474 195 if ((*data = inb(host->base + ORC_HSTUS)) & HDI)
1da177e4 196 return 1; /* Wait HDI set */
4023c474 197 mdelay(100); /* wait 100ms before try again */
1da177e4
LT
198 }
199 return 0;
200}
201
202/***************************************************************************/
4023c474 203static unsigned short orc_read_fwrev(struct orc_host * host)
1da177e4 204{
4023c474
AC
205 u16 version;
206 u8 data;
207
208 outb(ORC_CMD_VERSION, host->base + ORC_HDATA);
209 outb(HDO, host->base + ORC_HCTRL);
210 if (wait_HDO_off(host) == 0) /* Wait HDO off */
1da177e4
LT
211 return 0;
212
4023c474 213 if (wait_hdi_set(host, &data) == 0) /* Wait HDI set */
1da177e4 214 return 0;
4023c474
AC
215 version = inb(host->base + ORC_HDATA);
216 outb(data, host->base + ORC_HSTUS); /* Clear HDI */
1da177e4 217
4023c474 218 if (wait_hdi_set(host, &data) == 0) /* Wait HDI set */
1da177e4 219 return 0;
4023c474
AC
220 version |= inb(host->base + ORC_HDATA) << 8;
221 outb(data, host->base + ORC_HSTUS); /* Clear HDI */
1da177e4 222
4023c474 223 return version;
1da177e4
LT
224}
225
226/***************************************************************************/
4023c474 227static u8 orc_nv_write(struct orc_host * host, unsigned char address, unsigned char value)
1da177e4 228{
4023c474
AC
229 outb(ORC_CMD_SET_NVM, host->base + ORC_HDATA); /* Write command */
230 outb(HDO, host->base + ORC_HCTRL);
231 if (wait_HDO_off(host) == 0) /* Wait HDO off */
1da177e4
LT
232 return 0;
233
4023c474
AC
234 outb(address, host->base + ORC_HDATA); /* Write address */
235 outb(HDO, host->base + ORC_HCTRL);
236 if (wait_HDO_off(host) == 0) /* Wait HDO off */
1da177e4
LT
237 return 0;
238
4023c474
AC
239 outb(value, host->base + ORC_HDATA); /* Write value */
240 outb(HDO, host->base + ORC_HCTRL);
241 if (wait_HDO_off(host) == 0) /* Wait HDO off */
1da177e4
LT
242 return 0;
243
244 return 1;
245}
246
247/***************************************************************************/
4023c474 248static u8 orc_nv_read(struct orc_host * host, u8 address, u8 *ptr)
1da177e4 249{
4023c474 250 unsigned char data;
1da177e4 251
4023c474
AC
252 outb(ORC_CMD_GET_NVM, host->base + ORC_HDATA); /* Write command */
253 outb(HDO, host->base + ORC_HCTRL);
254 if (wait_HDO_off(host) == 0) /* Wait HDO off */
1da177e4
LT
255 return 0;
256
4023c474
AC
257 outb(address, host->base + ORC_HDATA); /* Write address */
258 outb(HDO, host->base + ORC_HCTRL);
259 if (wait_HDO_off(host) == 0) /* Wait HDO off */
1da177e4
LT
260 return 0;
261
4023c474 262 if (wait_hdi_set(host, &data) == 0) /* Wait HDI set */
1da177e4 263 return 0;
4023c474
AC
264 *ptr = inb(host->base + ORC_HDATA);
265 outb(data, host->base + ORC_HSTUS); /* Clear HDI */
1da177e4
LT
266
267 return 1;
4023c474 268
1da177e4
LT
269}
270
4023c474
AC
271/**
272 * orc_exec_sb - Queue an SCB with the HA
273 * @host: host adapter the SCB belongs to
274 * @scb: SCB to queue for execution
275 */
276
277static void orc_exec_scb(struct orc_host * host, struct orc_scb * scb)
1da177e4 278{
4023c474
AC
279 scb->status = ORCSCB_POST;
280 outb(scb->scbidx, host->base + ORC_PQUEUE);
1da177e4
LT
281}
282
283
4023c474
AC
284/**
285 * se2_rd_all - read SCSI parameters from EEPROM
286 * @host: Host whose EEPROM is being loaded
287 *
288 * Read SCSI H/A configuration parameters from serial EEPROM
289 */
290
291static int se2_rd_all(struct orc_host * host)
1da177e4
LT
292{
293 int i;
4023c474 294 u8 *np, chksum = 0;
1da177e4 295
4023c474 296 np = (u8 *) nvramp;
1da177e4 297 for (i = 0; i < 64; i++, np++) { /* <01> */
4023c474 298 if (orc_nv_read(host, (u8) i, np) == 0)
1da177e4 299 return -1;
1da177e4
LT
300 }
301
4023c474
AC
302 /*------ Is ckecksum ok ? ------*/
303 np = (u8 *) nvramp;
1da177e4
LT
304 for (i = 0; i < 63; i++)
305 chksum += *np++;
306
4023c474 307 if (nvramp->CheckSum != (u8) chksum)
1da177e4
LT
308 return -1;
309 return 1;
310}
311
4023c474
AC
312/**
313 * se2_update_all - update the EEPROM
314 * @host: Host whose EEPROM is being updated
315 *
316 * Update changed bytes in the EEPROM image.
317 */
318
319static void se2_update_all(struct orc_host * host)
1da177e4
LT
320{ /* setup default pattern */
321 int i;
4023c474 322 u8 *np, *np1, chksum = 0;
1da177e4
LT
323
324 /* Calculate checksum first */
4023c474 325 np = (u8 *) default_nvram;
1da177e4
LT
326 for (i = 0; i < 63; i++)
327 chksum += *np++;
328 *np = chksum;
329
4023c474
AC
330 np = (u8 *) default_nvram;
331 np1 = (u8 *) nvramp;
1da177e4 332 for (i = 0; i < 64; i++, np++, np1++) {
4023c474
AC
333 if (*np != *np1)
334 orc_nv_write(host, (u8) i, *np);
1da177e4 335 }
1da177e4
LT
336}
337
4023c474
AC
338/**
339 * read_eeprom - load EEPROM
340 * @host: Host EEPROM to read
341 *
342 * Read the EEPROM for a given host. If it is invalid or fails
343 * the restore the defaults and use them.
344 */
345
346static void read_eeprom(struct orc_host * host)
1da177e4 347{
4023c474
AC
348 if (se2_rd_all(host) != 1) {
349 se2_update_all(host); /* setup default pattern */
350 se2_rd_all(host); /* load again */
1da177e4
LT
351 }
352}
353
354
4023c474
AC
355/**
356 * orc_load_firmware - initialise firmware
357 * @host: Host to set up
358 *
359 * Load the firmware from the EEPROM into controller SRAM. This
360 * is basically a 4K block copy and then a 4K block read to check
361 * correctness. The rest is convulted by the indirect interfaces
362 * in the hardware
363 */
364
365static u8 orc_load_firmware(struct orc_host * host)
1da177e4 366{
4023c474
AC
367 u32 data32;
368 u16 bios_addr;
369 u16 i;
370 u8 *data32_ptr, data;
371
372
373 /* Set up the EEPROM for access */
374
375 data = inb(host->base + ORC_GCFG);
376 outb(data | EEPRG, host->base + ORC_GCFG); /* Enable EEPROM programming */
377 outb(0x00, host->base + ORC_EBIOSADR2);
378 outw(0x0000, host->base + ORC_EBIOSADR0);
379 if (inb(host->base + ORC_EBIOSDATA) != 0x55) {
380 outb(data, host->base + ORC_GCFG); /* Disable EEPROM programming */
1da177e4
LT
381 return 0;
382 }
4023c474
AC
383 outw(0x0001, host->base + ORC_EBIOSADR0);
384 if (inb(host->base + ORC_EBIOSDATA) != 0xAA) {
385 outb(data, host->base + ORC_GCFG); /* Disable EEPROM programming */
1da177e4
LT
386 return 0;
387 }
4023c474
AC
388
389 outb(PRGMRST | DOWNLOAD, host->base + ORC_RISCCTL); /* Enable SRAM programming */
390 data32_ptr = (u8 *) & data32;
987ff954 391 data32 = cpu_to_le32(0); /* Initial FW address to 0 */
4023c474
AC
392 outw(0x0010, host->base + ORC_EBIOSADR0);
393 *data32_ptr = inb(host->base + ORC_EBIOSDATA); /* Read from BIOS */
394 outw(0x0011, host->base + ORC_EBIOSADR0);
395 *(data32_ptr + 1) = inb(host->base + ORC_EBIOSDATA); /* Read from BIOS */
396 outw(0x0012, host->base + ORC_EBIOSADR0);
397 *(data32_ptr + 2) = inb(host->base + ORC_EBIOSDATA); /* Read from BIOS */
398 outw(*(data32_ptr + 2), host->base + ORC_EBIOSADR2);
987ff954 399 outl(le32_to_cpu(data32), host->base + ORC_FWBASEADR); /* Write FW address */
4023c474
AC
400
401 /* Copy the code from the BIOS to the SRAM */
402
56d387ec 403 udelay(500); /* Required on Sun Ultra 5 ... 350 -> failures */
987ff954 404 bios_addr = (u16) le32_to_cpu(data32); /* FW code locate at BIOS address + ? */
4023c474 405 for (i = 0, data32_ptr = (u8 *) & data32; /* Download the code */
1da177e4 406 i < 0x1000; /* Firmware code size = 4K */
4023c474
AC
407 i++, bios_addr++) {
408 outw(bios_addr, host->base + ORC_EBIOSADR0);
409 *data32_ptr++ = inb(host->base + ORC_EBIOSDATA); /* Read from BIOS */
1da177e4 410 if ((i % 4) == 3) {
987ff954 411 outl(le32_to_cpu(data32), host->base + ORC_RISCRAM); /* Write every 4 bytes */
4023c474 412 data32_ptr = (u8 *) & data32;
1da177e4
LT
413 }
414 }
415
4023c474
AC
416 /* Go back and check they match */
417
418 outb(PRGMRST | DOWNLOAD, host->base + ORC_RISCCTL); /* Reset program count 0 */
b595076a 419 bios_addr -= 0x1000; /* Reset the BIOS address */
4023c474 420 for (i = 0, data32_ptr = (u8 *) & data32; /* Check the code */
1da177e4 421 i < 0x1000; /* Firmware code size = 4K */
4023c474
AC
422 i++, bios_addr++) {
423 outw(bios_addr, host->base + ORC_EBIOSADR0);
424 *data32_ptr++ = inb(host->base + ORC_EBIOSDATA); /* Read from BIOS */
1da177e4 425 if ((i % 4) == 3) {
987ff954 426 if (inl(host->base + ORC_RISCRAM) != le32_to_cpu(data32)) {
4023c474
AC
427 outb(PRGMRST, host->base + ORC_RISCCTL); /* Reset program to 0 */
428 outb(data, host->base + ORC_GCFG); /*Disable EEPROM programming */
1da177e4
LT
429 return 0;
430 }
4023c474 431 data32_ptr = (u8 *) & data32;
1da177e4
LT
432 }
433 }
4023c474
AC
434
435 /* Success */
436 outb(PRGMRST, host->base + ORC_RISCCTL); /* Reset program to 0 */
437 outb(data, host->base + ORC_GCFG); /* Disable EEPROM programming */
1da177e4
LT
438 return 1;
439}
440
441/***************************************************************************/
4023c474 442static void setup_SCBs(struct orc_host * host)
1da177e4 443{
4023c474 444 struct orc_scb *scb;
1da177e4 445 int i;
4023c474
AC
446 struct orc_extended_scb *escb;
447 dma_addr_t escb_phys;
1da177e4 448
4023c474
AC
449 /* Setup SCB base and SCB Size registers */
450 outb(ORC_MAXQUEUE, host->base + ORC_SCBSIZE); /* Total number of SCBs */
451 /* SCB base address 0 */
452 outl(host->scb_phys, host->base + ORC_SCBBASE0);
453 /* SCB base address 1 */
454 outl(host->scb_phys, host->base + ORC_SCBBASE1);
1da177e4
LT
455
456 /* setup scatter list address with one buffer */
4023c474
AC
457 scb = host->scb_virt;
458 escb = host->escb_virt;
1da177e4
LT
459
460 for (i = 0; i < ORC_MAXQUEUE; i++) {
4023c474 461 escb_phys = (host->escb_phys + (sizeof(struct orc_extended_scb) * i));
987ff954
MP
462 scb->sg_addr = cpu_to_le32((u32) escb_phys);
463 scb->sense_addr = cpu_to_le32((u32) escb_phys);
4023c474
AC
464 scb->escb = escb;
465 scb->scbidx = i;
466 scb++;
467 escb++;
1da177e4 468 }
1da177e4
LT
469}
470
4023c474
AC
471/**
472 * init_alloc_map - initialise allocation map
473 * @host: host map to configure
474 *
475 * Initialise the allocation maps for this device. If the device
476 * is not quiescent the caller must hold the allocation lock
477 */
478
479static void init_alloc_map(struct orc_host * host)
1da177e4 480{
4023c474 481 u8 i, j;
1da177e4
LT
482
483 for (i = 0; i < MAX_CHANNELS; i++) {
484 for (j = 0; j < 8; j++) {
4023c474 485 host->allocation_map[i][j] = 0xffffffff;
1da177e4
LT
486 }
487 }
488}
489
4023c474
AC
490/**
491 * init_orchid - initialise the host adapter
492 * @host:host adapter to initialise
493 *
3ad2f3fb 494 * Initialise the controller and if necessary load the firmware.
4023c474
AC
495 *
496 * Returns -1 if the initialisation fails.
497 */
498
499static int init_orchid(struct orc_host * host)
1da177e4 500{
4023c474
AC
501 u8 *ptr;
502 u16 revision;
503 u8 i;
504
505 init_alloc_map(host);
506 outb(0xFF, host->base + ORC_GIMSK); /* Disable all interrupts */
507
508 if (inb(host->base + ORC_HSTUS) & RREADY) { /* Orchid is ready */
509 revision = orc_read_fwrev(host);
1da177e4 510 if (revision == 0xFFFF) {
4023c474
AC
511 outb(DEVRST, host->base + ORC_HCTRL); /* Reset Host Adapter */
512 if (wait_chip_ready(host) == 0)
513 return -1;
514 orc_load_firmware(host); /* Download FW */
515 setup_SCBs(host); /* Setup SCB base and SCB Size registers */
516 outb(0x00, host->base + ORC_HCTRL); /* clear HOSTSTOP */
517 if (wait_firmware_ready(host) == 0)
518 return -1;
1da177e4
LT
519 /* Wait for firmware ready */
520 } else {
4023c474 521 setup_SCBs(host); /* Setup SCB base and SCB Size registers */
1da177e4
LT
522 }
523 } else { /* Orchid is not Ready */
4023c474
AC
524 outb(DEVRST, host->base + ORC_HCTRL); /* Reset Host Adapter */
525 if (wait_chip_ready(host) == 0)
526 return -1;
527 orc_load_firmware(host); /* Download FW */
528 setup_SCBs(host); /* Setup SCB base and SCB Size registers */
529 outb(HDO, host->base + ORC_HCTRL); /* Do Hardware Reset & */
1da177e4
LT
530
531 /* clear HOSTSTOP */
4023c474
AC
532 if (wait_firmware_ready(host) == 0) /* Wait for firmware ready */
533 return -1;
1da177e4
LT
534 }
535
4023c474
AC
536 /* Load an EEProm copy into RAM */
537 /* Assumes single threaded at this point */
538 read_eeprom(host);
1da177e4 539
4023c474
AC
540 if (nvramp->revision != 1)
541 return -1;
1da177e4 542
4023c474
AC
543 host->scsi_id = nvramp->scsi_id;
544 host->BIOScfg = nvramp->BIOSConfig1;
545 host->max_targets = MAX_TARGETS;
546 ptr = (u8 *) & (nvramp->Target00Config);
547 for (i = 0; i < 16; ptr++, i++) {
548 host->target_flag[i] = *ptr;
549 host->max_tags[i] = ORC_MAXTAGS;
1da177e4 550 }
4023c474
AC
551
552 if (nvramp->SCSI0Config & NCC_BUSRESET)
553 host->flags |= HCF_SCSI_RESET;
554 outb(0xFB, host->base + ORC_GIMSK); /* enable RP FIFO interrupt */
555 return 0;
1da177e4
LT
556}
557
4023c474
AC
558/**
559 * orc_reset_scsi_bus - perform bus reset
560 * @host: host being reset
561 *
562 * Perform a full bus reset on the adapter.
563 */
564
565static int orc_reset_scsi_bus(struct orc_host * host)
1da177e4 566{ /* I need Host Control Block Information */
4023c474 567 unsigned long flags;
1da177e4 568
4023c474 569 spin_lock_irqsave(&host->allocation_lock, flags);
1da177e4 570
4023c474 571 init_alloc_map(host);
1da177e4 572 /* reset scsi bus */
4023c474
AC
573 outb(SCSIRST, host->base + ORC_HCTRL);
574 /* FIXME: We can spend up to a second with the lock held and
575 interrupts off here */
576 if (wait_scsi_reset_done(host) == 0) {
577 spin_unlock_irqrestore(&host->allocation_lock, flags);
1da177e4
LT
578 return FAILED;
579 } else {
4023c474 580 spin_unlock_irqrestore(&host->allocation_lock, flags);
1da177e4
LT
581 return SUCCESS;
582 }
583}
584
4023c474
AC
585/**
586 * orc_device_reset - device reset handler
587 * @host: host to reset
588 * @cmd: command causing the reset
589 * @target; target device
590 *
591 * Reset registers, reset a hanging bus and kill active and disconnected
592 * commands for target w/o soft reset
593 */
594
595static int orc_device_reset(struct orc_host * host, struct scsi_cmnd *cmd, unsigned int target)
1da177e4 596{ /* I need Host Control Block Information */
4023c474
AC
597 struct orc_scb *scb;
598 struct orc_extended_scb *escb;
599 struct orc_scb *host_scb;
600 u8 i;
601 unsigned long flags;
1da177e4 602
4023c474
AC
603 spin_lock_irqsave(&(host->allocation_lock), flags);
604 scb = (struct orc_scb *) NULL;
605 escb = (struct orc_extended_scb *) NULL;
1da177e4
LT
606
607 /* setup scatter list address with one buffer */
4023c474 608 host_scb = host->scb_virt;
1da177e4 609
4023c474
AC
610 /* FIXME: is this safe if we then fail to issue the reset or race
611 a completion ? */
612 init_alloc_map(host);
613
614 /* Find the scb corresponding to the command */
1da177e4 615 for (i = 0; i < ORC_MAXQUEUE; i++) {
4023c474
AC
616 escb = host_scb->escb;
617 if (host_scb->status && escb->srb == cmd)
1da177e4 618 break;
4023c474 619 host_scb++;
1da177e4
LT
620 }
621
622 if (i == ORC_MAXQUEUE) {
4023c474
AC
623 printk(KERN_ERR "Unable to Reset - No SCB Found\n");
624 spin_unlock_irqrestore(&(host->allocation_lock), flags);
1da177e4
LT
625 return FAILED;
626 }
4023c474
AC
627
628 /* Allocate a new SCB for the reset command to the firmware */
629 if ((scb = __orc_alloc_scb(host)) == NULL) {
630 /* Can't happen.. */
631 spin_unlock_irqrestore(&(host->allocation_lock), flags);
1da177e4
LT
632 return FAILED;
633 }
4023c474 634
89546deb 635 /* Reset device is handled by the firmware, we fill in an SCB and
4023c474
AC
636 fire it at the controller, it does the rest */
637 scb->opcode = ORC_BUSDEVRST;
638 scb->target = target;
639 scb->hastat = 0;
640 scb->tastat = 0;
641 scb->status = 0x0;
642 scb->link = 0xFF;
643 scb->reserved0 = 0;
644 scb->reserved1 = 0;
987ff954
MP
645 scb->xferlen = cpu_to_le32(0);
646 scb->sg_len = cpu_to_le32(0);
4023c474
AC
647
648 escb->srb = NULL;
649 escb->srb = cmd;
650 orc_exec_scb(host, scb); /* Start execute SCB */
651 spin_unlock_irqrestore(&host->allocation_lock, flags);
1da177e4
LT
652 return SUCCESS;
653}
654
4023c474
AC
655/**
656 * __orc_alloc_scb - allocate an SCB
657 * @host: host to allocate from
658 *
659 * Allocate an SCB and return a pointer to the SCB object. NULL
660 * is returned if no SCB is free. The caller must already hold
661 * the allocator lock at this point.
662 */
1da177e4 663
4023c474
AC
664
665static struct orc_scb *__orc_alloc_scb(struct orc_host * host)
1da177e4 666{
4023c474
AC
667 u8 channel;
668 unsigned long idx;
669 u8 index;
670 u8 i;
1da177e4 671
4023c474 672 channel = host->index;
1da177e4
LT
673 for (i = 0; i < 8; i++) {
674 for (index = 0; index < 32; index++) {
4023c474
AC
675 if ((host->allocation_map[channel][i] >> index) & 0x01) {
676 host->allocation_map[channel][i] &= ~(1 << index);
28aef2f7
AM
677 idx = index + 32 * i;
678 /*
679 * Translate the index to a structure instance
680 */
681 return host->scb_virt + idx;
1da177e4
LT
682 }
683 }
1da177e4 684 }
4023c474 685 return NULL;
1da177e4
LT
686}
687
4023c474
AC
688/**
689 * orc_alloc_scb - allocate an SCB
690 * @host: host to allocate from
691 *
692 * Allocate an SCB and return a pointer to the SCB object. NULL
693 * is returned if no SCB is free.
694 */
695
696static struct orc_scb *orc_alloc_scb(struct orc_host * host)
1da177e4 697{
4023c474
AC
698 struct orc_scb *scb;
699 unsigned long flags;
1da177e4 700
4023c474
AC
701 spin_lock_irqsave(&host->allocation_lock, flags);
702 scb = __orc_alloc_scb(host);
703 spin_unlock_irqrestore(&host->allocation_lock, flags);
704 return scb;
1da177e4
LT
705}
706
4023c474
AC
707/**
708 * orc_release_scb - release an SCB
709 * @host: host owning the SCB
710 * @scb: SCB that is now free
711 *
712 * Called to return a completed SCB to the allocation pool. Before
713 * calling the SCB must be out of use on both the host and the HA.
714 */
1da177e4 715
4023c474 716static void orc_release_scb(struct orc_host *host, struct orc_scb *scb)
1da177e4 717{
4023c474
AC
718 unsigned long flags;
719 u8 index, i, channel;
720
721 spin_lock_irqsave(&(host->allocation_lock), flags);
722 channel = host->index; /* Channel */
723 index = scb->scbidx;
724 i = index / 32;
725 index %= 32;
726 host->allocation_map[channel][i] |= (1 << index);
727 spin_unlock_irqrestore(&(host->allocation_lock), flags);
1da177e4
LT
728}
729
4023c474
AC
730/**
731 * orchid_abort_scb - abort a command
732 *
733 * Abort a queued command that has been passed to the firmware layer
734 * if possible. This is all handled by the firmware. We aks the firmware
735 * and it either aborts the command or fails
736 */
737
738static int orchid_abort_scb(struct orc_host * host, struct orc_scb * scb)
1da177e4 739{
4023c474 740 unsigned char data, status;
1da177e4 741
4023c474
AC
742 outb(ORC_CMD_ABORT_SCB, host->base + ORC_HDATA); /* Write command */
743 outb(HDO, host->base + ORC_HCTRL);
744 if (wait_HDO_off(host) == 0) /* Wait HDO off */
1da177e4
LT
745 return 0;
746
4023c474
AC
747 outb(scb->scbidx, host->base + ORC_HDATA); /* Write address */
748 outb(HDO, host->base + ORC_HCTRL);
749 if (wait_HDO_off(host) == 0) /* Wait HDO off */
1da177e4
LT
750 return 0;
751
4023c474 752 if (wait_hdi_set(host, &data) == 0) /* Wait HDI set */
1da177e4 753 return 0;
4023c474
AC
754 status = inb(host->base + ORC_HDATA);
755 outb(data, host->base + ORC_HSTUS); /* Clear HDI */
1da177e4 756
4023c474 757 if (status == 1) /* 0 - Successfully */
1da177e4
LT
758 return 0; /* 1 - Fail */
759 return 1;
760}
761
4023c474 762static int inia100_abort_cmd(struct orc_host * host, struct scsi_cmnd *cmd)
1da177e4 763{
4023c474
AC
764 struct orc_extended_scb *escb;
765 struct orc_scb *scb;
766 u8 i;
767 unsigned long flags;
768
769 spin_lock_irqsave(&(host->allocation_lock), flags);
1da177e4 770
4023c474 771 scb = host->scb_virt;
1da177e4 772
4023c474
AC
773 /* Walk the queue until we find the SCB that belongs to the command
774 block. This isn't a performance critical path so a walk in the park
775 here does no harm */
1da177e4 776
4023c474
AC
777 for (i = 0; i < ORC_MAXQUEUE; i++, scb++) {
778 escb = scb->escb;
779 if (scb->status && escb->srb == cmd) {
780 if (scb->tag_msg == 0) {
781 goto out;
1da177e4 782 } else {
4023c474
AC
783 /* Issue an ABORT to the firmware */
784 if (orchid_abort_scb(host, scb)) {
785 escb->srb = NULL;
786 spin_unlock_irqrestore(&host->allocation_lock, flags);
1da177e4 787 return SUCCESS;
4023c474
AC
788 } else
789 goto out;
1da177e4
LT
790 }
791 }
792 }
4023c474
AC
793out:
794 spin_unlock_irqrestore(&host->allocation_lock, flags);
1da177e4
LT
795 return FAILED;
796}
797
4023c474
AC
798/**
799 * orc_interrupt - IRQ processing
800 * @host: Host causing the interrupt
801 *
802 * This function is called from the IRQ handler and protected
803 * by the host lock. While the controller reports that there are
804 * scb's for processing we pull them off the controller, turn the
805 * index into a host address pointer to the scb and call the scb
806 * handler.
807 *
808 * Returns IRQ_HANDLED if any SCBs were processed, IRQ_NONE otherwise
809 */
810
811static irqreturn_t orc_interrupt(struct orc_host * host)
1da177e4 812{
4023c474
AC
813 u8 scb_index;
814 struct orc_scb *scb;
1da177e4 815
4023c474
AC
816 /* Check if we have an SCB queued for servicing */
817 if (inb(host->base + ORC_RQUEUECNT) == 0)
818 return IRQ_NONE;
1da177e4 819
1da177e4 820 do {
4023c474
AC
821 /* Get the SCB index of the SCB to service */
822 scb_index = inb(host->base + ORC_RQUEUE);
823
824 /* Translate it back to a host pointer */
825 scb = (struct orc_scb *) ((unsigned long) host->scb_virt + (unsigned long) (sizeof(struct orc_scb) * scb_index));
826 scb->status = 0x0;
827 /* Process the SCB */
828 inia100_scb_handler(host, scb);
829 } while (inb(host->base + ORC_RQUEUECNT));
830 return IRQ_HANDLED;
1da177e4
LT
831} /* End of I1060Interrupt() */
832
4023c474
AC
833/**
834 * inia100_build_scb - build SCB
835 * @host: host owing the control block
836 * @scb: control block to use
837 * @cmd: Mid layer command
838 *
839 * Build a host adapter control block from the SCSI mid layer command
840 */
841
3a628b0f 842static int inia100_build_scb(struct orc_host * host, struct orc_scb * scb, struct scsi_cmnd * cmd)
1da177e4 843{ /* Create corresponding SCB */
985c0a72 844 struct scatterlist *sg;
4023c474 845 struct orc_sgent *sgent; /* Pointer to SG list */
1da177e4 846 int i, count_sg;
4023c474
AC
847 struct orc_extended_scb *escb;
848
849 /* Links between the escb, scb and Linux scsi midlayer cmd */
850 escb = scb->escb;
851 escb->srb = cmd;
852 sgent = NULL;
853
854 /* Set up the SCB to do a SCSI command block */
855 scb->opcode = ORC_EXECSCSI;
856 scb->flags = SCF_NO_DCHK; /* Clear done bit */
857 scb->target = cmd->device->id;
858 scb->lun = cmd->device->lun;
859 scb->reserved0 = 0;
860 scb->reserved1 = 0;
987ff954 861 scb->sg_len = cpu_to_le32(0);
4023c474 862
987ff954 863 scb->xferlen = cpu_to_le32((u32) scsi_bufflen(cmd));
4023c474
AC
864 sgent = (struct orc_sgent *) & escb->sglist[0];
865
866 count_sg = scsi_dma_map(cmd);
3a628b0f
MP
867 if (count_sg < 0)
868 return count_sg;
a5db3341 869 BUG_ON(count_sg > TOTAL_SG_ENTRY);
4023c474
AC
870
871 /* Build the scatter gather lists */
985c0a72 872 if (count_sg) {
987ff954 873 scb->sg_len = cpu_to_le32((u32) (count_sg * 8));
4023c474 874 scsi_for_each_sg(cmd, sg, count_sg, i) {
987ff954
MP
875 sgent->base = cpu_to_le32((u32) sg_dma_address(sg));
876 sgent->length = cpu_to_le32((u32) sg_dma_len(sg));
4023c474 877 sgent++;
1da177e4 878 }
985c0a72 879 } else {
987ff954
MP
880 scb->sg_len = cpu_to_le32(0);
881 sgent->base = cpu_to_le32(0);
882 sgent->length = cpu_to_le32(0);
1da177e4 883 }
987ff954 884 scb->sg_addr = (u32) scb->sense_addr; /* sense_addr is already little endian */
4023c474
AC
885 scb->hastat = 0;
886 scb->tastat = 0;
887 scb->link = 0xFF;
888 scb->sense_len = SENSE_SIZE;
889 scb->cdb_len = cmd->cmd_len;
890 if (scb->cdb_len >= IMAX_CDB) {
891 printk("max cdb length= %x\b", cmd->cmd_len);
892 scb->cdb_len = IMAX_CDB;
1da177e4 893 }
4023c474
AC
894 scb->ident = cmd->device->lun | DISC_ALLOW;
895 if (cmd->device->tagged_supported) { /* Tag Support */
896 scb->tag_msg = SIMPLE_QUEUE_TAG; /* Do simple tag only */
1da177e4 897 } else {
4023c474 898 scb->tag_msg = 0; /* No tag support */
1da177e4 899 }
64a87b24 900 memcpy(scb->cdb, cmd->cmnd, scb->cdb_len);
3a628b0f 901 return 0;
1da177e4
LT
902}
903
4023c474
AC
904/**
905 * inia100_queue - queue command with host
906 * @cmd: Command block
907 * @done: Completion function
908 *
909 * Called by the mid layer to queue a command. Process the command
910 * block, build the host specific scb structures and if there is room
911 * queue the command down to the controller
912 */
913
f281233d 914static int inia100_queue_lck(struct scsi_cmnd * cmd, void (*done) (struct scsi_cmnd *))
1da177e4 915{
4023c474
AC
916 struct orc_scb *scb;
917 struct orc_host *host; /* Point to Host adapter control block */
1da177e4 918
4023c474
AC
919 host = (struct orc_host *) cmd->device->host->hostdata;
920 cmd->scsi_done = done;
1da177e4 921 /* Get free SCSI control block */
4023c474 922 if ((scb = orc_alloc_scb(host)) == NULL)
1da177e4
LT
923 return SCSI_MLQUEUE_HOST_BUSY;
924
3a628b0f
MP
925 if (inia100_build_scb(host, scb, cmd)) {
926 orc_release_scb(host, scb);
927 return SCSI_MLQUEUE_HOST_BUSY;
928 }
4023c474
AC
929 orc_exec_scb(host, scb); /* Start execute SCB */
930 return 0;
1da177e4
LT
931}
932
f281233d
JG
933static DEF_SCSI_QCMD(inia100_queue)
934
1da177e4
LT
935/*****************************************************************************
936 Function name : inia100_abort
937 Description : Abort a queued command.
938 (commands that are on the bus can't be aborted easily)
4023c474 939 Input : host - Pointer to host adapter structure
1da177e4
LT
940 Output : None.
941 Return : pSRB - Pointer to SCSI request block.
942*****************************************************************************/
4023c474 943static int inia100_abort(struct scsi_cmnd * cmd)
1da177e4 944{
4023c474 945 struct orc_host *host;
1da177e4 946
4023c474
AC
947 host = (struct orc_host *) cmd->device->host->hostdata;
948 return inia100_abort_cmd(host, cmd);
1da177e4
LT
949}
950
951/*****************************************************************************
952 Function name : inia100_reset
953 Description : Reset registers, reset a hanging bus and
954 kill active and disconnected commands for target w/o soft reset
4023c474 955 Input : host - Pointer to host adapter structure
1da177e4
LT
956 Output : None.
957 Return : pSRB - Pointer to SCSI request block.
958*****************************************************************************/
4023c474 959static int inia100_bus_reset(struct scsi_cmnd * cmd)
1da177e4 960{ /* I need Host Control Block Information */
4023c474
AC
961 struct orc_host *host;
962 host = (struct orc_host *) cmd->device->host->hostdata;
963 return orc_reset_scsi_bus(host);
1da177e4
LT
964}
965
966/*****************************************************************************
967 Function name : inia100_device_reset
968 Description : Reset the device
4023c474 969 Input : host - Pointer to host adapter structure
1da177e4
LT
970 Output : None.
971 Return : pSRB - Pointer to SCSI request block.
972*****************************************************************************/
4023c474 973static int inia100_device_reset(struct scsi_cmnd * cmd)
1da177e4 974{ /* I need Host Control Block Information */
4023c474
AC
975 struct orc_host *host;
976 host = (struct orc_host *) cmd->device->host->hostdata;
977 return orc_device_reset(host, cmd, scmd_id(cmd));
1da177e4
LT
978
979}
980
4023c474
AC
981/**
982 * inia100_scb_handler - interrupt callback
983 * @host: Host causing the interrupt
984 * @scb: SCB the controller returned as needing processing
985 *
986 * Perform completion processing on a control block. Do the conversions
987 * from host to SCSI midlayer error coding, save any sense data and
988 * the complete with the midlayer and recycle the scb.
989 */
990
991static void inia100_scb_handler(struct orc_host *host, struct orc_scb *scb)
1da177e4 992{
4023c474
AC
993 struct scsi_cmnd *cmd; /* Pointer to SCSI request block */
994 struct orc_extended_scb *escb;
995
996 escb = scb->escb;
997 if ((cmd = (struct scsi_cmnd *) escb->srb) == NULL) {
998 printk(KERN_ERR "inia100_scb_handler: SRB pointer is empty\n");
999 orc_release_scb(host, scb); /* Release SCB for current channel */
1da177e4
LT
1000 return;
1001 }
4023c474 1002 escb->srb = NULL;
1da177e4 1003
4023c474 1004 switch (scb->hastat) {
1da177e4
LT
1005 case 0x0:
1006 case 0xa: /* Linked command complete without error and linked normally */
1007 case 0xb: /* Linked command complete without error interrupt generated */
4023c474 1008 scb->hastat = 0;
1da177e4
LT
1009 break;
1010
1011 case 0x11: /* Selection time out-The initiator selection or target
1012 reselection was not complete within the SCSI Time out period */
4023c474 1013 scb->hastat = DID_TIME_OUT;
1da177e4
LT
1014 break;
1015
1016 case 0x14: /* Target bus phase sequence failure-An invalid bus phase or bus
1017 phase sequence was requested by the target. The host adapter
1018 will generate a SCSI Reset Condition, notifying the host with
1019 a SCRD interrupt */
4023c474 1020 scb->hastat = DID_RESET;
1da177e4
LT
1021 break;
1022
1023 case 0x1a: /* SCB Aborted. 07/21/98 */
4023c474 1024 scb->hastat = DID_ABORT;
1da177e4
LT
1025 break;
1026
1027 case 0x12: /* Data overrun/underrun-The target attempted to transfer more data
1028 than was allocated by the Data Length field or the sum of the
1029 Scatter / Gather Data Length fields. */
1030 case 0x13: /* Unexpected bus free-The target dropped the SCSI BSY at an unexpected time. */
1031 case 0x16: /* Invalid CCB Operation Code-The first byte of the CCB was invalid. */
1032
1033 default:
4023c474
AC
1034 printk(KERN_DEBUG "inia100: %x %x\n", scb->hastat, scb->tastat);
1035 scb->hastat = DID_ERROR; /* Couldn't find any better */
1da177e4
LT
1036 break;
1037 }
1038
4023c474
AC
1039 if (scb->tastat == 2) { /* Check condition */
1040 memcpy((unsigned char *) &cmd->sense_buffer[0],
1041 (unsigned char *) &escb->sglist[0], SENSE_SIZE);
1da177e4 1042 }
4023c474
AC
1043 cmd->result = scb->tastat | (scb->hastat << 16);
1044 scsi_dma_unmap(cmd);
1045 cmd->scsi_done(cmd); /* Notify system DONE */
1046 orc_release_scb(host, scb); /* Release SCB for current channel */
1da177e4
LT
1047}
1048
4023c474
AC
1049/**
1050 * inia100_intr - interrupt handler
1051 * @irqno: Interrupt value
1052 * @devid: Host adapter
1053 *
1054 * Entry point for IRQ handling. All the real work is performed
1055 * by orc_interrupt.
1da177e4 1056 */
7d12e780 1057static irqreturn_t inia100_intr(int irqno, void *devid)
1da177e4 1058{
4023c474
AC
1059 struct Scsi_Host *shost = (struct Scsi_Host *)devid;
1060 struct orc_host *host = (struct orc_host *)shost->hostdata;
1da177e4 1061 unsigned long flags;
4023c474 1062 irqreturn_t res;
1da177e4 1063
4023c474
AC
1064 spin_lock_irqsave(shost->host_lock, flags);
1065 res = orc_interrupt(host);
1066 spin_unlock_irqrestore(shost->host_lock, flags);
1da177e4 1067
4023c474 1068 return res;
1da177e4
LT
1069}
1070
1071static struct scsi_host_template inia100_template = {
1072 .proc_name = "inia100",
1073 .name = inia100_REVID,
1074 .queuecommand = inia100_queue,
1075 .eh_abort_handler = inia100_abort,
1076 .eh_bus_reset_handler = inia100_bus_reset,
1077 .eh_device_reset_handler = inia100_device_reset,
1078 .can_queue = 1,
1079 .this_id = 1,
1080 .sg_tablesize = SG_ALL,
1081 .cmd_per_lun = 1,
1082 .use_clustering = ENABLE_CLUSTERING,
1083};
1084
1085static int __devinit inia100_probe_one(struct pci_dev *pdev,
1086 const struct pci_device_id *id)
1087{
1088 struct Scsi_Host *shost;
4023c474 1089 struct orc_host *host;
1da177e4
LT
1090 unsigned long port, bios;
1091 int error = -ENODEV;
1092 u32 sz;
4023c474
AC
1093 unsigned long biosaddr;
1094 char *bios_phys;
1da177e4
LT
1095
1096 if (pci_enable_device(pdev))
1097 goto out;
284901a9 1098 if (pci_set_dma_mask(pdev, DMA_BIT_MASK(32))) {
1da177e4
LT
1099 printk(KERN_WARNING "Unable to set 32bit DMA "
1100 "on inia100 adapter, ignoring.\n");
1101 goto out_disable_device;
1102 }
1103
1104 pci_set_master(pdev);
1105
1106 port = pci_resource_start(pdev, 0);
1107 if (!request_region(port, 256, "inia100")) {
1108 printk(KERN_WARNING "inia100: io port 0x%lx, is busy.\n", port);
1109 goto out_disable_device;
1110 }
1111
4c3ee826 1112 /* <02> read from base address + 0x50 offset to get the bios value. */
4023c474 1113 bios = inw(port + 0x50);
1da177e4
LT
1114
1115
4023c474 1116 shost = scsi_host_alloc(&inia100_template, sizeof(struct orc_host));
1da177e4
LT
1117 if (!shost)
1118 goto out_release_region;
1119
4023c474
AC
1120 host = (struct orc_host *)shost->hostdata;
1121 host->pdev = pdev;
1122 host->base = port;
1123 host->BIOScfg = bios;
1124 spin_lock_init(&host->allocation_lock);
1da177e4
LT
1125
1126 /* Get total memory needed for SCB */
4023c474
AC
1127 sz = ORC_MAXQUEUE * sizeof(struct orc_scb);
1128 host->scb_virt = pci_alloc_consistent(pdev, sz,
1129 &host->scb_phys);
1130 if (!host->scb_virt) {
1da177e4
LT
1131 printk("inia100: SCB memory allocation error\n");
1132 goto out_host_put;
1133 }
4023c474 1134 memset(host->scb_virt, 0, sz);
1da177e4
LT
1135
1136 /* Get total memory needed for ESCB */
4023c474
AC
1137 sz = ORC_MAXQUEUE * sizeof(struct orc_extended_scb);
1138 host->escb_virt = pci_alloc_consistent(pdev, sz,
1139 &host->escb_phys);
1140 if (!host->escb_virt) {
1da177e4
LT
1141 printk("inia100: ESCB memory allocation error\n");
1142 goto out_free_scb_array;
1143 }
4023c474 1144 memset(host->escb_virt, 0, sz);
1da177e4 1145
4023c474
AC
1146 biosaddr = host->BIOScfg;
1147 biosaddr = (biosaddr << 4);
1148 bios_phys = phys_to_virt(biosaddr);
1149 if (init_orchid(host)) { /* Initialize orchid chip */
1da177e4
LT
1150 printk("inia100: initial orchid fail!!\n");
1151 goto out_free_escb_array;
1152 }
1153
4023c474 1154 shost->io_port = host->base;
1da177e4
LT
1155 shost->n_io_port = 0xff;
1156 shost->can_queue = ORC_MAXQUEUE;
1157 shost->unique_id = shost->io_port;
4023c474 1158 shost->max_id = host->max_targets;
1da177e4 1159 shost->max_lun = 16;
4023c474
AC
1160 shost->irq = pdev->irq;
1161 shost->this_id = host->scsi_id; /* Assign HCS index */
1da177e4
LT
1162 shost->sg_tablesize = TOTAL_SG_ENTRY;
1163
1164 /* Initial orc chip */
1d6f359a 1165 error = request_irq(pdev->irq, inia100_intr, IRQF_SHARED,
1da177e4
LT
1166 "inia100", shost);
1167 if (error < 0) {
1168 printk(KERN_WARNING "inia100: unable to get irq %d\n",
1169 pdev->irq);
1170 goto out_free_escb_array;
1171 }
1172
1173 pci_set_drvdata(pdev, shost);
1174
1175 error = scsi_add_host(shost, &pdev->dev);
1176 if (error)
1177 goto out_free_irq;
1178
1179 scsi_scan_host(shost);
1180 return 0;
1181
4023c474 1182out_free_irq:
1da177e4 1183 free_irq(shost->irq, shost);
4023c474
AC
1184out_free_escb_array:
1185 pci_free_consistent(pdev, ORC_MAXQUEUE * sizeof(struct orc_extended_scb),
1186 host->escb_virt, host->escb_phys);
1187out_free_scb_array:
1188 pci_free_consistent(pdev, ORC_MAXQUEUE * sizeof(struct orc_scb),
1189 host->scb_virt, host->scb_phys);
1190out_host_put:
1da177e4 1191 scsi_host_put(shost);
4023c474 1192out_release_region:
1da177e4 1193 release_region(port, 256);
4023c474 1194out_disable_device:
1da177e4 1195 pci_disable_device(pdev);
4023c474 1196out:
1da177e4
LT
1197 return error;
1198}
1199
1200static void __devexit inia100_remove_one(struct pci_dev *pdev)
1201{
1202 struct Scsi_Host *shost = pci_get_drvdata(pdev);
4023c474 1203 struct orc_host *host = (struct orc_host *)shost->hostdata;
1da177e4
LT
1204
1205 scsi_remove_host(shost);
1206
1207 free_irq(shost->irq, shost);
4023c474
AC
1208 pci_free_consistent(pdev, ORC_MAXQUEUE * sizeof(struct orc_extended_scb),
1209 host->escb_virt, host->escb_phys);
1210 pci_free_consistent(pdev, ORC_MAXQUEUE * sizeof(struct orc_scb),
1211 host->scb_virt, host->scb_phys);
1da177e4
LT
1212 release_region(shost->io_port, 256);
1213
1214 scsi_host_put(shost);
1215}
1216
1217static struct pci_device_id inia100_pci_tbl[] = {
1218 {PCI_VENDOR_ID_INIT, 0x1060, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1219 {0,}
1220};
1221MODULE_DEVICE_TABLE(pci, inia100_pci_tbl);
1222
1223static struct pci_driver inia100_pci_driver = {
1224 .name = "inia100",
1225 .id_table = inia100_pci_tbl,
1226 .probe = inia100_probe_one,
1227 .remove = __devexit_p(inia100_remove_one),
1228};
1229
1230static int __init inia100_init(void)
1231{
dcbccbde 1232 return pci_register_driver(&inia100_pci_driver);
1da177e4
LT
1233}
1234
1235static void __exit inia100_exit(void)
1236{
1237 pci_unregister_driver(&inia100_pci_driver);
1238}
1239
1240MODULE_DESCRIPTION("Initio A100U2W SCSI driver");
1241MODULE_AUTHOR("Initio Corporation");
1242MODULE_LICENSE("Dual BSD/GPL");
1243
1244module_init(inia100_init);
1245module_exit(inia100_exit);