?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
x86/amd-iommu: Add per IOMMU reference counting
[linux/fpc-iii.git] / drivers / scsi / atp870u.c
blobb137e561f5bc715951145592d5569bae80e19893
1 /*
2 * Copyright (C) 1997 Wu Ching Chen
3 * 2.1.x update (C) 1998 Krzysztof G. Baranowski
4 * 2.5.x update (C) 2002 Red Hat
5 * 2.6.x update (C) 2004 Red Hat
6 *
7 * Marcelo Tosatti <marcelo@conectiva.com.br> : SMP fixes
8 *
9 * Wu Ching Chen : NULL pointer fixes 2000/06/02
10 * support atp876 chip
11 * enable 32 bit fifo transfer
12 * support cdrom & remove device run ultra speed
13 * fix disconnect bug 2000/12/21
14 * support atp880 chip lvd u160 2001/05/15
15 * fix prd table bug 2001/09/12 (7.1)
16 *
17 * atp885 support add by ACARD Hao Ping Lian 2005/01/05
18 */
19 #include <linux/module.h>
20 #include <linux/init.h>
21 #include <linux/interrupt.h>
22 #include <linux/kernel.h>
23 #include <linux/types.h>
24 #include <linux/string.h>
25 #include <linux/ioport.h>
26 #include <linux/delay.h>
27 #include <linux/proc_fs.h>
28 #include <linux/spinlock.h>
29 #include <linux/pci.h>
30 #include <linux/blkdev.h>
31 #include <linux/dma-mapping.h>
32 #include <asm/system.h>
33 #include <asm/io.h>
34
35 #include <scsi/scsi.h>
36 #include <scsi/scsi_cmnd.h>
37 #include <scsi/scsi_device.h>
38 #include <scsi/scsi_host.h>
39
40 #include "atp870u.h"
41
42 static struct scsi_host_template atp870u_template;
43 static void send_s870(struct atp_unit *dev,unsigned char c);
44 static void is885(struct atp_unit *dev, unsigned int wkport,unsigned char c);
45 static void tscam_885(void);
46
47 static irqreturn_t atp870u_intr_handle(int irq, void *dev_id)
48 {
49 unsigned long flags;
50 unsigned short int tmpcip, id;
51 unsigned char i, j, c, target_id, lun,cmdp;
52 unsigned char *prd;
53 struct scsi_cmnd *workreq;
54 unsigned int workport, tmport, tmport1;
55 unsigned long adrcnt, k;
56 #ifdef ED_DBGP
57 unsigned long l;
58 #endif
59 int errstus;
60 struct Scsi_Host *host = dev_id;
61 struct atp_unit *dev = (struct atp_unit *)&host->hostdata;
62
63 for (c = 0; c < 2; c++) {
64 tmport = dev->ioport[c] + 0x1f;
65 j = inb(tmport);
66 if ((j & 0x80) != 0)
67 {
68 goto ch_sel;
69 }
70 dev->in_int[c] = 0;
71 }
72 return IRQ_NONE;
73 ch_sel:
74 #ifdef ED_DBGP
75 printk("atp870u_intr_handle enter\n");
76 #endif
77 dev->in_int[c] = 1;
78 cmdp = inb(dev->ioport[c] + 0x10);
79 workport = dev->ioport[c];
80 if (dev->working[c] != 0) {
81 if (dev->dev_id == ATP885_DEVID) {
82 tmport1 = workport + 0x16;
83 if ((inb(tmport1) & 0x80) == 0)
84 outb((inb(tmport1) | 0x80), tmport1);
85 }
86 tmpcip = dev->pciport[c];
87 if ((inb(tmpcip) & 0x08) != 0)
88 {
89 tmpcip += 0x2;
90 for (k=0; k < 1000; k++) {
91 if ((inb(tmpcip) & 0x08) == 0) {
92 goto stop_dma;
93 }
94 if ((inb(tmpcip) & 0x01) == 0) {
95 goto stop_dma;
96 }
97 }
98 }
99 stop_dma:
100 tmpcip = dev->pciport[c];
101 outb(0x00, tmpcip);
102 tmport -= 0x08;
103
104 i = inb(tmport);
105
106 if (dev->dev_id == ATP885_DEVID) {
107 tmpcip += 2;
108 outb(0x06, tmpcip);
109 tmpcip -= 2;
110 }
111
112 tmport -= 0x02;
113 target_id = inb(tmport);
114 tmport += 0x02;
115
116 /*
117 * Remap wide devices onto id numbers
118 */
119
120 if ((target_id & 0x40) != 0) {
121 target_id = (target_id & 0x07) | 0x08;
122 } else {
123 target_id &= 0x07;
124 }
125
126 if ((j & 0x40) != 0) {
127 if (dev->last_cmd[c] == 0xff) {
128 dev->last_cmd[c] = target_id;
129 }
130 dev->last_cmd[c] |= 0x40;
131 }
132 if (dev->dev_id == ATP885_DEVID)
133 dev->r1f[c][target_id] |= j;
134 #ifdef ED_DBGP
135 printk("atp870u_intr_handle status = %x\n",i);
136 #endif
137 if (i == 0x85) {
138 if ((dev->last_cmd[c] & 0xf0) != 0x40) {
139 dev->last_cmd[c] = 0xff;
140 }
141 if (dev->dev_id == ATP885_DEVID) {
142 tmport -= 0x05;
143 adrcnt = 0;
144 ((unsigned char *) &adrcnt)[2] = inb(tmport++);
145 ((unsigned char *) &adrcnt)[1] = inb(tmport++);
146 ((unsigned char *) &adrcnt)[0] = inb(tmport);
147 if (dev->id[c][target_id].last_len != adrcnt)
148 {
149 k = dev->id[c][target_id].last_len;
150 k -= adrcnt;
151 dev->id[c][target_id].tran_len = k;
152 dev->id[c][target_id].last_len = adrcnt;
153 }
154 #ifdef ED_DBGP
155 printk("tmport = %x dev->id[c][target_id].last_len = %d dev->id[c][target_id].tran_len = %d\n",tmport,dev->id[c][target_id].last_len,dev->id[c][target_id].tran_len);
156 #endif
157 }
158
159 /*
160 * Flip wide
161 */
162 if (dev->wide_id[c] != 0) {
163 tmport = workport + 0x1b;
164 outb(0x01, tmport);
165 while ((inb(tmport) & 0x01) != 0x01) {
166 outb(0x01, tmport);
167 }
168 }
169 /*
170 * Issue more commands
171 */
172 spin_lock_irqsave(dev->host->host_lock, flags);
173 if (((dev->quhd[c] != dev->quend[c]) || (dev->last_cmd[c] != 0xff)) &&
174 (dev->in_snd[c] == 0)) {
175 #ifdef ED_DBGP
176 printk("Call sent_s870\n");
177 #endif
178 send_s870(dev,c);
179 }
180 spin_unlock_irqrestore(dev->host->host_lock, flags);
181 /*
182 * Done
183 */
184 dev->in_int[c] = 0;
185 #ifdef ED_DBGP
186 printk("Status 0x85 return\n");
187 #endif
188 goto handled;
189 }
190
191 if (i == 0x40) {
192 dev->last_cmd[c] |= 0x40;
193 dev->in_int[c] = 0;
194 goto handled;
195 }
196
197 if (i == 0x21) {
198 if ((dev->last_cmd[c] & 0xf0) != 0x40) {
199 dev->last_cmd[c] = 0xff;
200 }
201 tmport -= 0x05;
202 adrcnt = 0;
203 ((unsigned char *) &adrcnt)[2] = inb(tmport++);
204 ((unsigned char *) &adrcnt)[1] = inb(tmport++);
205 ((unsigned char *) &adrcnt)[0] = inb(tmport);
206 k = dev->id[c][target_id].last_len;
207 k -= adrcnt;
208 dev->id[c][target_id].tran_len = k;
209 dev->id[c][target_id].last_len = adrcnt;
210 tmport -= 0x04;
211 outb(0x41, tmport);
212 tmport += 0x08;
213 outb(0x08, tmport);
214 dev->in_int[c] = 0;
215 goto handled;
216 }
217
218 if (dev->dev_id == ATP885_DEVID) {
219 if ((i == 0x4c) || (i == 0x4d) || (i == 0x8c) || (i == 0x8d)) {
220 if ((i == 0x4c) || (i == 0x8c))
221 i=0x48;
222 else
223 i=0x49;
224 }
225
226 }
227 if ((i == 0x80) || (i == 0x8f)) {
228 #ifdef ED_DBGP
229 printk(KERN_DEBUG "Device reselect\n");
230 #endif
231 lun = 0;
232 tmport -= 0x07;
233 if (cmdp == 0x44 || i==0x80) {
234 tmport += 0x0d;
235 lun = inb(tmport) & 0x07;
236 } else {
237 if ((dev->last_cmd[c] & 0xf0) != 0x40) {
238 dev->last_cmd[c] = 0xff;
239 }
240 if (cmdp == 0x41) {
241 #ifdef ED_DBGP
242 printk("cmdp = 0x41\n");
243 #endif
244 tmport += 0x02;
245 adrcnt = 0;
246 ((unsigned char *) &adrcnt)[2] = inb(tmport++);
247 ((unsigned char *) &adrcnt)[1] = inb(tmport++);
248 ((unsigned char *) &adrcnt)[0] = inb(tmport);
249 k = dev->id[c][target_id].last_len;
250 k -= adrcnt;
251 dev->id[c][target_id].tran_len = k;
252 dev->id[c][target_id].last_len = adrcnt;
253 tmport += 0x04;
254 outb(0x08, tmport);
255 dev->in_int[c] = 0;
256 goto handled;
257 } else {
258 #ifdef ED_DBGP
259 printk("cmdp != 0x41\n");
260 #endif
261 outb(0x46, tmport);
262 dev->id[c][target_id].dirct = 0x00;
263 tmport += 0x02;
264 outb(0x00, tmport++);
265 outb(0x00, tmport++);
266 outb(0x00, tmport++);
267 tmport += 0x03;
268 outb(0x08, tmport);
269 dev->in_int[c] = 0;
270 goto handled;
271 }
272 }
273 if (dev->last_cmd[c] != 0xff) {
274 dev->last_cmd[c] |= 0x40;
275 }
276 if (dev->dev_id == ATP885_DEVID) {
277 j = inb(dev->baseport + 0x29) & 0xfe;
278 outb(j, dev->baseport + 0x29);
279 tmport = workport + 0x16;
280 } else {
281 tmport = workport + 0x10;
282 outb(0x45, tmport);
283 tmport += 0x06;
284 }
285
286 target_id = inb(tmport);
287 /*
288 * Remap wide identifiers
289 */
290 if ((target_id & 0x10) != 0) {
291 target_id = (target_id & 0x07) | 0x08;
292 } else {
293 target_id &= 0x07;
294 }
295 if (dev->dev_id == ATP885_DEVID) {
296 tmport = workport + 0x10;
297 outb(0x45, tmport);
298 }
299 workreq = dev->id[c][target_id].curr_req;
300 #ifdef ED_DBGP
301 scmd_printk(KERN_DEBUG, workreq, "CDB");
302 for (l = 0; l < workreq->cmd_len; l++)
303 printk(KERN_DEBUG " %x",workreq->cmnd[l]);
304 printk("\n");
305 #endif
306
307 tmport = workport + 0x0f;
308 outb(lun, tmport);
309 tmport += 0x02;
310 outb(dev->id[c][target_id].devsp, tmport++);
311 adrcnt = dev->id[c][target_id].tran_len;
312 k = dev->id[c][target_id].last_len;
313
314 outb(((unsigned char *) &k)[2], tmport++);
315 outb(((unsigned char *) &k)[1], tmport++);
316 outb(((unsigned char *) &k)[0], tmport++);
317 #ifdef ED_DBGP
318 printk("k %x, k[0] 0x%x k[1] 0x%x k[2] 0x%x\n", k, inb(tmport-1), inb(tmport-2), inb(tmport-3));
319 #endif
320 /* Remap wide */
321 j = target_id;
322 if (target_id > 7) {
323 j = (j & 0x07) | 0x40;
324 }
325 /* Add direction */
326 j |= dev->id[c][target_id].dirct;
327 outb(j, tmport++);
328 outb(0x80,tmport);
329
330 /* enable 32 bit fifo transfer */
331 if (dev->dev_id == ATP885_DEVID) {
332 tmpcip = dev->pciport[c] + 1;
333 i=inb(tmpcip) & 0xf3;
334 //j=workreq->cmnd[0];
335 if ((workreq->cmnd[0] == 0x08) || (workreq->cmnd[0] == 0x28) || (workreq->cmnd[0] == 0x0a) || (workreq->cmnd[0] == 0x2a)) {
336 i |= 0x0c;
337 }
338 outb(i,tmpcip);
339 } else if ((dev->dev_id == ATP880_DEVID1) ||
340 (dev->dev_id == ATP880_DEVID2) ) {
341 tmport = workport - 0x05;
342 if ((workreq->cmnd[0] == 0x08) || (workreq->cmnd[0] == 0x28) || (workreq->cmnd[0] == 0x0a) || (workreq->cmnd[0] == 0x2a)) {
343 outb((unsigned char) ((inb(tmport) & 0x3f) | 0xc0), tmport);
344 } else {
345 outb((unsigned char) (inb(tmport) & 0x3f), tmport);
346 }
347 } else {
348 tmport = workport + 0x3a;
349 if ((workreq->cmnd[0] == 0x08) || (workreq->cmnd[0] == 0x28) || (workreq->cmnd[0] == 0x0a) || (workreq->cmnd[0] == 0x2a)) {
350 outb((unsigned char) ((inb(tmport) & 0xf3) | 0x08), tmport);
351 } else {
352 outb((unsigned char) (inb(tmport) & 0xf3), tmport);
353 }
354 }
355 tmport = workport + 0x1b;
356 j = 0;
357 id = 1;
358 id = id << target_id;
359 /*
360 * Is this a wide device
361 */
362 if ((id & dev->wide_id[c]) != 0) {
363 j |= 0x01;
364 }
365 outb(j, tmport);
366 while ((inb(tmport) & 0x01) != j) {
367 outb(j,tmport);
368 }
369 if (dev->id[c][target_id].last_len == 0) {
370 tmport = workport + 0x18;
371 outb(0x08, tmport);
372 dev->in_int[c] = 0;
373 #ifdef ED_DBGP
374 printk("dev->id[c][target_id].last_len = 0\n");
375 #endif
376 goto handled;
377 }
378 #ifdef ED_DBGP
379 printk("target_id = %d adrcnt = %d\n",target_id,adrcnt);
380 #endif
381 prd = dev->id[c][target_id].prd_pos;
382 while (adrcnt != 0) {
383 id = ((unsigned short int *)prd)[2];
384 if (id == 0) {
385 k = 0x10000;
386 } else {
387 k = id;
388 }
389 if (k > adrcnt) {
390 ((unsigned short int *)prd)[2] = (unsigned short int)
391 (k - adrcnt);
392 ((unsigned long *)prd)[0] += adrcnt;
393 adrcnt = 0;
394 dev->id[c][target_id].prd_pos = prd;
395 } else {
396 adrcnt -= k;
397 dev->id[c][target_id].prdaddr += 0x08;
398 prd += 0x08;
399 if (adrcnt == 0) {
400 dev->id[c][target_id].prd_pos = prd;
401 }
402 }
403 }
404 tmpcip = dev->pciport[c] + 0x04;
405 outl(dev->id[c][target_id].prdaddr, tmpcip);
406 #ifdef ED_DBGP
407 printk("dev->id[%d][%d].prdaddr 0x%8x\n", c, target_id, dev->id[c][target_id].prdaddr);
408 #endif
409 if (dev->dev_id == ATP885_DEVID) {
410 tmpcip -= 0x04;
411 } else {
412 tmpcip -= 0x02;
413 outb(0x06, tmpcip);
414 outb(0x00, tmpcip);
415 tmpcip -= 0x02;
416 }
417 tmport = workport + 0x18;
418 /*
419 * Check transfer direction
420 */
421 if (dev->id[c][target_id].dirct != 0) {
422 outb(0x08, tmport);
423 outb(0x01, tmpcip);
424 dev->in_int[c] = 0;
425 #ifdef ED_DBGP
426 printk("status 0x80 return dirct != 0\n");
427 #endif
428 goto handled;
429 }
430 outb(0x08, tmport);
431 outb(0x09, tmpcip);
432 dev->in_int[c] = 0;
433 #ifdef ED_DBGP
434 printk("status 0x80 return dirct = 0\n");
435 #endif
436 goto handled;
437 }
438
439 /*
440 * Current scsi request on this target
441 */
442
443 workreq = dev->id[c][target_id].curr_req;
444
445 if (i == 0x42) {
446 if ((dev->last_cmd[c] & 0xf0) != 0x40)
447 {
448 dev->last_cmd[c] = 0xff;
449 }
450 errstus = 0x02;
451 workreq->result = errstus;
452 goto go_42;
453 }
454 if (i == 0x16) {
455 if ((dev->last_cmd[c] & 0xf0) != 0x40) {
456 dev->last_cmd[c] = 0xff;
457 }
458 errstus = 0;
459 tmport -= 0x08;
460 errstus = inb(tmport);
461 if (((dev->r1f[c][target_id] & 0x10) != 0)&&(dev->dev_id==ATP885_DEVID)) {
462 printk(KERN_WARNING "AEC67162 CRC ERROR !\n");
463 errstus = 0x02;
464 }
465 workreq->result = errstus;
466 go_42:
467 if (dev->dev_id == ATP885_DEVID) {
468 j = inb(dev->baseport + 0x29) | 0x01;
469 outb(j, dev->baseport + 0x29);
470 }
471 /*
472 * Complete the command
473 */
474 scsi_dma_unmap(workreq);
475
476 spin_lock_irqsave(dev->host->host_lock, flags);
477 (*workreq->scsi_done) (workreq);
478 #ifdef ED_DBGP
479 printk("workreq->scsi_done\n");
480 #endif
481 /*
482 * Clear it off the queue
483 */
484 dev->id[c][target_id].curr_req = NULL;
485 dev->working[c]--;
486 spin_unlock_irqrestore(dev->host->host_lock, flags);
487 /*
488 * Take it back wide
489 */
490 if (dev->wide_id[c] != 0) {
491 tmport = workport + 0x1b;
492 outb(0x01, tmport);
493 while ((inb(tmport) & 0x01) != 0x01) {
494 outb(0x01, tmport);
495 }
496 }
497 /*
498 * If there is stuff to send and nothing going then send it
499 */
500 spin_lock_irqsave(dev->host->host_lock, flags);
501 if (((dev->last_cmd[c] != 0xff) || (dev->quhd[c] != dev->quend[c])) &&
502 (dev->in_snd[c] == 0)) {
503 #ifdef ED_DBGP
504 printk("Call sent_s870(scsi_done)\n");
505 #endif
506 send_s870(dev,c);
507 }
508 spin_unlock_irqrestore(dev->host->host_lock, flags);
509 dev->in_int[c] = 0;
510 goto handled;
511 }
512 if ((dev->last_cmd[c] & 0xf0) != 0x40) {
513 dev->last_cmd[c] = 0xff;
514 }
515 if (i == 0x4f) {
516 i = 0x89;
517 }
518 i &= 0x0f;
519 if (i == 0x09) {
520 tmpcip += 4;
521 outl(dev->id[c][target_id].prdaddr, tmpcip);
522 tmpcip = tmpcip - 2;
523 outb(0x06, tmpcip);
524 outb(0x00, tmpcip);
525 tmpcip = tmpcip - 2;
526 tmport = workport + 0x10;
527 outb(0x41, tmport);
528 if (dev->dev_id == ATP885_DEVID) {
529 tmport += 2;
530 k = dev->id[c][target_id].last_len;
531 outb((unsigned char) (((unsigned char *) (&k))[2]), tmport++);
532 outb((unsigned char) (((unsigned char *) (&k))[1]), tmport++);
533 outb((unsigned char) (((unsigned char *) (&k))[0]), tmport);
534 dev->id[c][target_id].dirct = 0x00;
535 tmport += 0x04;
536 } else {
537 dev->id[c][target_id].dirct = 0x00;
538 tmport += 0x08;
539 }
540 outb(0x08, tmport);
541 outb(0x09, tmpcip);
542 dev->in_int[c] = 0;
543 goto handled;
544 }
545 if (i == 0x08) {
546 tmpcip += 4;
547 outl(dev->id[c][target_id].prdaddr, tmpcip);
548 tmpcip = tmpcip - 2;
549 outb(0x06, tmpcip);
550 outb(0x00, tmpcip);
551 tmpcip = tmpcip - 2;
552 tmport = workport + 0x10;
553 outb(0x41, tmport);
554 if (dev->dev_id == ATP885_DEVID) {
555 tmport += 2;
556 k = dev->id[c][target_id].last_len;
557 outb((unsigned char) (((unsigned char *) (&k))[2]), tmport++);
558 outb((unsigned char) (((unsigned char *) (&k))[1]), tmport++);
559 outb((unsigned char) (((unsigned char *) (&k))[0]), tmport++);
560 } else {
561 tmport += 5;
562 }
563 outb((unsigned char) (inb(tmport) | 0x20), tmport);
564 dev->id[c][target_id].dirct = 0x20;
565 tmport += 0x03;
566 outb(0x08, tmport);
567 outb(0x01, tmpcip);
568 dev->in_int[c] = 0;
569 goto handled;
570 }
571 tmport -= 0x07;
572 if (i == 0x0a) {
573 outb(0x30, tmport);
574 } else {
575 outb(0x46, tmport);
576 }
577 dev->id[c][target_id].dirct = 0x00;
578 tmport += 0x02;
579 outb(0x00, tmport++);
580 outb(0x00, tmport++);
581 outb(0x00, tmport++);
582 tmport += 0x03;
583 outb(0x08, tmport);
584 dev->in_int[c] = 0;
585 goto handled;
586 } else {
587 // tmport = workport + 0x17;
588 // inb(tmport);
589 // dev->working[c] = 0;
590 dev->in_int[c] = 0;
591 goto handled;
592 }
593
594 handled:
595 #ifdef ED_DBGP
596 printk("atp870u_intr_handle exit\n");
597 #endif
598 return IRQ_HANDLED;
599 }
600 /**
601 * atp870u_queuecommand - Queue SCSI command
602 * @req_p: request block
603 * @done: completion function
604 *
605 * Queue a command to the ATP queue. Called with the host lock held.
606 */
607 static int atp870u_queuecommand(struct scsi_cmnd * req_p,
608 void (*done) (struct scsi_cmnd *))
609 {
610 unsigned char c;
611 unsigned int tmport,m;
612 struct atp_unit *dev;
613 struct Scsi_Host *host;
614
615 c = scmd_channel(req_p);
616 req_p->sense_buffer[0]=0;
617 scsi_set_resid(req_p, 0);
618 if (scmd_channel(req_p) > 1) {
619 req_p->result = 0x00040000;
620 done(req_p);
621 #ifdef ED_DBGP
622 printk("atp870u_queuecommand : req_p->device->channel > 1\n");
623 #endif
624 return 0;
625 }
626
627 host = req_p->device->host;
628 dev = (struct atp_unit *)&host->hostdata;
629
630
631
632 m = 1;
633 m = m << scmd_id(req_p);
634
635 /*
636 * Fake a timeout for missing targets
637 */
638
639 if ((m & dev->active_id[c]) == 0) {
640 req_p->result = 0x00040000;
641 done(req_p);
642 return 0;
643 }
644
645 if (done) {
646 req_p->scsi_done = done;
647 } else {
648 #ifdef ED_DBGP
649 printk( "atp870u_queuecommand: done can't be NULL\n");
650 #endif
651 req_p->result = 0;
652 done(req_p);
653 return 0;
654 }
655
656 /*
657 * Count new command
658 */
659 dev->quend[c]++;
660 if (dev->quend[c] >= qcnt) {
661 dev->quend[c] = 0;
662 }
663
664 /*
665 * Check queue state
666 */
667 if (dev->quhd[c] == dev->quend[c]) {
668 if (dev->quend[c] == 0) {
669 dev->quend[c] = qcnt;
670 }
671 #ifdef ED_DBGP
672 printk("atp870u_queuecommand : dev->quhd[c] == dev->quend[c]\n");
673 #endif
674 dev->quend[c]--;
675 req_p->result = 0x00020000;
676 done(req_p);
677 return 0;
678 }
679 dev->quereq[c][dev->quend[c]] = req_p;
680 tmport = dev->ioport[c] + 0x1c;
681 #ifdef ED_DBGP
682 printk("dev->ioport[c] = %x inb(tmport) = %x dev->in_int[%d] = %d dev->in_snd[%d] = %d\n",dev->ioport[c],inb(tmport),c,dev->in_int[c],c,dev->in_snd[c]);
683 #endif
684 if ((inb(tmport) == 0) && (dev->in_int[c] == 0) && (dev->in_snd[c] == 0)) {
685 #ifdef ED_DBGP
686 printk("Call sent_s870(atp870u_queuecommand)\n");
687 #endif
688 send_s870(dev,c);
689 }
690 #ifdef ED_DBGP
691 printk("atp870u_queuecommand : exit\n");
692 #endif
693 return 0;
694 }
695
696 /**
697 * send_s870 - send a command to the controller
698 * @host: host
699 *
700 * On entry there is work queued to be done. We move some of that work to the
701 * controller itself.
702 *
703 * Caller holds the host lock.
704 */
705 static void send_s870(struct atp_unit *dev,unsigned char c)
706 {
707 unsigned int tmport;
708 struct scsi_cmnd *workreq;
709 unsigned int i;//,k;
710 unsigned char j, target_id;
711 unsigned char *prd;
712 unsigned short int tmpcip, w;
713 unsigned long l, bttl = 0;
714 unsigned int workport;
715 unsigned long sg_count;
716
717 if (dev->in_snd[c] != 0) {
718 #ifdef ED_DBGP
719 printk("cmnd in_snd\n");
720 #endif
721 return;
722 }
723 #ifdef ED_DBGP
724 printk("Sent_s870 enter\n");
725 #endif
726 dev->in_snd[c] = 1;
727 if ((dev->last_cmd[c] != 0xff) && ((dev->last_cmd[c] & 0x40) != 0)) {
728 dev->last_cmd[c] &= 0x0f;
729 workreq = dev->id[c][dev->last_cmd[c]].curr_req;
730 if (workreq != NULL) { /* check NULL pointer */
731 goto cmd_subp;
732 }
733 dev->last_cmd[c] = 0xff;
734 if (dev->quhd[c] == dev->quend[c]) {
735 dev->in_snd[c] = 0;
736 return ;
737 }
738 }
739 if ((dev->last_cmd[c] != 0xff) && (dev->working[c] != 0)) {
740 dev->in_snd[c] = 0;
741 return ;
742 }
743 dev->working[c]++;
744 j = dev->quhd[c];
745 dev->quhd[c]++;
746 if (dev->quhd[c] >= qcnt) {
747 dev->quhd[c] = 0;
748 }
749 workreq = dev->quereq[c][dev->quhd[c]];
750 if (dev->id[c][scmd_id(workreq)].curr_req == NULL) {
751 dev->id[c][scmd_id(workreq)].curr_req = workreq;
752 dev->last_cmd[c] = scmd_id(workreq);
753 goto cmd_subp;
754 }
755 dev->quhd[c] = j;
756 dev->working[c]--;
757 dev->in_snd[c] = 0;
758 return;
759 cmd_subp:
760 workport = dev->ioport[c];
761 tmport = workport + 0x1f;
762 if ((inb(tmport) & 0xb0) != 0) {
763 goto abortsnd;
764 }
765 tmport = workport + 0x1c;
766 if (inb(tmport) == 0) {
767 goto oktosend;
768 }
769 abortsnd:
770 #ifdef ED_DBGP
771 printk("Abort to Send\n");
772 #endif
773 dev->last_cmd[c] |= 0x40;
774 dev->in_snd[c] = 0;
775 return;
776 oktosend:
777 #ifdef ED_DBGP
778 printk("OK to Send\n");
779 scmd_printk(KERN_DEBUG, workreq, "CDB");
780 for(i=0;i<workreq->cmd_len;i++) {
781 printk(" %x",workreq->cmnd[i]);
782 }
783 printk("\n");
784 #endif
785 l = scsi_bufflen(workreq);
786
787 if (dev->dev_id == ATP885_DEVID) {
788 j = inb(dev->baseport + 0x29) & 0xfe;
789 outb(j, dev->baseport + 0x29);
790 dev->r1f[c][scmd_id(workreq)] = 0;
791 }
792
793 if (workreq->cmnd[0] == READ_CAPACITY) {
794 if (l > 8)
795 l = 8;
796 }
797 if (workreq->cmnd[0] == 0x00) {
798 l = 0;
799 }
800
801 tmport = workport + 0x1b;
802 j = 0;
803 target_id = scmd_id(workreq);
804
805 /*
806 * Wide ?
807 */
808 w = 1;
809 w = w << target_id;
810 if ((w & dev->wide_id[c]) != 0) {
811 j |= 0x01;
812 }
813 outb(j, tmport);
814 while ((inb(tmport) & 0x01) != j) {
815 outb(j,tmport);
816 #ifdef ED_DBGP
817 printk("send_s870 while loop 1\n");
818 #endif
819 }
820 /*
821 * Write the command
822 */
823
824 tmport = workport;
825 outb(workreq->cmd_len, tmport++);
826 outb(0x2c, tmport++);
827 if (dev->dev_id == ATP885_DEVID) {
828 outb(0x7f, tmport++);
829 } else {
830 outb(0xcf, tmport++);
831 }
832 for (i = 0; i < workreq->cmd_len; i++) {
833 outb(workreq->cmnd[i], tmport++);
834 }
835 tmport = workport + 0x0f;
836 outb(workreq->device->lun, tmport);
837 tmport += 0x02;
838 /*
839 * Write the target
840 */
841 outb(dev->id[c][target_id].devsp, tmport++);
842 #ifdef ED_DBGP
843 printk("dev->id[%d][%d].devsp = %2x\n",c,target_id,dev->id[c][target_id].devsp);
844 #endif
845
846 sg_count = scsi_dma_map(workreq);
847 /*
848 * Write transfer size
849 */
850 outb((unsigned char) (((unsigned char *) (&l))[2]), tmport++);
851 outb((unsigned char) (((unsigned char *) (&l))[1]), tmport++);
852 outb((unsigned char) (((unsigned char *) (&l))[0]), tmport++);
853 j = target_id;
854 dev->id[c][j].last_len = l;
855 dev->id[c][j].tran_len = 0;
856 #ifdef ED_DBGP
857 printk("dev->id[%2d][%2d].last_len = %d\n",c,j,dev->id[c][j].last_len);
858 #endif
859 /*
860 * Flip the wide bits
861 */
862 if ((j & 0x08) != 0) {
863 j = (j & 0x07) | 0x40;
864 }
865 /*
866 * Check transfer direction
867 */
868 if (workreq->sc_data_direction == DMA_TO_DEVICE) {
869 outb((unsigned char) (j | 0x20), tmport++);
870 } else {
871 outb(j, tmport++);
872 }
873 outb((unsigned char) (inb(tmport) | 0x80), tmport);
874 outb(0x80, tmport);
875 tmport = workport + 0x1c;
876 dev->id[c][target_id].dirct = 0;
877 if (l == 0) {
878 if (inb(tmport) == 0) {
879 tmport = workport + 0x18;
880 #ifdef ED_DBGP
881 printk("change SCSI_CMD_REG 0x08\n");
882 #endif
883 outb(0x08, tmport);
884 } else {
885 dev->last_cmd[c] |= 0x40;
886 }
887 dev->in_snd[c] = 0;
888 return;
889 }
890 tmpcip = dev->pciport[c];
891 prd = dev->id[c][target_id].prd_table;
892 dev->id[c][target_id].prd_pos = prd;
893
894 /*
895 * Now write the request list. Either as scatter/gather or as
896 * a linear chain.
897 */
898
899 if (l) {
900 struct scatterlist *sgpnt;
901 i = 0;
902 scsi_for_each_sg(workreq, sgpnt, sg_count, j) {
903 bttl = sg_dma_address(sgpnt);
904 l=sg_dma_len(sgpnt);
905 #ifdef ED_DBGP
906 printk("1. bttl %x, l %x\n",bttl, l);
907 #endif
908 while (l > 0x10000) {
909 (((u16 *) (prd))[i + 3]) = 0x0000;
910 (((u16 *) (prd))[i + 2]) = 0x0000;
911 (((u32 *) (prd))[i >> 1]) = cpu_to_le32(bttl);
912 l -= 0x10000;
913 bttl += 0x10000;
914 i += 0x04;
915 }
916 (((u32 *) (prd))[i >> 1]) = cpu_to_le32(bttl);
917 (((u16 *) (prd))[i + 2]) = cpu_to_le16(l);
918 (((u16 *) (prd))[i + 3]) = 0;
919 i += 0x04;
920 }
921 (((u16 *) (prd))[i - 1]) = cpu_to_le16(0x8000);
922 #ifdef ED_DBGP
923 printk("prd %4x %4x %4x %4x\n",(((unsigned short int *)prd)[0]),(((unsigned short int *)prd)[1]),(((unsigned short int *)prd)[2]),(((unsigned short int *)prd)[3]));
924 printk("2. bttl %x, l %x\n",bttl, l);
925 #endif
926 }
927 tmpcip += 4;
928 #ifdef ED_DBGP
929 printk("send_s870: prdaddr_2 0x%8x tmpcip %x target_id %d\n", dev->id[c][target_id].prdaddr,tmpcip,target_id);
930 #endif
931 dev->id[c][target_id].prdaddr = dev->id[c][target_id].prd_bus;
932 outl(dev->id[c][target_id].prdaddr, tmpcip);
933 tmpcip = tmpcip - 2;
934 outb(0x06, tmpcip);
935 outb(0x00, tmpcip);
936 if (dev->dev_id == ATP885_DEVID) {
937 tmpcip--;
938 j=inb(tmpcip) & 0xf3;
939 if ((workreq->cmnd[0] == 0x08) || (workreq->cmnd[0] == 0x28) ||
940 (workreq->cmnd[0] == 0x0a) || (workreq->cmnd[0] == 0x2a)) {
941 j |= 0x0c;
942 }
943 outb(j,tmpcip);
944 tmpcip--;
945 } else if ((dev->dev_id == ATP880_DEVID1) ||
946 (dev->dev_id == ATP880_DEVID2)) {
947 tmpcip =tmpcip -2;
948 tmport = workport - 0x05;
949 if ((workreq->cmnd[0] == 0x08) || (workreq->cmnd[0] == 0x28) || (workreq->cmnd[0] == 0x0a) || (workreq->cmnd[0] == 0x2a)) {
950 outb((unsigned char) ((inb(tmport) & 0x3f) | 0xc0), tmport);
951 } else {
952 outb((unsigned char) (inb(tmport) & 0x3f), tmport);
953 }
954 } else {
955 tmpcip =tmpcip -2;
956 tmport = workport + 0x3a;
957 if ((workreq->cmnd[0] == 0x08) || (workreq->cmnd[0] == 0x28) || (workreq->cmnd[0] == 0x0a) || (workreq->cmnd[0] == 0x2a)) {
958 outb((inb(tmport) & 0xf3) | 0x08, tmport);
959 } else {
960 outb(inb(tmport) & 0xf3, tmport);
961 }
962 }
963 tmport = workport + 0x1c;
964
965 if(workreq->sc_data_direction == DMA_TO_DEVICE) {
966 dev->id[c][target_id].dirct = 0x20;
967 if (inb(tmport) == 0) {
968 tmport = workport + 0x18;
969 outb(0x08, tmport);
970 outb(0x01, tmpcip);
971 #ifdef ED_DBGP
972 printk( "start DMA(to target)\n");
973 #endif
974 } else {
975 dev->last_cmd[c] |= 0x40;
976 }
977 dev->in_snd[c] = 0;
978 return;
979 }
980 if (inb(tmport) == 0) {
981 tmport = workport + 0x18;
982 outb(0x08, tmport);
983 outb(0x09, tmpcip);
984 #ifdef ED_DBGP
985 printk( "start DMA(to host)\n");
986 #endif
987 } else {
988 dev->last_cmd[c] |= 0x40;
989 }
990 dev->in_snd[c] = 0;
991 return;
992
993 }
994
995 static unsigned char fun_scam(struct atp_unit *dev, unsigned short int *val)
996 {
997 unsigned int tmport;
998 unsigned short int i, k;
999 unsigned char j;
1000
1001 tmport = dev->ioport[0] + 0x1c;
1002 outw(*val, tmport);
1003 FUN_D7:
1004 for (i = 0; i < 10; i++) { /* stable >= bus settle delay(400 ns) */
1005 k = inw(tmport);
1006 j = (unsigned char) (k >> 8);
1007 if ((k & 0x8000) != 0) { /* DB7 all release? */
1008 goto FUN_D7;
1009 }
1010 }
1011 *val |= 0x4000; /* assert DB6 */
1012 outw(*val, tmport);
1013 *val &= 0xdfff; /* assert DB5 */
1014 outw(*val, tmport);
1015 FUN_D5:
1016 for (i = 0; i < 10; i++) { /* stable >= bus settle delay(400 ns) */
1017 if ((inw(tmport) & 0x2000) != 0) { /* DB5 all release? */
1018 goto FUN_D5;
1019 }
1020 }
1021 *val |= 0x8000; /* no DB4-0, assert DB7 */
1022 *val &= 0xe0ff;
1023 outw(*val, tmport);
1024 *val &= 0xbfff; /* release DB6 */
1025 outw(*val, tmport);
1026 FUN_D6:
1027 for (i = 0; i < 10; i++) { /* stable >= bus settle delay(400 ns) */
1028 if ((inw(tmport) & 0x4000) != 0) { /* DB6 all release? */
1029 goto FUN_D6;
1030 }
1031 }
1032
1033 return j;
1034 }
1035
1036 static void tscam(struct Scsi_Host *host)
1037 {
1038
1039 unsigned int tmport;
1040 unsigned char i, j, k;
1041 unsigned long n;
1042 unsigned short int m, assignid_map, val;
1043 unsigned char mbuf[33], quintet[2];
1044 struct atp_unit *dev = (struct atp_unit *)&host->hostdata;
1045 static unsigned char g2q_tab[8] = {
1046 0x38, 0x31, 0x32, 0x2b, 0x34, 0x2d, 0x2e, 0x27
1047 };
1048
1049 /* I can't believe we need this before we've even done anything. Remove it
1050 * and see if anyone bitches.
1051 for (i = 0; i < 0x10; i++) {
1052 udelay(0xffff);
1053 }
1054 */
1055
1056 tmport = dev->ioport[0] + 1;
1057 outb(0x08, tmport++);
1058 outb(0x7f, tmport);
1059 tmport = dev->ioport[0] + 0x11;
1060 outb(0x20, tmport);
1061
1062 if ((dev->scam_on & 0x40) == 0) {
1063 return;
1064 }
1065 m = 1;
1066 m <<= dev->host_id[0];
1067 j = 16;
1068 if (dev->chip_ver < 4) {
1069 m |= 0xff00;
1070 j = 8;
1071 }
1072 assignid_map = m;
1073 tmport = dev->ioport[0] + 0x02;
1074 outb(0x02, tmport++); /* 2*2=4ms,3EH 2/32*3E=3.9ms */
1075 outb(0, tmport++);
1076 outb(0, tmport++);
1077 outb(0, tmport++);
1078 outb(0, tmport++);
1079 outb(0, tmport++);
1080 outb(0, tmport++);
1081
1082 for (i = 0; i < j; i++) {
1083 m = 1;
1084 m = m << i;
1085 if ((m & assignid_map) != 0) {
1086 continue;
1087 }
1088 tmport = dev->ioport[0] + 0x0f;
1089 outb(0, tmport++);
1090 tmport += 0x02;
1091 outb(0, tmport++);
1092 outb(0, tmport++);
1093 outb(0, tmport++);
1094 if (i > 7) {
1095 k = (i & 0x07) | 0x40;
1096 } else {
1097 k = i;
1098 }
1099 outb(k, tmport++);
1100 tmport = dev->ioport[0] + 0x1b;
1101 if (dev->chip_ver == 4) {
1102 outb(0x01, tmport);
1103 } else {
1104 outb(0x00, tmport);
1105 }
1106 wait_rdyok:
1107 tmport = dev->ioport[0] + 0x18;
1108 outb(0x09, tmport);
1109 tmport += 0x07;
1110
1111 while ((inb(tmport) & 0x80) == 0x00)
1112 cpu_relax();
1113 tmport -= 0x08;
1114 k = inb(tmport);
1115 if (k != 0x16) {
1116 if ((k == 0x85) || (k == 0x42)) {
1117 continue;
1118 }
1119 tmport = dev->ioport[0] + 0x10;
1120 outb(0x41, tmport);
1121 goto wait_rdyok;
1122 }
1123 assignid_map |= m;
1124
1125 }
1126 tmport = dev->ioport[0] + 0x02;
1127 outb(0x7f, tmport);
1128 tmport = dev->ioport[0] + 0x1b;
1129 outb(0x02, tmport);
1130
1131 outb(0, 0x80);
1132
1133 val = 0x0080; /* bsy */
1134 tmport = dev->ioport[0] + 0x1c;
1135 outw(val, tmport);
1136 val |= 0x0040; /* sel */
1137 outw(val, tmport);
1138 val |= 0x0004; /* msg */
1139 outw(val, tmport);
1140 inb(0x80); /* 2 deskew delay(45ns*2=90ns) */
1141 val &= 0x007f; /* no bsy */
1142 outw(val, tmport);
1143 mdelay(128);
1144 val &= 0x00fb; /* after 1ms no msg */
1145 outw(val, tmport);
1146 wait_nomsg:
1147 if ((inb(tmport) & 0x04) != 0) {
1148 goto wait_nomsg;
1149 }
1150 outb(1, 0x80);
1151 udelay(100);
1152 for (n = 0; n < 0x30000; n++) {
1153 if ((inb(tmport) & 0x80) != 0) { /* bsy ? */
1154 goto wait_io;
1155 }
1156 }
1157 goto TCM_SYNC;
1158 wait_io:
1159 for (n = 0; n < 0x30000; n++) {
1160 if ((inb(tmport) & 0x81) == 0x0081) {
1161 goto wait_io1;
1162 }
1163 }
1164 goto TCM_SYNC;
1165 wait_io1:
1166 inb(0x80);
1167 val |= 0x8003; /* io,cd,db7 */
1168 outw(val, tmport);
1169 inb(0x80);
1170 val &= 0x00bf; /* no sel */
1171 outw(val, tmport);
1172 outb(2, 0x80);
1173 TCM_SYNC:
1174 udelay(0x800);
1175 if ((inb(tmport) & 0x80) == 0x00) { /* bsy ? */
1176 outw(0, tmport--);
1177 outb(0, tmport);
1178 tmport = dev->ioport[0] + 0x15;
1179 outb(0, tmport);
1180 tmport += 0x03;
1181 outb(0x09, tmport);
1182 tmport += 0x07;
1183 while ((inb(tmport) & 0x80) == 0)
1184 cpu_relax();
1185 tmport -= 0x08;
1186 inb(tmport);
1187 return;
1188 }
1189 val &= 0x00ff; /* synchronization */
1190 val |= 0x3f00;
1191 fun_scam(dev, &val);
1192 outb(3, 0x80);
1193 val &= 0x00ff; /* isolation */
1194 val |= 0x2000;
1195 fun_scam(dev, &val);
1196 outb(4, 0x80);
1197 i = 8;
1198 j = 0;
1199 TCM_ID:
1200 if ((inw(tmport) & 0x2000) == 0) {
1201 goto TCM_ID;
1202 }
1203 outb(5, 0x80);
1204 val &= 0x00ff; /* get ID_STRING */
1205 val |= 0x2000;
1206 k = fun_scam(dev, &val);
1207 if ((k & 0x03) == 0) {
1208 goto TCM_5;
1209 }
1210 mbuf[j] <<= 0x01;
1211 mbuf[j] &= 0xfe;
1212 if ((k & 0x02) != 0) {
1213 mbuf[j] |= 0x01;
1214 }
1215 i--;
1216 if (i > 0) {
1217 goto TCM_ID;
1218 }
1219 j++;
1220 i = 8;
1221 goto TCM_ID;
1222
1223 TCM_5: /* isolation complete.. */
1224 /* mbuf[32]=0;
1225 printk(" \n%x %x %x %s\n ",assignid_map,mbuf[0],mbuf[1],&mbuf[2]); */
1226 i = 15;
1227 j = mbuf[0];
1228 if ((j & 0x20) != 0) { /* bit5=1:ID upto 7 */
1229 i = 7;
1230 }
1231 if ((j & 0x06) == 0) { /* IDvalid? */
1232 goto G2Q5;
1233 }
1234 k = mbuf[1];
1235 small_id:
1236 m = 1;
1237 m <<= k;
1238 if ((m & assignid_map) == 0) {
1239 goto G2Q_QUIN;
1240 }
1241 if (k > 0) {
1242 k--;
1243 goto small_id;
1244 }
1245 G2Q5: /* srch from max acceptable ID# */
1246 k = i; /* max acceptable ID# */
1247 G2Q_LP:
1248 m = 1;
1249 m <<= k;
1250 if ((m & assignid_map) == 0) {
1251 goto G2Q_QUIN;
1252 }
1253 if (k > 0) {
1254 k--;
1255 goto G2Q_LP;
1256 }
1257 G2Q_QUIN: /* k=binID#, */
1258 assignid_map |= m;
1259 if (k < 8) {
1260 quintet[0] = 0x38; /* 1st dft ID<8 */
1261 } else {
1262 quintet[0] = 0x31; /* 1st ID>=8 */
1263 }
1264 k &= 0x07;
1265 quintet[1] = g2q_tab[k];
1266
1267 val &= 0x00ff; /* AssignID 1stQuintet,AH=001xxxxx */
1268 m = quintet[0] << 8;
1269 val |= m;
1270 fun_scam(dev, &val);
1271 val &= 0x00ff; /* AssignID 2ndQuintet,AH=001xxxxx */
1272 m = quintet[1] << 8;
1273 val |= m;
1274 fun_scam(dev, &val);
1275
1276 goto TCM_SYNC;
1277
1278 }
1279
1280 static void is870(struct atp_unit *dev, unsigned int wkport)
1281 {
1282 unsigned int tmport;
1283 unsigned char i, j, k, rmb, n;
1284 unsigned short int m;
1285 static unsigned char mbuf[512];
1286 static unsigned char satn[9] = { 0, 0, 0, 0, 0, 0, 0, 6, 6 };
1287 static unsigned char inqd[9] = { 0x12, 0, 0, 0, 0x24, 0, 0, 0x24, 6 };
1288 static unsigned char synn[6] = { 0x80, 1, 3, 1, 0x19, 0x0e };
1289 static unsigned char synu[6] = { 0x80, 1, 3, 1, 0x0c, 0x0e };
1290 static unsigned char synw[6] = { 0x80, 1, 3, 1, 0x0c, 0x07 };
1291 static unsigned char wide[6] = { 0x80, 1, 2, 3, 1, 0 };
1292
1293 tmport = wkport + 0x3a;
1294 outb((unsigned char) (inb(tmport) | 0x10), tmport);
1295
1296 for (i = 0; i < 16; i++) {
1297 if ((dev->chip_ver != 4) && (i > 7)) {
1298 break;
1299 }
1300 m = 1;
1301 m = m << i;
1302 if ((m & dev->active_id[0]) != 0) {
1303 continue;
1304 }
1305 if (i == dev->host_id[0]) {
1306 printk(KERN_INFO " ID: %2d Host Adapter\n", dev->host_id[0]);
1307 continue;
1308 }
1309 tmport = wkport + 0x1b;
1310 if (dev->chip_ver == 4) {
1311 outb(0x01, tmport);
1312 } else {
1313 outb(0x00, tmport);
1314 }
1315 tmport = wkport + 1;
1316 outb(0x08, tmport++);
1317 outb(0x7f, tmport++);
1318 outb(satn[0], tmport++);
1319 outb(satn[1], tmport++);
1320 outb(satn[2], tmport++);
1321 outb(satn[3], tmport++);
1322 outb(satn[4], tmport++);
1323 outb(satn[5], tmport++);
1324 tmport += 0x06;
1325 outb(0, tmport);
1326 tmport += 0x02;
1327 outb(dev->id[0][i].devsp, tmport++);
1328 outb(0, tmport++);
1329 outb(satn[6], tmport++);
1330 outb(satn[7], tmport++);
1331 j = i;
1332 if ((j & 0x08) != 0) {
1333 j = (j & 0x07) | 0x40;
1334 }
1335 outb(j, tmport);
1336 tmport += 0x03;
1337 outb(satn[8], tmport);
1338 tmport += 0x07;
1339
1340 while ((inb(tmport) & 0x80) == 0x00)
1341 cpu_relax();
1342
1343 tmport -= 0x08;
1344 if (inb(tmport) != 0x11 && inb(tmport) != 0x8e)
1345 continue;
1346
1347 while (inb(tmport) != 0x8e)
1348 cpu_relax();
1349
1350 dev->active_id[0] |= m;
1351
1352 tmport = wkport + 0x10;
1353 outb(0x30, tmport);
1354 tmport = wkport + 0x04;
1355 outb(0x00, tmport);
1356
1357 phase_cmd:
1358 tmport = wkport + 0x18;
1359 outb(0x08, tmport);
1360 tmport += 0x07;
1361 while ((inb(tmport) & 0x80) == 0x00)
1362 cpu_relax();
1363 tmport -= 0x08;
1364 j = inb(tmport);
1365 if (j != 0x16) {
1366 tmport = wkport + 0x10;
1367 outb(0x41, tmport);
1368 goto phase_cmd;
1369 }
1370 sel_ok:
1371 tmport = wkport + 3;
1372 outb(inqd[0], tmport++);
1373 outb(inqd[1], tmport++);
1374 outb(inqd[2], tmport++);
1375 outb(inqd[3], tmport++);
1376 outb(inqd[4], tmport++);
1377 outb(inqd[5], tmport);
1378 tmport += 0x07;
1379 outb(0, tmport);
1380 tmport += 0x02;
1381 outb(dev->id[0][i].devsp, tmport++);
1382 outb(0, tmport++);
1383 outb(inqd[6], tmport++);
1384 outb(inqd[7], tmport++);
1385 tmport += 0x03;
1386 outb(inqd[8], tmport);
1387 tmport += 0x07;
1388
1389 while ((inb(tmport) & 0x80) == 0x00)
1390 cpu_relax();
1391
1392 tmport -= 0x08;
1393 if (inb(tmport) != 0x11 && inb(tmport) != 0x8e)
1394 continue;
1395
1396 while (inb(tmport) != 0x8e)
1397 cpu_relax();
1398
1399 tmport = wkport + 0x1b;
1400 if (dev->chip_ver == 4)
1401 outb(0x00, tmport);
1402
1403 tmport = wkport + 0x18;
1404 outb(0x08, tmport);
1405 tmport += 0x07;
1406 j = 0;
1407 rd_inq_data:
1408 k = inb(tmport);
1409 if ((k & 0x01) != 0) {
1410 tmport -= 0x06;
1411 mbuf[j++] = inb(tmport);
1412 tmport += 0x06;
1413 goto rd_inq_data;
1414 }
1415 if ((k & 0x80) == 0) {
1416 goto rd_inq_data;
1417 }
1418 tmport -= 0x08;
1419 j = inb(tmport);
1420 if (j == 0x16) {
1421 goto inq_ok;
1422 }
1423 tmport = wkport + 0x10;
1424 outb(0x46, tmport);
1425 tmport += 0x02;
1426 outb(0, tmport++);
1427 outb(0, tmport++);
1428 outb(0, tmport++);
1429 tmport += 0x03;
1430 outb(0x08, tmport);
1431 tmport += 0x07;
1432
1433 while ((inb(tmport) & 0x80) == 0x00)
1434 cpu_relax();
1435
1436 tmport -= 0x08;
1437 if (inb(tmport) != 0x16) {
1438 goto sel_ok;
1439 }
1440 inq_ok:
1441 mbuf[36] = 0;
1442 printk(KERN_INFO " ID: %2d %s\n", i, &mbuf[8]);
1443 dev->id[0][i].devtype = mbuf[0];
1444 rmb = mbuf[1];
1445 n = mbuf[7];
1446 if (dev->chip_ver != 4) {
1447 goto not_wide;
1448 }
1449 if ((mbuf[7] & 0x60) == 0) {
1450 goto not_wide;
1451 }
1452 if ((dev->global_map[0] & 0x20) == 0) {
1453 goto not_wide;
1454 }
1455 tmport = wkport + 0x1b;
1456 outb(0x01, tmport);
1457 tmport = wkport + 3;
1458 outb(satn[0], tmport++);
1459 outb(satn[1], tmport++);
1460 outb(satn[2], tmport++);
1461 outb(satn[3], tmport++);
1462 outb(satn[4], tmport++);
1463 outb(satn[5], tmport++);
1464 tmport += 0x06;
1465 outb(0, tmport);
1466 tmport += 0x02;
1467 outb(dev->id[0][i].devsp, tmport++);
1468 outb(0, tmport++);
1469 outb(satn[6], tmport++);
1470 outb(satn[7], tmport++);
1471 tmport += 0x03;
1472 outb(satn[8], tmport);
1473 tmport += 0x07;
1474
1475 while ((inb(tmport) & 0x80) == 0x00)
1476 cpu_relax();
1477
1478 tmport -= 0x08;
1479 if (inb(tmport) != 0x11 && inb(tmport) != 0x8e)
1480 continue;
1481
1482 while (inb(tmport) != 0x8e)
1483 cpu_relax();
1484
1485 try_wide:
1486 j = 0;
1487 tmport = wkport + 0x14;
1488 outb(0x05, tmport);
1489 tmport += 0x04;
1490 outb(0x20, tmport);
1491 tmport += 0x07;
1492
1493 while ((inb(tmport) & 0x80) == 0) {
1494 if ((inb(tmport) & 0x01) != 0) {
1495 tmport -= 0x06;
1496 outb(wide[j++], tmport);
1497 tmport += 0x06;
1498 }
1499 }
1500 tmport -= 0x08;
1501
1502 while ((inb(tmport) & 0x80) == 0x00)
1503 cpu_relax();
1504
1505 j = inb(tmport) & 0x0f;
1506 if (j == 0x0f) {
1507 goto widep_in;
1508 }
1509 if (j == 0x0a) {
1510 goto widep_cmd;
1511 }
1512 if (j == 0x0e) {
1513 goto try_wide;
1514 }
1515 continue;
1516 widep_out:
1517 tmport = wkport + 0x18;
1518 outb(0x20, tmport);
1519 tmport += 0x07;
1520 while ((inb(tmport) & 0x80) == 0) {
1521 if ((inb(tmport) & 0x01) != 0) {
1522 tmport -= 0x06;
1523 outb(0, tmport);
1524 tmport += 0x06;
1525 }
1526 }
1527 tmport -= 0x08;
1528 j = inb(tmport) & 0x0f;
1529 if (j == 0x0f) {
1530 goto widep_in;
1531 }
1532 if (j == 0x0a) {
1533 goto widep_cmd;
1534 }
1535 if (j == 0x0e) {
1536 goto widep_out;
1537 }
1538 continue;
1539 widep_in:
1540 tmport = wkport + 0x14;
1541 outb(0xff, tmport);
1542 tmport += 0x04;
1543 outb(0x20, tmport);
1544 tmport += 0x07;
1545 k = 0;
1546 widep_in1:
1547 j = inb(tmport);
1548 if ((j & 0x01) != 0) {
1549 tmport -= 0x06;
1550 mbuf[k++] = inb(tmport);
1551 tmport += 0x06;
1552 goto widep_in1;
1553 }
1554 if ((j & 0x80) == 0x00) {
1555 goto widep_in1;
1556 }
1557 tmport -= 0x08;
1558 j = inb(tmport) & 0x0f;
1559 if (j == 0x0f) {
1560 goto widep_in;
1561 }
1562 if (j == 0x0a) {
1563 goto widep_cmd;
1564 }
1565 if (j == 0x0e) {
1566 goto widep_out;
1567 }
1568 continue;
1569 widep_cmd:
1570 tmport = wkport + 0x10;
1571 outb(0x30, tmport);
1572 tmport = wkport + 0x14;
1573 outb(0x00, tmport);
1574 tmport += 0x04;
1575 outb(0x08, tmport);
1576 tmport += 0x07;
1577
1578 while ((inb(tmport) & 0x80) == 0x00)
1579 cpu_relax();
1580
1581 tmport -= 0x08;
1582 j = inb(tmport);
1583 if (j != 0x16) {
1584 if (j == 0x4e) {
1585 goto widep_out;
1586 }
1587 continue;
1588 }
1589 if (mbuf[0] != 0x01) {
1590 goto not_wide;
1591 }
1592 if (mbuf[1] != 0x02) {
1593 goto not_wide;
1594 }
1595 if (mbuf[2] != 0x03) {
1596 goto not_wide;
1597 }
1598 if (mbuf[3] != 0x01) {
1599 goto not_wide;
1600 }
1601 m = 1;
1602 m = m << i;
1603 dev->wide_id[0] |= m;
1604 not_wide:
1605 if ((dev->id[0][i].devtype == 0x00) || (dev->id[0][i].devtype == 0x07) || ((dev->id[0][i].devtype == 0x05) && ((n & 0x10) != 0))) {
1606 goto set_sync;
1607 }
1608 continue;
1609 set_sync:
1610 tmport = wkport + 0x1b;
1611 j = 0;
1612 if ((m & dev->wide_id[0]) != 0) {
1613 j |= 0x01;
1614 }
1615 outb(j, tmport);
1616 tmport = wkport + 3;
1617 outb(satn[0], tmport++);
1618 outb(satn[1], tmport++);
1619 outb(satn[2], tmport++);
1620 outb(satn[3], tmport++);
1621 outb(satn[4], tmport++);
1622 outb(satn[5], tmport++);
1623 tmport += 0x06;
1624 outb(0, tmport);
1625 tmport += 0x02;
1626 outb(dev->id[0][i].devsp, tmport++);
1627 outb(0, tmport++);
1628 outb(satn[6], tmport++);
1629 outb(satn[7], tmport++);
1630 tmport += 0x03;
1631 outb(satn[8], tmport);
1632 tmport += 0x07;
1633
1634 while ((inb(tmport) & 0x80) == 0x00)
1635 cpu_relax();
1636
1637 tmport -= 0x08;
1638 if (inb(tmport) != 0x11 && inb(tmport) != 0x8e)
1639 continue;
1640
1641 while (inb(tmport) != 0x8e)
1642 cpu_relax();
1643
1644 try_sync:
1645 j = 0;
1646 tmport = wkport + 0x14;
1647 outb(0x06, tmport);
1648 tmport += 0x04;
1649 outb(0x20, tmport);
1650 tmport += 0x07;
1651
1652 while ((inb(tmport) & 0x80) == 0) {
1653 if ((inb(tmport) & 0x01) != 0) {
1654 tmport -= 0x06;
1655 if ((m & dev->wide_id[0]) != 0) {
1656 outb(synw[j++], tmport);
1657 } else {
1658 if ((m & dev->ultra_map[0]) != 0) {
1659 outb(synu[j++], tmport);
1660 } else {
1661 outb(synn[j++], tmport);
1662 }
1663 }
1664 tmport += 0x06;
1665 }
1666 }
1667 tmport -= 0x08;
1668
1669 while ((inb(tmport) & 0x80) == 0x00)
1670 cpu_relax();
1671
1672 j = inb(tmport) & 0x0f;
1673 if (j == 0x0f) {
1674 goto phase_ins;
1675 }
1676 if (j == 0x0a) {
1677 goto phase_cmds;
1678 }
1679 if (j == 0x0e) {
1680 goto try_sync;
1681 }
1682 continue;
1683 phase_outs:
1684 tmport = wkport + 0x18;
1685 outb(0x20, tmport);
1686 tmport += 0x07;
1687 while ((inb(tmport) & 0x80) == 0x00) {
1688 if ((inb(tmport) & 0x01) != 0x00) {
1689 tmport -= 0x06;
1690 outb(0x00, tmport);
1691 tmport += 0x06;
1692 }
1693 }
1694 tmport -= 0x08;
1695 j = inb(tmport);
1696 if (j == 0x85) {
1697 goto tar_dcons;
1698 }
1699 j &= 0x0f;
1700 if (j == 0x0f) {
1701 goto phase_ins;
1702 }
1703 if (j == 0x0a) {
1704 goto phase_cmds;
1705 }
1706 if (j == 0x0e) {
1707 goto phase_outs;
1708 }
1709 continue;
1710 phase_ins:
1711 tmport = wkport + 0x14;
1712 outb(0xff, tmport);
1713 tmport += 0x04;
1714 outb(0x20, tmport);
1715 tmport += 0x07;
1716 k = 0;
1717 phase_ins1:
1718 j = inb(tmport);
1719 if ((j & 0x01) != 0x00) {
1720 tmport -= 0x06;
1721 mbuf[k++] = inb(tmport);
1722 tmport += 0x06;
1723 goto phase_ins1;
1724 }
1725 if ((j & 0x80) == 0x00) {
1726 goto phase_ins1;
1727 }
1728 tmport -= 0x08;
1729
1730 while ((inb(tmport) & 0x80) == 0x00)
1731 cpu_relax();
1732
1733 j = inb(tmport);
1734 if (j == 0x85) {
1735 goto tar_dcons;
1736 }
1737 j &= 0x0f;
1738 if (j == 0x0f) {
1739 goto phase_ins;
1740 }
1741 if (j == 0x0a) {
1742 goto phase_cmds;
1743 }
1744 if (j == 0x0e) {
1745 goto phase_outs;
1746 }
1747 continue;
1748 phase_cmds:
1749 tmport = wkport + 0x10;
1750 outb(0x30, tmport);
1751 tar_dcons:
1752 tmport = wkport + 0x14;
1753 outb(0x00, tmport);
1754 tmport += 0x04;
1755 outb(0x08, tmport);
1756 tmport += 0x07;
1757
1758 while ((inb(tmport) & 0x80) == 0x00)
1759 cpu_relax();
1760
1761 tmport -= 0x08;
1762 j = inb(tmport);
1763 if (j != 0x16) {
1764 continue;
1765 }
1766 if (mbuf[0] != 0x01) {
1767 continue;
1768 }
1769 if (mbuf[1] != 0x03) {
1770 continue;
1771 }
1772 if (mbuf[4] == 0x00) {
1773 continue;
1774 }
1775 if (mbuf[3] > 0x64) {
1776 continue;
1777 }
1778 if (mbuf[4] > 0x0c) {
1779 mbuf[4] = 0x0c;
1780 }
1781 dev->id[0][i].devsp = mbuf[4];
1782 if ((mbuf[3] < 0x0d) && (rmb == 0)) {
1783 j = 0xa0;
1784 goto set_syn_ok;
1785 }
1786 if (mbuf[3] < 0x1a) {
1787 j = 0x20;
1788 goto set_syn_ok;
1789 }
1790 if (mbuf[3] < 0x33) {
1791 j = 0x40;
1792 goto set_syn_ok;
1793 }
1794 if (mbuf[3] < 0x4c) {
1795 j = 0x50;
1796 goto set_syn_ok;
1797 }
1798 j = 0x60;
1799 set_syn_ok:
1800 dev->id[0][i].devsp = (dev->id[0][i].devsp & 0x0f) | j;
1801 }
1802 tmport = wkport + 0x3a;
1803 outb((unsigned char) (inb(tmport) & 0xef), tmport);
1804 }
1805
1806 static void is880(struct atp_unit *dev, unsigned int wkport)
1807 {
1808 unsigned int tmport;
1809 unsigned char i, j, k, rmb, n, lvdmode;
1810 unsigned short int m;
1811 static unsigned char mbuf[512];
1812 static unsigned char satn[9] = { 0, 0, 0, 0, 0, 0, 0, 6, 6 };
1813 static unsigned char inqd[9] = { 0x12, 0, 0, 0, 0x24, 0, 0, 0x24, 6 };
1814 static unsigned char synn[6] = { 0x80, 1, 3, 1, 0x19, 0x0e };
1815 unsigned char synu[6] = { 0x80, 1, 3, 1, 0x0a, 0x0e };
1816 static unsigned char synw[6] = { 0x80, 1, 3, 1, 0x19, 0x0e };
1817 unsigned char synuw[6] = { 0x80, 1, 3, 1, 0x0a, 0x0e };
1818 static unsigned char wide[6] = { 0x80, 1, 2, 3, 1, 0 };
1819 static unsigned char u3[9] = { 0x80, 1, 6, 4, 0x09, 00, 0x0e, 0x01, 0x02 };
1820
1821 lvdmode = inb(wkport + 0x3f) & 0x40;
1822
1823 for (i = 0; i < 16; i++) {
1824 m = 1;
1825 m = m << i;
1826 if ((m & dev->active_id[0]) != 0) {
1827 continue;
1828 }
1829 if (i == dev->host_id[0]) {
1830 printk(KERN_INFO " ID: %2d Host Adapter\n", dev->host_id[0]);
1831 continue;
1832 }
1833 tmport = wkport + 0x5b;
1834 outb(0x01, tmport);
1835 tmport = wkport + 0x41;
1836 outb(0x08, tmport++);
1837 outb(0x7f, tmport++);
1838 outb(satn[0], tmport++);
1839 outb(satn[1], tmport++);
1840 outb(satn[2], tmport++);
1841 outb(satn[3], tmport++);
1842 outb(satn[4], tmport++);
1843 outb(satn[5], tmport++);
1844 tmport += 0x06;
1845 outb(0, tmport);
1846 tmport += 0x02;
1847 outb(dev->id[0][i].devsp, tmport++);
1848 outb(0, tmport++);
1849 outb(satn[6], tmport++);
1850 outb(satn[7], tmport++);
1851 j = i;
1852 if ((j & 0x08) != 0) {
1853 j = (j & 0x07) | 0x40;
1854 }
1855 outb(j, tmport);
1856 tmport += 0x03;
1857 outb(satn[8], tmport);
1858 tmport += 0x07;
1859
1860 while ((inb(tmport) & 0x80) == 0x00)
1861 cpu_relax();
1862
1863 tmport -= 0x08;
1864 if (inb(tmport) != 0x11 && inb(tmport) != 0x8e)
1865 continue;
1866
1867 while (inb(tmport) != 0x8e)
1868 cpu_relax();
1869
1870 dev->active_id[0] |= m;
1871
1872 tmport = wkport + 0x50;
1873 outb(0x30, tmport);
1874 tmport = wkport + 0x54;
1875 outb(0x00, tmport);
1876
1877 phase_cmd:
1878 tmport = wkport + 0x58;
1879 outb(0x08, tmport);
1880 tmport += 0x07;
1881
1882 while ((inb(tmport) & 0x80) == 0x00)
1883 cpu_relax();
1884
1885 tmport -= 0x08;
1886 j = inb(tmport);
1887 if (j != 0x16) {
1888 tmport = wkport + 0x50;
1889 outb(0x41, tmport);
1890 goto phase_cmd;
1891 }
1892 sel_ok:
1893 tmport = wkport + 0x43;
1894 outb(inqd[0], tmport++);
1895 outb(inqd[1], tmport++);
1896 outb(inqd[2], tmport++);
1897 outb(inqd[3], tmport++);
1898 outb(inqd[4], tmport++);
1899 outb(inqd[5], tmport);
1900 tmport += 0x07;
1901 outb(0, tmport);
1902 tmport += 0x02;
1903 outb(dev->id[0][i].devsp, tmport++);
1904 outb(0, tmport++);
1905 outb(inqd[6], tmport++);
1906 outb(inqd[7], tmport++);
1907 tmport += 0x03;
1908 outb(inqd[8], tmport);
1909 tmport += 0x07;
1910
1911 while ((inb(tmport) & 0x80) == 0x00)
1912 cpu_relax();
1913
1914 tmport -= 0x08;
1915 if (inb(tmport) != 0x11 && inb(tmport) != 0x8e)
1916 continue;
1917
1918 while (inb(tmport) != 0x8e)
1919 cpu_relax();
1920
1921 tmport = wkport + 0x5b;
1922 outb(0x00, tmport);
1923 tmport = wkport + 0x58;
1924 outb(0x08, tmport);
1925 tmport += 0x07;
1926 j = 0;
1927 rd_inq_data:
1928 k = inb(tmport);
1929 if ((k & 0x01) != 0) {
1930 tmport -= 0x06;
1931 mbuf[j++] = inb(tmport);
1932 tmport += 0x06;
1933 goto rd_inq_data;
1934 }
1935 if ((k & 0x80) == 0) {
1936 goto rd_inq_data;
1937 }
1938 tmport -= 0x08;
1939 j = inb(tmport);
1940 if (j == 0x16) {
1941 goto inq_ok;
1942 }
1943 tmport = wkport + 0x50;
1944 outb(0x46, tmport);
1945 tmport += 0x02;
1946 outb(0, tmport++);
1947 outb(0, tmport++);
1948 outb(0, tmport++);
1949 tmport += 0x03;
1950 outb(0x08, tmport);
1951 tmport += 0x07;
1952 while ((inb(tmport) & 0x80) == 0x00)
1953 cpu_relax();
1954
1955 tmport -= 0x08;
1956 if (inb(tmport) != 0x16)
1957 goto sel_ok;
1958
1959 inq_ok:
1960 mbuf[36] = 0;
1961 printk(KERN_INFO " ID: %2d %s\n", i, &mbuf[8]);
1962 dev->id[0][i].devtype = mbuf[0];
1963 rmb = mbuf[1];
1964 n = mbuf[7];
1965 if ((mbuf[7] & 0x60) == 0) {
1966 goto not_wide;
1967 }
1968 if ((i < 8) && ((dev->global_map[0] & 0x20) == 0)) {
1969 goto not_wide;
1970 }
1971 if (lvdmode == 0) {
1972 goto chg_wide;
1973 }
1974 if (dev->sp[0][i] != 0x04) // force u2
1975 {
1976 goto chg_wide;
1977 }
1978
1979 tmport = wkport + 0x5b;
1980 outb(0x01, tmport);
1981 tmport = wkport + 0x43;
1982 outb(satn[0], tmport++);
1983 outb(satn[1], tmport++);
1984 outb(satn[2], tmport++);
1985 outb(satn[3], tmport++);
1986 outb(satn[4], tmport++);
1987 outb(satn[5], tmport++);
1988 tmport += 0x06;
1989 outb(0, tmport);
1990 tmport += 0x02;
1991 outb(dev->id[0][i].devsp, tmport++);
1992 outb(0, tmport++);
1993 outb(satn[6], tmport++);
1994 outb(satn[7], tmport++);
1995 tmport += 0x03;
1996 outb(satn[8], tmport);
1997 tmport += 0x07;
1998
1999 while ((inb(tmport) & 0x80) == 0x00)
2000 cpu_relax();
2001
2002 tmport -= 0x08;
2003
2004 if (inb(tmport) != 0x11 && inb(tmport) != 0x8e)
2005 continue;
2006
2007 while (inb(tmport) != 0x8e)
2008 cpu_relax();
2009
2010 try_u3:
2011 j = 0;
2012 tmport = wkport + 0x54;
2013 outb(0x09, tmport);
2014 tmport += 0x04;
2015 outb(0x20, tmport);
2016 tmport += 0x07;
2017
2018 while ((inb(tmport) & 0x80) == 0) {
2019 if ((inb(tmport) & 0x01) != 0) {
2020 tmport -= 0x06;
2021 outb(u3[j++], tmport);
2022 tmport += 0x06;
2023 }
2024 }
2025 tmport -= 0x08;
2026
2027 while ((inb(tmport) & 0x80) == 0x00)
2028 cpu_relax();
2029
2030 j = inb(tmport) & 0x0f;
2031 if (j == 0x0f) {
2032 goto u3p_in;
2033 }
2034 if (j == 0x0a) {
2035 goto u3p_cmd;
2036 }
2037 if (j == 0x0e) {
2038 goto try_u3;
2039 }
2040 continue;
2041 u3p_out:
2042 tmport = wkport + 0x58;
2043 outb(0x20, tmport);
2044 tmport += 0x07;
2045 while ((inb(tmport) & 0x80) == 0) {
2046 if ((inb(tmport) & 0x01) != 0) {
2047 tmport -= 0x06;
2048 outb(0, tmport);
2049 tmport += 0x06;
2050 }
2051 }
2052 tmport -= 0x08;
2053 j = inb(tmport) & 0x0f;
2054 if (j == 0x0f) {
2055 goto u3p_in;
2056 }
2057 if (j == 0x0a) {
2058 goto u3p_cmd;
2059 }
2060 if (j == 0x0e) {
2061 goto u3p_out;
2062 }
2063 continue;
2064 u3p_in:
2065 tmport = wkport + 0x54;
2066 outb(0x09, tmport);
2067 tmport += 0x04;
2068 outb(0x20, tmport);
2069 tmport += 0x07;
2070 k = 0;
2071 u3p_in1:
2072 j = inb(tmport);
2073 if ((j & 0x01) != 0) {
2074 tmport -= 0x06;
2075 mbuf[k++] = inb(tmport);
2076 tmport += 0x06;
2077 goto u3p_in1;
2078 }
2079 if ((j & 0x80) == 0x00) {
2080 goto u3p_in1;
2081 }
2082 tmport -= 0x08;
2083 j = inb(tmport) & 0x0f;
2084 if (j == 0x0f) {
2085 goto u3p_in;
2086 }
2087 if (j == 0x0a) {
2088 goto u3p_cmd;
2089 }
2090 if (j == 0x0e) {
2091 goto u3p_out;
2092 }
2093 continue;
2094 u3p_cmd:
2095 tmport = wkport + 0x50;
2096 outb(0x30, tmport);
2097 tmport = wkport + 0x54;
2098 outb(0x00, tmport);
2099 tmport += 0x04;
2100 outb(0x08, tmport);
2101 tmport += 0x07;
2102
2103 while ((inb(tmport) & 0x80) == 0x00)
2104 cpu_relax();
2105
2106 tmport -= 0x08;
2107 j = inb(tmport);
2108 if (j != 0x16) {
2109 if (j == 0x4e) {
2110 goto u3p_out;
2111 }
2112 continue;
2113 }
2114 if (mbuf[0] != 0x01) {
2115 goto chg_wide;
2116 }
2117 if (mbuf[1] != 0x06) {
2118 goto chg_wide;
2119 }
2120 if (mbuf[2] != 0x04) {
2121 goto chg_wide;
2122 }
2123 if (mbuf[3] == 0x09) {
2124 m = 1;
2125 m = m << i;
2126 dev->wide_id[0] |= m;
2127 dev->id[0][i].devsp = 0xce;
2128 continue;
2129 }
2130 chg_wide:
2131 tmport = wkport + 0x5b;
2132 outb(0x01, tmport);
2133 tmport = wkport + 0x43;
2134 outb(satn[0], tmport++);
2135 outb(satn[1], tmport++);
2136 outb(satn[2], tmport++);
2137 outb(satn[3], tmport++);
2138 outb(satn[4], tmport++);
2139 outb(satn[5], tmport++);
2140 tmport += 0x06;
2141 outb(0, tmport);
2142 tmport += 0x02;
2143 outb(dev->id[0][i].devsp, tmport++);
2144 outb(0, tmport++);
2145 outb(satn[6], tmport++);
2146 outb(satn[7], tmport++);
2147 tmport += 0x03;
2148 outb(satn[8], tmport);
2149 tmport += 0x07;
2150
2151 while ((inb(tmport) & 0x80) == 0x00)
2152 cpu_relax();
2153
2154 tmport -= 0x08;
2155 if (inb(tmport) != 0x11 && inb(tmport) != 0x8e)
2156 continue;
2157
2158 while (inb(tmport) != 0x8e)
2159 cpu_relax();
2160
2161 try_wide:
2162 j = 0;
2163 tmport = wkport + 0x54;
2164 outb(0x05, tmport);
2165 tmport += 0x04;
2166 outb(0x20, tmport);
2167 tmport += 0x07;
2168
2169 while ((inb(tmport) & 0x80) == 0) {
2170 if ((inb(tmport) & 0x01) != 0) {
2171 tmport -= 0x06;
2172 outb(wide[j++], tmport);
2173 tmport += 0x06;
2174 }
2175 }
2176 tmport -= 0x08;
2177 while ((inb(tmport) & 0x80) == 0x00)
2178 cpu_relax();
2179
2180 j = inb(tmport) & 0x0f;
2181 if (j == 0x0f) {
2182 goto widep_in;
2183 }
2184 if (j == 0x0a) {
2185 goto widep_cmd;
2186 }
2187 if (j == 0x0e) {
2188 goto try_wide;
2189 }
2190 continue;
2191 widep_out:
2192 tmport = wkport + 0x58;
2193 outb(0x20, tmport);
2194 tmport += 0x07;
2195 while ((inb(tmport) & 0x80) == 0) {
2196 if ((inb(tmport) & 0x01) != 0) {
2197 tmport -= 0x06;
2198 outb(0, tmport);
2199 tmport += 0x06;
2200 }
2201 }
2202 tmport -= 0x08;
2203 j = inb(tmport) & 0x0f;
2204 if (j == 0x0f) {
2205 goto widep_in;
2206 }
2207 if (j == 0x0a) {
2208 goto widep_cmd;
2209 }
2210 if (j == 0x0e) {
2211 goto widep_out;
2212 }
2213 continue;
2214 widep_in:
2215 tmport = wkport + 0x54;
2216 outb(0xff, tmport);
2217 tmport += 0x04;
2218 outb(0x20, tmport);
2219 tmport += 0x07;
2220 k = 0;
2221 widep_in1:
2222 j = inb(tmport);
2223 if ((j & 0x01) != 0) {
2224 tmport -= 0x06;
2225 mbuf[k++] = inb(tmport);
2226 tmport += 0x06;
2227 goto widep_in1;
2228 }
2229 if ((j & 0x80) == 0x00) {
2230 goto widep_in1;
2231 }
2232 tmport -= 0x08;
2233 j = inb(tmport) & 0x0f;
2234 if (j == 0x0f) {
2235 goto widep_in;
2236 }
2237 if (j == 0x0a) {
2238 goto widep_cmd;
2239 }
2240 if (j == 0x0e) {
2241 goto widep_out;
2242 }
2243 continue;
2244 widep_cmd:
2245 tmport = wkport + 0x50;
2246 outb(0x30, tmport);
2247 tmport = wkport + 0x54;
2248 outb(0x00, tmport);
2249 tmport += 0x04;
2250 outb(0x08, tmport);
2251 tmport += 0x07;
2252
2253 while ((inb(tmport) & 0x80) == 0x00)
2254 cpu_relax();
2255
2256 tmport -= 0x08;
2257 j = inb(tmport);
2258 if (j != 0x16) {
2259 if (j == 0x4e) {
2260 goto widep_out;
2261 }
2262 continue;
2263 }
2264 if (mbuf[0] != 0x01) {
2265 goto not_wide;
2266 }
2267 if (mbuf[1] != 0x02) {
2268 goto not_wide;
2269 }
2270 if (mbuf[2] != 0x03) {
2271 goto not_wide;
2272 }
2273 if (mbuf[3] != 0x01) {
2274 goto not_wide;
2275 }
2276 m = 1;
2277 m = m << i;
2278 dev->wide_id[0] |= m;
2279 not_wide:
2280 if ((dev->id[0][i].devtype == 0x00) || (dev->id[0][i].devtype == 0x07) || ((dev->id[0][i].devtype == 0x05) && ((n & 0x10) != 0))) {
2281 m = 1;
2282 m = m << i;
2283 if ((dev->async[0] & m) != 0) {
2284 goto set_sync;
2285 }
2286 }
2287 continue;
2288 set_sync:
2289 if (dev->sp[0][i] == 0x02) {
2290 synu[4] = 0x0c;
2291 synuw[4] = 0x0c;
2292 } else {
2293 if (dev->sp[0][i] >= 0x03) {
2294 synu[4] = 0x0a;
2295 synuw[4] = 0x0a;
2296 }
2297 }
2298 tmport = wkport + 0x5b;
2299 j = 0;
2300 if ((m & dev->wide_id[0]) != 0) {
2301 j |= 0x01;
2302 }
2303 outb(j, tmport);
2304 tmport = wkport + 0x43;
2305 outb(satn[0], tmport++);
2306 outb(satn[1], tmport++);
2307 outb(satn[2], tmport++);
2308 outb(satn[3], tmport++);
2309 outb(satn[4], tmport++);
2310 outb(satn[5], tmport++);
2311 tmport += 0x06;
2312 outb(0, tmport);
2313 tmport += 0x02;
2314 outb(dev->id[0][i].devsp, tmport++);
2315 outb(0, tmport++);
2316 outb(satn[6], tmport++);
2317 outb(satn[7], tmport++);
2318 tmport += 0x03;
2319 outb(satn[8], tmport);
2320 tmport += 0x07;
2321
2322 while ((inb(tmport) & 0x80) == 0x00)
2323 cpu_relax();
2324
2325 tmport -= 0x08;
2326 if ((inb(tmport) != 0x11) && (inb(tmport) != 0x8e)) {
2327 continue;
2328 }
2329 while (inb(tmport) != 0x8e)
2330 cpu_relax();
2331
2332 try_sync:
2333 j = 0;
2334 tmport = wkport + 0x54;
2335 outb(0x06, tmport);
2336 tmport += 0x04;
2337 outb(0x20, tmport);
2338 tmport += 0x07;
2339
2340 while ((inb(tmport) & 0x80) == 0) {
2341 if ((inb(tmport) & 0x01) != 0) {
2342 tmport -= 0x06;
2343 if ((m & dev->wide_id[0]) != 0) {
2344 if ((m & dev->ultra_map[0]) != 0) {
2345 outb(synuw[j++], tmport);
2346 } else {
2347 outb(synw[j++], tmport);
2348 }
2349 } else {
2350 if ((m & dev->ultra_map[0]) != 0) {
2351 outb(synu[j++], tmport);
2352 } else {
2353 outb(synn[j++], tmport);
2354 }
2355 }
2356 tmport += 0x06;
2357 }
2358 }
2359 tmport -= 0x08;
2360
2361 while ((inb(tmport) & 0x80) == 0x00)
2362 cpu_relax();
2363
2364 j = inb(tmport) & 0x0f;
2365 if (j == 0x0f) {
2366 goto phase_ins;
2367 }
2368 if (j == 0x0a) {
2369 goto phase_cmds;
2370 }
2371 if (j == 0x0e) {
2372 goto try_sync;
2373 }
2374 continue;
2375 phase_outs:
2376 tmport = wkport + 0x58;
2377 outb(0x20, tmport);
2378 tmport += 0x07;
2379 while ((inb(tmport) & 0x80) == 0x00) {
2380 if ((inb(tmport) & 0x01) != 0x00) {
2381 tmport -= 0x06;
2382 outb(0x00, tmport);
2383 tmport += 0x06;
2384 }
2385 }
2386 tmport -= 0x08;
2387 j = inb(tmport);
2388 if (j == 0x85) {
2389 goto tar_dcons;
2390 }
2391 j &= 0x0f;
2392 if (j == 0x0f) {
2393 goto phase_ins;
2394 }
2395 if (j == 0x0a) {
2396 goto phase_cmds;
2397 }
2398 if (j == 0x0e) {
2399 goto phase_outs;
2400 }
2401 continue;
2402 phase_ins:
2403 tmport = wkport + 0x54;
2404 outb(0x06, tmport);
2405 tmport += 0x04;
2406 outb(0x20, tmport);
2407 tmport += 0x07;
2408 k = 0;
2409 phase_ins1:
2410 j = inb(tmport);
2411 if ((j & 0x01) != 0x00) {
2412 tmport -= 0x06;
2413 mbuf[k++] = inb(tmport);
2414 tmport += 0x06;
2415 goto phase_ins1;
2416 }
2417 if ((j & 0x80) == 0x00) {
2418 goto phase_ins1;
2419 }
2420 tmport -= 0x08;
2421
2422 while ((inb(tmport) & 0x80) == 0x00)
2423 cpu_relax();
2424
2425 j = inb(tmport);
2426 if (j == 0x85) {
2427 goto tar_dcons;
2428 }
2429 j &= 0x0f;
2430 if (j == 0x0f) {
2431 goto phase_ins;
2432 }
2433 if (j == 0x0a) {
2434 goto phase_cmds;
2435 }
2436 if (j == 0x0e) {
2437 goto phase_outs;
2438 }
2439 continue;
2440 phase_cmds:
2441 tmport = wkport + 0x50;
2442 outb(0x30, tmport);
2443 tar_dcons:
2444 tmport = wkport + 0x54;
2445 outb(0x00, tmport);
2446 tmport += 0x04;
2447 outb(0x08, tmport);
2448 tmport += 0x07;
2449
2450 while ((inb(tmport) & 0x80) == 0x00)
2451 cpu_relax();
2452
2453 tmport -= 0x08;
2454 j = inb(tmport);
2455 if (j != 0x16) {
2456 continue;
2457 }
2458 if (mbuf[0] != 0x01) {
2459 continue;
2460 }
2461 if (mbuf[1] != 0x03) {
2462 continue;
2463 }
2464 if (mbuf[4] == 0x00) {
2465 continue;
2466 }
2467 if (mbuf[3] > 0x64) {
2468 continue;
2469 }
2470 if (mbuf[4] > 0x0e) {
2471 mbuf[4] = 0x0e;
2472 }
2473 dev->id[0][i].devsp = mbuf[4];
2474 if (mbuf[3] < 0x0c) {
2475 j = 0xb0;
2476 goto set_syn_ok;
2477 }
2478 if ((mbuf[3] < 0x0d) && (rmb == 0)) {
2479 j = 0xa0;
2480 goto set_syn_ok;
2481 }
2482 if (mbuf[3] < 0x1a) {
2483 j = 0x20;
2484 goto set_syn_ok;
2485 }
2486 if (mbuf[3] < 0x33) {
2487 j = 0x40;
2488 goto set_syn_ok;
2489 }
2490 if (mbuf[3] < 0x4c) {
2491 j = 0x50;
2492 goto set_syn_ok;
2493 }
2494 j = 0x60;
2495 set_syn_ok:
2496 dev->id[0][i].devsp = (dev->id[0][i].devsp & 0x0f) | j;
2497 }
2498 }
2499
2500 static void atp870u_free_tables(struct Scsi_Host *host)
2501 {
2502 struct atp_unit *atp_dev = (struct atp_unit *)&host->hostdata;
2503 int j, k;
2504 for (j=0; j < 2; j++) {
2505 for (k = 0; k < 16; k++) {
2506 if (!atp_dev->id[j][k].prd_table)
2507 continue;
2508 pci_free_consistent(atp_dev->pdev, 1024, atp_dev->id[j][k].prd_table, atp_dev->id[j][k].prd_bus);
2509 atp_dev->id[j][k].prd_table = NULL;
2510 }
2511 }
2512 }
2513
2514 static int atp870u_init_tables(struct Scsi_Host *host)
2515 {
2516 struct atp_unit *atp_dev = (struct atp_unit *)&host->hostdata;
2517 int c,k;
2518 for(c=0;c < 2;c++) {
2519 for(k=0;k<16;k++) {
2520 atp_dev->id[c][k].prd_table = pci_alloc_consistent(atp_dev->pdev, 1024, &(atp_dev->id[c][k].prd_bus));
2521 if (!atp_dev->id[c][k].prd_table) {
2522 printk("atp870u_init_tables fail\n");
2523 atp870u_free_tables(host);
2524 return -ENOMEM;
2525 }
2526 atp_dev->id[c][k].prdaddr = atp_dev->id[c][k].prd_bus;
2527 atp_dev->id[c][k].devsp=0x20;
2528 atp_dev->id[c][k].devtype = 0x7f;
2529 atp_dev->id[c][k].curr_req = NULL;
2530 }
2531
2532 atp_dev->active_id[c] = 0;
2533 atp_dev->wide_id[c] = 0;
2534 atp_dev->host_id[c] = 0x07;
2535 atp_dev->quhd[c] = 0;
2536 atp_dev->quend[c] = 0;
2537 atp_dev->last_cmd[c] = 0xff;
2538 atp_dev->in_snd[c] = 0;
2539 atp_dev->in_int[c] = 0;
2540
2541 for (k = 0; k < qcnt; k++) {
2542 atp_dev->quereq[c][k] = NULL;
2543 }
2544 for (k = 0; k < 16; k++) {
2545 atp_dev->id[c][k].curr_req = NULL;
2546 atp_dev->sp[c][k] = 0x04;
2547 }
2548 }
2549 return 0;
2550 }
2551
2552 /* return non-zero on detection */
2553 static int atp870u_probe(struct pci_dev *pdev, const struct pci_device_id *ent)
2554 {
2555 unsigned char k, m, c;
2556 unsigned long flags;
2557 unsigned int base_io, tmport, error,n;
2558 unsigned char host_id;
2559 struct Scsi_Host *shpnt = NULL;
2560 struct atp_unit *atpdev, *p;
2561 unsigned char setupdata[2][16];
2562 int count = 0;
2563
2564 atpdev = kzalloc(sizeof(*atpdev), GFP_KERNEL);
2565 if (!atpdev)
2566 return -ENOMEM;
2567
2568 if (pci_enable_device(pdev))
2569 goto err_eio;
2570
2571 if (!pci_set_dma_mask(pdev, DMA_BIT_MASK(32))) {
2572 printk(KERN_INFO "atp870u: use 32bit DMA mask.\n");
2573 } else {
2574 printk(KERN_ERR "atp870u: DMA mask required but not available.\n");
2575 goto err_eio;
2576 }
2577
2578 /*
2579 * It's probably easier to weed out some revisions like
2580 * this than via the PCI device table
2581 */
2582 if (ent->device == PCI_DEVICE_ID_ARTOP_AEC7610) {
2583 error = pci_read_config_byte(pdev, PCI_CLASS_REVISION, &atpdev->chip_ver);
2584 if (atpdev->chip_ver < 2)
2585 goto err_eio;
2586 }
2587
2588 switch (ent->device) {
2589 case PCI_DEVICE_ID_ARTOP_AEC7612UW:
2590 case PCI_DEVICE_ID_ARTOP_AEC7612SUW:
2591 case ATP880_DEVID1:
2592 case ATP880_DEVID2:
2593 case ATP885_DEVID:
2594 atpdev->chip_ver = 0x04;
2595 default:
2596 break;
2597 }
2598 base_io = pci_resource_start(pdev, 0);
2599 base_io &= 0xfffffff8;
2600
2601 if ((ent->device == ATP880_DEVID1)||(ent->device == ATP880_DEVID2)) {
2602 error = pci_read_config_byte(pdev, PCI_CLASS_REVISION, &atpdev->chip_ver);
2603 pci_write_config_byte(pdev, PCI_LATENCY_TIMER, 0x80);//JCC082803
2604
2605 host_id = inb(base_io + 0x39);
2606 host_id >>= 0x04;
2607
2608 printk(KERN_INFO " ACARD AEC-67160 PCI Ultra3 LVD Host Adapter: %d"
2609 " IO:%x, IRQ:%d.\n", count, base_io, pdev->irq);
2610 atpdev->ioport[0] = base_io + 0x40;
2611 atpdev->pciport[0] = base_io + 0x28;
2612 atpdev->dev_id = ent->device;
2613 atpdev->host_id[0] = host_id;
2614
2615 tmport = base_io + 0x22;
2616 atpdev->scam_on = inb(tmport);
2617 tmport += 0x13;
2618 atpdev->global_map[0] = inb(tmport);
2619 tmport += 0x07;
2620 atpdev->ultra_map[0] = inw(tmport);
2621
2622 n = 0x3f09;
2623 next_fblk_880:
2624 if (n >= 0x4000)
2625 goto flash_ok_880;
2626
2627 m = 0;
2628 outw(n, base_io + 0x34);
2629 n += 0x0002;
2630 if (inb(base_io + 0x30) == 0xff)
2631 goto flash_ok_880;
2632
2633 atpdev->sp[0][m++] = inb(base_io + 0x30);
2634 atpdev->sp[0][m++] = inb(base_io + 0x31);
2635 atpdev->sp[0][m++] = inb(base_io + 0x32);
2636 atpdev->sp[0][m++] = inb(base_io + 0x33);
2637 outw(n, base_io + 0x34);
2638 n += 0x0002;
2639 atpdev->sp[0][m++] = inb(base_io + 0x30);
2640 atpdev->sp[0][m++] = inb(base_io + 0x31);
2641 atpdev->sp[0][m++] = inb(base_io + 0x32);
2642 atpdev->sp[0][m++] = inb(base_io + 0x33);
2643 outw(n, base_io + 0x34);
2644 n += 0x0002;
2645 atpdev->sp[0][m++] = inb(base_io + 0x30);
2646 atpdev->sp[0][m++] = inb(base_io + 0x31);
2647 atpdev->sp[0][m++] = inb(base_io + 0x32);
2648 atpdev->sp[0][m++] = inb(base_io + 0x33);
2649 outw(n, base_io + 0x34);
2650 n += 0x0002;
2651 atpdev->sp[0][m++] = inb(base_io + 0x30);
2652 atpdev->sp[0][m++] = inb(base_io + 0x31);
2653 atpdev->sp[0][m++] = inb(base_io + 0x32);
2654 atpdev->sp[0][m++] = inb(base_io + 0x33);
2655 n += 0x0018;
2656 goto next_fblk_880;
2657 flash_ok_880:
2658 outw(0, base_io + 0x34);
2659 atpdev->ultra_map[0] = 0;
2660 atpdev->async[0] = 0;
2661 for (k = 0; k < 16; k++) {
2662 n = 1;
2663 n = n << k;
2664 if (atpdev->sp[0][k] > 1) {
2665 atpdev->ultra_map[0] |= n;
2666 } else {
2667 if (atpdev->sp[0][k] == 0)
2668 atpdev->async[0] |= n;
2669 }
2670 }
2671 atpdev->async[0] = ~(atpdev->async[0]);
2672 outb(atpdev->global_map[0], base_io + 0x35);
2673
2674 shpnt = scsi_host_alloc(&atp870u_template, sizeof(struct atp_unit));
2675 if (!shpnt)
2676 goto err_nomem;
2677
2678 p = (struct atp_unit *)&shpnt->hostdata;
2679
2680 atpdev->host = shpnt;
2681 atpdev->pdev = pdev;
2682 pci_set_drvdata(pdev, p);
2683 memcpy(p, atpdev, sizeof(*atpdev));
2684 if (atp870u_init_tables(shpnt) < 0) {
2685 printk(KERN_ERR "Unable to allocate tables for Acard controller\n");
2686 goto unregister;
2687 }
2688
2689 if (request_irq(pdev->irq, atp870u_intr_handle, IRQF_SHARED, "atp880i", shpnt)) {
2690 printk(KERN_ERR "Unable to allocate IRQ%d for Acard controller.\n", pdev->irq);
2691 goto free_tables;
2692 }
2693
2694 spin_lock_irqsave(shpnt->host_lock, flags);
2695 tmport = base_io + 0x38;
2696 k = inb(tmport) & 0x80;
2697 outb(k, tmport);
2698 tmport += 0x03;
2699 outb(0x20, tmport);
2700 mdelay(32);
2701 outb(0, tmport);
2702 mdelay(32);
2703 tmport = base_io + 0x5b;
2704 inb(tmport);
2705 tmport -= 0x04;
2706 inb(tmport);
2707 tmport = base_io + 0x40;
2708 outb((host_id | 0x08), tmport);
2709 tmport += 0x18;
2710 outb(0, tmport);
2711 tmport += 0x07;
2712 while ((inb(tmport) & 0x80) == 0)
2713 mdelay(1);
2714 tmport -= 0x08;
2715 inb(tmport);
2716 tmport = base_io + 0x41;
2717 outb(8, tmport++);
2718 outb(0x7f, tmport);
2719 tmport = base_io + 0x51;
2720 outb(0x20, tmport);
2721
2722 tscam(shpnt);
2723 is880(p, base_io);
2724 tmport = base_io + 0x38;
2725 outb(0xb0, tmport);
2726 shpnt->max_id = 16;
2727 shpnt->this_id = host_id;
2728 shpnt->unique_id = base_io;
2729 shpnt->io_port = base_io;
2730 shpnt->n_io_port = 0x60; /* Number of bytes of I/O space used */
2731 shpnt->irq = pdev->irq;
2732 } else if (ent->device == ATP885_DEVID) {
2733 printk(KERN_INFO " ACARD AEC-67162 PCI Ultra3 LVD Host Adapter: IO:%x, IRQ:%d.\n"
2734 , base_io, pdev->irq);
2735
2736 atpdev->pdev = pdev;
2737 atpdev->dev_id = ent->device;
2738 atpdev->baseport = base_io;
2739 atpdev->ioport[0] = base_io + 0x80;
2740 atpdev->ioport[1] = base_io + 0xc0;
2741 atpdev->pciport[0] = base_io + 0x40;
2742 atpdev->pciport[1] = base_io + 0x50;
2743
2744 shpnt = scsi_host_alloc(&atp870u_template, sizeof(struct atp_unit));
2745 if (!shpnt)
2746 goto err_nomem;
2747
2748 p = (struct atp_unit *)&shpnt->hostdata;
2749
2750 atpdev->host = shpnt;
2751 atpdev->pdev = pdev;
2752 pci_set_drvdata(pdev, p);
2753 memcpy(p, atpdev, sizeof(struct atp_unit));
2754 if (atp870u_init_tables(shpnt) < 0)
2755 goto unregister;
2756
2757 #ifdef ED_DBGP
2758 printk("request_irq() shpnt %p hostdata %p\n", shpnt, p);
2759 #endif
2760 if (request_irq(pdev->irq, atp870u_intr_handle, IRQF_SHARED, "atp870u", shpnt)) {
2761 printk(KERN_ERR "Unable to allocate IRQ for Acard controller.\n");
2762 goto free_tables;
2763 }
2764
2765 spin_lock_irqsave(shpnt->host_lock, flags);
2766
2767 c=inb(base_io + 0x29);
2768 outb((c | 0x04),base_io + 0x29);
2769
2770 n=0x1f80;
2771 next_fblk_885:
2772 if (n >= 0x2000) {
2773 goto flash_ok_885;
2774 }
2775 outw(n,base_io + 0x3c);
2776 if (inl(base_io + 0x38) == 0xffffffff) {
2777 goto flash_ok_885;
2778 }
2779 for (m=0; m < 2; m++) {
2780 p->global_map[m]= 0;
2781 for (k=0; k < 4; k++) {
2782 outw(n++,base_io + 0x3c);
2783 ((unsigned long *)&setupdata[m][0])[k]=inl(base_io + 0x38);
2784 }
2785 for (k=0; k < 4; k++) {
2786 outw(n++,base_io + 0x3c);
2787 ((unsigned long *)&p->sp[m][0])[k]=inl(base_io + 0x38);
2788 }
2789 n += 8;
2790 }
2791 goto next_fblk_885;
2792 flash_ok_885:
2793 #ifdef ED_DBGP
2794 printk( "Flash Read OK\n");
2795 #endif
2796 c=inb(base_io + 0x29);
2797 outb((c & 0xfb),base_io + 0x29);
2798 for (c=0;c < 2;c++) {
2799 p->ultra_map[c]=0;
2800 p->async[c] = 0;
2801 for (k=0; k < 16; k++) {
2802 n=1;
2803 n = n << k;
2804 if (p->sp[c][k] > 1) {
2805 p->ultra_map[c] |= n;
2806 } else {
2807 if (p->sp[c][k] == 0) {
2808 p->async[c] |= n;
2809 }
2810 }
2811 }
2812 p->async[c] = ~(p->async[c]);
2813
2814 if (p->global_map[c] == 0) {
2815 k=setupdata[c][1];
2816 if ((k & 0x40) != 0)
2817 p->global_map[c] |= 0x20;
2818 k &= 0x07;
2819 p->global_map[c] |= k;
2820 if ((setupdata[c][2] & 0x04) != 0)
2821 p->global_map[c] |= 0x08;
2822 p->host_id[c] = setupdata[c][0] & 0x07;
2823 }
2824 }
2825
2826 k = inb(base_io + 0x28) & 0x8f;
2827 k |= 0x10;
2828 outb(k, base_io + 0x28);
2829 outb(0x80, base_io + 0x41);
2830 outb(0x80, base_io + 0x51);
2831 mdelay(100);
2832 outb(0, base_io + 0x41);
2833 outb(0, base_io + 0x51);
2834 mdelay(1000);
2835 inb(base_io + 0x9b);
2836 inb(base_io + 0x97);
2837 inb(base_io + 0xdb);
2838 inb(base_io + 0xd7);
2839 tmport = base_io + 0x80;
2840 k=p->host_id[0];
2841 if (k > 7)
2842 k = (k & 0x07) | 0x40;
2843 k |= 0x08;
2844 outb(k, tmport);
2845 tmport += 0x18;
2846 outb(0, tmport);
2847 tmport += 0x07;
2848
2849 while ((inb(tmport) & 0x80) == 0)
2850 cpu_relax();
2851
2852 tmport -= 0x08;
2853 inb(tmport);
2854 tmport = base_io + 0x81;
2855 outb(8, tmport++);
2856 outb(0x7f, tmport);
2857 tmport = base_io + 0x91;
2858 outb(0x20, tmport);
2859
2860 tmport = base_io + 0xc0;
2861 k=p->host_id[1];
2862 if (k > 7)
2863 k = (k & 0x07) | 0x40;
2864 k |= 0x08;
2865 outb(k, tmport);
2866 tmport += 0x18;
2867 outb(0, tmport);
2868 tmport += 0x07;
2869
2870 while ((inb(tmport) & 0x80) == 0)
2871 cpu_relax();
2872
2873 tmport -= 0x08;
2874 inb(tmport);
2875 tmport = base_io + 0xc1;
2876 outb(8, tmport++);
2877 outb(0x7f, tmport);
2878 tmport = base_io + 0xd1;
2879 outb(0x20, tmport);
2880
2881 tscam_885();
2882 printk(KERN_INFO " Scanning Channel A SCSI Device ...\n");
2883 is885(p, base_io + 0x80, 0);
2884 printk(KERN_INFO " Scanning Channel B SCSI Device ...\n");
2885 is885(p, base_io + 0xc0, 1);
2886
2887 k = inb(base_io + 0x28) & 0xcf;
2888 k |= 0xc0;
2889 outb(k, base_io + 0x28);
2890 k = inb(base_io + 0x1f) | 0x80;
2891 outb(k, base_io + 0x1f);
2892 k = inb(base_io + 0x29) | 0x01;
2893 outb(k, base_io + 0x29);
2894 #ifdef ED_DBGP
2895 //printk("atp885: atp_host[0] 0x%p\n", atp_host[0]);
2896 #endif
2897 shpnt->max_id = 16;
2898 shpnt->max_lun = (p->global_map[0] & 0x07) + 1;
2899 shpnt->max_channel = 1;
2900 shpnt->this_id = p->host_id[0];
2901 shpnt->unique_id = base_io;
2902 shpnt->io_port = base_io;
2903 shpnt->n_io_port = 0xff; /* Number of bytes of I/O space used */
2904 shpnt->irq = pdev->irq;
2905
2906 } else {
2907 error = pci_read_config_byte(pdev, 0x49, &host_id);
2908
2909 printk(KERN_INFO " ACARD AEC-671X PCI Ultra/W SCSI-2/3 Host Adapter: %d "
2910 "IO:%x, IRQ:%d.\n", count, base_io, pdev->irq);
2911
2912 atpdev->ioport[0] = base_io;
2913 atpdev->pciport[0] = base_io + 0x20;
2914 atpdev->dev_id = ent->device;
2915 host_id &= 0x07;
2916 atpdev->host_id[0] = host_id;
2917 tmport = base_io + 0x22;
2918 atpdev->scam_on = inb(tmport);
2919 tmport += 0x0b;
2920 atpdev->global_map[0] = inb(tmport++);
2921 atpdev->ultra_map[0] = inw(tmport);
2922
2923 if (atpdev->ultra_map[0] == 0) {
2924 atpdev->scam_on = 0x00;
2925 atpdev->global_map[0] = 0x20;
2926 atpdev->ultra_map[0] = 0xffff;
2927 }
2928
2929 shpnt = scsi_host_alloc(&atp870u_template, sizeof(struct atp_unit));
2930 if (!shpnt)
2931 goto err_nomem;
2932
2933 p = (struct atp_unit *)&shpnt->hostdata;
2934
2935 atpdev->host = shpnt;
2936 atpdev->pdev = pdev;
2937 pci_set_drvdata(pdev, p);
2938 memcpy(p, atpdev, sizeof(*atpdev));
2939 if (atp870u_init_tables(shpnt) < 0)
2940 goto unregister;
2941
2942 if (request_irq(pdev->irq, atp870u_intr_handle, IRQF_SHARED, "atp870i", shpnt)) {
2943 printk(KERN_ERR "Unable to allocate IRQ%d for Acard controller.\n", pdev->irq);
2944 goto free_tables;
2945 }
2946
2947 spin_lock_irqsave(shpnt->host_lock, flags);
2948 if (atpdev->chip_ver > 0x07) { /* check if atp876 chip then enable terminator */
2949 tmport = base_io + 0x3e;
2950 outb(0x00, tmport);
2951 }
2952
2953 tmport = base_io + 0x3a;
2954 k = (inb(tmport) & 0xf3) | 0x10;
2955 outb(k, tmport);
2956 outb((k & 0xdf), tmport);
2957 mdelay(32);
2958 outb(k, tmport);
2959 mdelay(32);
2960 tmport = base_io;
2961 outb((host_id | 0x08), tmport);
2962 tmport += 0x18;
2963 outb(0, tmport);
2964 tmport += 0x07;
2965 while ((inb(tmport) & 0x80) == 0)
2966 mdelay(1);
2967
2968 tmport -= 0x08;
2969 inb(tmport);
2970 tmport = base_io + 1;
2971 outb(8, tmport++);
2972 outb(0x7f, tmport);
2973 tmport = base_io + 0x11;
2974 outb(0x20, tmport);
2975
2976 tscam(shpnt);
2977 is870(p, base_io);
2978 tmport = base_io + 0x3a;
2979 outb((inb(tmport) & 0xef), tmport);
2980 tmport++;
2981 outb((inb(tmport) | 0x20), tmport);
2982 if (atpdev->chip_ver == 4)
2983 shpnt->max_id = 16;
2984 else
2985 shpnt->max_id = 8;
2986 shpnt->this_id = host_id;
2987 shpnt->unique_id = base_io;
2988 shpnt->io_port = base_io;
2989 shpnt->n_io_port = 0x40; /* Number of bytes of I/O space used */
2990 shpnt->irq = pdev->irq;
2991 }
2992 spin_unlock_irqrestore(shpnt->host_lock, flags);
2993 if(ent->device==ATP885_DEVID) {
2994 if(!request_region(base_io, 0xff, "atp870u")) /* Register the IO ports that we use */
2995 goto request_io_fail;
2996 } else if((ent->device==ATP880_DEVID1)||(ent->device==ATP880_DEVID2)) {
2997 if(!request_region(base_io, 0x60, "atp870u")) /* Register the IO ports that we use */
2998 goto request_io_fail;
2999 } else {
3000 if(!request_region(base_io, 0x40, "atp870u")) /* Register the IO ports that we use */
3001 goto request_io_fail;
3002 }
3003 count++;
3004 if (scsi_add_host(shpnt, &pdev->dev))
3005 goto scsi_add_fail;
3006 scsi_scan_host(shpnt);
3007 #ifdef ED_DBGP
3008 printk("atp870u_prob : exit\n");
3009 #endif
3010 return 0;
3011
3012 scsi_add_fail:
3013 printk("atp870u_prob:scsi_add_fail\n");
3014 if(ent->device==ATP885_DEVID) {
3015 release_region(base_io, 0xff);
3016 } else if((ent->device==ATP880_DEVID1)||(ent->device==ATP880_DEVID2)) {
3017 release_region(base_io, 0x60);
3018 } else {
3019 release_region(base_io, 0x40);
3020 }
3021 request_io_fail:
3022 printk("atp870u_prob:request_io_fail\n");
3023 free_irq(pdev->irq, shpnt);
3024 free_tables:
3025 printk("atp870u_prob:free_table\n");
3026 atp870u_free_tables(shpnt);
3027 unregister:
3028 printk("atp870u_prob:unregister\n");
3029 scsi_host_put(shpnt);
3030 return -1;
3031 err_eio:
3032 kfree(atpdev);
3033 return -EIO;
3034 err_nomem:
3035 kfree(atpdev);
3036 return -ENOMEM;
3037 }
3038
3039 /* The abort command does not leave the device in a clean state where
3040 it is available to be used again. Until this gets worked out, we will
3041 leave it commented out. */
3042
3043 static int atp870u_abort(struct scsi_cmnd * SCpnt)
3044 {
3045 unsigned char j, k, c;
3046 struct scsi_cmnd *workrequ;
3047 unsigned int tmport;
3048 struct atp_unit *dev;
3049 struct Scsi_Host *host;
3050 host = SCpnt->device->host;
3051
3052 dev = (struct atp_unit *)&host->hostdata;
3053 c = scmd_channel(SCpnt);
3054 printk(" atp870u: abort Channel = %x \n", c);
3055 printk("working=%x last_cmd=%x ", dev->working[c], dev->last_cmd[c]);
3056 printk(" quhdu=%x quendu=%x ", dev->quhd[c], dev->quend[c]);
3057 tmport = dev->ioport[c];
3058 for (j = 0; j < 0x18; j++) {
3059 printk(" r%2x=%2x", j, inb(tmport++));
3060 }
3061 tmport += 0x04;
3062 printk(" r1c=%2x", inb(tmport));
3063 tmport += 0x03;
3064 printk(" r1f=%2x in_snd=%2x ", inb(tmport), dev->in_snd[c]);
3065 tmport= dev->pciport[c];
3066 printk(" d00=%2x", inb(tmport));
3067 tmport += 0x02;
3068 printk(" d02=%2x", inb(tmport));
3069 for(j=0;j<16;j++) {
3070 if (dev->id[c][j].curr_req != NULL) {
3071 workrequ = dev->id[c][j].curr_req;
3072 printk("\n que cdb= ");
3073 for (k=0; k < workrequ->cmd_len; k++) {
3074 printk(" %2x ",workrequ->cmnd[k]);
3075 }
3076 printk(" last_lenu= %x ",(unsigned int)dev->id[c][j].last_len);
3077 }
3078 }
3079 return SUCCESS;
3080 }
3081
3082 static const char *atp870u_info(struct Scsi_Host *notused)
3083 {
3084 static char buffer[128];
3085
3086 strcpy(buffer, "ACARD AEC-6710/6712/67160 PCI Ultra/W/LVD SCSI-3 Adapter Driver V2.6+ac ");
3087
3088 return buffer;
3089 }
3090
3091 #define BLS buffer + len + size
3092 static int atp870u_proc_info(struct Scsi_Host *HBAptr, char *buffer,
3093 char **start, off_t offset, int length, int inout)
3094 {
3095 static u8 buff[512];
3096 int size = 0;
3097 int len = 0;
3098 off_t begin = 0;
3099 off_t pos = 0;
3100
3101 if (inout)
3102 return -EINVAL;
3103 if (offset == 0)
3104 memset(buff, 0, sizeof(buff));
3105 size += sprintf(BLS, "ACARD AEC-671X Driver Version: 2.6+ac\n");
3106 len += size;
3107 pos = begin + len;
3108 size = 0;
3109
3110 size += sprintf(BLS, "\n");
3111 size += sprintf(BLS, "Adapter Configuration:\n");
3112 size += sprintf(BLS, " Base IO: %#.4lx\n", HBAptr->io_port);
3113 size += sprintf(BLS, " IRQ: %d\n", HBAptr->irq);
3114 len += size;
3115 pos = begin + len;
3116
3117 *start = buffer + (offset - begin); /* Start of wanted data */
3118 len -= (offset - begin); /* Start slop */
3119 if (len > length) {
3120 len = length; /* Ending slop */
3121 }
3122 return (len);
3123 }
3124
3125
3126 static int atp870u_biosparam(struct scsi_device *disk, struct block_device *dev,
3127 sector_t capacity, int *ip)
3128 {
3129 int heads, sectors, cylinders;
3130
3131 heads = 64;
3132 sectors = 32;
3133 cylinders = (unsigned long)capacity / (heads * sectors);
3134 if (cylinders > 1024) {
3135 heads = 255;
3136 sectors = 63;
3137 cylinders = (unsigned long)capacity / (heads * sectors);
3138 }
3139 ip[0] = heads;
3140 ip[1] = sectors;
3141 ip[2] = cylinders;
3142
3143 return 0;
3144 }
3145
3146 static void atp870u_remove (struct pci_dev *pdev)
3147 {
3148 struct atp_unit *devext = pci_get_drvdata(pdev);
3149 struct Scsi_Host *pshost = devext->host;
3150
3151
3152 scsi_remove_host(pshost);
3153 printk(KERN_INFO "free_irq : %d\n",pshost->irq);
3154 free_irq(pshost->irq, pshost);
3155 release_region(pshost->io_port, pshost->n_io_port);
3156 printk(KERN_INFO "atp870u_free_tables : %p\n",pshost);
3157 atp870u_free_tables(pshost);
3158 printk(KERN_INFO "scsi_host_put : %p\n",pshost);
3159 scsi_host_put(pshost);
3160 printk(KERN_INFO "pci_set_drvdata : %p\n",pdev);
3161 pci_set_drvdata(pdev, NULL);
3162 }
3163 MODULE_LICENSE("GPL");
3164
3165 static struct scsi_host_template atp870u_template = {
3166 .module = THIS_MODULE,
3167 .name = "atp870u" /* name */,
3168 .proc_name = "atp870u",
3169 .proc_info = atp870u_proc_info,
3170 .info = atp870u_info /* info */,
3171 .queuecommand = atp870u_queuecommand /* queuecommand */,
3172 .eh_abort_handler = atp870u_abort /* abort */,
3173 .bios_param = atp870u_biosparam /* biosparm */,
3174 .can_queue = qcnt /* can_queue */,
3175 .this_id = 7 /* SCSI ID */,
3176 .sg_tablesize = ATP870U_SCATTER /*SG_ALL*/ /*SG_NONE*/,
3177 .cmd_per_lun = ATP870U_CMDLUN /* commands per lun */,
3178 .use_clustering = ENABLE_CLUSTERING,
3179 .max_sectors = ATP870U_MAX_SECTORS,
3180 };
3181
3182 static struct pci_device_id atp870u_id_table[] = {
3183 { PCI_DEVICE(PCI_VENDOR_ID_ARTOP, ATP885_DEVID) },
3184 { PCI_DEVICE(PCI_VENDOR_ID_ARTOP, ATP880_DEVID1) },
3185 { PCI_DEVICE(PCI_VENDOR_ID_ARTOP, ATP880_DEVID2) },
3186 { PCI_DEVICE(PCI_VENDOR_ID_ARTOP, PCI_DEVICE_ID_ARTOP_AEC7610) },
3187 { PCI_DEVICE(PCI_VENDOR_ID_ARTOP, PCI_DEVICE_ID_ARTOP_AEC7612UW) },
3188 { PCI_DEVICE(PCI_VENDOR_ID_ARTOP, PCI_DEVICE_ID_ARTOP_AEC7612U) },
3189 { PCI_DEVICE(PCI_VENDOR_ID_ARTOP, PCI_DEVICE_ID_ARTOP_AEC7612S) },
3190 { PCI_DEVICE(PCI_VENDOR_ID_ARTOP, PCI_DEVICE_ID_ARTOP_AEC7612D) },
3191 { PCI_DEVICE(PCI_VENDOR_ID_ARTOP, PCI_DEVICE_ID_ARTOP_AEC7612SUW) },
3192 { PCI_DEVICE(PCI_VENDOR_ID_ARTOP, PCI_DEVICE_ID_ARTOP_8060) },
3193 { 0, },
3194 };
3195
3196 MODULE_DEVICE_TABLE(pci, atp870u_id_table);
3197
3198 static struct pci_driver atp870u_driver = {
3199 .id_table = atp870u_id_table,
3200 .name = "atp870u",
3201 .probe = atp870u_probe,
3202 .remove = __devexit_p(atp870u_remove),
3203 };
3204
3205 static int __init atp870u_init(void)
3206 {
3207 #ifdef ED_DBGP
3208 printk("atp870u_init: Entry\n");
3209 #endif
3210 return pci_register_driver(&atp870u_driver);
3211 }
3212
3213 static void __exit atp870u_exit(void)
3214 {
3215 #ifdef ED_DBGP
3216 printk("atp870u_exit: Entry\n");
3217 #endif
3218 pci_unregister_driver(&atp870u_driver);
3219 }
3220
3221 static void tscam_885(void)
3222 {
3223 unsigned char i;
3224
3225 for (i = 0; i < 0x2; i++) {
3226 mdelay(300);
3227 }
3228 return;
3229 }
3230
3231
3232
3233 static void is885(struct atp_unit *dev, unsigned int wkport,unsigned char c)
3234 {
3235 unsigned int tmport;
3236 unsigned char i, j, k, rmb, n, lvdmode;
3237 unsigned short int m;
3238 static unsigned char mbuf[512];
3239 static unsigned char satn[9] = {0, 0, 0, 0, 0, 0, 0, 6, 6};
3240 static unsigned char inqd[9] = {0x12, 0, 0, 0, 0x24, 0, 0, 0x24, 6};
3241 static unsigned char synn[6] = {0x80, 1, 3, 1, 0x19, 0x0e};
3242 unsigned char synu[6] = {0x80, 1, 3, 1, 0x0a, 0x0e};
3243 static unsigned char synw[6] = {0x80, 1, 3, 1, 0x19, 0x0e};
3244 unsigned char synuw[6] = {0x80, 1, 3, 1, 0x0a, 0x0e};
3245 static unsigned char wide[6] = {0x80, 1, 2, 3, 1, 0};
3246 static unsigned char u3[9] = { 0x80,1,6,4,0x09,00,0x0e,0x01,0x02 };
3247
3248 lvdmode=inb(wkport + 0x1b) >> 7;
3249
3250 for (i = 0; i < 16; i++) {
3251 m = 1;
3252 m = m << i;
3253 if ((m & dev->active_id[c]) != 0) {
3254 continue;
3255 }
3256 if (i == dev->host_id[c]) {
3257 printk(KERN_INFO " ID: %2d Host Adapter\n", dev->host_id[c]);
3258 continue;
3259 }
3260 tmport = wkport + 0x1b;
3261 outb(0x01, tmport);
3262 tmport = wkport + 0x01;
3263 outb(0x08, tmport++);
3264 outb(0x7f, tmport++);
3265 outb(satn[0], tmport++);
3266 outb(satn[1], tmport++);
3267 outb(satn[2], tmport++);
3268 outb(satn[3], tmport++);
3269 outb(satn[4], tmport++);
3270 outb(satn[5], tmport++);
3271 tmport += 0x06;
3272 outb(0, tmport);
3273 tmport += 0x02;
3274 outb(dev->id[c][i].devsp, tmport++);
3275
3276 outb(0, tmport++);
3277 outb(satn[6], tmport++);
3278 outb(satn[7], tmport++);
3279 j = i;
3280 if ((j & 0x08) != 0) {
3281 j = (j & 0x07) | 0x40;
3282 }
3283 outb(j, tmport);
3284 tmport += 0x03;
3285 outb(satn[8], tmport);
3286 tmport += 0x07;
3287
3288 while ((inb(tmport) & 0x80) == 0x00)
3289 cpu_relax();
3290 tmport -= 0x08;
3291 if ((inb(tmport) != 0x11) && (inb(tmport) != 0x8e)) {
3292 continue;
3293 }
3294 while (inb(tmport) != 0x8e)
3295 cpu_relax();
3296 dev->active_id[c] |= m;
3297
3298 tmport = wkport + 0x10;
3299 outb(0x30, tmport);
3300 tmport = wkport + 0x14;
3301 outb(0x00, tmport);
3302
3303 phase_cmd:
3304 tmport = wkport + 0x18;
3305 outb(0x08, tmport);
3306 tmport += 0x07;
3307 while ((inb(tmport) & 0x80) == 0x00)
3308 cpu_relax();
3309 tmport -= 0x08;
3310 j = inb(tmport);
3311 if (j != 0x16) {
3312 tmport = wkport + 0x10;
3313 outb(0x41, tmport);
3314 goto phase_cmd;
3315 }
3316 sel_ok:
3317 tmport = wkport + 0x03;
3318 outb(inqd[0], tmport++);
3319 outb(inqd[1], tmport++);
3320 outb(inqd[2], tmport++);
3321 outb(inqd[3], tmport++);
3322 outb(inqd[4], tmport++);
3323 outb(inqd[5], tmport);
3324 tmport += 0x07;
3325 outb(0, tmport);
3326 tmport += 0x02;
3327 outb(dev->id[c][i].devsp, tmport++);
3328 outb(0, tmport++);
3329 outb(inqd[6], tmport++);
3330 outb(inqd[7], tmport++);
3331 tmport += 0x03;
3332 outb(inqd[8], tmport);
3333 tmport += 0x07;
3334 while ((inb(tmport) & 0x80) == 0x00)
3335 cpu_relax();
3336 tmport -= 0x08;
3337 if ((inb(tmport) != 0x11) && (inb(tmport) != 0x8e)) {
3338 continue;
3339 }
3340 while (inb(tmport) != 0x8e)
3341 cpu_relax();
3342 tmport = wkport + 0x1b;
3343 outb(0x00, tmport);
3344 tmport = wkport + 0x18;
3345 outb(0x08, tmport);
3346 tmport += 0x07;
3347 j = 0;
3348 rd_inq_data:
3349 k = inb(tmport);
3350 if ((k & 0x01) != 0) {
3351 tmport -= 0x06;
3352 mbuf[j++] = inb(tmport);
3353 tmport += 0x06;
3354 goto rd_inq_data;
3355 }
3356 if ((k & 0x80) == 0) {
3357 goto rd_inq_data;
3358 }
3359 tmport -= 0x08;
3360 j = inb(tmport);
3361 if (j == 0x16) {
3362 goto inq_ok;
3363 }
3364 tmport = wkport + 0x10;
3365 outb(0x46, tmport);
3366 tmport += 0x02;
3367 outb(0, tmport++);
3368 outb(0, tmport++);
3369 outb(0, tmport++);
3370 tmport += 0x03;
3371 outb(0x08, tmport);
3372 tmport += 0x07;
3373 while ((inb(tmport) & 0x80) == 0x00)
3374 cpu_relax();
3375 tmport -= 0x08;
3376 if (inb(tmport) != 0x16) {
3377 goto sel_ok;
3378 }
3379 inq_ok:
3380 mbuf[36] = 0;
3381 printk( KERN_INFO" ID: %2d %s\n", i, &mbuf[8]);
3382 dev->id[c][i].devtype = mbuf[0];
3383 rmb = mbuf[1];
3384 n = mbuf[7];
3385 if ((mbuf[7] & 0x60) == 0) {
3386 goto not_wide;
3387 }
3388 if ((i < 8) && ((dev->global_map[c] & 0x20) == 0)) {
3389 goto not_wide;
3390 }
3391 if (lvdmode == 0) {
3392 goto chg_wide;
3393 }
3394 if (dev->sp[c][i] != 0x04) { // force u2
3395 goto chg_wide;
3396 }
3397
3398 tmport = wkport + 0x1b;
3399 outb(0x01, tmport);
3400 tmport = wkport + 0x03;
3401 outb(satn[0], tmport++);
3402 outb(satn[1], tmport++);
3403 outb(satn[2], tmport++);
3404 outb(satn[3], tmport++);
3405 outb(satn[4], tmport++);
3406 outb(satn[5], tmport++);
3407 tmport += 0x06;
3408 outb(0, tmport);
3409 tmport += 0x02;
3410 outb(dev->id[c][i].devsp, tmport++);
3411 outb(0, tmport++);
3412 outb(satn[6], tmport++);
3413 outb(satn[7], tmport++);
3414 tmport += 0x03;
3415 outb(satn[8], tmport);
3416 tmport += 0x07;
3417
3418 while ((inb(tmport) & 0x80) == 0x00)
3419 cpu_relax();
3420 tmport -= 0x08;
3421 if ((inb(tmport) != 0x11) && (inb(tmport) != 0x8e)) {
3422 continue;
3423 }
3424 while (inb(tmport) != 0x8e)
3425 cpu_relax();
3426 try_u3:
3427 j = 0;
3428 tmport = wkport + 0x14;
3429 outb(0x09, tmport);
3430 tmport += 0x04;
3431 outb(0x20, tmport);
3432 tmport += 0x07;
3433
3434 while ((inb(tmport) & 0x80) == 0) {
3435 if ((inb(tmport) & 0x01) != 0) {
3436 tmport -= 0x06;
3437 outb(u3[j++], tmport);
3438 tmport += 0x06;
3439 }
3440 cpu_relax();
3441 }
3442 tmport -= 0x08;
3443 while ((inb(tmport) & 0x80) == 0x00)
3444 cpu_relax();
3445 j = inb(tmport) & 0x0f;
3446 if (j == 0x0f) {
3447 goto u3p_in;
3448 }
3449 if (j == 0x0a) {
3450 goto u3p_cmd;
3451 }
3452 if (j == 0x0e) {
3453 goto try_u3;
3454 }
3455 continue;
3456 u3p_out:
3457 tmport = wkport + 0x18;
3458 outb(0x20, tmport);
3459 tmport += 0x07;
3460 while ((inb(tmport) & 0x80) == 0) {
3461 if ((inb(tmport) & 0x01) != 0) {
3462 tmport -= 0x06;
3463 outb(0, tmport);
3464 tmport += 0x06;
3465 }
3466 cpu_relax();
3467 }
3468 tmport -= 0x08;
3469 j = inb(tmport) & 0x0f;
3470 if (j == 0x0f) {
3471 goto u3p_in;
3472 }
3473 if (j == 0x0a) {
3474 goto u3p_cmd;
3475 }
3476 if (j == 0x0e) {
3477 goto u3p_out;
3478 }
3479 continue;
3480 u3p_in:
3481 tmport = wkport + 0x14;
3482 outb(0x09, tmport);
3483 tmport += 0x04;
3484 outb(0x20, tmport);
3485 tmport += 0x07;
3486 k = 0;
3487 u3p_in1:
3488 j = inb(tmport);
3489 if ((j & 0x01) != 0) {
3490 tmport -= 0x06;
3491 mbuf[k++] = inb(tmport);
3492 tmport += 0x06;
3493 goto u3p_in1;
3494 }
3495 if ((j & 0x80) == 0x00) {
3496 goto u3p_in1;
3497 }
3498 tmport -= 0x08;
3499 j = inb(tmport) & 0x0f;
3500 if (j == 0x0f) {
3501 goto u3p_in;
3502 }
3503 if (j == 0x0a) {
3504 goto u3p_cmd;
3505 }
3506 if (j == 0x0e) {
3507 goto u3p_out;
3508 }
3509 continue;
3510 u3p_cmd:
3511 tmport = wkport + 0x10;
3512 outb(0x30, tmport);
3513 tmport = wkport + 0x14;
3514 outb(0x00, tmport);
3515 tmport += 0x04;
3516 outb(0x08, tmport);
3517 tmport += 0x07;
3518 while ((inb(tmport) & 0x80) == 0x00);
3519 tmport -= 0x08;
3520 j = inb(tmport);
3521 if (j != 0x16) {
3522 if (j == 0x4e) {
3523 goto u3p_out;
3524 }
3525 continue;
3526 }
3527 if (mbuf[0] != 0x01) {
3528 goto chg_wide;
3529 }
3530 if (mbuf[1] != 0x06) {
3531 goto chg_wide;
3532 }
3533 if (mbuf[2] != 0x04) {
3534 goto chg_wide;
3535 }
3536 if (mbuf[3] == 0x09) {
3537 m = 1;
3538 m = m << i;
3539 dev->wide_id[c] |= m;
3540 dev->id[c][i].devsp = 0xce;
3541 #ifdef ED_DBGP
3542 printk("dev->id[%2d][%2d].devsp = %2x\n",c,i,dev->id[c][i].devsp);
3543 #endif
3544 continue;
3545 }
3546 chg_wide:
3547 tmport = wkport + 0x1b;
3548 outb(0x01, tmport);
3549 tmport = wkport + 0x03;
3550 outb(satn[0], tmport++);
3551 outb(satn[1], tmport++);
3552 outb(satn[2], tmport++);
3553 outb(satn[3], tmport++);
3554 outb(satn[4], tmport++);
3555 outb(satn[5], tmport++);
3556 tmport += 0x06;
3557 outb(0, tmport);
3558 tmport += 0x02;
3559 outb(dev->id[c][i].devsp, tmport++);
3560 outb(0, tmport++);
3561 outb(satn[6], tmport++);
3562 outb(satn[7], tmport++);
3563 tmport += 0x03;
3564 outb(satn[8], tmport);
3565 tmport += 0x07;
3566
3567 while ((inb(tmport) & 0x80) == 0x00)
3568 cpu_relax();
3569 tmport -= 0x08;
3570 if ((inb(tmport) != 0x11) && (inb(tmport) != 0x8e)) {
3571 continue;
3572 }
3573 while (inb(tmport) != 0x8e)
3574 cpu_relax();
3575 try_wide:
3576 j = 0;
3577 tmport = wkport + 0x14;
3578 outb(0x05, tmport);
3579 tmport += 0x04;
3580 outb(0x20, tmport);
3581 tmport += 0x07;
3582
3583 while ((inb(tmport) & 0x80) == 0) {
3584 if ((inb(tmport) & 0x01) != 0) {
3585 tmport -= 0x06;
3586 outb(wide[j++], tmport);
3587 tmport += 0x06;
3588 }
3589 cpu_relax();
3590 }
3591 tmport -= 0x08;
3592 while ((inb(tmport) & 0x80) == 0x00)
3593 cpu_relax();
3594 j = inb(tmport) & 0x0f;
3595 if (j == 0x0f) {
3596 goto widep_in;
3597 }
3598 if (j == 0x0a) {
3599 goto widep_cmd;
3600 }
3601 if (j == 0x0e) {
3602 goto try_wide;
3603 }
3604 continue;
3605 widep_out:
3606 tmport = wkport + 0x18;
3607 outb(0x20, tmport);
3608 tmport += 0x07;
3609 while ((inb(tmport) & 0x80) == 0) {
3610 if ((inb(tmport) & 0x01) != 0) {
3611 tmport -= 0x06;
3612 outb(0, tmport);
3613 tmport += 0x06;
3614 }
3615 cpu_relax();
3616 }
3617 tmport -= 0x08;
3618 j = inb(tmport) & 0x0f;
3619 if (j == 0x0f) {
3620 goto widep_in;
3621 }
3622 if (j == 0x0a) {
3623 goto widep_cmd;
3624 }
3625 if (j == 0x0e) {
3626 goto widep_out;
3627 }
3628 continue;
3629 widep_in:
3630 tmport = wkport + 0x14;
3631 outb(0xff, tmport);
3632 tmport += 0x04;
3633 outb(0x20, tmport);
3634 tmport += 0x07;
3635 k = 0;
3636 widep_in1:
3637 j = inb(tmport);
3638 if ((j & 0x01) != 0) {
3639 tmport -= 0x06;
3640 mbuf[k++] = inb(tmport);
3641 tmport += 0x06;
3642 goto widep_in1;
3643 }
3644 if ((j & 0x80) == 0x00) {
3645 goto widep_in1;
3646 }
3647 tmport -= 0x08;
3648 j = inb(tmport) & 0x0f;
3649 if (j == 0x0f) {
3650 goto widep_in;
3651 }
3652 if (j == 0x0a) {
3653 goto widep_cmd;
3654 }
3655 if (j == 0x0e) {
3656 goto widep_out;
3657 }
3658 continue;
3659 widep_cmd:
3660 tmport = wkport + 0x10;
3661 outb(0x30, tmport);
3662 tmport = wkport + 0x14;
3663 outb(0x00, tmport);
3664 tmport += 0x04;
3665 outb(0x08, tmport);
3666 tmport += 0x07;
3667 while ((inb(tmport) & 0x80) == 0x00)
3668 cpu_relax();
3669 tmport -= 0x08;
3670 j = inb(tmport);
3671 if (j != 0x16) {
3672 if (j == 0x4e) {
3673 goto widep_out;
3674 }
3675 continue;
3676 }
3677 if (mbuf[0] != 0x01) {
3678 goto not_wide;
3679 }
3680 if (mbuf[1] != 0x02) {
3681 goto not_wide;
3682 }
3683 if (mbuf[2] != 0x03) {
3684 goto not_wide;
3685 }
3686 if (mbuf[3] != 0x01) {
3687 goto not_wide;
3688 }
3689 m = 1;
3690 m = m << i;
3691 dev->wide_id[c] |= m;
3692 not_wide:
3693 if ((dev->id[c][i].devtype == 0x00) || (dev->id[c][i].devtype == 0x07) ||
3694 ((dev->id[c][i].devtype == 0x05) && ((n & 0x10) != 0))) {
3695 m = 1;
3696 m = m << i;
3697 if ((dev->async[c] & m) != 0) {
3698 goto set_sync;
3699 }
3700 }
3701 continue;
3702 set_sync:
3703 if (dev->sp[c][i] == 0x02) {
3704 synu[4]=0x0c;
3705 synuw[4]=0x0c;
3706 } else {
3707 if (dev->sp[c][i] >= 0x03) {
3708 synu[4]=0x0a;
3709 synuw[4]=0x0a;
3710 }
3711 }
3712 tmport = wkport + 0x1b;
3713 j = 0;
3714 if ((m & dev->wide_id[c]) != 0) {
3715 j |= 0x01;
3716 }
3717 outb(j, tmport);
3718 tmport = wkport + 0x03;
3719 outb(satn[0], tmport++);
3720 outb(satn[1], tmport++);
3721 outb(satn[2], tmport++);
3722 outb(satn[3], tmport++);
3723 outb(satn[4], tmport++);
3724 outb(satn[5], tmport++);
3725 tmport += 0x06;
3726 outb(0, tmport);
3727 tmport += 0x02;
3728 outb(dev->id[c][i].devsp, tmport++);
3729 outb(0, tmport++);
3730 outb(satn[6], tmport++);
3731 outb(satn[7], tmport++);
3732 tmport += 0x03;
3733 outb(satn[8], tmport);
3734 tmport += 0x07;
3735
3736 while ((inb(tmport) & 0x80) == 0x00)
3737 cpu_relax();
3738 tmport -= 0x08;
3739 if ((inb(tmport) != 0x11) && (inb(tmport) != 0x8e)) {
3740 continue;
3741 }
3742 while (inb(tmport) != 0x8e)
3743 cpu_relax();
3744 try_sync:
3745 j = 0;
3746 tmport = wkport + 0x14;
3747 outb(0x06, tmport);
3748 tmport += 0x04;
3749 outb(0x20, tmport);
3750 tmport += 0x07;
3751
3752 while ((inb(tmport) & 0x80) == 0) {
3753 if ((inb(tmport) & 0x01) != 0) {
3754 tmport -= 0x06;
3755 if ((m & dev->wide_id[c]) != 0) {
3756 if ((m & dev->ultra_map[c]) != 0) {
3757 outb(synuw[j++], tmport);
3758 } else {
3759 outb(synw[j++], tmport);
3760 }
3761 } else {
3762 if ((m & dev->ultra_map[c]) != 0) {
3763 outb(synu[j++], tmport);
3764 } else {
3765 outb(synn[j++], tmport);
3766 }
3767 }
3768 tmport += 0x06;
3769 }
3770 }
3771 tmport -= 0x08;
3772 while ((inb(tmport) & 0x80) == 0x00)
3773 cpu_relax();
3774 j = inb(tmport) & 0x0f;
3775 if (j == 0x0f) {
3776 goto phase_ins;
3777 }
3778 if (j == 0x0a) {
3779 goto phase_cmds;
3780 }
3781 if (j == 0x0e) {
3782 goto try_sync;
3783 }
3784 continue;
3785 phase_outs:
3786 tmport = wkport + 0x18;
3787 outb(0x20, tmport);
3788 tmport += 0x07;
3789 while ((inb(tmport) & 0x80) == 0x00) {
3790 if ((inb(tmport) & 0x01) != 0x00) {
3791 tmport -= 0x06;
3792 outb(0x00, tmport);
3793 tmport += 0x06;
3794 }
3795 cpu_relax();
3796 }
3797 tmport -= 0x08;
3798 j = inb(tmport);
3799 if (j == 0x85) {
3800 goto tar_dcons;
3801 }
3802 j &= 0x0f;
3803 if (j == 0x0f) {
3804 goto phase_ins;
3805 }
3806 if (j == 0x0a) {
3807 goto phase_cmds;
3808 }
3809 if (j == 0x0e) {
3810 goto phase_outs;
3811 }
3812 continue;
3813 phase_ins:
3814 tmport = wkport + 0x14;
3815 outb(0x06, tmport);
3816 tmport += 0x04;
3817 outb(0x20, tmport);
3818 tmport += 0x07;
3819 k = 0;
3820 phase_ins1:
3821 j = inb(tmport);
3822 if ((j & 0x01) != 0x00) {
3823 tmport -= 0x06;
3824 mbuf[k++] = inb(tmport);
3825 tmport += 0x06;
3826 goto phase_ins1;
3827 }
3828 if ((j & 0x80) == 0x00) {
3829 goto phase_ins1;
3830 }
3831 tmport -= 0x08;
3832 while ((inb(tmport) & 0x80) == 0x00);
3833 j = inb(tmport);
3834 if (j == 0x85) {
3835 goto tar_dcons;
3836 }
3837 j &= 0x0f;
3838 if (j == 0x0f) {
3839 goto phase_ins;
3840 }
3841 if (j == 0x0a) {
3842 goto phase_cmds;
3843 }
3844 if (j == 0x0e) {
3845 goto phase_outs;
3846 }
3847 continue;
3848 phase_cmds:
3849 tmport = wkport + 0x10;
3850 outb(0x30, tmport);
3851 tar_dcons:
3852 tmport = wkport + 0x14;
3853 outb(0x00, tmport);
3854 tmport += 0x04;
3855 outb(0x08, tmport);
3856 tmport += 0x07;
3857 while ((inb(tmport) & 0x80) == 0x00)
3858 cpu_relax();
3859 tmport -= 0x08;
3860 j = inb(tmport);
3861 if (j != 0x16) {
3862 continue;
3863 }
3864 if (mbuf[0] != 0x01) {
3865 continue;
3866 }
3867 if (mbuf[1] != 0x03) {
3868 continue;
3869 }
3870 if (mbuf[4] == 0x00) {
3871 continue;
3872 }
3873 if (mbuf[3] > 0x64) {
3874 continue;
3875 }
3876 if (mbuf[4] > 0x0e) {
3877 mbuf[4] = 0x0e;
3878 }
3879 dev->id[c][i].devsp = mbuf[4];
3880 if (mbuf[3] < 0x0c){
3881 j = 0xb0;
3882 goto set_syn_ok;
3883 }
3884 if ((mbuf[3] < 0x0d) && (rmb == 0)) {
3885 j = 0xa0;
3886 goto set_syn_ok;
3887 }
3888 if (mbuf[3] < 0x1a) {
3889 j = 0x20;
3890 goto set_syn_ok;
3891 }
3892 if (mbuf[3] < 0x33) {
3893 j = 0x40;
3894 goto set_syn_ok;
3895 }
3896 if (mbuf[3] < 0x4c) {
3897 j = 0x50;
3898 goto set_syn_ok;
3899 }
3900 j = 0x60;
3901 set_syn_ok:
3902 dev->id[c][i].devsp = (dev->id[c][i].devsp & 0x0f) | j;
3903 #ifdef ED_DBGP
3904 printk("dev->id[%2d][%2d].devsp = %2x\n",c,i,dev->id[c][i].devsp);
3905 #endif
3906 }
3907 tmport = wkport + 0x16;
3908 outb(0x80, tmport);
3909 }
3910
3911 module_init(atp870u_init);
3912 module_exit(atp870u_exit);
3913
Linux with added FPC-III support