]>
Commit | Line | Data |
---|---|---|
1 | /************************************************************************** | |
2 | * Initio 9100 device driver for Linux. | |
3 | * | |
4 | * Copyright (c) 1994-1998 Initio Corporation | |
5 | * Copyright (c) 1998 Bas Vermeulen <bvermeul@blackstar.xs4all.nl> | |
6 | * Copyright (c) 2004 Christoph Hellwig <hch@lst.de> | |
7 | * Copyright (c) 2007 Red Hat | |
8 | * | |
9 | * This program is free software; you can redistribute it and/or modify | |
10 | * it under the terms of the GNU General Public License as published by | |
11 | * the Free Software Foundation; either version 2, or (at your option) | |
12 | * any later version. | |
13 | * | |
14 | * This program is distributed in the hope that it will be useful, | |
15 | * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
16 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
17 | * GNU General Public License for more details. | |
18 | * | |
19 | * You should have received a copy of the GNU General Public License | |
20 | * along with this program; see the file COPYING. If not, write to | |
21 | * the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. | |
22 | * | |
23 | * | |
24 | ************************************************************************* | |
25 | * | |
26 | * DESCRIPTION: | |
27 | * | |
28 | * This is the Linux low-level SCSI driver for Initio INI-9X00U/UW SCSI host | |
29 | * adapters | |
30 | * | |
31 | * 08/06/97 hc - v1.01h | |
32 | * - Support inic-940 and inic-935 | |
33 | * 09/26/97 hc - v1.01i | |
34 | * - Make correction from J.W. Schultz suggestion | |
35 | * 10/13/97 hc - Support reset function | |
36 | * 10/21/97 hc - v1.01j | |
37 | * - Support 32 LUN (SCSI 3) | |
38 | * 01/14/98 hc - v1.01k | |
39 | * - Fix memory allocation problem | |
40 | * 03/04/98 hc - v1.01l | |
41 | * - Fix tape rewind which will hang the system problem | |
42 | * - Set can_queue to initio_num_scb | |
43 | * 06/25/98 hc - v1.01m | |
44 | * - Get it work for kernel version >= 2.1.75 | |
45 | * - Dynamic assign SCSI bus reset holding time in initio_init() | |
46 | * 07/02/98 hc - v1.01n | |
47 | * - Support 0002134A | |
48 | * 08/07/98 hc - v1.01o | |
49 | * - Change the initio_abort_srb routine to use scsi_done. <01> | |
50 | * 09/07/98 hl - v1.02 | |
51 | * - Change the INI9100U define and proc_dir_entry to | |
52 | * reflect the newer Kernel 2.1.118, but the v1.o1o | |
53 | * should work with Kernel 2.1.118. | |
54 | * 09/20/98 wh - v1.02a | |
55 | * - Support Abort command. | |
56 | * - Handle reset routine. | |
57 | * 09/21/98 hl - v1.03 | |
58 | * - remove comments. | |
59 | * 12/09/98 bv - v1.03a | |
60 | * - Removed unused code | |
61 | * 12/13/98 bv - v1.03b | |
62 | * - Remove cli() locking for kernels >= 2.1.95. This uses | |
63 | * spinlocks to serialize access to the pSRB_head and | |
64 | * pSRB_tail members of the HCS structure. | |
65 | * 09/01/99 bv - v1.03d | |
66 | * - Fixed a deadlock problem in SMP. | |
67 | * 21/01/99 bv - v1.03e | |
68 | * - Add support for the Domex 3192U PCI SCSI | |
69 | * This is a slightly modified patch by | |
70 | * Brian Macy <bmacy@sunshinecomputing.com> | |
71 | * 22/02/99 bv - v1.03f | |
72 | * - Didn't detect the INIC-950 in 2.0.x correctly. | |
73 | * Now fixed. | |
74 | * 05/07/99 bv - v1.03g | |
75 | * - Changed the assumption that HZ = 100 | |
76 | * 10/17/03 mc - v1.04 | |
77 | * - added new DMA API support | |
78 | * 06/01/04 jmd - v1.04a | |
79 | * - Re-add reset_bus support | |
80 | **************************************************************************/ | |
81 | ||
82 | #include <linux/module.h> | |
83 | #include <linux/errno.h> | |
84 | #include <linux/delay.h> | |
85 | #include <linux/pci.h> | |
86 | #include <linux/init.h> | |
87 | #include <linux/blkdev.h> | |
88 | #include <linux/spinlock.h> | |
89 | #include <linux/stat.h> | |
90 | #include <linux/kernel.h> | |
91 | #include <linux/proc_fs.h> | |
92 | #include <linux/string.h> | |
93 | #include <linux/interrupt.h> | |
94 | #include <linux/ioport.h> | |
95 | #include <linux/slab.h> | |
96 | #include <linux/jiffies.h> | |
97 | #include <linux/dma-mapping.h> | |
98 | #include <asm/io.h> | |
99 | ||
100 | #include <scsi/scsi.h> | |
101 | #include <scsi/scsi_cmnd.h> | |
102 | #include <scsi/scsi_device.h> | |
103 | #include <scsi/scsi_host.h> | |
104 | #include <scsi/scsi_tcq.h> | |
105 | ||
106 | #include "initio.h" | |
107 | ||
108 | #define SENSE_SIZE 14 | |
109 | ||
110 | #define i91u_MAXQUEUE 2 | |
111 | #define i91u_REVID "Initio INI-9X00U/UW SCSI device driver; Revision: 1.04a" | |
112 | ||
113 | #define I950_DEVICE_ID 0x9500 /* Initio's inic-950 product ID */ | |
114 | #define I940_DEVICE_ID 0x9400 /* Initio's inic-940 product ID */ | |
115 | #define I935_DEVICE_ID 0x9401 /* Initio's inic-935 product ID */ | |
116 | #define I920_DEVICE_ID 0x0002 /* Initio's other product ID */ | |
117 | ||
118 | #ifdef DEBUG_i91u | |
119 | static unsigned int i91u_debug = DEBUG_DEFAULT; | |
120 | #endif | |
121 | ||
122 | static int initio_tag_enable = 1; | |
123 | ||
124 | #ifdef DEBUG_i91u | |
125 | static int setup_debug = 0; | |
126 | #endif | |
127 | ||
128 | static void i91uSCBPost(u8 * pHcb, u8 * pScb); | |
129 | ||
130 | /* PCI Devices supported by this driver */ | |
131 | static struct pci_device_id i91u_pci_devices[] = { | |
132 | { PCI_VENDOR_ID_INIT, I950_DEVICE_ID, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0}, | |
133 | { PCI_VENDOR_ID_INIT, I940_DEVICE_ID, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0}, | |
134 | { PCI_VENDOR_ID_INIT, I935_DEVICE_ID, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0}, | |
135 | { PCI_VENDOR_ID_INIT, I920_DEVICE_ID, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0}, | |
136 | { PCI_VENDOR_ID_DOMEX, I920_DEVICE_ID, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0}, | |
137 | { } | |
138 | }; | |
139 | MODULE_DEVICE_TABLE(pci, i91u_pci_devices); | |
140 | ||
141 | #define DEBUG_INTERRUPT 0 | |
142 | #define DEBUG_QUEUE 0 | |
143 | #define DEBUG_STATE 0 | |
144 | #define INT_DISC 0 | |
145 | ||
146 | /*--- forward references ---*/ | |
147 | static struct scsi_ctrl_blk *initio_find_busy_scb(struct initio_host * host, u16 tarlun); | |
148 | static struct scsi_ctrl_blk *initio_find_done_scb(struct initio_host * host); | |
149 | ||
150 | static int tulip_main(struct initio_host * host); | |
151 | ||
152 | static int initio_next_state(struct initio_host * host); | |
153 | static int initio_state_1(struct initio_host * host); | |
154 | static int initio_state_2(struct initio_host * host); | |
155 | static int initio_state_3(struct initio_host * host); | |
156 | static int initio_state_4(struct initio_host * host); | |
157 | static int initio_state_5(struct initio_host * host); | |
158 | static int initio_state_6(struct initio_host * host); | |
159 | static int initio_state_7(struct initio_host * host); | |
160 | static int initio_xfer_data_in(struct initio_host * host); | |
161 | static int initio_xfer_data_out(struct initio_host * host); | |
162 | static int initio_xpad_in(struct initio_host * host); | |
163 | static int initio_xpad_out(struct initio_host * host); | |
164 | static int initio_status_msg(struct initio_host * host); | |
165 | ||
166 | static int initio_msgin(struct initio_host * host); | |
167 | static int initio_msgin_sync(struct initio_host * host); | |
168 | static int initio_msgin_accept(struct initio_host * host); | |
169 | static int initio_msgout_reject(struct initio_host * host); | |
170 | static int initio_msgin_extend(struct initio_host * host); | |
171 | ||
172 | static int initio_msgout_ide(struct initio_host * host); | |
173 | static int initio_msgout_abort_targ(struct initio_host * host); | |
174 | static int initio_msgout_abort_tag(struct initio_host * host); | |
175 | ||
176 | static int initio_bus_device_reset(struct initio_host * host); | |
177 | static void initio_select_atn(struct initio_host * host, struct scsi_ctrl_blk * scb); | |
178 | static void initio_select_atn3(struct initio_host * host, struct scsi_ctrl_blk * scb); | |
179 | static void initio_select_atn_stop(struct initio_host * host, struct scsi_ctrl_blk * scb); | |
180 | static int int_initio_busfree(struct initio_host * host); | |
181 | static int int_initio_scsi_rst(struct initio_host * host); | |
182 | static int int_initio_bad_seq(struct initio_host * host); | |
183 | static int int_initio_resel(struct initio_host * host); | |
184 | static int initio_sync_done(struct initio_host * host); | |
185 | static int wdtr_done(struct initio_host * host); | |
186 | static int wait_tulip(struct initio_host * host); | |
187 | static int initio_wait_done_disc(struct initio_host * host); | |
188 | static int initio_wait_disc(struct initio_host * host); | |
189 | static void tulip_scsi(struct initio_host * host); | |
190 | static int initio_post_scsi_rst(struct initio_host * host); | |
191 | ||
192 | static void initio_se2_ew_en(unsigned long base); | |
193 | static void initio_se2_ew_ds(unsigned long base); | |
194 | static int initio_se2_rd_all(unsigned long base); | |
195 | static void initio_se2_update_all(unsigned long base); /* setup default pattern */ | |
196 | static void initio_read_eeprom(unsigned long base); | |
197 | ||
198 | /* ---- INTERNAL VARIABLES ---- */ | |
199 | ||
200 | static NVRAM i91unvram; | |
201 | static NVRAM *i91unvramp; | |
202 | ||
203 | static u8 i91udftNvRam[64] = | |
204 | { | |
205 | /*----------- header -----------*/ | |
206 | 0x25, 0xc9, /* Signature */ | |
207 | 0x40, /* Size */ | |
208 | 0x01, /* Revision */ | |
209 | /* -- Host Adapter Structure -- */ | |
210 | 0x95, /* ModelByte0 */ | |
211 | 0x00, /* ModelByte1 */ | |
212 | 0x00, /* ModelInfo */ | |
213 | 0x01, /* NumOfCh */ | |
214 | NBC1_DEFAULT, /* BIOSConfig1 */ | |
215 | 0, /* BIOSConfig2 */ | |
216 | 0, /* HAConfig1 */ | |
217 | 0, /* HAConfig2 */ | |
218 | /* SCSI channel 0 and target Structure */ | |
219 | 7, /* SCSIid */ | |
220 | NCC1_DEFAULT, /* SCSIconfig1 */ | |
221 | 0, /* SCSIconfig2 */ | |
222 | 0x10, /* NumSCSItarget */ | |
223 | ||
224 | NTC_DEFAULT, NTC_DEFAULT, NTC_DEFAULT, NTC_DEFAULT, | |
225 | NTC_DEFAULT, NTC_DEFAULT, NTC_DEFAULT, NTC_DEFAULT, | |
226 | NTC_DEFAULT, NTC_DEFAULT, NTC_DEFAULT, NTC_DEFAULT, | |
227 | NTC_DEFAULT, NTC_DEFAULT, NTC_DEFAULT, NTC_DEFAULT, | |
228 | ||
229 | /* SCSI channel 1 and target Structure */ | |
230 | 7, /* SCSIid */ | |
231 | NCC1_DEFAULT, /* SCSIconfig1 */ | |
232 | 0, /* SCSIconfig2 */ | |
233 | 0x10, /* NumSCSItarget */ | |
234 | ||
235 | NTC_DEFAULT, NTC_DEFAULT, NTC_DEFAULT, NTC_DEFAULT, | |
236 | NTC_DEFAULT, NTC_DEFAULT, NTC_DEFAULT, NTC_DEFAULT, | |
237 | NTC_DEFAULT, NTC_DEFAULT, NTC_DEFAULT, NTC_DEFAULT, | |
238 | NTC_DEFAULT, NTC_DEFAULT, NTC_DEFAULT, NTC_DEFAULT, | |
239 | 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, | |
240 | 0, 0}; /* - CheckSum - */ | |
241 | ||
242 | ||
243 | static u8 initio_rate_tbl[8] = /* fast 20 */ | |
244 | { | |
245 | /* nanosecond divide by 4 */ | |
246 | 12, /* 50ns, 20M */ | |
247 | 18, /* 75ns, 13.3M */ | |
248 | 25, /* 100ns, 10M */ | |
249 | 31, /* 125ns, 8M */ | |
250 | 37, /* 150ns, 6.6M */ | |
251 | 43, /* 175ns, 5.7M */ | |
252 | 50, /* 200ns, 5M */ | |
253 | 62 /* 250ns, 4M */ | |
254 | }; | |
255 | ||
256 | static void initio_do_pause(unsigned amount) | |
257 | { | |
258 | /* Pause for amount jiffies */ | |
259 | unsigned long the_time = jiffies + amount; | |
260 | ||
261 | while (time_before_eq(jiffies, the_time)) | |
262 | cpu_relax(); | |
263 | } | |
264 | ||
265 | /*-- forward reference --*/ | |
266 | ||
267 | /****************************************************************** | |
268 | Input: instruction for Serial E2PROM | |
269 | ||
270 | EX: se2_rd(0 call se2_instr() to send address and read command | |
271 | ||
272 | StartBit OP_Code Address Data | |
273 | --------- -------- ------------------ ------- | |
274 | 1 1 , 0 A5,A4,A3,A2,A1,A0 D15-D0 | |
275 | ||
276 | +----------------------------------------------------- | |
277 | | | |
278 | CS -----+ | |
279 | +--+ +--+ +--+ +--+ +--+ | |
280 | ^ | ^ | ^ | ^ | ^ | | |
281 | | | | | | | | | | | | |
282 | CLK -------+ +--+ +--+ +--+ +--+ +-- | |
283 | (leading edge trigger) | |
284 | ||
285 | +--1-----1--+ | |
286 | | SB OP | OP A5 A4 | |
287 | DI ----+ +--0------------------ | |
288 | (address and cmd sent to nvram) | |
289 | ||
290 | -------------------------------------------+ | |
291 | | | |
292 | DO +--- | |
293 | (data sent from nvram) | |
294 | ||
295 | ||
296 | ******************************************************************/ | |
297 | ||
298 | /** | |
299 | * initio_se2_instr - bitbang an instruction | |
300 | * @base: Base of InitIO controller | |
301 | * @instr: Instruction for serial E2PROM | |
302 | * | |
303 | * Bitbang an instruction out to the serial E2Prom | |
304 | */ | |
305 | ||
306 | static void initio_se2_instr(unsigned long base, u8 instr) | |
307 | { | |
308 | int i; | |
309 | u8 b; | |
310 | ||
311 | outb(SE2CS | SE2DO, base + TUL_NVRAM); /* cs+start bit */ | |
312 | udelay(30); | |
313 | outb(SE2CS | SE2CLK | SE2DO, base + TUL_NVRAM); /* +CLK */ | |
314 | udelay(30); | |
315 | ||
316 | for (i = 0; i < 8; i++) { | |
317 | if (instr & 0x80) | |
318 | b = SE2CS | SE2DO; /* -CLK+dataBit */ | |
319 | else | |
320 | b = SE2CS; /* -CLK */ | |
321 | outb(b, base + TUL_NVRAM); | |
322 | udelay(30); | |
323 | outb(b | SE2CLK, base + TUL_NVRAM); /* +CLK */ | |
324 | udelay(30); | |
325 | instr <<= 1; | |
326 | } | |
327 | outb(SE2CS, base + TUL_NVRAM); /* -CLK */ | |
328 | udelay(30); | |
329 | } | |
330 | ||
331 | ||
332 | /** | |
333 | * initio_se2_ew_en - Enable erase/write | |
334 | * @base: Base address of InitIO controller | |
335 | * | |
336 | * Enable erase/write state of serial EEPROM | |
337 | */ | |
338 | void initio_se2_ew_en(unsigned long base) | |
339 | { | |
340 | initio_se2_instr(base, 0x30); /* EWEN */ | |
341 | outb(0, base + TUL_NVRAM); /* -CS */ | |
342 | udelay(30); | |
343 | } | |
344 | ||
345 | ||
346 | /** | |
347 | * initio_se2_ew_ds - Disable erase/write | |
348 | * @base: Base address of InitIO controller | |
349 | * | |
350 | * Disable erase/write state of serial EEPROM | |
351 | */ | |
352 | void initio_se2_ew_ds(unsigned long base) | |
353 | { | |
354 | initio_se2_instr(base, 0); /* EWDS */ | |
355 | outb(0, base + TUL_NVRAM); /* -CS */ | |
356 | udelay(30); | |
357 | } | |
358 | ||
359 | ||
360 | /** | |
361 | * initio_se2_rd - read E2PROM word | |
362 | * @base: Base of InitIO controller | |
363 | * @addr: Address of word in E2PROM | |
364 | * | |
365 | * Read a word from the NV E2PROM device | |
366 | */ | |
367 | static u16 initio_se2_rd(unsigned long base, u8 addr) | |
368 | { | |
369 | u8 instr, rb; | |
370 | u16 val = 0; | |
371 | int i; | |
372 | ||
373 | instr = (u8) (addr | 0x80); | |
374 | initio_se2_instr(base, instr); /* READ INSTR */ | |
375 | ||
376 | for (i = 15; i >= 0; i--) { | |
377 | outb(SE2CS | SE2CLK, base + TUL_NVRAM); /* +CLK */ | |
378 | udelay(30); | |
379 | outb(SE2CS, base + TUL_NVRAM); /* -CLK */ | |
380 | ||
381 | /* sample data after the following edge of clock */ | |
382 | rb = inb(base + TUL_NVRAM); | |
383 | rb &= SE2DI; | |
384 | val += (rb << i); | |
385 | udelay(30); /* 6/20/95 */ | |
386 | } | |
387 | ||
388 | outb(0, base + TUL_NVRAM); /* no chip select */ | |
389 | udelay(30); | |
390 | return val; | |
391 | } | |
392 | ||
393 | /** | |
394 | * initio_se2_wr - read E2PROM word | |
395 | * @base: Base of InitIO controller | |
396 | * @addr: Address of word in E2PROM | |
397 | * @val: Value to write | |
398 | * | |
399 | * Write a word to the NV E2PROM device. Used when recovering from | |
400 | * a problem with the NV. | |
401 | */ | |
402 | static void initio_se2_wr(unsigned long base, u8 addr, u16 val) | |
403 | { | |
404 | u8 rb; | |
405 | u8 instr; | |
406 | int i; | |
407 | ||
408 | instr = (u8) (addr | 0x40); | |
409 | initio_se2_instr(base, instr); /* WRITE INSTR */ | |
410 | for (i = 15; i >= 0; i--) { | |
411 | if (val & 0x8000) | |
412 | outb(SE2CS | SE2DO, base + TUL_NVRAM); /* -CLK+dataBit 1 */ | |
413 | else | |
414 | outb(SE2CS, base + TUL_NVRAM); /* -CLK+dataBit 0 */ | |
415 | udelay(30); | |
416 | outb(SE2CS | SE2CLK, base + TUL_NVRAM); /* +CLK */ | |
417 | udelay(30); | |
418 | val <<= 1; | |
419 | } | |
420 | outb(SE2CS, base + TUL_NVRAM); /* -CLK */ | |
421 | udelay(30); | |
422 | outb(0, base + TUL_NVRAM); /* -CS */ | |
423 | udelay(30); | |
424 | ||
425 | outb(SE2CS, base + TUL_NVRAM); /* +CS */ | |
426 | udelay(30); | |
427 | ||
428 | for (;;) { | |
429 | outb(SE2CS | SE2CLK, base + TUL_NVRAM); /* +CLK */ | |
430 | udelay(30); | |
431 | outb(SE2CS, base + TUL_NVRAM); /* -CLK */ | |
432 | udelay(30); | |
433 | if ((rb = inb(base + TUL_NVRAM)) & SE2DI) | |
434 | break; /* write complete */ | |
435 | } | |
436 | outb(0, base + TUL_NVRAM); /* -CS */ | |
437 | } | |
438 | ||
439 | /** | |
440 | * initio_se2_rd_all - read hostadapter NV configuration | |
441 | * @base: Base address of InitIO controller | |
442 | * | |
443 | * Reads the E2PROM data into main memory. Ensures that the checksum | |
444 | * and header marker are valid. Returns 1 on success -1 on error. | |
445 | */ | |
446 | ||
447 | static int initio_se2_rd_all(unsigned long base) | |
448 | { | |
449 | int i; | |
450 | u16 chksum = 0; | |
451 | u16 *np; | |
452 | ||
453 | i91unvramp = &i91unvram; | |
454 | np = (u16 *) i91unvramp; | |
455 | for (i = 0; i < 32; i++) | |
456 | *np++ = initio_se2_rd(base, i); | |
457 | ||
458 | /* Is signature "ini" ok ? */ | |
459 | if (i91unvramp->NVM_Signature != INI_SIGNATURE) | |
460 | return -1; | |
461 | /* Is ckecksum ok ? */ | |
462 | np = (u16 *) i91unvramp; | |
463 | for (i = 0; i < 31; i++) | |
464 | chksum += *np++; | |
465 | if (i91unvramp->NVM_CheckSum != chksum) | |
466 | return -1; | |
467 | return 1; | |
468 | } | |
469 | ||
470 | /** | |
471 | * initio_se2_update_all - Update E2PROM | |
472 | * @base: Base of InitIO controller | |
473 | * | |
474 | * Update the E2PROM by wrting any changes into the E2PROM | |
475 | * chip, rewriting the checksum. | |
476 | */ | |
477 | static void initio_se2_update_all(unsigned long base) | |
478 | { /* setup default pattern */ | |
479 | int i; | |
480 | u16 chksum = 0; | |
481 | u16 *np, *np1; | |
482 | ||
483 | i91unvramp = &i91unvram; | |
484 | /* Calculate checksum first */ | |
485 | np = (u16 *) i91udftNvRam; | |
486 | for (i = 0; i < 31; i++) | |
487 | chksum += *np++; | |
488 | *np = chksum; | |
489 | initio_se2_ew_en(base); /* Enable write */ | |
490 | ||
491 | np = (u16 *) i91udftNvRam; | |
492 | np1 = (u16 *) i91unvramp; | |
493 | for (i = 0; i < 32; i++, np++, np1++) { | |
494 | if (*np != *np1) | |
495 | initio_se2_wr(base, i, *np); | |
496 | } | |
497 | initio_se2_ew_ds(base); /* Disable write */ | |
498 | } | |
499 | ||
500 | /** | |
501 | * initio_read_eeprom - Retrieve configuration | |
502 | * @base: Base of InitIO Host Adapter | |
503 | * | |
504 | * Retrieve the host adapter configuration data from E2Prom. If the | |
505 | * data is invalid then the defaults are used and are also restored | |
506 | * into the E2PROM. This forms the access point for the SCSI driver | |
507 | * into the E2PROM layer, the other functions for the E2PROM are all | |
508 | * internal use. | |
509 | * | |
510 | * Must be called single threaded, uses a shared global area. | |
511 | */ | |
512 | ||
513 | static void initio_read_eeprom(unsigned long base) | |
514 | { | |
515 | u8 gctrl; | |
516 | ||
517 | i91unvramp = &i91unvram; | |
518 | /* Enable EEProm programming */ | |
519 | gctrl = inb(base + TUL_GCTRL); | |
520 | outb(gctrl | TUL_GCTRL_EEPROM_BIT, base + TUL_GCTRL); | |
521 | if (initio_se2_rd_all(base) != 1) { | |
522 | initio_se2_update_all(base); /* setup default pattern */ | |
523 | initio_se2_rd_all(base); /* load again */ | |
524 | } | |
525 | /* Disable EEProm programming */ | |
526 | gctrl = inb(base + TUL_GCTRL); | |
527 | outb(gctrl & ~TUL_GCTRL_EEPROM_BIT, base + TUL_GCTRL); | |
528 | } | |
529 | ||
530 | /** | |
531 | * initio_stop_bm - stop bus master | |
532 | * @host: InitIO we are stopping | |
533 | * | |
534 | * Stop any pending DMA operation, aborting the DMA if necessary | |
535 | */ | |
536 | ||
537 | static void initio_stop_bm(struct initio_host * host) | |
538 | { | |
539 | ||
540 | if (inb(host->addr + TUL_XStatus) & XPEND) { /* if DMA xfer is pending, abort DMA xfer */ | |
541 | outb(TAX_X_ABT | TAX_X_CLR_FIFO, host->addr + TUL_XCmd); | |
542 | /* wait Abort DMA xfer done */ | |
543 | while ((inb(host->addr + TUL_Int) & XABT) == 0) | |
544 | cpu_relax(); | |
545 | } | |
546 | outb(TSC_FLUSH_FIFO, host->addr + TUL_SCtrl0); | |
547 | } | |
548 | ||
549 | /** | |
550 | * initio_reset_scsi - Reset SCSI host controller | |
551 | * @host: InitIO host to reset | |
552 | * @seconds: Recovery time | |
553 | * | |
554 | * Perform a full reset of the SCSI subsystem. | |
555 | */ | |
556 | ||
557 | static int initio_reset_scsi(struct initio_host * host, int seconds) | |
558 | { | |
559 | outb(TSC_RST_BUS, host->addr + TUL_SCtrl0); | |
560 | ||
561 | while (!((host->jsint = inb(host->addr + TUL_SInt)) & TSS_SCSIRST_INT)) | |
562 | cpu_relax(); | |
563 | ||
564 | /* reset tulip chip */ | |
565 | outb(0, host->addr + TUL_SSignal); | |
566 | ||
567 | /* Stall for a while, wait for target's firmware ready,make it 2 sec ! */ | |
568 | /* SONY 5200 tape drive won't work if only stall for 1 sec */ | |
569 | /* FIXME: this is a very long busy wait right now */ | |
570 | initio_do_pause(seconds * HZ); | |
571 | ||
572 | inb(host->addr + TUL_SInt); | |
573 | return SCSI_RESET_SUCCESS; | |
574 | } | |
575 | ||
576 | /** | |
577 | * initio_init - set up an InitIO host adapter | |
578 | * @host: InitIO host adapter | |
579 | * @num_scbs: Number of SCBS | |
580 | * @bios_addr: BIOS address | |
581 | * | |
582 | * Set up the host adapter and devices according to the configuration | |
583 | * retrieved from the E2PROM. | |
584 | * | |
585 | * Locking: Calls E2PROM layer code which is not re-enterable so must | |
586 | * run single threaded for now. | |
587 | */ | |
588 | ||
589 | static void initio_init(struct initio_host * host, u8 *bios_addr) | |
590 | { | |
591 | int i; | |
592 | u8 *flags; | |
593 | u8 *heads; | |
594 | ||
595 | /* Get E2Prom configuration */ | |
596 | initio_read_eeprom(host->addr); | |
597 | if (i91unvramp->NVM_SCSIInfo[0].NVM_NumOfTarg == 8) | |
598 | host->max_tar = 8; | |
599 | else | |
600 | host->max_tar = 16; | |
601 | ||
602 | host->config = i91unvramp->NVM_SCSIInfo[0].NVM_ChConfig1; | |
603 | ||
604 | host->scsi_id = i91unvramp->NVM_SCSIInfo[0].NVM_ChSCSIID; | |
605 | host->idmask = ~(1 << host->scsi_id); | |
606 | ||
607 | #ifdef CHK_PARITY | |
608 | /* Enable parity error response */ | |
609 | outb(inb(host->addr + TUL_PCMD) | 0x40, host->addr + TUL_PCMD); | |
610 | #endif | |
611 | ||
612 | /* Mask all the interrupt */ | |
613 | outb(0x1F, host->addr + TUL_Mask); | |
614 | ||
615 | initio_stop_bm(host); | |
616 | /* --- Initialize the tulip --- */ | |
617 | outb(TSC_RST_CHIP, host->addr + TUL_SCtrl0); | |
618 | ||
619 | /* program HBA's SCSI ID */ | |
620 | outb(host->scsi_id << 4, host->addr + TUL_SScsiId); | |
621 | ||
622 | /* Enable Initiator Mode ,phase latch,alternate sync period mode, | |
623 | disable SCSI reset */ | |
624 | if (host->config & HCC_EN_PAR) | |
625 | host->sconf1 = (TSC_INITDEFAULT | TSC_EN_SCSI_PAR); | |
626 | else | |
627 | host->sconf1 = (TSC_INITDEFAULT); | |
628 | outb(host->sconf1, host->addr + TUL_SConfig); | |
629 | ||
630 | /* Enable HW reselect */ | |
631 | outb(TSC_HW_RESELECT, host->addr + TUL_SCtrl1); | |
632 | ||
633 | outb(0, host->addr + TUL_SPeriod); | |
634 | ||
635 | /* selection time out = 250 ms */ | |
636 | outb(153, host->addr + TUL_STimeOut); | |
637 | ||
638 | /* Enable SCSI terminator */ | |
639 | outb((host->config & (HCC_ACT_TERM1 | HCC_ACT_TERM2)), | |
640 | host->addr + TUL_XCtrl); | |
641 | outb(((host->config & HCC_AUTO_TERM) >> 4) | | |
642 | (inb(host->addr + TUL_GCTRL1) & 0xFE), | |
643 | host->addr + TUL_GCTRL1); | |
644 | ||
645 | for (i = 0, | |
646 | flags = & (i91unvramp->NVM_SCSIInfo[0].NVM_Targ0Config), | |
647 | heads = bios_addr + 0x180; | |
648 | i < host->max_tar; | |
649 | i++, flags++) { | |
650 | host->targets[i].flags = *flags & ~(TCF_SYNC_DONE | TCF_WDTR_DONE); | |
651 | if (host->targets[i].flags & TCF_EN_255) | |
652 | host->targets[i].drv_flags = TCF_DRV_255_63; | |
653 | else | |
654 | host->targets[i].drv_flags = 0; | |
655 | host->targets[i].js_period = 0; | |
656 | host->targets[i].sconfig0 = host->sconf1; | |
657 | host->targets[i].heads = *heads++; | |
658 | if (host->targets[i].heads == 255) | |
659 | host->targets[i].drv_flags = TCF_DRV_255_63; | |
660 | else | |
661 | host->targets[i].drv_flags = 0; | |
662 | host->targets[i].sectors = *heads++; | |
663 | host->targets[i].flags &= ~TCF_BUSY; | |
664 | host->act_tags[i] = 0; | |
665 | host->max_tags[i] = 0xFF; | |
666 | } /* for */ | |
667 | printk("i91u: PCI Base=0x%04X, IRQ=%d, BIOS=0x%04X0, SCSI ID=%d\n", | |
668 | host->addr, host->pci_dev->irq, | |
669 | host->bios_addr, host->scsi_id); | |
670 | /* Reset SCSI Bus */ | |
671 | if (host->config & HCC_SCSI_RESET) { | |
672 | printk(KERN_INFO "i91u: Reset SCSI Bus ... \n"); | |
673 | initio_reset_scsi(host, 10); | |
674 | } | |
675 | outb(0x17, host->addr + TUL_SCFG1); | |
676 | outb(0xE9, host->addr + TUL_SIntEnable); | |
677 | } | |
678 | ||
679 | /** | |
680 | * initio_alloc_scb - Allocate an SCB | |
681 | * @host: InitIO host we are allocating for | |
682 | * | |
683 | * Walk the SCB list for the controller and allocate a free SCB if | |
684 | * one exists. | |
685 | */ | |
686 | static struct scsi_ctrl_blk *initio_alloc_scb(struct initio_host *host) | |
687 | { | |
688 | struct scsi_ctrl_blk *scb; | |
689 | unsigned long flags; | |
690 | ||
691 | spin_lock_irqsave(&host->avail_lock, flags); | |
692 | if ((scb = host->first_avail) != NULL) { | |
693 | #if DEBUG_QUEUE | |
694 | printk("find scb at %p\n", scb); | |
695 | #endif | |
696 | if ((host->first_avail = scb->next) == NULL) | |
697 | host->last_avail = NULL; | |
698 | scb->next = NULL; | |
699 | scb->status = SCB_RENT; | |
700 | } | |
701 | spin_unlock_irqrestore(&host->avail_lock, flags); | |
702 | return scb; | |
703 | } | |
704 | ||
705 | /** | |
706 | * initio_release_scb - Release an SCB | |
707 | * @host: InitIO host that owns the SCB | |
708 | * @cmnd: SCB command block being returned | |
709 | * | |
710 | * Return an allocated SCB to the host free list | |
711 | */ | |
712 | ||
713 | static void initio_release_scb(struct initio_host * host, struct scsi_ctrl_blk * cmnd) | |
714 | { | |
715 | unsigned long flags; | |
716 | ||
717 | #if DEBUG_QUEUE | |
718 | printk("Release SCB %p; ", cmnd); | |
719 | #endif | |
720 | spin_lock_irqsave(&(host->avail_lock), flags); | |
721 | cmnd->srb = NULL; | |
722 | cmnd->status = 0; | |
723 | cmnd->next = NULL; | |
724 | if (host->last_avail != NULL) { | |
725 | host->last_avail->next = cmnd; | |
726 | host->last_avail = cmnd; | |
727 | } else { | |
728 | host->first_avail = cmnd; | |
729 | host->last_avail = cmnd; | |
730 | } | |
731 | spin_unlock_irqrestore(&(host->avail_lock), flags); | |
732 | } | |
733 | ||
734 | /***************************************************************************/ | |
735 | static void initio_append_pend_scb(struct initio_host * host, struct scsi_ctrl_blk * scbp) | |
736 | { | |
737 | ||
738 | #if DEBUG_QUEUE | |
739 | printk("Append pend SCB %p; ", scbp); | |
740 | #endif | |
741 | scbp->status = SCB_PEND; | |
742 | scbp->next = NULL; | |
743 | if (host->last_pending != NULL) { | |
744 | host->last_pending->next = scbp; | |
745 | host->last_pending = scbp; | |
746 | } else { | |
747 | host->first_pending = scbp; | |
748 | host->last_pending = scbp; | |
749 | } | |
750 | } | |
751 | ||
752 | /***************************************************************************/ | |
753 | static void initio_push_pend_scb(struct initio_host * host, struct scsi_ctrl_blk * scbp) | |
754 | { | |
755 | ||
756 | #if DEBUG_QUEUE | |
757 | printk("Push pend SCB %p; ", scbp); | |
758 | #endif | |
759 | scbp->status = SCB_PEND; | |
760 | if ((scbp->next = host->first_pending) != NULL) { | |
761 | host->first_pending = scbp; | |
762 | } else { | |
763 | host->first_pending = scbp; | |
764 | host->last_pending = scbp; | |
765 | } | |
766 | } | |
767 | ||
768 | static struct scsi_ctrl_blk *initio_find_first_pend_scb(struct initio_host * host) | |
769 | { | |
770 | struct scsi_ctrl_blk *first; | |
771 | ||
772 | ||
773 | first = host->first_pending; | |
774 | while (first != NULL) { | |
775 | if (first->opcode != ExecSCSI) | |
776 | return first; | |
777 | if (first->tagmsg == 0) { | |
778 | if ((host->act_tags[first->target] == 0) && | |
779 | !(host->targets[first->target].flags & TCF_BUSY)) | |
780 | return first; | |
781 | } else { | |
782 | if ((host->act_tags[first->target] >= | |
783 | host->max_tags[first->target]) | | |
784 | (host->targets[first->target].flags & TCF_BUSY)) { | |
785 | first = first->next; | |
786 | continue; | |
787 | } | |
788 | return first; | |
789 | } | |
790 | first = first->next; | |
791 | } | |
792 | return first; | |
793 | } | |
794 | ||
795 | static void initio_unlink_pend_scb(struct initio_host * host, struct scsi_ctrl_blk * scb) | |
796 | { | |
797 | struct scsi_ctrl_blk *tmp, *prev; | |
798 | ||
799 | #if DEBUG_QUEUE | |
800 | printk("unlink pend SCB %p; ", scb); | |
801 | #endif | |
802 | ||
803 | prev = tmp = host->first_pending; | |
804 | while (tmp != NULL) { | |
805 | if (scb == tmp) { /* Unlink this SCB */ | |
806 | if (tmp == host->first_pending) { | |
807 | if ((host->first_pending = tmp->next) == NULL) | |
808 | host->last_pending = NULL; | |
809 | } else { | |
810 | prev->next = tmp->next; | |
811 | if (tmp == host->last_pending) | |
812 | host->last_pending = prev; | |
813 | } | |
814 | tmp->next = NULL; | |
815 | break; | |
816 | } | |
817 | prev = tmp; | |
818 | tmp = tmp->next; | |
819 | } | |
820 | } | |
821 | ||
822 | static void initio_append_busy_scb(struct initio_host * host, struct scsi_ctrl_blk * scbp) | |
823 | { | |
824 | ||
825 | #if DEBUG_QUEUE | |
826 | printk("append busy SCB %p; ", scbp); | |
827 | #endif | |
828 | if (scbp->tagmsg) | |
829 | host->act_tags[scbp->target]++; | |
830 | else | |
831 | host->targets[scbp->target].flags |= TCF_BUSY; | |
832 | scbp->status = SCB_BUSY; | |
833 | scbp->next = NULL; | |
834 | if (host->last_busy != NULL) { | |
835 | host->last_busy->next = scbp; | |
836 | host->last_busy = scbp; | |
837 | } else { | |
838 | host->first_busy = scbp; | |
839 | host->last_busy = scbp; | |
840 | } | |
841 | } | |
842 | ||
843 | /***************************************************************************/ | |
844 | static struct scsi_ctrl_blk *initio_pop_busy_scb(struct initio_host * host) | |
845 | { | |
846 | struct scsi_ctrl_blk *tmp; | |
847 | ||
848 | ||
849 | if ((tmp = host->first_busy) != NULL) { | |
850 | if ((host->first_busy = tmp->next) == NULL) | |
851 | host->last_busy = NULL; | |
852 | tmp->next = NULL; | |
853 | if (tmp->tagmsg) | |
854 | host->act_tags[tmp->target]--; | |
855 | else | |
856 | host->targets[tmp->target].flags &= ~TCF_BUSY; | |
857 | } | |
858 | #if DEBUG_QUEUE | |
859 | printk("Pop busy SCB %p; ", tmp); | |
860 | #endif | |
861 | return tmp; | |
862 | } | |
863 | ||
864 | /***************************************************************************/ | |
865 | static void initio_unlink_busy_scb(struct initio_host * host, struct scsi_ctrl_blk * scb) | |
866 | { | |
867 | struct scsi_ctrl_blk *tmp, *prev; | |
868 | ||
869 | #if DEBUG_QUEUE | |
870 | printk("unlink busy SCB %p; ", scb); | |
871 | #endif | |
872 | ||
873 | prev = tmp = host->first_busy; | |
874 | while (tmp != NULL) { | |
875 | if (scb == tmp) { /* Unlink this SCB */ | |
876 | if (tmp == host->first_busy) { | |
877 | if ((host->first_busy = tmp->next) == NULL) | |
878 | host->last_busy = NULL; | |
879 | } else { | |
880 | prev->next = tmp->next; | |
881 | if (tmp == host->last_busy) | |
882 | host->last_busy = prev; | |
883 | } | |
884 | tmp->next = NULL; | |
885 | if (tmp->tagmsg) | |
886 | host->act_tags[tmp->target]--; | |
887 | else | |
888 | host->targets[tmp->target].flags &= ~TCF_BUSY; | |
889 | break; | |
890 | } | |
891 | prev = tmp; | |
892 | tmp = tmp->next; | |
893 | } | |
894 | return; | |
895 | } | |
896 | ||
897 | struct scsi_ctrl_blk *initio_find_busy_scb(struct initio_host * host, u16 tarlun) | |
898 | { | |
899 | struct scsi_ctrl_blk *tmp, *prev; | |
900 | u16 scbp_tarlun; | |
901 | ||
902 | ||
903 | prev = tmp = host->first_busy; | |
904 | while (tmp != NULL) { | |
905 | scbp_tarlun = (tmp->lun << 8) | (tmp->target); | |
906 | if (scbp_tarlun == tarlun) { /* Unlink this SCB */ | |
907 | break; | |
908 | } | |
909 | prev = tmp; | |
910 | tmp = tmp->next; | |
911 | } | |
912 | #if DEBUG_QUEUE | |
913 | printk("find busy SCB %p; ", tmp); | |
914 | #endif | |
915 | return tmp; | |
916 | } | |
917 | ||
918 | static void initio_append_done_scb(struct initio_host * host, struct scsi_ctrl_blk * scbp) | |
919 | { | |
920 | #if DEBUG_QUEUE | |
921 | printk("append done SCB %p; ", scbp); | |
922 | #endif | |
923 | ||
924 | scbp->status = SCB_DONE; | |
925 | scbp->next = NULL; | |
926 | if (host->last_done != NULL) { | |
927 | host->last_done->next = scbp; | |
928 | host->last_done = scbp; | |
929 | } else { | |
930 | host->first_done = scbp; | |
931 | host->last_done = scbp; | |
932 | } | |
933 | } | |
934 | ||
935 | struct scsi_ctrl_blk *initio_find_done_scb(struct initio_host * host) | |
936 | { | |
937 | struct scsi_ctrl_blk *tmp; | |
938 | ||
939 | if ((tmp = host->first_done) != NULL) { | |
940 | if ((host->first_done = tmp->next) == NULL) | |
941 | host->last_done = NULL; | |
942 | tmp->next = NULL; | |
943 | } | |
944 | #if DEBUG_QUEUE | |
945 | printk("find done SCB %p; ",tmp); | |
946 | #endif | |
947 | return tmp; | |
948 | } | |
949 | ||
950 | static int initio_abort_srb(struct initio_host * host, struct scsi_cmnd *srbp) | |
951 | { | |
952 | unsigned long flags; | |
953 | struct scsi_ctrl_blk *tmp, *prev; | |
954 | ||
955 | spin_lock_irqsave(&host->semaph_lock, flags); | |
956 | ||
957 | if ((host->semaph == 0) && (host->active == NULL)) { | |
958 | /* disable Jasmin SCSI Int */ | |
959 | outb(0x1F, host->addr + TUL_Mask); | |
960 | spin_unlock_irqrestore(&host->semaph_lock, flags); | |
961 | /* FIXME: synchronize_irq needed ? */ | |
962 | tulip_main(host); | |
963 | spin_lock_irqsave(&host->semaph_lock, flags); | |
964 | host->semaph = 1; | |
965 | outb(0x0F, host->addr + TUL_Mask); | |
966 | spin_unlock_irqrestore(&host->semaph_lock, flags); | |
967 | return SCSI_ABORT_SNOOZE; | |
968 | } | |
969 | prev = tmp = host->first_pending; /* Check Pend queue */ | |
970 | while (tmp != NULL) { | |
971 | /* 07/27/98 */ | |
972 | if (tmp->srb == srbp) { | |
973 | if (tmp == host->active) { | |
974 | spin_unlock_irqrestore(&host->semaph_lock, flags); | |
975 | return SCSI_ABORT_BUSY; | |
976 | } else if (tmp == host->first_pending) { | |
977 | if ((host->first_pending = tmp->next) == NULL) | |
978 | host->last_pending = NULL; | |
979 | } else { | |
980 | prev->next = tmp->next; | |
981 | if (tmp == host->last_pending) | |
982 | host->last_pending = prev; | |
983 | } | |
984 | tmp->hastat = HOST_ABORTED; | |
985 | tmp->flags |= SCF_DONE; | |
986 | if (tmp->flags & SCF_POST) | |
987 | (*tmp->post) ((u8 *) host, (u8 *) tmp); | |
988 | spin_unlock_irqrestore(&host->semaph_lock, flags); | |
989 | return SCSI_ABORT_SUCCESS; | |
990 | } | |
991 | prev = tmp; | |
992 | tmp = tmp->next; | |
993 | } | |
994 | ||
995 | prev = tmp = host->first_busy; /* Check Busy queue */ | |
996 | while (tmp != NULL) { | |
997 | if (tmp->srb == srbp) { | |
998 | if (tmp == host->active) { | |
999 | spin_unlock_irqrestore(&host->semaph_lock, flags); | |
1000 | return SCSI_ABORT_BUSY; | |
1001 | } else if (tmp->tagmsg == 0) { | |
1002 | spin_unlock_irqrestore(&host->semaph_lock, flags); | |
1003 | return SCSI_ABORT_BUSY; | |
1004 | } else { | |
1005 | host->act_tags[tmp->target]--; | |
1006 | if (tmp == host->first_busy) { | |
1007 | if ((host->first_busy = tmp->next) == NULL) | |
1008 | host->last_busy = NULL; | |
1009 | } else { | |
1010 | prev->next = tmp->next; | |
1011 | if (tmp == host->last_busy) | |
1012 | host->last_busy = prev; | |
1013 | } | |
1014 | tmp->next = NULL; | |
1015 | ||
1016 | ||
1017 | tmp->hastat = HOST_ABORTED; | |
1018 | tmp->flags |= SCF_DONE; | |
1019 | if (tmp->flags & SCF_POST) | |
1020 | (*tmp->post) ((u8 *) host, (u8 *) tmp); | |
1021 | spin_unlock_irqrestore(&host->semaph_lock, flags); | |
1022 | return SCSI_ABORT_SUCCESS; | |
1023 | } | |
1024 | } | |
1025 | prev = tmp; | |
1026 | tmp = tmp->next; | |
1027 | } | |
1028 | spin_unlock_irqrestore(&host->semaph_lock, flags); | |
1029 | return SCSI_ABORT_NOT_RUNNING; | |
1030 | } | |
1031 | ||
1032 | /***************************************************************************/ | |
1033 | static int initio_bad_seq(struct initio_host * host) | |
1034 | { | |
1035 | struct scsi_ctrl_blk *scb; | |
1036 | ||
1037 | printk("initio_bad_seg c=%d\n", host->index); | |
1038 | ||
1039 | if ((scb = host->active) != NULL) { | |
1040 | initio_unlink_busy_scb(host, scb); | |
1041 | scb->hastat = HOST_BAD_PHAS; | |
1042 | scb->tastat = 0; | |
1043 | initio_append_done_scb(host, scb); | |
1044 | } | |
1045 | initio_stop_bm(host); | |
1046 | initio_reset_scsi(host, 8); /* 7/29/98 */ | |
1047 | return initio_post_scsi_rst(host); | |
1048 | } | |
1049 | ||
1050 | ||
1051 | /************************************************************************/ | |
1052 | static void initio_exec_scb(struct initio_host * host, struct scsi_ctrl_blk * scb) | |
1053 | { | |
1054 | unsigned long flags; | |
1055 | ||
1056 | scb->mode = 0; | |
1057 | ||
1058 | scb->sgidx = 0; | |
1059 | scb->sgmax = scb->sglen; | |
1060 | ||
1061 | spin_lock_irqsave(&host->semaph_lock, flags); | |
1062 | ||
1063 | initio_append_pend_scb(host, scb); /* Append this SCB to Pending queue */ | |
1064 | ||
1065 | /* VVVVV 07/21/98 */ | |
1066 | if (host->semaph == 1) { | |
1067 | /* Disable Jasmin SCSI Int */ | |
1068 | outb(0x1F, host->addr + TUL_Mask); | |
1069 | host->semaph = 0; | |
1070 | spin_unlock_irqrestore(&host->semaph_lock, flags); | |
1071 | ||
1072 | tulip_main(host); | |
1073 | ||
1074 | spin_lock_irqsave(&host->semaph_lock, flags); | |
1075 | host->semaph = 1; | |
1076 | outb(0x0F, host->addr + TUL_Mask); | |
1077 | } | |
1078 | spin_unlock_irqrestore(&host->semaph_lock, flags); | |
1079 | return; | |
1080 | } | |
1081 | ||
1082 | /***************************************************************************/ | |
1083 | static int initio_isr(struct initio_host * host) | |
1084 | { | |
1085 | if (inb(host->addr + TUL_Int) & TSS_INT_PENDING) { | |
1086 | if (host->semaph == 1) { | |
1087 | outb(0x1F, host->addr + TUL_Mask); | |
1088 | /* Disable Tulip SCSI Int */ | |
1089 | host->semaph = 0; | |
1090 | ||
1091 | tulip_main(host); | |
1092 | ||
1093 | host->semaph = 1; | |
1094 | outb(0x0F, host->addr + TUL_Mask); | |
1095 | return 1; | |
1096 | } | |
1097 | } | |
1098 | return 0; | |
1099 | } | |
1100 | ||
1101 | static int tulip_main(struct initio_host * host) | |
1102 | { | |
1103 | struct scsi_ctrl_blk *scb; | |
1104 | ||
1105 | for (;;) { | |
1106 | tulip_scsi(host); /* Call tulip_scsi */ | |
1107 | ||
1108 | /* Walk the list of completed SCBs */ | |
1109 | while ((scb = initio_find_done_scb(host)) != NULL) { /* find done entry */ | |
1110 | if (scb->tastat == INI_QUEUE_FULL) { | |
1111 | host->max_tags[scb->target] = | |
1112 | host->act_tags[scb->target] - 1; | |
1113 | scb->tastat = 0; | |
1114 | initio_append_pend_scb(host, scb); | |
1115 | continue; | |
1116 | } | |
1117 | if (!(scb->mode & SCM_RSENS)) { /* not in auto req. sense mode */ | |
1118 | if (scb->tastat == 2) { | |
1119 | ||
1120 | /* clr sync. nego flag */ | |
1121 | ||
1122 | if (scb->flags & SCF_SENSE) { | |
1123 | u8 len; | |
1124 | len = scb->senselen; | |
1125 | if (len == 0) | |
1126 | len = 1; | |
1127 | scb->buflen = scb->senselen; | |
1128 | scb->bufptr = scb->senseptr; | |
1129 | scb->flags &= ~(SCF_SG | SCF_DIR); /* for xfer_data_in */ | |
1130 | /* so, we won't report wrong direction in xfer_data_in, | |
1131 | and won't report HOST_DO_DU in state_6 */ | |
1132 | scb->mode = SCM_RSENS; | |
1133 | scb->ident &= 0xBF; /* Disable Disconnect */ | |
1134 | scb->tagmsg = 0; | |
1135 | scb->tastat = 0; | |
1136 | scb->cdblen = 6; | |
1137 | scb->cdb[0] = SCSICMD_RequestSense; | |
1138 | scb->cdb[1] = 0; | |
1139 | scb->cdb[2] = 0; | |
1140 | scb->cdb[3] = 0; | |
1141 | scb->cdb[4] = len; | |
1142 | scb->cdb[5] = 0; | |
1143 | initio_push_pend_scb(host, scb); | |
1144 | break; | |
1145 | } | |
1146 | } | |
1147 | } else { /* in request sense mode */ | |
1148 | ||
1149 | if (scb->tastat == 2) { /* check contition status again after sending | |
1150 | requset sense cmd 0x3 */ | |
1151 | scb->hastat = HOST_BAD_PHAS; | |
1152 | } | |
1153 | scb->tastat = 2; | |
1154 | } | |
1155 | scb->flags |= SCF_DONE; | |
1156 | if (scb->flags & SCF_POST) { | |
1157 | /* FIXME: only one post method and lose casts */ | |
1158 | (*scb->post) ((u8 *) host, (u8 *) scb); | |
1159 | } | |
1160 | } /* while */ | |
1161 | /* find_active: */ | |
1162 | if (inb(host->addr + TUL_SStatus0) & TSS_INT_PENDING) | |
1163 | continue; | |
1164 | if (host->active) /* return to OS and wait for xfer_done_ISR/Selected_ISR */ | |
1165 | return 1; /* return to OS, enable interrupt */ | |
1166 | /* Check pending SCB */ | |
1167 | if (initio_find_first_pend_scb(host) == NULL) | |
1168 | return 1; /* return to OS, enable interrupt */ | |
1169 | } /* End of for loop */ | |
1170 | /* statement won't reach here */ | |
1171 | } | |
1172 | ||
1173 | static void tulip_scsi(struct initio_host * host) | |
1174 | { | |
1175 | struct scsi_ctrl_blk *scb; | |
1176 | struct target_control *active_tc; | |
1177 | ||
1178 | /* make sure to service interrupt asap */ | |
1179 | if ((host->jsstatus0 = inb(host->addr + TUL_SStatus0)) & TSS_INT_PENDING) { | |
1180 | host->phase = host->jsstatus0 & TSS_PH_MASK; | |
1181 | host->jsstatus1 = inb(host->addr + TUL_SStatus1); | |
1182 | host->jsint = inb(host->addr + TUL_SInt); | |
1183 | if (host->jsint & TSS_SCSIRST_INT) { /* SCSI bus reset detected */ | |
1184 | int_initio_scsi_rst(host); | |
1185 | return; | |
1186 | } | |
1187 | if (host->jsint & TSS_RESEL_INT) { /* if selected/reselected interrupt */ | |
1188 | if (int_initio_resel(host) == 0) | |
1189 | initio_next_state(host); | |
1190 | return; | |
1191 | } | |
1192 | if (host->jsint & TSS_SEL_TIMEOUT) { | |
1193 | int_initio_busfree(host); | |
1194 | return; | |
1195 | } | |
1196 | if (host->jsint & TSS_DISC_INT) { /* BUS disconnection */ | |
1197 | int_initio_busfree(host); /* unexpected bus free or sel timeout */ | |
1198 | return; | |
1199 | } | |
1200 | if (host->jsint & (TSS_FUNC_COMP | TSS_BUS_SERV)) { /* func complete or Bus service */ | |
1201 | if ((scb = host->active) != NULL) | |
1202 | initio_next_state(host); | |
1203 | return; | |
1204 | } | |
1205 | } | |
1206 | if (host->active != NULL) | |
1207 | return; | |
1208 | ||
1209 | if ((scb = initio_find_first_pend_scb(host)) == NULL) | |
1210 | return; | |
1211 | ||
1212 | /* program HBA's SCSI ID & target SCSI ID */ | |
1213 | outb((host->scsi_id << 4) | (scb->target & 0x0F), | |
1214 | host->addr + TUL_SScsiId); | |
1215 | if (scb->opcode == ExecSCSI) { | |
1216 | active_tc = &host->targets[scb->target]; | |
1217 | ||
1218 | if (scb->tagmsg) | |
1219 | active_tc->drv_flags |= TCF_DRV_EN_TAG; | |
1220 | else | |
1221 | active_tc->drv_flags &= ~TCF_DRV_EN_TAG; | |
1222 | ||
1223 | outb(active_tc->js_period, host->addr + TUL_SPeriod); | |
1224 | if ((active_tc->flags & (TCF_WDTR_DONE | TCF_NO_WDTR)) == 0) { /* do wdtr negotiation */ | |
1225 | initio_select_atn_stop(host, scb); | |
1226 | } else { | |
1227 | if ((active_tc->flags & (TCF_SYNC_DONE | TCF_NO_SYNC_NEGO)) == 0) { /* do sync negotiation */ | |
1228 | initio_select_atn_stop(host, scb); | |
1229 | } else { | |
1230 | if (scb->tagmsg) | |
1231 | initio_select_atn3(host, scb); | |
1232 | else | |
1233 | initio_select_atn(host, scb); | |
1234 | } | |
1235 | } | |
1236 | if (scb->flags & SCF_POLL) { | |
1237 | while (wait_tulip(host) != -1) { | |
1238 | if (initio_next_state(host) == -1) | |
1239 | break; | |
1240 | } | |
1241 | } | |
1242 | } else if (scb->opcode == BusDevRst) { | |
1243 | initio_select_atn_stop(host, scb); | |
1244 | scb->next_state = 8; | |
1245 | if (scb->flags & SCF_POLL) { | |
1246 | while (wait_tulip(host) != -1) { | |
1247 | if (initio_next_state(host) == -1) | |
1248 | break; | |
1249 | } | |
1250 | } | |
1251 | } else if (scb->opcode == AbortCmd) { | |
1252 | if (initio_abort_srb(host, scb->srb) != 0) { | |
1253 | initio_unlink_pend_scb(host, scb); | |
1254 | initio_release_scb(host, scb); | |
1255 | } else { | |
1256 | scb->opcode = BusDevRst; | |
1257 | initio_select_atn_stop(host, scb); | |
1258 | scb->next_state = 8; | |
1259 | } | |
1260 | } else { | |
1261 | initio_unlink_pend_scb(host, scb); | |
1262 | scb->hastat = 0x16; /* bad command */ | |
1263 | initio_append_done_scb(host, scb); | |
1264 | } | |
1265 | return; | |
1266 | } | |
1267 | ||
1268 | /** | |
1269 | * initio_next_state - Next SCSI state | |
1270 | * @host: InitIO host we are processing | |
1271 | * | |
1272 | * Progress the active command block along the state machine | |
1273 | * until we hit a state which we must wait for activity to occur. | |
1274 | * | |
1275 | * Returns zero or a negative code. | |
1276 | */ | |
1277 | ||
1278 | static int initio_next_state(struct initio_host * host) | |
1279 | { | |
1280 | int next; | |
1281 | ||
1282 | next = host->active->next_state; | |
1283 | for (;;) { | |
1284 | switch (next) { | |
1285 | case 1: | |
1286 | next = initio_state_1(host); | |
1287 | break; | |
1288 | case 2: | |
1289 | next = initio_state_2(host); | |
1290 | break; | |
1291 | case 3: | |
1292 | next = initio_state_3(host); | |
1293 | break; | |
1294 | case 4: | |
1295 | next = initio_state_4(host); | |
1296 | break; | |
1297 | case 5: | |
1298 | next = initio_state_5(host); | |
1299 | break; | |
1300 | case 6: | |
1301 | next = initio_state_6(host); | |
1302 | break; | |
1303 | case 7: | |
1304 | next = initio_state_7(host); | |
1305 | break; | |
1306 | case 8: | |
1307 | return initio_bus_device_reset(host); | |
1308 | default: | |
1309 | return initio_bad_seq(host); | |
1310 | } | |
1311 | if (next <= 0) | |
1312 | return next; | |
1313 | } | |
1314 | } | |
1315 | ||
1316 | ||
1317 | /** | |
1318 | * initio_state_1 - SCSI state machine | |
1319 | * @host: InitIO host we are controlling | |
1320 | * | |
1321 | * Perform SCSI state processing for Select/Attention/Stop | |
1322 | */ | |
1323 | ||
1324 | static int initio_state_1(struct initio_host * host) | |
1325 | { | |
1326 | struct scsi_ctrl_blk *scb = host->active; | |
1327 | struct target_control *active_tc = host->active_tc; | |
1328 | #if DEBUG_STATE | |
1329 | printk("-s1-"); | |
1330 | #endif | |
1331 | ||
1332 | /* Move the SCB from pending to busy */ | |
1333 | initio_unlink_pend_scb(host, scb); | |
1334 | initio_append_busy_scb(host, scb); | |
1335 | ||
1336 | outb(active_tc->sconfig0, host->addr + TUL_SConfig ); | |
1337 | /* ATN on */ | |
1338 | if (host->phase == MSG_OUT) { | |
1339 | outb(TSC_EN_BUS_IN | TSC_HW_RESELECT, host->addr + TUL_SCtrl1); | |
1340 | outb(scb->ident, host->addr + TUL_SFifo); | |
1341 | ||
1342 | if (scb->tagmsg) { | |
1343 | outb(scb->tagmsg, host->addr + TUL_SFifo); | |
1344 | outb(scb->tagid, host->addr + TUL_SFifo); | |
1345 | } | |
1346 | if ((active_tc->flags & (TCF_WDTR_DONE | TCF_NO_WDTR)) == 0) { | |
1347 | active_tc->flags |= TCF_WDTR_DONE; | |
1348 | outb(MSG_EXTEND, host->addr + TUL_SFifo); | |
1349 | outb(2, host->addr + TUL_SFifo); /* Extended msg length */ | |
1350 | outb(3, host->addr + TUL_SFifo); /* Sync request */ | |
1351 | outb(1, host->addr + TUL_SFifo); /* Start from 16 bits */ | |
1352 | } else if ((active_tc->flags & (TCF_SYNC_DONE | TCF_NO_SYNC_NEGO)) == 0) { | |
1353 | active_tc->flags |= TCF_SYNC_DONE; | |
1354 | outb(MSG_EXTEND, host->addr + TUL_SFifo); | |
1355 | outb(3, host->addr + TUL_SFifo); /* extended msg length */ | |
1356 | outb(1, host->addr + TUL_SFifo); /* sync request */ | |
1357 | outb(initio_rate_tbl[active_tc->flags & TCF_SCSI_RATE], host->addr + TUL_SFifo); | |
1358 | outb(MAX_OFFSET, host->addr + TUL_SFifo); /* REQ/ACK offset */ | |
1359 | } | |
1360 | outb(TSC_XF_FIFO_OUT, host->addr + TUL_SCmd); | |
1361 | if (wait_tulip(host) == -1) | |
1362 | return -1; | |
1363 | } | |
1364 | outb(TSC_FLUSH_FIFO, host->addr + TUL_SCtrl0); | |
1365 | outb((inb(host->addr + TUL_SSignal) & (TSC_SET_ACK | 7)), host->addr + TUL_SSignal); | |
1366 | /* Into before CDB xfer */ | |
1367 | return 3; | |
1368 | } | |
1369 | ||
1370 | ||
1371 | /** | |
1372 | * initio_state_2 - SCSI state machine | |
1373 | * @host: InitIO host we are controlling | |
1374 | * | |
1375 | * state after selection with attention | |
1376 | * state after selection with attention3 | |
1377 | */ | |
1378 | ||
1379 | static int initio_state_2(struct initio_host * host) | |
1380 | { | |
1381 | struct scsi_ctrl_blk *scb = host->active; | |
1382 | struct target_control *active_tc = host->active_tc; | |
1383 | #if DEBUG_STATE | |
1384 | printk("-s2-"); | |
1385 | #endif | |
1386 | ||
1387 | initio_unlink_pend_scb(host, scb); | |
1388 | initio_append_busy_scb(host, scb); | |
1389 | ||
1390 | outb(active_tc->sconfig0, host->addr + TUL_SConfig); | |
1391 | ||
1392 | if (host->jsstatus1 & TSS_CMD_PH_CMP) | |
1393 | return 4; | |
1394 | ||
1395 | outb(TSC_FLUSH_FIFO, host->addr + TUL_SCtrl0); | |
1396 | outb((inb(host->addr + TUL_SSignal) & (TSC_SET_ACK | 7)), host->addr + TUL_SSignal); | |
1397 | /* Into before CDB xfer */ | |
1398 | return 3; | |
1399 | } | |
1400 | ||
1401 | /** | |
1402 | * initio_state_3 - SCSI state machine | |
1403 | * @host: InitIO host we are controlling | |
1404 | * | |
1405 | * state before CDB xfer is done | |
1406 | */ | |
1407 | ||
1408 | static int initio_state_3(struct initio_host * host) | |
1409 | { | |
1410 | struct scsi_ctrl_blk *scb = host->active; | |
1411 | struct target_control *active_tc = host->active_tc; | |
1412 | int i; | |
1413 | ||
1414 | #if DEBUG_STATE | |
1415 | printk("-s3-"); | |
1416 | #endif | |
1417 | for (;;) { | |
1418 | switch (host->phase) { | |
1419 | case CMD_OUT: /* Command out phase */ | |
1420 | for (i = 0; i < (int) scb->cdblen; i++) | |
1421 | outb(scb->cdb[i], host->addr + TUL_SFifo); | |
1422 | outb(TSC_XF_FIFO_OUT, host->addr + TUL_SCmd); | |
1423 | if (wait_tulip(host) == -1) | |
1424 | return -1; | |
1425 | if (host->phase == CMD_OUT) | |
1426 | return initio_bad_seq(host); | |
1427 | return 4; | |
1428 | ||
1429 | case MSG_IN: /* Message in phase */ | |
1430 | scb->next_state = 3; | |
1431 | if (initio_msgin(host) == -1) | |
1432 | return -1; | |
1433 | break; | |
1434 | ||
1435 | case STATUS_IN: /* Status phase */ | |
1436 | if (initio_status_msg(host) == -1) | |
1437 | return -1; | |
1438 | break; | |
1439 | ||
1440 | case MSG_OUT: /* Message out phase */ | |
1441 | if (active_tc->flags & (TCF_SYNC_DONE | TCF_NO_SYNC_NEGO)) { | |
1442 | outb(MSG_NOP, host->addr + TUL_SFifo); /* msg nop */ | |
1443 | outb(TSC_XF_FIFO_OUT, host->addr + TUL_SCmd); | |
1444 | if (wait_tulip(host) == -1) | |
1445 | return -1; | |
1446 | } else { | |
1447 | active_tc->flags |= TCF_SYNC_DONE; | |
1448 | ||
1449 | outb(MSG_EXTEND, host->addr + TUL_SFifo); | |
1450 | outb(3, host->addr + TUL_SFifo); /* ext. msg len */ | |
1451 | outb(1, host->addr + TUL_SFifo); /* sync request */ | |
1452 | outb(initio_rate_tbl[active_tc->flags & TCF_SCSI_RATE], host->addr + TUL_SFifo); | |
1453 | outb(MAX_OFFSET, host->addr + TUL_SFifo); /* REQ/ACK offset */ | |
1454 | outb(TSC_XF_FIFO_OUT, host->addr + TUL_SCmd); | |
1455 | if (wait_tulip(host) == -1) | |
1456 | return -1; | |
1457 | outb(TSC_FLUSH_FIFO, host->addr + TUL_SCtrl0); | |
1458 | outb(inb(host->addr + TUL_SSignal) & (TSC_SET_ACK | 7), host->addr + TUL_SSignal); | |
1459 | ||
1460 | } | |
1461 | break; | |
1462 | default: | |
1463 | return initio_bad_seq(host); | |
1464 | } | |
1465 | } | |
1466 | } | |
1467 | ||
1468 | /** | |
1469 | * initio_state_4 - SCSI state machine | |
1470 | * @host: InitIO host we are controlling | |
1471 | * | |
1472 | * SCSI state machine. State 4 | |
1473 | */ | |
1474 | ||
1475 | static int initio_state_4(struct initio_host * host) | |
1476 | { | |
1477 | struct scsi_ctrl_blk *scb = host->active; | |
1478 | ||
1479 | #if DEBUG_STATE | |
1480 | printk("-s4-"); | |
1481 | #endif | |
1482 | if ((scb->flags & SCF_DIR) == SCF_NO_XF) { | |
1483 | return 6; /* Go to state 6 (After data) */ | |
1484 | } | |
1485 | for (;;) { | |
1486 | if (scb->buflen == 0) | |
1487 | return 6; | |
1488 | ||
1489 | switch (host->phase) { | |
1490 | ||
1491 | case STATUS_IN: /* Status phase */ | |
1492 | if ((scb->flags & SCF_DIR) != 0) /* if direction bit set then report data underrun */ | |
1493 | scb->hastat = HOST_DO_DU; | |
1494 | if ((initio_status_msg(host)) == -1) | |
1495 | return -1; | |
1496 | break; | |
1497 | ||
1498 | case MSG_IN: /* Message in phase */ | |
1499 | scb->next_state = 0x4; | |
1500 | if (initio_msgin(host) == -1) | |
1501 | return -1; | |
1502 | break; | |
1503 | ||
1504 | case MSG_OUT: /* Message out phase */ | |
1505 | if (host->jsstatus0 & TSS_PAR_ERROR) { | |
1506 | scb->buflen = 0; | |
1507 | scb->hastat = HOST_DO_DU; | |
1508 | if (initio_msgout_ide(host) == -1) | |
1509 | return -1; | |
1510 | return 6; | |
1511 | } else { | |
1512 | outb(MSG_NOP, host->addr + TUL_SFifo); /* msg nop */ | |
1513 | outb(TSC_XF_FIFO_OUT, host->addr + TUL_SCmd); | |
1514 | if (wait_tulip(host) == -1) | |
1515 | return -1; | |
1516 | } | |
1517 | break; | |
1518 | ||
1519 | case DATA_IN: /* Data in phase */ | |
1520 | return initio_xfer_data_in(host); | |
1521 | ||
1522 | case DATA_OUT: /* Data out phase */ | |
1523 | return initio_xfer_data_out(host); | |
1524 | ||
1525 | default: | |
1526 | return initio_bad_seq(host); | |
1527 | } | |
1528 | } | |
1529 | } | |
1530 | ||
1531 | ||
1532 | /** | |
1533 | * initio_state_5 - SCSI state machine | |
1534 | * @host: InitIO host we are controlling | |
1535 | * | |
1536 | * State after dma xfer done or phase change before xfer done | |
1537 | */ | |
1538 | ||
1539 | static int initio_state_5(struct initio_host * host) | |
1540 | { | |
1541 | struct scsi_ctrl_blk *scb = host->active; | |
1542 | long cnt, xcnt; /* cannot use unsigned !! code: if (xcnt < 0) */ | |
1543 | ||
1544 | #if DEBUG_STATE | |
1545 | printk("-s5-"); | |
1546 | #endif | |
1547 | /*------ get remaining count -------*/ | |
1548 | cnt = inl(host->addr + TUL_SCnt0) & 0x0FFFFFF; | |
1549 | ||
1550 | if (inb(host->addr + TUL_XCmd) & 0x20) { | |
1551 | /* ----------------------- DATA_IN ----------------------------- */ | |
1552 | /* check scsi parity error */ | |
1553 | if (host->jsstatus0 & TSS_PAR_ERROR) | |
1554 | scb->hastat = HOST_DO_DU; | |
1555 | if (inb(host->addr + TUL_XStatus) & XPEND) { /* DMA xfer pending, Send STOP */ | |
1556 | /* tell Hardware scsi xfer has been terminated */ | |
1557 | outb(inb(host->addr + TUL_XCtrl) | 0x80, host->addr + TUL_XCtrl); | |
1558 | /* wait until DMA xfer not pending */ | |
1559 | while (inb(host->addr + TUL_XStatus) & XPEND) | |
1560 | cpu_relax(); | |
1561 | } | |
1562 | } else { | |
1563 | /*-------- DATA OUT -----------*/ | |
1564 | if ((inb(host->addr + TUL_SStatus1) & TSS_XFER_CMP) == 0) { | |
1565 | if (host->active_tc->js_period & TSC_WIDE_SCSI) | |
1566 | cnt += (inb(host->addr + TUL_SFifoCnt) & 0x1F) << 1; | |
1567 | else | |
1568 | cnt += (inb(host->addr + TUL_SFifoCnt) & 0x1F); | |
1569 | } | |
1570 | if (inb(host->addr + TUL_XStatus) & XPEND) { /* if DMA xfer is pending, abort DMA xfer */ | |
1571 | outb(TAX_X_ABT, host->addr + TUL_XCmd); | |
1572 | /* wait Abort DMA xfer done */ | |
1573 | while ((inb(host->addr + TUL_Int) & XABT) == 0) | |
1574 | cpu_relax(); | |
1575 | } | |
1576 | if ((cnt == 1) && (host->phase == DATA_OUT)) { | |
1577 | outb(TSC_XF_FIFO_OUT, host->addr + TUL_SCmd); | |
1578 | if (wait_tulip(host) == -1) | |
1579 | return -1; | |
1580 | cnt = 0; | |
1581 | } else { | |
1582 | if ((inb(host->addr + TUL_SStatus1) & TSS_XFER_CMP) == 0) | |
1583 | outb(TSC_FLUSH_FIFO, host->addr + TUL_SCtrl0); | |
1584 | } | |
1585 | } | |
1586 | if (cnt == 0) { | |
1587 | scb->buflen = 0; | |
1588 | return 6; /* After Data */ | |
1589 | } | |
1590 | /* Update active data pointer */ | |
1591 | xcnt = (long) scb->buflen - cnt; /* xcnt== bytes already xferred */ | |
1592 | scb->buflen = (u32) cnt; /* cnt == bytes left to be xferred */ | |
1593 | if (scb->flags & SCF_SG) { | |
1594 | struct sg_entry *sgp; | |
1595 | unsigned long i; | |
1596 | ||
1597 | sgp = &scb->sglist[scb->sgidx]; | |
1598 | for (i = scb->sgidx; i < scb->sgmax; sgp++, i++) { | |
1599 | xcnt -= (long) sgp->len; | |
1600 | if (xcnt < 0) { /* this sgp xfer half done */ | |
1601 | xcnt += (long) sgp->len; /* xcnt == bytes xferred in this sgp */ | |
1602 | sgp->data += (u32) xcnt; /* new ptr to be xfer */ | |
1603 | sgp->len -= (u32) xcnt; /* new len to be xfer */ | |
1604 | scb->bufptr += ((u32) (i - scb->sgidx) << 3); | |
1605 | /* new SG table ptr */ | |
1606 | scb->sglen = (u8) (scb->sgmax - i); | |
1607 | /* new SG table len */ | |
1608 | scb->sgidx = (u16) i; | |
1609 | /* for next disc and come in this loop */ | |
1610 | return 4; /* Go to state 4 */ | |
1611 | } | |
1612 | /* else (xcnt >= 0 , i.e. this sgp already xferred */ | |
1613 | } /* for */ | |
1614 | return 6; /* Go to state 6 */ | |
1615 | } else { | |
1616 | scb->bufptr += (u32) xcnt; | |
1617 | } | |
1618 | return 4; /* Go to state 4 */ | |
1619 | } | |
1620 | ||
1621 | /** | |
1622 | * initio_state_6 - SCSI state machine | |
1623 | * @host: InitIO host we are controlling | |
1624 | * | |
1625 | * State after Data phase | |
1626 | */ | |
1627 | ||
1628 | static int initio_state_6(struct initio_host * host) | |
1629 | { | |
1630 | struct scsi_ctrl_blk *scb = host->active; | |
1631 | ||
1632 | #if DEBUG_STATE | |
1633 | printk("-s6-"); | |
1634 | #endif | |
1635 | for (;;) { | |
1636 | switch (host->phase) { | |
1637 | case STATUS_IN: /* Status phase */ | |
1638 | if ((initio_status_msg(host)) == -1) | |
1639 | return -1; | |
1640 | break; | |
1641 | ||
1642 | case MSG_IN: /* Message in phase */ | |
1643 | scb->next_state = 6; | |
1644 | if ((initio_msgin(host)) == -1) | |
1645 | return -1; | |
1646 | break; | |
1647 | ||
1648 | case MSG_OUT: /* Message out phase */ | |
1649 | outb(MSG_NOP, host->addr + TUL_SFifo); /* msg nop */ | |
1650 | outb(TSC_XF_FIFO_OUT, host->addr + TUL_SCmd); | |
1651 | if (wait_tulip(host) == -1) | |
1652 | return -1; | |
1653 | break; | |
1654 | ||
1655 | case DATA_IN: /* Data in phase */ | |
1656 | return initio_xpad_in(host); | |
1657 | ||
1658 | case DATA_OUT: /* Data out phase */ | |
1659 | return initio_xpad_out(host); | |
1660 | ||
1661 | default: | |
1662 | return initio_bad_seq(host); | |
1663 | } | |
1664 | } | |
1665 | } | |
1666 | ||
1667 | /** | |
1668 | * initio_state_7 - SCSI state machine | |
1669 | * @host: InitIO host we are controlling | |
1670 | * | |
1671 | */ | |
1672 | ||
1673 | int initio_state_7(struct initio_host * host) | |
1674 | { | |
1675 | int cnt, i; | |
1676 | ||
1677 | #if DEBUG_STATE | |
1678 | printk("-s7-"); | |
1679 | #endif | |
1680 | /* flush SCSI FIFO */ | |
1681 | cnt = inb(host->addr + TUL_SFifoCnt) & 0x1F; | |
1682 | if (cnt) { | |
1683 | for (i = 0; i < cnt; i++) | |
1684 | inb(host->addr + TUL_SFifo); | |
1685 | } | |
1686 | switch (host->phase) { | |
1687 | case DATA_IN: /* Data in phase */ | |
1688 | case DATA_OUT: /* Data out phase */ | |
1689 | return initio_bad_seq(host); | |
1690 | default: | |
1691 | return 6; /* Go to state 6 */ | |
1692 | } | |
1693 | } | |
1694 | ||
1695 | /** | |
1696 | * initio_xfer_data_in - Commence data input | |
1697 | * @host: InitIO host in use | |
1698 | * | |
1699 | * Commence a block of data transfer. The transfer itself will | |
1700 | * be managed by the controller and we will get a completion (or | |
1701 | * failure) interrupt. | |
1702 | */ | |
1703 | static int initio_xfer_data_in(struct initio_host * host) | |
1704 | { | |
1705 | struct scsi_ctrl_blk *scb = host->active; | |
1706 | ||
1707 | if ((scb->flags & SCF_DIR) == SCF_DOUT) | |
1708 | return 6; /* wrong direction */ | |
1709 | ||
1710 | outl(scb->buflen, host->addr + TUL_SCnt0); | |
1711 | outb(TSC_XF_DMA_IN, host->addr + TUL_SCmd); /* 7/25/95 */ | |
1712 | ||
1713 | if (scb->flags & SCF_SG) { /* S/G xfer */ | |
1714 | outl(((u32) scb->sglen) << 3, host->addr + TUL_XCntH); | |
1715 | outl(scb->bufptr, host->addr + TUL_XAddH); | |
1716 | outb(TAX_SG_IN, host->addr + TUL_XCmd); | |
1717 | } else { | |
1718 | outl(scb->buflen, host->addr + TUL_XCntH); | |
1719 | outl(scb->bufptr, host->addr + TUL_XAddH); | |
1720 | outb(TAX_X_IN, host->addr + TUL_XCmd); | |
1721 | } | |
1722 | scb->next_state = 0x5; | |
1723 | return 0; /* return to OS, wait xfer done , let jas_isr come in */ | |
1724 | } | |
1725 | ||
1726 | /** | |
1727 | * initio_xfer_data_out - Commence data output | |
1728 | * @host: InitIO host in use | |
1729 | * | |
1730 | * Commence a block of data transfer. The transfer itself will | |
1731 | * be managed by the controller and we will get a completion (or | |
1732 | * failure) interrupt. | |
1733 | */ | |
1734 | ||
1735 | static int initio_xfer_data_out(struct initio_host * host) | |
1736 | { | |
1737 | struct scsi_ctrl_blk *scb = host->active; | |
1738 | ||
1739 | if ((scb->flags & SCF_DIR) == SCF_DIN) | |
1740 | return 6; /* wrong direction */ | |
1741 | ||
1742 | outl(scb->buflen, host->addr + TUL_SCnt0); | |
1743 | outb(TSC_XF_DMA_OUT, host->addr + TUL_SCmd); | |
1744 | ||
1745 | if (scb->flags & SCF_SG) { /* S/G xfer */ | |
1746 | outl(((u32) scb->sglen) << 3, host->addr + TUL_XCntH); | |
1747 | outl(scb->bufptr, host->addr + TUL_XAddH); | |
1748 | outb(TAX_SG_OUT, host->addr + TUL_XCmd); | |
1749 | } else { | |
1750 | outl(scb->buflen, host->addr + TUL_XCntH); | |
1751 | outl(scb->bufptr, host->addr + TUL_XAddH); | |
1752 | outb(TAX_X_OUT, host->addr + TUL_XCmd); | |
1753 | } | |
1754 | ||
1755 | scb->next_state = 0x5; | |
1756 | return 0; /* return to OS, wait xfer done , let jas_isr come in */ | |
1757 | } | |
1758 | ||
1759 | int initio_xpad_in(struct initio_host * host) | |
1760 | { | |
1761 | struct scsi_ctrl_blk *scb = host->active; | |
1762 | struct target_control *active_tc = host->active_tc; | |
1763 | ||
1764 | if ((scb->flags & SCF_DIR) != SCF_NO_DCHK) | |
1765 | scb->hastat = HOST_DO_DU; /* over run */ | |
1766 | for (;;) { | |
1767 | if (active_tc->js_period & TSC_WIDE_SCSI) | |
1768 | outl(2, host->addr + TUL_SCnt0); | |
1769 | else | |
1770 | outl(1, host->addr + TUL_SCnt0); | |
1771 | ||
1772 | outb(TSC_XF_FIFO_IN, host->addr + TUL_SCmd); | |
1773 | if (wait_tulip(host) == -1) | |
1774 | return -1; | |
1775 | if (host->phase != DATA_IN) { | |
1776 | outb(TSC_FLUSH_FIFO, host->addr + TUL_SCtrl0); | |
1777 | return 6; | |
1778 | } | |
1779 | inb(host->addr + TUL_SFifo); | |
1780 | } | |
1781 | } | |
1782 | ||
1783 | int initio_xpad_out(struct initio_host * host) | |
1784 | { | |
1785 | struct scsi_ctrl_blk *scb = host->active; | |
1786 | struct target_control *active_tc = host->active_tc; | |
1787 | ||
1788 | if ((scb->flags & SCF_DIR) != SCF_NO_DCHK) | |
1789 | scb->hastat = HOST_DO_DU; /* over run */ | |
1790 | for (;;) { | |
1791 | if (active_tc->js_period & TSC_WIDE_SCSI) | |
1792 | outl(2, host->addr + TUL_SCnt0); | |
1793 | else | |
1794 | outl(1, host->addr + TUL_SCnt0); | |
1795 | ||
1796 | outb(0, host->addr + TUL_SFifo); | |
1797 | outb(TSC_XF_FIFO_OUT, host->addr + TUL_SCmd); | |
1798 | if ((wait_tulip(host)) == -1) | |
1799 | return -1; | |
1800 | if (host->phase != DATA_OUT) { /* Disable wide CPU to allow read 16 bits */ | |
1801 | outb(TSC_HW_RESELECT, host->addr + TUL_SCtrl1); | |
1802 | outb(TSC_FLUSH_FIFO, host->addr + TUL_SCtrl0); | |
1803 | return 6; | |
1804 | } | |
1805 | } | |
1806 | } | |
1807 | ||
1808 | int initio_status_msg(struct initio_host * host) | |
1809 | { /* status & MSG_IN */ | |
1810 | struct scsi_ctrl_blk *scb = host->active; | |
1811 | u8 msg; | |
1812 | ||
1813 | outb(TSC_CMD_COMP, host->addr + TUL_SCmd); | |
1814 | if (wait_tulip(host) == -1) | |
1815 | return -1; | |
1816 | ||
1817 | /* get status */ | |
1818 | scb->tastat = inb(host->addr + TUL_SFifo); | |
1819 | ||
1820 | if (host->phase == MSG_OUT) { | |
1821 | if (host->jsstatus0 & TSS_PAR_ERROR) | |
1822 | outb(MSG_PARITY, host->addr + TUL_SFifo); | |
1823 | else | |
1824 | outb(MSG_NOP, host->addr + TUL_SFifo); | |
1825 | outb(TSC_XF_FIFO_OUT, host->addr + TUL_SCmd); | |
1826 | return wait_tulip(host); | |
1827 | } | |
1828 | if (host->phase == MSG_IN) { | |
1829 | msg = inb(host->addr + TUL_SFifo); | |
1830 | if (host->jsstatus0 & TSS_PAR_ERROR) { /* Parity error */ | |
1831 | if ((initio_msgin_accept(host)) == -1) | |
1832 | return -1; | |
1833 | if (host->phase != MSG_OUT) | |
1834 | return initio_bad_seq(host); | |
1835 | outb(MSG_PARITY, host->addr + TUL_SFifo); | |
1836 | outb(TSC_XF_FIFO_OUT, host->addr + TUL_SCmd); | |
1837 | return wait_tulip(host); | |
1838 | } | |
1839 | if (msg == 0) { /* Command complete */ | |
1840 | ||
1841 | if ((scb->tastat & 0x18) == 0x10) /* No link support */ | |
1842 | return initio_bad_seq(host); | |
1843 | outb(TSC_FLUSH_FIFO, host->addr + TUL_SCtrl0); | |
1844 | outb(TSC_MSG_ACCEPT, host->addr + TUL_SCmd); | |
1845 | return initio_wait_done_disc(host); | |
1846 | ||
1847 | } | |
1848 | if (msg == MSG_LINK_COMP || msg == MSG_LINK_FLAG) { | |
1849 | if ((scb->tastat & 0x18) == 0x10) | |
1850 | return initio_msgin_accept(host); | |
1851 | } | |
1852 | } | |
1853 | return initio_bad_seq(host); | |
1854 | } | |
1855 | ||
1856 | ||
1857 | /* scsi bus free */ | |
1858 | int int_initio_busfree(struct initio_host * host) | |
1859 | { | |
1860 | struct scsi_ctrl_blk *scb = host->active; | |
1861 | ||
1862 | if (scb != NULL) { | |
1863 | if (scb->status & SCB_SELECT) { /* selection timeout */ | |
1864 | initio_unlink_pend_scb(host, scb); | |
1865 | scb->hastat = HOST_SEL_TOUT; | |
1866 | initio_append_done_scb(host, scb); | |
1867 | } else { /* Unexpected bus free */ | |
1868 | initio_unlink_busy_scb(host, scb); | |
1869 | scb->hastat = HOST_BUS_FREE; | |
1870 | initio_append_done_scb(host, scb); | |
1871 | } | |
1872 | host->active = NULL; | |
1873 | host->active_tc = NULL; | |
1874 | } | |
1875 | outb(TSC_FLUSH_FIFO, host->addr + TUL_SCtrl0); /* Flush SCSI FIFO */ | |
1876 | outb(TSC_INITDEFAULT, host->addr + TUL_SConfig); | |
1877 | outb(TSC_HW_RESELECT, host->addr + TUL_SCtrl1); /* Enable HW reselect */ | |
1878 | return -1; | |
1879 | } | |
1880 | ||
1881 | ||
1882 | /** | |
1883 | * int_initio_scsi_rst - SCSI reset occurred | |
1884 | * @host: Host seeing the reset | |
1885 | * | |
1886 | * A SCSI bus reset has occurred. Clean up any pending transfer | |
1887 | * the hardware is doing by DMA and then abort all active and | |
1888 | * disconnected commands. The mid layer should sort the rest out | |
1889 | * for us | |
1890 | */ | |
1891 | ||
1892 | static int int_initio_scsi_rst(struct initio_host * host) | |
1893 | { | |
1894 | struct scsi_ctrl_blk *scb; | |
1895 | int i; | |
1896 | ||
1897 | /* if DMA xfer is pending, abort DMA xfer */ | |
1898 | if (inb(host->addr + TUL_XStatus) & 0x01) { | |
1899 | outb(TAX_X_ABT | TAX_X_CLR_FIFO, host->addr + TUL_XCmd); | |
1900 | /* wait Abort DMA xfer done */ | |
1901 | while ((inb(host->addr + TUL_Int) & 0x04) == 0) | |
1902 | cpu_relax(); | |
1903 | outb(TSC_FLUSH_FIFO, host->addr + TUL_SCtrl0); | |
1904 | } | |
1905 | /* Abort all active & disconnected scb */ | |
1906 | while ((scb = initio_pop_busy_scb(host)) != NULL) { | |
1907 | scb->hastat = HOST_BAD_PHAS; | |
1908 | initio_append_done_scb(host, scb); | |
1909 | } | |
1910 | host->active = NULL; | |
1911 | host->active_tc = NULL; | |
1912 | ||
1913 | /* clr sync nego. done flag */ | |
1914 | for (i = 0; i < host->max_tar; i++) | |
1915 | host->targets[i].flags &= ~(TCF_SYNC_DONE | TCF_WDTR_DONE); | |
1916 | return -1; | |
1917 | } | |
1918 | ||
1919 | /** | |
1920 | * int_initio_scsi_resel - Reselection occurred | |
1921 | * @host: InitIO host adapter | |
1922 | * | |
1923 | * A SCSI reselection event has been signalled and the interrupt | |
1924 | * is now being processed. Work out which command block needs attention | |
1925 | * and continue processing that command. | |
1926 | */ | |
1927 | ||
1928 | int int_initio_resel(struct initio_host * host) | |
1929 | { | |
1930 | struct scsi_ctrl_blk *scb; | |
1931 | struct target_control *active_tc; | |
1932 | u8 tag, msg = 0; | |
1933 | u8 tar, lun; | |
1934 | ||
1935 | if ((scb = host->active) != NULL) { | |
1936 | /* FIXME: Why check and not just clear ? */ | |
1937 | if (scb->status & SCB_SELECT) /* if waiting for selection complete */ | |
1938 | scb->status &= ~SCB_SELECT; | |
1939 | host->active = NULL; | |
1940 | } | |
1941 | /* --------- get target id---------------------- */ | |
1942 | tar = inb(host->addr + TUL_SBusId); | |
1943 | /* ------ get LUN from Identify message----------- */ | |
1944 | lun = inb(host->addr + TUL_SIdent) & 0x0F; | |
1945 | /* 07/22/98 from 0x1F -> 0x0F */ | |
1946 | active_tc = &host->targets[tar]; | |
1947 | host->active_tc = active_tc; | |
1948 | outb(active_tc->sconfig0, host->addr + TUL_SConfig); | |
1949 | outb(active_tc->js_period, host->addr + TUL_SPeriod); | |
1950 | ||
1951 | /* ------------- tag queueing ? ------------------- */ | |
1952 | if (active_tc->drv_flags & TCF_DRV_EN_TAG) { | |
1953 | if ((initio_msgin_accept(host)) == -1) | |
1954 | return -1; | |
1955 | if (host->phase != MSG_IN) | |
1956 | goto no_tag; | |
1957 | outl(1, host->addr + TUL_SCnt0); | |
1958 | outb(TSC_XF_FIFO_IN, host->addr + TUL_SCmd); | |
1959 | if (wait_tulip(host) == -1) | |
1960 | return -1; | |
1961 | msg = inb(host->addr + TUL_SFifo); /* Read Tag Message */ | |
1962 | ||
1963 | if (msg < MSG_STAG || msg > MSG_OTAG) /* Is simple Tag */ | |
1964 | goto no_tag; | |
1965 | ||
1966 | if (initio_msgin_accept(host) == -1) | |
1967 | return -1; | |
1968 | ||
1969 | if (host->phase != MSG_IN) | |
1970 | goto no_tag; | |
1971 | ||
1972 | outl(1, host->addr + TUL_SCnt0); | |
1973 | outb(TSC_XF_FIFO_IN, host->addr + TUL_SCmd); | |
1974 | if (wait_tulip(host) == -1) | |
1975 | return -1; | |
1976 | tag = inb(host->addr + TUL_SFifo); /* Read Tag ID */ | |
1977 | scb = host->scb + tag; | |
1978 | if (scb->target != tar || scb->lun != lun) { | |
1979 | return initio_msgout_abort_tag(host); | |
1980 | } | |
1981 | if (scb->status != SCB_BUSY) { /* 03/24/95 */ | |
1982 | return initio_msgout_abort_tag(host); | |
1983 | } | |
1984 | host->active = scb; | |
1985 | if ((initio_msgin_accept(host)) == -1) | |
1986 | return -1; | |
1987 | } else { /* No tag */ | |
1988 | no_tag: | |
1989 | if ((scb = initio_find_busy_scb(host, tar | (lun << 8))) == NULL) { | |
1990 | return initio_msgout_abort_targ(host); | |
1991 | } | |
1992 | host->active = scb; | |
1993 | if (!(active_tc->drv_flags & TCF_DRV_EN_TAG)) { | |
1994 | if ((initio_msgin_accept(host)) == -1) | |
1995 | return -1; | |
1996 | } | |
1997 | } | |
1998 | return 0; | |
1999 | } | |
2000 | ||
2001 | /** | |
2002 | * int_initio_bad_seq - out of phase | |
2003 | * @host: InitIO host flagging event | |
2004 | * | |
2005 | * We have ended up out of phase somehow. Reset the host controller | |
2006 | * and throw all our toys out of the pram. Let the midlayer clean up | |
2007 | */ | |
2008 | ||
2009 | static int int_initio_bad_seq(struct initio_host * host) | |
2010 | { /* target wrong phase */ | |
2011 | struct scsi_ctrl_blk *scb; | |
2012 | int i; | |
2013 | ||
2014 | initio_reset_scsi(host, 10); | |
2015 | ||
2016 | while ((scb = initio_pop_busy_scb(host)) != NULL) { | |
2017 | scb->hastat = HOST_BAD_PHAS; | |
2018 | initio_append_done_scb(host, scb); | |
2019 | } | |
2020 | for (i = 0; i < host->max_tar; i++) | |
2021 | host->targets[i].flags &= ~(TCF_SYNC_DONE | TCF_WDTR_DONE); | |
2022 | return -1; | |
2023 | } | |
2024 | ||
2025 | ||
2026 | /** | |
2027 | * initio_msgout_abort_targ - abort a tag | |
2028 | * @host: InitIO host | |
2029 | * | |
2030 | * Abort when the target/lun does not match or when our SCB is not | |
2031 | * busy. Used by untagged commands. | |
2032 | */ | |
2033 | ||
2034 | static int initio_msgout_abort_targ(struct initio_host * host) | |
2035 | { | |
2036 | ||
2037 | outb(((inb(host->addr + TUL_SSignal) & (TSC_SET_ACK | 7)) | TSC_SET_ATN), host->addr + TUL_SSignal); | |
2038 | if (initio_msgin_accept(host) == -1) | |
2039 | return -1; | |
2040 | if (host->phase != MSG_OUT) | |
2041 | return initio_bad_seq(host); | |
2042 | ||
2043 | outb(MSG_ABORT, host->addr + TUL_SFifo); | |
2044 | outb(TSC_XF_FIFO_OUT, host->addr + TUL_SCmd); | |
2045 | ||
2046 | return initio_wait_disc(host); | |
2047 | } | |
2048 | ||
2049 | /** | |
2050 | * initio_msgout_abort_tag - abort a tag | |
2051 | * @host: InitIO host | |
2052 | * | |
2053 | * Abort when the target/lun does not match or when our SCB is not | |
2054 | * busy. Used for tagged commands. | |
2055 | */ | |
2056 | ||
2057 | static int initio_msgout_abort_tag(struct initio_host * host) | |
2058 | { | |
2059 | ||
2060 | outb(((inb(host->addr + TUL_SSignal) & (TSC_SET_ACK | 7)) | TSC_SET_ATN), host->addr + TUL_SSignal); | |
2061 | if (initio_msgin_accept(host) == -1) | |
2062 | return -1; | |
2063 | if (host->phase != MSG_OUT) | |
2064 | return initio_bad_seq(host); | |
2065 | ||
2066 | outb(MSG_ABORT_TAG, host->addr + TUL_SFifo); | |
2067 | outb(TSC_XF_FIFO_OUT, host->addr + TUL_SCmd); | |
2068 | ||
2069 | return initio_wait_disc(host); | |
2070 | ||
2071 | } | |
2072 | ||
2073 | /** | |
2074 | * initio_msgin - Message in | |
2075 | * @host: InitIO Host | |
2076 | * | |
2077 | * Process incoming message | |
2078 | */ | |
2079 | static int initio_msgin(struct initio_host * host) | |
2080 | { | |
2081 | struct target_control *active_tc; | |
2082 | ||
2083 | for (;;) { | |
2084 | outb(TSC_FLUSH_FIFO, host->addr + TUL_SCtrl0); | |
2085 | ||
2086 | outl(1, host->addr + TUL_SCnt0); | |
2087 | outb(TSC_XF_FIFO_IN, host->addr + TUL_SCmd); | |
2088 | if (wait_tulip(host) == -1) | |
2089 | return -1; | |
2090 | ||
2091 | switch (inb(host->addr + TUL_SFifo)) { | |
2092 | case MSG_DISC: /* Disconnect msg */ | |
2093 | outb(TSC_MSG_ACCEPT, host->addr + TUL_SCmd); | |
2094 | return initio_wait_disc(host); | |
2095 | case MSG_SDP: | |
2096 | case MSG_RESTORE: | |
2097 | case MSG_NOP: | |
2098 | initio_msgin_accept(host); | |
2099 | break; | |
2100 | case MSG_REJ: /* Clear ATN first */ | |
2101 | outb((inb(host->addr + TUL_SSignal) & (TSC_SET_ACK | 7)), | |
2102 | host->addr + TUL_SSignal); | |
2103 | active_tc = host->active_tc; | |
2104 | if ((active_tc->flags & (TCF_SYNC_DONE | TCF_NO_SYNC_NEGO)) == 0) /* do sync nego */ | |
2105 | outb(((inb(host->addr + TUL_SSignal) & (TSC_SET_ACK | 7)) | TSC_SET_ATN), | |
2106 | host->addr + TUL_SSignal); | |
2107 | initio_msgin_accept(host); | |
2108 | break; | |
2109 | case MSG_EXTEND: /* extended msg */ | |
2110 | initio_msgin_extend(host); | |
2111 | break; | |
2112 | case MSG_IGNOREWIDE: | |
2113 | initio_msgin_accept(host); | |
2114 | break; | |
2115 | case MSG_COMP: | |
2116 | outb(TSC_FLUSH_FIFO, host->addr + TUL_SCtrl0); | |
2117 | outb(TSC_MSG_ACCEPT, host->addr + TUL_SCmd); | |
2118 | return initio_wait_done_disc(host); | |
2119 | default: | |
2120 | initio_msgout_reject(host); | |
2121 | break; | |
2122 | } | |
2123 | if (host->phase != MSG_IN) | |
2124 | return host->phase; | |
2125 | } | |
2126 | /* statement won't reach here */ | |
2127 | } | |
2128 | ||
2129 | static int initio_msgout_reject(struct initio_host * host) | |
2130 | { | |
2131 | outb(((inb(host->addr + TUL_SSignal) & (TSC_SET_ACK | 7)) | TSC_SET_ATN), host->addr + TUL_SSignal); | |
2132 | ||
2133 | if (initio_msgin_accept(host) == -1) | |
2134 | return -1; | |
2135 | ||
2136 | if (host->phase == MSG_OUT) { | |
2137 | outb(MSG_REJ, host->addr + TUL_SFifo); /* Msg reject */ | |
2138 | outb(TSC_XF_FIFO_OUT, host->addr + TUL_SCmd); | |
2139 | return wait_tulip(host); | |
2140 | } | |
2141 | return host->phase; | |
2142 | } | |
2143 | ||
2144 | static int initio_msgout_ide(struct initio_host * host) | |
2145 | { | |
2146 | outb(MSG_IDE, host->addr + TUL_SFifo); /* Initiator Detected Error */ | |
2147 | outb(TSC_XF_FIFO_OUT, host->addr + TUL_SCmd); | |
2148 | return wait_tulip(host); | |
2149 | } | |
2150 | ||
2151 | static int initio_msgin_extend(struct initio_host * host) | |
2152 | { | |
2153 | u8 len, idx; | |
2154 | ||
2155 | if (initio_msgin_accept(host) != MSG_IN) | |
2156 | return host->phase; | |
2157 | ||
2158 | /* Get extended msg length */ | |
2159 | outl(1, host->addr + TUL_SCnt0); | |
2160 | outb(TSC_XF_FIFO_IN, host->addr + TUL_SCmd); | |
2161 | if (wait_tulip(host) == -1) | |
2162 | return -1; | |
2163 | ||
2164 | len = inb(host->addr + TUL_SFifo); | |
2165 | host->msg[0] = len; | |
2166 | for (idx = 1; len != 0; len--) { | |
2167 | ||
2168 | if ((initio_msgin_accept(host)) != MSG_IN) | |
2169 | return host->phase; | |
2170 | outl(1, host->addr + TUL_SCnt0); | |
2171 | outb(TSC_XF_FIFO_IN, host->addr + TUL_SCmd); | |
2172 | if (wait_tulip(host) == -1) | |
2173 | return -1; | |
2174 | host->msg[idx++] = inb(host->addr + TUL_SFifo); | |
2175 | } | |
2176 | if (host->msg[1] == 1) { /* if it's synchronous data transfer request */ | |
2177 | u8 r; | |
2178 | if (host->msg[0] != 3) /* if length is not right */ | |
2179 | return initio_msgout_reject(host); | |
2180 | if (host->active_tc->flags & TCF_NO_SYNC_NEGO) { /* Set OFFSET=0 to do async, nego back */ | |
2181 | host->msg[3] = 0; | |
2182 | } else { | |
2183 | if (initio_msgin_sync(host) == 0 && | |
2184 | (host->active_tc->flags & TCF_SYNC_DONE)) { | |
2185 | initio_sync_done(host); | |
2186 | return initio_msgin_accept(host); | |
2187 | } | |
2188 | } | |
2189 | ||
2190 | r = inb(host->addr + TUL_SSignal); | |
2191 | outb((r & (TSC_SET_ACK | 7)) | TSC_SET_ATN, | |
2192 | host->addr + TUL_SSignal); | |
2193 | if (initio_msgin_accept(host) != MSG_OUT) | |
2194 | return host->phase; | |
2195 | /* sync msg out */ | |
2196 | outb(TSC_FLUSH_FIFO, host->addr + TUL_SCtrl0); | |
2197 | ||
2198 | initio_sync_done(host); | |
2199 | ||
2200 | outb(MSG_EXTEND, host->addr + TUL_SFifo); | |
2201 | outb(3, host->addr + TUL_SFifo); | |
2202 | outb(1, host->addr + TUL_SFifo); | |
2203 | outb(host->msg[2], host->addr + TUL_SFifo); | |
2204 | outb(host->msg[3], host->addr + TUL_SFifo); | |
2205 | outb(TSC_XF_FIFO_OUT, host->addr + TUL_SCmd); | |
2206 | return wait_tulip(host); | |
2207 | } | |
2208 | if (host->msg[0] != 2 || host->msg[1] != 3) | |
2209 | return initio_msgout_reject(host); | |
2210 | /* if it's WIDE DATA XFER REQ */ | |
2211 | if (host->active_tc->flags & TCF_NO_WDTR) { | |
2212 | host->msg[2] = 0; | |
2213 | } else { | |
2214 | if (host->msg[2] > 2) /* > 32 bits */ | |
2215 | return initio_msgout_reject(host); | |
2216 | if (host->msg[2] == 2) { /* == 32 */ | |
2217 | host->msg[2] = 1; | |
2218 | } else { | |
2219 | if ((host->active_tc->flags & TCF_NO_WDTR) == 0) { | |
2220 | wdtr_done(host); | |
2221 | if ((host->active_tc->flags & (TCF_SYNC_DONE | TCF_NO_SYNC_NEGO)) == 0) | |
2222 | outb(((inb(host->addr + TUL_SSignal) & (TSC_SET_ACK | 7)) | TSC_SET_ATN), host->addr + TUL_SSignal); | |
2223 | return initio_msgin_accept(host); | |
2224 | } | |
2225 | } | |
2226 | } | |
2227 | outb(((inb(host->addr + TUL_SSignal) & (TSC_SET_ACK | 7)) | TSC_SET_ATN), host->addr + TUL_SSignal); | |
2228 | ||
2229 | if (initio_msgin_accept(host) != MSG_OUT) | |
2230 | return host->phase; | |
2231 | /* WDTR msg out */ | |
2232 | outb(MSG_EXTEND, host->addr + TUL_SFifo); | |
2233 | outb(2, host->addr + TUL_SFifo); | |
2234 | outb(3, host->addr + TUL_SFifo); | |
2235 | outb(host->msg[2], host->addr + TUL_SFifo); | |
2236 | outb(TSC_XF_FIFO_OUT, host->addr + TUL_SCmd); | |
2237 | return wait_tulip(host); | |
2238 | } | |
2239 | ||
2240 | static int initio_msgin_sync(struct initio_host * host) | |
2241 | { | |
2242 | char default_period; | |
2243 | ||
2244 | default_period = initio_rate_tbl[host->active_tc->flags & TCF_SCSI_RATE]; | |
2245 | if (host->msg[3] > MAX_OFFSET) { | |
2246 | host->msg[3] = MAX_OFFSET; | |
2247 | if (host->msg[2] < default_period) { | |
2248 | host->msg[2] = default_period; | |
2249 | return 1; | |
2250 | } | |
2251 | if (host->msg[2] >= 59) /* Change to async */ | |
2252 | host->msg[3] = 0; | |
2253 | return 1; | |
2254 | } | |
2255 | /* offset requests asynchronous transfers ? */ | |
2256 | if (host->msg[3] == 0) { | |
2257 | return 0; | |
2258 | } | |
2259 | if (host->msg[2] < default_period) { | |
2260 | host->msg[2] = default_period; | |
2261 | return 1; | |
2262 | } | |
2263 | if (host->msg[2] >= 59) { | |
2264 | host->msg[3] = 0; | |
2265 | return 1; | |
2266 | } | |
2267 | return 0; | |
2268 | } | |
2269 | ||
2270 | static int wdtr_done(struct initio_host * host) | |
2271 | { | |
2272 | host->active_tc->flags &= ~TCF_SYNC_DONE; | |
2273 | host->active_tc->flags |= TCF_WDTR_DONE; | |
2274 | ||
2275 | host->active_tc->js_period = 0; | |
2276 | if (host->msg[2]) /* if 16 bit */ | |
2277 | host->active_tc->js_period |= TSC_WIDE_SCSI; | |
2278 | host->active_tc->sconfig0 &= ~TSC_ALT_PERIOD; | |
2279 | outb(host->active_tc->sconfig0, host->addr + TUL_SConfig); | |
2280 | outb(host->active_tc->js_period, host->addr + TUL_SPeriod); | |
2281 | ||
2282 | return 1; | |
2283 | } | |
2284 | ||
2285 | static int initio_sync_done(struct initio_host * host) | |
2286 | { | |
2287 | int i; | |
2288 | ||
2289 | host->active_tc->flags |= TCF_SYNC_DONE; | |
2290 | ||
2291 | if (host->msg[3]) { | |
2292 | host->active_tc->js_period |= host->msg[3]; | |
2293 | for (i = 0; i < 8; i++) { | |
2294 | if (initio_rate_tbl[i] >= host->msg[2]) /* pick the big one */ | |
2295 | break; | |
2296 | } | |
2297 | host->active_tc->js_period |= (i << 4); | |
2298 | host->active_tc->sconfig0 |= TSC_ALT_PERIOD; | |
2299 | } | |
2300 | outb(host->active_tc->sconfig0, host->addr + TUL_SConfig); | |
2301 | outb(host->active_tc->js_period, host->addr + TUL_SPeriod); | |
2302 | ||
2303 | return -1; | |
2304 | } | |
2305 | ||
2306 | ||
2307 | static int initio_post_scsi_rst(struct initio_host * host) | |
2308 | { | |
2309 | struct scsi_ctrl_blk *scb; | |
2310 | struct target_control *active_tc; | |
2311 | int i; | |
2312 | ||
2313 | host->active = NULL; | |
2314 | host->active_tc = NULL; | |
2315 | host->flags = 0; | |
2316 | ||
2317 | while ((scb = initio_pop_busy_scb(host)) != NULL) { | |
2318 | scb->hastat = HOST_BAD_PHAS; | |
2319 | initio_append_done_scb(host, scb); | |
2320 | } | |
2321 | /* clear sync done flag */ | |
2322 | active_tc = &host->targets[0]; | |
2323 | for (i = 0; i < host->max_tar; active_tc++, i++) { | |
2324 | active_tc->flags &= ~(TCF_SYNC_DONE | TCF_WDTR_DONE); | |
2325 | /* Initialize the sync. xfer register values to an asyn xfer */ | |
2326 | active_tc->js_period = 0; | |
2327 | active_tc->sconfig0 = host->sconf1; | |
2328 | host->act_tags[0] = 0; /* 07/22/98 */ | |
2329 | host->targets[i].flags &= ~TCF_BUSY; /* 07/22/98 */ | |
2330 | } /* for */ | |
2331 | ||
2332 | return -1; | |
2333 | } | |
2334 | ||
2335 | static void initio_select_atn_stop(struct initio_host * host, struct scsi_ctrl_blk * scb) | |
2336 | { | |
2337 | scb->status |= SCB_SELECT; | |
2338 | scb->next_state = 0x1; | |
2339 | host->active = scb; | |
2340 | host->active_tc = &host->targets[scb->target]; | |
2341 | outb(TSC_SELATNSTOP, host->addr + TUL_SCmd); | |
2342 | } | |
2343 | ||
2344 | ||
2345 | static void initio_select_atn(struct initio_host * host, struct scsi_ctrl_blk * scb) | |
2346 | { | |
2347 | int i; | |
2348 | ||
2349 | scb->status |= SCB_SELECT; | |
2350 | scb->next_state = 0x2; | |
2351 | ||
2352 | outb(scb->ident, host->addr + TUL_SFifo); | |
2353 | for (i = 0; i < (int) scb->cdblen; i++) | |
2354 | outb(scb->cdb[i], host->addr + TUL_SFifo); | |
2355 | host->active_tc = &host->targets[scb->target]; | |
2356 | host->active = scb; | |
2357 | outb(TSC_SEL_ATN, host->addr + TUL_SCmd); | |
2358 | } | |
2359 | ||
2360 | static void initio_select_atn3(struct initio_host * host, struct scsi_ctrl_blk * scb) | |
2361 | { | |
2362 | int i; | |
2363 | ||
2364 | scb->status |= SCB_SELECT; | |
2365 | scb->next_state = 0x2; | |
2366 | ||
2367 | outb(scb->ident, host->addr + TUL_SFifo); | |
2368 | outb(scb->tagmsg, host->addr + TUL_SFifo); | |
2369 | outb(scb->tagid, host->addr + TUL_SFifo); | |
2370 | for (i = 0; i < scb->cdblen; i++) | |
2371 | outb(scb->cdb[i], host->addr + TUL_SFifo); | |
2372 | host->active_tc = &host->targets[scb->target]; | |
2373 | host->active = scb; | |
2374 | outb(TSC_SEL_ATN3, host->addr + TUL_SCmd); | |
2375 | } | |
2376 | ||
2377 | /** | |
2378 | * initio_bus_device_reset - SCSI Bus Device Reset | |
2379 | * @host: InitIO host to reset | |
2380 | * | |
2381 | * Perform a device reset and abort all pending SCBs for the | |
2382 | * victim device | |
2383 | */ | |
2384 | int initio_bus_device_reset(struct initio_host * host) | |
2385 | { | |
2386 | struct scsi_ctrl_blk *scb = host->active; | |
2387 | struct target_control *active_tc = host->active_tc; | |
2388 | struct scsi_ctrl_blk *tmp, *prev; | |
2389 | u8 tar; | |
2390 | ||
2391 | if (host->phase != MSG_OUT) | |
2392 | return int_initio_bad_seq(host); /* Unexpected phase */ | |
2393 | ||
2394 | initio_unlink_pend_scb(host, scb); | |
2395 | initio_release_scb(host, scb); | |
2396 | ||
2397 | ||
2398 | tar = scb->target; /* target */ | |
2399 | active_tc->flags &= ~(TCF_SYNC_DONE | TCF_WDTR_DONE | TCF_BUSY); | |
2400 | /* clr sync. nego & WDTR flags 07/22/98 */ | |
2401 | ||
2402 | /* abort all SCB with same target */ | |
2403 | prev = tmp = host->first_busy; /* Check Busy queue */ | |
2404 | while (tmp != NULL) { | |
2405 | if (tmp->target == tar) { | |
2406 | /* unlink it */ | |
2407 | if (tmp == host->first_busy) { | |
2408 | if ((host->first_busy = tmp->next) == NULL) | |
2409 | host->last_busy = NULL; | |
2410 | } else { | |
2411 | prev->next = tmp->next; | |
2412 | if (tmp == host->last_busy) | |
2413 | host->last_busy = prev; | |
2414 | } | |
2415 | tmp->hastat = HOST_ABORTED; | |
2416 | initio_append_done_scb(host, tmp); | |
2417 | } | |
2418 | /* Previous haven't change */ | |
2419 | else { | |
2420 | prev = tmp; | |
2421 | } | |
2422 | tmp = tmp->next; | |
2423 | } | |
2424 | outb(MSG_DEVRST, host->addr + TUL_SFifo); | |
2425 | outb(TSC_XF_FIFO_OUT, host->addr + TUL_SCmd); | |
2426 | return initio_wait_disc(host); | |
2427 | ||
2428 | } | |
2429 | ||
2430 | static int initio_msgin_accept(struct initio_host * host) | |
2431 | { | |
2432 | outb(TSC_MSG_ACCEPT, host->addr + TUL_SCmd); | |
2433 | return wait_tulip(host); | |
2434 | } | |
2435 | ||
2436 | static int wait_tulip(struct initio_host * host) | |
2437 | { | |
2438 | ||
2439 | while (!((host->jsstatus0 = inb(host->addr + TUL_SStatus0)) | |
2440 | & TSS_INT_PENDING)) | |
2441 | cpu_relax(); | |
2442 | ||
2443 | host->jsint = inb(host->addr + TUL_SInt); | |
2444 | host->phase = host->jsstatus0 & TSS_PH_MASK; | |
2445 | host->jsstatus1 = inb(host->addr + TUL_SStatus1); | |
2446 | ||
2447 | if (host->jsint & TSS_RESEL_INT) /* if SCSI bus reset detected */ | |
2448 | return int_initio_resel(host); | |
2449 | if (host->jsint & TSS_SEL_TIMEOUT) /* if selected/reselected timeout interrupt */ | |
2450 | return int_initio_busfree(host); | |
2451 | if (host->jsint & TSS_SCSIRST_INT) /* if SCSI bus reset detected */ | |
2452 | return int_initio_scsi_rst(host); | |
2453 | ||
2454 | if (host->jsint & TSS_DISC_INT) { /* BUS disconnection */ | |
2455 | if (host->flags & HCF_EXPECT_DONE_DISC) { | |
2456 | outb(TSC_FLUSH_FIFO, host->addr + TUL_SCtrl0); /* Flush SCSI FIFO */ | |
2457 | initio_unlink_busy_scb(host, host->active); | |
2458 | host->active->hastat = 0; | |
2459 | initio_append_done_scb(host, host->active); | |
2460 | host->active = NULL; | |
2461 | host->active_tc = NULL; | |
2462 | host->flags &= ~HCF_EXPECT_DONE_DISC; | |
2463 | outb(TSC_INITDEFAULT, host->addr + TUL_SConfig); | |
2464 | outb(TSC_HW_RESELECT, host->addr + TUL_SCtrl1); /* Enable HW reselect */ | |
2465 | return -1; | |
2466 | } | |
2467 | if (host->flags & HCF_EXPECT_DISC) { | |
2468 | outb(TSC_FLUSH_FIFO, host->addr + TUL_SCtrl0); /* Flush SCSI FIFO */ | |
2469 | host->active = NULL; | |
2470 | host->active_tc = NULL; | |
2471 | host->flags &= ~HCF_EXPECT_DISC; | |
2472 | outb(TSC_INITDEFAULT, host->addr + TUL_SConfig); | |
2473 | outb(TSC_HW_RESELECT, host->addr + TUL_SCtrl1); /* Enable HW reselect */ | |
2474 | return -1; | |
2475 | } | |
2476 | return int_initio_busfree(host); | |
2477 | } | |
2478 | /* The old code really does the below. Can probably be removed */ | |
2479 | if (host->jsint & (TSS_FUNC_COMP | TSS_BUS_SERV)) | |
2480 | return host->phase; | |
2481 | return host->phase; | |
2482 | } | |
2483 | ||
2484 | static int initio_wait_disc(struct initio_host * host) | |
2485 | { | |
2486 | while (!((host->jsstatus0 = inb(host->addr + TUL_SStatus0)) & TSS_INT_PENDING)) | |
2487 | cpu_relax(); | |
2488 | ||
2489 | host->jsint = inb(host->addr + TUL_SInt); | |
2490 | ||
2491 | if (host->jsint & TSS_SCSIRST_INT) /* if SCSI bus reset detected */ | |
2492 | return int_initio_scsi_rst(host); | |
2493 | if (host->jsint & TSS_DISC_INT) { /* BUS disconnection */ | |
2494 | outb(TSC_FLUSH_FIFO, host->addr + TUL_SCtrl0); /* Flush SCSI FIFO */ | |
2495 | outb(TSC_INITDEFAULT, host->addr + TUL_SConfig); | |
2496 | outb(TSC_HW_RESELECT, host->addr + TUL_SCtrl1); /* Enable HW reselect */ | |
2497 | host->active = NULL; | |
2498 | return -1; | |
2499 | } | |
2500 | return initio_bad_seq(host); | |
2501 | } | |
2502 | ||
2503 | static int initio_wait_done_disc(struct initio_host * host) | |
2504 | { | |
2505 | while (!((host->jsstatus0 = inb(host->addr + TUL_SStatus0)) | |
2506 | & TSS_INT_PENDING)) | |
2507 | cpu_relax(); | |
2508 | ||
2509 | host->jsint = inb(host->addr + TUL_SInt); | |
2510 | ||
2511 | if (host->jsint & TSS_SCSIRST_INT) /* if SCSI bus reset detected */ | |
2512 | return int_initio_scsi_rst(host); | |
2513 | if (host->jsint & TSS_DISC_INT) { /* BUS disconnection */ | |
2514 | outb(TSC_FLUSH_FIFO, host->addr + TUL_SCtrl0); /* Flush SCSI FIFO */ | |
2515 | outb(TSC_INITDEFAULT, host->addr + TUL_SConfig); | |
2516 | outb(TSC_HW_RESELECT, host->addr + TUL_SCtrl1); /* Enable HW reselect */ | |
2517 | initio_unlink_busy_scb(host, host->active); | |
2518 | ||
2519 | initio_append_done_scb(host, host->active); | |
2520 | host->active = NULL; | |
2521 | return -1; | |
2522 | } | |
2523 | return initio_bad_seq(host); | |
2524 | } | |
2525 | ||
2526 | /** | |
2527 | * i91u_intr - IRQ handler | |
2528 | * @irqno: IRQ number | |
2529 | * @dev_id: IRQ identifier | |
2530 | * | |
2531 | * Take the relevant locks and then invoke the actual isr processing | |
2532 | * code under the lock. | |
2533 | */ | |
2534 | ||
2535 | static irqreturn_t i91u_intr(int irqno, void *dev_id) | |
2536 | { | |
2537 | struct Scsi_Host *dev = dev_id; | |
2538 | unsigned long flags; | |
2539 | int r; | |
2540 | ||
2541 | spin_lock_irqsave(dev->host_lock, flags); | |
2542 | r = initio_isr((struct initio_host *)dev->hostdata); | |
2543 | spin_unlock_irqrestore(dev->host_lock, flags); | |
2544 | if (r) | |
2545 | return IRQ_HANDLED; | |
2546 | else | |
2547 | return IRQ_NONE; | |
2548 | } | |
2549 | ||
2550 | ||
2551 | /** | |
2552 | * initio_build_scb - Build the mappings and SCB | |
2553 | * @host: InitIO host taking the command | |
2554 | * @cblk: Firmware command block | |
2555 | * @cmnd: SCSI midlayer command block | |
2556 | * | |
2557 | * Translate the abstract SCSI command into a firmware command block | |
2558 | * suitable for feeding to the InitIO host controller. This also requires | |
2559 | * we build the scatter gather lists and ensure they are mapped properly. | |
2560 | */ | |
2561 | ||
2562 | static void initio_build_scb(struct initio_host * host, struct scsi_ctrl_blk * cblk, struct scsi_cmnd * cmnd) | |
2563 | { /* Create corresponding SCB */ | |
2564 | struct scatterlist *sglist; | |
2565 | struct sg_entry *sg; /* Pointer to SG list */ | |
2566 | int i, nseg; | |
2567 | long total_len; | |
2568 | dma_addr_t dma_addr; | |
2569 | ||
2570 | /* Fill in the command headers */ | |
2571 | cblk->post = i91uSCBPost; /* i91u's callback routine */ | |
2572 | cblk->srb = cmnd; | |
2573 | cblk->opcode = ExecSCSI; | |
2574 | cblk->flags = SCF_POST; /* After SCSI done, call post routine */ | |
2575 | cblk->target = cmnd->device->id; | |
2576 | cblk->lun = cmnd->device->lun; | |
2577 | cblk->ident = cmnd->device->lun | DISC_ALLOW; | |
2578 | ||
2579 | cblk->flags |= SCF_SENSE; /* Turn on auto request sense */ | |
2580 | ||
2581 | /* Map the sense buffer into bus memory */ | |
2582 | dma_addr = dma_map_single(&host->pci_dev->dev, cmnd->sense_buffer, | |
2583 | SENSE_SIZE, DMA_FROM_DEVICE); | |
2584 | cblk->senseptr = (u32)dma_addr; | |
2585 | cblk->senselen = SENSE_SIZE; | |
2586 | cmnd->SCp.ptr = (char *)(unsigned long)dma_addr; | |
2587 | cblk->cdblen = cmnd->cmd_len; | |
2588 | ||
2589 | /* Clear the returned status */ | |
2590 | cblk->hastat = 0; | |
2591 | cblk->tastat = 0; | |
2592 | /* Command the command */ | |
2593 | memcpy(cblk->cdb, cmnd->cmnd, cmnd->cmd_len); | |
2594 | ||
2595 | /* Set up tags */ | |
2596 | if (cmnd->device->tagged_supported) { /* Tag Support */ | |
2597 | cblk->tagmsg = SIMPLE_QUEUE_TAG; /* Do simple tag only */ | |
2598 | } else { | |
2599 | cblk->tagmsg = 0; /* No tag support */ | |
2600 | } | |
2601 | ||
2602 | /* todo handle map_sg error */ | |
2603 | nseg = scsi_dma_map(cmnd); | |
2604 | BUG_ON(nseg < 0); | |
2605 | if (nseg) { | |
2606 | dma_addr = dma_map_single(&host->pci_dev->dev, &cblk->sglist[0], | |
2607 | sizeof(struct sg_entry) * TOTAL_SG_ENTRY, | |
2608 | DMA_BIDIRECTIONAL); | |
2609 | cblk->bufptr = (u32)dma_addr; | |
2610 | cmnd->SCp.dma_handle = dma_addr; | |
2611 | ||
2612 | cblk->sglen = nseg; | |
2613 | ||
2614 | cblk->flags |= SCF_SG; /* Turn on SG list flag */ | |
2615 | total_len = 0; | |
2616 | sg = &cblk->sglist[0]; | |
2617 | scsi_for_each_sg(cmnd, sglist, cblk->sglen, i) { | |
2618 | sg->data = cpu_to_le32((u32)sg_dma_address(sglist)); | |
2619 | sg->len = cpu_to_le32((u32)sg_dma_len(sglist)); | |
2620 | total_len += sg_dma_len(sglist); | |
2621 | ++sg; | |
2622 | } | |
2623 | ||
2624 | cblk->buflen = (scsi_bufflen(cmnd) > total_len) ? | |
2625 | total_len : scsi_bufflen(cmnd); | |
2626 | } else { /* No data transfer required */ | |
2627 | cblk->buflen = 0; | |
2628 | cblk->sglen = 0; | |
2629 | } | |
2630 | } | |
2631 | ||
2632 | /** | |
2633 | * i91u_queuecommand - Queue a new command if possible | |
2634 | * @cmd: SCSI command block from the mid layer | |
2635 | * @done: Completion handler | |
2636 | * | |
2637 | * Attempts to queue a new command with the host adapter. Will return | |
2638 | * zero if successful or indicate a host busy condition if not (which | |
2639 | * will cause the mid layer to call us again later with the command) | |
2640 | */ | |
2641 | ||
2642 | static int i91u_queuecommand_lck(struct scsi_cmnd *cmd, | |
2643 | void (*done)(struct scsi_cmnd *)) | |
2644 | { | |
2645 | struct initio_host *host = (struct initio_host *) cmd->device->host->hostdata; | |
2646 | struct scsi_ctrl_blk *cmnd; | |
2647 | ||
2648 | cmd->scsi_done = done; | |
2649 | ||
2650 | cmnd = initio_alloc_scb(host); | |
2651 | if (!cmnd) | |
2652 | return SCSI_MLQUEUE_HOST_BUSY; | |
2653 | ||
2654 | initio_build_scb(host, cmnd, cmd); | |
2655 | initio_exec_scb(host, cmnd); | |
2656 | return 0; | |
2657 | } | |
2658 | ||
2659 | static DEF_SCSI_QCMD(i91u_queuecommand) | |
2660 | ||
2661 | /** | |
2662 | * i91u_bus_reset - reset the SCSI bus | |
2663 | * @cmnd: Command block we want to trigger the reset for | |
2664 | * | |
2665 | * Initiate a SCSI bus reset sequence | |
2666 | */ | |
2667 | ||
2668 | static int i91u_bus_reset(struct scsi_cmnd * cmnd) | |
2669 | { | |
2670 | struct initio_host *host; | |
2671 | ||
2672 | host = (struct initio_host *) cmnd->device->host->hostdata; | |
2673 | ||
2674 | spin_lock_irq(cmnd->device->host->host_lock); | |
2675 | initio_reset_scsi(host, 0); | |
2676 | spin_unlock_irq(cmnd->device->host->host_lock); | |
2677 | ||
2678 | return SUCCESS; | |
2679 | } | |
2680 | ||
2681 | /** | |
2682 | * i91u_biospararm - return the "logical geometry | |
2683 | * @sdev: SCSI device | |
2684 | * @dev; Matching block device | |
2685 | * @capacity: Sector size of drive | |
2686 | * @info_array: Return space for BIOS geometry | |
2687 | * | |
2688 | * Map the device geometry in a manner compatible with the host | |
2689 | * controller BIOS behaviour. | |
2690 | * | |
2691 | * FIXME: limited to 2^32 sector devices. | |
2692 | */ | |
2693 | ||
2694 | static int i91u_biosparam(struct scsi_device *sdev, struct block_device *dev, | |
2695 | sector_t capacity, int *info_array) | |
2696 | { | |
2697 | struct initio_host *host; /* Point to Host adapter control block */ | |
2698 | struct target_control *tc; | |
2699 | ||
2700 | host = (struct initio_host *) sdev->host->hostdata; | |
2701 | tc = &host->targets[sdev->id]; | |
2702 | ||
2703 | if (tc->heads) { | |
2704 | info_array[0] = tc->heads; | |
2705 | info_array[1] = tc->sectors; | |
2706 | info_array[2] = (unsigned long)capacity / tc->heads / tc->sectors; | |
2707 | } else { | |
2708 | if (tc->drv_flags & TCF_DRV_255_63) { | |
2709 | info_array[0] = 255; | |
2710 | info_array[1] = 63; | |
2711 | info_array[2] = (unsigned long)capacity / 255 / 63; | |
2712 | } else { | |
2713 | info_array[0] = 64; | |
2714 | info_array[1] = 32; | |
2715 | info_array[2] = (unsigned long)capacity >> 11; | |
2716 | } | |
2717 | } | |
2718 | ||
2719 | #if defined(DEBUG_BIOSPARAM) | |
2720 | if (i91u_debug & debug_biosparam) { | |
2721 | printk("bios geometry: head=%d, sec=%d, cyl=%d\n", | |
2722 | info_array[0], info_array[1], info_array[2]); | |
2723 | printk("WARNING: check, if the bios geometry is correct.\n"); | |
2724 | } | |
2725 | #endif | |
2726 | ||
2727 | return 0; | |
2728 | } | |
2729 | ||
2730 | /** | |
2731 | * i91u_unmap_scb - Unmap a command | |
2732 | * @pci_dev: PCI device the command is for | |
2733 | * @cmnd: The command itself | |
2734 | * | |
2735 | * Unmap any PCI mapping/IOMMU resources allocated when the command | |
2736 | * was mapped originally as part of initio_build_scb | |
2737 | */ | |
2738 | ||
2739 | static void i91u_unmap_scb(struct pci_dev *pci_dev, struct scsi_cmnd *cmnd) | |
2740 | { | |
2741 | /* auto sense buffer */ | |
2742 | if (cmnd->SCp.ptr) { | |
2743 | dma_unmap_single(&pci_dev->dev, | |
2744 | (dma_addr_t)((unsigned long)cmnd->SCp.ptr), | |
2745 | SENSE_SIZE, DMA_FROM_DEVICE); | |
2746 | cmnd->SCp.ptr = NULL; | |
2747 | } | |
2748 | ||
2749 | /* request buffer */ | |
2750 | if (scsi_sg_count(cmnd)) { | |
2751 | dma_unmap_single(&pci_dev->dev, cmnd->SCp.dma_handle, | |
2752 | sizeof(struct sg_entry) * TOTAL_SG_ENTRY, | |
2753 | DMA_BIDIRECTIONAL); | |
2754 | ||
2755 | scsi_dma_unmap(cmnd); | |
2756 | } | |
2757 | } | |
2758 | ||
2759 | /** | |
2760 | * i91uSCBPost - SCSI callback | |
2761 | * @host: Pointer to host adapter control block. | |
2762 | * @cmnd: Pointer to SCSI control block. | |
2763 | * | |
2764 | * This is callback routine be called when tulip finish one | |
2765 | * SCSI command. | |
2766 | */ | |
2767 | ||
2768 | static void i91uSCBPost(u8 * host_mem, u8 * cblk_mem) | |
2769 | { | |
2770 | struct scsi_cmnd *cmnd; /* Pointer to SCSI request block */ | |
2771 | struct initio_host *host; | |
2772 | struct scsi_ctrl_blk *cblk; | |
2773 | ||
2774 | host = (struct initio_host *) host_mem; | |
2775 | cblk = (struct scsi_ctrl_blk *) cblk_mem; | |
2776 | if ((cmnd = cblk->srb) == NULL) { | |
2777 | printk(KERN_ERR "i91uSCBPost: SRB pointer is empty\n"); | |
2778 | WARN_ON(1); | |
2779 | initio_release_scb(host, cblk); /* Release SCB for current channel */ | |
2780 | return; | |
2781 | } | |
2782 | ||
2783 | /* | |
2784 | * Remap the firmware error status into a mid layer one | |
2785 | */ | |
2786 | switch (cblk->hastat) { | |
2787 | case 0x0: | |
2788 | case 0xa: /* Linked command complete without error and linked normally */ | |
2789 | case 0xb: /* Linked command complete without error interrupt generated */ | |
2790 | cblk->hastat = 0; | |
2791 | break; | |
2792 | ||
2793 | case 0x11: /* Selection time out-The initiator selection or target | |
2794 | reselection was not complete within the SCSI Time out period */ | |
2795 | cblk->hastat = DID_TIME_OUT; | |
2796 | break; | |
2797 | ||
2798 | case 0x14: /* Target bus phase sequence failure-An invalid bus phase or bus | |
2799 | phase sequence was requested by the target. The host adapter | |
2800 | will generate a SCSI Reset Condition, notifying the host with | |
2801 | a SCRD interrupt */ | |
2802 | cblk->hastat = DID_RESET; | |
2803 | break; | |
2804 | ||
2805 | case 0x1a: /* SCB Aborted. 07/21/98 */ | |
2806 | cblk->hastat = DID_ABORT; | |
2807 | break; | |
2808 | ||
2809 | case 0x12: /* Data overrun/underrun-The target attempted to transfer more data | |
2810 | than was allocated by the Data Length field or the sum of the | |
2811 | Scatter / Gather Data Length fields. */ | |
2812 | case 0x13: /* Unexpected bus free-The target dropped the SCSI BSY at an unexpected time. */ | |
2813 | case 0x16: /* Invalid SCB Operation Code. */ | |
2814 | ||
2815 | default: | |
2816 | printk("ini9100u: %x %x\n", cblk->hastat, cblk->tastat); | |
2817 | cblk->hastat = DID_ERROR; /* Couldn't find any better */ | |
2818 | break; | |
2819 | } | |
2820 | ||
2821 | cmnd->result = cblk->tastat | (cblk->hastat << 16); | |
2822 | i91u_unmap_scb(host->pci_dev, cmnd); | |
2823 | cmnd->scsi_done(cmnd); /* Notify system DONE */ | |
2824 | initio_release_scb(host, cblk); /* Release SCB for current channel */ | |
2825 | } | |
2826 | ||
2827 | static struct scsi_host_template initio_template = { | |
2828 | .proc_name = "INI9100U", | |
2829 | .name = "Initio INI-9X00U/UW SCSI device driver", | |
2830 | .queuecommand = i91u_queuecommand, | |
2831 | .eh_bus_reset_handler = i91u_bus_reset, | |
2832 | .bios_param = i91u_biosparam, | |
2833 | .can_queue = MAX_TARGETS * i91u_MAXQUEUE, | |
2834 | .this_id = 1, | |
2835 | .sg_tablesize = SG_ALL, | |
2836 | .cmd_per_lun = 1, | |
2837 | .use_clustering = ENABLE_CLUSTERING, | |
2838 | }; | |
2839 | ||
2840 | static int initio_probe_one(struct pci_dev *pdev, | |
2841 | const struct pci_device_id *id) | |
2842 | { | |
2843 | struct Scsi_Host *shost; | |
2844 | struct initio_host *host; | |
2845 | u32 reg; | |
2846 | u16 bios_seg; | |
2847 | struct scsi_ctrl_blk *scb, *tmp, *prev = NULL /* silence gcc */; | |
2848 | int num_scb, i, error; | |
2849 | ||
2850 | error = pci_enable_device(pdev); | |
2851 | if (error) | |
2852 | return error; | |
2853 | ||
2854 | pci_read_config_dword(pdev, 0x44, (u32 *) & reg); | |
2855 | bios_seg = (u16) (reg & 0xFF); | |
2856 | if (((reg & 0xFF00) >> 8) == 0xFF) | |
2857 | reg = 0; | |
2858 | bios_seg = (bios_seg << 8) + ((u16) ((reg & 0xFF00) >> 8)); | |
2859 | ||
2860 | if (pci_set_dma_mask(pdev, DMA_BIT_MASK(32))) { | |
2861 | printk(KERN_WARNING "i91u: Could not set 32 bit DMA mask\n"); | |
2862 | error = -ENODEV; | |
2863 | goto out_disable_device; | |
2864 | } | |
2865 | shost = scsi_host_alloc(&initio_template, sizeof(struct initio_host)); | |
2866 | if (!shost) { | |
2867 | printk(KERN_WARNING "initio: Could not allocate host structure.\n"); | |
2868 | error = -ENOMEM; | |
2869 | goto out_disable_device; | |
2870 | } | |
2871 | host = (struct initio_host *)shost->hostdata; | |
2872 | memset(host, 0, sizeof(struct initio_host)); | |
2873 | host->addr = pci_resource_start(pdev, 0); | |
2874 | host->bios_addr = bios_seg; | |
2875 | ||
2876 | if (!request_region(host->addr, 256, "i91u")) { | |
2877 | printk(KERN_WARNING "initio: I/O port range 0x%x is busy.\n", host->addr); | |
2878 | error = -ENODEV; | |
2879 | goto out_host_put; | |
2880 | } | |
2881 | ||
2882 | if (initio_tag_enable) /* 1.01i */ | |
2883 | num_scb = MAX_TARGETS * i91u_MAXQUEUE; | |
2884 | else | |
2885 | num_scb = MAX_TARGETS + 3; /* 1-tape, 1-CD_ROM, 1- extra */ | |
2886 | ||
2887 | for (; num_scb >= MAX_TARGETS + 3; num_scb--) { | |
2888 | i = num_scb * sizeof(struct scsi_ctrl_blk); | |
2889 | if ((scb = kzalloc(i, GFP_DMA)) != NULL) | |
2890 | break; | |
2891 | } | |
2892 | ||
2893 | if (!scb) { | |
2894 | printk(KERN_WARNING "initio: Cannot allocate SCB array.\n"); | |
2895 | error = -ENOMEM; | |
2896 | goto out_release_region; | |
2897 | } | |
2898 | ||
2899 | host->pci_dev = pdev; | |
2900 | ||
2901 | host->semaph = 1; | |
2902 | spin_lock_init(&host->semaph_lock); | |
2903 | host->num_scbs = num_scb; | |
2904 | host->scb = scb; | |
2905 | host->next_pending = scb; | |
2906 | host->next_avail = scb; | |
2907 | for (i = 0, tmp = scb; i < num_scb; i++, tmp++) { | |
2908 | tmp->tagid = i; | |
2909 | if (i != 0) | |
2910 | prev->next = tmp; | |
2911 | prev = tmp; | |
2912 | } | |
2913 | prev->next = NULL; | |
2914 | host->scb_end = tmp; | |
2915 | host->first_avail = scb; | |
2916 | host->last_avail = prev; | |
2917 | spin_lock_init(&host->avail_lock); | |
2918 | ||
2919 | initio_init(host, phys_to_virt(((u32)bios_seg << 4))); | |
2920 | ||
2921 | host->jsstatus0 = 0; | |
2922 | ||
2923 | shost->io_port = host->addr; | |
2924 | shost->n_io_port = 0xff; | |
2925 | shost->can_queue = num_scb; /* 03/05/98 */ | |
2926 | shost->unique_id = host->addr; | |
2927 | shost->max_id = host->max_tar; | |
2928 | shost->max_lun = 32; /* 10/21/97 */ | |
2929 | shost->irq = pdev->irq; | |
2930 | shost->this_id = host->scsi_id; /* Assign HCS index */ | |
2931 | shost->base = host->addr; | |
2932 | shost->sg_tablesize = TOTAL_SG_ENTRY; | |
2933 | ||
2934 | error = request_irq(pdev->irq, i91u_intr, IRQF_DISABLED|IRQF_SHARED, "i91u", shost); | |
2935 | if (error < 0) { | |
2936 | printk(KERN_WARNING "initio: Unable to request IRQ %d\n", pdev->irq); | |
2937 | goto out_free_scbs; | |
2938 | } | |
2939 | ||
2940 | pci_set_drvdata(pdev, shost); | |
2941 | ||
2942 | error = scsi_add_host(shost, &pdev->dev); | |
2943 | if (error) | |
2944 | goto out_free_irq; | |
2945 | scsi_scan_host(shost); | |
2946 | return 0; | |
2947 | out_free_irq: | |
2948 | free_irq(pdev->irq, shost); | |
2949 | out_free_scbs: | |
2950 | kfree(host->scb); | |
2951 | out_release_region: | |
2952 | release_region(host->addr, 256); | |
2953 | out_host_put: | |
2954 | scsi_host_put(shost); | |
2955 | out_disable_device: | |
2956 | pci_disable_device(pdev); | |
2957 | return error; | |
2958 | } | |
2959 | ||
2960 | /** | |
2961 | * initio_remove_one - control shutdown | |
2962 | * @pdev: PCI device being released | |
2963 | * | |
2964 | * Release the resources assigned to this adapter after it has | |
2965 | * finished being used. | |
2966 | */ | |
2967 | ||
2968 | static void initio_remove_one(struct pci_dev *pdev) | |
2969 | { | |
2970 | struct Scsi_Host *host = pci_get_drvdata(pdev); | |
2971 | struct initio_host *s = (struct initio_host *)host->hostdata; | |
2972 | scsi_remove_host(host); | |
2973 | free_irq(pdev->irq, host); | |
2974 | release_region(s->addr, 256); | |
2975 | scsi_host_put(host); | |
2976 | pci_disable_device(pdev); | |
2977 | } | |
2978 | ||
2979 | MODULE_LICENSE("GPL"); | |
2980 | ||
2981 | static struct pci_device_id initio_pci_tbl[] = { | |
2982 | {PCI_VENDOR_ID_INIT, 0x9500, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0}, | |
2983 | {PCI_VENDOR_ID_INIT, 0x9400, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0}, | |
2984 | {PCI_VENDOR_ID_INIT, 0x9401, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0}, | |
2985 | {PCI_VENDOR_ID_INIT, 0x0002, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0}, | |
2986 | {PCI_VENDOR_ID_DOMEX, 0x0002, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0}, | |
2987 | {0,} | |
2988 | }; | |
2989 | MODULE_DEVICE_TABLE(pci, initio_pci_tbl); | |
2990 | ||
2991 | static struct pci_driver initio_pci_driver = { | |
2992 | .name = "initio", | |
2993 | .id_table = initio_pci_tbl, | |
2994 | .probe = initio_probe_one, | |
2995 | .remove = __devexit_p(initio_remove_one), | |
2996 | }; | |
2997 | ||
2998 | static int __init initio_init_driver(void) | |
2999 | { | |
3000 | return pci_register_driver(&initio_pci_driver); | |
3001 | } | |
3002 | ||
3003 | static void __exit initio_exit_driver(void) | |
3004 | { | |
3005 | pci_unregister_driver(&initio_pci_driver); | |
3006 | } | |
3007 | ||
3008 | MODULE_DESCRIPTION("Initio INI-9X00U/UW SCSI device driver"); | |
3009 | MODULE_AUTHOR("Initio Corporation"); | |
3010 | MODULE_LICENSE("GPL"); | |
3011 | ||
3012 | module_init(initio_init_driver); | |
3013 | module_exit(initio_exit_driver); |