1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20#include <linux/module.h>
21#include <linux/init.h>
22#include <linux/interrupt.h>
23#include <linux/kernel.h>
24#include <linux/types.h>
25#include <linux/string.h>
26#include <linux/ioport.h>
27#include <linux/delay.h>
28#include <linux/proc_fs.h>
29#include <linux/spinlock.h>
30#include <linux/pci.h>
31#include <linux/blkdev.h>
32#include <linux/dma-mapping.h>
33#include <linux/slab.h>
34#include <asm/io.h>
35
36#include <scsi/scsi.h>
37#include <scsi/scsi_cmnd.h>
38#include <scsi/scsi_device.h>
39#include <scsi/scsi_host.h>
40
41#include "atp870u.h"
42
43static struct scsi_host_template atp870u_template;
44static void send_s870(struct atp_unit *dev,unsigned char c);
45static void atp_is(struct atp_unit *dev, unsigned char c, bool wide_chip,
46 unsigned char lvdmode);
47
48static inline void atp_writeb_base(struct atp_unit *atp, u8 reg, u8 val)
49{
50 outb(val, atp->baseport + reg);
51}
52
53static inline void atp_writew_base(struct atp_unit *atp, u8 reg, u16 val)
54{
55 outw(val, atp->baseport + reg);
56}
57
58static inline void atp_writeb_io(struct atp_unit *atp, u8 channel, u8 reg, u8 val)
59{
60 outb(val, atp->ioport[channel] + reg);
61}
62
63static inline void atp_writew_io(struct atp_unit *atp, u8 channel, u8 reg, u16 val)
64{
65 outw(val, atp->ioport[channel] + reg);
66}
67
68static inline void atp_writeb_pci(struct atp_unit *atp, u8 channel, u8 reg, u8 val)
69{
70 outb(val, atp->pciport[channel] + reg);
71}
72
73static inline void atp_writel_pci(struct atp_unit *atp, u8 channel, u8 reg, u32 val)
74{
75 outl(val, atp->pciport[channel] + reg);
76}
77
78static inline u8 atp_readb_base(struct atp_unit *atp, u8 reg)
79{
80 return inb(atp->baseport + reg);
81}
82
83static inline u16 atp_readw_base(struct atp_unit *atp, u8 reg)
84{
85 return inw(atp->baseport + reg);
86}
87
88static inline u32 atp_readl_base(struct atp_unit *atp, u8 reg)
89{
90 return inl(atp->baseport + reg);
91}
92
93static inline u8 atp_readb_io(struct atp_unit *atp, u8 channel, u8 reg)
94{
95 return inb(atp->ioport[channel] + reg);
96}
97
98static inline u16 atp_readw_io(struct atp_unit *atp, u8 channel, u8 reg)
99{
100 return inw(atp->ioport[channel] + reg);
101}
102
103static inline u8 atp_readb_pci(struct atp_unit *atp, u8 channel, u8 reg)
104{
105 return inb(atp->pciport[channel] + reg);
106}
107
108static inline bool is880(struct atp_unit *atp)
109{
110 return atp->pdev->device == ATP880_DEVID1 ||
111 atp->pdev->device == ATP880_DEVID2;
112}
113
114static inline bool is885(struct atp_unit *atp)
115{
116 return atp->pdev->device == ATP885_DEVID;
117}
118
119static irqreturn_t atp870u_intr_handle(int irq, void *dev_id)
120{
121 unsigned long flags;
122 unsigned short int id;
123 unsigned char i, j, c, target_id, lun,cmdp;
124 unsigned char *prd;
125 struct scsi_cmnd *workreq;
126 unsigned long adrcnt, k;
127#ifdef ED_DBGP
128 unsigned long l;
129#endif
130 struct Scsi_Host *host = dev_id;
131 struct atp_unit *dev = (struct atp_unit *)&host->hostdata;
132
133 for (c = 0; c < 2; c++) {
134 j = atp_readb_io(dev, c, 0x1f);
135 if ((j & 0x80) != 0)
136 break;
137 dev->in_int[c] = 0;
138 }
139 if ((j & 0x80) == 0)
140 return IRQ_NONE;
141#ifdef ED_DBGP
142 printk("atp870u_intr_handle enter\n");
143#endif
144 dev->in_int[c] = 1;
145 cmdp = atp_readb_io(dev, c, 0x10);
146 if (dev->working[c] != 0) {
147 if (is885(dev)) {
148 if ((atp_readb_io(dev, c, 0x16) & 0x80) == 0)
149 atp_writeb_io(dev, c, 0x16,
150 (atp_readb_io(dev, c, 0x16) | 0x80));
151 }
152 if ((atp_readb_pci(dev, c, 0x00) & 0x08) != 0)
153 {
154 for (k=0; k < 1000; k++) {
155 if ((atp_readb_pci(dev, c, 2) & 0x08) == 0)
156 break;
157 if ((atp_readb_pci(dev, c, 2) & 0x01) == 0)
158 break;
159 }
160 }
161 atp_writeb_pci(dev, c, 0, 0x00);
162
163 i = atp_readb_io(dev, c, 0x17);
164
165 if (is885(dev))
166 atp_writeb_pci(dev, c, 2, 0x06);
167
168 target_id = atp_readb_io(dev, c, 0x15);
169
170
171
172
173
174 if ((target_id & 0x40) != 0) {
175 target_id = (target_id & 0x07) | 0x08;
176 } else {
177 target_id &= 0x07;
178 }
179
180 if ((j & 0x40) != 0) {
181 if (dev->last_cmd[c] == 0xff) {
182 dev->last_cmd[c] = target_id;
183 }
184 dev->last_cmd[c] |= 0x40;
185 }
186 if (is885(dev))
187 dev->r1f[c][target_id] |= j;
188#ifdef ED_DBGP
189 printk("atp870u_intr_handle status = %x\n",i);
190#endif
191 if (i == 0x85) {
192 if ((dev->last_cmd[c] & 0xf0) != 0x40) {
193 dev->last_cmd[c] = 0xff;
194 }
195 if (is885(dev)) {
196 adrcnt = 0;
197 ((unsigned char *) &adrcnt)[2] =
198 atp_readb_io(dev, c, 0x12);
199 ((unsigned char *) &adrcnt)[1] =
200 atp_readb_io(dev, c, 0x13);
201 ((unsigned char *) &adrcnt)[0] =
202 atp_readb_io(dev, c, 0x14);
203 if (dev->id[c][target_id].last_len != adrcnt) {
204 k = dev->id[c][target_id].last_len;
205 k -= adrcnt;
206 dev->id[c][target_id].tran_len = k;
207 dev->id[c][target_id].last_len = adrcnt;
208 }
209#ifdef ED_DBGP
210 printk("dev->id[c][target_id].last_len = %d "
211 "dev->id[c][target_id].tran_len = %d\n",
212 dev->id[c][target_id].last_len,
213 dev->id[c][target_id].tran_len);
214#endif
215 }
216
217
218
219
220 if (dev->wide_id[c] != 0) {
221 atp_writeb_io(dev, c, 0x1b, 0x01);
222 while ((atp_readb_io(dev, c, 0x1b) & 0x01) != 0x01)
223 atp_writeb_io(dev, c, 0x1b, 0x01);
224 }
225
226
227
228 spin_lock_irqsave(dev->host->host_lock, flags);
229 if (((dev->quhd[c] != dev->quend[c]) ||
230 (dev->last_cmd[c] != 0xff)) &&
231 (dev->in_snd[c] == 0)) {
232#ifdef ED_DBGP
233 printk("Call sent_s870\n");
234#endif
235 send_s870(dev,c);
236 }
237 spin_unlock_irqrestore(dev->host->host_lock, flags);
238
239
240
241 dev->in_int[c] = 0;
242#ifdef ED_DBGP
243 printk("Status 0x85 return\n");
244#endif
245 return IRQ_HANDLED;
246 }
247
248 if (i == 0x40) {
249 dev->last_cmd[c] |= 0x40;
250 dev->in_int[c] = 0;
251 return IRQ_HANDLED;
252 }
253
254 if (i == 0x21) {
255 if ((dev->last_cmd[c] & 0xf0) != 0x40) {
256 dev->last_cmd[c] = 0xff;
257 }
258 adrcnt = 0;
259 ((unsigned char *) &adrcnt)[2] =
260 atp_readb_io(dev, c, 0x12);
261 ((unsigned char *) &adrcnt)[1] =
262 atp_readb_io(dev, c, 0x13);
263 ((unsigned char *) &adrcnt)[0] =
264 atp_readb_io(dev, c, 0x14);
265 k = dev->id[c][target_id].last_len;
266 k -= adrcnt;
267 dev->id[c][target_id].tran_len = k;
268 dev->id[c][target_id].last_len = adrcnt;
269 atp_writeb_io(dev, c, 0x10, 0x41);
270 atp_writeb_io(dev, c, 0x18, 0x08);
271 dev->in_int[c] = 0;
272 return IRQ_HANDLED;
273 }
274
275 if (is885(dev)) {
276 if ((i == 0x4c) || (i == 0x4d) || (i == 0x8c) || (i == 0x8d)) {
277 if ((i == 0x4c) || (i == 0x8c))
278 i=0x48;
279 else
280 i=0x49;
281 }
282 }
283 if ((i == 0x80) || (i == 0x8f)) {
284#ifdef ED_DBGP
285 printk(KERN_DEBUG "Device reselect\n");
286#endif
287 lun = 0;
288 if (cmdp == 0x44 || i == 0x80)
289 lun = atp_readb_io(dev, c, 0x1d) & 0x07;
290 else {
291 if ((dev->last_cmd[c] & 0xf0) != 0x40) {
292 dev->last_cmd[c] = 0xff;
293 }
294 if (cmdp == 0x41) {
295#ifdef ED_DBGP
296 printk("cmdp = 0x41\n");
297#endif
298 adrcnt = 0;
299 ((unsigned char *) &adrcnt)[2] =
300 atp_readb_io(dev, c, 0x12);
301 ((unsigned char *) &adrcnt)[1] =
302 atp_readb_io(dev, c, 0x13);
303 ((unsigned char *) &adrcnt)[0] =
304 atp_readb_io(dev, c, 0x14);
305 k = dev->id[c][target_id].last_len;
306 k -= adrcnt;
307 dev->id[c][target_id].tran_len = k;
308 dev->id[c][target_id].last_len = adrcnt;
309 atp_writeb_io(dev, c, 0x18, 0x08);
310 dev->in_int[c] = 0;
311 return IRQ_HANDLED;
312 } else {
313#ifdef ED_DBGP
314 printk("cmdp != 0x41\n");
315#endif
316 atp_writeb_io(dev, c, 0x10, 0x46);
317 dev->id[c][target_id].dirct = 0x00;
318 atp_writeb_io(dev, c, 0x12, 0x00);
319 atp_writeb_io(dev, c, 0x13, 0x00);
320 atp_writeb_io(dev, c, 0x14, 0x00);
321 atp_writeb_io(dev, c, 0x18, 0x08);
322 dev->in_int[c] = 0;
323 return IRQ_HANDLED;
324 }
325 }
326 if (dev->last_cmd[c] != 0xff) {
327 dev->last_cmd[c] |= 0x40;
328 }
329 if (is885(dev)) {
330 j = atp_readb_base(dev, 0x29) & 0xfe;
331 atp_writeb_base(dev, 0x29, j);
332 } else
333 atp_writeb_io(dev, c, 0x10, 0x45);
334
335 target_id = atp_readb_io(dev, c, 0x16);
336
337
338
339 if ((target_id & 0x10) != 0) {
340 target_id = (target_id & 0x07) | 0x08;
341 } else {
342 target_id &= 0x07;
343 }
344 if (is885(dev))
345 atp_writeb_io(dev, c, 0x10, 0x45);
346 workreq = dev->id[c][target_id].curr_req;
347#ifdef ED_DBGP
348 scmd_printk(KERN_DEBUG, workreq, "CDB");
349 for (l = 0; l < workreq->cmd_len; l++)
350 printk(KERN_DEBUG " %x",workreq->cmnd[l]);
351 printk("\n");
352#endif
353
354 atp_writeb_io(dev, c, 0x0f, lun);
355 atp_writeb_io(dev, c, 0x11, dev->id[c][target_id].devsp);
356 adrcnt = dev->id[c][target_id].tran_len;
357 k = dev->id[c][target_id].last_len;
358
359 atp_writeb_io(dev, c, 0x12, ((unsigned char *) &k)[2]);
360 atp_writeb_io(dev, c, 0x13, ((unsigned char *) &k)[1]);
361 atp_writeb_io(dev, c, 0x14, ((unsigned char *) &k)[0]);
362#ifdef ED_DBGP
363 printk("k %x, k[0] 0x%x k[1] 0x%x k[2] 0x%x\n", k,
364 atp_readb_io(dev, c, 0x14),
365 atp_readb_io(dev, c, 0x13),
366 atp_readb_io(dev, c, 0x12));
367#endif
368
369 j = target_id;
370 if (target_id > 7) {
371 j = (j & 0x07) | 0x40;
372 }
373
374 j |= dev->id[c][target_id].dirct;
375 atp_writeb_io(dev, c, 0x15, j);
376 atp_writeb_io(dev, c, 0x16, 0x80);
377
378
379 if (is885(dev)) {
380 i = atp_readb_pci(dev, c, 1) & 0xf3;
381
382 if ((workreq->cmnd[0] == READ_6) ||
383 (workreq->cmnd[0] == READ_10) ||
384 (workreq->cmnd[0] == WRITE_6) ||
385 (workreq->cmnd[0] == WRITE_10)) {
386 i |= 0x0c;
387 }
388 atp_writeb_pci(dev, c, 1, i);
389 } else if (is880(dev)) {
390 if ((workreq->cmnd[0] == READ_6) ||
391 (workreq->cmnd[0] == READ_10) ||
392 (workreq->cmnd[0] == WRITE_6) ||
393 (workreq->cmnd[0] == WRITE_10))
394 atp_writeb_base(dev, 0x3b,
395 (atp_readb_base(dev, 0x3b) & 0x3f) | 0xc0);
396 else
397 atp_writeb_base(dev, 0x3b,
398 atp_readb_base(dev, 0x3b) & 0x3f);
399 } else {
400 if ((workreq->cmnd[0] == READ_6) ||
401 (workreq->cmnd[0] == READ_10) ||
402 (workreq->cmnd[0] == WRITE_6) ||
403 (workreq->cmnd[0] == WRITE_10))
404 atp_writeb_base(dev, 0x3a,
405 (atp_readb_base(dev, 0x3a) & 0xf3) | 0x08);
406 else
407 atp_writeb_base(dev, 0x3a,
408 atp_readb_base(dev, 0x3a) & 0xf3);
409 }
410 j = 0;
411 id = 1;
412 id = id << target_id;
413
414
415
416 if ((id & dev->wide_id[c]) != 0) {
417 j |= 0x01;
418 }
419 atp_writeb_io(dev, c, 0x1b, j);
420 while ((atp_readb_io(dev, c, 0x1b) & 0x01) != j)
421 atp_writeb_io(dev, c, 0x1b, j);
422 if (dev->id[c][target_id].last_len == 0) {
423 atp_writeb_io(dev, c, 0x18, 0x08);
424 dev->in_int[c] = 0;
425#ifdef ED_DBGP
426 printk("dev->id[c][target_id].last_len = 0\n");
427#endif
428 return IRQ_HANDLED;
429 }
430#ifdef ED_DBGP
431 printk("target_id = %d adrcnt = %d\n",target_id,adrcnt);
432#endif
433 prd = dev->id[c][target_id].prd_pos;
434 while (adrcnt != 0) {
435 id = ((unsigned short int *)prd)[2];
436 if (id == 0) {
437 k = 0x10000;
438 } else {
439 k = id;
440 }
441 if (k > adrcnt) {
442 ((unsigned short int *)prd)[2] =
443 (unsigned short int)(k - adrcnt);
444 ((unsigned long *)prd)[0] += adrcnt;
445 adrcnt = 0;
446 dev->id[c][target_id].prd_pos = prd;
447 } else {
448 adrcnt -= k;
449 dev->id[c][target_id].prdaddr += 0x08;
450 prd += 0x08;
451 if (adrcnt == 0) {
452 dev->id[c][target_id].prd_pos = prd;
453 }
454 }
455 }
456 atp_writel_pci(dev, c, 0x04, dev->id[c][target_id].prdaddr);
457#ifdef ED_DBGP
458 printk("dev->id[%d][%d].prdaddr 0x%8x\n",
459 c, target_id, dev->id[c][target_id].prdaddr);
460#endif
461 if (!is885(dev)) {
462 atp_writeb_pci(dev, c, 2, 0x06);
463 atp_writeb_pci(dev, c, 2, 0x00);
464 }
465
466
467
468 if (dev->id[c][target_id].dirct != 0) {
469 atp_writeb_io(dev, c, 0x18, 0x08);
470 atp_writeb_pci(dev, c, 0, 0x01);
471 dev->in_int[c] = 0;
472#ifdef ED_DBGP
473 printk("status 0x80 return dirct != 0\n");
474#endif
475 return IRQ_HANDLED;
476 }
477 atp_writeb_io(dev, c, 0x18, 0x08);
478 atp_writeb_pci(dev, c, 0, 0x09);
479 dev->in_int[c] = 0;
480#ifdef ED_DBGP
481 printk("status 0x80 return dirct = 0\n");
482#endif
483 return IRQ_HANDLED;
484 }
485
486
487
488
489
490 workreq = dev->id[c][target_id].curr_req;
491
492 if (i == 0x42 || i == 0x16) {
493 if ((dev->last_cmd[c] & 0xf0) != 0x40) {
494 dev->last_cmd[c] = 0xff;
495 }
496 if (i == 0x16) {
497 workreq->result = atp_readb_io(dev, c, 0x0f);
498 if (((dev->r1f[c][target_id] & 0x10) != 0) && is885(dev)) {
499 printk(KERN_WARNING "AEC67162 CRC ERROR !\n");
500 workreq->result = SAM_STAT_CHECK_CONDITION;
501 }
502 } else
503 workreq->result = SAM_STAT_CHECK_CONDITION;
504
505 if (is885(dev)) {
506 j = atp_readb_base(dev, 0x29) | 0x01;
507 atp_writeb_base(dev, 0x29, j);
508 }
509
510
511
512 scsi_dma_unmap(workreq);
513
514 spin_lock_irqsave(dev->host->host_lock, flags);
515 (*workreq->scsi_done) (workreq);
516#ifdef ED_DBGP
517 printk("workreq->scsi_done\n");
518#endif
519
520
521
522 dev->id[c][target_id].curr_req = NULL;
523 dev->working[c]--;
524 spin_unlock_irqrestore(dev->host->host_lock, flags);
525
526
527
528 if (dev->wide_id[c] != 0) {
529 atp_writeb_io(dev, c, 0x1b, 0x01);
530 while ((atp_readb_io(dev, c, 0x1b) & 0x01) != 0x01)
531 atp_writeb_io(dev, c, 0x1b, 0x01);
532 }
533
534
535
536 spin_lock_irqsave(dev->host->host_lock, flags);
537 if (((dev->last_cmd[c] != 0xff) ||
538 (dev->quhd[c] != dev->quend[c])) &&
539 (dev->in_snd[c] == 0)) {
540#ifdef ED_DBGP
541 printk("Call sent_s870(scsi_done)\n");
542#endif
543 send_s870(dev,c);
544 }
545 spin_unlock_irqrestore(dev->host->host_lock, flags);
546 dev->in_int[c] = 0;
547 return IRQ_HANDLED;
548 }
549 if ((dev->last_cmd[c] & 0xf0) != 0x40) {
550 dev->last_cmd[c] = 0xff;
551 }
552 if (i == 0x4f) {
553 i = 0x89;
554 }
555 i &= 0x0f;
556 if (i == 0x09) {
557 atp_writel_pci(dev, c, 4, dev->id[c][target_id].prdaddr);
558 atp_writeb_pci(dev, c, 2, 0x06);
559 atp_writeb_pci(dev, c, 2, 0x00);
560 atp_writeb_io(dev, c, 0x10, 0x41);
561 if (is885(dev)) {
562 k = dev->id[c][target_id].last_len;
563 atp_writeb_io(dev, c, 0x12,
564 ((unsigned char *) (&k))[2]);
565 atp_writeb_io(dev, c, 0x13,
566 ((unsigned char *) (&k))[1]);
567 atp_writeb_io(dev, c, 0x14,
568 ((unsigned char *) (&k))[0]);
569 dev->id[c][target_id].dirct = 0x00;
570 } else {
571 dev->id[c][target_id].dirct = 0x00;
572 }
573 atp_writeb_io(dev, c, 0x18, 0x08);
574 atp_writeb_pci(dev, c, 0, 0x09);
575 dev->in_int[c] = 0;
576 return IRQ_HANDLED;
577 }
578 if (i == 0x08) {
579 atp_writel_pci(dev, c, 4, dev->id[c][target_id].prdaddr);
580 atp_writeb_pci(dev, c, 2, 0x06);
581 atp_writeb_pci(dev, c, 2, 0x00);
582 atp_writeb_io(dev, c, 0x10, 0x41);
583 if (is885(dev)) {
584 k = dev->id[c][target_id].last_len;
585 atp_writeb_io(dev, c, 0x12,
586 ((unsigned char *) (&k))[2]);
587 atp_writeb_io(dev, c, 0x13,
588 ((unsigned char *) (&k))[1]);
589 atp_writeb_io(dev, c, 0x14,
590 ((unsigned char *) (&k))[0]);
591 }
592 atp_writeb_io(dev, c, 0x15,
593 atp_readb_io(dev, c, 0x15) | 0x20);
594 dev->id[c][target_id].dirct = 0x20;
595 atp_writeb_io(dev, c, 0x18, 0x08);
596 atp_writeb_pci(dev, c, 0, 0x01);
597 dev->in_int[c] = 0;
598 return IRQ_HANDLED;
599 }
600 if (i == 0x0a)
601 atp_writeb_io(dev, c, 0x10, 0x30);
602 else
603 atp_writeb_io(dev, c, 0x10, 0x46);
604 dev->id[c][target_id].dirct = 0x00;
605 atp_writeb_io(dev, c, 0x12, 0x00);
606 atp_writeb_io(dev, c, 0x13, 0x00);
607 atp_writeb_io(dev, c, 0x14, 0x00);
608 atp_writeb_io(dev, c, 0x18, 0x08);
609 }
610 dev->in_int[c] = 0;
611
612 return IRQ_HANDLED;
613}
614
615
616
617
618
619
620
621static int atp870u_queuecommand_lck(struct scsi_cmnd *req_p,
622 void (*done) (struct scsi_cmnd *))
623{
624 unsigned char c;
625 unsigned int m;
626 struct atp_unit *dev;
627 struct Scsi_Host *host;
628
629 c = scmd_channel(req_p);
630 req_p->sense_buffer[0]=0;
631 scsi_set_resid(req_p, 0);
632 if (scmd_channel(req_p) > 1) {
633 req_p->result = DID_BAD_TARGET << 16;
634 done(req_p);
635#ifdef ED_DBGP
636 printk("atp870u_queuecommand : req_p->device->channel > 1\n");
637#endif
638 return 0;
639 }
640
641 host = req_p->device->host;
642 dev = (struct atp_unit *)&host->hostdata;
643
644 m = 1;
645 m = m << scmd_id(req_p);
646
647
648
649
650
651 if ((m & dev->active_id[c]) == 0) {
652 req_p->result = DID_BAD_TARGET << 16;
653 done(req_p);
654 return 0;
655 }
656
657 if (done) {
658 req_p->scsi_done = done;
659 } else {
660#ifdef ED_DBGP
661 printk( "atp870u_queuecommand: done can't be NULL\n");
662#endif
663 req_p->result = 0;
664 done(req_p);
665 return 0;
666 }
667
668
669
670
671 dev->quend[c]++;
672 if (dev->quend[c] >= qcnt) {
673 dev->quend[c] = 0;
674 }
675
676
677
678
679 if (dev->quhd[c] == dev->quend[c]) {
680 if (dev->quend[c] == 0) {
681 dev->quend[c] = qcnt;
682 }
683#ifdef ED_DBGP
684 printk("atp870u_queuecommand : dev->quhd[c] == dev->quend[c]\n");
685#endif
686 dev->quend[c]--;
687 req_p->result = DID_BUS_BUSY << 16;
688 done(req_p);
689 return 0;
690 }
691 dev->quereq[c][dev->quend[c]] = req_p;
692#ifdef ED_DBGP
693 printk("dev->ioport[c] = %x atp_readb_io(dev, c, 0x1c) = %x "
694 "dev->in_int[%d] = %d dev->in_snd[%d] = %d\n",
695 dev->ioport[c], atp_readb_io(dev, c, 0x1c), c,
696 dev->in_int[c],c,dev->in_snd[c]);
697#endif
698 if ((atp_readb_io(dev, c, 0x1c) == 0) &&
699 (dev->in_int[c] == 0) &&
700 (dev->in_snd[c] == 0)) {
701#ifdef ED_DBGP
702 printk("Call sent_s870(atp870u_queuecommand)\n");
703#endif
704 send_s870(dev,c);
705 }
706#ifdef ED_DBGP
707 printk("atp870u_queuecommand : exit\n");
708#endif
709 return 0;
710}
711
712static DEF_SCSI_QCMD(atp870u_queuecommand)
713
714
715
716
717
718
719
720
721
722static void send_s870(struct atp_unit *dev, unsigned char c)
723{
724 struct scsi_cmnd *workreq = NULL;
725 unsigned int i;
726 unsigned char j, target_id;
727 unsigned char *prd;
728 unsigned short int w;
729 unsigned long l, bttl = 0;
730 unsigned long sg_count;
731
732 if (dev->in_snd[c] != 0) {
733#ifdef ED_DBGP
734 printk("cmnd in_snd\n");
735#endif
736 return;
737 }
738#ifdef ED_DBGP
739 printk("Sent_s870 enter\n");
740#endif
741 dev->in_snd[c] = 1;
742 if ((dev->last_cmd[c] != 0xff) && ((dev->last_cmd[c] & 0x40) != 0)) {
743 dev->last_cmd[c] &= 0x0f;
744 workreq = dev->id[c][dev->last_cmd[c]].curr_req;
745 if (!workreq) {
746 dev->last_cmd[c] = 0xff;
747 if (dev->quhd[c] == dev->quend[c]) {
748 dev->in_snd[c] = 0;
749 return;
750 }
751 }
752 }
753 if (!workreq) {
754 if ((dev->last_cmd[c] != 0xff) && (dev->working[c] != 0)) {
755 dev->in_snd[c] = 0;
756 return;
757 }
758 dev->working[c]++;
759 j = dev->quhd[c];
760 dev->quhd[c]++;
761 if (dev->quhd[c] >= qcnt)
762 dev->quhd[c] = 0;
763 workreq = dev->quereq[c][dev->quhd[c]];
764 if (dev->id[c][scmd_id(workreq)].curr_req != NULL) {
765 dev->quhd[c] = j;
766 dev->working[c]--;
767 dev->in_snd[c] = 0;
768 return;
769 }
770 dev->id[c][scmd_id(workreq)].curr_req = workreq;
771 dev->last_cmd[c] = scmd_id(workreq);
772 }
773 if ((atp_readb_io(dev, c, 0x1f) & 0xb0) != 0 ||
774 atp_readb_io(dev, c, 0x1c) != 0) {
775#ifdef ED_DBGP
776 printk("Abort to Send\n");
777#endif
778 dev->last_cmd[c] |= 0x40;
779 dev->in_snd[c] = 0;
780 return;
781 }
782#ifdef ED_DBGP
783 printk("OK to Send\n");
784 scmd_printk(KERN_DEBUG, workreq, "CDB");
785 for(i=0;i<workreq->cmd_len;i++) {
786 printk(" %x",workreq->cmnd[i]);
787 }
788 printk("\n");
789#endif
790 l = scsi_bufflen(workreq);
791
792 if (is885(dev)) {
793 j = atp_readb_base(dev, 0x29) & 0xfe;
794 atp_writeb_base(dev, 0x29, j);
795 dev->r1f[c][scmd_id(workreq)] = 0;
796 }
797
798 if (workreq->cmnd[0] == READ_CAPACITY) {
799 if (l > 8)
800 l = 8;
801 }
802 if (workreq->cmnd[0] == TEST_UNIT_READY) {
803 l = 0;
804 }
805
806 j = 0;
807 target_id = scmd_id(workreq);
808
809
810
811
812 w = 1;
813 w = w << target_id;
814 if ((w & dev->wide_id[c]) != 0) {
815 j |= 0x01;
816 }
817 atp_writeb_io(dev, c, 0x1b, j);
818 while ((atp_readb_io(dev, c, 0x1b) & 0x01) != j) {
819 atp_writeb_pci(dev, c, 0x1b, j);
820#ifdef ED_DBGP
821 printk("send_s870 while loop 1\n");
822#endif
823 }
824
825
826
827
828 atp_writeb_io(dev, c, 0x00, workreq->cmd_len);
829 atp_writeb_io(dev, c, 0x01, 0x2c);
830 if (is885(dev))
831 atp_writeb_io(dev, c, 0x02, 0x7f);
832 else
833 atp_writeb_io(dev, c, 0x02, 0xcf);
834 for (i = 0; i < workreq->cmd_len; i++)
835 atp_writeb_io(dev, c, 0x03 + i, workreq->cmnd[i]);
836 atp_writeb_io(dev, c, 0x0f, workreq->device->lun);
837
838
839
840 atp_writeb_io(dev, c, 0x11, dev->id[c][target_id].devsp);
841#ifdef ED_DBGP
842 printk("dev->id[%d][%d].devsp = %2x\n",c,target_id,
843 dev->id[c][target_id].devsp);
844#endif
845
846 sg_count = scsi_dma_map(workreq);
847
848
849
850 atp_writeb_io(dev, c, 0x12, ((unsigned char *) (&l))[2]);
851 atp_writeb_io(dev, c, 0x13, ((unsigned char *) (&l))[1]);
852 atp_writeb_io(dev, c, 0x14, ((unsigned char *) (&l))[0]);
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
861
862 if ((j & 0x08) != 0) {
863 j = (j & 0x07) | 0x40;
864 }
865
866
867
868 if (workreq->sc_data_direction == DMA_TO_DEVICE)
869 atp_writeb_io(dev, c, 0x15, j | 0x20);
870 else
871 atp_writeb_io(dev, c, 0x15, j);
872 atp_writeb_io(dev, c, 0x16, atp_readb_io(dev, c, 0x16) | 0x80);
873 atp_writeb_io(dev, c, 0x16, 0x80);
874 dev->id[c][target_id].dirct = 0;
875 if (l == 0) {
876 if (atp_readb_io(dev, c, 0x1c) == 0) {
877#ifdef ED_DBGP
878 printk("change SCSI_CMD_REG 0x08\n");
879#endif
880 atp_writeb_io(dev, c, 0x18, 0x08);
881 } else
882 dev->last_cmd[c] |= 0x40;
883 dev->in_snd[c] = 0;
884 return;
885 }
886 prd = dev->id[c][target_id].prd_table;
887 dev->id[c][target_id].prd_pos = prd;
888
889
890
891
892
893
894 if (l) {
895 struct scatterlist *sgpnt;
896 i = 0;
897 scsi_for_each_sg(workreq, sgpnt, sg_count, j) {
898 bttl = sg_dma_address(sgpnt);
899 l=sg_dma_len(sgpnt);
900#ifdef ED_DBGP
901 printk("1. bttl %x, l %x\n",bttl, l);
902#endif
903 while (l > 0x10000) {
904 (((u16 *) (prd))[i + 3]) = 0x0000;
905 (((u16 *) (prd))[i + 2]) = 0x0000;
906 (((u32 *) (prd))[i >> 1]) = cpu_to_le32(bttl);
907 l -= 0x10000;
908 bttl += 0x10000;
909 i += 0x04;
910 }
911 (((u32 *) (prd))[i >> 1]) = cpu_to_le32(bttl);
912 (((u16 *) (prd))[i + 2]) = cpu_to_le16(l);
913 (((u16 *) (prd))[i + 3]) = 0;
914 i += 0x04;
915 }
916 (((u16 *) (prd))[i - 1]) = cpu_to_le16(0x8000);
917#ifdef ED_DBGP
918 printk("prd %4x %4x %4x %4x\n",
919 (((unsigned short int *)prd)[0]),
920 (((unsigned short int *)prd)[1]),
921 (((unsigned short int *)prd)[2]),
922 (((unsigned short int *)prd)[3]));
923 printk("2. bttl %x, l %x\n",bttl, l);
924#endif
925 }
926#ifdef ED_DBGP
927 printk("send_s870: prdaddr_2 0x%8x target_id %d\n",
928 dev->id[c][target_id].prdaddr,target_id);
929#endif
930 dev->id[c][target_id].prdaddr = dev->id[c][target_id].prd_bus;
931 atp_writel_pci(dev, c, 4, dev->id[c][target_id].prdaddr);
932 atp_writeb_pci(dev, c, 2, 0x06);
933 atp_writeb_pci(dev, c, 2, 0x00);
934 if (is885(dev)) {
935 j = atp_readb_pci(dev, c, 1) & 0xf3;
936 if ((workreq->cmnd[0] == READ_6) ||
937 (workreq->cmnd[0] == READ_10) ||
938 (workreq->cmnd[0] == WRITE_6) ||
939 (workreq->cmnd[0] == WRITE_10)) {
940 j |= 0x0c;
941 }
942 atp_writeb_pci(dev, c, 1, j);
943 } else if (is880(dev)) {
944 if ((workreq->cmnd[0] == READ_6) ||
945 (workreq->cmnd[0] == READ_10) ||
946 (workreq->cmnd[0] == WRITE_6) ||
947 (workreq->cmnd[0] == WRITE_10))
948 atp_writeb_base(dev, 0x3b,
949 (atp_readb_base(dev, 0x3b) & 0x3f) | 0xc0);
950 else
951 atp_writeb_base(dev, 0x3b,
952 atp_readb_base(dev, 0x3b) & 0x3f);
953 } else {
954 if ((workreq->cmnd[0] == READ_6) ||
955 (workreq->cmnd[0] == READ_10) ||
956 (workreq->cmnd[0] == WRITE_6) ||
957 (workreq->cmnd[0] == WRITE_10))
958 atp_writeb_base(dev, 0x3a,
959 (atp_readb_base(dev, 0x3a) & 0xf3) | 0x08);
960 else
961 atp_writeb_base(dev, 0x3a,
962 atp_readb_base(dev, 0x3a) & 0xf3);
963 }
964
965 if(workreq->sc_data_direction == DMA_TO_DEVICE) {
966 dev->id[c][target_id].dirct = 0x20;
967 if (atp_readb_io(dev, c, 0x1c) == 0) {
968 atp_writeb_io(dev, c, 0x18, 0x08);
969 atp_writeb_pci(dev, c, 0, 0x01);
970#ifdef ED_DBGP
971 printk( "start DMA(to target)\n");
972#endif
973 } else {
974 dev->last_cmd[c] |= 0x40;
975 }
976 dev->in_snd[c] = 0;
977 return;
978 }
979 if (atp_readb_io(dev, c, 0x1c) == 0) {
980 atp_writeb_io(dev, c, 0x18, 0x08);
981 atp_writeb_pci(dev, c, 0, 0x09);
982#ifdef ED_DBGP
983 printk( "start DMA(to host)\n");
984#endif
985 } else {
986 dev->last_cmd[c] |= 0x40;
987 }
988 dev->in_snd[c] = 0;
989 return;
990
991}
992
993static unsigned char fun_scam(struct atp_unit *dev, unsigned short int *val)
994{
995 unsigned short int i, k;
996 unsigned char j;
997
998 atp_writew_io(dev, 0, 0x1c, *val);
999 for (i = 0; i < 10; i++) {
1000 k = atp_readw_io(dev, 0, 0x1c);
1001 j = (unsigned char) (k >> 8);
1002 if ((k & 0x8000) != 0)
1003 i = 0;
1004 }
1005 *val |= 0x4000;
1006 atp_writew_io(dev, 0, 0x1c, *val);
1007 *val &= 0xdfff;
1008 atp_writew_io(dev, 0, 0x1c, *val);
1009 for (i = 0; i < 10; i++) {
1010 if ((atp_readw_io(dev, 0, 0x1c) & 0x2000) != 0)
1011 i = 0;
1012 }
1013 *val |= 0x8000;
1014 *val &= 0xe0ff;
1015 atp_writew_io(dev, 0, 0x1c, *val);
1016 *val &= 0xbfff;
1017 atp_writew_io(dev, 0, 0x1c, *val);
1018 for (i = 0; i < 10; i++) {
1019 if ((atp_readw_io(dev, 0, 0x1c) & 0x4000) != 0)
1020 i = 0;
1021 }
1022
1023 return j;
1024}
1025
1026static void tscam(struct Scsi_Host *host, bool wide_chip, u8 scam_on)
1027{
1028
1029 unsigned char i, j, k;
1030 unsigned long n;
1031 unsigned short int m, assignid_map, val;
1032 unsigned char mbuf[33], quintet[2];
1033 struct atp_unit *dev = (struct atp_unit *)&host->hostdata;
1034 static unsigned char g2q_tab[8] = {
1035 0x38, 0x31, 0x32, 0x2b, 0x34, 0x2d, 0x2e, 0x27
1036 };
1037
1038
1039
1040
1041
1042
1043
1044
1045 atp_writeb_io(dev, 0, 1, 0x08);
1046 atp_writeb_io(dev, 0, 2, 0x7f);
1047 atp_writeb_io(dev, 0, 0x11, 0x20);
1048
1049 if ((scam_on & 0x40) == 0) {
1050 return;
1051 }
1052 m = 1;
1053 m <<= dev->host_id[0];
1054 j = 16;
1055 if (!wide_chip) {
1056 m |= 0xff00;
1057 j = 8;
1058 }
1059 assignid_map = m;
1060 atp_writeb_io(dev, 0, 0x02, 0x02);
1061 atp_writeb_io(dev, 0, 0x03, 0);
1062 atp_writeb_io(dev, 0, 0x04, 0);
1063 atp_writeb_io(dev, 0, 0x05, 0);
1064 atp_writeb_io(dev, 0, 0x06, 0);
1065 atp_writeb_io(dev, 0, 0x07, 0);
1066 atp_writeb_io(dev, 0, 0x08, 0);
1067
1068 for (i = 0; i < j; i++) {
1069 m = 1;
1070 m = m << i;
1071 if ((m & assignid_map) != 0) {
1072 continue;
1073 }
1074 atp_writeb_io(dev, 0, 0x0f, 0);
1075 atp_writeb_io(dev, 0, 0x12, 0);
1076 atp_writeb_io(dev, 0, 0x13, 0);
1077 atp_writeb_io(dev, 0, 0x14, 0);
1078 if (i > 7) {
1079 k = (i & 0x07) | 0x40;
1080 } else {
1081 k = i;
1082 }
1083 atp_writeb_io(dev, 0, 0x15, k);
1084 if (wide_chip)
1085 atp_writeb_io(dev, 0, 0x1b, 0x01);
1086 else
1087 atp_writeb_io(dev, 0, 0x1b, 0x00);
1088 do {
1089 atp_writeb_io(dev, 0, 0x18, 0x09);
1090
1091 while ((atp_readb_io(dev, 0, 0x1f) & 0x80) == 0x00)
1092 cpu_relax();
1093 k = atp_readb_io(dev, 0, 0x17);
1094 if ((k == 0x85) || (k == 0x42))
1095 break;
1096 if (k != 0x16)
1097 atp_writeb_io(dev, 0, 0x10, 0x41);
1098 } while (k != 0x16);
1099 if ((k == 0x85) || (k == 0x42))
1100 continue;
1101 assignid_map |= m;
1102
1103 }
1104 atp_writeb_io(dev, 0, 0x02, 0x7f);
1105 atp_writeb_io(dev, 0, 0x1b, 0x02);
1106
1107 udelay(2);
1108
1109 val = 0x0080;
1110 atp_writew_io(dev, 0, 0x1c, val);
1111 val |= 0x0040;
1112 atp_writew_io(dev, 0, 0x1c, val);
1113 val |= 0x0004;
1114 atp_writew_io(dev, 0, 0x1c, val);
1115 udelay(2);
1116 val &= 0x007f;
1117 atp_writew_io(dev, 0, 0x1c, val);
1118 msleep(128);
1119 val &= 0x00fb;
1120 atp_writew_io(dev, 0, 0x1c, val);
1121 while ((atp_readb_io(dev, 0, 0x1c) & 0x04) != 0)
1122 ;
1123 udelay(2);
1124 udelay(100);
1125 for (n = 0; n < 0x30000; n++)
1126 if ((atp_readb_io(dev, 0, 0x1c) & 0x80) != 0)
1127 break;
1128 if (n < 0x30000)
1129 for (n = 0; n < 0x30000; n++)
1130 if ((atp_readb_io(dev, 0, 0x1c) & 0x81) == 0x0081) {
1131 udelay(2);
1132 val |= 0x8003;
1133 atp_writew_io(dev, 0, 0x1c, val);
1134 udelay(2);
1135 val &= 0x00bf;
1136 atp_writew_io(dev, 0, 0x1c, val);
1137 udelay(2);
1138 break;
1139 }
1140 while (1) {
1141
1142
1143
1144
1145
1146
1147
1148
1149 mdelay(2);
1150 udelay(48);
1151 if ((atp_readb_io(dev, 0, 0x1c) & 0x80) == 0x00) {
1152 atp_writew_io(dev, 0, 0x1c, 0);
1153 atp_writeb_io(dev, 0, 0x1b, 0);
1154 atp_writeb_io(dev, 0, 0x15, 0);
1155 atp_writeb_io(dev, 0, 0x18, 0x09);
1156 while ((atp_readb_io(dev, 0, 0x1f) & 0x80) == 0)
1157 cpu_relax();
1158 atp_readb_io(dev, 0, 0x17);
1159 return;
1160 }
1161 val &= 0x00ff;
1162 val |= 0x3f00;
1163 fun_scam(dev, &val);
1164 udelay(2);
1165 val &= 0x00ff;
1166 val |= 0x2000;
1167 fun_scam(dev, &val);
1168 udelay(2);
1169 i = 8;
1170 j = 0;
1171
1172 while (1) {
1173 if ((atp_readw_io(dev, 0, 0x1c) & 0x2000) == 0)
1174 continue;
1175 udelay(2);
1176 val &= 0x00ff;
1177 val |= 0x2000;
1178 k = fun_scam(dev, &val);
1179 if ((k & 0x03) == 0)
1180 break;
1181 mbuf[j] <<= 0x01;
1182 mbuf[j] &= 0xfe;
1183 if ((k & 0x02) != 0)
1184 mbuf[j] |= 0x01;
1185 i--;
1186 if (i > 0)
1187 continue;
1188 j++;
1189 i = 8;
1190 }
1191
1192
1193
1194
1195 i = 15;
1196 j = mbuf[0];
1197 if ((j & 0x20) != 0) {
1198 i = 7;
1199 }
1200 if ((j & 0x06) != 0) {
1201 k = mbuf[1];
1202 while (1) {
1203 m = 1;
1204 m <<= k;
1205 if ((m & assignid_map) == 0)
1206 break;
1207 if (k > 0)
1208 k--;
1209 else
1210 break;
1211 }
1212 }
1213 if ((m & assignid_map) != 0) {
1214 k = i;
1215 while (1) {
1216 m = 1;
1217 m <<= k;
1218 if ((m & assignid_map) == 0)
1219 break;
1220 if (k > 0)
1221 k--;
1222 else
1223 break;
1224 }
1225 }
1226
1227 assignid_map |= m;
1228 if (k < 8) {
1229 quintet[0] = 0x38;
1230 } else {
1231 quintet[0] = 0x31;
1232 }
1233 k &= 0x07;
1234 quintet[1] = g2q_tab[k];
1235
1236 val &= 0x00ff;
1237 m = quintet[0] << 8;
1238 val |= m;
1239 fun_scam(dev, &val);
1240 val &= 0x00ff;
1241 m = quintet[1] << 8;
1242 val |= m;
1243 fun_scam(dev, &val);
1244
1245 }
1246}
1247
1248static void atp870u_free_tables(struct Scsi_Host *host)
1249{
1250 struct atp_unit *atp_dev = (struct atp_unit *)&host->hostdata;
1251 int j, k;
1252 for (j=0; j < 2; j++) {
1253 for (k = 0; k < 16; k++) {
1254 if (!atp_dev->id[j][k].prd_table)
1255 continue;
1256 dma_free_coherent(&atp_dev->pdev->dev, 1024,
1257 atp_dev->id[j][k].prd_table,
1258 atp_dev->id[j][k].prd_bus);
1259 atp_dev->id[j][k].prd_table = NULL;
1260 }
1261 }
1262}
1263
1264static int atp870u_init_tables(struct Scsi_Host *host)
1265{
1266 struct atp_unit *atp_dev = (struct atp_unit *)&host->hostdata;
1267 int c,k;
1268 for(c=0;c < 2;c++) {
1269 for(k=0;k<16;k++) {
1270 atp_dev->id[c][k].prd_table =
1271 dma_alloc_coherent(&atp_dev->pdev->dev, 1024,
1272 &(atp_dev->id[c][k].prd_bus),
1273 GFP_KERNEL);
1274 if (!atp_dev->id[c][k].prd_table) {
1275 printk("atp870u_init_tables fail\n");
1276 atp870u_free_tables(host);
1277 return -ENOMEM;
1278 }
1279 atp_dev->id[c][k].prdaddr = atp_dev->id[c][k].prd_bus;
1280 atp_dev->id[c][k].devsp=0x20;
1281 atp_dev->id[c][k].devtype = 0x7f;
1282 atp_dev->id[c][k].curr_req = NULL;
1283 }
1284
1285 atp_dev->active_id[c] = 0;
1286 atp_dev->wide_id[c] = 0;
1287 atp_dev->host_id[c] = 0x07;
1288 atp_dev->quhd[c] = 0;
1289 atp_dev->quend[c] = 0;
1290 atp_dev->last_cmd[c] = 0xff;
1291 atp_dev->in_snd[c] = 0;
1292 atp_dev->in_int[c] = 0;
1293
1294 for (k = 0; k < qcnt; k++) {
1295 atp_dev->quereq[c][k] = NULL;
1296 }
1297 for (k = 0; k < 16; k++) {
1298 atp_dev->id[c][k].curr_req = NULL;
1299 atp_dev->sp[c][k] = 0x04;
1300 }
1301 }
1302 return 0;
1303}
1304
1305static void atp_set_host_id(struct atp_unit *atp, u8 c, u8 host_id)
1306{
1307 atp_writeb_io(atp, c, 0, host_id | 0x08);
1308 atp_writeb_io(atp, c, 0x18, 0);
1309 while ((atp_readb_io(atp, c, 0x1f) & 0x80) == 0)
1310 mdelay(1);
1311 atp_readb_io(atp, c, 0x17);
1312 atp_writeb_io(atp, c, 1, 8);
1313 atp_writeb_io(atp, c, 2, 0x7f);
1314 atp_writeb_io(atp, c, 0x11, 0x20);
1315}
1316
1317static void atp870_init(struct Scsi_Host *shpnt)
1318{
1319 struct atp_unit *atpdev = shost_priv(shpnt);
1320 struct pci_dev *pdev = atpdev->pdev;
1321 unsigned char k, host_id;
1322 u8 scam_on;
1323 bool wide_chip =
1324 (pdev->device == PCI_DEVICE_ID_ARTOP_AEC7610 &&
1325 pdev->revision == 4) ||
1326 (pdev->device == PCI_DEVICE_ID_ARTOP_AEC7612UW) ||
1327 (pdev->device == PCI_DEVICE_ID_ARTOP_AEC7612SUW);
1328
1329 pci_read_config_byte(pdev, 0x49, &host_id);
1330
1331 dev_info(&pdev->dev, "ACARD AEC-671X PCI Ultra/W SCSI-2/3 "
1332 "Host Adapter: IO:%lx, IRQ:%d.\n",
1333 shpnt->io_port, shpnt->irq);
1334
1335 atpdev->ioport[0] = shpnt->io_port;
1336 atpdev->pciport[0] = shpnt->io_port + 0x20;
1337 host_id &= 0x07;
1338 atpdev->host_id[0] = host_id;
1339 scam_on = atp_readb_pci(atpdev, 0, 2);
1340 atpdev->global_map[0] = atp_readb_base(atpdev, 0x2d);
1341 atpdev->ultra_map[0] = atp_readw_base(atpdev, 0x2e);
1342
1343 if (atpdev->ultra_map[0] == 0) {
1344 scam_on = 0x00;
1345 atpdev->global_map[0] = 0x20;
1346 atpdev->ultra_map[0] = 0xffff;
1347 }
1348
1349 if (pdev->revision > 0x07)
1350 atp_writeb_base(atpdev, 0x3e, 0x00);
1351
1352 k = (atp_readb_base(atpdev, 0x3a) & 0xf3) | 0x10;
1353 atp_writeb_base(atpdev, 0x3a, k);
1354 atp_writeb_base(atpdev, 0x3a, k & 0xdf);
1355 msleep(32);
1356 atp_writeb_base(atpdev, 0x3a, k);
1357 msleep(32);
1358 atp_set_host_id(atpdev, 0, host_id);
1359
1360 tscam(shpnt, wide_chip, scam_on);
1361 atp_writeb_base(atpdev, 0x3a, atp_readb_base(atpdev, 0x3a) | 0x10);
1362 atp_is(atpdev, 0, wide_chip, 0);
1363 atp_writeb_base(atpdev, 0x3a, atp_readb_base(atpdev, 0x3a) & 0xef);
1364 atp_writeb_base(atpdev, 0x3b, atp_readb_base(atpdev, 0x3b) | 0x20);
1365 shpnt->max_id = wide_chip ? 16 : 8;
1366 shpnt->this_id = host_id;
1367}
1368
1369static void atp880_init(struct Scsi_Host *shpnt)
1370{
1371 struct atp_unit *atpdev = shost_priv(shpnt);
1372 struct pci_dev *pdev = atpdev->pdev;
1373 unsigned char k, m, host_id;
1374 unsigned int n;
1375
1376 pci_write_config_byte(pdev, PCI_LATENCY_TIMER, 0x80);
1377
1378 atpdev->ioport[0] = shpnt->io_port + 0x40;
1379 atpdev->pciport[0] = shpnt->io_port + 0x28;
1380
1381 host_id = atp_readb_base(atpdev, 0x39) >> 4;
1382
1383 dev_info(&pdev->dev, "ACARD AEC-67160 PCI Ultra3 LVD "
1384 "Host Adapter: IO:%lx, IRQ:%d.\n",
1385 shpnt->io_port, shpnt->irq);
1386 atpdev->host_id[0] = host_id;
1387
1388 atpdev->global_map[0] = atp_readb_base(atpdev, 0x35);
1389 atpdev->ultra_map[0] = atp_readw_base(atpdev, 0x3c);
1390
1391 n = 0x3f09;
1392 while (n < 0x4000) {
1393 m = 0;
1394 atp_writew_base(atpdev, 0x34, n);
1395 n += 0x0002;
1396 if (atp_readb_base(atpdev, 0x30) == 0xff)
1397 break;
1398
1399 atpdev->sp[0][m++] = atp_readb_base(atpdev, 0x30);
1400 atpdev->sp[0][m++] = atp_readb_base(atpdev, 0x31);
1401 atpdev->sp[0][m++] = atp_readb_base(atpdev, 0x32);
1402 atpdev->sp[0][m++] = atp_readb_base(atpdev, 0x33);
1403 atp_writew_base(atpdev, 0x34, n);
1404 n += 0x0002;
1405 atpdev->sp[0][m++] = atp_readb_base(atpdev, 0x30);
1406 atpdev->sp[0][m++] = atp_readb_base(atpdev, 0x31);
1407 atpdev->sp[0][m++] = atp_readb_base(atpdev, 0x32);
1408 atpdev->sp[0][m++] = atp_readb_base(atpdev, 0x33);
1409 atp_writew_base(atpdev, 0x34, n);
1410 n += 0x0002;
1411 atpdev->sp[0][m++] = atp_readb_base(atpdev, 0x30);
1412 atpdev->sp[0][m++] = atp_readb_base(atpdev, 0x31);
1413 atpdev->sp[0][m++] = atp_readb_base(atpdev, 0x32);
1414 atpdev->sp[0][m++] = atp_readb_base(atpdev, 0x33);
1415 atp_writew_base(atpdev, 0x34, n);
1416 n += 0x0002;
1417 atpdev->sp[0][m++] = atp_readb_base(atpdev, 0x30);
1418 atpdev->sp[0][m++] = atp_readb_base(atpdev, 0x31);
1419 atpdev->sp[0][m++] = atp_readb_base(atpdev, 0x32);
1420 atpdev->sp[0][m++] = atp_readb_base(atpdev, 0x33);
1421 n += 0x0018;
1422 }
1423 atp_writew_base(atpdev, 0x34, 0);
1424 atpdev->ultra_map[0] = 0;
1425 atpdev->async[0] = 0;
1426 for (k = 0; k < 16; k++) {
1427 n = 1 << k;
1428 if (atpdev->sp[0][k] > 1)
1429 atpdev->ultra_map[0] |= n;
1430 else
1431 if (atpdev->sp[0][k] == 0)
1432 atpdev->async[0] |= n;
1433 }
1434 atpdev->async[0] = ~(atpdev->async[0]);
1435 atp_writeb_base(atpdev, 0x35, atpdev->global_map[0]);
1436
1437 k = atp_readb_base(atpdev, 0x38) & 0x80;
1438 atp_writeb_base(atpdev, 0x38, k);
1439 atp_writeb_base(atpdev, 0x3b, 0x20);
1440 msleep(32);
1441 atp_writeb_base(atpdev, 0x3b, 0);
1442 msleep(32);
1443 atp_readb_io(atpdev, 0, 0x1b);
1444 atp_readb_io(atpdev, 0, 0x17);
1445
1446 atp_set_host_id(atpdev, 0, host_id);
1447
1448 tscam(shpnt, true, atp_readb_base(atpdev, 0x22));
1449 atp_is(atpdev, 0, true, atp_readb_base(atpdev, 0x3f) & 0x40);
1450 atp_writeb_base(atpdev, 0x38, 0xb0);
1451 shpnt->max_id = 16;
1452 shpnt->this_id = host_id;
1453}
1454
1455static void atp885_init(struct Scsi_Host *shpnt)
1456{
1457 struct atp_unit *atpdev = shost_priv(shpnt);
1458 struct pci_dev *pdev = atpdev->pdev;
1459 unsigned char k, m, c;
1460 unsigned int n;
1461 unsigned char setupdata[2][16];
1462
1463 dev_info(&pdev->dev, "ACARD AEC-67162 PCI Ultra3 LVD "
1464 "Host Adapter: IO:%lx, IRQ:%d.\n",
1465 shpnt->io_port, shpnt->irq);
1466
1467 atpdev->ioport[0] = shpnt->io_port + 0x80;
1468 atpdev->ioport[1] = shpnt->io_port + 0xc0;
1469 atpdev->pciport[0] = shpnt->io_port + 0x40;
1470 atpdev->pciport[1] = shpnt->io_port + 0x50;
1471
1472 c = atp_readb_base(atpdev, 0x29);
1473 atp_writeb_base(atpdev, 0x29, c | 0x04);
1474
1475 n = 0x1f80;
1476 while (n < 0x2000) {
1477 atp_writew_base(atpdev, 0x3c, n);
1478 if (atp_readl_base(atpdev, 0x38) == 0xffffffff)
1479 break;
1480 for (m = 0; m < 2; m++) {
1481 atpdev->global_map[m] = 0;
1482 for (k = 0; k < 4; k++) {
1483 atp_writew_base(atpdev, 0x3c, n++);
1484 ((u32 *)&setupdata[m][0])[k] =
1485 atp_readl_base(atpdev, 0x38);
1486 }
1487 for (k = 0; k < 4; k++) {
1488 atp_writew_base(atpdev, 0x3c, n++);
1489 ((u32 *)&atpdev->sp[m][0])[k] =
1490 atp_readl_base(atpdev, 0x38);
1491 }
1492 n += 8;
1493 }
1494 }
1495 c = atp_readb_base(atpdev, 0x29);
1496 atp_writeb_base(atpdev, 0x29, c & 0xfb);
1497 for (c = 0; c < 2; c++) {
1498 atpdev->ultra_map[c] = 0;
1499 atpdev->async[c] = 0;
1500 for (k = 0; k < 16; k++) {
1501 n = 1 << k;
1502 if (atpdev->sp[c][k] > 1)
1503 atpdev->ultra_map[c] |= n;
1504 else
1505 if (atpdev->sp[c][k] == 0)
1506 atpdev->async[c] |= n;
1507 }
1508 atpdev->async[c] = ~(atpdev->async[c]);
1509
1510 if (atpdev->global_map[c] == 0) {
1511 k = setupdata[c][1];
1512 if ((k & 0x40) != 0)
1513 atpdev->global_map[c] |= 0x20;
1514 k &= 0x07;
1515 atpdev->global_map[c] |= k;
1516 if ((setupdata[c][2] & 0x04) != 0)
1517 atpdev->global_map[c] |= 0x08;
1518 atpdev->host_id[c] = setupdata[c][0] & 0x07;
1519 }
1520 }
1521
1522 k = atp_readb_base(atpdev, 0x28) & 0x8f;
1523 k |= 0x10;
1524 atp_writeb_base(atpdev, 0x28, k);
1525 atp_writeb_pci(atpdev, 0, 1, 0x80);
1526 atp_writeb_pci(atpdev, 1, 1, 0x80);
1527 msleep(100);
1528 atp_writeb_pci(atpdev, 0, 1, 0);
1529 atp_writeb_pci(atpdev, 1, 1, 0);
1530 msleep(1000);
1531 atp_readb_io(atpdev, 0, 0x1b);
1532 atp_readb_io(atpdev, 0, 0x17);
1533 atp_readb_io(atpdev, 1, 0x1b);
1534 atp_readb_io(atpdev, 1, 0x17);
1535
1536 k = atpdev->host_id[0];
1537 if (k > 7)
1538 k = (k & 0x07) | 0x40;
1539 atp_set_host_id(atpdev, 0, k);
1540
1541 k = atpdev->host_id[1];
1542 if (k > 7)
1543 k = (k & 0x07) | 0x40;
1544 atp_set_host_id(atpdev, 1, k);
1545
1546 msleep(600);
1547 dev_info(&pdev->dev, "Scanning Channel A SCSI Device ...\n");
1548 atp_is(atpdev, 0, true, atp_readb_io(atpdev, 0, 0x1b) >> 7);
1549 atp_writeb_io(atpdev, 0, 0x16, 0x80);
1550 dev_info(&pdev->dev, "Scanning Channel B SCSI Device ...\n");
1551 atp_is(atpdev, 1, true, atp_readb_io(atpdev, 1, 0x1b) >> 7);
1552 atp_writeb_io(atpdev, 1, 0x16, 0x80);
1553 k = atp_readb_base(atpdev, 0x28) & 0xcf;
1554 k |= 0xc0;
1555 atp_writeb_base(atpdev, 0x28, k);
1556 k = atp_readb_base(atpdev, 0x1f) | 0x80;
1557 atp_writeb_base(atpdev, 0x1f, k);
1558 k = atp_readb_base(atpdev, 0x29) | 0x01;
1559 atp_writeb_base(atpdev, 0x29, k);
1560 shpnt->max_id = 16;
1561 shpnt->max_lun = (atpdev->global_map[0] & 0x07) + 1;
1562 shpnt->max_channel = 1;
1563 shpnt->this_id = atpdev->host_id[0];
1564}
1565
1566
1567static int atp870u_probe(struct pci_dev *pdev, const struct pci_device_id *ent)
1568{
1569 struct Scsi_Host *shpnt = NULL;
1570 struct atp_unit *atpdev;
1571 int err;
1572
1573 if (ent->device == PCI_DEVICE_ID_ARTOP_AEC7610 && pdev->revision < 2) {
1574 dev_err(&pdev->dev, "ATP850S chips (AEC6710L/F cards) are not supported.\n");
1575 return -ENODEV;
1576 }
1577
1578 err = pci_enable_device(pdev);
1579 if (err)
1580 goto fail;
1581
1582 if (dma_set_mask(&pdev->dev, DMA_BIT_MASK(32))) {
1583 printk(KERN_ERR "atp870u: DMA mask required but not available.\n");
1584 err = -EIO;
1585 goto disable_device;
1586 }
1587
1588 err = pci_request_regions(pdev, "atp870u");
1589 if (err)
1590 goto disable_device;
1591 pci_set_master(pdev);
1592
1593 err = -ENOMEM;
1594 shpnt = scsi_host_alloc(&atp870u_template, sizeof(struct atp_unit));
1595 if (!shpnt)
1596 goto release_region;
1597
1598 atpdev = shost_priv(shpnt);
1599
1600 atpdev->host = shpnt;
1601 atpdev->pdev = pdev;
1602 pci_set_drvdata(pdev, atpdev);
1603
1604 shpnt->io_port = pci_resource_start(pdev, 0);
1605 shpnt->io_port &= 0xfffffff8;
1606 shpnt->n_io_port = pci_resource_len(pdev, 0);
1607 atpdev->baseport = shpnt->io_port;
1608 shpnt->unique_id = shpnt->io_port;
1609 shpnt->irq = pdev->irq;
1610
1611 err = atp870u_init_tables(shpnt);
1612 if (err) {
1613 dev_err(&pdev->dev, "Unable to allocate tables for Acard controller\n");
1614 goto unregister;
1615 }
1616
1617 if (is880(atpdev))
1618 atp880_init(shpnt);
1619 else if (is885(atpdev))
1620 atp885_init(shpnt);
1621 else
1622 atp870_init(shpnt);
1623
1624 err = request_irq(shpnt->irq, atp870u_intr_handle, IRQF_SHARED, "atp870u", shpnt);
1625 if (err) {
1626 dev_err(&pdev->dev, "Unable to allocate IRQ %d.\n", shpnt->irq);
1627 goto free_tables;
1628 }
1629
1630 err = scsi_add_host(shpnt, &pdev->dev);
1631 if (err)
1632 goto scsi_add_fail;
1633 scsi_scan_host(shpnt);
1634
1635 return 0;
1636
1637scsi_add_fail:
1638 free_irq(shpnt->irq, shpnt);
1639free_tables:
1640 atp870u_free_tables(shpnt);
1641unregister:
1642 scsi_host_put(shpnt);
1643release_region:
1644 pci_release_regions(pdev);
1645disable_device:
1646 pci_disable_device(pdev);
1647fail:
1648 return err;
1649}
1650
1651
1652
1653
1654
1655static int atp870u_abort(struct scsi_cmnd * SCpnt)
1656{
1657 unsigned char j, k, c;
1658 struct scsi_cmnd *workrequ;
1659 struct atp_unit *dev;
1660 struct Scsi_Host *host;
1661 host = SCpnt->device->host;
1662
1663 dev = (struct atp_unit *)&host->hostdata;
1664 c = scmd_channel(SCpnt);
1665 printk(" atp870u: abort Channel = %x \n", c);
1666 printk("working=%x last_cmd=%x ", dev->working[c], dev->last_cmd[c]);
1667 printk(" quhdu=%x quendu=%x ", dev->quhd[c], dev->quend[c]);
1668 for (j = 0; j < 0x18; j++) {
1669 printk(" r%2x=%2x", j, atp_readb_io(dev, c, j));
1670 }
1671 printk(" r1c=%2x", atp_readb_io(dev, c, 0x1c));
1672 printk(" r1f=%2x in_snd=%2x ", atp_readb_io(dev, c, 0x1f), dev->in_snd[c]);
1673 printk(" d00=%2x", atp_readb_pci(dev, c, 0x00));
1674 printk(" d02=%2x", atp_readb_pci(dev, c, 0x02));
1675 for(j=0;j<16;j++) {
1676 if (dev->id[c][j].curr_req != NULL) {
1677 workrequ = dev->id[c][j].curr_req;
1678 printk("\n que cdb= ");
1679 for (k=0; k < workrequ->cmd_len; k++) {
1680 printk(" %2x ",workrequ->cmnd[k]);
1681 }
1682 printk(" last_lenu= %x ",(unsigned int)dev->id[c][j].last_len);
1683 }
1684 }
1685 return SUCCESS;
1686}
1687
1688static const char *atp870u_info(struct Scsi_Host *notused)
1689{
1690 static char buffer[128];
1691
1692 strcpy(buffer, "ACARD AEC-6710/6712/67160 PCI Ultra/W/LVD SCSI-3 Adapter Driver V2.6+ac ");
1693
1694 return buffer;
1695}
1696
1697static int atp870u_show_info(struct seq_file *m, struct Scsi_Host *HBAptr)
1698{
1699 seq_puts(m, "ACARD AEC-671X Driver Version: 2.6+ac\n\n"
1700 "Adapter Configuration:\n");
1701 seq_printf(m, " Base IO: %#.4lx\n", HBAptr->io_port);
1702 seq_printf(m, " IRQ: %d\n", HBAptr->irq);
1703 return 0;
1704}
1705
1706
1707static int atp870u_biosparam(struct scsi_device *disk, struct block_device *dev,
1708 sector_t capacity, int *ip)
1709{
1710 int heads, sectors, cylinders;
1711
1712 heads = 64;
1713 sectors = 32;
1714 cylinders = (unsigned long)capacity / (heads * sectors);
1715 if (cylinders > 1024) {
1716 heads = 255;
1717 sectors = 63;
1718 cylinders = (unsigned long)capacity / (heads * sectors);
1719 }
1720 ip[0] = heads;
1721 ip[1] = sectors;
1722 ip[2] = cylinders;
1723
1724 return 0;
1725}
1726
1727static void atp870u_remove (struct pci_dev *pdev)
1728{
1729 struct atp_unit *devext = pci_get_drvdata(pdev);
1730 struct Scsi_Host *pshost = devext->host;
1731
1732 scsi_remove_host(pshost);
1733 free_irq(pshost->irq, pshost);
1734 pci_release_regions(pdev);
1735 pci_disable_device(pdev);
1736 atp870u_free_tables(pshost);
1737 scsi_host_put(pshost);
1738}
1739MODULE_LICENSE("GPL");
1740
1741static struct scsi_host_template atp870u_template = {
1742 .module = THIS_MODULE,
1743 .name = "atp870u" ,
1744 .proc_name = "atp870u",
1745 .show_info = atp870u_show_info,
1746 .info = atp870u_info ,
1747 .queuecommand = atp870u_queuecommand ,
1748 .eh_abort_handler = atp870u_abort ,
1749 .bios_param = atp870u_biosparam ,
1750 .can_queue = qcnt ,
1751 .this_id = 7 ,
1752 .sg_tablesize = ATP870U_SCATTER ,
1753 .max_sectors = ATP870U_MAX_SECTORS,
1754};
1755
1756static struct pci_device_id atp870u_id_table[] = {
1757 { PCI_DEVICE(PCI_VENDOR_ID_ARTOP, ATP885_DEVID) },
1758 { PCI_DEVICE(PCI_VENDOR_ID_ARTOP, ATP880_DEVID1) },
1759 { PCI_DEVICE(PCI_VENDOR_ID_ARTOP, ATP880_DEVID2) },
1760 { PCI_DEVICE(PCI_VENDOR_ID_ARTOP, PCI_DEVICE_ID_ARTOP_AEC7610) },
1761 { PCI_DEVICE(PCI_VENDOR_ID_ARTOP, PCI_DEVICE_ID_ARTOP_AEC7612UW) },
1762 { PCI_DEVICE(PCI_VENDOR_ID_ARTOP, PCI_DEVICE_ID_ARTOP_AEC7612U) },
1763 { PCI_DEVICE(PCI_VENDOR_ID_ARTOP, PCI_DEVICE_ID_ARTOP_AEC7612S) },
1764 { PCI_DEVICE(PCI_VENDOR_ID_ARTOP, PCI_DEVICE_ID_ARTOP_AEC7612D) },
1765 { PCI_DEVICE(PCI_VENDOR_ID_ARTOP, PCI_DEVICE_ID_ARTOP_AEC7612SUW) },
1766 { PCI_DEVICE(PCI_VENDOR_ID_ARTOP, PCI_DEVICE_ID_ARTOP_8060) },
1767 { 0, },
1768};
1769
1770MODULE_DEVICE_TABLE(pci, atp870u_id_table);
1771
1772static struct pci_driver atp870u_driver = {
1773 .id_table = atp870u_id_table,
1774 .name = "atp870u",
1775 .probe = atp870u_probe,
1776 .remove = atp870u_remove,
1777};
1778
1779module_pci_driver(atp870u_driver);
1780
1781static void atp_is(struct atp_unit *dev, unsigned char c, bool wide_chip,
1782 unsigned char lvdmode)
1783{
1784 unsigned char i, j, k, rmb, n;
1785 unsigned short int m;
1786 static unsigned char mbuf[512];
1787 static unsigned char satn[9] = { 0, 0, 0, 0, 0, 0, 0, 6, 6 };
1788 static unsigned char inqd[9] = { 0x12, 0, 0, 0, 0x24, 0, 0, 0x24, 6 };
1789 static unsigned char synn[6] = { 0x80, 1, 3, 1, 0x19, 0x0e };
1790 unsigned char synu[6] = { 0x80, 1, 3, 1, 0x0a, 0x0e };
1791 static unsigned char synw[6] = { 0x80, 1, 3, 1, 0x19, 0x0e };
1792 static unsigned char synw_870[6] = { 0x80, 1, 3, 1, 0x0c, 0x07 };
1793 unsigned char synuw[6] = { 0x80, 1, 3, 1, 0x0a, 0x0e };
1794 static unsigned char wide[6] = { 0x80, 1, 2, 3, 1, 0 };
1795 static unsigned char u3[9] = { 0x80, 1, 6, 4, 0x09, 00, 0x0e, 0x01, 0x02 };
1796
1797 for (i = 0; i < 16; i++) {
1798 if (!wide_chip && (i > 7))
1799 break;
1800 m = 1;
1801 m = m << i;
1802 if ((m & dev->active_id[c]) != 0) {
1803 continue;
1804 }
1805 if (i == dev->host_id[c]) {
1806 printk(KERN_INFO " ID: %2d Host Adapter\n", dev->host_id[c]);
1807 continue;
1808 }
1809 atp_writeb_io(dev, c, 0x1b, wide_chip ? 0x01 : 0x00);
1810 atp_writeb_io(dev, c, 1, 0x08);
1811 atp_writeb_io(dev, c, 2, 0x7f);
1812 atp_writeb_io(dev, c, 3, satn[0]);
1813 atp_writeb_io(dev, c, 4, satn[1]);
1814 atp_writeb_io(dev, c, 5, satn[2]);
1815 atp_writeb_io(dev, c, 6, satn[3]);
1816 atp_writeb_io(dev, c, 7, satn[4]);
1817 atp_writeb_io(dev, c, 8, satn[5]);
1818 atp_writeb_io(dev, c, 0x0f, 0);
1819 atp_writeb_io(dev, c, 0x11, dev->id[c][i].devsp);
1820 atp_writeb_io(dev, c, 0x12, 0);
1821 atp_writeb_io(dev, c, 0x13, satn[6]);
1822 atp_writeb_io(dev, c, 0x14, satn[7]);
1823 j = i;
1824 if ((j & 0x08) != 0) {
1825 j = (j & 0x07) | 0x40;
1826 }
1827 atp_writeb_io(dev, c, 0x15, j);
1828 atp_writeb_io(dev, c, 0x18, satn[8]);
1829
1830 while ((atp_readb_io(dev, c, 0x1f) & 0x80) == 0x00)
1831 cpu_relax();
1832
1833 if (atp_readb_io(dev, c, 0x17) != 0x11 && atp_readb_io(dev, c, 0x17) != 0x8e)
1834 continue;
1835
1836 while (atp_readb_io(dev, c, 0x17) != 0x8e)
1837 cpu_relax();
1838
1839 dev->active_id[c] |= m;
1840
1841 atp_writeb_io(dev, c, 0x10, 0x30);
1842 if (is885(dev) || is880(dev))
1843 atp_writeb_io(dev, c, 0x14, 0x00);
1844 else
1845 atp_writeb_io(dev, c, 0x04, 0x00);
1846
1847phase_cmd:
1848 atp_writeb_io(dev, c, 0x18, 0x08);
1849
1850 while ((atp_readb_io(dev, c, 0x1f) & 0x80) == 0x00)
1851 cpu_relax();
1852
1853 j = atp_readb_io(dev, c, 0x17);
1854 if (j != 0x16) {
1855 atp_writeb_io(dev, c, 0x10, 0x41);
1856 goto phase_cmd;
1857 }
1858sel_ok:
1859 atp_writeb_io(dev, c, 3, inqd[0]);
1860 atp_writeb_io(dev, c, 4, inqd[1]);
1861 atp_writeb_io(dev, c, 5, inqd[2]);
1862 atp_writeb_io(dev, c, 6, inqd[3]);
1863 atp_writeb_io(dev, c, 7, inqd[4]);
1864 atp_writeb_io(dev, c, 8, inqd[5]);
1865 atp_writeb_io(dev, c, 0x0f, 0);
1866 atp_writeb_io(dev, c, 0x11, dev->id[c][i].devsp);
1867 atp_writeb_io(dev, c, 0x12, 0);
1868 atp_writeb_io(dev, c, 0x13, inqd[6]);
1869 atp_writeb_io(dev, c, 0x14, inqd[7]);
1870 atp_writeb_io(dev, c, 0x18, inqd[8]);
1871
1872 while ((atp_readb_io(dev, c, 0x1f) & 0x80) == 0x00)
1873 cpu_relax();
1874
1875 if (atp_readb_io(dev, c, 0x17) != 0x11 && atp_readb_io(dev, c, 0x17) != 0x8e)
1876 continue;
1877
1878 while (atp_readb_io(dev, c, 0x17) != 0x8e)
1879 cpu_relax();
1880
1881 if (wide_chip)
1882 atp_writeb_io(dev, c, 0x1b, 0x00);
1883
1884 atp_writeb_io(dev, c, 0x18, 0x08);
1885 j = 0;
1886rd_inq_data:
1887 k = atp_readb_io(dev, c, 0x1f);
1888 if ((k & 0x01) != 0) {
1889 mbuf[j++] = atp_readb_io(dev, c, 0x19);
1890 goto rd_inq_data;
1891 }
1892 if ((k & 0x80) == 0) {
1893 goto rd_inq_data;
1894 }
1895 j = atp_readb_io(dev, c, 0x17);
1896 if (j == 0x16) {
1897 goto inq_ok;
1898 }
1899 atp_writeb_io(dev, c, 0x10, 0x46);
1900 atp_writeb_io(dev, c, 0x12, 0);
1901 atp_writeb_io(dev, c, 0x13, 0);
1902 atp_writeb_io(dev, c, 0x14, 0);
1903 atp_writeb_io(dev, c, 0x18, 0x08);
1904
1905 while ((atp_readb_io(dev, c, 0x1f) & 0x80) == 0x00)
1906 cpu_relax();
1907
1908 if (atp_readb_io(dev, c, 0x17) != 0x16)
1909 goto sel_ok;
1910
1911inq_ok:
1912 mbuf[36] = 0;
1913 printk(KERN_INFO " ID: %2d %s\n", i, &mbuf[8]);
1914 dev->id[c][i].devtype = mbuf[0];
1915 rmb = mbuf[1];
1916 n = mbuf[7];
1917 if (!wide_chip)
1918 goto not_wide;
1919 if ((mbuf[7] & 0x60) == 0) {
1920 goto not_wide;
1921 }
1922 if (is885(dev) || is880(dev)) {
1923 if ((i < 8) && ((dev->global_map[c] & 0x20) == 0))
1924 goto not_wide;
1925 } else {
1926 if ((dev->global_map[c] & 0x20) == 0)
1927 goto not_wide;
1928 }
1929 if (lvdmode == 0) {
1930 goto chg_wide;
1931 }
1932 if (dev->sp[c][i] != 0x04)
1933 {
1934 goto chg_wide;
1935 }
1936
1937 atp_writeb_io(dev, c, 0x1b, 0x01);
1938 atp_writeb_io(dev, c, 3, satn[0]);
1939 atp_writeb_io(dev, c, 4, satn[1]);
1940 atp_writeb_io(dev, c, 5, satn[2]);
1941 atp_writeb_io(dev, c, 6, satn[3]);
1942 atp_writeb_io(dev, c, 7, satn[4]);
1943 atp_writeb_io(dev, c, 8, satn[5]);
1944 atp_writeb_io(dev, c, 0x0f, 0);
1945 atp_writeb_io(dev, c, 0x11, dev->id[c][i].devsp);
1946 atp_writeb_io(dev, c, 0x12, 0);
1947 atp_writeb_io(dev, c, 0x13, satn[6]);
1948 atp_writeb_io(dev, c, 0x14, satn[7]);
1949 atp_writeb_io(dev, c, 0x18, satn[8]);
1950
1951 while ((atp_readb_io(dev, c, 0x1f) & 0x80) == 0x00)
1952 cpu_relax();
1953
1954 if (atp_readb_io(dev, c, 0x17) != 0x11 && atp_readb_io(dev, c, 0x17) != 0x8e)
1955 continue;
1956
1957 while (atp_readb_io(dev, c, 0x17) != 0x8e)
1958 cpu_relax();
1959
1960try_u3:
1961 j = 0;
1962 atp_writeb_io(dev, c, 0x14, 0x09);
1963 atp_writeb_io(dev, c, 0x18, 0x20);
1964
1965 while ((atp_readb_io(dev, c, 0x1f) & 0x80) == 0) {
1966 if ((atp_readb_io(dev, c, 0x1f) & 0x01) != 0)
1967 atp_writeb_io(dev, c, 0x19, u3[j++]);
1968 cpu_relax();
1969 }
1970
1971 while ((atp_readb_io(dev, c, 0x17) & 0x80) == 0x00)
1972 cpu_relax();
1973
1974 j = atp_readb_io(dev, c, 0x17) & 0x0f;
1975 if (j == 0x0f) {
1976 goto u3p_in;
1977 }
1978 if (j == 0x0a) {
1979 goto u3p_cmd;
1980 }
1981 if (j == 0x0e) {
1982 goto try_u3;
1983 }
1984 continue;
1985u3p_out:
1986 atp_writeb_io(dev, c, 0x18, 0x20);
1987 while ((atp_readb_io(dev, c, 0x1f) & 0x80) == 0) {
1988 if ((atp_readb_io(dev, c, 0x1f) & 0x01) != 0)
1989 atp_writeb_io(dev, c, 0x19, 0);
1990 cpu_relax();
1991 }
1992 j = atp_readb_io(dev, c, 0x17) & 0x0f;
1993 if (j == 0x0f) {
1994 goto u3p_in;
1995 }
1996 if (j == 0x0a) {
1997 goto u3p_cmd;
1998 }
1999 if (j == 0x0e) {
2000 goto u3p_out;
2001 }
2002 continue;
2003u3p_in:
2004 atp_writeb_io(dev, c, 0x14, 0x09);
2005 atp_writeb_io(dev, c, 0x18, 0x20);
2006 k = 0;
2007u3p_in1:
2008 j = atp_readb_io(dev, c, 0x1f);
2009 if ((j & 0x01) != 0) {
2010 mbuf[k++] = atp_readb_io(dev, c, 0x19);
2011 goto u3p_in1;
2012 }
2013 if ((j & 0x80) == 0x00) {
2014 goto u3p_in1;
2015 }
2016 j = atp_readb_io(dev, c, 0x17) & 0x0f;
2017 if (j == 0x0f) {
2018 goto u3p_in;
2019 }
2020 if (j == 0x0a) {
2021 goto u3p_cmd;
2022 }
2023 if (j == 0x0e) {
2024 goto u3p_out;
2025 }
2026 continue;
2027u3p_cmd:
2028 atp_writeb_io(dev, c, 0x10, 0x30);
2029 atp_writeb_io(dev, c, 0x14, 0x00);
2030 atp_writeb_io(dev, c, 0x18, 0x08);
2031
2032 while ((atp_readb_io(dev, c, 0x1f) & 0x80) == 0x00);
2033
2034 j = atp_readb_io(dev, c, 0x17);
2035 if (j != 0x16) {
2036 if (j == 0x4e) {
2037 goto u3p_out;
2038 }
2039 continue;
2040 }
2041 if (mbuf[0] != 0x01) {
2042 goto chg_wide;
2043 }
2044 if (mbuf[1] != 0x06) {
2045 goto chg_wide;
2046 }
2047 if (mbuf[2] != 0x04) {
2048 goto chg_wide;
2049 }
2050 if (mbuf[3] == 0x09) {
2051 m = 1;
2052 m = m << i;
2053 dev->wide_id[c] |= m;
2054 dev->id[c][i].devsp = 0xce;
2055#ifdef ED_DBGP
2056 printk("dev->id[%2d][%2d].devsp = %2x\n",
2057 c, i, dev->id[c][i].devsp);
2058#endif
2059 continue;
2060 }
2061chg_wide:
2062 atp_writeb_io(dev, c, 0x1b, 0x01);
2063 atp_writeb_io(dev, c, 3, satn[0]);
2064 atp_writeb_io(dev, c, 4, satn[1]);
2065 atp_writeb_io(dev, c, 5, satn[2]);
2066 atp_writeb_io(dev, c, 6, satn[3]);
2067 atp_writeb_io(dev, c, 7, satn[4]);
2068 atp_writeb_io(dev, c, 8, satn[5]);
2069 atp_writeb_io(dev, c, 0x0f, 0);
2070 atp_writeb_io(dev, c, 0x11, dev->id[c][i].devsp);
2071 atp_writeb_io(dev, c, 0x12, 0);
2072 atp_writeb_io(dev, c, 0x13, satn[6]);
2073 atp_writeb_io(dev, c, 0x14, satn[7]);
2074 atp_writeb_io(dev, c, 0x18, satn[8]);
2075
2076 while ((atp_readb_io(dev, c, 0x1f) & 0x80) == 0x00)
2077 cpu_relax();
2078
2079 if (atp_readb_io(dev, c, 0x17) != 0x11 &&
2080 atp_readb_io(dev, c, 0x17) != 0x8e)
2081 continue;
2082
2083 while (atp_readb_io(dev, c, 0x17) != 0x8e)
2084 cpu_relax();
2085
2086try_wide:
2087 j = 0;
2088 atp_writeb_io(dev, c, 0x14, 0x05);
2089 atp_writeb_io(dev, c, 0x18, 0x20);
2090
2091 while ((atp_readb_io(dev, c, 0x1f) & 0x80) == 0) {
2092 if ((atp_readb_io(dev, c, 0x1f) & 0x01) != 0)
2093 atp_writeb_io(dev, c, 0x19, wide[j++]);
2094 cpu_relax();
2095 }
2096
2097 while ((atp_readb_io(dev, c, 0x17) & 0x80) == 0x00)
2098 cpu_relax();
2099
2100 j = atp_readb_io(dev, c, 0x17) & 0x0f;
2101 if (j == 0x0f) {
2102 goto widep_in;
2103 }
2104 if (j == 0x0a) {
2105 goto widep_cmd;
2106 }
2107 if (j == 0x0e) {
2108 goto try_wide;
2109 }
2110 continue;
2111widep_out:
2112 atp_writeb_io(dev, c, 0x18, 0x20);
2113 while ((atp_readb_io(dev, c, 0x1f) & 0x80) == 0) {
2114 if ((atp_readb_io(dev, c, 0x1f) & 0x01) != 0)
2115 atp_writeb_io(dev, c, 0x19, 0);
2116 cpu_relax();
2117 }
2118 j = atp_readb_io(dev, c, 0x17) & 0x0f;
2119 if (j == 0x0f) {
2120 goto widep_in;
2121 }
2122 if (j == 0x0a) {
2123 goto widep_cmd;
2124 }
2125 if (j == 0x0e) {
2126 goto widep_out;
2127 }
2128 continue;
2129widep_in:
2130 atp_writeb_io(dev, c, 0x14, 0xff);
2131 atp_writeb_io(dev, c, 0x18, 0x20);
2132 k = 0;
2133widep_in1:
2134 j = atp_readb_io(dev, c, 0x1f);
2135 if ((j & 0x01) != 0) {
2136 mbuf[k++] = atp_readb_io(dev, c, 0x19);
2137 goto widep_in1;
2138 }
2139 if ((j & 0x80) == 0x00) {
2140 goto widep_in1;
2141 }
2142 j = atp_readb_io(dev, c, 0x17) & 0x0f;
2143 if (j == 0x0f) {
2144 goto widep_in;
2145 }
2146 if (j == 0x0a) {
2147 goto widep_cmd;
2148 }
2149 if (j == 0x0e) {
2150 goto widep_out;
2151 }
2152 continue;
2153widep_cmd:
2154 atp_writeb_io(dev, c, 0x10, 0x30);
2155 atp_writeb_io(dev, c, 0x14, 0x00);
2156 atp_writeb_io(dev, c, 0x18, 0x08);
2157
2158 while ((atp_readb_io(dev, c, 0x1f) & 0x80) == 0x00)
2159 cpu_relax();
2160
2161 j = atp_readb_io(dev, c, 0x17);
2162 if (j != 0x16) {
2163 if (j == 0x4e) {
2164 goto widep_out;
2165 }
2166 continue;
2167 }
2168 if (mbuf[0] != 0x01) {
2169 goto not_wide;
2170 }
2171 if (mbuf[1] != 0x02) {
2172 goto not_wide;
2173 }
2174 if (mbuf[2] != 0x03) {
2175 goto not_wide;
2176 }
2177 if (mbuf[3] != 0x01) {
2178 goto not_wide;
2179 }
2180 m = 1;
2181 m = m << i;
2182 dev->wide_id[c] |= m;
2183not_wide:
2184 if ((dev->id[c][i].devtype == 0x00) ||
2185 (dev->id[c][i].devtype == 0x07) ||
2186 ((dev->id[c][i].devtype == 0x05) && ((n & 0x10) != 0))) {
2187 m = 1;
2188 m = m << i;
2189 if ((dev->async[c] & m) != 0) {
2190 goto set_sync;
2191 }
2192 }
2193 continue;
2194set_sync:
2195 if ((!is885(dev) && !is880(dev)) || (dev->sp[c][i] == 0x02)) {
2196 synu[4] = 0x0c;
2197 synuw[4] = 0x0c;
2198 } else {
2199 if (dev->sp[c][i] >= 0x03) {
2200 synu[4] = 0x0a;
2201 synuw[4] = 0x0a;
2202 }
2203 }
2204 j = 0;
2205 if ((m & dev->wide_id[c]) != 0) {
2206 j |= 0x01;
2207 }
2208 atp_writeb_io(dev, c, 0x1b, j);
2209 atp_writeb_io(dev, c, 3, satn[0]);
2210 atp_writeb_io(dev, c, 4, satn[1]);
2211 atp_writeb_io(dev, c, 5, satn[2]);
2212 atp_writeb_io(dev, c, 6, satn[3]);
2213 atp_writeb_io(dev, c, 7, satn[4]);
2214 atp_writeb_io(dev, c, 8, satn[5]);
2215 atp_writeb_io(dev, c, 0x0f, 0);
2216 atp_writeb_io(dev, c, 0x11, dev->id[c][i].devsp);
2217 atp_writeb_io(dev, c, 0x12, 0);
2218 atp_writeb_io(dev, c, 0x13, satn[6]);
2219 atp_writeb_io(dev, c, 0x14, satn[7]);
2220 atp_writeb_io(dev, c, 0x18, satn[8]);
2221
2222 while ((atp_readb_io(dev, c, 0x1f) & 0x80) == 0x00)
2223 cpu_relax();
2224
2225 if (atp_readb_io(dev, c, 0x17) != 0x11 &&
2226 atp_readb_io(dev, c, 0x17) != 0x8e)
2227 continue;
2228
2229 while (atp_readb_io(dev, c, 0x17) != 0x8e)
2230 cpu_relax();
2231
2232try_sync:
2233 j = 0;
2234 atp_writeb_io(dev, c, 0x14, 0x06);
2235 atp_writeb_io(dev, c, 0x18, 0x20);
2236
2237 while ((atp_readb_io(dev, c, 0x1f) & 0x80) == 0) {
2238 if ((atp_readb_io(dev, c, 0x1f) & 0x01) != 0) {
2239 if ((m & dev->wide_id[c]) != 0) {
2240 if (is885(dev) || is880(dev)) {
2241 if ((m & dev->ultra_map[c]) != 0) {
2242 atp_writeb_io(dev, c, 0x19, synuw[j++]);
2243 } else {
2244 atp_writeb_io(dev, c, 0x19, synw[j++]);
2245 }
2246 } else
2247 atp_writeb_io(dev, c, 0x19, synw_870[j++]);
2248 } else {
2249 if ((m & dev->ultra_map[c]) != 0) {
2250 atp_writeb_io(dev, c, 0x19, synu[j++]);
2251 } else {
2252 atp_writeb_io(dev, c, 0x19, synn[j++]);
2253 }
2254 }
2255 }
2256 }
2257
2258 while ((atp_readb_io(dev, c, 0x17) & 0x80) == 0x00)
2259 cpu_relax();
2260
2261 j = atp_readb_io(dev, c, 0x17) & 0x0f;
2262 if (j == 0x0f) {
2263 goto phase_ins;
2264 }
2265 if (j == 0x0a) {
2266 goto phase_cmds;
2267 }
2268 if (j == 0x0e) {
2269 goto try_sync;
2270 }
2271 continue;
2272phase_outs:
2273 atp_writeb_io(dev, c, 0x18, 0x20);
2274 while ((atp_readb_io(dev, c, 0x1f) & 0x80) == 0x00) {
2275 if ((atp_readb_io(dev, c, 0x1f) & 0x01) != 0x00)
2276 atp_writeb_io(dev, c, 0x19, 0x00);
2277 cpu_relax();
2278 }
2279 j = atp_readb_io(dev, c, 0x17);
2280 if (j == 0x85) {
2281 goto tar_dcons;
2282 }
2283 j &= 0x0f;
2284 if (j == 0x0f) {
2285 goto phase_ins;
2286 }
2287 if (j == 0x0a) {
2288 goto phase_cmds;
2289 }
2290 if (j == 0x0e) {
2291 goto phase_outs;
2292 }
2293 continue;
2294phase_ins:
2295 if (is885(dev) || is880(dev))
2296 atp_writeb_io(dev, c, 0x14, 0x06);
2297 else
2298 atp_writeb_io(dev, c, 0x14, 0xff);
2299 atp_writeb_io(dev, c, 0x18, 0x20);
2300 k = 0;
2301phase_ins1:
2302 j = atp_readb_io(dev, c, 0x1f);
2303 if ((j & 0x01) != 0x00) {
2304 mbuf[k++] = atp_readb_io(dev, c, 0x19);
2305 goto phase_ins1;
2306 }
2307 if ((j & 0x80) == 0x00) {
2308 goto phase_ins1;
2309 }
2310
2311 while ((atp_readb_io(dev, c, 0x17) & 0x80) == 0x00);
2312
2313 j = atp_readb_io(dev, c, 0x17);
2314 if (j == 0x85) {
2315 goto tar_dcons;
2316 }
2317 j &= 0x0f;
2318 if (j == 0x0f) {
2319 goto phase_ins;
2320 }
2321 if (j == 0x0a) {
2322 goto phase_cmds;
2323 }
2324 if (j == 0x0e) {
2325 goto phase_outs;
2326 }
2327 continue;
2328phase_cmds:
2329 atp_writeb_io(dev, c, 0x10, 0x30);
2330tar_dcons:
2331 atp_writeb_io(dev, c, 0x14, 0x00);
2332 atp_writeb_io(dev, c, 0x18, 0x08);
2333
2334 while ((atp_readb_io(dev, c, 0x1f) & 0x80) == 0x00)
2335 cpu_relax();
2336
2337 j = atp_readb_io(dev, c, 0x17);
2338 if (j != 0x16) {
2339 continue;
2340 }
2341 if (mbuf[0] != 0x01) {
2342 continue;
2343 }
2344 if (mbuf[1] != 0x03) {
2345 continue;
2346 }
2347 if (mbuf[4] == 0x00) {
2348 continue;
2349 }
2350 if (mbuf[3] > 0x64) {
2351 continue;
2352 }
2353 if (is885(dev) || is880(dev)) {
2354 if (mbuf[4] > 0x0e) {
2355 mbuf[4] = 0x0e;
2356 }
2357 } else {
2358 if (mbuf[4] > 0x0c) {
2359 mbuf[4] = 0x0c;
2360 }
2361 }
2362 dev->id[c][i].devsp = mbuf[4];
2363 if (is885(dev) || is880(dev))
2364 if (mbuf[3] < 0x0c) {
2365 j = 0xb0;
2366 goto set_syn_ok;
2367 }
2368 if ((mbuf[3] < 0x0d) && (rmb == 0)) {
2369 j = 0xa0;
2370 goto set_syn_ok;
2371 }
2372 if (mbuf[3] < 0x1a) {
2373 j = 0x20;
2374 goto set_syn_ok;
2375 }
2376 if (mbuf[3] < 0x33) {
2377 j = 0x40;
2378 goto set_syn_ok;
2379 }
2380 if (mbuf[3] < 0x4c) {
2381 j = 0x50;
2382 goto set_syn_ok;
2383 }
2384 j = 0x60;
2385set_syn_ok:
2386 dev->id[c][i].devsp = (dev->id[c][i].devsp & 0x0f) | j;
2387#ifdef ED_DBGP
2388 printk("dev->id[%2d][%2d].devsp = %2x\n",
2389 c,i,dev->id[c][i].devsp);
2390#endif
2391 }
2392}
2393
