drivers: power: report battery voltage in AOSP compatible format
[GitHub/mt8127/android_kernel_alcatel_ttab.git] / drivers / scsi / aha1542.c
1 /* $Id: aha1542.c,v 1.1 1992/07/24 06:27:38 root Exp root $
2 * linux/kernel/aha1542.c
3 *
4 * Copyright (C) 1992 Tommy Thorn
5 * Copyright (C) 1993, 1994, 1995 Eric Youngdale
6 *
7 * Modified by Eric Youngdale
8 * Use request_irq and request_dma to help prevent unexpected conflicts
9 * Set up on-board DMA controller, such that we do not have to
10 * have the bios enabled to use the aha1542.
11 * Modified by David Gentzel
12 * Don't call request_dma if dma mask is 0 (for BusLogic BT-445S VL-Bus
13 * controller).
14 * Modified by Matti Aarnio
15 * Accept parameters from LILO cmd-line. -- 1-Oct-94
16 * Modified by Mike McLagan <mike.mclagan@linux.org>
17 * Recognise extended mode on AHA1542CP, different bit than 1542CF
18 * 1-Jan-97
19 * Modified by Bjorn L. Thordarson and Einar Thor Einarsson
20 * Recognize that DMA0 is valid DMA channel -- 13-Jul-98
21 * Modified by Chris Faulhaber <jedgar@fxp.org>
22 * Added module command-line options
23 * 19-Jul-99
24 * Modified by Adam Fritzler
25 * Added proper detection of the AHA-1640 (MCA, now deleted)
26 */
27
28 #include <linux/module.h>
29 #include <linux/interrupt.h>
30 #include <linux/kernel.h>
31 #include <linux/types.h>
32 #include <linux/string.h>
33 #include <linux/ioport.h>
34 #include <linux/delay.h>
35 #include <linux/proc_fs.h>
36 #include <linux/init.h>
37 #include <linux/spinlock.h>
38 #include <linux/isapnp.h>
39 #include <linux/blkdev.h>
40 #include <linux/slab.h>
41
42 #include <asm/dma.h>
43 #include <asm/io.h>
44
45 #include "scsi.h"
46 #include <scsi/scsi_host.h>
47 #include "aha1542.h"
48
49 #define SCSI_BUF_PA(address) isa_virt_to_bus(address)
50 #define SCSI_SG_PA(sgent) (isa_page_to_bus(sg_page((sgent))) + (sgent)->offset)
51
52 #include <linux/stat.h>
53
54 #ifdef DEBUG
55 #define DEB(x) x
56 #else
57 #define DEB(x)
58 #endif
59
60 /*
61 static const char RCSid[] = "$Header: /usr/src/linux/kernel/blk_drv/scsi/RCS/aha1542.c,v 1.1 1992/07/24 06:27:38 root Exp root $";
62 */
63
64 /* The adaptec can be configured for quite a number of addresses, but
65 I generally do not want the card poking around at random. We allow
66 two addresses - this allows people to use the Adaptec with a Midi
67 card, which also used 0x330 -- can be overridden with LILO! */
68
69 #define MAXBOARDS 4 /* Increase this and the sizes of the
70 arrays below, if you need more.. */
71
72 /* Boards 3,4 slots are reserved for ISAPnP scans */
73
74 static unsigned int bases[MAXBOARDS] __initdata = {0x330, 0x334, 0, 0};
75
76 /* set by aha1542_setup according to the command line; they also may
77 be marked __initdata, but require zero initializers then */
78
79 static int setup_called[MAXBOARDS];
80 static int setup_buson[MAXBOARDS];
81 static int setup_busoff[MAXBOARDS];
82 static int setup_dmaspeed[MAXBOARDS] __initdata = { -1, -1, -1, -1 };
83
84 /*
85 * LILO/Module params: aha1542=<PORTBASE>[,<BUSON>,<BUSOFF>[,<DMASPEED>]]
86 *
87 * Where: <PORTBASE> is any of the valid AHA addresses:
88 * 0x130, 0x134, 0x230, 0x234, 0x330, 0x334
89 * <BUSON> is the time (in microsecs) that AHA spends on the AT-bus
90 * when transferring data. 1542A power-on default is 11us,
91 * valid values are in range: 2..15 (decimal)
92 * <BUSOFF> is the time that AHA spends OFF THE BUS after while
93 * it is transferring data (not to monopolize the bus).
94 * Power-on default is 4us, valid range: 1..64 microseconds.
95 * <DMASPEED> Default is jumper selected (1542A: on the J1),
96 * but experimenter can alter it with this.
97 * Valid values: 5, 6, 7, 8, 10 (MB/s)
98 * Factory default is 5 MB/s.
99 */
100
101 #if defined(MODULE)
102 static bool isapnp = 0;
103 static int aha1542[] = {0x330, 11, 4, -1};
104 module_param_array(aha1542, int, NULL, 0);
105 module_param(isapnp, bool, 0);
106
107 static struct isapnp_device_id id_table[] __initdata = {
108 {
109 ISAPNP_ANY_ID, ISAPNP_ANY_ID,
110 ISAPNP_VENDOR('A', 'D', 'P'), ISAPNP_FUNCTION(0x1542),
111 0
112 },
113 {0}
114 };
115
116 MODULE_DEVICE_TABLE(isapnp, id_table);
117
118 #else
119 static int isapnp = 1;
120 #endif
121
122 #define BIOS_TRANSLATION_1632 0 /* Used by some old 1542A boards */
123 #define BIOS_TRANSLATION_6432 1 /* Default case these days */
124 #define BIOS_TRANSLATION_25563 2 /* Big disk case */
125
126 struct aha1542_hostdata {
127 /* This will effectively start both of them at the first mailbox */
128 int bios_translation; /* Mapping bios uses - for compatibility */
129 int aha1542_last_mbi_used;
130 int aha1542_last_mbo_used;
131 Scsi_Cmnd *SCint[AHA1542_MAILBOXES];
132 struct mailbox mb[2 * AHA1542_MAILBOXES];
133 struct ccb ccb[AHA1542_MAILBOXES];
134 };
135
136 #define HOSTDATA(host) ((struct aha1542_hostdata *) &host->hostdata)
137
138 static DEFINE_SPINLOCK(aha1542_lock);
139
140
141
142 #define WAITnexttimeout 3000000
143
144 static void setup_mailboxes(int base_io, struct Scsi_Host *shpnt);
145 static int aha1542_restart(struct Scsi_Host *shost);
146 static void aha1542_intr_handle(struct Scsi_Host *shost);
147
148 #define aha1542_intr_reset(base) outb(IRST, CONTROL(base))
149
150 #define WAIT(port, mask, allof, noneof) \
151 { register int WAITbits; \
152 register int WAITtimeout = WAITnexttimeout; \
153 while (1) { \
154 WAITbits = inb(port) & (mask); \
155 if ((WAITbits & (allof)) == (allof) && ((WAITbits & (noneof)) == 0)) \
156 break; \
157 if (--WAITtimeout == 0) goto fail; \
158 } \
159 }
160
161 /* Similar to WAIT, except we use the udelay call to regulate the
162 amount of time we wait. */
163 #define WAITd(port, mask, allof, noneof, timeout) \
164 { register int WAITbits; \
165 register int WAITtimeout = timeout; \
166 while (1) { \
167 WAITbits = inb(port) & (mask); \
168 if ((WAITbits & (allof)) == (allof) && ((WAITbits & (noneof)) == 0)) \
169 break; \
170 mdelay(1); \
171 if (--WAITtimeout == 0) goto fail; \
172 } \
173 }
174
175 static void aha1542_stat(void)
176 {
177 /* int s = inb(STATUS), i = inb(INTRFLAGS);
178 printk("status=%x intrflags=%x\n", s, i, WAITnexttimeout-WAITtimeout); */
179 }
180
181 /* This is a bit complicated, but we need to make sure that an interrupt
182 routine does not send something out while we are in the middle of this.
183 Fortunately, it is only at boot time that multi-byte messages
184 are ever sent. */
185 static int aha1542_out(unsigned int base, unchar * cmdp, int len)
186 {
187 unsigned long flags = 0;
188 int got_lock;
189
190 if (len == 1) {
191 got_lock = 0;
192 while (1 == 1) {
193 WAIT(STATUS(base), CDF, 0, CDF);
194 spin_lock_irqsave(&aha1542_lock, flags);
195 if (inb(STATUS(base)) & CDF) {
196 spin_unlock_irqrestore(&aha1542_lock, flags);
197 continue;
198 }
199 outb(*cmdp, DATA(base));
200 spin_unlock_irqrestore(&aha1542_lock, flags);
201 return 0;
202 }
203 } else {
204 spin_lock_irqsave(&aha1542_lock, flags);
205 got_lock = 1;
206 while (len--) {
207 WAIT(STATUS(base), CDF, 0, CDF);
208 outb(*cmdp++, DATA(base));
209 }
210 spin_unlock_irqrestore(&aha1542_lock, flags);
211 }
212 return 0;
213 fail:
214 if (got_lock)
215 spin_unlock_irqrestore(&aha1542_lock, flags);
216 printk(KERN_ERR "aha1542_out failed(%d): ", len + 1);
217 aha1542_stat();
218 return 1;
219 }
220
221 /* Only used at boot time, so we do not need to worry about latency as much
222 here */
223
224 static int __init aha1542_in(unsigned int base, unchar * cmdp, int len)
225 {
226 unsigned long flags;
227
228 spin_lock_irqsave(&aha1542_lock, flags);
229 while (len--) {
230 WAIT(STATUS(base), DF, DF, 0);
231 *cmdp++ = inb(DATA(base));
232 }
233 spin_unlock_irqrestore(&aha1542_lock, flags);
234 return 0;
235 fail:
236 spin_unlock_irqrestore(&aha1542_lock, flags);
237 printk(KERN_ERR "aha1542_in failed(%d): ", len + 1);
238 aha1542_stat();
239 return 1;
240 }
241
242 /* Similar to aha1542_in, except that we wait a very short period of time.
243 We use this if we know the board is alive and awake, but we are not sure
244 if the board will respond to the command we are about to send or not */
245 static int __init aha1542_in1(unsigned int base, unchar * cmdp, int len)
246 {
247 unsigned long flags;
248
249 spin_lock_irqsave(&aha1542_lock, flags);
250 while (len--) {
251 WAITd(STATUS(base), DF, DF, 0, 100);
252 *cmdp++ = inb(DATA(base));
253 }
254 spin_unlock_irqrestore(&aha1542_lock, flags);
255 return 0;
256 fail:
257 spin_unlock_irqrestore(&aha1542_lock, flags);
258 return 1;
259 }
260
261 static int makecode(unsigned hosterr, unsigned scsierr)
262 {
263 switch (hosterr) {
264 case 0x0:
265 case 0xa: /* Linked command complete without error and linked normally */
266 case 0xb: /* Linked command complete without error, interrupt generated */
267 hosterr = 0;
268 break;
269
270 case 0x11: /* Selection time out-The initiator selection or target
271 reselection was not complete within the SCSI Time out period */
272 hosterr = DID_TIME_OUT;
273 break;
274
275 case 0x12: /* Data overrun/underrun-The target attempted to transfer more data
276 than was allocated by the Data Length field or the sum of the
277 Scatter / Gather Data Length fields. */
278
279 case 0x13: /* Unexpected bus free-The target dropped the SCSI BSY at an unexpected time. */
280
281 case 0x15: /* MBO command was not 00, 01 or 02-The first byte of the CB was
282 invalid. This usually indicates a software failure. */
283
284 case 0x16: /* Invalid CCB Operation Code-The first byte of the CCB was invalid.
285 This usually indicates a software failure. */
286
287 case 0x17: /* Linked CCB does not have the same LUN-A subsequent CCB of a set
288 of linked CCB's does not specify the same logical unit number as
289 the first. */
290 case 0x18: /* Invalid Target Direction received from Host-The direction of a
291 Target Mode CCB was invalid. */
292
293 case 0x19: /* Duplicate CCB Received in Target Mode-More than once CCB was
294 received to service data transfer between the same target LUN
295 and initiator SCSI ID in the same direction. */
296
297 case 0x1a: /* Invalid CCB or Segment List Parameter-A segment list with a zero
298 length segment or invalid segment list boundaries was received.
299 A CCB parameter was invalid. */
300 DEB(printk("Aha1542: %x %x\n", hosterr, scsierr));
301 hosterr = DID_ERROR; /* Couldn't find any better */
302 break;
303
304 case 0x14: /* Target bus phase sequence failure-An invalid bus phase or bus
305 phase sequence was requested by the target. The host adapter
306 will generate a SCSI Reset Condition, notifying the host with
307 a SCRD interrupt */
308 hosterr = DID_RESET;
309 break;
310 default:
311 printk(KERN_ERR "aha1542: makecode: unknown hoststatus %x\n", hosterr);
312 break;
313 }
314 return scsierr | (hosterr << 16);
315 }
316
317 static int __init aha1542_test_port(int bse, struct Scsi_Host *shpnt)
318 {
319 unchar inquiry_cmd[] = {CMD_INQUIRY};
320 unchar inquiry_result[4];
321 unchar *cmdp;
322 int len;
323 volatile int debug = 0;
324
325 /* Quick and dirty test for presence of the card. */
326 if (inb(STATUS(bse)) == 0xff)
327 return 0;
328
329 /* Reset the adapter. I ought to make a hard reset, but it's not really necessary */
330
331 /* DEB(printk("aha1542_test_port called \n")); */
332
333 /* In case some other card was probing here, reset interrupts */
334 aha1542_intr_reset(bse); /* reset interrupts, so they don't block */
335
336 outb(SRST | IRST /*|SCRST */ , CONTROL(bse));
337
338 mdelay(20); /* Wait a little bit for things to settle down. */
339
340 debug = 1;
341 /* Expect INIT and IDLE, any of the others are bad */
342 WAIT(STATUS(bse), STATMASK, INIT | IDLE, STST | DIAGF | INVDCMD | DF | CDF);
343
344 debug = 2;
345 /* Shouldn't have generated any interrupts during reset */
346 if (inb(INTRFLAGS(bse)) & INTRMASK)
347 goto fail;
348
349
350 /* Perform a host adapter inquiry instead so we do not need to set
351 up the mailboxes ahead of time */
352
353 aha1542_out(bse, inquiry_cmd, 1);
354
355 debug = 3;
356 len = 4;
357 cmdp = &inquiry_result[0];
358
359 while (len--) {
360 WAIT(STATUS(bse), DF, DF, 0);
361 *cmdp++ = inb(DATA(bse));
362 }
363
364 debug = 8;
365 /* Reading port should reset DF */
366 if (inb(STATUS(bse)) & DF)
367 goto fail;
368
369 debug = 9;
370 /* When HACC, command is completed, and we're though testing */
371 WAIT(INTRFLAGS(bse), HACC, HACC, 0);
372 /* now initialize adapter */
373
374 debug = 10;
375 /* Clear interrupts */
376 outb(IRST, CONTROL(bse));
377
378 debug = 11;
379
380 return debug; /* 1 = ok */
381 fail:
382 return 0; /* 0 = not ok */
383 }
384
385 /* A quick wrapper for do_aha1542_intr_handle to grab the spin lock */
386 static irqreturn_t do_aha1542_intr_handle(int dummy, void *dev_id)
387 {
388 unsigned long flags;
389 struct Scsi_Host *shost = dev_id;
390
391 spin_lock_irqsave(shost->host_lock, flags);
392 aha1542_intr_handle(shost);
393 spin_unlock_irqrestore(shost->host_lock, flags);
394 return IRQ_HANDLED;
395 }
396
397 /* A "high" level interrupt handler */
398 static void aha1542_intr_handle(struct Scsi_Host *shost)
399 {
400 void (*my_done) (Scsi_Cmnd *) = NULL;
401 int errstatus, mbi, mbo, mbistatus;
402 int number_serviced;
403 unsigned long flags;
404 Scsi_Cmnd *SCtmp;
405 int flag;
406 int needs_restart;
407 struct mailbox *mb;
408 struct ccb *ccb;
409
410 mb = HOSTDATA(shost)->mb;
411 ccb = HOSTDATA(shost)->ccb;
412
413 #ifdef DEBUG
414 {
415 flag = inb(INTRFLAGS(shost->io_port));
416 printk(KERN_DEBUG "aha1542_intr_handle: ");
417 if (!(flag & ANYINTR))
418 printk("no interrupt?");
419 if (flag & MBIF)
420 printk("MBIF ");
421 if (flag & MBOA)
422 printk("MBOF ");
423 if (flag & HACC)
424 printk("HACC ");
425 if (flag & SCRD)
426 printk("SCRD ");
427 printk("status %02x\n", inb(STATUS(shost->io_port)));
428 };
429 #endif
430 number_serviced = 0;
431 needs_restart = 0;
432
433 while (1 == 1) {
434 flag = inb(INTRFLAGS(shost->io_port));
435
436 /* Check for unusual interrupts. If any of these happen, we should
437 probably do something special, but for now just printing a message
438 is sufficient. A SCSI reset detected is something that we really
439 need to deal with in some way. */
440 if (flag & ~MBIF) {
441 if (flag & MBOA)
442 printk("MBOF ");
443 if (flag & HACC)
444 printk("HACC ");
445 if (flag & SCRD) {
446 needs_restart = 1;
447 printk("SCRD ");
448 }
449 }
450 aha1542_intr_reset(shost->io_port);
451
452 spin_lock_irqsave(&aha1542_lock, flags);
453 mbi = HOSTDATA(shost)->aha1542_last_mbi_used + 1;
454 if (mbi >= 2 * AHA1542_MAILBOXES)
455 mbi = AHA1542_MAILBOXES;
456
457 do {
458 if (mb[mbi].status != 0)
459 break;
460 mbi++;
461 if (mbi >= 2 * AHA1542_MAILBOXES)
462 mbi = AHA1542_MAILBOXES;
463 } while (mbi != HOSTDATA(shost)->aha1542_last_mbi_used);
464
465 if (mb[mbi].status == 0) {
466 spin_unlock_irqrestore(&aha1542_lock, flags);
467 /* Hmm, no mail. Must have read it the last time around */
468 if (!number_serviced && !needs_restart)
469 printk(KERN_WARNING "aha1542.c: interrupt received, but no mail.\n");
470 /* We detected a reset. Restart all pending commands for
471 devices that use the hard reset option */
472 if (needs_restart)
473 aha1542_restart(shost);
474 return;
475 };
476
477 mbo = (scsi2int(mb[mbi].ccbptr) - (SCSI_BUF_PA(&ccb[0]))) / sizeof(struct ccb);
478 mbistatus = mb[mbi].status;
479 mb[mbi].status = 0;
480 HOSTDATA(shost)->aha1542_last_mbi_used = mbi;
481 spin_unlock_irqrestore(&aha1542_lock, flags);
482
483 #ifdef DEBUG
484 {
485 if (ccb[mbo].tarstat | ccb[mbo].hastat)
486 printk(KERN_DEBUG "aha1542_command: returning %x (status %d)\n",
487 ccb[mbo].tarstat + ((int) ccb[mbo].hastat << 16), mb[mbi].status);
488 };
489 #endif
490
491 if (mbistatus == 3)
492 continue; /* Aborted command not found */
493
494 #ifdef DEBUG
495 printk(KERN_DEBUG "...done %d %d\n", mbo, mbi);
496 #endif
497
498 SCtmp = HOSTDATA(shost)->SCint[mbo];
499
500 if (!SCtmp || !SCtmp->scsi_done) {
501 printk(KERN_WARNING "aha1542_intr_handle: Unexpected interrupt\n");
502 printk(KERN_WARNING "tarstat=%x, hastat=%x idlun=%x ccb#=%d \n", ccb[mbo].tarstat,
503 ccb[mbo].hastat, ccb[mbo].idlun, mbo);
504 return;
505 }
506 my_done = SCtmp->scsi_done;
507 kfree(SCtmp->host_scribble);
508 SCtmp->host_scribble = NULL;
509 /* Fetch the sense data, and tuck it away, in the required slot. The
510 Adaptec automatically fetches it, and there is no guarantee that
511 we will still have it in the cdb when we come back */
512 if (ccb[mbo].tarstat == 2)
513 memcpy(SCtmp->sense_buffer, &ccb[mbo].cdb[ccb[mbo].cdblen],
514 SCSI_SENSE_BUFFERSIZE);
515
516
517 /* is there mail :-) */
518
519 /* more error checking left out here */
520 if (mbistatus != 1)
521 /* This is surely wrong, but I don't know what's right */
522 errstatus = makecode(ccb[mbo].hastat, ccb[mbo].tarstat);
523 else
524 errstatus = 0;
525
526 #ifdef DEBUG
527 if (errstatus)
528 printk(KERN_DEBUG "(aha1542 error:%x %x %x) ", errstatus,
529 ccb[mbo].hastat, ccb[mbo].tarstat);
530 #endif
531
532 if (ccb[mbo].tarstat == 2) {
533 #ifdef DEBUG
534 int i;
535 #endif
536 DEB(printk("aha1542_intr_handle: sense:"));
537 #ifdef DEBUG
538 for (i = 0; i < 12; i++)
539 printk("%02x ", ccb[mbo].cdb[ccb[mbo].cdblen + i]);
540 printk("\n");
541 #endif
542 /*
543 DEB(printk("aha1542_intr_handle: buf:"));
544 for (i = 0; i < bufflen; i++)
545 printk("%02x ", ((unchar *)buff)[i]);
546 printk("\n");
547 */
548 }
549 DEB(if (errstatus) printk("aha1542_intr_handle: returning %6x\n", errstatus));
550 SCtmp->result = errstatus;
551 HOSTDATA(shost)->SCint[mbo] = NULL; /* This effectively frees up the mailbox slot, as
552 far as queuecommand is concerned */
553 my_done(SCtmp);
554 number_serviced++;
555 };
556 }
557
558 static int aha1542_queuecommand_lck(Scsi_Cmnd * SCpnt, void (*done) (Scsi_Cmnd *))
559 {
560 unchar ahacmd = CMD_START_SCSI;
561 unchar direction;
562 unchar *cmd = (unchar *) SCpnt->cmnd;
563 unchar target = SCpnt->device->id;
564 unchar lun = SCpnt->device->lun;
565 unsigned long flags;
566 int bufflen = scsi_bufflen(SCpnt);
567 int mbo;
568 struct mailbox *mb;
569 struct ccb *ccb;
570
571 DEB(int i);
572
573 mb = HOSTDATA(SCpnt->device->host)->mb;
574 ccb = HOSTDATA(SCpnt->device->host)->ccb;
575
576 DEB(if (target > 1) {
577 SCpnt->result = DID_TIME_OUT << 16;
578 done(SCpnt); return 0;
579 }
580 );
581
582 if (*cmd == REQUEST_SENSE) {
583 /* Don't do the command - we have the sense data already */
584 #if 0
585 /* scsi_request_sense() provides a buffer of size 256,
586 so there is no reason to expect equality */
587 if (bufflen != SCSI_SENSE_BUFFERSIZE)
588 printk(KERN_CRIT "aha1542: Wrong buffer length supplied "
589 "for request sense (%d)\n", bufflen);
590 #endif
591 SCpnt->result = 0;
592 done(SCpnt);
593 return 0;
594 }
595 #ifdef DEBUG
596 if (*cmd == READ_10 || *cmd == WRITE_10)
597 i = xscsi2int(cmd + 2);
598 else if (*cmd == READ_6 || *cmd == WRITE_6)
599 i = scsi2int(cmd + 2);
600 else
601 i = -1;
602 if (done)
603 printk(KERN_DEBUG "aha1542_queuecommand: dev %d cmd %02x pos %d len %d ", target, *cmd, i, bufflen);
604 else
605 printk(KERN_DEBUG "aha1542_command: dev %d cmd %02x pos %d len %d ", target, *cmd, i, bufflen);
606 aha1542_stat();
607 printk(KERN_DEBUG "aha1542_queuecommand: dumping scsi cmd:");
608 for (i = 0; i < SCpnt->cmd_len; i++)
609 printk("%02x ", cmd[i]);
610 printk("\n");
611 if (*cmd == WRITE_10 || *cmd == WRITE_6)
612 return 0; /* we are still testing, so *don't* write */
613 #endif
614 /* Use the outgoing mailboxes in a round-robin fashion, because this
615 is how the host adapter will scan for them */
616
617 spin_lock_irqsave(&aha1542_lock, flags);
618 mbo = HOSTDATA(SCpnt->device->host)->aha1542_last_mbo_used + 1;
619 if (mbo >= AHA1542_MAILBOXES)
620 mbo = 0;
621
622 do {
623 if (mb[mbo].status == 0 && HOSTDATA(SCpnt->device->host)->SCint[mbo] == NULL)
624 break;
625 mbo++;
626 if (mbo >= AHA1542_MAILBOXES)
627 mbo = 0;
628 } while (mbo != HOSTDATA(SCpnt->device->host)->aha1542_last_mbo_used);
629
630 if (mb[mbo].status || HOSTDATA(SCpnt->device->host)->SCint[mbo])
631 panic("Unable to find empty mailbox for aha1542.\n");
632
633 HOSTDATA(SCpnt->device->host)->SCint[mbo] = SCpnt; /* This will effectively prevent someone else from
634 screwing with this cdb. */
635
636 HOSTDATA(SCpnt->device->host)->aha1542_last_mbo_used = mbo;
637 spin_unlock_irqrestore(&aha1542_lock, flags);
638
639 #ifdef DEBUG
640 printk(KERN_DEBUG "Sending command (%d %x)...", mbo, done);
641 #endif
642
643 any2scsi(mb[mbo].ccbptr, SCSI_BUF_PA(&ccb[mbo])); /* This gets trashed for some reason */
644
645 memset(&ccb[mbo], 0, sizeof(struct ccb));
646
647 ccb[mbo].cdblen = SCpnt->cmd_len;
648
649 direction = 0;
650 if (*cmd == READ_10 || *cmd == READ_6)
651 direction = 8;
652 else if (*cmd == WRITE_10 || *cmd == WRITE_6)
653 direction = 16;
654
655 memcpy(ccb[mbo].cdb, cmd, ccb[mbo].cdblen);
656
657 if (bufflen) {
658 struct scatterlist *sg;
659 struct chain *cptr;
660 #ifdef DEBUG
661 unsigned char *ptr;
662 #endif
663 int i, sg_count = scsi_sg_count(SCpnt);
664 ccb[mbo].op = 2; /* SCSI Initiator Command w/scatter-gather */
665 SCpnt->host_scribble = kmalloc(sizeof(*cptr)*sg_count,
666 GFP_KERNEL | GFP_DMA);
667 cptr = (struct chain *) SCpnt->host_scribble;
668 if (cptr == NULL) {
669 /* free the claimed mailbox slot */
670 HOSTDATA(SCpnt->device->host)->SCint[mbo] = NULL;
671 return SCSI_MLQUEUE_HOST_BUSY;
672 }
673 scsi_for_each_sg(SCpnt, sg, sg_count, i) {
674 any2scsi(cptr[i].dataptr, SCSI_SG_PA(sg));
675 any2scsi(cptr[i].datalen, sg->length);
676 };
677 any2scsi(ccb[mbo].datalen, sg_count * sizeof(struct chain));
678 any2scsi(ccb[mbo].dataptr, SCSI_BUF_PA(cptr));
679 #ifdef DEBUG
680 printk("cptr %x: ", cptr);
681 ptr = (unsigned char *) cptr;
682 for (i = 0; i < 18; i++)
683 printk("%02x ", ptr[i]);
684 #endif
685 } else {
686 ccb[mbo].op = 0; /* SCSI Initiator Command */
687 SCpnt->host_scribble = NULL;
688 any2scsi(ccb[mbo].datalen, 0);
689 any2scsi(ccb[mbo].dataptr, 0);
690 };
691 ccb[mbo].idlun = (target & 7) << 5 | direction | (lun & 7); /*SCSI Target Id */
692 ccb[mbo].rsalen = 16;
693 ccb[mbo].linkptr[0] = ccb[mbo].linkptr[1] = ccb[mbo].linkptr[2] = 0;
694 ccb[mbo].commlinkid = 0;
695
696 #ifdef DEBUG
697 {
698 int i;
699 printk(KERN_DEBUG "aha1542_command: sending.. ");
700 for (i = 0; i < sizeof(ccb[mbo]) - 10; i++)
701 printk("%02x ", ((unchar *) & ccb[mbo])[i]);
702 };
703 #endif
704
705 if (done) {
706 DEB(printk("aha1542_queuecommand: now waiting for interrupt ");
707 aha1542_stat());
708 SCpnt->scsi_done = done;
709 mb[mbo].status = 1;
710 aha1542_out(SCpnt->device->host->io_port, &ahacmd, 1); /* start scsi command */
711 DEB(aha1542_stat());
712 } else
713 printk("aha1542_queuecommand: done can't be NULL\n");
714
715 return 0;
716 }
717
718 static DEF_SCSI_QCMD(aha1542_queuecommand)
719
720 /* Initialize mailboxes */
721 static void setup_mailboxes(int bse, struct Scsi_Host *shpnt)
722 {
723 int i;
724 struct mailbox *mb;
725 struct ccb *ccb;
726
727 unchar cmd[5] = { CMD_MBINIT, AHA1542_MAILBOXES, 0, 0, 0};
728
729 mb = HOSTDATA(shpnt)->mb;
730 ccb = HOSTDATA(shpnt)->ccb;
731
732 for (i = 0; i < AHA1542_MAILBOXES; i++) {
733 mb[i].status = mb[AHA1542_MAILBOXES + i].status = 0;
734 any2scsi(mb[i].ccbptr, SCSI_BUF_PA(&ccb[i]));
735 };
736 aha1542_intr_reset(bse); /* reset interrupts, so they don't block */
737 any2scsi((cmd + 2), SCSI_BUF_PA(mb));
738 aha1542_out(bse, cmd, 5);
739 WAIT(INTRFLAGS(bse), INTRMASK, HACC, 0);
740 while (0) {
741 fail:
742 printk(KERN_ERR "aha1542_detect: failed setting up mailboxes\n");
743 }
744 aha1542_intr_reset(bse);
745 }
746
747 static int __init aha1542_getconfig(int base_io, unsigned char *irq_level, unsigned char *dma_chan, unsigned char *scsi_id)
748 {
749 unchar inquiry_cmd[] = {CMD_RETCONF};
750 unchar inquiry_result[3];
751 int i;
752 i = inb(STATUS(base_io));
753 if (i & DF) {
754 i = inb(DATA(base_io));
755 };
756 aha1542_out(base_io, inquiry_cmd, 1);
757 aha1542_in(base_io, inquiry_result, 3);
758 WAIT(INTRFLAGS(base_io), INTRMASK, HACC, 0);
759 while (0) {
760 fail:
761 printk(KERN_ERR "aha1542_detect: query board settings\n");
762 }
763 aha1542_intr_reset(base_io);
764 switch (inquiry_result[0]) {
765 case 0x80:
766 *dma_chan = 7;
767 break;
768 case 0x40:
769 *dma_chan = 6;
770 break;
771 case 0x20:
772 *dma_chan = 5;
773 break;
774 case 0x01:
775 *dma_chan = 0;
776 break;
777 case 0:
778 /* This means that the adapter, although Adaptec 1542 compatible, doesn't use a DMA channel.
779 Currently only aware of the BusLogic BT-445S VL-Bus adapter which needs this. */
780 *dma_chan = 0xFF;
781 break;
782 default:
783 printk(KERN_ERR "Unable to determine Adaptec DMA priority. Disabling board\n");
784 return -1;
785 };
786 switch (inquiry_result[1]) {
787 case 0x40:
788 *irq_level = 15;
789 break;
790 case 0x20:
791 *irq_level = 14;
792 break;
793 case 0x8:
794 *irq_level = 12;
795 break;
796 case 0x4:
797 *irq_level = 11;
798 break;
799 case 0x2:
800 *irq_level = 10;
801 break;
802 case 0x1:
803 *irq_level = 9;
804 break;
805 default:
806 printk(KERN_ERR "Unable to determine Adaptec IRQ level. Disabling board\n");
807 return -1;
808 };
809 *scsi_id = inquiry_result[2] & 7;
810 return 0;
811 }
812
813 /* This function should only be called for 1542C boards - we can detect
814 the special firmware settings and unlock the board */
815
816 static int __init aha1542_mbenable(int base)
817 {
818 static unchar mbenable_cmd[3];
819 static unchar mbenable_result[2];
820 int retval;
821
822 retval = BIOS_TRANSLATION_6432;
823
824 mbenable_cmd[0] = CMD_EXTBIOS;
825 aha1542_out(base, mbenable_cmd, 1);
826 if (aha1542_in1(base, mbenable_result, 2))
827 return retval;
828 WAITd(INTRFLAGS(base), INTRMASK, HACC, 0, 100);
829 aha1542_intr_reset(base);
830
831 if ((mbenable_result[0] & 0x08) || mbenable_result[1]) {
832 mbenable_cmd[0] = CMD_MBENABLE;
833 mbenable_cmd[1] = 0;
834 mbenable_cmd[2] = mbenable_result[1];
835
836 if ((mbenable_result[0] & 0x08) && (mbenable_result[1] & 0x03))
837 retval = BIOS_TRANSLATION_25563;
838
839 aha1542_out(base, mbenable_cmd, 3);
840 WAIT(INTRFLAGS(base), INTRMASK, HACC, 0);
841 };
842 while (0) {
843 fail:
844 printk(KERN_ERR "aha1542_mbenable: Mailbox init failed\n");
845 }
846 aha1542_intr_reset(base);
847 return retval;
848 }
849
850 /* Query the board to find out if it is a 1542 or a 1740, or whatever. */
851 static int __init aha1542_query(int base_io, int *transl)
852 {
853 unchar inquiry_cmd[] = {CMD_INQUIRY};
854 unchar inquiry_result[4];
855 int i;
856 i = inb(STATUS(base_io));
857 if (i & DF) {
858 i = inb(DATA(base_io));
859 };
860 aha1542_out(base_io, inquiry_cmd, 1);
861 aha1542_in(base_io, inquiry_result, 4);
862 WAIT(INTRFLAGS(base_io), INTRMASK, HACC, 0);
863 while (0) {
864 fail:
865 printk(KERN_ERR "aha1542_detect: query card type\n");
866 }
867 aha1542_intr_reset(base_io);
868
869 *transl = BIOS_TRANSLATION_6432; /* Default case */
870
871 /* For an AHA1740 series board, we ignore the board since there is a
872 hardware bug which can lead to wrong blocks being returned if the board
873 is operating in the 1542 emulation mode. Since there is an extended mode
874 driver, we simply ignore the board and let the 1740 driver pick it up.
875 */
876
877 if (inquiry_result[0] == 0x43) {
878 printk(KERN_INFO "aha1542.c: Emulation mode not supported for AHA 174N hardware.\n");
879 return 1;
880 };
881
882 /* Always call this - boards that do not support extended bios translation
883 will ignore the command, and we will set the proper default */
884
885 *transl = aha1542_mbenable(base_io);
886
887 return 0;
888 }
889
890 #ifndef MODULE
891 static char *setup_str[MAXBOARDS] __initdata;
892 static int setup_idx = 0;
893
894 static void __init aha1542_setup(char *str, int *ints)
895 {
896 const char *ahausage = "aha1542: usage: aha1542=<PORTBASE>[,<BUSON>,<BUSOFF>[,<DMASPEED>]]\n";
897 int setup_portbase;
898
899 if (setup_idx >= MAXBOARDS) {
900 printk(KERN_ERR "aha1542: aha1542_setup called too many times! Bad LILO params ?\n");
901 printk(KERN_ERR " Entryline 1: %s\n", setup_str[0]);
902 printk(KERN_ERR " Entryline 2: %s\n", setup_str[1]);
903 printk(KERN_ERR " This line: %s\n", str);
904 return;
905 }
906 if (ints[0] < 1 || ints[0] > 4) {
907 printk(KERN_ERR "aha1542: %s\n", str);
908 printk(ahausage);
909 printk(KERN_ERR "aha1542: Wrong parameters may cause system malfunction.. We try anyway..\n");
910 }
911 setup_called[setup_idx] = ints[0];
912 setup_str[setup_idx] = str;
913
914 setup_portbase = ints[0] >= 1 ? ints[1] : 0; /* Preserve the default value.. */
915 setup_buson[setup_idx] = ints[0] >= 2 ? ints[2] : 7;
916 setup_busoff[setup_idx] = ints[0] >= 3 ? ints[3] : 5;
917 if (ints[0] >= 4)
918 {
919 int atbt = -1;
920 switch (ints[4]) {
921 case 5:
922 atbt = 0x00;
923 break;
924 case 6:
925 atbt = 0x04;
926 break;
927 case 7:
928 atbt = 0x01;
929 break;
930 case 8:
931 atbt = 0x02;
932 break;
933 case 10:
934 atbt = 0x03;
935 break;
936 default:
937 printk(KERN_ERR "aha1542: %s\n", str);
938 printk(ahausage);
939 printk(KERN_ERR "aha1542: Valid values for DMASPEED are 5-8, 10 MB/s. Using jumper defaults.\n");
940 break;
941 }
942 setup_dmaspeed[setup_idx] = atbt;
943 }
944 if (setup_portbase != 0)
945 bases[setup_idx] = setup_portbase;
946
947 ++setup_idx;
948 }
949
950 static int __init do_setup(char *str)
951 {
952 int ints[5];
953
954 int count=setup_idx;
955
956 get_options(str, ARRAY_SIZE(ints), ints);
957 aha1542_setup(str,ints);
958
959 return count<setup_idx;
960 }
961
962 __setup("aha1542=",do_setup);
963 #endif
964
965 /* return non-zero on detection */
966 static int __init aha1542_detect(struct scsi_host_template * tpnt)
967 {
968 unsigned char dma_chan;
969 unsigned char irq_level;
970 unsigned char scsi_id;
971 unsigned long flags;
972 unsigned int base_io;
973 int trans;
974 struct Scsi_Host *shpnt = NULL;
975 int count = 0;
976 int indx;
977
978 DEB(printk("aha1542_detect: \n"));
979
980 tpnt->proc_name = "aha1542";
981
982 #ifdef MODULE
983 bases[0] = aha1542[0];
984 setup_buson[0] = aha1542[1];
985 setup_busoff[0] = aha1542[2];
986 {
987 int atbt = -1;
988 switch (aha1542[3]) {
989 case 5:
990 atbt = 0x00;
991 break;
992 case 6:
993 atbt = 0x04;
994 break;
995 case 7:
996 atbt = 0x01;
997 break;
998 case 8:
999 atbt = 0x02;
1000 break;
1001 case 10:
1002 atbt = 0x03;
1003 break;
1004 };
1005 setup_dmaspeed[0] = atbt;
1006 }
1007 #endif
1008
1009 /*
1010 * Hunt for ISA Plug'n'Pray Adaptecs (AHA1535)
1011 */
1012
1013 if(isapnp)
1014 {
1015 struct pnp_dev *pdev = NULL;
1016 for(indx = 0; indx < ARRAY_SIZE(bases); indx++) {
1017 if(bases[indx])
1018 continue;
1019 pdev = pnp_find_dev(NULL, ISAPNP_VENDOR('A', 'D', 'P'),
1020 ISAPNP_FUNCTION(0x1542), pdev);
1021 if(pdev==NULL)
1022 break;
1023 /*
1024 * Activate the PnP card
1025 */
1026
1027 if(pnp_device_attach(pdev)<0)
1028 continue;
1029
1030 if(pnp_activate_dev(pdev)<0) {
1031 pnp_device_detach(pdev);
1032 continue;
1033 }
1034
1035 if(!pnp_port_valid(pdev, 0)) {
1036 pnp_device_detach(pdev);
1037 continue;
1038 }
1039
1040 bases[indx] = pnp_port_start(pdev, 0);
1041
1042 /* The card can be queried for its DMA, we have
1043 the DMA set up that is enough */
1044
1045 printk(KERN_INFO "ISAPnP found an AHA1535 at I/O 0x%03X\n", bases[indx]);
1046 }
1047 }
1048 for (indx = 0; indx < ARRAY_SIZE(bases); indx++)
1049 if (bases[indx] != 0 && request_region(bases[indx], 4, "aha1542")) {
1050 shpnt = scsi_register(tpnt,
1051 sizeof(struct aha1542_hostdata));
1052
1053 if(shpnt==NULL) {
1054 release_region(bases[indx], 4);
1055 continue;
1056 }
1057 if (!aha1542_test_port(bases[indx], shpnt))
1058 goto unregister;
1059
1060 base_io = bases[indx];
1061
1062 /* Set the Bus on/off-times as not to ruin floppy performance */
1063 {
1064 unchar oncmd[] = {CMD_BUSON_TIME, 7};
1065 unchar offcmd[] = {CMD_BUSOFF_TIME, 5};
1066
1067 if (setup_called[indx]) {
1068 oncmd[1] = setup_buson[indx];
1069 offcmd[1] = setup_busoff[indx];
1070 }
1071 aha1542_intr_reset(base_io);
1072 aha1542_out(base_io, oncmd, 2);
1073 WAIT(INTRFLAGS(base_io), INTRMASK, HACC, 0);
1074 aha1542_intr_reset(base_io);
1075 aha1542_out(base_io, offcmd, 2);
1076 WAIT(INTRFLAGS(base_io), INTRMASK, HACC, 0);
1077 if (setup_dmaspeed[indx] >= 0) {
1078 unchar dmacmd[] = {CMD_DMASPEED, 0};
1079 dmacmd[1] = setup_dmaspeed[indx];
1080 aha1542_intr_reset(base_io);
1081 aha1542_out(base_io, dmacmd, 2);
1082 WAIT(INTRFLAGS(base_io), INTRMASK, HACC, 0);
1083 }
1084 while (0) {
1085 fail:
1086 printk(KERN_ERR "aha1542_detect: setting bus on/off-time failed\n");
1087 }
1088 aha1542_intr_reset(base_io);
1089 }
1090 if (aha1542_query(base_io, &trans))
1091 goto unregister;
1092
1093 if (aha1542_getconfig(base_io, &irq_level, &dma_chan, &scsi_id) == -1)
1094 goto unregister;
1095
1096 printk(KERN_INFO "Configuring Adaptec (SCSI-ID %d) at IO:%x, IRQ %d", scsi_id, base_io, irq_level);
1097 if (dma_chan != 0xFF)
1098 printk(", DMA priority %d", dma_chan);
1099 printk("\n");
1100
1101 DEB(aha1542_stat());
1102 setup_mailboxes(base_io, shpnt);
1103
1104 DEB(aha1542_stat());
1105
1106 DEB(printk("aha1542_detect: enable interrupt channel %d\n", irq_level));
1107 spin_lock_irqsave(&aha1542_lock, flags);
1108 if (request_irq(irq_level, do_aha1542_intr_handle, 0,
1109 "aha1542", shpnt)) {
1110 printk(KERN_ERR "Unable to allocate IRQ for adaptec controller.\n");
1111 spin_unlock_irqrestore(&aha1542_lock, flags);
1112 goto unregister;
1113 }
1114 if (dma_chan != 0xFF) {
1115 if (request_dma(dma_chan, "aha1542")) {
1116 printk(KERN_ERR "Unable to allocate DMA channel for Adaptec.\n");
1117 free_irq(irq_level, shpnt);
1118 spin_unlock_irqrestore(&aha1542_lock, flags);
1119 goto unregister;
1120 }
1121 if (dma_chan == 0 || dma_chan >= 5) {
1122 set_dma_mode(dma_chan, DMA_MODE_CASCADE);
1123 enable_dma(dma_chan);
1124 }
1125 }
1126
1127 shpnt->this_id = scsi_id;
1128 shpnt->unique_id = base_io;
1129 shpnt->io_port = base_io;
1130 shpnt->n_io_port = 4; /* Number of bytes of I/O space used */
1131 shpnt->dma_channel = dma_chan;
1132 shpnt->irq = irq_level;
1133 HOSTDATA(shpnt)->bios_translation = trans;
1134 if (trans == BIOS_TRANSLATION_25563)
1135 printk(KERN_INFO "aha1542.c: Using extended bios translation\n");
1136 HOSTDATA(shpnt)->aha1542_last_mbi_used = (2 * AHA1542_MAILBOXES - 1);
1137 HOSTDATA(shpnt)->aha1542_last_mbo_used = (AHA1542_MAILBOXES - 1);
1138 memset(HOSTDATA(shpnt)->SCint, 0, sizeof(HOSTDATA(shpnt)->SCint));
1139 spin_unlock_irqrestore(&aha1542_lock, flags);
1140 #if 0
1141 DEB(printk(" *** READ CAPACITY ***\n"));
1142
1143 {
1144 unchar buf[8];
1145 static unchar cmd[] = { READ_CAPACITY, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
1146 int i;
1147
1148 for (i = 0; i < sizeof(buf); ++i)
1149 buf[i] = 0x87;
1150 for (i = 0; i < 2; ++i)
1151 if (!aha1542_command(i, cmd, buf, sizeof(buf))) {
1152 printk(KERN_DEBUG "aha_detect: LU %d sector_size %d device_size %d\n",
1153 i, xscsi2int(buf + 4), xscsi2int(buf));
1154 }
1155 }
1156
1157 DEB(printk(" *** NOW RUNNING MY OWN TEST *** \n"));
1158
1159 for (i = 0; i < 4; ++i) {
1160 unsigned char cmd[10];
1161 static buffer[512];
1162
1163 cmd[0] = READ_10;
1164 cmd[1] = 0;
1165 xany2scsi(cmd + 2, i);
1166 cmd[6] = 0;
1167 cmd[7] = 0;
1168 cmd[8] = 1;
1169 cmd[9] = 0;
1170 aha1542_command(0, cmd, buffer, 512);
1171 }
1172 #endif
1173 count++;
1174 continue;
1175 unregister:
1176 release_region(bases[indx], 4);
1177 scsi_unregister(shpnt);
1178 continue;
1179
1180 };
1181
1182 return count;
1183 }
1184
1185 static int aha1542_release(struct Scsi_Host *shost)
1186 {
1187 if (shost->irq)
1188 free_irq(shost->irq, shost);
1189 if (shost->dma_channel != 0xff)
1190 free_dma(shost->dma_channel);
1191 if (shost->io_port && shost->n_io_port)
1192 release_region(shost->io_port, shost->n_io_port);
1193 scsi_unregister(shost);
1194 return 0;
1195 }
1196
1197 static int aha1542_restart(struct Scsi_Host *shost)
1198 {
1199 int i;
1200 int count = 0;
1201 #if 0
1202 unchar ahacmd = CMD_START_SCSI;
1203 #endif
1204
1205 for (i = 0; i < AHA1542_MAILBOXES; i++)
1206 if (HOSTDATA(shost)->SCint[i] &&
1207 !(HOSTDATA(shost)->SCint[i]->device->soft_reset)) {
1208 #if 0
1209 HOSTDATA(shost)->mb[i].status = 1; /* Indicate ready to restart... */
1210 #endif
1211 count++;
1212 }
1213 printk(KERN_DEBUG "Potential to restart %d stalled commands...\n", count);
1214 #if 0
1215 /* start scsi command */
1216 if (count)
1217 aha1542_out(shost->io_port, &ahacmd, 1);
1218 #endif
1219 return 0;
1220 }
1221
1222 /*
1223 * This is a device reset. This is handled by sending a special command
1224 * to the device.
1225 */
1226 static int aha1542_dev_reset(Scsi_Cmnd * SCpnt)
1227 {
1228 unsigned long flags;
1229 struct mailbox *mb;
1230 unchar target = SCpnt->device->id;
1231 unchar lun = SCpnt->device->lun;
1232 int mbo;
1233 struct ccb *ccb;
1234 unchar ahacmd = CMD_START_SCSI;
1235
1236 ccb = HOSTDATA(SCpnt->device->host)->ccb;
1237 mb = HOSTDATA(SCpnt->device->host)->mb;
1238
1239 spin_lock_irqsave(&aha1542_lock, flags);
1240 mbo = HOSTDATA(SCpnt->device->host)->aha1542_last_mbo_used + 1;
1241 if (mbo >= AHA1542_MAILBOXES)
1242 mbo = 0;
1243
1244 do {
1245 if (mb[mbo].status == 0 && HOSTDATA(SCpnt->device->host)->SCint[mbo] == NULL)
1246 break;
1247 mbo++;
1248 if (mbo >= AHA1542_MAILBOXES)
1249 mbo = 0;
1250 } while (mbo != HOSTDATA(SCpnt->device->host)->aha1542_last_mbo_used);
1251
1252 if (mb[mbo].status || HOSTDATA(SCpnt->device->host)->SCint[mbo])
1253 panic("Unable to find empty mailbox for aha1542.\n");
1254
1255 HOSTDATA(SCpnt->device->host)->SCint[mbo] = SCpnt; /* This will effectively
1256 prevent someone else from
1257 screwing with this cdb. */
1258
1259 HOSTDATA(SCpnt->device->host)->aha1542_last_mbo_used = mbo;
1260 spin_unlock_irqrestore(&aha1542_lock, flags);
1261
1262 any2scsi(mb[mbo].ccbptr, SCSI_BUF_PA(&ccb[mbo])); /* This gets trashed for some reason */
1263
1264 memset(&ccb[mbo], 0, sizeof(struct ccb));
1265
1266 ccb[mbo].op = 0x81; /* BUS DEVICE RESET */
1267
1268 ccb[mbo].idlun = (target & 7) << 5 | (lun & 7); /*SCSI Target Id */
1269
1270 ccb[mbo].linkptr[0] = ccb[mbo].linkptr[1] = ccb[mbo].linkptr[2] = 0;
1271 ccb[mbo].commlinkid = 0;
1272
1273 /*
1274 * Now tell the 1542 to flush all pending commands for this
1275 * target
1276 */
1277 aha1542_out(SCpnt->device->host->io_port, &ahacmd, 1);
1278
1279 scmd_printk(KERN_WARNING, SCpnt,
1280 "Trying device reset for target\n");
1281
1282 return SUCCESS;
1283
1284
1285 #ifdef ERIC_neverdef
1286 /*
1287 * With the 1542 we apparently never get an interrupt to
1288 * acknowledge a device reset being sent. Then again, Leonard
1289 * says we are doing this wrong in the first place...
1290 *
1291 * Take a wait and see attitude. If we get spurious interrupts,
1292 * then the device reset is doing something sane and useful, and
1293 * we will wait for the interrupt to post completion.
1294 */
1295 printk(KERN_WARNING "Sent BUS DEVICE RESET to target %d\n", SCpnt->target);
1296
1297 /*
1298 * Free the command block for all commands running on this
1299 * target...
1300 */
1301 for (i = 0; i < AHA1542_MAILBOXES; i++) {
1302 if (HOSTDATA(SCpnt->host)->SCint[i] &&
1303 HOSTDATA(SCpnt->host)->SCint[i]->target == SCpnt->target) {
1304 Scsi_Cmnd *SCtmp;
1305 SCtmp = HOSTDATA(SCpnt->host)->SCint[i];
1306 kfree(SCtmp->host_scribble);
1307 SCtmp->host_scribble = NULL;
1308 HOSTDATA(SCpnt->host)->SCint[i] = NULL;
1309 HOSTDATA(SCpnt->host)->mb[i].status = 0;
1310 }
1311 }
1312 return SUCCESS;
1313
1314 return FAILED;
1315 #endif /* ERIC_neverdef */
1316 }
1317
1318 static int aha1542_bus_reset(Scsi_Cmnd * SCpnt)
1319 {
1320 int i;
1321
1322 /*
1323 * This does a scsi reset for all devices on the bus.
1324 * In principle, we could also reset the 1542 - should
1325 * we do this? Try this first, and we can add that later
1326 * if it turns out to be useful.
1327 */
1328 outb(SCRST, CONTROL(SCpnt->device->host->io_port));
1329
1330 /*
1331 * Wait for the thing to settle down a bit. Unfortunately
1332 * this is going to basically lock up the machine while we
1333 * wait for this to complete. To be 100% correct, we need to
1334 * check for timeout, and if we are doing something like this
1335 * we are pretty desperate anyways.
1336 */
1337 ssleep(4);
1338
1339 spin_lock_irq(SCpnt->device->host->host_lock);
1340
1341 WAIT(STATUS(SCpnt->device->host->io_port),
1342 STATMASK, INIT | IDLE, STST | DIAGF | INVDCMD | DF | CDF);
1343
1344 /*
1345 * Now try to pick up the pieces. For all pending commands,
1346 * free any internal data structures, and basically clear things
1347 * out. We do not try and restart any commands or anything -
1348 * the strategy handler takes care of that crap.
1349 */
1350 printk(KERN_WARNING "Sent BUS RESET to scsi host %d\n", SCpnt->device->host->host_no);
1351
1352 for (i = 0; i < AHA1542_MAILBOXES; i++) {
1353 if (HOSTDATA(SCpnt->device->host)->SCint[i] != NULL) {
1354 Scsi_Cmnd *SCtmp;
1355 SCtmp = HOSTDATA(SCpnt->device->host)->SCint[i];
1356
1357
1358 if (SCtmp->device->soft_reset) {
1359 /*
1360 * If this device implements the soft reset option,
1361 * then it is still holding onto the command, and
1362 * may yet complete it. In this case, we don't
1363 * flush the data.
1364 */
1365 continue;
1366 }
1367 kfree(SCtmp->host_scribble);
1368 SCtmp->host_scribble = NULL;
1369 HOSTDATA(SCpnt->device->host)->SCint[i] = NULL;
1370 HOSTDATA(SCpnt->device->host)->mb[i].status = 0;
1371 }
1372 }
1373
1374 spin_unlock_irq(SCpnt->device->host->host_lock);
1375 return SUCCESS;
1376
1377 fail:
1378 spin_unlock_irq(SCpnt->device->host->host_lock);
1379 return FAILED;
1380 }
1381
1382 static int aha1542_host_reset(Scsi_Cmnd * SCpnt)
1383 {
1384 int i;
1385
1386 /*
1387 * This does a scsi reset for all devices on the bus.
1388 * In principle, we could also reset the 1542 - should
1389 * we do this? Try this first, and we can add that later
1390 * if it turns out to be useful.
1391 */
1392 outb(HRST | SCRST, CONTROL(SCpnt->device->host->io_port));
1393
1394 /*
1395 * Wait for the thing to settle down a bit. Unfortunately
1396 * this is going to basically lock up the machine while we
1397 * wait for this to complete. To be 100% correct, we need to
1398 * check for timeout, and if we are doing something like this
1399 * we are pretty desperate anyways.
1400 */
1401 ssleep(4);
1402 spin_lock_irq(SCpnt->device->host->host_lock);
1403
1404 WAIT(STATUS(SCpnt->device->host->io_port),
1405 STATMASK, INIT | IDLE, STST | DIAGF | INVDCMD | DF | CDF);
1406
1407 /*
1408 * We need to do this too before the 1542 can interact with
1409 * us again.
1410 */
1411 setup_mailboxes(SCpnt->device->host->io_port, SCpnt->device->host);
1412
1413 /*
1414 * Now try to pick up the pieces. For all pending commands,
1415 * free any internal data structures, and basically clear things
1416 * out. We do not try and restart any commands or anything -
1417 * the strategy handler takes care of that crap.
1418 */
1419 printk(KERN_WARNING "Sent BUS RESET to scsi host %d\n", SCpnt->device->host->host_no);
1420
1421 for (i = 0; i < AHA1542_MAILBOXES; i++) {
1422 if (HOSTDATA(SCpnt->device->host)->SCint[i] != NULL) {
1423 Scsi_Cmnd *SCtmp;
1424 SCtmp = HOSTDATA(SCpnt->device->host)->SCint[i];
1425
1426 if (SCtmp->device->soft_reset) {
1427 /*
1428 * If this device implements the soft reset option,
1429 * then it is still holding onto the command, and
1430 * may yet complete it. In this case, we don't
1431 * flush the data.
1432 */
1433 continue;
1434 }
1435 kfree(SCtmp->host_scribble);
1436 SCtmp->host_scribble = NULL;
1437 HOSTDATA(SCpnt->device->host)->SCint[i] = NULL;
1438 HOSTDATA(SCpnt->device->host)->mb[i].status = 0;
1439 }
1440 }
1441
1442 spin_unlock_irq(SCpnt->device->host->host_lock);
1443 return SUCCESS;
1444
1445 fail:
1446 spin_unlock_irq(SCpnt->device->host->host_lock);
1447 return FAILED;
1448 }
1449
1450 #if 0
1451 /*
1452 * These are the old error handling routines. They are only temporarily
1453 * here while we play with the new error handling code.
1454 */
1455 static int aha1542_old_abort(Scsi_Cmnd * SCpnt)
1456 {
1457 #if 0
1458 unchar ahacmd = CMD_START_SCSI;
1459 unsigned long flags;
1460 struct mailbox *mb;
1461 int mbi, mbo, i;
1462
1463 printk(KERN_DEBUG "In aha1542_abort: %x %x\n",
1464 inb(STATUS(SCpnt->host->io_port)),
1465 inb(INTRFLAGS(SCpnt->host->io_port)));
1466
1467 spin_lock_irqsave(&aha1542_lock, flags);
1468 mb = HOSTDATA(SCpnt->host)->mb;
1469 mbi = HOSTDATA(SCpnt->host)->aha1542_last_mbi_used + 1;
1470 if (mbi >= 2 * AHA1542_MAILBOXES)
1471 mbi = AHA1542_MAILBOXES;
1472
1473 do {
1474 if (mb[mbi].status != 0)
1475 break;
1476 mbi++;
1477 if (mbi >= 2 * AHA1542_MAILBOXES)
1478 mbi = AHA1542_MAILBOXES;
1479 } while (mbi != HOSTDATA(SCpnt->host)->aha1542_last_mbi_used);
1480 spin_unlock_irqrestore(&aha1542_lock, flags);
1481
1482 if (mb[mbi].status) {
1483 printk(KERN_ERR "Lost interrupt discovered on irq %d - attempting to recover\n",
1484 SCpnt->host->irq);
1485 aha1542_intr_handle(SCpnt->host, NULL);
1486 return 0;
1487 }
1488 /* OK, no lost interrupt. Try looking to see how many pending commands
1489 we think we have. */
1490
1491 for (i = 0; i < AHA1542_MAILBOXES; i++)
1492 if (HOSTDATA(SCpnt->host)->SCint[i]) {
1493 if (HOSTDATA(SCpnt->host)->SCint[i] == SCpnt) {
1494 printk(KERN_ERR "Timed out command pending for %s\n",
1495 SCpnt->request->rq_disk ?
1496 SCpnt->request->rq_disk->disk_name : "?"
1497 );
1498 if (HOSTDATA(SCpnt->host)->mb[i].status) {
1499 printk(KERN_ERR "OGMB still full - restarting\n");
1500 aha1542_out(SCpnt->host->io_port, &ahacmd, 1);
1501 };
1502 } else
1503 printk(KERN_ERR "Other pending command %s\n",
1504 SCpnt->request->rq_disk ?
1505 SCpnt->request->rq_disk->disk_name : "?"
1506 );
1507 }
1508 #endif
1509
1510 DEB(printk("aha1542_abort\n"));
1511 #if 0
1512 spin_lock_irqsave(&aha1542_lock, flags);
1513 for (mbo = 0; mbo < AHA1542_MAILBOXES; mbo++) {
1514 if (SCpnt == HOSTDATA(SCpnt->host)->SCint[mbo]) {
1515 mb[mbo].status = 2; /* Abort command */
1516 aha1542_out(SCpnt->host->io_port, &ahacmd, 1); /* start scsi command */
1517 spin_unlock_irqrestore(&aha1542_lock, flags);
1518 break;
1519 }
1520 }
1521 if (AHA1542_MAILBOXES == mbo)
1522 spin_unlock_irqrestore(&aha1542_lock, flags);
1523 #endif
1524 return SCSI_ABORT_SNOOZE;
1525 }
1526
1527 /* We do not implement a reset function here, but the upper level code
1528 assumes that it will get some kind of response for the command in
1529 SCpnt. We must oblige, or the command will hang the scsi system.
1530 For a first go, we assume that the 1542 notifies us with all of the
1531 pending commands (it does implement soft reset, after all). */
1532
1533 static int aha1542_old_reset(Scsi_Cmnd * SCpnt, unsigned int reset_flags)
1534 {
1535 unchar ahacmd = CMD_START_SCSI;
1536 int i;
1537
1538 /*
1539 * See if a bus reset was suggested.
1540 */
1541 if (reset_flags & SCSI_RESET_SUGGEST_BUS_RESET) {
1542 /*
1543 * This does a scsi reset for all devices on the bus.
1544 * In principle, we could also reset the 1542 - should
1545 * we do this? Try this first, and we can add that later
1546 * if it turns out to be useful.
1547 */
1548 outb(HRST | SCRST, CONTROL(SCpnt->host->io_port));
1549
1550 /*
1551 * Wait for the thing to settle down a bit. Unfortunately
1552 * this is going to basically lock up the machine while we
1553 * wait for this to complete. To be 100% correct, we need to
1554 * check for timeout, and if we are doing something like this
1555 * we are pretty desperate anyways.
1556 */
1557 WAIT(STATUS(SCpnt->host->io_port),
1558 STATMASK, INIT | IDLE, STST | DIAGF | INVDCMD | DF | CDF);
1559
1560 /*
1561 * We need to do this too before the 1542 can interact with
1562 * us again.
1563 */
1564 setup_mailboxes(SCpnt->host->io_port, SCpnt->host);
1565
1566 /*
1567 * Now try to pick up the pieces. Restart all commands
1568 * that are currently active on the bus, and reset all of
1569 * the datastructures. We have some time to kill while
1570 * things settle down, so print a nice message.
1571 */
1572 printk(KERN_WARNING "Sent BUS RESET to scsi host %d\n", SCpnt->host->host_no);
1573
1574 for (i = 0; i < AHA1542_MAILBOXES; i++)
1575 if (HOSTDATA(SCpnt->host)->SCint[i] != NULL) {
1576 Scsi_Cmnd *SCtmp;
1577 SCtmp = HOSTDATA(SCpnt->host)->SCint[i];
1578 SCtmp->result = DID_RESET << 16;
1579 kfree(SCtmp->host_scribble);
1580 SCtmp->host_scribble = NULL;
1581 printk(KERN_WARNING "Sending DID_RESET for target %d\n", SCpnt->target);
1582 SCtmp->scsi_done(SCpnt);
1583
1584 HOSTDATA(SCpnt->host)->SCint[i] = NULL;
1585 HOSTDATA(SCpnt->host)->mb[i].status = 0;
1586 }
1587 /*
1588 * Now tell the mid-level code what we did here. Since
1589 * we have restarted all of the outstanding commands,
1590 * then report SUCCESS.
1591 */
1592 return (SCSI_RESET_SUCCESS | SCSI_RESET_BUS_RESET);
1593 fail:
1594 printk(KERN_CRIT "aha1542.c: Unable to perform hard reset.\n");
1595 printk(KERN_CRIT "Power cycle machine to reset\n");
1596 return (SCSI_RESET_ERROR | SCSI_RESET_BUS_RESET);
1597
1598
1599 } else {
1600 /* This does a selective reset of just the one device */
1601 /* First locate the ccb for this command */
1602 for (i = 0; i < AHA1542_MAILBOXES; i++)
1603 if (HOSTDATA(SCpnt->host)->SCint[i] == SCpnt) {
1604 HOSTDATA(SCpnt->host)->ccb[i].op = 0x81; /* BUS DEVICE RESET */
1605 /* Now tell the 1542 to flush all pending commands for this target */
1606 aha1542_out(SCpnt->host->io_port, &ahacmd, 1);
1607
1608 /* Here is the tricky part. What to do next. Do we get an interrupt
1609 for the commands that we aborted with the specified target, or
1610 do we generate this on our own? Try it without first and see
1611 what happens */
1612 printk(KERN_WARNING "Sent BUS DEVICE RESET to target %d\n", SCpnt->target);
1613
1614 /* If the first does not work, then try the second. I think the
1615 first option is more likely to be correct. Free the command
1616 block for all commands running on this target... */
1617 for (i = 0; i < AHA1542_MAILBOXES; i++)
1618 if (HOSTDATA(SCpnt->host)->SCint[i] &&
1619 HOSTDATA(SCpnt->host)->SCint[i]->target == SCpnt->target) {
1620 Scsi_Cmnd *SCtmp;
1621 SCtmp = HOSTDATA(SCpnt->host)->SCint[i];
1622 SCtmp->result = DID_RESET << 16;
1623 kfree(SCtmp->host_scribble);
1624 SCtmp->host_scribble = NULL;
1625 printk(KERN_WARNING "Sending DID_RESET for target %d\n", SCpnt->target);
1626 SCtmp->scsi_done(SCpnt);
1627
1628 HOSTDATA(SCpnt->host)->SCint[i] = NULL;
1629 HOSTDATA(SCpnt->host)->mb[i].status = 0;
1630 }
1631 return SCSI_RESET_SUCCESS;
1632 }
1633 }
1634 /* No active command at this time, so this means that each time we got
1635 some kind of response the last time through. Tell the mid-level code
1636 to request sense information in order to decide what to do next. */
1637 return SCSI_RESET_PUNT;
1638 }
1639 #endif /* end of big comment block around old_abort + old_reset */
1640
1641 static int aha1542_biosparam(struct scsi_device *sdev,
1642 struct block_device *bdev, sector_t capacity, int *ip)
1643 {
1644 int translation_algorithm;
1645 int size = capacity;
1646
1647 translation_algorithm = HOSTDATA(sdev->host)->bios_translation;
1648
1649 if ((size >> 11) > 1024 && translation_algorithm == BIOS_TRANSLATION_25563) {
1650 /* Please verify that this is the same as what DOS returns */
1651 ip[0] = 255;
1652 ip[1] = 63;
1653 ip[2] = size / 255 / 63;
1654 } else {
1655 ip[0] = 64;
1656 ip[1] = 32;
1657 ip[2] = size >> 11;
1658 }
1659
1660 return 0;
1661 }
1662 MODULE_LICENSE("GPL");
1663
1664
1665 static struct scsi_host_template driver_template = {
1666 .proc_name = "aha1542",
1667 .name = "Adaptec 1542",
1668 .detect = aha1542_detect,
1669 .release = aha1542_release,
1670 .queuecommand = aha1542_queuecommand,
1671 .eh_device_reset_handler= aha1542_dev_reset,
1672 .eh_bus_reset_handler = aha1542_bus_reset,
1673 .eh_host_reset_handler = aha1542_host_reset,
1674 .bios_param = aha1542_biosparam,
1675 .can_queue = AHA1542_MAILBOXES,
1676 .this_id = 7,
1677 .sg_tablesize = AHA1542_SCATTER,
1678 .cmd_per_lun = AHA1542_CMDLUN,
1679 .unchecked_isa_dma = 1,
1680 .use_clustering = ENABLE_CLUSTERING,
1681 };
1682 #include "scsi_module.c"