/*

  FlashPoint.c -- FlashPoint SCCB Manager for Linux

  This file contains the FlashPoint SCCB Manager from BusLogic's FlashPoint
  Driver Developer's Kit, with minor modifications by Leonard N. Zubkoff for
  Linux compatibility.  It was provided by BusLogic in the form of 16 separate
  source files, which would have unnecessarily cluttered the scsi directory, so
  the individual files have been combined into this single file.

  Copyright 1995-1996 by Mylex Corporation.  All Rights Reserved

  This file is available under both the GNU General Public License
  and a BSD-style copyright; see LICENSE.FlashPoint for details.

*/


#ifdef CONFIG_SCSI_FLASHPOINT

#define MAX_CARDS       8
#undef BUSTYPE_PCI

#define CRCMASK 0xA001

#define FAILURE         0xFFFFFFFFL

struct sccb;
typedef void (*CALL_BK_FN) (struct sccb *);

struct sccb_mgr_info {
        unsigned long si_baseaddr;
        unsigned char si_present;
        unsigned char si_intvect;
        unsigned char si_id;
        unsigned char si_lun;
        unsigned short si_fw_revision;
        unsigned short si_per_targ_init_sync;
        unsigned short si_per_targ_fast_nego;
        unsigned short si_per_targ_ultra_nego;
        unsigned short si_per_targ_no_disc;
        unsigned short si_per_targ_wide_nego;
        unsigned short si_flags;
        unsigned char si_card_family;
        unsigned char si_bustype;
        unsigned char si_card_model[3];
        unsigned char si_relative_cardnum;
        unsigned char si_reserved[4];
        unsigned long si_OS_reserved;
        unsigned char si_XlatInfo[4];
        unsigned long si_reserved2[5];
        unsigned long si_secondary_range;
};

#define SCSI_PARITY_ENA           0x0001
#define LOW_BYTE_TERM             0x0010
#define HIGH_BYTE_TERM            0x0020
#define BUSTYPE_PCI       0x3

#define SUPPORT_16TAR_32LUN       0x0002
#define SOFT_RESET                0x0004
#define EXTENDED_TRANSLATION      0x0008
#define POST_ALL_UNDERRRUNS       0x0040
#define FLAG_SCAM_ENABLED         0x0080
#define FLAG_SCAM_LEVEL2          0x0100

#define HARPOON_FAMILY        0x02

/* SCCB struct used for both SCCB and UCB manager compiles! 
 * The UCB Manager treats the SCCB as it's 'native hardware structure' 
 */

#pragma pack(1)
struct sccb {
        unsigned char OperationCode;
        unsigned char ControlByte;
        unsigned char CdbLength;
        unsigned char RequestSenseLength;
        unsigned long DataLength;
        unsigned long DataPointer;
        unsigned char CcbRes[2];
        unsigned char HostStatus;
        unsigned char TargetStatus;
        unsigned char TargID;
        unsigned char Lun;
        unsigned char Cdb[12];
        unsigned char CcbRes1;
        unsigned char Reserved1;
        unsigned long Reserved2;
        unsigned long SensePointer;

        CALL_BK_FN SccbCallback;        /* VOID (*SccbCallback)(); */
        unsigned long SccbIOPort;       /* Identifies board base port */
        unsigned char SccbStatus;
        unsigned char SCCBRes2;
        unsigned short SccbOSFlags;

        unsigned long Sccb_XferCnt;     /* actual transfer count */
        unsigned long Sccb_ATC;
        unsigned long SccbVirtDataPtr;  /* virtual addr for OS/2 */
        unsigned long Sccb_res1;
        unsigned short Sccb_MGRFlags;
        unsigned short Sccb_sgseg;
        unsigned char Sccb_scsimsg;     /* identify msg for selection */
        unsigned char Sccb_tag;
        unsigned char Sccb_scsistat;
        unsigned char Sccb_idmsg;       /* image of last msg in */
        struct sccb *Sccb_forwardlink;
        struct sccb *Sccb_backlink;
        unsigned long Sccb_savedATC;
        unsigned char Save_Cdb[6];
        unsigned char Save_CdbLen;
        unsigned char Sccb_XferState;
        unsigned long Sccb_SGoffset;
};

#pragma pack()

#define SCATTER_GATHER_COMMAND    0x02
#define RESIDUAL_COMMAND          0x03
#define RESIDUAL_SG_COMMAND       0x04
#define RESET_COMMAND             0x81

#define F_USE_CMD_Q              0x20   /*Inidcates TAGGED command. */
#define TAG_TYPE_MASK            0xC0   /*Type of tag msg to send. */
#define SCCB_DATA_XFER_OUT       0x10   /* Write */
#define SCCB_DATA_XFER_IN        0x08   /* Read */

#define NO_AUTO_REQUEST_SENSE    0x01   /* No Request Sense Buffer */

#define BUS_FREE_ST     0
#define SELECT_ST       1
#define SELECT_BDR_ST   2       /* Select w\ Bus Device Reset */
#define SELECT_SN_ST    3       /* Select w\ Sync Nego */
#define SELECT_WN_ST    4       /* Select w\ Wide Data Nego */
#define SELECT_Q_ST     5       /* Select w\ Tagged Q'ing */
#define COMMAND_ST      6
#define DATA_OUT_ST     7
#define DATA_IN_ST      8
#define DISCONNECT_ST   9
#define ABORT_ST        11

#define F_HOST_XFER_DIR                0x01
#define F_ALL_XFERRED                  0x02
#define F_SG_XFER                      0x04
#define F_AUTO_SENSE                   0x08
#define F_ODD_BALL_CNT                 0x10
#define F_NO_DATA_YET                  0x80

#define F_STATUSLOADED                 0x01
#define F_DEV_SELECTED                 0x04

#define SCCB_COMPLETE               0x00        /* SCCB completed without error */
#define SCCB_DATA_UNDER_RUN         0x0C
#define SCCB_SELECTION_TIMEOUT      0x11        /* Set SCSI selection timed out */
#define SCCB_DATA_OVER_RUN          0x12
#define SCCB_PHASE_SEQUENCE_FAIL    0x14        /* Target bus phase sequence failure */

#define SCCB_GROSS_FW_ERR           0x27        /* Major problem! */
#define SCCB_BM_ERR                 0x30        /* BusMaster error. */
#define SCCB_PARITY_ERR             0x34        /* SCSI parity error */

#define SCCB_IN_PROCESS            0x00
#define SCCB_SUCCESS               0x01
#define SCCB_ABORT                 0x02
#define SCCB_ERROR                 0x04

#define  ORION_FW_REV      3110

#define QUEUE_DEPTH     254+1   /*1 for Normal disconnect 32 for Q'ing. */

#define MAX_MB_CARDS    4       /* Max. no of cards suppoerted on Mother Board */

#define MAX_SCSI_TAR    16
#define MAX_LUN         32
#define LUN_MASK                        0x1f

#define SG_BUF_CNT      16      /*Number of prefetched elements. */

#define SG_ELEMENT_SIZE 8       /*Eight byte per element. */

#define RD_HARPOON(ioport)          inb((u32)ioport)
#define RDW_HARPOON(ioport)         inw((u32)ioport)
#define RD_HARP32(ioport,offset,data) (data = inl((u32)(ioport + offset)))
#define WR_HARPOON(ioport,val)      outb((u8) val, (u32)ioport)
#define WRW_HARPOON(ioport,val)       outw((u16)val, (u32)ioport)
#define WR_HARP32(ioport,offset,data)  outl(data, (u32)(ioport + offset))

#define  TAR_SYNC_MASK     (BIT(7)+BIT(6))
#define  SYNC_TRYING               BIT(6)
#define  SYNC_SUPPORTED    (BIT(7)+BIT(6))

#define  TAR_WIDE_MASK     (BIT(5)+BIT(4))
#define  WIDE_ENABLED              BIT(4)
#define  WIDE_NEGOCIATED   BIT(5)

#define  TAR_TAG_Q_MASK    (BIT(3)+BIT(2))
#define  TAG_Q_TRYING              BIT(2)
#define  TAG_Q_REJECT      BIT(3)

#define  TAR_ALLOW_DISC    BIT(0)

#define  EE_SYNC_MASK      (BIT(0)+BIT(1))
#define  EE_SYNC_5MB       BIT(0)
#define  EE_SYNC_10MB      BIT(1)
#define  EE_SYNC_20MB      (BIT(0)+BIT(1))

#define  EE_WIDE_SCSI      BIT(7)

struct sccb_mgr_tar_info {

        struct sccb *TarSelQ_Head;
        struct sccb *TarSelQ_Tail;
        unsigned char TarLUN_CA;        /*Contingent Allgiance */
        unsigned char TarTagQ_Cnt;
        unsigned char TarSelQ_Cnt;
        unsigned char TarStatus;
        unsigned char TarEEValue;
        unsigned char TarSyncCtrl;
        unsigned char TarReserved[2];   /* for alignment */
        unsigned char LunDiscQ_Idx[MAX_LUN];
        unsigned char TarLUNBusy[MAX_LUN];
};

struct nvram_info {
        unsigned char niModel;  /* Model No. of card */
        unsigned char niCardNo; /* Card no. */
        unsigned long niBaseAddr;       /* Port Address of card */
        unsigned char niSysConf;        /* Adapter Configuration byte - Byte 16 of eeprom map */
        unsigned char niScsiConf;       /* SCSI Configuration byte - Byte 17 of eeprom map */
        unsigned char niScamConf;       /* SCAM Configuration byte - Byte 20 of eeprom map */
        unsigned char niAdapId; /* Host Adapter ID - Byte 24 of eerpom map */
        unsigned char niSyncTbl[MAX_SCSI_TAR / 2];      /* Sync/Wide byte of targets */
        unsigned char niScamTbl[MAX_SCSI_TAR][4];       /* Compressed Scam name string of Targets */
};

#define MODEL_LT                1
#define MODEL_DL                2
#define MODEL_LW                3
#define MODEL_DW                4

struct sccb_card {
        struct sccb *currentSCCB;
        struct sccb_mgr_info *cardInfo;

        unsigned long ioPort;

        unsigned short cmdCounter;
        unsigned char discQCount;
        unsigned char tagQ_Lst;
        unsigned char cardIndex;
        unsigned char scanIndex;
        unsigned char globalFlags;
        unsigned char ourId;
        struct nvram_info *pNvRamInfo;
        struct sccb *discQ_Tbl[QUEUE_DEPTH];

};

#define F_TAG_STARTED           0x01
#define F_CONLUN_IO                     0x02
#define F_DO_RENEGO                     0x04
#define F_NO_FILTER                     0x08
#define F_GREEN_PC                      0x10
#define F_HOST_XFER_ACT         0x20
#define F_NEW_SCCB_CMD          0x40
#define F_UPDATE_EEPROM         0x80

#define  ID_STRING_LENGTH  32
#define  TYPE_CODE0        0x63 /*Level2 Mstr (bits 7-6),  */

#define  SLV_TYPE_CODE0    0xA3 /*Priority Bit set (bits 7-6),  */

#define  ASSIGN_ID   0x00
#define  SET_P_FLAG  0x01
#define  CFG_CMPLT   0x03
#define  DOM_MSTR    0x0F
#define  SYNC_PTRN   0x1F

#define  ID_0_7      0x18
#define  ID_8_F      0x11
#define  MISC_CODE   0x14
#define  CLR_P_FLAG  0x18

#define  INIT_SELTD  0x01
#define  LEVEL2_TAR  0x02

enum scam_id_st { ID0, ID1, ID2, ID3, ID4, ID5, ID6, ID7, ID8, ID9, ID10, ID11,
            ID12,
        ID13, ID14, ID15, ID_UNUSED, ID_UNASSIGNED, ID_ASSIGNED, LEGACY,
        CLR_PRIORITY, NO_ID_AVAIL
};

typedef struct SCCBscam_info {

        unsigned char id_string[ID_STRING_LENGTH];
        enum scam_id_st state;

} SCCBSCAM_INFO;

#define  SCSI_REQUEST_SENSE      0x03
#define  SCSI_READ               0x08
#define  SCSI_WRITE              0x0A
#define  SCSI_START_STOP_UNIT    0x1B
#define  SCSI_READ_EXTENDED      0x28
#define  SCSI_WRITE_EXTENDED     0x2A
#define  SCSI_WRITE_AND_VERIFY   0x2E

#define  SSGOOD                  0x00
#define  SSCHECK                 0x02
#define  SSQ_FULL                0x28

#define  SMCMD_COMP              0x00
#define  SMEXT                   0x01
#define  SMSAVE_DATA_PTR         0x02
#define  SMREST_DATA_PTR         0x03
#define  SMDISC                  0x04
#define  SMABORT                 0x06
#define  SMREJECT                0x07
#define  SMNO_OP                 0x08
#define  SMPARITY                0x09
#define  SMDEV_RESET             0x0C
#define SMABORT_TAG                                     0x0D
#define SMINIT_RECOVERY                 0x0F
#define SMREL_RECOVERY                          0x10

#define  SMIDENT                 0x80
#define  DISC_PRIV               0x40

#define  SMSYNC                  0x01
#define  SMWDTR                  0x03
#define  SM8BIT                  0x00
#define  SM16BIT                 0x01
#define  SMIGNORWR               0x23   /* Ignore Wide Residue */

#define  SIX_BYTE_CMD            0x06
#define  TWELVE_BYTE_CMD         0x0C

#define  ASYNC                   0x00
#define  MAX_OFFSET              0x0F   /* Maxbyteoffset for Sync Xfers */

#define  EEPROM_WD_CNT     256

#define  EEPROM_CHECK_SUM  0
#define  FW_SIGNATURE      2
#define  MODEL_NUMB_0      4
#define  MODEL_NUMB_2      6
#define  MODEL_NUMB_4      8
#define  SYSTEM_CONFIG     16
#define  SCSI_CONFIG       17
#define  BIOS_CONFIG       18
#define  SCAM_CONFIG       20
#define  ADAPTER_SCSI_ID   24

#define  IGNORE_B_SCAN     32
#define  SEND_START_ENA    34
#define  DEVICE_ENABLE     36

#define  SYNC_RATE_TBL     38
#define  SYNC_RATE_TBL01   38
#define  SYNC_RATE_TBL23   40
#define  SYNC_RATE_TBL45   42
#define  SYNC_RATE_TBL67   44
#define  SYNC_RATE_TBL89   46
#define  SYNC_RATE_TBLab   48
#define  SYNC_RATE_TBLcd   50
#define  SYNC_RATE_TBLef   52

#define  EE_SCAMBASE      256

#define  SCAM_ENABLED   BIT(2)
#define  SCAM_LEVEL2    BIT(3)

#define RENEGO_ENA              BIT(10)
#define CONNIO_ENA              BIT(11)
#define  GREEN_PC_ENA   BIT(12)

#define  AUTO_RATE_00   00
#define  AUTO_RATE_05   01
#define  AUTO_RATE_10   02
#define  AUTO_RATE_20   03

#define  WIDE_NEGO_BIT     BIT(7)
#define  DISC_ENABLE_BIT   BIT(6)

#define  hp_vendor_id_0       0x00      /* LSB */
#define  ORION_VEND_0   0x4B

#define  hp_vendor_id_1       0x01      /* MSB */
#define  ORION_VEND_1   0x10

#define  hp_device_id_0       0x02      /* LSB */
#define  ORION_DEV_0    0x30

#define  hp_device_id_1       0x03      /* MSB */
#define  ORION_DEV_1    0x81

        /* Sub Vendor ID and Sub Device ID only available in
           Harpoon Version 2 and higher */

#define  hp_sub_device_id_0   0x06      /* LSB */

#define  hp_semaphore         0x0C
#define SCCB_MGR_ACTIVE    BIT(0)
#define TICKLE_ME          BIT(1)
#define SCCB_MGR_PRESENT   BIT(3)
#define BIOS_IN_USE        BIT(4)

#define  hp_sys_ctrl          0x0F

#define  STOP_CLK          BIT(0)       /*Turn off BusMaster Clock */
#define  DRVR_RST          BIT(1)       /*Firmware Reset to 80C15 chip */
#define  HALT_MACH         BIT(3)       /*Halt State Machine      */
#define  HARD_ABORT        BIT(4)       /*Hard Abort              */

#define  hp_host_blk_cnt      0x13

#define  XFER_BLK64        0x06 /*     1 1 0 64 byte per block */

#define  BM_THRESHOLD      0x40 /* PCI mode can only xfer 16 bytes */

#define  hp_int_mask          0x17

#define  INT_CMD_COMPL     BIT(0)       /* DMA command complete   */
#define  INT_EXT_STATUS    BIT(1)       /* Extended Status Set    */

#define  hp_xfer_cnt_lo       0x18
#define  hp_xfer_cnt_hi       0x1A
#define  hp_xfer_cmd          0x1B

#define  XFER_HOST_DMA     0x00 /*     0 0 0 Transfer Host -> DMA */
#define  XFER_DMA_HOST     0x01 /*     0 0 1 Transfer DMA  -> Host */

#define  XFER_HOST_AUTO    0x00 /*     0 0 Auto Transfer Size   */

#define  XFER_DMA_8BIT     0x20 /*     0 1 8 BIT  Transfer Size */

#define  DISABLE_INT       BIT(7)       /*Do not interrupt at end of cmd. */

#define  HOST_WRT_CMD      ((DISABLE_INT + XFER_HOST_DMA + XFER_HOST_AUTO + XFER_DMA_8BIT))
#define  HOST_RD_CMD       ((DISABLE_INT + XFER_DMA_HOST + XFER_HOST_AUTO + XFER_DMA_8BIT))

#define  hp_host_addr_lo      0x1C
#define  hp_host_addr_hmi     0x1E

#define  hp_ee_ctrl           0x22

#define  EXT_ARB_ACK       BIT(7)
#define  SCSI_TERM_ENA_H   BIT(6)       /* SCSI high byte terminator */
#define  SEE_MS            BIT(5)
#define  SEE_CS            BIT(3)
#define  SEE_CLK           BIT(2)
#define  SEE_DO            BIT(1)
#define  SEE_DI            BIT(0)

#define  EE_READ           0x06
#define  EE_WRITE          0x05
#define  EWEN              0x04
#define  EWEN_ADDR         0x03C0
#define  EWDS              0x04
#define  EWDS_ADDR         0x0000

#define  hp_bm_ctrl           0x26

#define  SCSI_TERM_ENA_L   BIT(0)       /*Enable/Disable external terminators */
#define  FLUSH_XFER_CNTR   BIT(1)       /*Flush transfer counter */
#define  FORCE1_XFER       BIT(5)       /*Always xfer one byte in byte mode */
#define  FAST_SINGLE       BIT(6)       /*?? */

#define  BMCTRL_DEFAULT    (FORCE1_XFER|FAST_SINGLE|SCSI_TERM_ENA_L)

#define  hp_sg_addr           0x28
#define  hp_page_ctrl         0x29

#define  SCATTER_EN        BIT(0)
#define  SGRAM_ARAM        BIT(1)
#define  G_INT_DISABLE     BIT(3)       /* Enable/Disable all Interrupts */
#define  NARROW_SCSI_CARD  BIT(4)       /* NARROW/WIDE SCSI config pin */

#define  hp_pci_stat_cfg      0x2D

#define  REC_MASTER_ABORT  BIT(5)       /*received Master abort */

#define  hp_rev_num           0x33

#define  hp_stack_data        0x34
#define  hp_stack_addr        0x35

#define  hp_ext_status        0x36

#define  BM_FORCE_OFF      BIT(0)       /*Bus Master is forced to get off */
#define  PCI_TGT_ABORT     BIT(0)       /*PCI bus master transaction aborted */
#define  PCI_DEV_TMOUT     BIT(1)       /*PCI Device Time out */
#define  CMD_ABORTED       BIT(4)       /*Command aborted */
#define  BM_PARITY_ERR     BIT(5)       /*parity error on data received   */
#define  PIO_OVERRUN       BIT(6)       /*Slave data overrun */
#define  BM_CMD_BUSY       BIT(7)       /*Bus master transfer command busy */
#define  BAD_EXT_STATUS    (BM_FORCE_OFF | PCI_DEV_TMOUT | CMD_ABORTED | \
                                  BM_PARITY_ERR | PIO_OVERRUN)

#define  hp_int_status        0x37

#define  EXT_STATUS_ON     BIT(1)       /*Extended status is valid */
#define  SCSI_INTERRUPT    BIT(2)       /*Global indication of a SCSI int. */
#define  INT_ASSERTED      BIT(5)       /* */

#define  hp_fifo_cnt          0x38

#define  hp_intena               0x40

#define  RESET           BIT(7)
#define  PROG_HLT                BIT(6)
#define  PARITY          BIT(5)
#define  FIFO            BIT(4)
#define  SEL             BIT(3)
#define  SCAM_SEL                BIT(2)
#define  RSEL            BIT(1)
#define  TIMEOUT                 BIT(0)
#define  BUS_FREE                BIT(15)
#define  XFER_CNT_0      BIT(14)
#define  PHASE           BIT(13)
#define  IUNKWN          BIT(12)
#define  ICMD_COMP       BIT(11)
#define  ITICKLE                 BIT(10)
#define  IDO_STRT                BIT(9)
#define  ITAR_DISC       BIT(8)
#define  AUTO_INT                (BIT(12)+BIT(11)+BIT(10)+BIT(9)+BIT(8))
#define  CLR_ALL_INT     0xFFFF
#define  CLR_ALL_INT_1   0xFF00

#define  hp_intstat              0x42

#define  hp_scsisig           0x44

#define  SCSI_SEL          BIT(7)
#define  SCSI_BSY          BIT(6)
#define  SCSI_REQ          BIT(5)
#define  SCSI_ACK          BIT(4)
#define  SCSI_ATN          BIT(3)
#define  SCSI_CD           BIT(2)
#define  SCSI_MSG          BIT(1)
#define  SCSI_IOBIT        BIT(0)

#define  S_SCSI_PHZ        (BIT(2)+BIT(1)+BIT(0))
#define  S_MSGO_PH         (BIT(2)+BIT(1)       )
#define  S_MSGI_PH         (BIT(2)+BIT(1)+BIT(0))
#define  S_DATAI_PH        (              BIT(0))
#define  S_DATAO_PH        0x00
#define  S_ILL_PH          (       BIT(1)       )

#define  hp_scsictrl_0        0x45

#define  SEL_TAR           BIT(6)
#define  ENA_ATN           BIT(4)
#define  ENA_RESEL         BIT(2)
#define  SCSI_RST          BIT(1)
#define  ENA_SCAM_SEL      BIT(0)

#define  hp_portctrl_0        0x46

#define  SCSI_PORT         BIT(7)
#define  SCSI_INBIT        BIT(6)
#define  DMA_PORT          BIT(5)
#define  DMA_RD            BIT(4)
#define  HOST_PORT         BIT(3)
#define  HOST_WRT          BIT(2)
#define  SCSI_BUS_EN       BIT(1)
#define  START_TO          BIT(0)

#define  hp_scsireset         0x47

#define  SCSI_INI          BIT(6)
#define  SCAM_EN           BIT(5)
#define  DMA_RESET         BIT(3)
#define  HPSCSI_RESET      BIT(2)
#define  PROG_RESET        BIT(1)
#define  FIFO_CLR          BIT(0)

#define  hp_xfercnt_0         0x48
#define  hp_xfercnt_2         0x4A

#define  hp_fifodata_0        0x4C
#define  hp_addstat           0x4E

#define  SCAM_TIMER        BIT(7)
#define  SCSI_MODE8        BIT(3)
#define  SCSI_PAR_ERR      BIT(0)

#define  hp_prgmcnt_0         0x4F

#define  hp_selfid_0          0x50
#define  hp_selfid_1          0x51
#define  hp_arb_id            0x52

#define  hp_select_id         0x53

#define  hp_synctarg_base     0x54
#define  hp_synctarg_12       0x54
#define  hp_synctarg_13       0x55
#define  hp_synctarg_14       0x56
#define  hp_synctarg_15       0x57

#define  hp_synctarg_8        0x58
#define  hp_synctarg_9        0x59
#define  hp_synctarg_10       0x5A
#define  hp_synctarg_11       0x5B

#define  hp_synctarg_4        0x5C
#define  hp_synctarg_5        0x5D
#define  hp_synctarg_6        0x5E
#define  hp_synctarg_7        0x5F

#define  hp_synctarg_0        0x60
#define  hp_synctarg_1        0x61
#define  hp_synctarg_2        0x62
#define  hp_synctarg_3        0x63

#define  NARROW_SCSI       BIT(4)
#define  DEFAULT_OFFSET    0x0F

#define  hp_autostart_0       0x64
#define  hp_autostart_1       0x65
#define  hp_autostart_3       0x67

#define  AUTO_IMMED    BIT(5)
#define  SELECT   BIT(6)
#define  END_DATA (BIT(7)+BIT(6))

#define  hp_gp_reg_0          0x68
#define  hp_gp_reg_1          0x69
#define  hp_gp_reg_3          0x6B

#define  hp_seltimeout        0x6C

#define  TO_4ms            0x67 /* 3.9959ms */

#define  TO_5ms            0x03 /* 4.9152ms */
#define  TO_10ms           0x07 /* 11.xxxms */
#define  TO_250ms          0x99 /* 250.68ms */
#define  TO_290ms          0xB1 /* 289.99ms */

#define  hp_clkctrl_0         0x6D

#define  PWR_DWN           BIT(6)
#define  ACTdeassert       BIT(4)
#define  CLK_40MHZ         (BIT(1) + BIT(0))

#define  CLKCTRL_DEFAULT   (ACTdeassert | CLK_40MHZ)

#define  hp_fiforead          0x6E
#define  hp_fifowrite         0x6F

#define  hp_offsetctr         0x70
#define  hp_xferstat          0x71

#define  FIFO_EMPTY        BIT(6)

#define  hp_portctrl_1        0x72

#define  CHK_SCSI_P        BIT(3)
#define  HOST_MODE8        BIT(0)

#define  hp_xfer_pad          0x73

#define  ID_UNLOCK         BIT(3)

#define  hp_scsidata_0        0x74
#define  hp_scsidata_1        0x75

#define  hp_aramBase          0x80
#define  BIOS_DATA_OFFSET     0x60
#define  BIOS_RELATIVE_CARD   0x64

#define  AR3      (BIT(9) + BIT(8))
#define  SDATA    BIT(10)

#define  CRD_OP   BIT(11)       /* Cmp Reg. w/ Data */

#define  CRR_OP   BIT(12)       /* Cmp Reg. w. Reg. */

#define  CPE_OP   (BIT(14)+BIT(11))     /* Cmp SCSI phs & Branch EQ */

#define  CPN_OP   (BIT(14)+BIT(12))     /* Cmp SCSI phs & Branch NOT EQ */

#define  ADATA_OUT   0x00
#define  ADATA_IN    BIT(8)
#define  ACOMMAND    BIT(10)
#define  ASTATUS     (BIT(10)+BIT(8))
#define  AMSG_OUT    (BIT(10)+BIT(9))
#define  AMSG_IN     (BIT(10)+BIT(9)+BIT(8))

#define  BRH_OP   BIT(13)       /* Branch */

#define  ALWAYS   0x00
#define  EQUAL    BIT(8)
#define  NOT_EQ   BIT(9)

#define  TCB_OP   (BIT(13)+BIT(11))     /* Test condition & branch */

#define  FIFO_0      BIT(10)

#define  MPM_OP   BIT(15)       /* Match phase and move data */

#define  MRR_OP   BIT(14)       /* Move DReg. to Reg. */

#define  S_IDREG  (BIT(2)+BIT(1)+BIT(0))

#define  D_AR0    0x00
#define  D_AR1    BIT(0)
#define  D_BUCKET (BIT(2) + BIT(1) + BIT(0))

#define  RAT_OP      (BIT(14)+BIT(13)+BIT(11))

#define  SSI_OP      (BIT(15)+BIT(11))

#define  SSI_ITAR_DISC  (ITAR_DISC >> 8)
#define  SSI_IDO_STRT   (IDO_STRT >> 8)

#define  SSI_ICMD_COMP  (ICMD_COMP >> 8)
#define  SSI_ITICKLE    (ITICKLE >> 8)

#define  SSI_IUNKWN     (IUNKWN >> 8)
#define  SSI_INO_CC     (IUNKWN >> 8)
#define  SSI_IRFAIL     (IUNKWN >> 8)

#define  NP    0x10             /*Next Phase */
#define  NTCMD 0x02             /*Non- Tagged Command start */
#define  CMDPZ 0x04             /*Command phase */
#define  DINT  0x12             /*Data Out/In interrupt */
#define  DI    0x13             /*Data Out */
#define  DC    0x19             /*Disconnect Message */
#define  ST    0x1D             /*Status Phase */
#define  UNKNWN 0x24            /*Unknown bus action */
#define  CC    0x25             /*Command Completion failure */
#define  TICK  0x26             /*New target reselected us. */
#define  SELCHK 0x28            /*Select & Check SCSI ID latch reg */

#define  ID_MSG_STRT    hp_aramBase + 0x00
#define  NON_TAG_ID_MSG hp_aramBase + 0x06
#define  CMD_STRT       hp_aramBase + 0x08
#define  SYNC_MSGS      hp_aramBase + 0x08

#define  TAG_STRT          0x00
#define  DISCONNECT_START  0x10/2
#define  END_DATA_START    0x14/2
#define  CMD_ONLY_STRT     CMDPZ/2
#define  SELCHK_STRT     SELCHK/2

#define GET_XFER_CNT(port, xfercnt) {RD_HARP32(port,hp_xfercnt_0,xfercnt); xfercnt &= 0xFFFFFF;}
/* #define GET_XFER_CNT(port, xfercnt) (xfercnt = RD_HARPOON(port+hp_xfercnt_2), \
                                 xfercnt <<= 16,\
                                 xfercnt |= RDW_HARPOON((unsigned short)(port+hp_xfercnt_0)))
 */
#define HP_SETUP_ADDR_CNT(port,addr,count) (WRW_HARPOON((port+hp_host_addr_lo), (unsigned short)(addr & 0x0000FFFFL)),\
         addr >>= 16,\
         WRW_HARPOON((port+hp_host_addr_hmi), (unsigned short)(addr & 0x0000FFFFL)),\
         WR_HARP32(port,hp_xfercnt_0,count),\
         WRW_HARPOON((port+hp_xfer_cnt_lo), (unsigned short)(count & 0x0000FFFFL)),\
         count >>= 16,\
         WR_HARPOON(port+hp_xfer_cnt_hi, (count & 0xFF)))

#define ACCEPT_MSG(port) {while(RD_HARPOON(port+hp_scsisig) & SCSI_REQ){}\
                          WR_HARPOON(port+hp_scsisig, S_ILL_PH);}

#define ACCEPT_MSG_ATN(port) {while(RD_HARPOON(port+hp_scsisig) & SCSI_REQ){}\
                          WR_HARPOON(port+hp_scsisig, (S_ILL_PH|SCSI_ATN));}

#define DISABLE_AUTO(port) (WR_HARPOON(port+hp_scsireset, PROG_RESET),\
                        WR_HARPOON(port+hp_scsireset, 0x00))

#define ARAM_ACCESS(p_port) (WR_HARPOON(p_port+hp_page_ctrl, \
                             (RD_HARPOON(p_port+hp_page_ctrl) | SGRAM_ARAM)))

#define SGRAM_ACCESS(p_port) (WR_HARPOON(p_port+hp_page_ctrl, \
                             (RD_HARPOON(p_port+hp_page_ctrl) & ~SGRAM_ARAM)))

#define MDISABLE_INT(p_port) (WR_HARPOON(p_port+hp_page_ctrl, \
                             (RD_HARPOON(p_port+hp_page_ctrl) | G_INT_DISABLE)))

#define MENABLE_INT(p_port) (WR_HARPOON(p_port+hp_page_ctrl, \
                             (RD_HARPOON(p_port+hp_page_ctrl) & ~G_INT_DISABLE)))

static unsigned char FPT_sisyncn(unsigned long port, unsigned char p_card,
                                 unsigned char syncFlag);
static void FPT_ssel(unsigned long port, unsigned char p_card);
static void FPT_sres(unsigned long port, unsigned char p_card,
                     struct sccb_card *pCurrCard);
static void FPT_shandem(unsigned long port, unsigned char p_card,
                        struct sccb *pCurrSCCB);
static void FPT_stsyncn(unsigned long port, unsigned char p_card);
static void FPT_sisyncr(unsigned long port, unsigned char sync_pulse,
                        unsigned char offset);
static void FPT_sssyncv(unsigned long p_port, unsigned char p_id,
                        unsigned char p_sync_value,
                        struct sccb_mgr_tar_info *currTar_Info);
static void FPT_sresb(unsigned long port, unsigned char p_card);
static void FPT_sxfrp(unsigned long p_port, unsigned char p_card);
static void FPT_schkdd(unsigned long port, unsigned char p_card);
static unsigned char FPT_RdStack(unsigned long port, unsigned char index);
static void FPT_WrStack(unsigned long portBase, unsigned char index,
                        unsigned char data);
static unsigned char FPT_ChkIfChipInitialized(unsigned long ioPort);

static void FPT_SendMsg(unsigned long port, unsigned char message);
static void FPT_queueFlushTargSccb(unsigned char p_card, unsigned char thisTarg,
                                   unsigned char error_code);

static void FPT_sinits(struct sccb *p_sccb, unsigned char p_card);
static void FPT_RNVRamData(struct nvram_info *pNvRamInfo);

static unsigned char FPT_siwidn(unsigned long port, unsigned char p_card);
static void FPT_stwidn(unsigned long port, unsigned char p_card);
static void FPT_siwidr(unsigned long port, unsigned char width);

static void FPT_queueSelectFail(struct sccb_card *pCurrCard,
                                unsigned char p_card);
static void FPT_queueDisconnect(struct sccb *p_SCCB, unsigned char p_card);
static void FPT_queueCmdComplete(struct sccb_card *pCurrCard,
                                 struct sccb *p_SCCB, unsigned char p_card);
static void FPT_queueSearchSelect(struct sccb_card *pCurrCard,
                                  unsigned char p_card);
static void FPT_queueFlushSccb(unsigned char p_card, unsigned char error_code);
static void FPT_queueAddSccb(struct sccb *p_SCCB, unsigned char card);
static unsigned char FPT_queueFindSccb(struct sccb *p_SCCB,
                                       unsigned char p_card);
static void FPT_utilUpdateResidual(struct sccb *p_SCCB);
static unsigned short FPT_CalcCrc16(unsigned char buffer[]);
static unsigned char FPT_CalcLrc(unsigned char buffer[]);

static void FPT_Wait1Second(unsigned long p_port);
static void FPT_Wait(unsigned long p_port, unsigned char p_delay);
static void FPT_utilEEWriteOnOff(unsigned long p_port, unsigned char p_mode);
static void FPT_utilEEWrite(unsigned long p_port, unsigned short ee_data,
                            unsigned short ee_addr);
static unsigned short FPT_utilEERead(unsigned long p_port,
                                     unsigned short ee_addr);
static unsigned short FPT_utilEEReadOrg(unsigned long p_port,
                                        unsigned short ee_addr);
static void FPT_utilEESendCmdAddr(unsigned long p_port, unsigned char ee_cmd,
                                  unsigned short ee_addr);

static void FPT_phaseDataOut(unsigned long port, unsigned char p_card);
static void FPT_phaseDataIn(unsigned long port, unsigned char p_card);
static void FPT_phaseCommand(unsigned long port, unsigned char p_card);
static void FPT_phaseStatus(unsigned long port, unsigned char p_card);
static void FPT_phaseMsgOut(unsigned long port, unsigned char p_card);
static void FPT_phaseMsgIn(unsigned long port, unsigned char p_card);
static void FPT_phaseIllegal(unsigned long port, unsigned char p_card);

static void FPT_phaseDecode(unsigned long port, unsigned char p_card);
static void FPT_phaseChkFifo(unsigned long port, unsigned char p_card);
static void FPT_phaseBusFree(unsigned long p_port, unsigned char p_card);

static void FPT_XbowInit(unsigned long port, unsigned char scamFlg);
static void FPT_BusMasterInit(unsigned long p_port);
static void FPT_DiagEEPROM(unsigned long p_port);

static void FPT_dataXferProcessor(unsigned long port,
                                  struct sccb_card *pCurrCard);
static void FPT_busMstrSGDataXferStart(unsigned long port,
                                       struct sccb *pCurrSCCB);
static void FPT_busMstrDataXferStart(unsigned long port,
                                     struct sccb *pCurrSCCB);
static void FPT_hostDataXferAbort(unsigned long port, unsigned char p_card,
                                  struct sccb *pCurrSCCB);
static void FPT_hostDataXferRestart(struct sccb *currSCCB);

static unsigned char FPT_SccbMgr_bad_isr(unsigned long p_port,
                                         unsigned char p_card,
                                         struct sccb_card *pCurrCard,
                                         unsigned short p_int);

static void FPT_SccbMgrTableInitAll(void);
static void FPT_SccbMgrTableInitCard(struct sccb_card *pCurrCard,
                                     unsigned char p_card);
static void FPT_SccbMgrTableInitTarget(unsigned char p_card,
                                       unsigned char target);

static void FPT_scini(unsigned char p_card, unsigned char p_our_id,
                      unsigned char p_power_up);

static int FPT_scarb(unsigned long p_port, unsigned char p_sel_type);
static void FPT_scbusf(unsigned long p_port);
static void FPT_scsel(unsigned long p_port);
static void FPT_scasid(unsigned char p_card, unsigned long p_port);
static unsigned char FPT_scxferc(unsigned long p_port, unsigned char p_data);
static unsigned char FPT_scsendi(unsigned long p_port,
                                 unsigned char p_id_string[]);
static unsigned char FPT_sciso(unsigned long p_port,
                               unsigned char p_id_string[]);
static void FPT_scwirod(unsigned long p_port, unsigned char p_data_bit);
static void FPT_scwiros(unsigned long p_port, unsigned char p_data_bit);
static unsigned char FPT_scvalq(unsigned char p_quintet);
static unsigned char FPT_scsell(unsigned long p_port, unsigned char targ_id);
static void FPT_scwtsel(unsigned long p_port);
static void FPT_inisci(unsigned char p_card, unsigned long p_port,
                       unsigned char p_our_id);
static void FPT_scsavdi(unsigned char p_card, unsigned long p_port);
static unsigned char FPT_scmachid(unsigned char p_card,
                                  unsigned char p_id_string[]);

static void FPT_autoCmdCmplt(unsigned long p_port, unsigned char p_card);
static void FPT_autoLoadDefaultMap(unsigned long p_port);

static struct sccb_mgr_tar_info FPT_sccbMgrTbl[MAX_CARDS][MAX_SCSI_TAR] =
    { {{0}} };
static struct sccb_card FPT_BL_Card[MAX_CARDS] = { {0} };
static SCCBSCAM_INFO FPT_scamInfo[MAX_SCSI_TAR] = { {{0}} };
static struct nvram_info FPT_nvRamInfo[MAX_MB_CARDS] = { {0} };

static unsigned char FPT_mbCards = 0;
static unsigned char FPT_scamHAString[] =
    { 0x63, 0x07, 'B', 'U', 'S', 'L', 'O', 'G', 'I', 'C',
        ' ', 'B', 'T', '-', '9', '3', '0',
        0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20,
        0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20
};

static unsigned short FPT_default_intena = 0;

static void (*FPT_s_PhaseTbl[8]) (unsigned long, unsigned char) = {
0};

/*---------------------------------------------------------------------
 *
 * Function: FlashPoint_ProbeHostAdapter
 *
 * Description: Setup and/or Search for cards and return info to caller.
 *
 *---------------------------------------------------------------------*/

static int FlashPoint_ProbeHostAdapter(struct sccb_mgr_info *pCardInfo)
{
        static unsigned char first_time = 1;

        unsigned char i, j, id, ScamFlg;
        unsigned short temp, temp2, temp3, temp4, temp5, temp6;
        unsigned long ioport;
        struct nvram_info *pCurrNvRam;

        ioport = pCardInfo->si_baseaddr;

        if (RD_HARPOON(ioport + hp_vendor_id_0) != ORION_VEND_0)
                return (int)FAILURE;

        if ((RD_HARPOON(ioport + hp_vendor_id_1) != ORION_VEND_1))
                return (int)FAILURE;

        if ((RD_HARPOON(ioport + hp_device_id_0) != ORION_DEV_0))
                return (int)FAILURE;

        if ((RD_HARPOON(ioport + hp_device_id_1) != ORION_DEV_1))
                return (int)FAILURE;

        if (RD_HARPOON(ioport + hp_rev_num) != 0x0f) {

/* For new Harpoon then check for sub_device ID LSB
   the bits(0-3) must be all ZERO for compatible with
   current version of SCCBMgr, else skip this Harpoon
        device. */

                if (RD_HARPOON(ioport + hp_sub_device_id_0) & 0x0f)
                        return (int)FAILURE;
        }

        if (first_time) {
                FPT_SccbMgrTableInitAll();
                first_time = 0;
                FPT_mbCards = 0;
        }

        if (FPT_RdStack(ioport, 0) != 0x00) {
                if (FPT_ChkIfChipInitialized(ioport) == 0) {
                        pCurrNvRam = NULL;
                        WR_HARPOON(ioport + hp_semaphore, 0x00);
                        FPT_XbowInit(ioport, 0);        /*Must Init the SCSI before attempting */
                        FPT_DiagEEPROM(ioport);
                } else {
                        if (FPT_mbCards < MAX_MB_CARDS) {
                                pCurrNvRam = &FPT_nvRamInfo[FPT_mbCards];
                                FPT_mbCards++;
                                pCurrNvRam->niBaseAddr = ioport;
                                FPT_RNVRamData(pCurrNvRam);
                        } else
                                return (int)FAILURE;
                }
        } else
                pCurrNvRam = NULL;

        WR_HARPOON(ioport + hp_clkctrl_0, CLKCTRL_DEFAULT);
        WR_HARPOON(ioport + hp_sys_ctrl, 0x00);

        if (pCurrNvRam)
                pCardInfo->si_id = pCurrNvRam->niAdapId;
        else
                pCardInfo->si_id =
                    (unsigned
                     char)(FPT_utilEERead(ioport,
                                          (ADAPTER_SCSI_ID /
                                           2)) & (unsigned char)0x0FF);

        pCardInfo->si_lun = 0x00;
        pCardInfo->si_fw_revision = ORION_FW_REV;
        temp2 = 0x0000;
        temp3 = 0x0000;
        temp4 = 0x0000;
        temp5 = 0x0000;
        temp6 = 0x0000;

        for (id = 0; id < (16 / 2); id++) {

                if (pCurrNvRam) {
                        temp = (unsigned short)pCurrNvRam->niSyncTbl[id];
                        temp = ((temp & 0x03) + ((temp << 4) & 0xc0)) +
                            (((temp << 4) & 0x0300) + ((temp << 8) & 0xc000));
                } else
                        temp =
                            FPT_utilEERead(ioport,
                                           (unsigned short)((SYNC_RATE_TBL / 2)
                                                            + id));

                for (i = 0; i < 2; temp >>= 8, i++) {

                        temp2 >>= 1;
                        temp3 >>= 1;
                        temp4 >>= 1;
                        temp5 >>= 1;
                        temp6 >>= 1;
                        switch (temp & 0x3) {
                        case AUTO_RATE_20:      /* Synchronous, 20 mega-transfers/second */
                                temp6 |= 0x8000;        /* Fall through */
                        case AUTO_RATE_10:      /* Synchronous, 10 mega-transfers/second */
                                temp5 |= 0x8000;        /* Fall through */
                        case AUTO_RATE_05:      /* Synchronous, 5 mega-transfers/second */
                                temp2 |= 0x8000;        /* Fall through */
                        case AUTO_RATE_00:      /* Asynchronous */
                                break;
                        }

                        if (temp & DISC_ENABLE_BIT)
                                temp3 |= 0x8000;

                        if (temp & WIDE_NEGO_BIT)
                                temp4 |= 0x8000;

                }
        }

        pCardInfo->si_per_targ_init_sync = temp2;
        pCardInfo->si_per_targ_no_disc = temp3;
        pCardInfo->si_per_targ_wide_nego = temp4;
        pCardInfo->si_per_targ_fast_nego = temp5;
        pCardInfo->si_per_targ_ultra_nego = temp6;

        if (pCurrNvRam)
                i = pCurrNvRam->niSysConf;
        else
                i = (unsigned
                     char)(FPT_utilEERead(ioport, (SYSTEM_CONFIG / 2)));

        if (pCurrNvRam)
                ScamFlg = pCurrNvRam->niScamConf;
        else
                ScamFlg =
                    (unsigned char)FPT_utilEERead(ioport, SCAM_CONFIG / 2);

        pCardInfo->si_flags = 0x0000;

        if (i & 0x01)
                pCardInfo->si_flags |= SCSI_PARITY_ENA;

        if (!(i & 0x02))
                pCardInfo->si_flags |= SOFT_RESET;

        if (i & 0x10)
                pCardInfo->si_flags |= EXTENDED_TRANSLATION;

        if (ScamFlg & SCAM_ENABLED)
                pCardInfo->si_flags |= FLAG_SCAM_ENABLED;

        if (ScamFlg & SCAM_LEVEL2)
                pCardInfo->si_flags |= FLAG_SCAM_LEVEL2;

        j = (RD_HARPOON(ioport + hp_bm_ctrl) & ~SCSI_TERM_ENA_L);
        if (i & 0x04) {
                j |= SCSI_TERM_ENA_L;
        }
        WR_HARPOON(ioport + hp_bm_ctrl, j);

        j = (RD_HARPOON(ioport + hp_ee_ctrl) & ~SCSI_TERM_ENA_H);
        if (i & 0x08) {
                j |= SCSI_TERM_ENA_H;
        }
        WR_HARPOON(ioport + hp_ee_ctrl, j);

        if (!(RD_HARPOON(ioport + hp_page_ctrl) & NARROW_SCSI_CARD))

                pCardInfo->si_flags |= SUPPORT_16TAR_32LUN;

        pCardInfo->si_card_family = HARPOON_FAMILY;
        pCardInfo->si_bustype = BUSTYPE_PCI;

        if (pCurrNvRam) {
                pCardInfo->si_card_model[0] = '9';
                switch (pCurrNvRam->niModel & 0x0f) {
                case MODEL_LT:
                        pCardInfo->si_card_model[1] = '3';
                        pCardInfo->si_card_model[2] = '0';
                        break;
                case MODEL_LW:
                        pCardInfo->si_card_model[1] = '5';
                        pCardInfo->si_card_model[2] = '0';
                        break;
                case MODEL_DL:
                        pCardInfo->si_card_model[1] = '3';
                        pCardInfo->si_card_model[2] = '2';
                        break;
                case MODEL_DW:
                        pCardInfo->si_card_model[1] = '5';
                        pCardInfo->si_card_model[2] = '2';
                        break;
                }
        } else {
                temp = FPT_utilEERead(ioport, (MODEL_NUMB_0 / 2));
                pCardInfo->si_card_model[0] = (unsigned char)(temp >> 8);
                temp = FPT_utilEERead(ioport, (MODEL_NUMB_2 / 2));

                pCardInfo->si_card_model[1] = (unsigned char)(temp & 0x00FF);
                pCardInfo->si_card_model[2] = (unsigned char)(temp >> 8);
        }

        if (pCardInfo->si_card_model[1] == '3') {
                if (RD_HARPOON(ioport + hp_ee_ctrl) & BIT(7))
                        pCardInfo->si_flags |= LOW_BYTE_TERM;
        } else if (pCardInfo->si_card_model[2] == '0') {
                temp = RD_HARPOON(ioport + hp_xfer_pad);
                WR_HARPOON(ioport + hp_xfer_pad, (temp & ~BIT(4)));
                if (RD_HARPOON(ioport + hp_ee_ctrl) & BIT(7))
                        pCardInfo->si_flags |= LOW_BYTE_TERM;
                WR_HARPOON(ioport + hp_xfer_pad, (temp | BIT(4)));
                if (RD_HARPOON(ioport + hp_ee_ctrl) & BIT(7))
                        pCardInfo->si_flags |= HIGH_BYTE_TERM;
                WR_HARPOON(ioport + hp_xfer_pad, temp);
        } else {
                temp = RD_HARPOON(ioport + hp_ee_ctrl);
                temp2 = RD_HARPOON(ioport + hp_xfer_pad);
                WR_HARPOON(ioport + hp_ee_ctrl, (temp | SEE_CS));
                WR_HARPOON(ioport + hp_xfer_pad, (temp2 | BIT(4)));
                temp3 = 0;
                for (i = 0; i < 8; i++) {
                        temp3 <<= 1;
                        if (!(RD_HARPOON(ioport + hp_ee_ctrl) & BIT(7)))
                                temp3 |= 1;
                        WR_HARPOON(ioport + hp_xfer_pad, (temp2 & ~BIT(4)));
                        WR_HARPOON(ioport + hp_xfer_pad, (temp2 | BIT(4)));
                }
                WR_HARPOON(ioport + hp_ee_ctrl, temp);
                WR_HARPOON(ioport + hp_xfer_pad, temp2);
                if (!(temp3 & BIT(7)))
                        pCardInfo->si_flags |= LOW_BYTE_TERM;
                if (!(temp3 & BIT(6)))
                        pCardInfo->si_flags |= HIGH_BYTE_TERM;
        }

        ARAM_ACCESS(ioport);

        for (i = 0; i < 4; i++) {

                pCardInfo->si_XlatInfo[i] =
                    RD_HARPOON(ioport + hp_aramBase + BIOS_DATA_OFFSET + i);
        }

        /* return with -1 if no sort, else return with
           logical card number sorted by BIOS (zero-based) */

        pCardInfo->si_relative_cardnum =
            (unsigned
             char)(RD_HARPOON(ioport + hp_aramBase + BIOS_RELATIVE_CARD) - 1);

        SGRAM_ACCESS(ioport);

        FPT_s_PhaseTbl[0] = FPT_phaseDataOut;
        FPT_s_PhaseTbl[1] = FPT_phaseDataIn;
        FPT_s_PhaseTbl[2] = FPT_phaseIllegal;
        FPT_s_PhaseTbl[3] = FPT_phaseIllegal;
        FPT_s_PhaseTbl[4] = FPT_phaseCommand;
        FPT_s_PhaseTbl[5] = FPT_phaseStatus;
        FPT_s_PhaseTbl[6] = FPT_phaseMsgOut;
        FPT_s_PhaseTbl[7] = FPT_phaseMsgIn;

        pCardInfo->si_present = 0x01;

        return 0;
}

/*---------------------------------------------------------------------
 *
 * Function: FlashPoint_HardwareResetHostAdapter
 *
 * Description: Setup adapter for normal operation (hard reset).
 *
 *---------------------------------------------------------------------*/

static unsigned long FlashPoint_HardwareResetHostAdapter(struct sccb_mgr_info
                                                         *pCardInfo)
{
        struct sccb_card *CurrCard = NULL;
        struct nvram_info *pCurrNvRam;
        unsigned char i, j, thisCard, ScamFlg;
        unsigned short temp, sync_bit_map, id;
        unsigned long ioport;

        ioport = pCardInfo->si_baseaddr;

        for (thisCard = 0; thisCard <= MAX_CARDS; thisCard++) {

                if (thisCard == MAX_CARDS) {

                        return FAILURE;
                }

                if (FPT_BL_Card[thisCard].ioPort == ioport) {

                        CurrCard = &FPT_BL_Card[thisCard];
                        FPT_SccbMgrTableInitCard(CurrCard, thisCard);
                        break;
                }

                else if (FPT_BL_Card[thisCard].ioPort == 0x00) {

                        FPT_BL_Card[thisCard].ioPort = ioport;
                        CurrCard = &FPT_BL_Card[thisCard];

                        if (FPT_mbCards)
                                for (i = 0; i < FPT_mbCards; i++) {
                                        if (CurrCard->ioPort ==
                                            FPT_nvRamInfo[i].niBaseAddr)
                                                CurrCard->pNvRamInfo =
                                                    &FPT_nvRamInfo[i];
                                }
                        FPT_SccbMgrTableInitCard(CurrCard, thisCard);
                        CurrCard->cardIndex = thisCard;
                        CurrCard->cardInfo = pCardInfo;

                        break;
                }
        }

        pCurrNvRam = CurrCard->pNvRamInfo;

        if (pCurrNvRam) {
                ScamFlg = pCurrNvRam->niScamConf;
        } else {
                ScamFlg =
                    (unsigned char)FPT_utilEERead(ioport, SCAM_CONFIG / 2);
        }

        FPT_BusMasterInit(ioport);
        FPT_XbowInit(ioport, ScamFlg);

        FPT_autoLoadDefaultMap(ioport);

        for (i = 0, id = 0x01; i != pCardInfo->si_id; i++, id <<= 1) {
        }

        WR_HARPOON(ioport + hp_selfid_0, id);
        WR_HARPOON(ioport + hp_selfid_1, 0x00);
        WR_HARPOON(ioport + hp_arb_id, pCardInfo->si_id);
        CurrCard->ourId = pCardInfo->si_id;

        i = (unsigned char)pCardInfo->si_flags;
        if (i & SCSI_PARITY_ENA)
                WR_HARPOON(ioport + hp_portctrl_1, (HOST_MODE8 | CHK_SCSI_P));

        j = (RD_HARPOON(ioport + hp_bm_ctrl) & ~SCSI_TERM_ENA_L);
        if (i & LOW_BYTE_TERM)
                j |= SCSI_TERM_ENA_L;
        WR_HARPOON(ioport + hp_bm_ctrl, j);

        j = (RD_HARPOON(ioport + hp_ee_ctrl) & ~SCSI_TERM_ENA_H);
        if (i & HIGH_BYTE_TERM)
                j |= SCSI_TERM_ENA_H;
        WR_HARPOON(ioport + hp_ee_ctrl, j);

        if (!(pCardInfo->si_flags & SOFT_RESET)) {

                FPT_sresb(ioport, thisCard);

                FPT_scini(thisCard, pCardInfo->si_id, 0);
        }

        if (pCardInfo->si_flags & POST_ALL_UNDERRRUNS)
                CurrCard->globalFlags |= F_NO_FILTER;

        if (pCurrNvRam) {
                if (pCurrNvRam->niSysConf & 0x10)
                        CurrCard->globalFlags |= F_GREEN_PC;
        } else {
                if (FPT_utilEERead(ioport, (SYSTEM_CONFIG / 2)) & GREEN_PC_ENA)
                        CurrCard->globalFlags |= F_GREEN_PC;
        }

        /* Set global flag to indicate Re-Negotiation to be done on all
           ckeck condition */
        if (pCurrNvRam) {
                if (pCurrNvRam->niScsiConf & 0x04)
                        CurrCard->globalFlags |= F_DO_RENEGO;
        } else {
                if (FPT_utilEERead(ioport, (SCSI_CONFIG / 2)) & RENEGO_ENA)
                        CurrCard->globalFlags |= F_DO_RENEGO;
        }

        if (pCurrNvRam) {
                if (pCurrNvRam->niScsiConf & 0x08)
                        CurrCard->globalFlags |= F_CONLUN_IO;
        } else {
                if (FPT_utilEERead(ioport, (SCSI_CONFIG / 2)) & CONNIO_ENA)
                        CurrCard->globalFlags |= F_CONLUN_IO;
        }

        temp = pCardInfo->si_per_targ_no_disc;

        for (i = 0, id = 1; i < MAX_SCSI_TAR; i++, id <<= 1) {

                if (temp & id)
                        FPT_sccbMgrTbl[thisCard][i].TarStatus |= TAR_ALLOW_DISC;
        }

        sync_bit_map = 0x0001;

        for (id = 0; id < (MAX_SCSI_TAR / 2); id++) {

                if (pCurrNvRam) {
                        temp = (unsigned short)pCurrNvRam->niSyncTbl[id];
                        temp = ((temp & 0x03) + ((temp << 4) & 0xc0)) +
                            (((temp << 4) & 0x0300) + ((temp << 8) & 0xc000));
                } else
                        temp =
                            FPT_utilEERead(ioport,
                                           (unsigned short)((SYNC_RATE_TBL / 2)
                                                            + id));

                for (i = 0; i < 2; temp >>= 8, i++) {

                        if (pCardInfo->si_per_targ_init_sync & sync_bit_map) {

                                FPT_sccbMgrTbl[thisCard][id * 2 +
                                                         i].TarEEValue =
                                    (unsigned char)temp;
                        }

                        else {
                                FPT_sccbMgrTbl[thisCard][id * 2 +
                                                         i].TarStatus |=
                                    SYNC_SUPPORTED;
                                FPT_sccbMgrTbl[thisCard][id * 2 +
                                                         i].TarEEValue =
                                    (unsigned char)(temp & ~EE_SYNC_MASK);
                        }

/*         if ((pCardInfo->si_per_targ_wide_nego & sync_bit_map) ||
            (id*2+i >= 8)){
*/
                        if (pCardInfo->si_per_targ_wide_nego & sync_bit_map) {

                                FPT_sccbMgrTbl[thisCard][id * 2 +
                                                         i].TarEEValue |=
                                    EE_WIDE_SCSI;

                        }

                        else {  /* NARROW SCSI */
                                FPT_sccbMgrTbl[thisCard][id * 2 +
                                                         i].TarStatus |=
                                    WIDE_NEGOCIATED;
                        }

                        sync_bit_map <<= 1;

                }
        }

        WR_HARPOON((ioport + hp_semaphore),
                   (unsigned char)(RD_HARPOON((ioport + hp_semaphore)) |
                                   SCCB_MGR_PRESENT));

        return (unsigned long)CurrCard;
}

static void FlashPoint_ReleaseHostAdapter(unsigned long pCurrCard)
{
        unsigned char i;
        unsigned long portBase;
        unsigned long regOffset;
        unsigned long scamData;
        unsigned long *pScamTbl;
        struct nvram_info *pCurrNvRam;

        pCurrNvRam = ((struct sccb_card *)pCurrCard)->pNvRamInfo;

        if (pCurrNvRam) {
                FPT_WrStack(pCurrNvRam->niBaseAddr, 0, pCurrNvRam->niModel);
                FPT_WrStack(pCurrNvRam->niBaseAddr, 1, pCurrNvRam->niSysConf);
                FPT_WrStack(pCurrNvRam->niBaseAddr, 2, pCurrNvRam->niScsiConf);
                FPT_WrStack(pCurrNvRam->niBaseAddr, 3, pCurrNvRam->niScamConf);
                FPT_WrStack(pCurrNvRam->niBaseAddr, 4, pCurrNvRam->niAdapId);

                for (i = 0; i < MAX_SCSI_TAR / 2; i++)
                        FPT_WrStack(pCurrNvRam->niBaseAddr,
                                    (unsigned char)(i + 5),
                                    pCurrNvRam->niSyncTbl[i]);

                portBase = pCurrNvRam->niBaseAddr;

                for (i = 0; i < MAX_SCSI_TAR; i++) {
                        regOffset = hp_aramBase + 64 + i * 4;
                        pScamTbl = (unsigned long *)&pCurrNvRam->niScamTbl[i];
                        scamData = *pScamTbl;
                        WR_HARP32(portBase, regOffset, scamData);
                }

        } else {
                FPT_WrStack(((struct sccb_card *)pCurrCard)->ioPort, 0, 0);
        }
}

static void FPT_RNVRamData(struct nvram_info *pNvRamInfo)
{
        unsigned char i;
        unsigned long portBase;
        unsigned long regOffset;
        unsigned long scamData;
        unsigned long *pScamTbl;

        pNvRamInfo->niModel = FPT_RdStack(pNvRamInfo->niBaseAddr, 0);
        pNvRamInfo->niSysConf = FPT_RdStack(pNvRamInfo->niBaseAddr, 1);
        pNvRamInfo->niScsiConf = FPT_RdStack(pNvRamInfo->niBaseAddr, 2);
        pNvRamInfo->niScamConf = FPT_RdStack(pNvRamInfo->niBaseAddr, 3);
        pNvRamInfo->niAdapId = FPT_RdStack(pNvRamInfo->niBaseAddr, 4);

        for (i = 0; i < MAX_SCSI_TAR / 2; i++)
                pNvRamInfo->niSyncTbl[i] =
                    FPT_RdStack(pNvRamInfo->niBaseAddr, (unsigned char)(i + 5));

        portBase = pNvRamInfo->niBaseAddr;

        for (i = 0; i < MAX_SCSI_TAR; i++) {
                regOffset = hp_aramBase + 64 + i * 4;
                RD_HARP32(portBase, regOffset, scamData);
                pScamTbl = (unsigned long *)&pNvRamInfo->niScamTbl[i];
                *pScamTbl = scamData;
        }

}

static unsigned char FPT_RdStack(unsigned long portBase, unsigned char index)
{
        WR_HARPOON(portBase + hp_stack_addr, index);
        return RD_HARPOON(portBase + hp_stack_data);
}

static void FPT_WrStack(unsigned long portBase, unsigned char index,
                        unsigned char data)
{
        WR_HARPOON(portBase + hp_stack_addr, index);
        WR_HARPOON(portBase + hp_stack_data, data);
}

static unsigned char FPT_ChkIfChipInitialized(unsigned long ioPort)
{
        if ((RD_HARPOON(ioPort + hp_arb_id) & 0x0f) != FPT_RdStack(ioPort, 4))
                return 0;
        if ((RD_HARPOON(ioPort + hp_clkctrl_0) & CLKCTRL_DEFAULT)
            != CLKCTRL_DEFAULT)
                return 0;
        if ((RD_HARPOON(ioPort + hp_seltimeout) == TO_250ms) ||
            (RD_HARPOON(ioPort + hp_seltimeout) == TO_290ms))
                return 1;
        return 0;

}

/*---------------------------------------------------------------------
 *
 * Function: FlashPoint_StartCCB
 *
 * Description: Start a command pointed to by p_Sccb. When the
 *              command is completed it will be returned via the
 *              callback function.
 *
 *---------------------------------------------------------------------*/
static void FlashPoint_StartCCB(unsigned long pCurrCard, struct sccb *p_Sccb)
{
        unsigned long ioport;
        unsigned char thisCard, lun;
        struct sccb *pSaveSccb;
        CALL_BK_FN callback;

        thisCard = ((struct sccb_card *)pCurrCard)->cardIndex;
        ioport = ((struct sccb_card *)pCurrCard)->ioPort;

        if ((p_Sccb->TargID >= MAX_SCSI_TAR) || (p_Sccb->Lun >= MAX_LUN)) {

                p_Sccb->HostStatus = SCCB_COMPLETE;
                p_Sccb->SccbStatus = SCCB_ERROR;
                callback = (CALL_BK_FN) p_Sccb->SccbCallback;
                if (callback)
                        callback(p_Sccb);

                return;
        }

        FPT_sinits(p_Sccb, thisCard);

        if (!((struct sccb_card *)pCurrCard)->cmdCounter) {
                WR_HARPOON(ioport + hp_semaphore,
                           (RD_HARPOON(ioport + hp_semaphore)
                            | SCCB_MGR_ACTIVE));

                if (((struct sccb_card *)pCurrCard)->globalFlags & F_GREEN_PC) {
                        WR_HARPOON(ioport + hp_clkctrl_0, CLKCTRL_DEFAULT);
                        WR_HARPOON(ioport + hp_sys_ctrl, 0x00);
                }
        }

        ((struct sccb_card *)pCurrCard)->cmdCounter++;

        if (RD_HARPOON(ioport + hp_semaphore) & BIOS_IN_USE) {

                WR_HARPOON(ioport + hp_semaphore,
                           (RD_HARPOON(ioport + hp_semaphore)
                            | TICKLE_ME));
                if (p_Sccb->OperationCode == RESET_COMMAND) {
                        pSaveSccb =
                            ((struct sccb_card *)pCurrCard)->currentSCCB;
                        ((struct sccb_card *)pCurrCard)->currentSCCB = p_Sccb;
                        FPT_queueSelectFail(&FPT_BL_Card[thisCard], thisCard);
                        ((struct sccb_card *)pCurrCard)->currentSCCB =
                            pSaveSccb;
                } else {
                        FPT_queueAddSccb(p_Sccb, thisCard);
                }
        }

        else if ((RD_HARPOON(ioport + hp_page_ctrl) & G_INT_DISABLE)) {

                if (p_Sccb->OperationCode == RESET_COMMAND) {
                        pSaveSccb =
                            ((struct sccb_card *)pCurrCard)->currentSCCB;
                        ((struct sccb_card *)pCurrCard)->currentSCCB = p_Sccb;
                        FPT_queueSelectFail(&FPT_BL_Card[thisCard], thisCard);
                        ((struct sccb_card *)pCurrCard)->currentSCCB =
                            pSaveSccb;
                } else {
                        FPT_queueAddSccb(p_Sccb, thisCard);
                }
        }

        else {

                MDISABLE_INT(ioport);

                if ((((struct sccb_card *)pCurrCard)->globalFlags & F_CONLUN_IO)
                    &&
                    ((FPT_sccbMgrTbl[thisCard][p_Sccb->TargID].
                      TarStatus & TAR_TAG_Q_MASK) != TAG_Q_TRYING))
                        lun = p_Sccb->Lun;
                else
                        lun = 0;
                if ((((struct sccb_card *)pCurrCard)->currentSCCB == NULL) &&
                    (FPT_sccbMgrTbl[thisCard][p_Sccb->TargID].TarSelQ_Cnt == 0)
                    && (FPT_sccbMgrTbl[thisCard][p_Sccb->TargID].TarLUNBusy[lun]
                        == 0)) {

                        ((struct sccb_card *)pCurrCard)->currentSCCB = p_Sccb;
                        FPT_ssel(p_Sccb->SccbIOPort, thisCard);
                }

                else {

                        if (p_Sccb->OperationCode == RESET_COMMAND) {
                                pSaveSccb =
                                    ((struct sccb_card *)pCurrCard)->
                                    currentSCCB;
                                ((struct sccb_card *)pCurrCard)->currentSCCB =
                                    p_Sccb;
                                FPT_queueSelectFail(&FPT_BL_Card[thisCard],
                                                    thisCard);
                                ((struct sccb_card *)pCurrCard)->currentSCCB =
                                    pSaveSccb;
                        } else {
                                FPT_queueAddSccb(p_Sccb, thisCard);
                        }
                }

                MENABLE_INT(ioport);
        }

}

/*---------------------------------------------------------------------
 *
 * Function: FlashPoint_AbortCCB
 *
 * Description: Abort the command pointed to by p_Sccb.  When the
 *              command is completed it will be returned via the
 *              callback function.
 *
 *---------------------------------------------------------------------*/
static int FlashPoint_AbortCCB(unsigned long pCurrCard, struct sccb *p_Sccb)
{
        unsigned long ioport;

        unsigned char thisCard;
        CALL_BK_FN callback;
        unsigned char TID;
        struct sccb *pSaveSCCB;
        struct sccb_mgr_tar_info *currTar_Info;

        ioport = ((struct sccb_card *)pCurrCard)->ioPort;

        thisCard = ((struct sccb_card *)pCurrCard)->cardIndex;

        if (!(RD_HARPOON(ioport + hp_page_ctrl) & G_INT_DISABLE)) {

                if (FPT_queueFindSccb(p_Sccb, thisCard)) {

                        ((struct sccb_card *)pCurrCard)->cmdCounter--;

                        if (!((struct sccb_card *)pCurrCard)->cmdCounter)
                                WR_HARPOON(ioport + hp_semaphore,
                                           (RD_HARPOON(ioport + hp_semaphore)
                                            & (unsigned
                                               char)(~(SCCB_MGR_ACTIVE |
                                                       TICKLE_ME))));

                        p_Sccb->SccbStatus = SCCB_ABORT;
                        callback = p_Sccb->SccbCallback;
                        callback(p_Sccb);

                        return 0;
                }

                else {
                        if (((struct sccb_card *)pCurrCard)->currentSCCB ==
                            p_Sccb) {
                                p_Sccb->SccbStatus = SCCB_ABORT;
                                return 0;

                        }

                        else {

                                TID = p_Sccb->TargID;

                                if (p_Sccb->Sccb_tag) {
                                        MDISABLE_INT(ioport);
                                        if (((struct sccb_card *)pCurrCard)->
                                            discQ_Tbl[p_Sccb->Sccb_tag] ==
                                            p_Sccb) {
                                                p_Sccb->SccbStatus = SCCB_ABORT;
                                                p_Sccb->Sccb_scsistat =
                                                    ABORT_ST;
                                                p_Sccb->Sccb_scsimsg =
                                                    SMABORT_TAG;

                                                if (((struct sccb_card *)
                                                     pCurrCard)->currentSCCB ==
                                                    NULL) {
                                                        ((struct sccb_card *)
                                                         pCurrCard)->
                                        currentSCCB = p_Sccb;
                                                        FPT_ssel(ioport,
                                                                 thisCard);
                                                } else {
                                                        pSaveSCCB =
                                                            ((struct sccb_card
                                                              *)pCurrCard)->
                                                            currentSCCB;
                                                        ((struct sccb_card *)
                                                         pCurrCard)->
                                        currentSCCB = p_Sccb;
                                                        FPT_queueSelectFail((struct sccb_card *)pCurrCard, thisCard);
                                                        ((struct sccb_card *)
                                                         pCurrCard)->
                                        currentSCCB = pSaveSCCB;
                                                }
                                        }
                                        MENABLE_INT(ioport);
                                        return 0;
                                } else {
                                        currTar_Info =
                                            &FPT_sccbMgrTbl[thisCard][p_Sccb->
                                                                      TargID];

                                        if (FPT_BL_Card[thisCard].
                                            discQ_Tbl[currTar_Info->
                                                      LunDiscQ_Idx[p_Sccb->Lun]]
                                            == p_Sccb) {
                                                p_Sccb->SccbStatus = SCCB_ABORT;
                                                return 0;
                                        }
                                }
                        }
                }
        }
        return -1;
}

/*---------------------------------------------------------------------
 *
 * Function: FlashPoint_InterruptPending
 *
 * Description: Do a quick check to determine if there is a pending
 *              interrupt for this card and disable the IRQ Pin if so.
 *
 *---------------------------------------------------------------------*/
static unsigned char FlashPoint_InterruptPending(unsigned long pCurrCard)
{
        unsigned long ioport;

        ioport = ((struct sccb_card *)pCurrCard)->ioPort;

        if (RD_HARPOON(ioport + hp_int_status) & INT_ASSERTED) {
                return 1;
        }

        else

                return 0;
}

/*---------------------------------------------------------------------
 *
 * Function: FlashPoint_HandleInterrupt
 *
 * Description: This is our entry point when an interrupt is generated
 *              by the card and the upper level driver passes it on to
 *              us.
 *
 *---------------------------------------------------------------------*/
static int FlashPoint_HandleInterrupt(unsigned long pCurrCard)
{
        struct sccb *currSCCB;
        unsigned char thisCard, result, bm_status, bm_int_st;
        unsigned short hp_int;
        unsigned char i, target;
        unsigned long ioport;

        thisCard = ((struct sccb_card *)pCurrCard)->cardIndex;
        ioport = ((struct sccb_card *)pCurrCard)->ioPort;

        MDISABLE_INT(ioport);

        if ((bm_int_st = RD_HARPOON(ioport + hp_int_status)) & EXT_STATUS_ON)
                bm_status =
                    RD_HARPOON(ioport +
                               hp_ext_status) & (unsigned char)BAD_EXT_STATUS;
        else
                bm_status = 0;

        WR_HARPOON(ioport + hp_int_mask, (INT_CMD_COMPL | SCSI_INTERRUPT));

        while ((hp_int =
                RDW_HARPOON((ioport +
                             hp_intstat)) & FPT_default_intena) | bm_status) {

                currSCCB = ((struct sccb_card *)pCurrCard)->currentSCCB;

                if (hp_int & (FIFO | TIMEOUT | RESET | SCAM_SEL) || bm_status) {
                        result =
                            FPT_SccbMgr_bad_isr(ioport, thisCard,
                                                ((struct sccb_card *)pCurrCard),
                                                hp_int);
                        WRW_HARPOON((ioport + hp_intstat),
                                    (FIFO | TIMEOUT | RESET | SCAM_SEL));
                        bm_status = 0;

                        if (result) {

                                MENABLE_INT(ioport);
                                return result;
                        }
                }

                else if (hp_int & ICMD_COMP) {

                        if (!(hp_int & BUS_FREE)) {
                                /* Wait for the BusFree before starting a new command.  We
                                   must also check for being reselected since the BusFree
                                   may not show up if another device reselects us in 1.5us or
                                   less.  SRR Wednesday, 3/8/1995.
                                 */
                                while (!
                                       (RDW_HARPOON((ioport + hp_intstat)) &
                                        (BUS_FREE | RSEL))) ;
                        }

                        if (((struct sccb_card *)pCurrCard)->
                            globalFlags & F_HOST_XFER_ACT)

                                FPT_phaseChkFifo(ioport, thisCard);

/*         WRW_HARPOON((ioport+hp_intstat),
            (BUS_FREE | ICMD_COMP | ITAR_DISC | XFER_CNT_0));
         */

                        WRW_HARPOON((ioport + hp_intstat), CLR_ALL_INT_1);

                        FPT_autoCmdCmplt(ioport, thisCard);

                }

                else if (hp_int & ITAR_DISC) {

                        if (((struct sccb_card *)pCurrCard)->
                            globalFlags & F_HOST_XFER_ACT) {

                                FPT_phaseChkFifo(ioport, thisCard);

                        }

                        if (RD_HARPOON(ioport + hp_gp_reg_1) == SMSAVE_DATA_PTR) {

                                WR_HARPOON(ioport + hp_gp_reg_1, 0x00);
                                currSCCB->Sccb_XferState |= F_NO_DATA_YET;

                                currSCCB->Sccb_savedATC = currSCCB->Sccb_ATC;
                        }

                        currSCCB->Sccb_scsistat = DISCONNECT_ST;
                        FPT_queueDisconnect(currSCCB, thisCard);

                        /* Wait for the BusFree before starting a new command.  We
                           must also check for being reselected since the BusFree
                           may not show up if another device reselects us in 1.5us or
                           less.  SRR Wednesday, 3/8/1995.
                         */
                        while (!
                               (RDW_HARPOON((ioport + hp_intstat)) &
                                (BUS_FREE | RSEL))
                               && !((RDW_HARPOON((ioport + hp_intstat)) & PHASE)
                                    && RD_HARPOON((ioport + hp_scsisig)) ==
                                    (SCSI_BSY | SCSI_REQ | SCSI_CD | SCSI_MSG |
                                     SCSI_IOBIT))) ;

                        /*
                           The additional loop exit condition above detects a timing problem
                           with the revision D/E harpoon chips.  The caller should reset the
                           host adapter to recover when 0xFE is returned.
                         */
                        if (!
                            (RDW_HARPOON((ioport + hp_intstat)) &
                             (BUS_FREE | RSEL))) {
                                MENABLE_INT(ioport);
                                return 0xFE;
                        }

                        WRW_HARPOON((ioport + hp_intstat),
                                    (BUS_FREE | ITAR_DISC));

                        ((struct sccb_card *)pCurrCard)->globalFlags |=
                            F_NEW_SCCB_CMD;

                }

                else if (hp_int & RSEL) {

                        WRW_HARPOON((ioport + hp_intstat),
                                    (PROG_HLT | RSEL | PHASE | BUS_FREE));

                        if (RDW_HARPOON((ioport + hp_intstat)) & ITAR_DISC) {
                                if (((struct sccb_card *)pCurrCard)->
                                    globalFlags & F_HOST_XFER_ACT) {
                                        FPT_phaseChkFifo(ioport, thisCard);
                                }

                                if (RD_HARPOON(ioport + hp_gp_reg_1) ==
                                    SMSAVE_DATA_PTR) {
                                        WR_HARPOON(ioport + hp_gp_reg_1, 0x00);
                                        currSCCB->Sccb_XferState |=
                                            F_NO_DATA_YET;
                                        currSCCB->Sccb_savedATC =
                                            currSCCB->Sccb_ATC;
                                }

                                WRW_HARPOON((ioport + hp_intstat),
                                            (BUS_FREE | ITAR_DISC));
                                currSCCB->Sccb_scsistat = DISCONNECT_ST;
                                FPT_queueDisconnect(currSCCB, thisCard);
                        }

                        FPT_sres(ioport, thisCard,
                                 ((struct sccb_card *)pCurrCard));
                        FPT_phaseDecode(ioport, thisCard);

                }

                else if ((hp_int & IDO_STRT) && (!(hp_int & BUS_FREE))) {

                        WRW_HARPOON((ioport + hp_intstat),
                                    (IDO_STRT | XFER_CNT_0));
                        FPT_phaseDecode(ioport, thisCard);

                }

                else if ((hp_int & IUNKWN) || (hp_int & PROG_HLT)) {
                        WRW_HARPOON((ioport + hp_intstat),
                                    (PHASE | IUNKWN | PROG_HLT));
                        if ((RD_HARPOON(ioport + hp_prgmcnt_0) & (unsigned char)
                             0x3f) < (unsigned char)SELCHK) {
                                FPT_phaseDecode(ioport, thisCard);
                        } else {
                                /* Harpoon problem some SCSI target device respond to selection
                                   with short BUSY pulse (<400ns) this will make the Harpoon is not able
                                   to latch the correct Target ID into reg. x53.
                                   The work around require to correct this reg. But when write to this
                                   reg. (0x53) also increment the FIFO write addr reg (0x6f), thus we
                                   need to read this reg first then restore it later. After update to 0x53 */

                                i = (unsigned
                                     char)(RD_HARPOON(ioport + hp_fifowrite));
                                target =
                                    (unsigned
                                     char)(RD_HARPOON(ioport + hp_gp_reg_3));
                                WR_HARPOON(ioport + hp_xfer_pad,
                                           (unsigned char)ID_UNLOCK);
                                WR_HARPOON(ioport + hp_select_id,
                                           (unsigned char)(target | target <<
                                                           4));
                                WR_HARPOON(ioport + hp_xfer_pad,
                                           (unsigned char)0x00);
                                WR_HARPOON(ioport + hp_fifowrite, i);
                                WR_HARPOON(ioport + hp_autostart_3,
                                           (AUTO_IMMED + TAG_STRT));
                        }
                }

                else if (hp_int & XFER_CNT_0) {

                        WRW_HARPOON((ioport + hp_intstat), XFER_CNT_0);

                        FPT_schkdd(ioport, thisCard);

                }

                else if (hp_int & BUS_FREE) {

                        WRW_HARPOON((ioport + hp_intstat), BUS_FREE);

                        if (((struct sccb_card *)pCurrCard)->
                            globalFlags & F_HOST_XFER_ACT) {

                                FPT_hostDataXferAbort(ioport, thisCard,
                                                      currSCCB);
                        }

                        FPT_phaseBusFree(ioport, thisCard);
                }

                else if (hp_int & ITICKLE) {

                        WRW_HARPOON((ioport + hp_intstat), ITICKLE);
                        ((struct sccb_card *)pCurrCard)->globalFlags |=
                            F_NEW_SCCB_CMD;
                }

                if (((struct sccb_card *)pCurrCard)->
                    globalFlags & F_NEW_SCCB_CMD) {

                        ((struct sccb_card *)pCurrCard)->globalFlags &=
                            ~F_NEW_SCCB_CMD;

                        if (((struct sccb_card *)pCurrCard)->currentSCCB ==
                            NULL) {

                                FPT_queueSearchSelect(((struct sccb_card *)
                                                       pCurrCard), thisCard);
                        }

                        if (((struct sccb_card *)pCurrCard)->currentSCCB !=
                            NULL) {
                                ((struct sccb_card *)pCurrCard)->globalFlags &=
                                    ~F_NEW_SCCB_CMD;
                                FPT_ssel(ioport, thisCard);
                        }

                        break;

                }

        }                       /*end while */

        MENABLE_INT(ioport);

        return 0;
}

/*---------------------------------------------------------------------
 *

 * Function: Sccb_bad_isr
 *
 * Description: Some type of interrupt has occurred which is slightly
 *              out of the ordinary.  We will now decode it fully, in
 *              this routine.  This is broken up in an attempt to save
 *              processing time.
 *
 *---------------------------------------------------------------------*/
static unsigned char FPT_SccbMgr_bad_isr(unsigned long p_port,
                                         unsigned char p_card,
                                         struct sccb_card *pCurrCard,
                                         unsigned short p_int)
{
        unsigned char temp, ScamFlg;
        struct sccb_mgr_tar_info *currTar_Info;
        struct nvram_info *pCurrNvRam;

        if (RD_HARPOON(p_port + hp_ext_status) &
            (BM_FORCE_OFF | PCI_DEV_TMOUT | BM_PARITY_ERR | PIO_OVERRUN)) {

                if (pCurrCard->globalFlags & F_HOST_XFER_ACT) {

                        FPT_hostDataXferAbort(p_port, p_card,
                                              pCurrCard->currentSCCB);
                }

                if (RD_HARPOON(p_port + hp_pci_stat_cfg) & REC_MASTER_ABORT)
                {
                        WR_HARPOON(p_port + hp_pci_stat_cfg,
                                   (RD_HARPOON(p_port + hp_pci_stat_cfg) &
                                    ~REC_MASTER_ABORT));

                        WR_HARPOON(p_port + hp_host_blk_cnt, 0x00);

                }

                if (pCurrCard->currentSCCB != NULL) {

                        if (!pCurrCard->currentSCCB->HostStatus)
                                pCurrCard->currentSCCB->HostStatus =
                                    SCCB_BM_ERR;

                        FPT_sxfrp(p_port, p_card);

                        temp = (unsigned char)(RD_HARPOON(p_port + hp_ee_ctrl) &
                                               (EXT_ARB_ACK | SCSI_TERM_ENA_H));
                        WR_HARPOON(p_port + hp_ee_ctrl,
                                   ((unsigned char)temp | SEE_MS | SEE_CS));
                        WR_HARPOON(p_port + hp_ee_ctrl, temp);

                        if (!
                            (RDW_HARPOON((p_port + hp_intstat)) &
                             (BUS_FREE | RESET))) {
                                FPT_phaseDecode(p_port, p_card);
                        }
                }
        }

        else if (p_int & RESET) {

                WR_HARPOON(p_port + hp_clkctrl_0, CLKCTRL_DEFAULT);
                WR_HARPOON(p_port + hp_sys_ctrl, 0x00);
                if (pCurrCard->currentSCCB != NULL) {

                        if (pCurrCard->globalFlags & F_HOST_XFER_ACT)

                                FPT_hostDataXferAbort(p_port, p_card,
                                                      pCurrCard->currentSCCB);
                }

                DISABLE_AUTO(p_port);

                FPT_sresb(p_port, p_card);

                while (RD_HARPOON(p_port + hp_scsictrl_0) & SCSI_RST) {
                }

                pCurrNvRam = pCurrCard->pNvRamInfo;
                if (pCurrNvRam) {
                        ScamFlg = pCurrNvRam->niScamConf;
                } else {
                        ScamFlg =
                            (unsigned char)FPT_utilEERead(p_port,
                                                          SCAM_CONFIG / 2);
                }

                FPT_XbowInit(p_port, ScamFlg);

                FPT_scini(p_card, pCurrCard->ourId, 0);

                return 0xFF;
        }

        else if (p_int & FIFO) {

                WRW_HARPOON((p_port + hp_intstat), FIFO);

                if (pCurrCard->currentSCCB != NULL)
                        FPT_sxfrp(p_port, p_card);
        }

        else if (p_int & TIMEOUT) {

                DISABLE_AUTO(p_port);

                WRW_HARPOON((p_port + hp_intstat),
                            (PROG_HLT | TIMEOUT | SEL | BUS_FREE | PHASE |
                             IUNKWN));

                pCurrCard->currentSCCB->HostStatus = SCCB_SELECTION_TIMEOUT;

                currTar_Info =
                    &FPT_sccbMgrTbl[p_card][pCurrCard->currentSCCB->TargID];
                if ((pCurrCard->globalFlags & F_CONLUN_IO)
                    && ((currTar_Info->TarStatus & TAR_TAG_Q_MASK) !=
                        TAG_Q_TRYING))
                        currTar_Info->TarLUNBusy[pCurrCard->currentSCCB->Lun] =
                            0;
                else
                        currTar_Info->TarLUNBusy[0] = 0;

                if (currTar_Info->TarEEValue & EE_SYNC_MASK) {
                        currTar_Info->TarSyncCtrl = 0;
                        currTar_Info->TarStatus &= ~TAR_SYNC_MASK;
                }

                if (currTar_Info->TarEEValue & EE_WIDE_SCSI) {
                        currTar_Info->TarStatus &= ~TAR_WIDE_MASK;
                }

                FPT_sssyncv(p_port, pCurrCard->currentSCCB->TargID, NARROW_SCSI,
                            currTar_Info);

                FPT_queueCmdComplete(pCurrCard, pCurrCard->currentSCCB, p_card);

        }

        else if (p_int & SCAM_SEL) {

                FPT_scarb(p_port, LEVEL2_TAR);
                FPT_scsel(p_port);
                FPT_scasid(p_card, p_port);

                FPT_scbusf(p_port);

                WRW_HARPOON((p_port + hp_intstat), SCAM_SEL);
        }

        return 0x00;
}

/*---------------------------------------------------------------------
 *
 * Function: SccbMgrTableInit
 *
 * Description: Initialize all Sccb manager data structures.
 *
 *---------------------------------------------------------------------*/

static void FPT_SccbMgrTableInitAll()
{
        unsigned char thisCard;

        for (thisCard = 0; thisCard < MAX_CARDS; thisCard++) {
                FPT_SccbMgrTableInitCard(&FPT_BL_Card[thisCard], thisCard);

                FPT_BL_Card[thisCard].ioPort = 0x00;
                FPT_BL_Card[thisCard].cardInfo = NULL;
                FPT_BL_Card[thisCard].cardIndex = 0xFF;
                FPT_BL_Card[thisCard].ourId = 0x00;
                FPT_BL_Card[thisCard].pNvRamInfo = NULL;
        }
}

/*---------------------------------------------------------------------
 *
 * Function: SccbMgrTableInit
 *
 * Description: Initialize all Sccb manager data structures.
 *
 *---------------------------------------------------------------------*/

static void FPT_SccbMgrTableInitCard(struct sccb_card *pCurrCard,
                                     unsigned char p_card)
{
        unsigned char scsiID, qtag;

        for (qtag = 0; qtag < QUEUE_DEPTH; qtag++) {
                FPT_BL_Card[p_card].discQ_Tbl[qtag] = NULL;
        }

        for (scsiID = 0; scsiID < MAX_SCSI_TAR; scsiID++) {
                FPT_sccbMgrTbl[p_card][scsiID].TarStatus = 0;
                FPT_sccbMgrTbl[p_card][scsiID].TarEEValue = 0;
                FPT_SccbMgrTableInitTarget(p_card, scsiID);
        }

        pCurrCard->scanIndex = 0x00;
        pCurrCard->currentSCCB = NULL;
        pCurrCard->globalFlags = 0x00;
        pCurrCard->cmdCounter = 0x00;
        pCurrCard->tagQ_Lst = 0x01;
        pCurrCard->discQCount = 0;

}

/*---------------------------------------------------------------------
 *
 * Function: SccbMgrTableInit
 *
 * Description: Initialize all Sccb manager data structures.
 *
 *---------------------------------------------------------------------*/

static void FPT_SccbMgrTableInitTarget(unsigned char p_card,
                                       unsigned char target)
{

        unsigned char lun, qtag;
        struct sccb_mgr_tar_info *currTar_Info;

        currTar_Info = &FPT_sccbMgrTbl[p_card][target];

        currTar_Info->TarSelQ_Cnt = 0;
        currTar_Info->TarSyncCtrl = 0;

        currTar_Info->TarSelQ_Head = NULL;
        currTar_Info->TarSelQ_Tail = NULL;
        currTar_Info->TarTagQ_Cnt = 0;
        currTar_Info->TarLUN_CA = 0;

        for (lun = 0; lun < MAX_LUN; lun++) {
                currTar_Info->TarLUNBusy[lun] = 0;
                currTar_Info->LunDiscQ_Idx[lun] = 0;
        }

        for (qtag = 0; qtag < QUEUE_DEPTH; qtag++) {
                if (FPT_BL_Card[p_card].discQ_Tbl[qtag] != NULL) {
                        if (FPT_BL_Card[p_card].discQ_Tbl[qtag]->TargID ==
                            target) {
                                FPT_BL_Card[p_card].discQ_Tbl[qtag] = NULL;
                                FPT_BL_Card[p_card].discQCount--;
                        }
                }
        }
}

/*---------------------------------------------------------------------
 *
 * Function: sfetm
 *
 * Description: Read in a message byte from the SCSI bus, and check
 *              for a parity error.
 *
 *---------------------------------------------------------------------*/

static unsigned char FPT_sfm(unsigned long port, struct sccb *pCurrSCCB)
{
        unsigned char message;
        unsigned short TimeOutLoop;

        TimeOutLoop = 0;
        while ((!(RD_HARPOON(port + hp_scsisig) & SCSI_REQ)) &&
               (TimeOutLoop++ < 20000)) {
        }

        WR_HARPOON(port + hp_portctrl_0, SCSI_PORT);

        message = RD_HARPOON(port + hp_scsidata_0);

        WR_HARPOON(port + hp_scsisig, SCSI_ACK + S_MSGI_PH);

        if (TimeOutLoop > 20000)
                message = 0x00; /* force message byte = 0 if Time Out on Req */

        if ((RDW_HARPOON((port + hp_intstat)) & PARITY) &&
            (RD_HARPOON(port + hp_addstat) & SCSI_PAR_ERR)) {
                WR_HARPOON(port + hp_scsisig, (SCSI_ACK + S_ILL_PH));
                WR_HARPOON(port + hp_xferstat, 0);
                WR_HARPOON(port + hp_fiforead, 0);
                WR_HARPOON(port + hp_fifowrite, 0);
                if (pCurrSCCB != NULL) {
                        pCurrSCCB->Sccb_scsimsg = SMPARITY;
                }
                message = 0x00;
                do {
                        ACCEPT_MSG_ATN(port);
                        TimeOutLoop = 0;
                        while ((!(RD_HARPOON(port + hp_scsisig) & SCSI_REQ)) &&
                               (TimeOutLoop++ < 20000)) {
                        }
                        if (TimeOutLoop > 20000) {
                                WRW_HARPOON((port + hp_intstat), PARITY);
                                return message;
                        }
                        if ((RD_HARPOON(port + hp_scsisig) & S_SCSI_PHZ) !=
                            S_MSGI_PH) {
                                WRW_HARPOON((port + hp_intstat), PARITY);
                                return message;
                        }
                        WR_HARPOON(port + hp_portctrl_0, SCSI_PORT);

                        RD_HARPOON(port + hp_scsidata_0);

                        WR_HARPOON(port + hp_scsisig, (SCSI_ACK + S_ILL_PH));

                } while (1);

        }
        WR_HARPOON(port + hp_scsisig, (SCSI_ACK + S_ILL_PH));
        WR_HARPOON(port + hp_xferstat, 0);
        WR_HARPOON(port + hp_fiforead, 0);
        WR_HARPOON(port + hp_fifowrite, 0);
        return message;
}

/*---------------------------------------------------------------------
 *
 * Function: FPT_ssel
 *
 * Description: Load up automation and select target device.
 *
 *---------------------------------------------------------------------*/

static void FPT_ssel(unsigned long port, unsigned char p_card)
{

        unsigned char auto_loaded, i, target, *theCCB;

        unsigned long cdb_reg;
        struct sccb_card *CurrCard;
        struct sccb *currSCCB;
        struct sccb_mgr_tar_info *currTar_Info;
        unsigned char lastTag, lun;

        CurrCard = &FPT_BL_Card[p_card];
        currSCCB = CurrCard->currentSCCB;
        target = currSCCB->TargID;
        currTar_Info = &FPT_sccbMgrTbl[p_card][target];
        lastTag = CurrCard->tagQ_Lst;

        ARAM_ACCESS(port);

        if ((currTar_Info->TarStatus & TAR_TAG_Q_MASK) == TAG_Q_REJECT)
                currSCCB->ControlByte &= ~F_USE_CMD_Q;

        if (((CurrCard->globalFlags & F_CONLUN_IO) &&
             ((currTar_Info->TarStatus & TAR_TAG_Q_MASK) != TAG_Q_TRYING)))

                lun = currSCCB->Lun;
        else
                lun = 0;

        if (CurrCard->globalFlags & F_TAG_STARTED) {
                if (!(currSCCB->ControlByte & F_USE_CMD_Q)) {
                        if ((currTar_Info->TarLUN_CA == 0)
                            && ((currTar_Info->TarStatus & TAR_TAG_Q_MASK)
                                == TAG_Q_TRYING)) {

                                if (currTar_Info->TarTagQ_Cnt != 0) {
                                        currTar_Info->TarLUNBusy[lun] = 1;
                                        FPT_queueSelectFail(CurrCard, p_card);
                                        SGRAM_ACCESS(port);
                                        return;
                                }

                                else {
                                        currTar_Info->TarLUNBusy[lun] = 1;
                                }

                        }
                        /*End non-tagged */
                        else {
                                currTar_Info->TarLUNBusy[lun] = 1;
                        }

                }
                /*!Use cmd Q Tagged */
                else {
                        if (currTar_Info->TarLUN_CA == 1) {
                                FPT_queueSelectFail(CurrCard, p_card);
                                SGRAM_ACCESS(port);
                                return;
                        }

                        currTar_Info->TarLUNBusy[lun] = 1;

                }               /*else use cmd Q tagged */

        }
        /*if glob tagged started */
        else {
                currTar_Info->TarLUNBusy[lun] = 1;
        }

        if ((((CurrCard->globalFlags & F_CONLUN_IO) &&
              ((currTar_Info->TarStatus & TAR_TAG_Q_MASK) != TAG_Q_TRYING))
             || (!(currSCCB->ControlByte & F_USE_CMD_Q)))) {
                if (CurrCard->discQCount >= QUEUE_DEPTH) {
                        currTar_Info->TarLUNBusy[lun] = 1;
                        FPT_queueSelectFail(CurrCard, p_card);
                        SGRAM_ACCESS(port);
                        return;
                }
                for (i = 1; i < QUEUE_DEPTH; i++) {
                        if (++lastTag >= QUEUE_DEPTH)
                                lastTag = 1;
                        if (CurrCard->discQ_Tbl[lastTag] == NULL) {
                                CurrCard->tagQ_Lst = lastTag;
                                currTar_Info->LunDiscQ_Idx[lun] = lastTag;
                                CurrCard->discQ_Tbl[lastTag] = currSCCB;
                                CurrCard->discQCount++;
                                break;
                        }
                }
                if (i == QUEUE_DEPTH) {
                        currTar_Info->TarLUNBusy[lun] = 1;
                        FPT_queueSelectFail(CurrCard, p_card);
                        SGRAM_ACCESS(port);
                        return;
                }
        }

        auto_loaded = 0;

        WR_HARPOON(port + hp_select_id, target);
        WR_HARPOON(port + hp_gp_reg_3, target); /* Use by new automation logic */

        if (currSCCB->OperationCode == RESET_COMMAND) {
                WRW_HARPOON((port + ID_MSG_STRT), (MPM_OP + AMSG_OUT +
                                                   (currSCCB->
                                                    Sccb_idmsg & ~DISC_PRIV)));

                WRW_HARPOON((port + ID_MSG_STRT + 2), BRH_OP + ALWAYS + NP);

                currSCCB->Sccb_scsimsg = SMDEV_RESET;

                WR_HARPOON(port + hp_autostart_3, (SELECT + SELCHK_STRT));
                auto_loaded = 1;
                currSCCB->Sccb_scsistat = SELECT_BDR_ST;

                if (currTar_Info->TarEEValue & EE_SYNC_MASK) {
                        currTar_Info->TarSyncCtrl = 0;
                        currTar_Info->TarStatus &= ~TAR_SYNC_MASK;
                }

                if (currTar_Info->TarEEValue & EE_WIDE_SCSI) {
                        currTar_Info->TarStatus &= ~TAR_WIDE_MASK;
                }

                FPT_sssyncv(port, target, NARROW_SCSI, currTar_Info);
                FPT_SccbMgrTableInitTarget(p_card, target);

        }

        else if (currSCCB->Sccb_scsistat == ABORT_ST) {
                WRW_HARPOON((port + ID_MSG_STRT), (MPM_OP + AMSG_OUT +
                                                   (currSCCB->
                                                    Sccb_idmsg & ~DISC_PRIV)));

                WRW_HARPOON((port + ID_MSG_STRT + 2), BRH_OP + ALWAYS + CMDPZ);

                WRW_HARPOON((port + SYNC_MSGS + 0), (MPM_OP + AMSG_OUT +
                                                     (((unsigned
                                                        char)(currSCCB->
                                                              ControlByte &
                                                              TAG_TYPE_MASK)
                                                       >> 6) | (unsigned char)
                                                      0x20)));
                WRW_HARPOON((port + SYNC_MSGS + 2),
                            (MPM_OP + AMSG_OUT + currSCCB->Sccb_tag));
                WRW_HARPOON((port + SYNC_MSGS + 4), (BRH_OP + ALWAYS + NP));

                WR_HARPOON(port + hp_autostart_3, (SELECT + SELCHK_STRT));
                auto_loaded = 1;

        }

        else if (!(currTar_Info->TarStatus & WIDE_NEGOCIATED)) {
                auto_loaded = FPT_siwidn(port, p_card);
                currSCCB->Sccb_scsistat = SELECT_WN_ST;
        }

        else if (!((currTar_Info->TarStatus & TAR_SYNC_MASK)
                   == SYNC_SUPPORTED)) {
                auto_loaded = FPT_sisyncn(port, p_card, 0);
                currSCCB->Sccb_scsistat = SELECT_SN_ST;
        }

        if (!auto_loaded) {

                if (currSCCB->ControlByte & F_USE_CMD_Q) {

                        CurrCard->globalFlags |= F_TAG_STARTED;

                        if ((currTar_Info->TarStatus & TAR_TAG_Q_MASK)
                            == TAG_Q_REJECT) {
                                currSCCB->ControlByte &= ~F_USE_CMD_Q;

                                /* Fix up the start instruction with a jump to
                                   Non-Tag-CMD handling */
                                WRW_HARPOON((port + ID_MSG_STRT),
                                            BRH_OP + ALWAYS + NTCMD);

                                WRW_HARPOON((port + NON_TAG_ID_MSG),
                                            (MPM_OP + AMSG_OUT +
                                             currSCCB->Sccb_idmsg));

                                WR_HARPOON(port + hp_autostart_3,
                                           (SELECT + SELCHK_STRT));

                                /* Setup our STATE so we know what happened when
                                   the wheels fall off. */
                                currSCCB->Sccb_scsistat = SELECT_ST;

                                currTar_Info->TarLUNBusy[lun] = 1;
                        }

                        else {
                                WRW_HARPOON((port + ID_MSG_STRT),
                                            (MPM_OP + AMSG_OUT +
                                             currSCCB->Sccb_idmsg));

                                WRW_HARPOON((port + ID_MSG_STRT + 2),
                                            (MPM_OP + AMSG_OUT +
                                             (((unsigned char)(currSCCB->
                                                               ControlByte &
                                                               TAG_TYPE_MASK)
                                               >> 6) | (unsigned char)0x20)));

                                for (i = 1; i < QUEUE_DEPTH; i++) {
                                        if (++lastTag >= QUEUE_DEPTH)
                                                lastTag = 1;
                                        if (CurrCard->discQ_Tbl[lastTag] ==
                                            NULL) {
                                                WRW_HARPOON((port +
                                                             ID_MSG_STRT + 6),
                                                            (MPM_OP + AMSG_OUT +
                                                             lastTag));
                                                CurrCard->tagQ_Lst = lastTag;
                                                currSCCB->Sccb_tag = lastTag;
                                                CurrCard->discQ_Tbl[lastTag] =
                                                    currSCCB;
                                                CurrCard->discQCount++;
                                                break;
                                        }
                                }

                                if (i == QUEUE_DEPTH) {
                                        currTar_Info->TarLUNBusy[lun] = 1;
                                        FPT_queueSelectFail(CurrCard, p_card);
                                        SGRAM_ACCESS(port);
                                        return;
                                }

                                currSCCB->Sccb_scsistat = SELECT_Q_ST;

                                WR_HARPOON(port + hp_autostart_3,
                                           (SELECT + SELCHK_STRT));
                        }
                }

                else {

                        WRW_HARPOON((port + ID_MSG_STRT),
                                    BRH_OP + ALWAYS + NTCMD);

                        WRW_HARPOON((port + NON_TAG_ID_MSG),
                                    (MPM_OP + AMSG_OUT + currSCCB->Sccb_idmsg));

                        currSCCB->Sccb_scsistat = SELECT_ST;

                        WR_HARPOON(port + hp_autostart_3,
                                   (SELECT + SELCHK_STRT));
                }

                theCCB = (unsigned char *)&currSCCB->Cdb[0];

                cdb_reg = port + CMD_STRT;

                for (i = 0; i < currSCCB->CdbLength; i++) {
                        WRW_HARPOON(cdb_reg, (MPM_OP + ACOMMAND + *theCCB));
                        cdb_reg += 2;
                        theCCB++;
                }

                if (currSCCB->CdbLength != TWELVE_BYTE_CMD)
                        WRW_HARPOON(cdb_reg, (BRH_OP + ALWAYS + NP));

        }
        /* auto_loaded */
        WRW_HARPOON((port + hp_fiforead), (unsigned short)0x00);
        WR_HARPOON(port + hp_xferstat, 0x00);

        WRW_HARPOON((port + hp_intstat), (PROG_HLT | TIMEOUT | SEL | BUS_FREE));

        WR_HARPOON(port + hp_portctrl_0, (SCSI_PORT));

        if (!(currSCCB->Sccb_MGRFlags & F_DEV_SELECTED)) {
                WR_HARPOON(port + hp_scsictrl_0,
                           (SEL_TAR | ENA_ATN | ENA_RESEL | ENA_SCAM_SEL));
        } else {

/*      auto_loaded =  (RD_HARPOON(port+hp_autostart_3) & (unsigned char)0x1F);
      auto_loaded |= AUTO_IMMED; */
                auto_loaded = AUTO_IMMED;

                DISABLE_AUTO(port);

                WR_HARPOON(port + hp_autostart_3, auto_loaded);
        }

        SGRAM_ACCESS(port);
}

/*---------------------------------------------------------------------
 *
 * Function: FPT_sres
 *
 * Description: Hookup the correct CCB and handle the incoming messages.
 *
 *---------------------------------------------------------------------*/

static void FPT_sres(unsigned long port, unsigned char p_card,
                     struct sccb_card *pCurrCard)
{

        unsigned char our_target, message, lun = 0, tag, msgRetryCount;

        struct sccb_mgr_tar_info *currTar_Info;
        struct sccb *currSCCB;

        if (pCurrCard->currentSCCB != NULL) {
                currTar_Info =
                    &FPT_sccbMgrTbl[p_card][pCurrCard->currentSCCB->TargID];
                DISABLE_AUTO(port);

                WR_HARPOON((port + hp_scsictrl_0), (ENA_RESEL | ENA_SCAM_SEL));

                currSCCB = pCurrCard->currentSCCB;
                if (currSCCB->Sccb_scsistat == SELECT_WN_ST) {
                        currTar_Info->TarStatus &= ~TAR_WIDE_MASK;
                        currSCCB->Sccb_scsistat = BUS_FREE_ST;
                }
                if (currSCCB->Sccb_scsistat == SELECT_SN_ST) {
                        currTar_Info->TarStatus &= ~TAR_SYNC_MASK;
                        currSCCB->Sccb_scsistat = BUS_FREE_ST;
                }
                if (((pCurrCard->globalFlags & F_CONLUN_IO) &&
                     ((currTar_Info->TarStatus & TAR_TAG_Q_MASK) !=
                      TAG_Q_TRYING))) {
                        currTar_Info->TarLUNBusy[currSCCB->Lun] = 0;
                        if (currSCCB->Sccb_scsistat != ABORT_ST) {
                                pCurrCard->discQCount--;
                                pCurrCard->discQ_Tbl[currTar_Info->
                                                     LunDiscQ_Idx[currSCCB->
                                                                  Lun]]
                                    = NULL;
                        }
                } else {
                        currTar_Info->TarLUNBusy[0] = 0;
                        if (currSCCB->Sccb_tag) {
                                if (currSCCB->Sccb_scsistat != ABORT_ST) {
                                        pCurrCard->discQCount--;
                                        pCurrCard->discQ_Tbl[currSCCB->
                                                             Sccb_tag] = NULL;
                                }
                        } else {
                                if (currSCCB->Sccb_scsistat != ABORT_ST) {
                                        pCurrCard->discQCount--;
                                        pCurrCard->discQ_Tbl[currTar_Info->
                                                             LunDiscQ_Idx[0]] =
                                            NULL;
                                }
                        }
                }

                FPT_queueSelectFail(&FPT_BL_Card[p_card], p_card);
        }

        WRW_HARPOON((port + hp_fiforead), (unsigned short)0x00);

        our_target = (unsigned char)(RD_HARPOON(port + hp_select_id) >> 4);
        currTar_Info = &FPT_sccbMgrTbl[p_card][our_target];

        msgRetryCount = 0;
        do {

                currTar_Info = &FPT_sccbMgrTbl[p_card][our_target];
                tag = 0;

                while (!(RD_HARPOON(port + hp_scsisig) & SCSI_REQ)) {
                        if (!(RD_HARPOON(port + hp_scsisig) & SCSI_BSY)) {

                                WRW_HARPOON((port + hp_intstat), PHASE);
                                return;
                        }
                }

                WRW_HARPOON((port + hp_intstat), PHASE);
                if ((RD_HARPOON(port + hp_scsisig) & S_SCSI_PHZ) == S_MSGI_PH) {

                        message = FPT_sfm(port, pCurrCard->currentSCCB);
                        if (message) {

                                if (message <= (0x80 | LUN_MASK)) {
                                        lun = message & (unsigned char)LUN_MASK;

                                        if ((currTar_Info->
                                             TarStatus & TAR_TAG_Q_MASK) ==
                                            TAG_Q_TRYING) {
                                                if (currTar_Info->TarTagQ_Cnt !=
                                                    0) {

                                                        if (!
                                                            (currTar_Info->
                                                             TarLUN_CA)) {
                                                                ACCEPT_MSG(port);       /*Release the ACK for ID msg. */

                                                                message =
                                                                    FPT_sfm
                                                                    (port,
                                                                     pCurrCard->
                                                                     currentSCCB);
                                                                if (message) {
                                                                        ACCEPT_MSG
                                                                            (port);
                                                                }

                                                                else
                                                                        message
                                                                            = 0;

                                                                if (message !=
                                                                    0) {
                                                                        tag =
                                                                            FPT_sfm
                                                                            (port,
                                                                             pCurrCard->
                                                                             currentSCCB);

                                                                        if (!
                                                                            (tag))
                                                                                message
                                                                                    =
                                                                                    0;
                                                                }

                                                        }
                                                        /*C.A. exists! */
                                                }
                                                /*End Q cnt != 0 */
                                        }
                                        /*End Tag cmds supported! */
                                }
                                /*End valid ID message.  */
                                else {

                                        ACCEPT_MSG_ATN(port);
                                }

                        }
                        /* End good id message. */
                        else {

                                message = 0;
                        }
                } else {
                        ACCEPT_MSG_ATN(port);

                        while (!
                               (RDW_HARPOON((port + hp_intstat)) &
                                (PHASE | RESET))
                               && !(RD_HARPOON(port + hp_scsisig) & SCSI_REQ)
                               && (RD_HARPOON(port + hp_scsisig) & SCSI_BSY)) ;

                        return;
                }

                if (message == 0) {
                        msgRetryCount++;
                        if (msgRetryCount == 1) {
                                FPT_SendMsg(port, SMPARITY);
                        } else {
                                FPT_SendMsg(port, SMDEV_RESET);

                                FPT_sssyncv(port, our_target, NARROW_SCSI,
                                            currTar_Info);

                                if (FPT_sccbMgrTbl[p_card][our_target].
                                    TarEEValue & EE_SYNC_MASK) {

                                        FPT_sccbMgrTbl[p_card][our_target].
                                            TarStatus &= ~TAR_SYNC_MASK;

                                }

                                if (FPT_sccbMgrTbl[p_card][our_target].
                                    TarEEValue & EE_WIDE_SCSI) {

                                        FPT_sccbMgrTbl[p_card][our_target].
                                            TarStatus &= ~TAR_WIDE_MASK;
                                }

                                FPT_queueFlushTargSccb(p_card, our_target,
                                                       SCCB_COMPLETE);
                                FPT_SccbMgrTableInitTarget(p_card, our_target);
                                return;
                        }
                }
        } while (message == 0);

        if (((pCurrCard->globalFlags & F_CONLUN_IO) &&
             ((currTar_Info->TarStatus & TAR_TAG_Q_MASK) != TAG_Q_TRYING))) {
                currTar_Info->TarLUNBusy[lun] = 1;
                pCurrCard->currentSCCB =
                    pCurrCard->discQ_Tbl[currTar_Info->LunDiscQ_Idx[lun]];
                if (pCurrCard->currentSCCB != NULL) {
                        ACCEPT_MSG(port);
                } else {
                        ACCEPT_MSG_ATN(port);
                }
        } else {
                currTar_Info->TarLUNBusy[0] = 1;

                if (tag) {
                        if (pCurrCard->discQ_Tbl[tag] != NULL) {
                                pCurrCard->currentSCCB =
                                    pCurrCard->discQ_Tbl[tag];
                                currTar_Info->TarTagQ_Cnt--;
                                ACCEPT_MSG(port);
                        } else {
                                ACCEPT_MSG_ATN(port);
                        }
                } else {
                        pCurrCard->currentSCCB =
                            pCurrCard->discQ_Tbl[currTar_Info->LunDiscQ_Idx[0]];
                        if (pCurrCard->currentSCCB != NULL) {
                                ACCEPT_MSG(port);
                        } else {
                                ACCEPT_MSG_ATN(port);
                        }
                }
        }

        if (pCurrCard->currentSCCB != NULL) {
                if (pCurrCard->currentSCCB->Sccb_scsistat == ABORT_ST) {
                        /* During Abort Tag command, the target could have got re-selected
                           and completed the command. Check the select Q and remove the CCB
                           if it is in the Select Q */
                        FPT_queueFindSccb(pCurrCard->currentSCCB, p_card);
                }
        }

        while (!(RDW_HARPOON((port + hp_intstat)) & (PHASE | RESET)) &&
               !(RD_HARPOON(port + hp_scsisig) & SCSI_REQ) &&
               (RD_HARPOON(port + hp_scsisig) & SCSI_BSY)) ;
}

static void FPT_SendMsg(unsigned long port, unsigned char message)
{
        while (!(RD_HARPOON(port + hp_scsisig) & SCSI_REQ)) {
                if (!(RD_HARPOON(port + hp_scsisig) & SCSI_BSY)) {

                        WRW_HARPOON((port + hp_intstat), PHASE);
                        return;
                }
        }

        WRW_HARPOON((port + hp_intstat), PHASE);
        if ((RD_HARPOON(port + hp_scsisig) & S_SCSI_PHZ) == S_MSGO_PH) {
                WRW_HARPOON((port + hp_intstat),
                            (BUS_FREE | PHASE | XFER_CNT_0));

                WR_HARPOON(port + hp_portctrl_0, SCSI_BUS_EN);

                WR_HARPOON(port + hp_scsidata_0, message);

                WR_HARPOON(port + hp_scsisig, (SCSI_ACK + S_ILL_PH));

                ACCEPT_MSG(port);

                WR_HARPOON(port + hp_portctrl_0, 0x00);

                if ((message == SMABORT) || (message == SMDEV_RESET) ||
                    (message == SMABORT_TAG)) {
                        while (!
                               (RDW_HARPOON((port + hp_intstat)) &
                                (BUS_FREE | PHASE))) {
                        }

                        if (RDW_HARPOON((port + hp_intstat)) & BUS_FREE) {
                                WRW_HARPOON((port + hp_intstat), BUS_FREE);
                        }
                }
        }
}

/*---------------------------------------------------------------------
 *
 * Function: FPT_sdecm
 *
 * Description: Determine the proper response to the message from the
 *              target device.
 *
 *---------------------------------------------------------------------*/
static void FPT_sdecm(unsigned char message, unsigned long port,
                      unsigned char p_card)
{
        struct sccb *currSCCB;
        struct sccb_card *CurrCard;
        struct sccb_mgr_tar_info *currTar_Info;

        CurrCard = &FPT_BL_Card[p_card];
        currSCCB = CurrCard->currentSCCB;

        currTar_Info = &FPT_sccbMgrTbl[p_card][currSCCB->TargID];

        if (message == SMREST_DATA_PTR) {
                if (!(currSCCB->Sccb_XferState & F_NO_DATA_YET)) {
                        currSCCB->Sccb_ATC = currSCCB->Sccb_savedATC;

                        FPT_hostDataXferRestart(currSCCB);
                }

                ACCEPT_MSG(port);
                WR_HARPOON(port + hp_autostart_1,
                           (AUTO_IMMED + DISCONNECT_START));
        }

        else if (message == SMCMD_COMP) {

                if (currSCCB->Sccb_scsistat == SELECT_Q_ST) {
                        currTar_Info->TarStatus &=
                            ~(unsigned char)TAR_TAG_Q_MASK;
                        currTar_Info->TarStatus |= (unsigned char)TAG_Q_REJECT;
                }

                ACCEPT_MSG(port);

        }

        else if ((message == SMNO_OP) || (message >= SMIDENT)
                 || (message == SMINIT_RECOVERY) || (message == SMREL_RECOVERY)) {

                ACCEPT_MSG(port);
                WR_HARPOON(port + hp_autostart_1,
                           (AUTO_IMMED + DISCONNECT_START));
        }

        else if (message == SMREJECT) {

                if ((currSCCB->Sccb_scsistat == SELECT_SN_ST) ||
                    (currSCCB->Sccb_scsistat == SELECT_WN_ST) ||
                    ((currTar_Info->TarStatus & TAR_SYNC_MASK) == SYNC_TRYING)
                    || ((currTar_Info->TarStatus & TAR_TAG_Q_MASK) ==
                        TAG_Q_TRYING))
                {
                        WRW_HARPOON((port + hp_intstat), BUS_FREE);

                        ACCEPT_MSG(port);

                        while ((!(RD_HARPOON(port + hp_scsisig) & SCSI_REQ)) &&
                               (!(RDW_HARPOON((port + hp_intstat)) & BUS_FREE)))
                        {
                        }

                        if (currSCCB->Lun == 0x00) {
                                if ((currSCCB->Sccb_scsistat == SELECT_SN_ST)) {

                                        currTar_Info->TarStatus |=
                                            (unsigned char)SYNC_SUPPORTED;

                                        currTar_Info->TarEEValue &=
                                            ~EE_SYNC_MASK;
                                }

                                else if ((currSCCB->Sccb_scsistat ==
                                          SELECT_WN_ST)) {

                                        currTar_Info->TarStatus =
                                            (currTar_Info->
                                             TarStatus & ~WIDE_ENABLED) |
                                            WIDE_NEGOCIATED;

                                        currTar_Info->TarEEValue &=
                                            ~EE_WIDE_SCSI;

                                }

                                else if ((currTar_Info->
                                          TarStatus & TAR_TAG_Q_MASK) ==
                                         TAG_Q_TRYING) {
                                        currTar_Info->TarStatus =
                                            (currTar_Info->
                                             TarStatus & ~(unsigned char)
                                             TAR_TAG_Q_MASK) | TAG_Q_REJECT;

                                        currSCCB->ControlByte &= ~F_USE_CMD_Q;
                                        CurrCard->discQCount--;