linux/drivers/scsi/atp870u.c
<<
>>
Prefs
   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
  42static struct scsi_host_template atp870u_template;
  43static void send_s870(struct atp_unit *dev,unsigned char c);
  44static void atp_is(struct atp_unit *dev, unsigned char c, bool wide_chip, unsigned char lvdmode);
  45
  46static inline void atp_writeb_base(struct atp_unit *atp, u8 reg, u8 val)
  47{
  48        outb(val, atp->baseport + reg);
  49}
  50
  51static inline void atp_writew_base(struct atp_unit *atp, u8 reg, u16 val)
  52{
  53        outw(val, atp->baseport + reg);
  54}
  55
  56static 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
  61static 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
  66static 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
  71static 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
  76static inline u8 atp_readb_base(struct atp_unit *atp, u8 reg)
  77{
  78        return inb(atp->baseport + reg);
  79}
  80
  81static inline u16 atp_readw_base(struct atp_unit *atp, u8 reg)
  82{
  83        return inw(atp->baseport + reg);
  84}
  85
  86static inline u32 atp_readl_base(struct atp_unit *atp, u8 reg)
  87{
  88        return inl(atp->baseport + reg);
  89}
  90
  91static inline u8 atp_readb_io(struct atp_unit *atp, u8 channel, u8 reg)
  92{
  93        return inb(atp->ioport[channel] + reg);
  94}
  95
  96static inline u16 atp_readw_io(struct atp_unit *atp, u8 channel, u8 reg)
  97{
  98        return inw(atp->ioport[channel] + reg);
  99}
 100
 101static inline u8 atp_readb_pci(struct atp_unit *atp, u8 channel, u8 reg)
 102{
 103        return inb(atp->pciport[channel] + reg);
 104}
 105
 106static inline bool is880(struct atp_unit *atp)
 107{
 108        return atp->pdev->device == ATP880_DEVID1 ||
 109               atp->pdev->device == ATP880_DEVID2;
 110}
 111
 112static inline bool is885(struct atp_unit *atp)
 113{
 114        return atp->pdev->device == ATP885_DEVID;
 115}
 116
 117static 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 */
 582static 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
 670static 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 */
 681static 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
 933static 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
 966static 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        mdelay(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
1188static 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                        pci_free_consistent(atp_dev->pdev, 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
1202static 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 = pci_alloc_consistent(atp_dev->pdev, 1024, &(atp_dev->id[c][k].prd_bus));
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
1240static 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
1252static 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        mdelay(32);
1290        atp_writeb_base(atpdev, 0x3a, k);
1291        mdelay(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
1303static 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        mdelay(32);
1374        atp_writeb_base(atpdev, 0x3b, 0);
1375        mdelay(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
1388static 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                                ((unsigned long *)&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                                ((unsigned long *)&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        mdelay(100);
1458        atp_writeb_pci(atpdev, 0, 1, 0);
1459        atp_writeb_pci(atpdev, 1, 1, 0);
1460        mdelay(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        mdelay(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 */
1497static 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 (pci_set_dma_mask(pdev, 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
1567scsi_add_fail:
1568        free_irq(shpnt->irq, shpnt);
1569free_tables:
1570        atp870u_free_tables(shpnt);
1571unregister:
1572        scsi_host_put(shpnt);
1573release_region:
1574        pci_release_regions(pdev);
1575disable_device:
1576        pci_disable_device(pdev);
1577fail:
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
1585static 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
1618static 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
1627static 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
1637static 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
1657static 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}
1670MODULE_LICENSE("GPL");
1671
1672static 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
1688static 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
1702MODULE_DEVICE_TABLE(pci, atp870u_id_table);
1703
1704static struct pci_driver atp870u_driver = {
1705        .id_table       = atp870u_id_table,
1706        .name           = "atp870u",
1707        .probe          = atp870u_probe,
1708        .remove         = atp870u_remove,
1709};
1710
1711module_pci_driver(atp870u_driver);
1712
1713static 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
1778phase_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                }
1789sel_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;
1817rd_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
1842inq_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
1891try_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;
1916u3p_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;
1934u3p_in:
1935                atp_writeb_io(dev, c, 0x14, 0x09);
1936                atp_writeb_io(dev, c, 0x18, 0x20);
1937                k = 0;
1938u3p_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;
1958u3p_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                }
1991chg_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
2015try_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;
2040widep_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;
2058widep_in:
2059                atp_writeb_io(dev, c, 0x14, 0xff);
2060                atp_writeb_io(dev, c, 0x18, 0x20);
2061                k = 0;
2062widep_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;
2082widep_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;
2112not_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;
2121set_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
2158try_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;
2198phase_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;
2220phase_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;
2227phase_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;
2254phase_cmds:
2255                atp_writeb_io(dev, c, 0x10, 0x30);
2256tar_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;
2311set_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