freebsd-nq/sys/dev/dpt/dpt_control.c
1999-08-28 01:08:13 +00:00

867 lines
23 KiB
C

/**
* Copyright (c) 1997 by Simon Shapiro
* 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. 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.
* 3. 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.
*
*/
/**
* dpt_control.c: Control Functions and /dev entry points for /dev/dpt*
*
* Caveat Emptor! This is work in progress. The interfaces and
* functionality of this code will change (possibly radically) in the
* future.
*/
#ident "$FreeBSD$"
#include "opt_dpt.h"
#include <i386/include/cputypes.h>
#include <sys/param.h>
#include <sys/systm.h>
#include <sys/malloc.h>
#include <sys/kernel.h>
#include <sys/buf.h>
#include <sys/uio.h>
#include <sys/conf.h>
#include <vm/vm.h>
#include <vm/vm_kern.h>
#include <vm/vm_extern.h>
#include <vm/pmap.h>
#include <scsi/scsiconf.h>
#include <dev/dpt/dpt.h>
#define INLINE __inline
extern char osrelease[];
static dpt_sysinfo_t dpt_sysinfo;
/* Entry points and other prototypes */
static vm_offset_t dpt_physmap(u_int32_t paddr, vm_size_t size);
static void dpt_unphysmap(u_int8_t * vaddr, vm_size_t size);
static void dpt_get_sysinfo(void);
static int dpt_open(dev_t dev, int flags, int fmt, struct proc * p);
static int dpt_close(dev_t dev, int flags, int fmt, struct proc * p);
static int dpt_write(dev_t dev, struct uio * uio, int ioflag);
static int dpt_read(dev_t dev, struct uio * uio, int ioflag);
static int dpt_ioctl(dev_t dev, u_long cmd, caddr_t cmdarg, int flags, struct proc * p);
/* This has to be modified as the processor and CPU are not known yet */
static dpt_sig_t dpt_sig = {
'd', 'P', 't', 'S', 'i', 'G',
SIG_VERSION, PROC_INTEL, PROC_386,
FT_HBADRVR, FTF_PROTECTED,
OEM_DPT, OS_FREEBSD,
CAP_PASS | CAP_OVERLAP | CAP_RAID0 | CAP_RAID1 | CAP_RAID5 | CAP_ASPI,
DEV_ALL, ADF_SC4_PCI | ADF_SC3_PCI, 0, 0,
DPT_RELEASE, DPT_VERSION, DPT_PATCH,
DPT_MONTH, DPT_DAY, DPT_YEAR,
"DPT FreeBSD Driver (c) 1997 Simon Shapiro"
};
#define CDEV_MAJOR DPT_CDEV_MAJOR
/* Normally, this is a static structure. But we need it in pci/dpt_pci.c */
static struct cdevsw dpt_cdevsw = {
/* open */ dpt_open,
/* close */ dpt_close,
/* read */ dpt_read,
/* write */ dpt_write,
/* ioctl */ dpt_ioctl,
/* stop */ nostop,
/* reset */ noreset,
/* devtotty */ nodevtotty,
/* poll */ nopoll,
/* mmap */ nommap,
/* strategy */ nostrategy,
/* name */ "dpt",
/* parms */ noparms,
/* maj */ CDEV_MAJOR,
/* dump */ nodump,
/* psize */ nopsize,
/* flags */ 0,
/* maxio */ 0,
/* bmaj */ -1
};
static struct buf *dpt_inbuf[DPT_MAX_ADAPTERS];
static char dpt_rw_command[DPT_MAX_ADAPTERS][DPT_RW_CMD_LEN + 1];
/*
* Given a minor device number,
* return the pointer to its softc structure
*/
dpt_softc_t *
dpt_minor2softc(int minor_no)
{
dpt_softc_t *dpt;
if (dpt_minor2unit(minor_no & ~SCSI_CONTROL_MASK) == -1)
return (NULL);
for (dpt = TAILQ_FIRST(&dpt_softc_list);
(dpt != NULL) && (dpt->unit != (minor_no & ~SCSI_CONTROL_MASK));
dpt = TAILQ_NEXT(dpt, links));
return (dpt);
}
/**
* Map a physical address to virtual one.
* This is a first cut, experimental thing
*
* Paddr is the physical address to map
* size is the size of the region, in bytes.
* Because of alignment problems, we actually round up the size requested to
* the next page count.
*/
static vm_offset_t
dpt_physmap(u_int32_t req_paddr, vm_size_t req_size)
{
vm_offset_t va;
int ndx;
vm_size_t size;
u_int32_t paddr;
u_int32_t offset;
size = (req_size / PAGE_SIZE + 1) * PAGE_SIZE;
paddr = req_paddr & 0xfffff000;
offset = req_paddr - paddr;
va = kmem_alloc_pageable(kernel_map, size);
if (va == (vm_offset_t) 0)
return (va);
for (ndx = 0; ndx < size; ndx += PAGE_SIZE) {
pmap_kenter(va + ndx, paddr + ndx);
invltlb();
}
return (va + offset);
}
/*
* Release virtual space allocated by physmap We ASSUME that the correct
* start address and the correct LENGTH are given.
*
* Disaster will follow if these assumptions are false!
*/
static void
dpt_unphysmap(u_int8_t * vaddr, vm_size_t size)
{
int ndx;
for (ndx = 0; ndx < size; ndx += PAGE_SIZE) {
pmap_kremove((vm_offset_t) vaddr + ndx);
}
kmem_free(kernel_map, (vm_offset_t) vaddr, size);
}
/**
* Collect interesting system information
* The following is one of the worst hacks I have ever allowed my
* name to be associated with.
* There MUST be a system structure that provides this data.
*/
static void
dpt_get_sysinfo(void)
{
int i;
int j;
int ospl;
char *addr;
bzero(&dpt_sysinfo, sizeof(dpt_sysinfo_t));
/**
* This is really silly, but we better run this in splhigh as we
* have no clue what we bump into.
* Let's hope anyone else who does this sort of things protects them
* with splhigh too.
*/
ospl = splhigh();
switch (cpu_class) {
case CPUCLASS_386:
dpt_sig.Processor = dpt_sysinfo.processorType = PROC_386;
break;
case CPUCLASS_486:
dpt_sig.Processor = dpt_sysinfo.processorType = PROC_486;
break;
case CPUCLASS_586:
dpt_sig.Processor = dpt_sysinfo.processorType = PROC_PENTIUM;
break;
case CPUCLASS_686:
dpt_sig.Processor = dpt_sysinfo.processorType = PROC_P6;
break;
default:
dpt_sig.Processor = dpt_sysinfo.flags &= ~SI_ProcessorValid;
break;
}
/* Get The First Drive Type From CMOS */
outb(0x70, 0x12);
i = inb(0x71);
j = i >> 4;
if (i == 0x0f) {
outb(0x70, 0x19);
j = inb(0x71);
}
dpt_sysinfo.drive0CMOS = j;
/* Get The Second Drive Type From CMOS */
j = i & 0x0f;
if (i == 0x0f) {
outb(0x70, 0x1a);
j = inb(0x71);
}
dpt_sysinfo.drive1CMOS = j;
/* Get The Number Of Drives From The Bios Data Area */
if ((addr = (char *) dpt_physmap(0x0475, 1024)) == NULL) {
printf("DPT: Cannot map BIOS address 0x0475. No sysinfo... :-(\n");
return;
}
dpt_sysinfo.numDrives = *addr;
dpt_unphysmap(addr, 1024);
/* Get the processor fields from the SIG structure, and set the flags */
dpt_sysinfo.processorFamily = dpt_sig.ProcessorFamily;
dpt_sysinfo.flags = SI_CMOS_Valid | SI_NumDrivesValid;
/* Go out and look for SmartROM */
for (i = 0; i < 3; ++i) {
switch (i) {
case 0:
addr = (char *) dpt_physmap(0xC8000, 1024);
case 1:
addr = (char *) dpt_physmap(0xD8000, 1024);
default:
addr = (char *) dpt_physmap(0xDC000, 1024);
}
if (addr == NULL)
continue;
if (*((u_int16_t *) addr) == 0xaa55) {
if ((*((u_int32_t *) (addr + 6)) == 0x00202053)
&& (*((u_int32_t *) (addr + 10)) == 0x00545044)) {
break;
}
}
dpt_unphysmap(addr, 1024);
addr = NULL;
}
/**
* If i < 3, we founday it so set up a pointer to the starting
* version digit by searching for it.
*/
if (addr != NULL) {
addr += 0x15;
for (i = 0; i < 64; ++i)
if ((addr[i] == ' ') && (addr[i + 1] == 'v'))
break;
if (i < 64) {
addr += (i + 4);
} else {
dpt_unphysmap(addr, 1024);
addr = NULL;
}
}
/* If all is well, set up the SmartROM version fields */
if (addr != NULL) {
dpt_sysinfo.smartROMMajorVersion = *addr - '0'; /* Assumes ASCII */
dpt_sysinfo.smartROMMinorVersion = *(addr + 2);
dpt_sysinfo.smartROMRevision = *(addr + 3);
dpt_sysinfo.flags |= SI_SmartROMverValid;
} else {
dpt_sysinfo.flags |= SI_NO_SmartROM;
}
/* Get the conventional memory size from CMOS */
outb(0x70, 0x16);
j = inb(0x71);
j <<= 8;
outb(0x70, 0x15);
j |= inb(0x71);
dpt_sysinfo.conventionalMemSize = j;
/**
* Get the extended memory found at power on from CMOS
*/
outb(0x70, 0x31);
j = inb(0x71);
j <<= 8;
outb(0x70, 0x30);
j |= inb(0x71);
dpt_sysinfo.extendedMemSize = j;
dpt_sysinfo.flags |= SI_MemorySizeValid;
/* If there is 1 or 2 drives found, set up the drive parameters */
if (dpt_sysinfo.numDrives > 0) {
/* Get the pointer from int 41 for the first drive parameters */
addr = (char *) dpt_physmap(0x0104, 1024);
if (addr != NULL) {
j = *((ushort *) (addr + 2));
j *= 16;
j += *((ushort *) (addr));
dpt_unphysmap(addr, 1024);
addr = (char *) dpt_physmap(j, 1024);
if (addr != NULL) {
dpt_sysinfo.drives[0].cylinders = *((ushort *) addr);
dpt_sysinfo.drives[0].heads = *(addr + 2);
dpt_sysinfo.drives[0].sectors = *(addr + 14);
dpt_unphysmap(addr, 1024);
}
}
if (dpt_sysinfo.numDrives > 1) {
/*
* Get the pointer from Int 46 for the second drive
* parameters
*/
addr = (char *) dpt_physmap(0x01118, 1024);
j = *((ushort *) (addr + 2));
j *= 16;
j += *((ushort *) (addr));
dpt_unphysmap(addr, 1024);
addr = (char *) dpt_physmap(j, 1024);
if (addr != NULL) {
dpt_sysinfo.drives[1].cylinders = *((ushort *) addr);
dpt_sysinfo.drives[1].heads = *(addr + 2);
dpt_sysinfo.drives[1].sectors = *(addr + 14);
dpt_unphysmap(addr, 1024);
}
}
dpt_sysinfo.flags |= SI_DriveParamsValid;
}
splx(ospl);
/* Get the processor information */
dpt_sysinfo.flags |= SI_ProcessorValid;
/* Get the bus I/O bus information */
dpt_sysinfo.flags |= SI_BusTypeValid;
dpt_sysinfo.busType = HBA_BUS_PCI;
/* XXX Use _FreeBSD_Version_ */
dpt_sysinfo.osType = OS_FREEBSD;
dpt_sysinfo.osMajorVersion = osrelease[0] - '0';
if (osrelease[1] == '.')
dpt_sysinfo.osMinorVersion = osrelease[2] - '0';
else
dpt_sysinfo.osMinorVersion = 0;
if (osrelease[3] == '.')
dpt_sysinfo.osRevision = osrelease[4] - '0';
else
dpt_sysinfo.osMinorVersion = 0;
if (osrelease[5] == '.')
dpt_sysinfo.osSubRevision = osrelease[6] - '0';
else
dpt_sysinfo.osMinorVersion = 0;
dpt_sysinfo.flags |= SI_OSversionValid;
}
static int
dpt_open(dev_t dev, int flags, int fmt, struct proc * p)
{
int minor_no;
int ospl;
dpt_softc_t *dpt;
minor_no = minor(dev);
if (dpt_minor2unit(minor_no) == -1)
return (ENXIO);
else
dpt = dpt_minor2softc(minor_no);
if (dpt == NULL)
return (ENXIO);
ospl = splbio();
if (dpt->state & DPT_HA_CONTROL_ACTIVE) {
splx(ospl);
return (EBUSY);
} else {
if ((dpt_inbuf[minor_no & ~SCSI_CONTROL_MASK] = geteblk(PAGE_SIZE))
== NULL) {
#ifdef DPT_DEBUG_CONTROL
printf("dpt%d: Failed to obtain an I/O buffer\n",
minor_no & ~SCSI_CONTROL_MASK);
#endif
splx(ospl);
return (EINVAL);
}
}
dpt->state |= DPT_HA_CONTROL_ACTIVE;
splx(ospl);
return (0);
}
static int
dpt_close(dev_t dev, int flags, int fmt, struct proc * p)
{
int minor_no;
dpt_softc_t *dpt;
minor_no = minor(dev);
dpt = dpt_minor2softc(minor_no);
if ((dpt_minor2unit(minor_no) == -1) || (dpt == NULL))
return (ENXIO);
else {
brelse(dpt_inbuf[minor_no & ~SCSI_CONTROL_MASK]);
dpt->state &= ~DPT_HA_CONTROL_ACTIVE;
return (0);
}
}
static int
dpt_write(dev_t dev, struct uio * uio, int ioflag)
{
int minor_no;
int unit;
int error;
minor_no = minor(dev);
if (minor_no & SCSI_CONTROL_MASK) {
#ifdef DPT_DEBUG_CONTROL
printf("dpt%d: I/O attempted to control channel (%x)\n",
dpt_minor2unit(minor_no), minor_no);
#endif
return (ENXIO);
}
unit = dpt_minor2unit(minor_no);
if (unit == -1) {
return (ENXIO);
} else if (uio->uio_resid > DPT_RW_CMD_LEN) {
return (E2BIG);
} else {
char *cp;
int length;
cp = dpt_inbuf[minor_no]->b_data;
length = uio->uio_resid; /* uiomove will change it! */
if ((error = uiomove(cp, length, uio) != 0)) {
#ifdef DPT_DEBUG_CONTROL
printf("dpt%d: uiomove(%x, %d, %x) failed (%d)\n",
minor_no, cp, length, uio, error);
#endif
return (error);
} else {
cp[length] = '\0';
/* A real kludge, to allow plain echo(1) to work */
if (cp[length - 1] == '\n')
cp[length - 1] = '\0';
strncpy(dpt_rw_command[unit], cp, DPT_RW_CMD_LEN);
#ifdef DPT_DEBUG_CONTROL
/**
* For lack of anything better to do;
* For now, dump the data so we can look at it and rejoice
*/
printf("dpt%d: Command \"%s\" arrived\n",
unit, dpt_rw_command[unit]);
#endif
}
}
return (error);
}
static int
dpt_read(dev_t dev, struct uio * uio, int ioflag)
{
dpt_softc_t *dpt;
int error;
int minor_no;
int ospl;
minor_no = minor(dev);
error = 0;
#ifdef DPT_DEBUG_CONTROL
printf("dpt%d: read, count = %d, dev = %08x\n",
minor_no, uio->uio_resid, dev);
#endif
if (minor_no & SCSI_CONTROL_MASK) {
#ifdef DPT_DEBUG_CONTROL
printf("dpt%d: I/O attempted to control channel (%x)\n",
dpt_minor2unit(minor_no), minor_no);
#endif
return (ENXIO);
}
if (dpt_minor2unit(minor_no) == -1) {
return (ENXIO);
}
/*
* else if ( uio->uio_resid > PAGE_SIZE ) { return(E2BIG); }
*/
else {
char *work_buffer;
char *wbp;
char *command;
int work_size;
int ndx;
int x;
if ((dpt = dpt_minor2softc(minor_no)) == NULL)
return (ENXIO);
work_buffer = (u_int8_t *) malloc(PAGE_SIZE, M_TEMP, M_WAITOK);
wbp = work_buffer;
work_size = 0;
ospl = splbio();
command = dpt_rw_command[dpt->unit];
if (strcmp(command, DPT_RW_CMD_DUMP_SOFTC) == 0) {
x = sprintf(wbp, "dpt%d:%s:%s:%s:%s:%x\n",
dpt->unit,
dpt->board_data.vendor,
dpt->board_data.modelNum,
dpt->board_data.firmware,
dpt->board_data.protocol,
dpt->EATA_revision);
work_size += x;
wbp += x;
} else if (strcmp(command, DPT_RW_CMD_DUMP_SYSINFO) == 0) {
x = sprintf(wbp, "dpt%d:%d:%d:%d:%d:%d:%d:%d:%d:%s:"
"%d:%d:%d:%d:%d:%d:%d:%d\n",
dpt->unit,
dpt_sysinfo.drive0CMOS,
dpt_sysinfo.drive1CMOS,
dpt_sysinfo.numDrives,
dpt_sysinfo.processorFamily,
dpt_sysinfo.processorType,
dpt_sysinfo.smartROMMajorVersion,
dpt_sysinfo.smartROMMinorVersion,
dpt_sysinfo.smartROMRevision,
i2bin(dpt_sysinfo.flags,
sizeof(dpt->queue_status) * 8),
dpt_sysinfo.conventionalMemSize,
dpt_sysinfo.extendedMemSize,
dpt_sysinfo.osType, dpt_sysinfo.osMajorVersion,
dpt_sysinfo.osMinorVersion, dpt_sysinfo.osRevision,
dpt_sysinfo.osSubRevision, dpt_sysinfo.busType);
work_size += x;
wbp += x;
for (ndx = 0; ndx < 16; ndx++) {
if (dpt_sysinfo.drives[ndx].cylinders != 0) {
x = sprintf(wbp, "dpt%d:d%dc%dh%ds%d\n",
dpt->unit,
ndx,
dpt_sysinfo.drives[ndx].cylinders,
dpt_sysinfo.drives[ndx].heads,
dpt_sysinfo.drives[ndx].sectors);
work_size += x;
wbp += x;
}
}
} else if (strcmp(command, DPT_RW_CMD_DUMP_METRICS) == 0) {
x = sprintf(wbp,
"dpt%d: No metrics available.\n"
"Run the dpt_dm command, or use the\n"
"DPT_IOCTL_INTERNAL_METRICS ioctl system call\n",
dpt->unit);
work_size += x;
wbp += x;
} else if (strcmp(command, DPT_RW_CMD_CLEAR_METRICS) == 0) {
#ifdef DPT_MEASURE_PERFORMANCE
dpt_reset_performance(dpt);
#endif /* DPT_MEASURE_PERFORMANCE */
x = sprintf(wbp, "dpt%d: Metrics have been cleared\n",
dpt->unit);
work_size += x;
wbp += x;
} else if (strcmp(command, DPT_RW_CMD_SHOW_LED) == 0) {
x = sprintf(wbp, "dpt%d:%s\n",
dpt->unit, i2bin(dpt_blinking_led(dpt), 8));
work_size += x;
wbp += x;
} else {
#ifdef DPT_DEBUG_CONTROL
printf("dpt%d: Bad READ state (%s)\n", minor_no, command);
#endif
splx(ospl);
error = EINVAL;
}
if (error == 0) {
work_buffer[work_size++] = '\0';
error = uiomove(work_buffer, work_size, uio);
uio->uio_resid = 0;
#ifdef DPT_DEBUG_CONTROL
if (error) {
printf("dpt%d: READ uimove failed (%d)\n", dpt->unit, error);
}
#endif
}
}
splx(ospl);
return (error);
}
/**
* This is the control syscall interface.
* It should be binary compatible with UnixWare,
* if not totally syntatically so.
*/
static int
dpt_ioctl(dev_t dev, u_long cmd, caddr_t cmdarg, int flags, struct proc * p)
{
int minor_no;
dpt_softc_t *dpt;
dpt_user_softc_t udpt;
int result;
int ndx;
eata_pt_t *eata_pass_thru;
minor_no = minor(dev);
result = 0;
if (!(minor_no & SCSI_CONTROL_MASK)) {
#ifdef DPT_DEBUG_CONTROL
printf("dpt%d: Control attempted to I/O channel (%x)\n",
dpt_minor2unit(minor_no), minor_no);
#endif /* DEBUG */
return (ENXIO);
} else
minor_no &= ~SCSI_CONTROL_MASK;
#ifdef DPT_DEBUG_CONTROL
printf("dpt%d: IOCTL(%x, %x, %p, %x, %p)\n",
minor_no, dev, cmd, cmdarg, flags, p);
#endif /* DEBUG */
if ((dpt = dpt_minor2softc(minor_no)) == NULL)
return (result);
switch (cmd) {
#ifdef DPT_MEASURE_PERFORMANCE
case DPT_IOCTL_INTERNAL_METRICS:
memcpy(cmdarg, &dpt->performance, sizeof(dpt->performance));
return (0);
#endif /* DPT_MEASURE_PERFORMANCE */
case DPT_IOCTL_SOFTC:
udpt.unit = dpt->unit;
udpt.handle_interrupts = dpt->handle_interrupts;
udpt.target_mode_enabled = dpt->target_mode_enabled;
udpt.spare = dpt->spare;
udpt.total_ccbs_count = dpt->total_ccbs_count;
udpt.free_ccbs_count = dpt->free_ccbs_count;
udpt.waiting_ccbs_count = dpt->waiting_ccbs_count;
udpt.submitted_ccbs_count = dpt->submitted_ccbs_count;
udpt.completed_ccbs_count = dpt->completed_ccbs_count;
udpt.queue_status = dpt->queue_status;
udpt.free_lock = dpt->free_lock;
udpt.waiting_lock = dpt->waiting_lock;
udpt.submitted_lock = dpt->submitted_lock;
udpt.completed_lock = dpt->completed_lock;
udpt.commands_processed = dpt->commands_processed;
udpt.lost_interrupts = dpt->lost_interrupts;
udpt.channels = dpt->channels;
udpt.max_id = dpt->max_id;
udpt.max_lun = dpt->max_lun;
udpt.io_base = dpt->io_base;
udpt.v_membase = (u_int8_t *) dpt->v_membase;
udpt.p_membase = (u_int8_t *) dpt->p_membase;
udpt.irq = dpt->irq;
udpt.dma_channel = dpt->dma_channel;
udpt.board_data = dpt->board_data;
udpt.EATA_revision = dpt->EATA_revision;
udpt.bustype = dpt->bustype;
udpt.state = dpt->state;
udpt.primary = dpt->primary;
udpt.more_support = dpt->more_support;
udpt.immediate_support = dpt->immediate_support;
udpt.broken_INQUIRY = dpt->broken_INQUIRY;
udpt.spare2 = dpt->spare2;
for (ndx = 0; ndx < MAX_CHANNELS; ndx++) {
udpt.resetlevel[ndx] = dpt->resetlevel[ndx];
udpt.hostid[ndx] = dpt->hostid[ndx];
}
udpt.last_ccb = dpt->last_ccb;
udpt.cplen = dpt->cplen;
udpt.cppadlen = dpt->cppadlen;
udpt.queuesize = dpt->queuesize;
udpt.sgsize = dpt->sgsize;
udpt.cache_type = dpt->cache_type;
udpt.cache_size = dpt->cache_size;
memcpy(cmdarg, &udpt, sizeof(dpt_user_softc_t));
return (0);
case SDI_SEND:
case DPT_IOCTL_SEND:
eata_pass_thru = (eata_pt_t *) cmdarg;
if ((eata_pass_thru->eataID[0] != 'E')
|| (eata_pass_thru->eataID[1] != 'A')
|| (eata_pass_thru->eataID[2] != 'T')
|| (eata_pass_thru->eataID[3] != 'A')) {
return (EFAULT);
}
switch (eata_pass_thru->command) {
case DPT_SIGNATURE:
return (copyout((char *) &dpt_sig,
(caddr_t *) eata_pass_thru->command_buffer,
sizeof(dpt_sig)));
case DPT_NUMCTRLS:
return (copyout((char *) &dpt_controllers_present,
(caddr_t *) eata_pass_thru->command_buffer,
sizeof(dpt_controllers_present)));
case DPT_CTRLINFO:
{
dpt_compat_ha_t compat_softc;
int ndx;
compat_softc.ha_state = dpt->state; /* Different Meaning! */
for (ndx = 0; ndx < MAX_CHANNELS; ndx++)
compat_softc.ha_id[ndx] = dpt->hostid[ndx];
compat_softc.ha_vect = dpt->irq;
compat_softc.ha_base = BaseRegister(dpt);
compat_softc.ha_max_jobs = dpt->total_ccbs_count;
compat_softc.ha_cache = dpt->cache_type;
compat_softc.ha_cachesize = dpt->cache_size;
compat_softc.ha_nbus = dpt->dma_channel + 1;
compat_softc.ha_ntargets = dpt->max_id + 1;
compat_softc.ha_nluns = dpt->max_lun + 1;
compat_softc.ha_tshift = (dpt->max_id == 7) ? 3 : 4;
compat_softc.ha_bshift = 2;
compat_softc.ha_npend = dpt->submitted_ccbs_count;
compat_softc.ha_active_jobs = dpt->waiting_ccbs_count;
strncpy(compat_softc.ha_fw_version,
dpt->board_data.firmware,
sizeof(compat_softc.ha_fw_version));
compat_softc.ha_ccb = NULL;
compat_softc.ha_cblist = NULL;
compat_softc.ha_dev = NULL;
compat_softc.ha_StPkt_lock = NULL;
compat_softc.ha_ccb_lock = NULL;
compat_softc.ha_LuQWaiting = NULL;
compat_softc.ha_QWait_lock = NULL;
compat_softc.ha_QWait_opri = NULL;
return (copyout((char *) &compat_softc,
(caddr_t *) eata_pass_thru->command_buffer,
sizeof(dpt_compat_ha_t)));
}
break;
case DPT_SYSINFO:
return (copyout((char *) &dpt_sysinfo,
(caddr_t *) eata_pass_thru->command_buffer,
sizeof(dpt_sysinfo)));
case EATAUSRCMD:
result = dpt_user_cmd(dpt, eata_pass_thru, cmdarg, minor_no);
return (result);
case DPT_BLINKLED:
result = dpt_blinking_led(dpt);
return (copyout((caddr_t) & result,
(caddr_t *) eata_pass_thru->command_buffer,
sizeof(result)));
default:
printf("dpt%d: Invalid (%x) pass-throu command\n",
dpt->unit, eata_pass_thru->command);
result = EINVAL;
}
default:
printf("dpt%d: Invalid (%lx) IOCTL\n", dpt->unit, cmd);
return (EINVAL);
}
return (result);
}
static dpt_devsw_installed = 0;
static void
dpt_drvinit(void *unused)
{
if (!dpt_devsw_installed) {
if (bootverbose)
printf("DPT: RAID Manager driver, Version %d.%d.%d\n",
DPT_CTL_RELEASE, DPT_CTL_VERSION, DPT_CTL_PATCH);
/* Add the I/O (data) channel */
cdevsw_add(&dpt_cdevsw);
dpt_devsw_installed = 1;
}
dpt_get_sysinfo();
}
SYSINIT(dpt_dev, SI_SUB_DRIVERS, SI_ORDER_MIDDLE + CDEV_MAJOR, dpt_drvinit, NULL)
/* End of the dpt_control driver */