diff options
Diffstat (limited to 'sys/dev/aha')
| -rw-r--r-- | sys/dev/aha/aha.c | 2000 | ||||
| -rw-r--r-- | sys/dev/aha/aha_isa.c | 322 | ||||
| -rw-r--r-- | sys/dev/aha/aha_mca.c | 247 | ||||
| -rw-r--r-- | sys/dev/aha/ahareg.h | 445 |
4 files changed, 3014 insertions, 0 deletions
diff --git a/sys/dev/aha/aha.c b/sys/dev/aha/aha.c new file mode 100644 index 0000000..1baeefe --- /dev/null +++ b/sys/dev/aha/aha.c @@ -0,0 +1,2000 @@ +/* + * Generic register and struct definitions for the Adaptech 154x/164x + * SCSI host adapters. Product specific probe and attach routines can + * be found in: + * aha 1540/1542B/1542C/1542CF/1542CP aha_isa.c + * + * Copyright (c) 1998 M. Warner Losh. + * All Rights Reserved. + * + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions, and the following disclaimer, + * without modification, immediately at the beginning of the file. + * 2. The name of the author may not be used to endorse or promote products + * derived from this software without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR + * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + * + * Derived from bt.c written by: + * + * Copyright (c) 1998 Justin T. Gibbs. + * All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions, and the following disclaimer, + * without modification, immediately at the beginning of the file. + * 2. The name of the author may not be used to endorse or promote products + * derived from this software without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR + * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + * + * $FreeBSD$ + */ + +#include <sys/param.h> +#include <sys/systm.h> +#include <sys/malloc.h> +#include <sys/buf.h> +#include <sys/kernel.h> + +#include <machine/bus_pio.h> +#include <machine/bus.h> +#include <machine/clock.h> + +#include <cam/cam.h> +#include <cam/cam_ccb.h> +#include <cam/cam_sim.h> +#include <cam/cam_xpt_sim.h> +#include <cam/cam_debug.h> + +#include <cam/scsi/scsi_message.h> + +#include <vm/vm.h> +#include <vm/pmap.h> + +#include <dev/aha/ahareg.h> + +struct aha_softc *aha_softcs[NAHATOT]; + +#define PRVERB(x) if (bootverbose) printf x + +/* Macro to determine that a rev is potentially a new valid one + * so that the driver doesn't keep breaking on new revs as it + * did for the CF and CP. + */ +#define PROBABLY_NEW_BOARD(REV) (REV > 0x43 && REV < 0x56) + +#ifndef MAX +#define MAX(a, b) ((a) > (b) ? (a) : (b)) +#endif + +/* MailBox Management functions */ +static __inline void ahanextinbox(struct aha_softc *aha); +static __inline void ahanextoutbox(struct aha_softc *aha); + +static __inline void +ahanextinbox(struct aha_softc *aha) +{ + if (aha->cur_inbox == aha->last_inbox) + aha->cur_inbox = aha->in_boxes; + else + aha->cur_inbox++; +} + +static __inline void +ahanextoutbox(struct aha_softc *aha) +{ + if (aha->cur_outbox == aha->last_outbox) + aha->cur_outbox = aha->out_boxes; + else + aha->cur_outbox++; +} + +#define ahautoa24(u,s3) \ + (s3)[0] = ((u) >> 16) & 0xff; \ + (s3)[1] = ((u) >> 8) & 0xff; \ + (s3)[2] = (u) & 0xff; + +#define aha_a24tou(s3) \ + (((s3)[0] << 16) | ((s3)[1] << 8) | (s3)[2]) + +/* CCB Mangement functions */ +static __inline u_int32_t ahaccbvtop(struct aha_softc *aha, + struct aha_ccb *accb); +static __inline struct aha_ccb* ahaccbptov(struct aha_softc *aha, + u_int32_t ccb_addr); + +static __inline u_int32_t +ahaccbvtop(struct aha_softc *aha, struct aha_ccb *accb) +{ + return (aha->aha_ccb_physbase + + (u_int32_t)((caddr_t)accb - (caddr_t)aha->aha_ccb_array)); +} +static __inline struct aha_ccb * +ahaccbptov(struct aha_softc *aha, u_int32_t ccb_addr) +{ + return (aha->aha_ccb_array + + + ((struct aha_ccb*)ccb_addr-(struct aha_ccb*)aha->aha_ccb_physbase)); +} + +static struct aha_ccb* ahagetccb(struct aha_softc *aha); +static __inline void ahafreeccb(struct aha_softc *aha, struct aha_ccb *accb); +static void ahaallocccbs(struct aha_softc *aha); +static bus_dmamap_callback_t ahaexecuteccb; +static void ahadone(struct aha_softc *aha, struct aha_ccb *accb, + aha_mbi_comp_code_t comp_code); + +/* Host adapter command functions */ +static int ahareset(struct aha_softc* aha, int hard_reset); + +/* Initialization functions */ +static int ahainitmboxes(struct aha_softc *aha); +static bus_dmamap_callback_t ahamapmboxes; +static bus_dmamap_callback_t ahamapccbs; +static bus_dmamap_callback_t ahamapsgs; + +/* Transfer Negotiation Functions */ +static void ahafetchtransinfo(struct aha_softc *aha, + struct ccb_trans_settings *cts); + +/* CAM SIM entry points */ +#define ccb_accb_ptr spriv_ptr0 +#define ccb_aha_ptr spriv_ptr1 +static void ahaaction(struct cam_sim *sim, union ccb *ccb); +static void ahapoll(struct cam_sim *sim); + +/* Our timeout handler */ +static timeout_t ahatimeout; + +u_long aha_unit = 0; + +/* + * Do our own re-probe protection until a configuration + * manager can do it for us. This ensures that we don't + * reprobe a card already found by the EISA or PCI probes. + */ +static struct aha_isa_port aha_isa_ports[] = +{ + { 0x130, 0, 4 }, + { 0x134, 0, 5 }, + { 0x230, 0, 2 }, + { 0x234, 0, 3 }, + { 0x330, 0, 0 }, + { 0x334, 0, 1 } +}; + +/* + * I/O ports listed in the order enumerated by the + * card for certain op codes. + */ +static u_int16_t aha_board_ports[] = +{ + 0x330, + 0x334, + 0x230, + 0x234, + 0x130, + 0x134 +}; + +/* Exported functions */ +struct aha_softc * +aha_alloc(int unit, bus_space_tag_t tag, bus_space_handle_t bsh) +{ + struct aha_softc *aha; + + if (unit != AHA_TEMP_UNIT) { + if (unit >= NAHATOT) { + printf("aha: unit number (%d) too high\n", unit); + return NULL; + } + + /* + * Allocate a storage area for us + */ + if (aha_softcs[unit]) { + printf("aha%d: memory already allocated\n", unit); + return NULL; + } + } + + aha = malloc(sizeof(struct aha_softc), M_DEVBUF, M_NOWAIT); + if (!aha) { + printf("aha%d: cannot malloc!\n", unit); + return NULL; + } + bzero(aha, sizeof(struct aha_softc)); + SLIST_INIT(&aha->free_aha_ccbs); + LIST_INIT(&aha->pending_ccbs); + SLIST_INIT(&aha->sg_maps); + aha->unit = unit; + aha->tag = tag; + aha->bsh = bsh; + aha->ccb_sg_opcode = INITIATOR_SG_CCB_WRESID; + aha->ccb_ccb_opcode = INITIATOR_CCB_WRESID; + + if (aha->unit != AHA_TEMP_UNIT) { + aha_softcs[unit] = aha; + } + return (aha); +} + +void +aha_free(struct aha_softc *aha) +{ + switch (aha->init_level) { + default: + case 8: + { + struct sg_map_node *sg_map; + + while ((sg_map = SLIST_FIRST(&aha->sg_maps))!= NULL) { + SLIST_REMOVE_HEAD(&aha->sg_maps, links); + bus_dmamap_unload(aha->sg_dmat, + sg_map->sg_dmamap); + bus_dmamem_free(aha->sg_dmat, sg_map->sg_vaddr, + sg_map->sg_dmamap); + free(sg_map, M_DEVBUF); + } + bus_dma_tag_destroy(aha->sg_dmat); + } + case 7: + bus_dmamap_unload(aha->ccb_dmat, aha->ccb_dmamap); + case 6: + bus_dmamap_destroy(aha->ccb_dmat, aha->ccb_dmamap); + bus_dmamem_free(aha->ccb_dmat, aha->aha_ccb_array, + aha->ccb_dmamap); + case 5: + bus_dma_tag_destroy(aha->ccb_dmat); + case 4: + bus_dmamap_unload(aha->mailbox_dmat, aha->mailbox_dmamap); + case 3: + bus_dmamem_free(aha->mailbox_dmat, aha->in_boxes, + aha->mailbox_dmamap); + bus_dmamap_destroy(aha->mailbox_dmat, aha->mailbox_dmamap); + case 2: + bus_dma_tag_destroy(aha->buffer_dmat); + case 1: + bus_dma_tag_destroy(aha->mailbox_dmat); + case 0: + } + if (aha->unit != AHA_TEMP_UNIT) { + aha_softcs[aha->unit] = NULL; + } + free(aha, M_DEVBUF); +} + +/* + * Probe the adapter and verify that the card is an Adaptec. + */ +int +aha_probe(struct aha_softc* aha) +{ + u_int status; + u_int intstat; + int error; + board_id_data_t board_id; + + /* + * See if the three I/O ports look reasonable. + * Touch the minimal number of registers in the + * failure case. + */ + status = aha_inb(aha, STATUS_REG); + if ((status == 0) + || (status & (DIAG_ACTIVE|CMD_REG_BUSY| + STATUS_REG_RSVD)) != 0) { + PRVERB(("%s: status reg test failed %x\n", aha_name(aha), + status)); + return (ENXIO); + } + + intstat = aha_inb(aha, INTSTAT_REG); + if ((intstat & INTSTAT_REG_RSVD) != 0) { + PRVERB(("%s: Failed Intstat Reg Test\n", aha_name(aha))); + return (ENXIO); + } + + /* + * Looking good so far. Final test is to reset the + * adapter and fetch the board ID and ensure we aren't + * looking at a BusLogic. + */ + if ((error = ahareset(aha, /*hard_reset*/TRUE)) != 0) { + PRVERB(("%s: Failed Reset\n", aha_name(aha))); + return (ENXIO); + } + + /* + * Get the board ID. We use this to see if we're dealing with + * a buslogic card or a aha card (or clone). + */ + error = aha_cmd(aha, AOP_INQUIRE_BOARD_ID, NULL, /*parmlen*/0, + (u_int8_t*)&board_id, sizeof(board_id), + DEFAULT_CMD_TIMEOUT); + if (error != 0) { + PRVERB(("%s: INQUIRE failed %x\n", aha_name(aha), error)); + return (ENXIO); + } + aha->fw_major = board_id.firmware_rev_major; + aha->fw_minor = board_id.firmware_rev_minor; + aha->boardid = board_id.board_type; + + /* + * The Buslogic cards have an id of either 0x41 or 0x42. So + * if those come up in the probe, we test the geometry register + * of the board. Adaptec boards that are this old will not have + * this register, and return 0xff, while buslogic cards will return + * something different. + * + * It appears that for reasons unknow, for the for the + * aha-1542B cards, we need to wait a little bit before trying + * to read the geometry register. I picked 10ms since we have + * reports that a for loop to 1000 did the trick, and this + * errs on the side of conservatism. Besides, no one will + * notice a 10mS delay here, even the 1542B card users :-) + * + * Some compatible cards return 0 here. Some cards also + * seem to return 0x7f. + * + * XXX I'm not sure how this will impact other cloned cards + * + * This really should be replaced with the esetup command, since + * that appears to be more reliable. This becomes more and more + * true over time as we discover more cards that don't read the + * geometry register consistantly. + */ + if (aha->boardid <= 0x42) { + /* Wait 10ms before reading */ + DELAY(10000); + status = aha_inb(aha, GEOMETRY_REG); + if (status != 0xff && status != 0x00 && status != 0x7f) { + PRVERB(("%s: Geometry Register test failed 0x%x\n", + aha_name(aha), status)); + return (ENXIO); + } + } + + return (0); +} + +/* + * Pull the boards setup information and record it in our softc. + */ +int +aha_fetch_adapter_info(struct aha_softc *aha) +{ + setup_data_t setup_info; + config_data_t config_data; + u_int8_t length_param; + int error; + struct aha_extbios extbios; + + switch (aha->boardid) { + case BOARD_1540_16HEAD_BIOS: + snprintf(aha->model, sizeof(aha->model), "1540 16 head BIOS"); + break; + case BOARD_1540_64HEAD_BIOS: + snprintf(aha->model, sizeof(aha->model), "1540 64 head BIOS"); + break; + case BOARD_1542: + snprintf(aha->model, sizeof(aha->model), "1540/1542 64 head BIOS"); + break; + case BOARD_1640: + snprintf(aha->model, sizeof(aha->model), "1640"); + break; + case BOARD_1740: + snprintf(aha->model, sizeof(aha->model), "1740A/1742A/1744"); + break; + case BOARD_1542C: + snprintf(aha->model, sizeof(aha->model), "1542C"); + break; + case BOARD_1542CF: + snprintf(aha->model, sizeof(aha->model), "1542CF"); + break; + case BOARD_1542CP: + snprintf(aha->model, sizeof(aha->model), "1542CP"); + break; + default: + snprintf(aha->model, sizeof(aha->model), "Unknown"); + break; + } + /* + * If we are a new type of 1542 board (anything newer than a 1542C) + * then disable the extended bios so that the + * mailbox interface is unlocked. + * This is also true for the 1542B Version 3.20. First Adaptec + * board that supports >1Gb drives. + * No need to check the extended bios flags as some of the + * extensions that cause us problems are not flagged in that byte. + */ + if (PROBABLY_NEW_BOARD(aha->boardid) || + (aha->boardid == 0x41 + && aha->fw_major == 0x31 && + aha->fw_minor >= 0x34)) { + error = aha_cmd(aha, AOP_RETURN_EXT_BIOS_INFO, NULL, + /*paramlen*/0, (u_char *)&extbios, sizeof(extbios), + DEFAULT_CMD_TIMEOUT); + error = aha_cmd(aha, AOP_MBOX_IF_ENABLE, (u_int8_t *)&extbios, + /*paramlen*/2, NULL, 0, DEFAULT_CMD_TIMEOUT); + } + if (aha->boardid < 0x41) + printf("%s: Warning: aha-1542A won't likely work.\n", + aha_name(aha)); + + aha->max_sg = 17; /* Need >= 17 to do 64k I/O */ + aha->diff_bus = 0; + aha->extended_lun = 0; + aha->extended_trans = 0; + aha->max_ccbs = 16; + /* Determine Sync/Wide/Disc settings */ + length_param = sizeof(setup_info); + error = aha_cmd(aha, AOP_INQUIRE_SETUP_INFO, &length_param, + /*paramlen*/1, (u_int8_t*)&setup_info, + sizeof(setup_info), DEFAULT_CMD_TIMEOUT); + if (error != 0) { + printf("%s: aha_fetch_adapter_info - Failed " + "Get Setup Info\n", aha_name(aha)); + return (error); + } + if (setup_info.initiate_sync != 0) { + aha->sync_permitted = ALL_TARGETS; + } + aha->disc_permitted = ALL_TARGETS; + + /* We need as many mailboxes as we can have ccbs */ + aha->num_boxes = aha->max_ccbs; + + /* Determine our SCSI ID */ + + error = aha_cmd(aha, AOP_INQUIRE_CONFIG, NULL, /*parmlen*/0, + (u_int8_t*)&config_data, sizeof(config_data), + DEFAULT_CMD_TIMEOUT); + if (error != 0) { + printf("%s: aha_fetch_adapter_info - Failed Get Config\n", + aha_name(aha)); + return (error); + } + aha->scsi_id = config_data.scsi_id; + return (0); +} + +/* + * Start the board, ready for normal operation + */ +int +aha_init(struct aha_softc* aha) +{ + /* Announce the Adapter */ + printf("%s: AHA-%s FW Rev. %c.%c (ID=%x) ", aha_name(aha), + aha->model, aha->fw_major, aha->fw_minor, aha->boardid); + + if (aha->diff_bus != 0) + printf("Diff "); + + printf("SCSI Host Adapter, SCSI ID %d, %d CCBs\n", aha->scsi_id, + aha->max_ccbs); + + /* + * Create our DMA tags. These tags define the kinds of device + * accessable memory allocations and memory mappings we will + * need to perform during normal operation. + * + * Unless we need to further restrict the allocation, we rely + * on the restrictions of the parent dmat, hence the common + * use of MAXADDR and MAXSIZE. + */ + + /* DMA tag for mapping buffers into device visible space. */ + if (bus_dma_tag_create(aha->parent_dmat, /*alignment*/1, /*boundary*/0, + /*lowaddr*/BUS_SPACE_MAXADDR, + /*highaddr*/BUS_SPACE_MAXADDR, + /*filter*/NULL, /*filterarg*/NULL, + /*maxsize*/MAXBSIZE, /*nsegments*/AHA_NSEG, + /*maxsegsz*/BUS_SPACE_MAXSIZE_24BIT, + /*flags*/BUS_DMA_ALLOCNOW, + &aha->buffer_dmat) != 0) { + goto error_exit; + } + + aha->init_level++; + /* DMA tag for our mailboxes */ + if (bus_dma_tag_create(aha->parent_dmat, /*alignment*/1, /*boundary*/0, + /*lowaddr*/BUS_SPACE_MAXADDR, + /*highaddr*/BUS_SPACE_MAXADDR, + /*filter*/NULL, /*filterarg*/NULL, + aha->num_boxes * (sizeof(aha_mbox_in_t) + + sizeof(aha_mbox_out_t)), + /*nsegments*/1, + /*maxsegsz*/BUS_SPACE_MAXSIZE_24BIT, + /*flags*/0, &aha->mailbox_dmat) != 0) { + goto error_exit; + } + + aha->init_level++; + + /* Allocation for our mailboxes */ + if (bus_dmamem_alloc(aha->mailbox_dmat, (void **)&aha->out_boxes, + BUS_DMA_NOWAIT, &aha->mailbox_dmamap) != 0) { + goto error_exit; + } + + aha->init_level++; + + /* And permanently map them */ + bus_dmamap_load(aha->mailbox_dmat, aha->mailbox_dmamap, + aha->out_boxes, + aha->num_boxes * (sizeof(aha_mbox_in_t) + + sizeof(aha_mbox_out_t)), + ahamapmboxes, aha, /*flags*/0); + + aha->init_level++; + + aha->in_boxes = (aha_mbox_in_t *)&aha->out_boxes[aha->num_boxes]; + + ahainitmboxes(aha); + + /* DMA tag for our ccb structures */ + if (bus_dma_tag_create(aha->parent_dmat, /*alignment*/1, /*boundary*/0, + /*lowaddr*/BUS_SPACE_MAXADDR, + /*highaddr*/BUS_SPACE_MAXADDR, + /*filter*/NULL, /*filterarg*/NULL, + aha->max_ccbs * sizeof(struct aha_ccb), + /*nsegments*/1, + /*maxsegsz*/BUS_SPACE_MAXSIZE_24BIT, + /*flags*/0, &aha->ccb_dmat) != 0) { + goto error_exit; + } + + aha->init_level++; + + /* Allocation for our ccbs */ + if (bus_dmamem_alloc(aha->ccb_dmat, (void **)&aha->aha_ccb_array, + BUS_DMA_NOWAIT, &aha->ccb_dmamap) != 0) { + goto error_exit; + } + + aha->init_level++; + + /* And permanently map them */ + bus_dmamap_load(aha->ccb_dmat, aha->ccb_dmamap, + aha->aha_ccb_array, + aha->max_ccbs * sizeof(struct aha_ccb), + ahamapccbs, aha, /*flags*/0); + + aha->init_level++; + + /* DMA tag for our S/G structures. We allocate in page sized chunks */ + if (bus_dma_tag_create(aha->parent_dmat, /*alignment*/1, /*boundary*/0, + /*lowaddr*/BUS_SPACE_MAXADDR, + /*highaddr*/BUS_SPACE_MAXADDR, + /*filter*/NULL, /*filterarg*/NULL, + PAGE_SIZE, /*nsegments*/1, + /*maxsegsz*/BUS_SPACE_MAXSIZE_24BIT, + /*flags*/0, &aha->sg_dmat) != 0) { + goto error_exit; + } + + aha->init_level++; + + /* Perform initial CCB allocation */ + bzero(aha->aha_ccb_array, aha->max_ccbs * sizeof(struct aha_ccb)); + ahaallocccbs(aha); + + if (aha->num_ccbs == 0) { + printf("%s: aha_init - Unable to allocate initial ccbs\n", + aha_name(aha)); + goto error_exit; + } + + /* + * Note that we are going and return (to probe) + */ + return 0; + +error_exit: + + return (ENXIO); +} + +int +aha_attach(struct aha_softc *aha) +{ + int tagged_dev_openings; + struct cam_devq *devq; + + /* + * We don't do tagged queueing, since the aha cards don't + * support it. + */ + tagged_dev_openings = 0; + + /* + * Create the device queue for our SIM. + */ + devq = cam_simq_alloc(aha->max_ccbs - 1); + if (devq == NULL) + return (ENOMEM); + + /* + * Construct our SIM entry + */ + aha->sim = cam_sim_alloc(ahaaction, ahapoll, "aha", aha, aha->unit, + 2, tagged_dev_openings, devq); + if (aha->sim == NULL) { + cam_simq_free(devq); + return (ENOMEM); + } + + if (xpt_bus_register(aha->sim, 0) != CAM_SUCCESS) { + cam_sim_free(aha->sim, /*free_devq*/TRUE); + return (ENXIO); + } + + if (xpt_create_path(&aha->path, /*periph*/NULL, + cam_sim_path(aha->sim), CAM_TARGET_WILDCARD, + CAM_LUN_WILDCARD) != CAM_REQ_CMP) { + xpt_bus_deregister(cam_sim_path(aha->sim)); + cam_sim_free(aha->sim, /*free_devq*/TRUE); + return (ENXIO); + } + + return (0); +} + +char * +aha_name(struct aha_softc *aha) +{ + static char name[10]; + + snprintf(name, sizeof(name), "aha%d", aha->unit); + return (name); +} + +int +aha_check_probed_iop(u_int ioport) +{ + u_int i; + + for (i=0; i < AHA_NUM_ISAPORTS; i++) { + if (aha_isa_ports[i].addr == ioport) { + if (aha_isa_ports[i].probed != 0) + return (1); + else { + return (0); + } + } + } + return (1); +} + +void +aha_mark_probed_bio(isa_compat_io_t port) +{ + if (port < BIO_DISABLED) + aha_mark_probed_iop(aha_board_ports[port]); +} + +void +aha_mark_probed_iop(u_int ioport) +{ + u_int i; + + for (i = 0; i < AHA_NUM_ISAPORTS; i++) { + if (ioport == aha_isa_ports[i].addr) { + aha_isa_ports[i].probed = 1; + break; + } + } +} + +void +aha_find_probe_range(int ioport, int *port_index, int *max_port_index) +{ + if (ioport > 0) { + int i; + + for (i = 0;i < AHA_NUM_ISAPORTS; i++) + if (ioport <= aha_isa_ports[i].addr) + break; + if ((i >= AHA_NUM_ISAPORTS) + || (ioport != aha_isa_ports[i].addr)) { + printf("\n" +"aha_isa_probe: Invalid baseport of 0x%x specified.\n" +"aha_isa_probe: Nearest valid baseport is 0x%x.\n" +"aha_isa_probe: Failing probe.\n", + ioport, + (i < AHA_NUM_ISAPORTS) + ? aha_isa_ports[i].addr + : aha_isa_ports[AHA_NUM_ISAPORTS - 1].addr); + *port_index = *max_port_index = -1; + return; + } + *port_index = *max_port_index = aha_isa_ports[i].bio; + } else { + *port_index = 0; + *max_port_index = AHA_NUM_ISAPORTS - 1; + } +} + +int +aha_iop_from_bio(isa_compat_io_t bio_index) +{ + if (bio_index >= 0 && bio_index < AHA_NUM_ISAPORTS) + return (aha_board_ports[bio_index]); + return (-1); +} + +static void +ahaallocccbs(struct aha_softc *aha) +{ + struct aha_ccb *next_ccb; + struct sg_map_node *sg_map; + bus_addr_t physaddr; + aha_sg_t *segs; + int newcount; + int i; + + next_ccb = &aha->aha_ccb_array[aha->num_ccbs]; + + sg_map = malloc(sizeof(*sg_map), M_DEVBUF, M_NOWAIT); + + if (sg_map == NULL) + return; + + /* Allocate S/G space for the next batch of CCBS */ + if (bus_dmamem_alloc(aha->sg_dmat, (void **)&sg_map->sg_vaddr, + BUS_DMA_NOWAIT, &sg_map->sg_dmamap) != 0) { + free(sg_map, M_DEVBUF); + return; + } + + SLIST_INSERT_HEAD(&aha->sg_maps, sg_map, links); + + bus_dmamap_load(aha->sg_dmat, sg_map->sg_dmamap, sg_map->sg_vaddr, + PAGE_SIZE, ahamapsgs, aha, /*flags*/0); + + segs = sg_map->sg_vaddr; + physaddr = sg_map->sg_physaddr; + + newcount = (PAGE_SIZE / (AHA_NSEG * sizeof(aha_sg_t))); + for (i = 0; aha->num_ccbs < aha->max_ccbs && i < newcount; i++) { + int error; + + next_ccb->sg_list = segs; + next_ccb->sg_list_phys = physaddr; + next_ccb->flags = ACCB_FREE; + error = bus_dmamap_create(aha->buffer_dmat, /*flags*/0, + &next_ccb->dmamap); + if (error != 0) + break; + SLIST_INSERT_HEAD(&aha->free_aha_ccbs, next_ccb, links); + segs += AHA_NSEG; + physaddr += (AHA_NSEG * sizeof(aha_sg_t)); + next_ccb++; + aha->num_ccbs++; + } + + /* Reserve a CCB for error recovery */ + if (aha->recovery_accb == NULL) { + aha->recovery_accb = SLIST_FIRST(&aha->free_aha_ccbs); + SLIST_REMOVE_HEAD(&aha->free_aha_ccbs, links); + } +} + +static __inline void +ahafreeccb(struct aha_softc *aha, struct aha_ccb *accb) +{ + int s; + + s = splcam(); + if ((accb->flags & ACCB_ACTIVE) != 0) + LIST_REMOVE(&accb->ccb->ccb_h, sim_links.le); + if (aha->resource_shortage != 0 + && (accb->ccb->ccb_h.status & CAM_RELEASE_SIMQ) == 0) { + accb->ccb->ccb_h.status |= CAM_RELEASE_SIMQ; + aha->resource_shortage = FALSE; + } + accb->flags = ACCB_FREE; + SLIST_INSERT_HEAD(&aha->free_aha_ccbs, accb, links); + aha->active_ccbs--; + splx(s); +} + +static struct aha_ccb* +ahagetccb(struct aha_softc *aha) +{ + struct aha_ccb* accb; + int s; + + s = splcam(); + if ((accb = SLIST_FIRST(&aha->free_aha_ccbs)) != NULL) { + SLIST_REMOVE_HEAD(&aha->free_aha_ccbs, links); + aha->active_ccbs++; + } else if (aha->num_ccbs < aha->max_ccbs) { + ahaallocccbs(aha); + accb = SLIST_FIRST(&aha->free_aha_ccbs); + if (accb == NULL) + printf("%s: Can't malloc ACCB\n", aha_name(aha)); + else { + SLIST_REMOVE_HEAD(&aha->free_aha_ccbs, links); + aha->active_ccbs++; + } + } + splx(s); + + return (accb); +} + +static void +ahaaction(struct cam_sim *sim, union ccb *ccb) +{ + struct aha_softc *aha; + + CAM_DEBUG(ccb->ccb_h.path, CAM_DEBUG_TRACE, ("ahaaction\n")); + + aha = (struct aha_softc *)cam_sim_softc(sim); + + switch (ccb->ccb_h.func_code) { + /* Common cases first */ + case XPT_SCSI_IO: /* Execute the requested I/O operation */ + case XPT_RESET_DEV: /* Bus Device Reset the specified SCSI device */ + { + struct aha_ccb *accb; + struct aha_hccb *hccb; + + /* + * get a accb to use. + */ + if ((accb = ahagetccb(aha)) == NULL) { + int s; + + s = splcam(); + aha->resource_shortage = TRUE; + splx(s); + xpt_freeze_simq(aha->sim, /*count*/1); + ccb->ccb_h.status = CAM_REQUEUE_REQ; + xpt_done(ccb); + return; + } + + hccb = &accb->hccb; + + /* + * So we can find the ACCB when an abort is requested + */ + accb->ccb = ccb; + ccb->ccb_h.ccb_accb_ptr = accb; + ccb->ccb_h.ccb_aha_ptr = aha; + + /* + * Put all the arguments for the xfer in the accb + */ + hccb->target = ccb->ccb_h.target_id; + hccb->lun = ccb->ccb_h.target_lun; + hccb->ahastat = 0; + hccb->sdstat = 0; + + if (ccb->ccb_h.func_code == XPT_SCSI_IO) { + struct ccb_scsiio *csio; + struct ccb_hdr *ccbh; + + csio = &ccb->csio; + ccbh = &csio->ccb_h; + hccb->opcode = aha->ccb_ccb_opcode; + hccb->datain = (ccb->ccb_h.flags & CAM_DIR_IN) != 0; + hccb->dataout = (ccb->ccb_h.flags & CAM_DIR_OUT) != 0; + hccb->cmd_len = csio->cdb_len; + if (hccb->cmd_len > sizeof(hccb->scsi_cdb)) { + ccb->ccb_h.status = CAM_REQ_INVALID; + ahafreeccb(aha, accb); + xpt_done(ccb); + return; + } + hccb->sense_len = csio->sense_len; + if ((ccbh->flags & CAM_CDB_POINTER) != 0) { + if ((ccbh->flags & CAM_CDB_PHYS) == 0) { + bcopy(csio->cdb_io.cdb_ptr, + hccb->scsi_cdb, hccb->cmd_len); + } else { + /* I guess I could map it in... */ + ccbh->status = CAM_REQ_INVALID; + ahafreeccb(aha, accb); + xpt_done(ccb); + return; + } + } else { + bcopy(csio->cdb_io.cdb_bytes, + hccb->scsi_cdb, hccb->cmd_len); + } + /* + * If we have any data to send with this command, + * map it into bus space. + */ + /* Only use S/G if there is a transfer */ + if ((ccbh->flags & CAM_DIR_MASK) != CAM_DIR_NONE) { + if ((ccbh->flags & CAM_SCATTER_VALID) == 0) { + /* + * We've been given a pointer + * to a single buffer. + */ + if ((ccbh->flags & CAM_DATA_PHYS)==0) { + int s; + int error; + + s = splsoftvm(); + error = bus_dmamap_load( + aha->buffer_dmat, + accb->dmamap, + csio->data_ptr, + csio->dxfer_len, + ahaexecuteccb, + accb, + /*flags*/0); + if (error == EINPROGRESS) { + /* + * So as to maintain + * ordering, freeze the + * controller queue + * until our mapping is + * returned. + */ + xpt_freeze_simq(aha->sim, + 1); + csio->ccb_h.status |= + CAM_RELEASE_SIMQ; + } + splx(s); + } else { + struct bus_dma_segment seg; + + /* Pointer to physical buffer */ + seg.ds_addr = + (bus_addr_t)csio->data_ptr; + seg.ds_len = csio->dxfer_len; + ahaexecuteccb(accb, &seg, 1, 0); + } + } else { + struct bus_dma_segment *segs; + + if ((ccbh->flags & CAM_DATA_PHYS) != 0) + panic("ahaaction - Physical " + "segment pointers " + "unsupported"); + + if ((ccbh->flags&CAM_SG_LIST_PHYS)==0) + panic("ahaaction - Virtual " + "segment addresses " + "unsupported"); + + /* Just use the segments provided */ + segs = (struct bus_dma_segment *) + csio->data_ptr; + ahaexecuteccb(accb, segs, + csio->sglist_cnt, 0); + } + } else { + ahaexecuteccb(accb, NULL, 0, 0); + } + } else { + hccb->opcode = INITIATOR_BUS_DEV_RESET; + /* No data transfer */ + hccb->datain = TRUE; + hccb->dataout = TRUE; + hccb->cmd_len = 0; + hccb->sense_len = 0; + ahaexecuteccb(accb, NULL, 0, 0); + } + break; + } + case XPT_EN_LUN: /* Enable LUN as a target */ + case XPT_TARGET_IO: /* Execute target I/O request */ + case XPT_ACCEPT_TARGET_IO: /* Accept Host Target Mode CDB */ + case XPT_CONT_TARGET_IO: /* Continue Host Target I/O Connection*/ + case XPT_ABORT: /* Abort the specified CCB */ + /* XXX Implement */ + ccb->ccb_h.status = CAM_REQ_INVALID; + xpt_done(ccb); + break; + case XPT_SET_TRAN_SETTINGS: + { + /* XXX Implement */ + ccb->ccb_h.status = CAM_PROVIDE_FAIL; + xpt_done(ccb); + break; + } + case XPT_GET_TRAN_SETTINGS: + /* Get default/user set transfer settings for the target */ + { + struct ccb_trans_settings *cts; + u_int target_mask; + + cts = &ccb->cts; + target_mask = 0x01 << ccb->ccb_h.target_id; + if ((cts->flags & CCB_TRANS_USER_SETTINGS) != 0) { + cts->flags = 0; + if ((aha->disc_permitted & target_mask) != 0) + cts->flags |= CCB_TRANS_DISC_ENB; + cts->bus_width = MSG_EXT_WDTR_BUS_8_BIT; + if ((aha->sync_permitted & target_mask) != 0) { + if (aha->boardid >= BOARD_1542CF) + cts->sync_period = 25; + else + cts->sync_period = 50; + } else + cts->sync_period = 0; + + if (cts->sync_period != 0) + cts->sync_offset = 15; + + cts->valid = CCB_TRANS_SYNC_RATE_VALID + | CCB_TRANS_SYNC_OFFSET_VALID + | CCB_TRANS_BUS_WIDTH_VALID + | CCB_TRANS_DISC_VALID + | CCB_TRANS_TQ_VALID; + } else { + ahafetchtransinfo(aha, cts); + } + + ccb->ccb_h.status = CAM_REQ_CMP; + xpt_done(ccb); + break; + } + case XPT_CALC_GEOMETRY: + { + struct ccb_calc_geometry *ccg; + u_int32_t size_mb; + u_int32_t secs_per_cylinder; + + ccg = &ccb->ccg; + size_mb = ccg->volume_size + / ((1024L * 1024L) / ccg->block_size); + + if (size_mb >= 1024 && (aha->extended_trans != 0)) { + if (size_mb >= 2048) { + ccg->heads = 255; + ccg->secs_per_track = 63; + } else { + ccg->heads = 128; + ccg->secs_per_track = 32; + } + } else { + ccg->heads = 64; + ccg->secs_per_track = 32; + } + secs_per_cylinder = ccg->heads * ccg->secs_per_track; + ccg->cylinders = ccg->volume_size / secs_per_cylinder; + ccb->ccb_h.status = CAM_REQ_CMP; + xpt_done(ccb); + break; + } + case XPT_RESET_BUS: /* Reset the specified SCSI bus */ + { + ahareset(aha, /*hardreset*/TRUE); + ccb->ccb_h.status = CAM_REQ_CMP; + xpt_done(ccb); + break; + } + case XPT_TERM_IO: /* Terminate the I/O process */ + /* XXX Implement */ + ccb->ccb_h.status = CAM_REQ_INVALID; + xpt_done(ccb); + break; + case XPT_PATH_INQ: /* Path routing inquiry */ + { + struct ccb_pathinq *cpi = &ccb->cpi; + + cpi->version_num = 1; /* XXX??? */ + cpi->hba_inquiry = PI_SDTR_ABLE; + cpi->target_sprt = 0; + cpi->hba_misc = 0; + cpi->hba_eng_cnt = 0; + cpi->max_target = 7; + cpi->max_lun = 7; + cpi->initiator_id = aha->scsi_id; + cpi->bus_id = cam_sim_bus(sim); + cpi->base_transfer_speed = 3300; + strncpy(cpi->sim_vid, "FreeBSD", SIM_IDLEN); + strncpy(cpi->hba_vid, "Adaptec", HBA_IDLEN); + strncpy(cpi->dev_name, cam_sim_name(sim), DEV_IDLEN); + cpi->unit_number = cam_sim_unit(sim); + cpi->ccb_h.status = CAM_REQ_CMP; + xpt_done(ccb); + break; + } + default: + ccb->ccb_h.status = CAM_REQ_INVALID; + xpt_done(ccb); + break; + } +} + +static void +ahaexecuteccb(void *arg, bus_dma_segment_t *dm_segs, int nseg, int error) +{ + struct aha_ccb *accb; + union ccb *ccb; + struct aha_softc *aha; + int s; + u_int32_t paddr; + + accb = (struct aha_ccb *)arg; + ccb = accb->ccb; + aha = (struct aha_softc *)ccb->ccb_h.ccb_aha_ptr; + + if (error != 0) { + if (error != EFBIG) + printf("%s: Unexepected error 0x%x returned from " + "bus_dmamap_load\n", aha_name(aha), error); + if (ccb->ccb_h.status == CAM_REQ_INPROG) { + xpt_freeze_devq(ccb->ccb_h.path, /*count*/1); + ccb->ccb_h.status = CAM_REQ_TOO_BIG|CAM_DEV_QFRZN; + } + ahafreeccb(aha, accb); + xpt_done(ccb); + return; + } + + if (nseg != 0) { + aha_sg_t *sg; + bus_dma_segment_t *end_seg; + bus_dmasync_op_t op; + + end_seg = dm_segs + nseg; + + /* Copy the segments into our SG list */ + sg = accb->sg_list; + while (dm_segs < end_seg) { + ahautoa24(dm_segs->ds_len, sg->len); + ahautoa24(dm_segs->ds_addr, sg->addr); + sg++; + dm_segs++; + } + + if (nseg > 1) { + accb->hccb.opcode = aha->ccb_sg_opcode; + ahautoa24((sizeof(aha_sg_t) * nseg), + accb->hccb.data_len); + ahautoa24(accb->sg_list_phys, accb->hccb.data_addr); + } else { + bcopy(accb->sg_list->len, accb->hccb.data_len, 3); + bcopy(accb->sg_list->addr, accb->hccb.data_addr, 3); + } + + if ((ccb->ccb_h.flags & CAM_DIR_MASK) == CAM_DIR_IN) + op = BUS_DMASYNC_PREREAD; + else + op = BUS_DMASYNC_PREWRITE; + + bus_dmamap_sync(aha->buffer_dmat, accb->dmamap, op); + + } else { + accb->hccb.opcode = INITIATOR_CCB; + ahautoa24(0, accb->hccb.data_len); + ahautoa24(0, accb->hccb.data_addr); + } + + s = splcam(); + + /* + * Last time we need to check if this CCB needs to + * be aborted. + */ + if (ccb->ccb_h.status != CAM_REQ_INPROG) { + if (nseg != 0) + bus_dmamap_unload(aha->buffer_dmat, accb->dmamap); + ahafreeccb(aha, accb); + xpt_done(ccb); + splx(s); + return; + } + + accb->flags = ACCB_ACTIVE; + ccb->ccb_h.status |= CAM_SIM_QUEUED; + LIST_INSERT_HEAD(&aha->pending_ccbs, &ccb->ccb_h, sim_links.le); + + ccb->ccb_h.timeout_ch = + timeout(ahatimeout, (caddr_t)accb, + (ccb->ccb_h.timeout * hz) / 1000); + + /* Tell the adapter about this command */ + if (aha->cur_outbox->action_code != AMBO_FREE) { + /* + * We should never encounter a busy mailbox. + * If we do, warn the user, and treat it as + * a resource shortage. If the controller is + * hung, one of the pending transactions will + * timeout causing us to start recovery operations. + */ + printf("%s: Encountered busy mailbox with %d out of %d " + "commands active!!!", aha_name(aha), aha->active_ccbs, + aha->max_ccbs); + untimeout(ahatimeout, accb, ccb->ccb_h.timeout_ch); + if (nseg != 0) + bus_dmamap_unload(aha->buffer_dmat, accb->dmamap); + ahafreeccb(aha, accb); + aha->resource_shortage = TRUE; + xpt_freeze_simq(aha->sim, /*count*/1); + ccb->ccb_h.status = CAM_REQUEUE_REQ; + xpt_done(ccb); + return; + } + paddr = ahaccbvtop(aha, accb); + ahautoa24(paddr, aha->cur_outbox->ccb_addr); + aha->cur_outbox->action_code = AMBO_START; + aha_outb(aha, COMMAND_REG, AOP_START_MBOX); + + ahanextoutbox(aha); + splx(s); +} + +void +aha_intr(void *arg) +{ + struct aha_softc *aha; + u_int intstat; + + aha = (struct aha_softc *)arg; + while (((intstat = aha_inb(aha, INTSTAT_REG)) & INTR_PENDING) != 0) { + if ((intstat & CMD_COMPLETE) != 0) { + aha->latched_status = aha_inb(aha, STATUS_REG); + aha->command_cmp = TRUE; + } + + aha_outb(aha, CONTROL_REG, RESET_INTR); + + if ((intstat & IMB_LOADED) != 0) { + while (aha->cur_inbox->comp_code != AMBI_FREE) { + u_int32_t paddr; + paddr = aha_a24tou(aha->cur_inbox->ccb_addr); + ahadone(aha, + ahaccbptov(aha, paddr), + aha->cur_inbox->comp_code); + aha->cur_inbox->comp_code = AMBI_FREE; + ahanextinbox(aha); + } + } + + if ((intstat & SCSI_BUS_RESET) != 0) { + ahareset(aha, /*hardreset*/FALSE); + } + } +} + +static void +ahadone(struct aha_softc *aha, struct aha_ccb *accb, aha_mbi_comp_code_t comp_code) +{ + union ccb *ccb; + struct ccb_scsiio *csio; + + ccb = accb->ccb; + csio = &accb->ccb->csio; + + if ((accb->flags & ACCB_ACTIVE) == 0) { + printf("%s: ahadone - Attempt to free non-active ACCB %p\n", + aha_name(aha), (void *)accb); + return; + } + + if ((ccb->ccb_h.flags & CAM_DIR_MASK) != CAM_DIR_NONE) { + bus_dmasync_op_t op; + + if ((ccb->ccb_h.flags & CAM_DIR_MASK) == CAM_DIR_IN) + op = BUS_DMASYNC_POSTREAD; + else + op = BUS_DMASYNC_POSTWRITE; + bus_dmamap_sync(aha->buffer_dmat, accb->dmamap, op); + bus_dmamap_unload(aha->buffer_dmat, accb->dmamap); + } + + if (accb == aha->recovery_accb) { + /* + * The recovery ACCB does not have a CCB associated + * with it, so short circuit the normal error handling. + * We now traverse our list of pending CCBs and process + * any that were terminated by the recovery CCBs action. + * We also reinstate timeouts for all remaining, pending, + * CCBs. + */ + struct cam_path *path; + struct ccb_hdr *ccb_h; + cam_status error; + + /* Notify all clients that a BDR occured */ + error = xpt_create_path(&path, /*periph*/NULL, + cam_sim_path(aha->sim), + accb->hccb.target, + CAM_LUN_WILDCARD); + + if (error == CAM_REQ_CMP) + xpt_async(AC_SENT_BDR, path, NULL); + + ccb_h = LIST_FIRST(&aha->pending_ccbs); + while (ccb_h != NULL) { + struct aha_ccb *pending_accb; + + pending_accb = (struct aha_ccb *)ccb_h->ccb_accb_ptr; + if (pending_accb->hccb.target == accb->hccb.target) { + pending_accb->hccb.ahastat = AHASTAT_HA_BDR; + ccb_h = LIST_NEXT(ccb_h, sim_links.le); + ahadone(aha, pending_accb, AMBI_ERROR); + } else { + ccb_h->timeout_ch = + timeout(ahatimeout, (caddr_t)pending_accb, + (ccb_h->timeout * hz) / 1000); + ccb_h = LIST_NEXT(ccb_h, sim_links.le); + } + } + printf("%s: No longer in timeout\n", aha_name(aha)); + return; + } + + untimeout(ahatimeout, accb, ccb->ccb_h.timeout_ch); + + switch (comp_code) { + case AMBI_FREE: + printf("%s: ahadone - CCB completed with free status!\n", + aha_name(aha)); + break; + case AMBI_NOT_FOUND: + printf("%s: ahadone - CCB Abort failed to find CCB\n", + aha_name(aha)); + break; + case AMBI_ABORT: + case AMBI_ERROR: + /* An error occured */ + if (accb->hccb.opcode < INITIATOR_CCB_WRESID) + csio->resid = 0; + else + csio->resid = aha_a24tou(accb->hccb.data_len); + switch(accb->hccb.ahastat) { + case AHASTAT_DATARUN_ERROR: + { + if (csio->resid <= 0) { + csio->ccb_h.status = CAM_DATA_RUN_ERR; + break; + } + /* FALLTHROUGH */ + } + case AHASTAT_NOERROR: + csio->scsi_status = accb->hccb.sdstat; + csio->ccb_h.status |= CAM_SCSI_STATUS_ERROR; + switch(csio->scsi_status) { + case SCSI_STATUS_CHECK_COND: + case SCSI_STATUS_CMD_TERMINATED: + csio->ccb_h.status |= CAM_AUTOSNS_VALID; + /* + * The aha writes the sense data at different + * offsets based on the scsi cmd len + */ + bcopy((caddr_t) &accb->hccb.scsi_cdb + + accb->hccb.cmd_len, + (caddr_t) &csio->sense_data, + accb->hccb.sense_len); + break; + default: + break; + case SCSI_STATUS_OK: + csio->ccb_h.status = CAM_REQ_CMP; + break; + } + break; + case AHASTAT_SELTIMEOUT: + csio->ccb_h.status = CAM_SEL_TIMEOUT; + break; + case AHASTAT_UNEXPECTED_BUSFREE: + csio->ccb_h.status = CAM_UNEXP_BUSFREE; + break; + case AHASTAT_INVALID_PHASE: + csio->ccb_h.status = CAM_SEQUENCE_FAIL; + break; + case AHASTAT_INVALID_ACTION_CODE: + panic("%s: Inavlid Action code", aha_name(aha)); + break; + case AHASTAT_INVALID_OPCODE: + if (accb->hccb.opcode < INITIATOR_CCB_WRESID) + panic("%s: Invalid CCB Opcode %x hccb = %p", + aha_name(aha), accb->hccb.opcode, + &accb->hccb); + printf("%s: AHA-1540A detected, compensating\n", + aha_name(aha)); + aha->ccb_sg_opcode = INITIATOR_SG_CCB; + aha->ccb_ccb_opcode = INITIATOR_CCB; + xpt_freeze_devq(ccb->ccb_h.path, /*count*/1); + csio->ccb_h.status = CAM_REQUEUE_REQ; + break; + case AHASTAT_LINKED_CCB_LUN_MISMATCH: + /* We don't even support linked commands... */ + panic("%s: Linked CCB Lun Mismatch", aha_name(aha)); + break; + case AHASTAT_INVALID_CCB_OR_SG_PARAM: + panic("%s: Invalid CCB or SG list", aha_name(aha)); + break; + case AHASTAT_HA_SCSI_BUS_RESET: + if ((csio->ccb_h.status & CAM_STATUS_MASK) + != CAM_CMD_TIMEOUT) + csio->ccb_h.status = CAM_SCSI_BUS_RESET; + break; + case AHASTAT_HA_BDR: + if ((accb->flags & ACCB_DEVICE_RESET) == 0) + csio->ccb_h.status = CAM_BDR_SENT; + else + csio->ccb_h.status = CAM_CMD_TIMEOUT; + break; + } + if (csio->ccb_h.status != CAM_REQ_CMP) { + xpt_freeze_devq(csio->ccb_h.path, /*count*/1); + csio->ccb_h.status |= CAM_DEV_QFRZN; + } + if ((accb->flags & ACCB_RELEASE_SIMQ) != 0) + ccb->ccb_h.status |= CAM_RELEASE_SIMQ; + ahafreeccb(aha, accb); + xpt_done(ccb); + break; + case AMBI_OK: + /* All completed without incident */ + /* XXX DO WE NEED TO COPY SENSE BYTES HERE???? XXX */ + /* I don't think so since it works???? */ + ccb->ccb_h.status |= CAM_REQ_CMP; + if ((accb->flags & ACCB_RELEASE_SIMQ) != 0) + ccb->ccb_h.status |= CAM_RELEASE_SIMQ; + ahafreeccb(aha, accb); + xpt_done(ccb); + break; + } +} + +static int +ahareset(struct aha_softc* aha, int hard_reset) +{ + struct ccb_hdr *ccb_h; + u_int status; + u_int timeout; + u_int8_t reset_type; + + if (hard_reset != 0) + reset_type = HARD_RESET; + else + reset_type = SOFT_RESET; + aha_outb(aha, CONTROL_REG, reset_type); + + /* Wait 5sec. for Diagnostic start */ + timeout = 5 * 10000; + while (--timeout) { + status = aha_inb(aha, STATUS_REG); + if ((status & DIAG_ACTIVE) != 0) + break; + DELAY(100); + } + if (timeout == 0) { + PRVERB(("%s: ahareset - Diagnostic Active failed to " + "assert. status = 0x%x\n", aha_name(aha), + status)); + return (ETIMEDOUT); + } + + /* Wait 10sec. for Diagnostic end */ + timeout = 10 * 10000; + while (--timeout) { + status = aha_inb(aha, STATUS_REG); + if ((status & DIAG_ACTIVE) == 0) + break; + DELAY(100); + } + if (timeout == 0) { + panic("%s: ahareset - Diagnostic Active failed to drop. " + "status = 0x%x\n", aha_name(aha), status); + return (ETIMEDOUT); + } + + /* Wait for the host adapter to become ready or report a failure */ + timeout = 10000; + while (--timeout) { + status = aha_inb(aha, STATUS_REG); + if ((status & (DIAG_FAIL|HA_READY|DATAIN_REG_READY)) != 0) + break; + DELAY(100); + } + if (timeout == 0) { + printf("%s: ahareset - Host adapter failed to come ready. " + "status = 0x%x\n", aha_name(aha), status); + return (ETIMEDOUT); + } + + /* If the diagnostics failed, tell the user */ + if ((status & DIAG_FAIL) != 0 + || (status & HA_READY) == 0) { + printf("%s: ahareset - Adapter failed diagnostics\n", + aha_name(aha)); + + if ((status & DATAIN_REG_READY) != 0) + printf("%s: ahareset - Host Adapter Error " + "code = 0x%x\n", aha_name(aha), + aha_inb(aha, DATAIN_REG)); + return (ENXIO); + } + + /* If we've allocated mailboxes, initialize them */ + if (aha->init_level > 4) + ahainitmboxes(aha); + + /* If we've attached to the XPT, tell it about the event */ + if (aha->path != NULL) + xpt_async(AC_BUS_RESET, aha->path, NULL); + + /* + * Perform completion processing for all outstanding CCBs. + */ + while ((ccb_h = LIST_FIRST(&aha->pending_ccbs)) != NULL) { + struct aha_ccb *pending_accb; + + pending_accb = (struct aha_ccb *)ccb_h->ccb_accb_ptr; + pending_accb->hccb.ahastat = AHASTAT_HA_SCSI_BUS_RESET; + ahadone(aha, pending_accb, AMBI_ERROR); + } + + return (0); +} + +/* + * Send a command to the adapter. + */ +int +aha_cmd(struct aha_softc *aha, aha_op_t opcode, u_int8_t *params, + u_int param_len, u_int8_t *reply_data, u_int reply_len, + u_int cmd_timeout) +{ + u_int timeout; + u_int status; + u_int saved_status; + u_int intstat; + u_int reply_buf_size; + int s; + int cmd_complete; + int error; + + /* No data returned to start */ + reply_buf_size = reply_len; + reply_len = 0; + intstat = 0; + cmd_complete = 0; + saved_status = 0; + error = 0; + + /* + * All commands except for the "start mailbox" and the "enable + * outgoing mailbox read interrupt" commands cannot be issued + * while there are pending transactions. Freeze our SIMQ + * and wait for all completions to occur if necessary. + */ + timeout = 100000; + s = splcam(); + while (LIST_FIRST(&aha->pending_ccbs) != NULL && --timeout) { + /* Fire the interrupt handler in case interrupts are blocked */ + aha_intr(aha); + splx(s); + DELAY(100); + s = splcam(); + } + splx(s); + + if (timeout == 0) { + printf("%s: aha_cmd: Timeout waiting for adapter idle\n", + aha_name(aha)); + return (ETIMEDOUT); + } + aha->command_cmp = 0; + /* + * Wait up to 10 sec. for the adapter to become + * ready to accept commands. + */ + timeout = 100000; + while (--timeout) { + + status = aha_inb(aha, STATUS_REG); + if ((status & HA_READY) != 0 + && (status & CMD_REG_BUSY) == 0) + break; + /* + * Throw away any pending data which may be + * left over from earlier commands that we + * timedout on. + */ + if ((status & DATAIN_REG_READY) != 0) + (void)aha_inb(aha, DATAIN_REG); + DELAY(100); + } + if (timeout == 0) { + printf("%s: aha_cmd: Timeout waiting for adapter ready, " + "status = 0x%x\n", aha_name(aha), status); + return (ETIMEDOUT); + } + + /* + * Send the opcode followed by any necessary parameter bytes. + */ + aha_outb(aha, COMMAND_REG, opcode); + + /* + * Wait for up to 1sec to get the parameter list sent + */ + timeout = 10000; + while (param_len && --timeout) { + DELAY(100); + s = splcam(); + status = aha_inb(aha, STATUS_REG); + intstat = aha_inb(aha, INTSTAT_REG); + splx(s); + + if ((intstat & (INTR_PENDING|CMD_COMPLETE)) + == (INTR_PENDING|CMD_COMPLETE)) { + saved_status = status; + cmd_complete = 1; + break; + } + + if (aha->command_cmp != 0) { + saved_status = aha->latched_status; + cmd_complete = 1; + break; + } + if ((status & DATAIN_REG_READY) != 0) + break; + if ((status & CMD_REG_BUSY) == 0) { + aha_outb(aha, COMMAND_REG, *params++); + param_len--; + timeout = 10000; + } + } + if (timeout == 0) { + printf("%s: aha_cmd: Timeout sending parameters, " + "status = 0x%x\n", aha_name(aha), status); + error = ETIMEDOUT; + } + + /* + * For all other commands, we wait for any output data + * and the final comand completion interrupt. + */ + while (cmd_complete == 0 && --cmd_timeout) { + + s = splcam(); + status = aha_inb(aha, STATUS_REG); + intstat = aha_inb(aha, INTSTAT_REG); + splx(s); + + if (aha->command_cmp != 0) { + cmd_complete = 1; + saved_status = aha->latched_status; + } else if ((intstat & (INTR_PENDING|CMD_COMPLETE)) + == (INTR_PENDING|CMD_COMPLETE)) { + /* + * Our poll (in case interrupts are blocked) + * saw the CMD_COMPLETE interrupt. + */ + cmd_complete = 1; + saved_status = status; + } + if ((status & DATAIN_REG_READY) != 0) { + u_int8_t data; + + data = aha_inb(aha, DATAIN_REG); + if (reply_len < reply_buf_size) { + *reply_data++ = data; + } else { + printf("%s: aha_cmd - Discarded reply data " + "byte for opcode 0x%x\n", aha_name(aha), + opcode); + } + /* + * Reset timeout to ensure at least a second + * between response bytes. + */ + cmd_timeout = MAX(cmd_timeout, 10000); + reply_len++; + } + DELAY(100); + } + if (cmd_timeout == 0) { + printf("%s: aha_cmd: Timeout waiting for reply data and " + "command complete.\n%s: status = 0x%x, intstat = 0x%x, " + "reply_len = %d\n", aha_name(aha), aha_name(aha), status, + intstat, reply_len); + return (ETIMEDOUT); + } + + /* + * Clear any pending interrupts. Block interrupts so our + * interrupt handler is not re-entered. + */ + s = splcam(); + aha_intr(aha); + splx(s); + + if (error != 0) + return (error); + + /* + * If the command was rejected by the controller, tell the caller. + */ + if ((saved_status & CMD_INVALID) != 0) { + PRVERB(("%s: Invalid Command 0x%x\n", aha_name(aha), opcode)); + /* + * Some early adapters may not recover properly from + * an invalid command. If it appears that the controller + * has wedged (i.e. status was not cleared by our interrupt + * reset above), perform a soft reset. + */ + DELAY(1000); + status = aha_inb(aha, STATUS_REG); + if ((status & (CMD_INVALID|STATUS_REG_RSVD|DATAIN_REG_READY| + CMD_REG_BUSY|DIAG_FAIL|DIAG_ACTIVE)) != 0 + || (status & (HA_READY|INIT_REQUIRED)) + != (HA_READY|INIT_REQUIRED)) { + ahareset(aha, /*hard_reset*/FALSE); + } + return (EINVAL); + } + + if (param_len > 0) { + /* The controller did not accept the full argument list */ + PRVERB(("%s: Controller did not accept full argument list " + "(%d > 0)\n", + aha_name(aha), param_len)); + return (E2BIG); + } + + if (reply_len != reply_buf_size) { + /* Too much or too little data received */ + PRVERB(("%s: Too much or too little data received (%d != %d)\n", + aha_name(aha), reply_len, reply_buf_size)); + return (EMSGSIZE); + } + + /* We were successful */ + return (0); +} + +static int +ahainitmboxes(struct aha_softc *aha) +{ + int error; + init_24b_mbox_params_t init_mbox; + + bzero(aha->in_boxes, sizeof(aha_mbox_in_t) * aha->num_boxes); + bzero(aha->out_boxes, sizeof(aha_mbox_out_t) * aha->num_boxes); + aha->cur_inbox = aha->in_boxes; + aha->last_inbox = aha->in_boxes + aha->num_boxes - 1; + aha->cur_outbox = aha->out_boxes; + aha->last_outbox = aha->out_boxes + aha->num_boxes - 1; + + /* Tell the adapter about them */ + init_mbox.num_mboxes = aha->num_boxes; + ahautoa24(aha->mailbox_physbase, init_mbox.base_addr); + error = aha_cmd(aha, AOP_INITIALIZE_MBOX, (u_int8_t *)&init_mbox, + /*parmlen*/sizeof(init_mbox), /*reply_buf*/NULL, + /*reply_len*/0, DEFAULT_CMD_TIMEOUT); + + if (error != 0) + printf("ahainitmboxes: Initialization command failed\n"); + return (error); +} + +/* + * Update the XPT's idea of the negotiated transfer + * parameters for a particular target. + */ +static void +ahafetchtransinfo(struct aha_softc *aha, struct ccb_trans_settings* cts) +{ + setup_data_t setup_info; + u_int target; + u_int targ_offset; + u_int sync_period; + int error; + u_int8_t param; + targ_syncinfo_t sync_info; + + target = cts->ccb_h.target_id; + targ_offset = (target & 0x7); + + /* + * Inquire Setup Information. This command retreives + * the sync info for older models. + */ + param = sizeof(setup_info); + error = aha_cmd(aha, AOP_INQUIRE_SETUP_INFO, ¶m, /*paramlen*/1, + (u_int8_t*)&setup_info, sizeof(setup_info), + DEFAULT_CMD_TIMEOUT); + + if (error != 0) { + printf("%s: ahafetchtransinfo - Inquire Setup Info Failed %d\n", + aha_name(aha), error); + return; + } + + sync_info = setup_info.syncinfo[targ_offset]; + + if (sync_info.sync == 0) + cts->sync_offset = 0; + else + cts->sync_offset = sync_info.offset; + + cts->bus_width = MSG_EXT_WDTR_BUS_8_BIT; + + if (aha->boardid >= BOARD_1542CF) + sync_period = 1000; + else + sync_period = 2000; + sync_period += 500 * sync_info.period; + + /* Convert ns value to standard SCSI sync rate */ + if (cts->sync_offset != 0) + cts->sync_period = scsi_calc_syncparam(sync_period); + else + cts->sync_period = 0; + + cts->valid = CCB_TRANS_SYNC_RATE_VALID + | CCB_TRANS_SYNC_OFFSET_VALID + | CCB_TRANS_BUS_WIDTH_VALID; + xpt_async(AC_TRANSFER_NEG, cts->ccb_h.path, cts); +} + +static void +ahamapmboxes(void *arg, bus_dma_segment_t *segs, int nseg, int error) +{ + struct aha_softc* aha; + + aha = (struct aha_softc*)arg; + aha->mailbox_physbase = segs->ds_addr; +} + +static void +ahamapccbs(void *arg, bus_dma_segment_t *segs, int nseg, int error) +{ + struct aha_softc* aha; + + aha = (struct aha_softc*)arg; + aha->aha_ccb_physbase = segs->ds_addr; +} + +static void +ahamapsgs(void *arg, bus_dma_segment_t *segs, int nseg, int error) +{ + + struct aha_softc* aha; + + aha = (struct aha_softc*)arg; + SLIST_FIRST(&aha->sg_maps)->sg_physaddr = segs->ds_addr; +} + +static void +ahapoll(struct cam_sim *sim) +{ + aha_intr(cam_sim_softc(sim)); +} + +static void +ahatimeout(void *arg) +{ + struct aha_ccb *accb; + union ccb *ccb; + struct aha_softc *aha; + int s; + u_int32_t paddr; + + accb = (struct aha_ccb *)arg; + ccb = accb->ccb; + aha = (struct aha_softc *)ccb->ccb_h.ccb_aha_ptr; + xpt_print_path(ccb->ccb_h.path); + printf("CCB %p - timed out\n", (void *)accb); + + s = splcam(); + + if ((accb->flags & ACCB_ACTIVE) == 0) { + xpt_print_path(ccb->ccb_h.path); + printf("CCB %p - timed out CCB already completed\n", + (void *)accb); + splx(s); + return; + } + + /* + * In order to simplify the recovery process, we ask the XPT + * layer to halt the queue of new transactions and we traverse + * the list of pending CCBs and remove their timeouts. This + * means that the driver attempts to clear only one error + * condition at a time. In general, timeouts that occur + * close together are related anyway, so there is no benefit + * in attempting to handle errors in parrallel. Timeouts will + * be reinstated when the recovery process ends. + */ + if ((accb->flags & ACCB_DEVICE_RESET) == 0) { + struct ccb_hdr *ccb_h; + + if ((accb->flags & ACCB_RELEASE_SIMQ) == 0) { + xpt_freeze_simq(aha->sim, /*count*/1); + accb->flags |= ACCB_RELEASE_SIMQ; + } + + ccb_h = LIST_FIRST(&aha->pending_ccbs); + while (ccb_h != NULL) { + struct aha_ccb *pending_accb; + + pending_accb = (struct aha_ccb *)ccb_h->ccb_accb_ptr; + untimeout(ahatimeout, pending_accb, ccb_h->timeout_ch); + ccb_h = LIST_NEXT(ccb_h, sim_links.le); + } + } + + if ((accb->flags & ACCB_DEVICE_RESET) != 0 + || aha->cur_outbox->action_code != AMBO_FREE) { + /* + * Try a full host adapter/SCSI bus reset. + * We do this only if we have already attempted + * to clear the condition with a BDR, or we cannot + * attempt a BDR for lack of mailbox resources. + */ + ccb->ccb_h.status = CAM_CMD_TIMEOUT; + ahareset(aha, /*hardreset*/TRUE); + printf("%s: No longer in timeout\n", aha_name(aha)); + } else { + /* + * Send a Bus Device Reset message: + * The target that is holding up the bus may not + * be the same as the one that triggered this timeout + * (different commands have different timeout lengths), + * but we have no way of determining this from our + * timeout handler. Our strategy here is to queue a + * BDR message to the target of the timed out command. + * If this fails, we'll get another timeout 2 seconds + * later which will attempt a bus reset. + */ + accb->flags |= ACCB_DEVICE_RESET; + ccb->ccb_h.timeout_ch = timeout(ahatimeout, (caddr_t)accb, 2 * hz); + aha->recovery_accb->hccb.opcode = INITIATOR_BUS_DEV_RESET; + + /* No Data Transfer */ + aha->recovery_accb->hccb.datain = TRUE; + aha->recovery_accb->hccb.dataout = TRUE; + aha->recovery_accb->hccb.ahastat = 0; + aha->recovery_accb->hccb.sdstat = 0; + aha->recovery_accb->hccb.target = ccb->ccb_h.target_id; + + /* Tell the adapter about this command */ + paddr = ahaccbvtop(aha, aha->recovery_accb); + ahautoa24(paddr, aha->cur_outbox->ccb_addr); + aha->cur_outbox->action_code = AMBO_START; + aha_outb(aha, COMMAND_REG, AOP_START_MBOX); + ahanextoutbox(aha); + } + + splx(s); +} diff --git a/sys/dev/aha/aha_isa.c b/sys/dev/aha/aha_isa.c new file mode 100644 index 0000000..0720aa7 --- /dev/null +++ b/sys/dev/aha/aha_isa.c @@ -0,0 +1,322 @@ +/* + * Product specific probe and attach routines for: + * Adaptec 154x. + * + * Derived from code written by: + * + * Copyright (c) 1998 Justin T. Gibbs + * All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions, and the following disclaimer, + * without modification, immediately at the beginning of the file. + * 2. The name of the author may not be used to endorse or promote products + * derived from this software without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR + * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + * + * $FreeBSD$ + */ + +#include <sys/param.h> +#include <sys/systm.h> +#include <sys/kernel.h> + +#include <machine/bus_pio.h> +#include <machine/bus.h> +#include <machine/resource.h> +#include <sys/module.h> +#include <sys/bus.h> +#include <sys/rman.h> + +#include <isa/isavar.h> + +#include <dev/aha/ahareg.h> + +#include <cam/scsi/scsi_all.h> + +static struct isa_pnp_id aha_ids[] = { + {AHA1542_PNP, NULL}, /* ADP1542 */ + {AHA1542_PNPCOMPAT, NULL}, /* PNP00A0 */ + {0} +}; + +/* + * Check if the device can be found at the port given + * and if so, set it up ready for further work + * as an argument, takes the isa_device structure from + * autoconf.c + */ +static int +aha_isa_probe(device_t dev) +{ + /* + * find unit and check we have that many defined + */ + struct aha_softc **sc = device_get_softc(dev); + struct aha_softc *aha; + int port_index; + int max_port_index; + int error; + u_long port_start, port_count; + struct resource *port_res; + int port_rid; + int drq; + int irq; + + aha = NULL; + + /* Check isapnp ids */ + if (ISA_PNP_PROBE(device_get_parent(dev), dev, aha_ids) == ENXIO) + return (ENXIO); + + error = bus_get_resource(dev, SYS_RES_IOPORT, 0, + &port_start, &port_count); + if (error != 0) + port_start = 0; + + /* + * Bound our board search if the user has + * specified an exact port. + */ + aha_find_probe_range(port_start, &port_index, &max_port_index); + + if (port_index < 0) + return ENXIO; + + /* Attempt to find an adapter */ + for (;port_index <= max_port_index; port_index++) { + config_data_t config_data; + u_int ioport; + int error; + + ioport = aha_iop_from_bio(port_index); + + /* + * Ensure this port has not already been claimed already + * by another adapter. + */ + if (aha_check_probed_iop(ioport) != 0) + continue; + error = bus_set_resource(dev, SYS_RES_IOPORT, 0, + ioport, AHA_NREGS); + if (error) + return error; + + port_rid = 0; + port_res = bus_alloc_resource(dev, SYS_RES_IOPORT, &port_rid, + 0, ~0, AHA_NREGS, RF_ACTIVE); + if (!port_res) + continue; + + /* Allocate a softc for use during probing */ + aha = aha_alloc(device_get_unit(dev), rman_get_bustag(port_res), + rman_get_bushandle(port_res)); + + if (aha == NULL) { + bus_release_resource(dev, SYS_RES_IOPORT, port_rid, + port_res); + break; + } + + /* We're going to attempt to probe it now, so mark it probed */ + aha_mark_probed_bio(port_index); + + /* See if there is really a card present */ + if (aha_probe(aha) || aha_fetch_adapter_info(aha)) { + aha_free(aha); + bus_release_resource(dev, SYS_RES_IOPORT, port_rid, + port_res); + continue; + } + + /* + * Determine our IRQ, and DMA settings and + * export them to the configuration system. + */ + error = aha_cmd(aha, AOP_INQUIRE_CONFIG, NULL, /*parmlen*/0, + (u_int8_t*)&config_data, sizeof(config_data), + DEFAULT_CMD_TIMEOUT); + + if (error != 0) { + printf("aha_isa_probe: Could not determine IRQ or DMA " + "settings for adapter at 0x%x. Failing probe\n", + ioport); + aha_free(aha); + bus_release_resource(dev, SYS_RES_IOPORT, port_rid, + port_res); + continue; + } + + bus_release_resource(dev, SYS_RES_IOPORT, port_rid, port_res); + + switch (config_data.dma_chan) { + case DMA_CHAN_5: + drq = 5; + break; + case DMA_CHAN_6: + drq = 6; + break; + case DMA_CHAN_7: + drq = 7; + break; + default: + printf("aha_isa_probe: Invalid DMA setting " + "detected for adapter at 0x%x. " + "Failing probe\n", ioport); + return (ENXIO); + } + error = bus_set_resource(dev, SYS_RES_DRQ, 0, drq, 1); + if (error) + return error; + + irq = ffs(config_data.irq) + 8; + error = bus_set_resource(dev, SYS_RES_IRQ, 0, irq, 1); + if (error) + return error; + + *sc = aha; + aha_unit++; + + return (0); + } + + return (ENXIO); +} + +/* + * Attach all the sub-devices we can find + */ +static int +aha_isa_attach(device_t dev) +{ + struct aha_softc **sc = device_get_softc(dev); + struct aha_softc *aha; + bus_dma_filter_t *filter; + void *filter_arg; + bus_addr_t lowaddr; + struct resource *port_res; + int port_rid; + struct resource *irq_res; + int irq_rid; + struct resource *drq_res; + int drq_rid; + void *ih; + int error; + + port_rid = 0; + port_res = bus_alloc_resource(dev, SYS_RES_IOPORT, &port_rid, + 0, ~0, AHA_NREGS, RF_ACTIVE); + if (!port_res) { + device_printf(dev, "Unable to allocate I/O ports\n"); + return ENOMEM; + } + + irq_rid = 0; + irq_res = bus_alloc_resource(dev, SYS_RES_IRQ, &irq_rid, 0, ~0, 1, + RF_ACTIVE); + if (!irq_res) { + device_printf(dev, "Unable to allocate excluse use of irq\n"); + bus_release_resource(dev, SYS_RES_IOPORT, port_rid, port_res); + return ENOMEM; + } + + drq_rid = 0; + drq_res = bus_alloc_resource(dev, SYS_RES_DRQ, &drq_rid, 0, ~0, 1, + RF_ACTIVE); + if (!drq_res) { + device_printf(dev, "Unable to allocate drq\n"); + bus_release_resource(dev, SYS_RES_IOPORT, port_rid, port_res); + bus_release_resource(dev, SYS_RES_IRQ, irq_rid, irq_res); + return ENOMEM; + } + + aha = *sc; +#if 0 /* is the drq ever unset? */ + if (dev->id_drq != -1) + isa_dmacascade(dev->id_drq); +#endif + isa_dmacascade(rman_get_start(drq_res)); + + /* Allocate our parent dmatag */ + filter = NULL; + filter_arg = NULL; + lowaddr = BUS_SPACE_MAXADDR_24BIT; + + if (bus_dma_tag_create(/*parent*/NULL, /*alignemnt*/1, /*boundary*/0, + lowaddr, /*highaddr*/BUS_SPACE_MAXADDR, + filter, filter_arg, + /*maxsize*/BUS_SPACE_MAXSIZE_24BIT, + /*nsegments*/BUS_SPACE_UNRESTRICTED, + /*maxsegsz*/BUS_SPACE_MAXSIZE_24BIT, + /*flags*/0, &aha->parent_dmat) != 0) { + aha_free(aha); + bus_release_resource(dev, SYS_RES_IOPORT, port_rid, port_res); + bus_release_resource(dev, SYS_RES_IRQ, irq_rid, irq_res); + bus_release_resource(dev, SYS_RES_DRQ, drq_rid, drq_res); + return (ENOMEM); + } + + if (aha_init(aha)) { + device_printf(dev, "init failed\n"); + aha_free(aha); + bus_release_resource(dev, SYS_RES_IOPORT, port_rid, port_res); + bus_release_resource(dev, SYS_RES_IRQ, irq_rid, irq_res); + bus_release_resource(dev, SYS_RES_DRQ, drq_rid, drq_res); + return (ENOMEM); + } + + error = aha_attach(aha); + if (error) { + device_printf(dev, "attach failed\n"); + aha_free(aha); + bus_release_resource(dev, SYS_RES_IOPORT, port_rid, port_res); + bus_release_resource(dev, SYS_RES_IRQ, irq_rid, irq_res); + bus_release_resource(dev, SYS_RES_DRQ, drq_rid, drq_res); + return (error); + } + + error = bus_setup_intr(dev, irq_res, INTR_TYPE_CAM, aha_intr, aha, + &ih); + if (error) { + device_printf(dev, "Unable to register interrupt handler\n"); + aha_free(aha); + bus_release_resource(dev, SYS_RES_IOPORT, port_rid, port_res); + bus_release_resource(dev, SYS_RES_IRQ, irq_rid, irq_res); + bus_release_resource(dev, SYS_RES_DRQ, drq_rid, drq_res); + return (error); + } + + return (0); +} + +static device_method_t aha_isa_methods[] = { + /* Device interface */ + DEVMETHOD(device_probe, aha_isa_probe), + DEVMETHOD(device_attach, aha_isa_attach), + + { 0, 0 } +}; + +static driver_t aha_isa_driver = { + "aha", + aha_isa_methods, + sizeof(struct aha_softc*), +}; + +static devclass_t aha_devclass; + +DRIVER_MODULE(aha, isa, aha_isa_driver, aha_devclass, 0, 0); diff --git a/sys/dev/aha/aha_mca.c b/sys/dev/aha/aha_mca.c new file mode 100644 index 0000000..934ca7b --- /dev/null +++ b/sys/dev/aha/aha_mca.c @@ -0,0 +1,247 @@ +/*- + * Copyright (c) 1999 Matthew N. Dodd <winter@jurai.net> + * All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * + * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + * + * $FreeBSD$ + * + * Based on aha_isa.c + */ + +#include <sys/types.h> +#include <sys/param.h> +#include <sys/systm.h> +#include <sys/kernel.h> + +#include <sys/module.h> +#include <sys/bus.h> +#include <machine/bus.h> +#include <machine/resource.h> +#include <sys/rman.h> + +#include <i386/isa/isa_dma.h> + +#include <dev/mca/mca_busreg.h> +#include <dev/mca/mca_busvar.h> + +#include <dev/aha/ahareg.h> + +static struct mca_ident aha_mca_devs[] = { + { 0x0f1f, "Adaptec AHA-1640 SCSI Adapter" }, + { 0, NULL }, +}; + +#define AHA_MCA_IOPORT_POS MCA_ADP_POS(MCA_POS1) +# define AHA_MCA_IOPORT_MASK1 0x07 +# define AHA_MCA_IOPORT_MASK2 0xc0 +# define AHA_MCA_IOPORT_SIZE 0x03 +# define AHA_MCA_IOPORT(pos) (0x30 + \ + (((u_int32_t)pos & \ + AHA_MCA_IOPORT_MASK1) << 8) + \ + (((u_int32_t)pos & \ + AHA_MCA_IOPORT_MASK2) >> 4)) + +#define AHA_MCA_DRQ_POS MCA_ADP_POS(MCA_POS3) +# define AHA_MCA_DRQ_MASK 0x0f +# define AHA_MCA_DRQ(pos) (pos & AHA_MCA_DRQ_MASK) + +#define AHA_MCA_IRQ_POS MCA_ADP_POS(MCA_POS2) +# define AHA_MCA_IRQ_MASK 0x07 +# define AHA_MCA_IRQ(pos) ((pos & AHA_MCA_IRQ_MASK) + 8) + +/* + * Not needed as the board knows its config + * internally and the ID will be fetched + * via AOP_INQUIRE_SETUP_INFO command. + */ +#define AHA_MCA_SCSIID_POS MCA_ADP_POS(MCA_POS2) +#define AHA_MCA_SCSIID_MASK 0xe0 +#define AHA_MCA_SCSIID(pos) ((pos & AHA_MCA_SCSIID_MASK) >> 5) + +static int +aha_mca_probe (device_t dev) +{ + const char * desc; + mca_id_t id = mca_get_id(dev); + u_int32_t iobase = 0; + u_int32_t iosize = 0; + u_int8_t drq = 0; + u_int8_t irq = 0; + u_int8_t pos; + + desc = mca_match_id(id, aha_mca_devs); + if (!desc) + return (ENXIO); + device_set_desc(dev, desc); + + pos = mca_pos_read(dev, AHA_MCA_IOPORT_POS); + iobase = AHA_MCA_IOPORT(pos); + iosize = AHA_MCA_IOPORT_SIZE; + + pos = mca_pos_read(dev, AHA_MCA_DRQ_POS); + drq = AHA_MCA_DRQ(pos); + + pos = mca_pos_read(dev, AHA_MCA_IRQ_POS); + irq = AHA_MCA_IRQ(pos); + + mca_add_iospace(dev, iobase, iosize); + mca_add_drq(dev, drq); + mca_add_irq(dev, irq); + + /* We're going to attempt to probe it now, so mark it probed */ + aha_mark_probed_iop(iobase); + + aha_unit++; + + return (0); +} + +static int +aha_mca_attach (device_t dev) +{ + struct aha_softc * sc = NULL; + struct resource * io = NULL; + struct resource * irq = NULL; + struct resource * drq = NULL; + int error = 0; + int unit = device_get_unit(dev); + int rid; + void * ih; + + rid = 0; + io = bus_alloc_resource(dev, SYS_RES_IOPORT, &rid, + 0, ~0, 1, RF_ACTIVE); + if (!io) { + device_printf(dev, "No I/O space?!\n"); + error = ENOMEM; + goto bad; + } + + rid = 0; + irq = bus_alloc_resource(dev, SYS_RES_IRQ, &rid, + 0, ~0, 1, RF_ACTIVE); + if (irq == NULL) { + device_printf(dev, "No IRQ?!\n"); + error = ENOMEM; + goto bad; + } + + rid = 0; + drq = bus_alloc_resource(dev, SYS_RES_DRQ, &rid, + 0, ~0, 1, RF_ACTIVE); + if (drq == NULL) { + device_printf(dev, "No DRQ?!\n"); + error = ENOMEM; + goto bad; + } + + sc = aha_alloc(unit, rman_get_bustag(io), rman_get_bushandle(io)); + if (sc == NULL) { + device_printf(dev, "aha_alloc() failed!\n"); + error = ENOMEM; + goto bad; + } + + error = aha_probe(sc); + if (error) { + device_printf(dev, "aha_probe() failed!\n"); + goto bad; + } + + error = aha_fetch_adapter_info(sc); + if (error) { + device_printf(dev, "aha_fetch_adapter_info() failed!\n"); + goto bad; + } + + isa_dmacascade(rman_get_start(drq)); + + error = bus_dma_tag_create(/* parent */ NULL, + /* alignemnt */ 1, + /* boundary */ 0, + BUS_SPACE_MAXADDR_24BIT, + /* highaddr */ BUS_SPACE_MAXADDR, + NULL, + NULL, + /* maxsize */ BUS_SPACE_MAXSIZE_24BIT, + /* nsegments */ BUS_SPACE_UNRESTRICTED, + /* maxsegsz */ BUS_SPACE_MAXSIZE_24BIT, + /* flags */ 0, + &sc->parent_dmat); + if (error) { + device_printf(dev, "bus_dma_tag_create() failed!\n"); + goto bad; + } + + error = aha_init(sc); + if (error) { + device_printf(dev, "aha_init() failed\n"); + goto bad; + } + + error = aha_attach(sc); + if (error) { + device_printf(dev, "aha_attach() failed\n"); + goto bad; + } + + error = bus_setup_intr(dev, irq, INTR_TYPE_CAM, aha_intr, sc, &ih); + if (error) { + device_printf(dev, "Unable to register interrupt handler\n"); + goto bad; + } + + return (0); + +bad: + aha_free(sc); + + if (io) + bus_release_resource(dev, SYS_RES_IOPORT, 0, io); + if (irq) + bus_release_resource(dev, SYS_RES_IRQ, 0, irq); + if (drq) + bus_release_resource(dev, SYS_RES_DRQ, 0, drq); + + return (error); +} + +static device_method_t aha_mca_methods[] = { + DEVMETHOD(device_probe, aha_mca_probe), + DEVMETHOD(device_attach, aha_mca_attach), + + { 0, 0 } +}; + +static driver_t aha_mca_driver = { + "aha", + aha_mca_methods, + 1, +/* + sizeof(struct aha_softc *), + */ +}; + +static devclass_t aha_devclass; + +DRIVER_MODULE(aha, mca, aha_mca_driver, aha_devclass, 0, 0); diff --git a/sys/dev/aha/ahareg.h b/sys/dev/aha/ahareg.h new file mode 100644 index 0000000..0e2ce77 --- /dev/null +++ b/sys/dev/aha/ahareg.h @@ -0,0 +1,445 @@ +/* + * Generic register and struct definitions for the Adaptech 154x/164x + * SCSI host adapters. Product specific probe and attach routines can + * be found in: + * <fill in list here> + * + * Derived from bt.c written by: + * + * Copyright (c) 1998 Justin T. Gibbs. + * All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions, and the following disclaimer, + * without modification, immediately at the beginning of the file. + * 2. The name of the author may not be used to endorse or promote products + * derived from this software without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR + * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. + * + * $FreeBSD$ + */ + +#ifndef _AHAREG_H_ +#define _AHAREG_H_ + +#include "aha.h" + +#include <sys/queue.h> +#include <cam/scsi/scsi_all.h> + +#define AHA_MAXTRANSFER_SIZE 0xffffff /* limited by 24bit counter */ +#define AHA_NSEG 17 /* The number of dma segments + * supported. */ +#define ALL_TARGETS (~0) + +/* + * Control Register pp. 1-8, 1-9 (Write Only) + */ +#define CONTROL_REG 0x00 +#define HARD_RESET 0x80 /* Hard Reset - return to POST state */ +#define SOFT_RESET 0x40 /* Soft Reset - Clears Adapter state */ +#define RESET_INTR 0x20 /* Reset/Ack Interrupt */ +#define RESET_SBUS 0x10 /* Drive SCSI bus reset signal */ + +/* + * Status Register pp. 1-9, 1-10 (Read Only) + */ +#define STATUS_REG 0x00 +#define DIAG_ACTIVE 0x80 /* Performing Internal Diags */ +#define DIAG_FAIL 0x40 /* Internal Diags failed */ +#define INIT_REQUIRED 0x20 /* MBOXes need initialization */ +#define HA_READY 0x10 /* HA ready for new commands */ +#define CMD_REG_BUSY 0x08 /* HA busy with last cmd byte */ +#define DATAIN_REG_READY 0x04 /* Data-in Byte available */ +#define STATUS_REG_RSVD 0x02 +#define CMD_INVALID 0x01 /* Invalid Command detected */ + +/* + * Command/Parameter Register pp. 1-10, 1-11 (Write Only) + */ +#define COMMAND_REG 0x01 + +/* + * Data in Register p. 1-11 (Read Only) + */ +#define DATAIN_REG 0x01 + +/* + * Interrupt Status Register pp. 1-12 -> 1-14 (Read Only) + */ +#define INTSTAT_REG 0x02 +#define INTR_PENDING 0x80 /* There is a pending INTR */ +#define INTSTAT_REG_RSVD 0x70 +#define SCSI_BUS_RESET 0x08 /* Bus Reset detected */ +#define CMD_COMPLETE 0x04 +#define OMB_READY 0x02 /* Outgoin Mailbox Ready */ +#define IMB_LOADED 0x01 /* Incoming Mailbox loaded */ + +/* + * Definitions for the "undocumented" geometry register, we just need + * its location. + */ +#define GEOMETRY_REG 0x03 + +#define AHA_NREGS (4) + +/* + * Opcodes for Adapter commands. + */ +typedef enum { + AOP_NOP = 0x00, + AOP_INITIALIZE_MBOX = 0x01, + AOP_START_MBOX = 0x02, + AOP_EXECUTE_BIOS_CMD = 0x03, + AOP_INQUIRE_BOARD_ID = 0x04, + AOP_ENABLE_OMBR_INT = 0x05, + AOP_SET_SEL_TIMOUT = 0x06, + AOP_SET_TIME_ON_BUS = 0x07, + AOP_SET_TIME_OFF_BUS = 0x08, + AOP_SET_BUS_TRANS_RATE = 0x09, + AOP_INQUIRE_INST_LDEVS = 0x0A, + AOP_INQUIRE_CONFIG = 0x0B, + AOP_ENABLE_TARGET_MODE = 0x0C, + AOP_INQUIRE_SETUP_INFO = 0x0D, + AOP_WRITE_LRAM = 0x1A, + AOP_READ_LRAM = 0x1B, + AOP_WRITE_CHIP_FIFO = 0x1C, + AOP_READ_CHIP_FIFO = 0x1D, + AOP_ECHO_DATA_BYTE = 0x1F, + AOP_ADAPTER_DIAGNOSTICS = 0x20, + AOP_SET_ADAPTER_OPTIONS = 0x21, + AOP_SET_EEPROM = 0x22, + AOP_RETURN_EEPROM = 0x23, + AOP_ENABLE_SHADOW_RAM = 0x24, + AOP_INIT_BIOS_MBOX = 0x25, + AOP_SET_BIOS_BANK_1 = 0x26, + AOP_SET_BIOS_BANK_2 = 0x27, + AOP_RETURN_EXT_BIOS_INFO= 0x28, + AOP_MBOX_IF_ENABLE = 0x29, + AOP_SCSI_TERM_STATUS = 0x2C, + AOP_INQUIRE_SCAM_DEV = 0x2D, + AOP_SCSI_DEV_TABLE = 0x2E, + AOP_SCAM_OP = 0x2F, + AOP_START_BIOS_CMD = 0x82, + AOP_INQUIRE_ESETUP_INFO = 0x8D +} aha_op_t; + +/************** Definitions of Multi-byte commands and responses ************/ + +struct aha_extbios +{ + u_int8_t flags; /* Bit 3 == 1 extended bios enabled */ + u_int8_t mailboxlock; /* mail box lock code to unlock it */ +}; + +typedef struct { + u_int8_t num_mboxes; + u_int8_t base_addr[3]; +} init_24b_mbox_params_t; + +typedef struct { + u_int8_t board_type; +/* These values are mostly from the aha-1540CP technical reference, but */ +/* with other values from the old aha1542.c driver. The values from the */ +/* aha-1540CP technical manual are used where conflicts arise */ +#define BOARD_1540_16HEAD_BIOS 0x00 +#define BOARD_1540_64HEAD_BIOS 0x30 +#define BOARD_1542 0x41 /* aha-1540/1542 w/64-h bios */ +#define BOARD_1640 0x42 /* aha-1640 */ +#define BOARD_1740 0x43 /* aha-1740A/1742A/1744 */ +#define BOARD_1542C 0x44 /* aha-1542C */ +#define BOARD_1542CF 0x45 /* aha-1542CF */ +#define BOARD_1542CP 0x46 /* aha-1542CP, plug and play */ + u_int8_t cust_features; +#define FEATURES_STANDARD 0x30 + u_int8_t firmware_rev_major; + u_int8_t firmware_rev_minor; +} board_id_data_t; + +typedef struct { + u_int8_t dma_chan; +#define DMA_CHAN_5 0x20 +#define DMA_CHAN_6 0x40 +#define DMA_CHAN_7 0x80 + u_int8_t irq; +#define IRQ_9 0x01 +#define IRQ_10 0x02 +#define IRQ_11 0x04 +#define IRQ_12 0x08 +#define IRQ_14 0x20 +#define IRQ_15 0x40 + u_int8_t scsi_id; +} config_data_t; + +typedef struct { + u_int8_t enable; +} target_mode_params_t; + +typedef struct { + u_int8_t offset : 4, + period : 3, + sync : 1; +} targ_syncinfo_t; + +typedef struct { + u_int8_t initiate_sync : 1, + parity_enable : 1, + : 6; + + u_int8_t bus_transfer_rate; + u_int8_t time_on_bus; + u_int8_t time_off_bus; + u_int8_t num_mboxes; + u_int8_t mbox_base_addr[3]; + targ_syncinfo_t syncinfo[8]; + u_int8_t discinfo; + u_int8_t customer_sig[20]; + u_int8_t auto_retry; + u_int8_t board_switches; + u_int8_t firmware_cksum[2]; + u_int8_t bios_mbox_addr[3]; +} setup_data_t; + +struct aha_isa_port { + u_int16_t addr; + u_int8_t probed; + u_int8_t bio; /* board IO offset */ +}; + +#define AHA_NUM_ISAPORTS 6 + +typedef enum { + BIO_330 = 0, + BIO_334 = 1, + BIO_230 = 2, + BIO_234 = 3, + BIO_130 = 4, + BIO_134 = 5, + BIO_DISABLED = 6, + BIO_DISABLED2 = 7 +} isa_compat_io_t; + +typedef struct { + u_int8_t sync_rate[16]; /* Sync in 10ns units */ +} target_sync_info_data_t; + +typedef struct { + u_int8_t len[3]; + u_int8_t addr[3]; +} aha_sg_t; + +/********************** Mail Box definitions *******************************/ + +typedef enum { + AMBO_FREE = 0x0, /* MBO intry is free */ + AMBO_START = 0x1, /* MBO activate entry */ + AMBO_ABORT = 0x2 /* MBO abort entry */ +} aha_mbo_action_code_t; + +typedef struct aha_mbox_out { + u_int8_t action_code; + u_int8_t ccb_addr[3]; +} aha_mbox_out_t; + +typedef enum { + AMBI_FREE = 0x0, /* MBI entry is free */ + AMBI_OK = 0x1, /* completed without error */ + AMBI_ABORT = 0x2, /* aborted ccb */ + AMBI_NOT_FOUND = 0x3, /* Tried to abort invalid CCB */ + AMBI_ERROR = 0x4 /* Completed with error */ +} aha_mbi_comp_code_t; + +typedef struct aha_mbox_in { + u_int8_t comp_code; + u_int8_t ccb_addr[3]; +} aha_mbox_in_t; + +/****************** Hardware CCB definition *********************************/ +typedef enum { + INITIATOR_CCB = 0x00, + INITIATOR_SG_CCB = 0x02, + INITIATOR_CCB_WRESID = 0x03, + INITIATOR_SG_CCB_WRESID = 0x04, + INITIATOR_BUS_DEV_RESET = 0x81 +} aha_ccb_opcode_t; + +typedef enum { + AHASTAT_NOERROR = 0x00, + AHASTAT_SELTIMEOUT = 0x11, + AHASTAT_DATARUN_ERROR = 0x12, + AHASTAT_UNEXPECTED_BUSFREE = 0x13, + AHASTAT_INVALID_PHASE = 0x14, + AHASTAT_INVALID_ACTION_CODE = 0x15, + AHASTAT_INVALID_OPCODE = 0x16, + AHASTAT_LINKED_CCB_LUN_MISMATCH = 0x17, + AHASTAT_INVALID_CCB_OR_SG_PARAM = 0x1A, + AHASTAT_HA_SCSI_BUS_RESET = 0x22, /* stolen from bt */ + AHASTAT_HA_BDR = 0x25 /* Stolen from bt */ +} ahastat_t; + +struct aha_hccb { + u_int8_t opcode; /* 0 */ + u_int8_t lun : 3, /* 1 */ + datain : 1, + dataout : 1, + target : 3; + u_int8_t cmd_len; /* 2 */ + u_int8_t sense_len; /* 3 */ + u_int8_t data_len[3]; /* 4 */ + u_int8_t data_addr[3]; /* 7 */ + u_int8_t link_ptr[3]; /* 10 */ + u_int8_t link_id; /* 13 */ + u_int8_t ahastat; /* 14 */ + u_int8_t sdstat; /* 15 */ + u_int8_t reserved1; /* 16 */ + u_int8_t reserved2; /* 17 */ + u_int8_t scsi_cdb[16]; /* 18 */ + u_int8_t sense_data[SSD_FULL_SIZE]; +}; + +typedef enum { + ACCB_FREE = 0x0, + ACCB_ACTIVE = 0x1, + ACCB_DEVICE_RESET = 0x2, + ACCB_RELEASE_SIMQ = 0x4 +} accb_flags_t; + +struct aha_ccb { + struct aha_hccb hccb; /* hccb assumed to be at 0 */ + SLIST_ENTRY(aha_ccb) links; + u_int32_t flags; + union ccb *ccb; + bus_dmamap_t dmamap; + aha_sg_t *sg_list; + u_int32_t sg_list_phys; +}; + +struct sg_map_node { + bus_dmamap_t sg_dmamap; + bus_addr_t sg_physaddr; + aha_sg_t* sg_vaddr; + SLIST_ENTRY(sg_map_node) links; +}; + +struct aha_softc { + bus_space_tag_t tag; + bus_space_handle_t bsh; + struct cam_sim *sim; + struct cam_path *path; + aha_mbox_out_t *cur_outbox; + aha_mbox_in_t *cur_inbox; + aha_mbox_out_t *last_outbox; + aha_mbox_in_t *last_inbox; + struct aha_ccb *aha_ccb_array; + SLIST_HEAD(,aha_ccb) free_aha_ccbs; + LIST_HEAD(,ccb_hdr) pending_ccbs; + u_int active_ccbs; + u_int32_t aha_ccb_physbase; + aha_ccb_opcode_t ccb_sg_opcode; + aha_ccb_opcode_t ccb_ccb_opcode; + aha_mbox_in_t *in_boxes; + aha_mbox_out_t *out_boxes; + struct scsi_sense_data *sense_buffers; + u_int32_t sense_buffers_physbase; + struct aha_ccb *recovery_accb; + u_int num_boxes; + bus_dma_tag_t parent_dmat; /* + * All dmat's derive from + * the dmat defined by our + * bus. + */ + bus_dma_tag_t buffer_dmat; /* dmat for buffer I/O */ + bus_dma_tag_t mailbox_dmat; /* dmat for our mailboxes */ + bus_dmamap_t mailbox_dmamap; + bus_dma_tag_t ccb_dmat; /* dmat for our ccb array */ + bus_dmamap_t ccb_dmamap; + bus_dma_tag_t sg_dmat; /* dmat for our sg maps */ + SLIST_HEAD(, sg_map_node) sg_maps; + bus_addr_t mailbox_physbase; + u_int num_ccbs; /* Number of CCBs malloc'd */ + u_int max_ccbs; /* Maximum allocatable CCBs */ + u_int max_sg; + u_int unit; + u_int scsi_id; + u_int32_t extended_trans :1, + diff_bus :1, + extended_lun :1, + strict_rr :1, + tag_capable :1, + resource_shortage:1, + :26; + u_int16_t disc_permitted; + u_int16_t sync_permitted; + u_int8_t init_level; + volatile u_int8_t command_cmp; + volatile u_int8_t latched_status; + u_int32_t bios_addr; + u_int8_t fw_major; + u_int8_t fw_minor; + char model[32]; + u_int8_t boardid; +}; + +extern struct aha_softc *aha_softcs[]; /* XXX Config should handle this */ +extern u_long aha_unit; + +#define AHA_TEMP_UNIT 0xFF /* Unit for probes */ +struct aha_softc* aha_alloc(int unit, bus_space_tag_t tag, + bus_space_handle_t bsh); +void aha_free(struct aha_softc *aha); +int aha_probe(struct aha_softc *aha); +int aha_fetch_adapter_info(struct aha_softc *aha); +int aha_init(struct aha_softc *aha); +int aha_attach(struct aha_softc *aha); +void aha_intr(void *arg); +char * aha_name(struct aha_softc *aha); +int aha_check_probed_iop(u_int ioport); +void aha_mark_probed_bio(isa_compat_io_t port); +void aha_mark_probed_iop(u_int ioport); +void aha_find_probe_range(int ioport, + int *port_index, + int *max_port_index); + +int aha_iop_from_bio(isa_compat_io_t bio_index); + +#define DEFAULT_CMD_TIMEOUT 10000 /* 1 sec */ +int aha_cmd(struct aha_softc *aha, aha_op_t opcode, + u_int8_t *params, u_int param_len, + u_int8_t *reply_data, u_int reply_len, + u_int cmd_timeout); + +#define aha_inb(aha, port) \ + bus_space_read_1((aha)->tag, (aha)->bsh, port) + +#define aha_outb(aha, port, value) \ + bus_space_write_1((aha)->tag, (aha)->bsh, port, value) + + +#ifndef EXTRA_AHA +#if NPNP > 0 +#define EXTRA_AHA MAX_PNP_CARDS +#else +#define EXTRA_AHA 0 +#endif +#endif + +#define NAHATOT (NAHA + EXTRA_AHA) + +#define AHA1542_PNP 0x42159004 /* ADP1542 */ +#define AHA1542_PNPCOMPAT 0xA000D040 /* PNP00A0 */ + +#endif /* _AHA_H_ */ |
