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