Home | History | Annotate | Line # | Download | only in i2o
dpti.c revision 1.50
      1  1.50  riastrad /*	$NetBSD: dpti.c,v 1.50 2018/09/03 16:29:31 riastradh Exp $	*/
      2   1.1        ad 
      3   1.1        ad /*-
      4  1.32        ad  * Copyright (c) 2001, 2007 The NetBSD Foundation, Inc.
      5   1.1        ad  * All rights reserved.
      6   1.1        ad  *
      7   1.1        ad  * This code is derived from software contributed to The NetBSD Foundation
      8   1.1        ad  * by Andrew Doran.
      9   1.1        ad  *
     10   1.1        ad  * Redistribution and use in source and binary forms, with or without
     11   1.1        ad  * modification, are permitted provided that the following conditions
     12   1.1        ad  * are met:
     13   1.1        ad  * 1. Redistributions of source code must retain the above copyright
     14   1.1        ad  *    notice, this list of conditions and the following disclaimer.
     15   1.1        ad  * 2. Redistributions in binary form must reproduce the above copyright
     16   1.1        ad  *    notice, this list of conditions and the following disclaimer in the
     17   1.1        ad  *    documentation and/or other materials provided with the distribution.
     18   1.1        ad  *
     19   1.1        ad  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20   1.1        ad  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21   1.1        ad  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22   1.1        ad  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23   1.1        ad  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24   1.1        ad  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25   1.1        ad  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26   1.1        ad  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27   1.1        ad  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28   1.1        ad  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29   1.1        ad  * POSSIBILITY OF SUCH DAMAGE.
     30   1.1        ad  */
     31   1.1        ad 
     32   1.1        ad /*
     33   1.1        ad  * Copyright (c) 1996-2000 Distributed Processing Technology Corporation
     34   1.1        ad  * Copyright (c) 2000 Adaptec Corporation
     35   1.1        ad  * All rights reserved.
     36   1.1        ad  *
     37   1.1        ad  * TERMS AND CONDITIONS OF USE
     38   1.1        ad  *
     39   1.1        ad  * Redistribution and use in source form, with or without modification, are
     40   1.1        ad  * permitted provided that redistributions of source code must retain the
     41   1.1        ad  * above copyright notice, this list of conditions and the following disclaimer.
     42   1.1        ad  *
     43   1.1        ad  * This software is provided `as is' by Adaptec and any express or implied
     44   1.1        ad  * warranties, including, but not limited to, the implied warranties of
     45   1.1        ad  * merchantability and fitness for a particular purpose, are disclaimed. In no
     46   1.1        ad  * event shall Adaptec be liable for any direct, indirect, incidental, special,
     47   1.1        ad  * exemplary or consequential damages (including, but not limited to,
     48   1.1        ad  * procurement of substitute goods or services; loss of use, data, or profits;
     49   1.1        ad  * or business interruptions) however caused and on any theory of liability,
     50   1.1        ad  * whether in contract, strict liability, or tort (including negligence or
     51   1.1        ad  * otherwise) arising in any way out of the use of this driver software, even
     52   1.1        ad  * if advised of the possibility of such damage.
     53   1.1        ad  */
     54   1.1        ad 
     55   1.1        ad /*
     56   1.1        ad  * Adaptec/DPT I2O control interface.
     57   1.1        ad  */
     58   1.3     lukem 
     59   1.3     lukem #include <sys/cdefs.h>
     60  1.50  riastrad __KERNEL_RCSID(0, "$NetBSD: dpti.c,v 1.50 2018/09/03 16:29:31 riastradh Exp $");
     61   1.1        ad 
     62   1.1        ad #include <sys/param.h>
     63   1.1        ad #include <sys/systm.h>
     64   1.1        ad #include <sys/kernel.h>
     65   1.1        ad #include <sys/device.h>
     66   1.1        ad #include <sys/queue.h>
     67   1.1        ad #include <sys/proc.h>
     68   1.1        ad #include <sys/endian.h>
     69   1.1        ad #include <sys/malloc.h>
     70   1.1        ad #include <sys/conf.h>
     71   1.1        ad #include <sys/ioctl.h>
     72  1.29      elad #include <sys/kauth.h>
     73   1.1        ad 
     74  1.35        ad #include <sys/bus.h>
     75  1.11   thorpej #ifdef __i386__
     76   1.2        ad #include <machine/pio.h>
     77  1.38        ad #include <machine/cputypes.h>
     78   1.2        ad #endif
     79   1.1        ad 
     80   1.1        ad #include <dev/i2o/i2o.h>
     81   1.1        ad #include <dev/i2o/i2odpt.h>
     82   1.1        ad #include <dev/i2o/iopio.h>
     83   1.1        ad #include <dev/i2o/iopvar.h>
     84   1.1        ad #include <dev/i2o/dptivar.h>
     85   1.1        ad 
     86  1.49  riastrad #include "ioconf.h"
     87  1.49  riastrad 
     88   1.1        ad #ifdef I2ODEBUG
     89   1.1        ad #define	DPRINTF(x)		printf x
     90   1.1        ad #else
     91   1.1        ad #define	DPRINTF(x)
     92   1.1        ad #endif
     93   1.1        ad 
     94   1.1        ad static struct dpt_sig dpti_sig = {
     95  1.47  christos 	.dsSignature = { 'd', 'P', 't', 'S', 'i', 'G'},
     96  1.47  christos 	.dsSigVersion = SIG_VERSION,
     97  1.11   thorpej #if defined(__i386__)
     98  1.47  christos 	.dsProcessorFamily = PROC_INTEL,
     99  1.11   thorpej #elif defined(__powerpc__)
    100  1.47  christos 	.dsProcessorFamily = PROC_POWERPC,
    101  1.11   thorpej #elif defined(__alpha__)
    102  1.47  christos 	.dsProcessorFamily = PROC_ALPHA,
    103   1.4   thorpej #elif defined(__mips__)
    104  1.47  christos 	.dsProcessorFamily = PROC_MIPS,
    105  1.11   thorpej #elif defined(__sparc64__)
    106  1.47  christos 	.dsProcessorFamily = PROC_ULTRASPARC,
    107   1.2        ad #endif
    108  1.11   thorpej #if defined(__i386__)
    109  1.47  christos 	.dsProcessor = PROC_386 | PROC_486 | PROC_PENTIUM | PROC_SEXIUM,
    110   1.2        ad #else
    111  1.47  christos 	.dsProcessor = 0,
    112   1.2        ad #endif
    113  1.47  christos 	.dsFiletype = FT_HBADRVR,
    114  1.47  christos 	.dsFiletypeFlags = 0,
    115  1.47  christos 	.dsOEM = OEM_DPT,
    116  1.47  christos 	.dsOS = (uint32_t)OS_FREE_BSD,	/* XXX */
    117  1.47  christos 	.dsCapabilities = CAP_ABOVE16MB,
    118  1.47  christos 	.dsDeviceSupp = DEV_ALL,
    119  1.47  christos 	.dsAdapterSupp = ADF_ALL_SC5,
    120  1.47  christos 	.dsApplication =  0,
    121  1.47  christos 	.dsRequirements = 0,
    122  1.47  christos 	.dsVersion = DPTI_VERSION,
    123  1.47  christos 	.dsRevision = DPTI_REVISION,
    124  1.47  christos 	.dsSubRevision = DPTI_SUBREVISION,
    125  1.47  christos 	.dsMonth = DPTI_MONTH,
    126  1.47  christos 	.dsDay = DPTI_DAY,
    127  1.47  christos 	.dsYear = DPTI_YEAR,
    128  1.47  christos 	.dsDescription = { '\0' },		/* Will be filled later */
    129   1.1        ad };
    130   1.1        ad 
    131  1.42    cegger void	dpti_attach(device_t, device_t, void *);
    132   1.1        ad int	dpti_blinkled(struct dpti_softc *);
    133  1.33  christos int	dpti_ctlrinfo(struct dpti_softc *, int, void *);
    134  1.42    cegger int	dpti_match(device_t, cfdata_t, void *);
    135  1.33  christos int	dpti_passthrough(struct dpti_softc *, void *, struct proc *);
    136  1.33  christos int	dpti_sysinfo(struct dpti_softc *, int, void *);
    137   1.1        ad 
    138   1.5   gehenna dev_type_open(dptiopen);
    139   1.5   gehenna dev_type_ioctl(dptiioctl);
    140   1.5   gehenna 
    141   1.5   gehenna const struct cdevsw dpti_cdevsw = {
    142  1.46  dholland 	.d_open = dptiopen,
    143  1.46  dholland 	.d_close = nullclose,
    144  1.46  dholland 	.d_read = noread,
    145  1.46  dholland 	.d_write = nowrite,
    146  1.46  dholland 	.d_ioctl = dptiioctl,
    147  1.46  dholland 	.d_stop = nostop,
    148  1.46  dholland 	.d_tty = notty,
    149  1.46  dholland 	.d_poll = nopoll,
    150  1.46  dholland 	.d_mmap = nommap,
    151  1.46  dholland 	.d_kqfilter = nokqfilter,
    152  1.48  dholland 	.d_discard = nodiscard,
    153  1.46  dholland 	.d_flag = D_OTHER,
    154   1.5   gehenna };
    155   1.1        ad 
    156  1.45       chs CFATTACH_DECL_NEW(dpti, sizeof(struct dpti_softc),
    157   1.8   thorpej     dpti_match, dpti_attach, NULL, NULL);
    158   1.1        ad 
    159   1.1        ad int
    160  1.42    cegger dpti_match(device_t parent, cfdata_t match, void *aux)
    161   1.1        ad {
    162   1.1        ad 	struct iop_attach_args *ia;
    163   1.1        ad 	struct iop_softc *iop;
    164   1.1        ad 
    165   1.1        ad 	ia = aux;
    166  1.45       chs 	iop = device_private(parent);
    167   1.1        ad 
    168   1.1        ad 	if (ia->ia_class != I2O_CLASS_ANY || ia->ia_tid != I2O_TID_IOP)
    169   1.1        ad 		return (0);
    170   1.1        ad 
    171   1.1        ad 	if (le16toh(iop->sc_status.orgid) != I2O_ORG_DPT)
    172   1.1        ad 		return (0);
    173   1.1        ad 
    174   1.1        ad 	return (1);
    175   1.1        ad }
    176   1.1        ad 
    177   1.1        ad void
    178  1.42    cegger dpti_attach(device_t parent, device_t self, void *aux)
    179   1.1        ad {
    180   1.1        ad 	struct iop_softc *iop;
    181   1.1        ad 	struct dpti_softc *sc;
    182   1.1        ad 	struct {
    183   1.1        ad 		struct	i2o_param_op_results pr;
    184   1.1        ad 		struct	i2o_param_read_results prr;
    185   1.1        ad 		struct	i2o_dpt_param_exec_iop_buffers dib;
    186  1.40  gmcgarry 	} __packed param;
    187   1.1        ad 	int rv;
    188   1.1        ad 
    189  1.24   thorpej 	sc = device_private(self);
    190  1.45       chs 	sc->sc_dev = self;
    191  1.24   thorpej 	iop = device_private(parent);
    192   1.1        ad 
    193   1.1        ad 	/*
    194   1.1        ad 	 * Tell the world what we are.  The description in the signature
    195   1.1        ad 	 * must be no more than 46 bytes long (see dptivar.h).
    196   1.1        ad 	 */
    197   1.2        ad 	printf(": DPT/Adaptec RAID management interface\n");
    198  1.18    itojun 	snprintf(dpti_sig.dsDescription, sizeof(dpti_sig.dsDescription),
    199  1.18    itojun 	    "NetBSD %s I2O OSM", osrelease);
    200   1.1        ad 
    201   1.1        ad 	rv = iop_field_get_all(iop, I2O_TID_IOP,
    202   1.1        ad 	    I2O_DPT_PARAM_EXEC_IOP_BUFFERS, &param,
    203   1.1        ad 	    sizeof(param), NULL);
    204   1.1        ad 	if (rv != 0)
    205   1.1        ad 		return;
    206   1.1        ad 
    207   1.1        ad 	sc->sc_blinkled = le32toh(param.dib.serialoutputoff) + 8;
    208   1.1        ad }
    209   1.1        ad 
    210   1.1        ad int
    211  1.30  christos dptiopen(dev_t dev, int flag, int mode,
    212  1.30  christos     struct lwp *l)
    213   1.1        ad {
    214   1.1        ad 
    215   1.1        ad 	if (device_lookup(&dpti_cd, minor(dev)) == NULL)
    216   1.1        ad 		return (ENXIO);
    217   1.1        ad 
    218   1.1        ad 	return (0);
    219   1.1        ad }
    220   1.1        ad 
    221   1.1        ad int
    222  1.33  christos dptiioctl(dev_t dev, u_long cmd, void *data, int flag, struct lwp *l)
    223   1.1        ad {
    224   1.1        ad 	struct iop_softc *iop;
    225   1.1        ad 	struct dpti_softc *sc;
    226   1.1        ad 	struct ioctl_pt *pt;
    227  1.10        ad 	int i, size, rv, linux;
    228   1.1        ad 
    229  1.39   tsutsui 	sc = device_lookup_private(&dpti_cd, minor(dev));
    230  1.45       chs 	iop = device_private(device_parent(sc->sc_dev));
    231  1.17        ad 	rv = 0;
    232   1.1        ad 
    233   1.1        ad 	if (cmd == PTIOCLINUX) {
    234   1.1        ad 		pt = (struct ioctl_pt *)data;
    235  1.10        ad 		size = IOCPARM_LEN(pt->com);
    236  1.10        ad 		cmd = pt->com & 0xffff;
    237   1.1        ad 		data = pt->data;
    238  1.10        ad 		linux = 1;
    239  1.10        ad 	} else {
    240  1.10        ad 		size = IOCPARM_LEN(cmd);
    241  1.10        ad 		cmd = cmd & 0xffff;
    242  1.10        ad 		linux = 0;
    243  1.10        ad 	}
    244   1.1        ad 
    245  1.10        ad 	switch (cmd) {
    246   1.1        ad 	case DPT_SIGNATURE:
    247   1.1        ad 		if (size > sizeof(dpti_sig))
    248   1.1        ad 			size = sizeof(dpti_sig);
    249   1.1        ad 		memcpy(data, &dpti_sig, size);
    250  1.17        ad 		break;
    251   1.1        ad 
    252   1.1        ad 	case DPT_CTRLINFO:
    253  1.17        ad 		rv = dpti_ctlrinfo(sc, size, data);
    254  1.17        ad 		break;
    255   1.1        ad 
    256   1.1        ad 	case DPT_SYSINFO:
    257  1.17        ad 		rv = dpti_sysinfo(sc, size, data);
    258  1.17        ad 		break;
    259   1.1        ad 
    260   1.1        ad 	case DPT_BLINKLED:
    261   1.1        ad 		if ((i = dpti_blinkled(sc)) == -1)
    262   1.1        ad 			i = 0;
    263   1.1        ad 
    264  1.17        ad 		if (size == 0) {
    265  1.33  christos 			rv = copyout(&i, *(void **)data, sizeof(i));
    266  1.17        ad 			break;
    267  1.17        ad 		}
    268   1.1        ad 
    269   1.1        ad 		*(int *)data = i;
    270  1.17        ad 		break;
    271   1.1        ad 
    272   1.1        ad 	case DPT_TARGET_BUSY:
    273   1.1        ad 		/*
    274   1.1        ad 		 * XXX This is here to stop linux_machdepioctl() from
    275  1.10        ad 		 * whining about an unknown ioctl.
    276   1.1        ad 		 */
    277  1.17        ad 		rv = EIO;
    278  1.17        ad 		break;
    279   1.1        ad 
    280   1.1        ad 	case DPT_I2OUSRCMD:
    281  1.31      elad 		rv = kauth_authorize_device_passthru(l->l_cred, dev,
    282  1.31      elad 		    KAUTH_REQ_DEVICE_RAWIO_PASSTHRU_ALL, data);
    283  1.29      elad 		if (rv)
    284  1.25  christos 			break;
    285  1.25  christos 
    286  1.44     rmind 		mutex_enter(&iop->sc_conflock);
    287  1.44     rmind 		if (linux) {
    288  1.21  christos 			rv = dpti_passthrough(sc, data, l->l_proc);
    289  1.44     rmind 		} else {
    290  1.33  christos 			rv = dpti_passthrough(sc, *(void **)data, l->l_proc);
    291  1.44     rmind 		}
    292  1.44     rmind 		mutex_exit(&iop->sc_conflock);
    293  1.17        ad 		break;
    294   1.1        ad 
    295   1.1        ad 	case DPT_I2ORESETCMD:
    296   1.1        ad 		printf("%s: I2ORESETCMD not implemented\n",
    297  1.45       chs 		    device_xname(sc->sc_dev));
    298  1.17        ad 		rv = EOPNOTSUPP;
    299  1.17        ad 		break;
    300   1.1        ad 
    301   1.1        ad 	case DPT_I2ORESCANCMD:
    302  1.32        ad 		mutex_enter(&iop->sc_conflock);
    303  1.17        ad 		rv = iop_reconfigure(iop, 0);
    304  1.32        ad 		mutex_exit(&iop->sc_conflock);
    305  1.17        ad 		break;
    306   1.1        ad 
    307   1.1        ad 	default:
    308  1.17        ad 		rv = ENOTTY;
    309  1.17        ad 		break;
    310   1.1        ad 	}
    311  1.17        ad 
    312  1.17        ad 	return (rv);
    313   1.1        ad }
    314   1.1        ad 
    315   1.1        ad int
    316   1.1        ad dpti_blinkled(struct dpti_softc *sc)
    317   1.1        ad {
    318   1.1        ad 	struct iop_softc *iop;
    319   1.1        ad 	u_int v;
    320   1.1        ad 
    321  1.45       chs 	iop = device_private(device_parent(sc->sc_dev));
    322   1.1        ad 
    323   1.1        ad 	v = bus_space_read_1(iop->sc_iot, iop->sc_ioh, sc->sc_blinkled + 0);
    324   1.1        ad 	if (v == 0xbc) {
    325   1.1        ad 		v = bus_space_read_1(iop->sc_iot, iop->sc_ioh,
    326   1.1        ad 		    sc->sc_blinkled + 1);
    327   1.1        ad 		return (v);
    328   1.1        ad 	}
    329   1.1        ad 
    330   1.1        ad 	return (-1);
    331   1.1        ad }
    332   1.1        ad 
    333   1.1        ad int
    334  1.33  christos dpti_ctlrinfo(struct dpti_softc *sc, int size, void *data)
    335   1.1        ad {
    336   1.2        ad 	struct dpt_ctlrinfo info;
    337   1.1        ad 	struct iop_softc *iop;
    338   1.1        ad 	int rv, i;
    339   1.1        ad 
    340  1.45       chs 	iop = device_private(device_parent(sc->sc_dev));
    341   1.1        ad 
    342   1.2        ad 	memset(&info, 0, sizeof(info));
    343   1.1        ad 
    344   1.2        ad 	info.length = sizeof(info) - sizeof(u_int16_t);
    345  1.45       chs 	info.drvrHBAnum = device_unit(sc->sc_dev);
    346   1.2        ad 	info.baseAddr = iop->sc_memaddr;
    347   1.1        ad 	if ((i = dpti_blinkled(sc)) == -1)
    348   1.1        ad 		i = 0;
    349   1.2        ad 	info.blinkState = i;
    350   1.2        ad 	info.pciBusNum = iop->sc_pcibus;
    351   1.2        ad 	info.pciDeviceNum = iop->sc_pcidev;
    352   1.2        ad 	info.hbaFlags = FLG_OSD_PCI_VALID | FLG_OSD_DMA | FLG_OSD_I2O;
    353   1.2        ad 	info.Interrupt = 10;			/* XXX */
    354   1.1        ad 
    355  1.33  christos 	if (size > sizeof(char)) {
    356  1.50  riastrad 		memcpy(data, &info, uimin(sizeof(info), size));
    357   1.1        ad 		rv = 0;
    358   1.1        ad 	} else
    359  1.33  christos 		rv = copyout(&info, *(void **)data, sizeof(info));
    360   1.1        ad 
    361   1.1        ad 	return (rv);
    362   1.1        ad }
    363   1.1        ad 
    364   1.1        ad int
    365  1.33  christos dpti_sysinfo(struct dpti_softc *sc, int size, void *data)
    366   1.1        ad {
    367   1.2        ad 	struct dpt_sysinfo info;
    368   1.2        ad 	int rv;
    369  1.11   thorpej #ifdef __i386__
    370   1.2        ad 	int i, j;
    371   1.2        ad #endif
    372   1.2        ad 
    373   1.2        ad 	memset(&info, 0, sizeof(info));
    374   1.2        ad 
    375  1.11   thorpej #ifdef __i386__
    376   1.2        ad 	outb (0x70, 0x12);
    377   1.2        ad 	i = inb(0x71);
    378   1.2        ad 	j = i >> 4;
    379   1.2        ad 	if (i == 0x0f) {
    380   1.2        ad 		outb (0x70, 0x19);
    381   1.2        ad 		j = inb (0x71);
    382   1.2        ad 	}
    383   1.2        ad 	info.drive0CMOS = j;
    384   1.2        ad 
    385   1.2        ad 	j = i & 0x0f;
    386   1.2        ad 	if (i == 0x0f) {
    387   1.2        ad 		outb (0x70, 0x1a);
    388   1.2        ad 		j = inb (0x71);
    389   1.2        ad 	}
    390   1.2        ad 	info.drive1CMOS = j;
    391   1.2        ad 	info.processorFamily = dpti_sig.dsProcessorFamily;
    392   1.2        ad 
    393   1.2        ad 	/*
    394   1.2        ad 	 * Get the conventional memory size from CMOS.
    395   1.2        ad 	 */
    396   1.2        ad 	outb(0x70, 0x16);
    397   1.2        ad 	j = inb(0x71);
    398   1.2        ad 	j <<= 8;
    399   1.2        ad 	outb(0x70, 0x15);
    400   1.2        ad 	j |= inb(0x71);
    401   1.2        ad 	info.conventionalMemSize = j;
    402   1.2        ad 
    403   1.2        ad 	/*
    404   1.2        ad 	 * Get the extended memory size from CMOS.
    405   1.2        ad 	 */
    406   1.2        ad 	outb(0x70, 0x31);
    407   1.2        ad 	j = inb(0x71);
    408   1.2        ad 	j <<= 8;
    409   1.2        ad 	outb(0x70, 0x30);
    410   1.2        ad 	j |= inb(0x71);
    411   1.2        ad 	info.extendedMemSize = j;
    412   1.2        ad 
    413   1.2        ad 	switch (cpu_class) {
    414   1.2        ad 	case CPUCLASS_386:
    415   1.2        ad 		info.processorType = PROC_386;
    416   1.2        ad 		break;
    417   1.2        ad 	case CPUCLASS_486:
    418   1.2        ad 		info.processorType = PROC_486;
    419   1.2        ad 		break;
    420   1.2        ad 	case CPUCLASS_586:
    421   1.2        ad 		info.processorType = PROC_PENTIUM;
    422   1.2        ad 		break;
    423   1.2        ad 	case CPUCLASS_686:
    424   1.2        ad 	default:
    425   1.2        ad 		info.processorType = PROC_SEXIUM;
    426   1.2        ad 		break;
    427   1.2        ad 	}
    428   1.2        ad 
    429   1.2        ad 	info.flags = SI_CMOS_Valid | SI_BusTypeValid |
    430   1.2        ad 	    SI_MemorySizeValid | SI_NO_SmartROM;
    431   1.2        ad #else
    432   1.2        ad 	info.flags = SI_BusTypeValid | SI_NO_SmartROM;
    433   1.2        ad #endif
    434   1.2        ad 
    435   1.2        ad 	info.busType = SI_PCI_BUS;
    436   1.1        ad 
    437   1.1        ad 	/*
    438   1.2        ad 	 * Copy out the info structure to the user.
    439   1.1        ad 	 */
    440  1.33  christos 	if (size > sizeof(char)) {
    441  1.50  riastrad 		memcpy(data, &info, uimin(sizeof(info), size));
    442   1.2        ad 		rv = 0;
    443   1.2        ad 	} else
    444  1.33  christos 		rv = copyout(&info, *(void **)data, sizeof(info));
    445   1.2        ad 
    446   1.2        ad 	return (rv);
    447   1.1        ad }
    448   1.1        ad 
    449   1.1        ad int
    450  1.33  christos dpti_passthrough(struct dpti_softc *sc, void *data, struct proc *proc)
    451   1.1        ad {
    452   1.1        ad 	struct iop_softc *iop;
    453   1.1        ad 	struct i2o_msg mh, *mf;
    454   1.1        ad 	struct i2o_reply rh;
    455   1.1        ad 	struct iop_msg *im;
    456   1.1        ad 	struct dpti_ptbuf bufs[IOP_MAX_MSG_XFERS];
    457   1.1        ad 	u_int32_t mbtmp[IOP_MAX_MSG_SIZE / sizeof(u_int32_t)];
    458   1.1        ad 	u_int32_t rbtmp[IOP_MAX_MSG_SIZE / sizeof(u_int32_t)];
    459   1.2        ad 	int rv, msgsize, repsize, sgoff, i, mapped, nbuf, nfrag, j, sz;
    460  1.16    simonb 	u_int32_t *p, *pmax;
    461   1.1        ad 
    462  1.45       chs 	iop = device_private(device_parent(sc->sc_dev));
    463   1.2        ad 	im = NULL;
    464   1.1        ad 
    465   1.1        ad 	if ((rv = dpti_blinkled(sc)) != -1) {
    466   1.1        ad 		if (rv != 0) {
    467  1.45       chs 			aprint_error_dev(sc->sc_dev, "adapter blinkled = 0x%02x\n", rv);
    468   1.1        ad 			return (EIO);
    469   1.1        ad 		}
    470   1.1        ad 	}
    471   1.1        ad 
    472   1.1        ad 	/*
    473   1.1        ad 	 * Copy in the message frame header and determine the size of the
    474   1.1        ad 	 * full message frame.
    475   1.1        ad 	 */
    476   1.1        ad 	if ((rv = copyin(data, &mh, sizeof(mh))) != 0) {
    477   1.1        ad 		DPRINTF(("%s: message copyin failed\n",
    478  1.45       chs 		    device_xname(sc->sc_dev)));
    479   1.1        ad 		return (rv);
    480   1.1        ad 	}
    481   1.1        ad 
    482   1.1        ad 	msgsize = (mh.msgflags >> 14) & ~3;
    483   1.1        ad 	if (msgsize < sizeof(mh) || msgsize >= IOP_MAX_MSG_SIZE) {
    484   1.1        ad 		DPRINTF(("%s: bad message frame size\n",
    485  1.45       chs 		    device_xname(sc->sc_dev)));
    486   1.1        ad 		return (EINVAL);
    487   1.1        ad 	}
    488   1.1        ad 
    489   1.1        ad 	/*
    490   1.1        ad 	 * Handle special commands.
    491   1.1        ad 	 */
    492   1.1        ad 	switch (mh.msgfunc >> 24) {
    493   1.1        ad 	case I2O_EXEC_IOP_RESET:
    494   1.2        ad 		printf("%s: I2O_EXEC_IOP_RESET not implemented\n",
    495  1.45       chs 		    device_xname(sc->sc_dev));
    496   1.2        ad 		return (EOPNOTSUPP);
    497   1.1        ad 
    498   1.1        ad 	case I2O_EXEC_OUTBOUND_INIT:
    499   1.2        ad 		printf("%s: I2O_EXEC_OUTBOUND_INIT not implemented\n",
    500  1.45       chs 		    device_xname(sc->sc_dev));
    501   1.2        ad 		return (EOPNOTSUPP);
    502   1.1        ad 
    503   1.1        ad 	case I2O_EXEC_SYS_TAB_SET:
    504   1.2        ad 		printf("%s: I2O_EXEC_SYS_TAB_SET not implemented\n",
    505  1.45       chs 		    device_xname(sc->sc_dev));
    506   1.2        ad 		return (EOPNOTSUPP);
    507   1.1        ad 
    508   1.1        ad 	case I2O_EXEC_STATUS_GET:
    509   1.2        ad 		if ((rv = iop_status_get(iop, 0)) == 0)
    510  1.33  christos 			rv = copyout(&iop->sc_status, (char *)data + msgsize,
    511   1.2        ad 			    sizeof(iop->sc_status));
    512   1.1        ad 		return (rv);
    513   1.1        ad 	}
    514   1.1        ad 
    515   1.1        ad 	/*
    516   1.1        ad 	 * Copy in the full message frame.
    517   1.1        ad 	 */
    518   1.1        ad 	if ((rv = copyin(data, mbtmp, msgsize)) != 0) {
    519   1.1        ad 		DPRINTF(("%s: full message copyin failed\n",
    520  1.45       chs 		    device_xname(sc->sc_dev)));
    521   1.1        ad 		return (rv);
    522   1.1        ad 	}
    523   1.1        ad 
    524   1.1        ad 	/*
    525   1.1        ad 	 * Determine the size of the reply frame, and copy it in.
    526   1.1        ad 	 */
    527  1.33  christos 	if ((rv = copyin((char *)data + msgsize, &rh, sizeof(rh))) != 0) {
    528   1.1        ad 		DPRINTF(("%s: reply copyin failed\n",
    529  1.45       chs 		    device_xname(sc->sc_dev)));
    530   1.1        ad 		return (rv);
    531   1.1        ad 	}
    532   1.1        ad 
    533   1.1        ad 	repsize = (rh.msgflags >> 14) & ~3;
    534   1.1        ad 	if (repsize < sizeof(rh) || repsize >= IOP_MAX_MSG_SIZE) {
    535   1.1        ad 		DPRINTF(("%s: bad reply header size\n",
    536  1.45       chs 		    device_xname(sc->sc_dev)));
    537   1.1        ad 		return (EINVAL);
    538   1.1        ad 	}
    539   1.1        ad 
    540  1.33  christos 	if ((rv = copyin((char *)data + msgsize, rbtmp, repsize)) != 0) {
    541  1.45       chs 		DPRINTF(("%s: reply too large\n", device_xname(sc->sc_dev)));
    542   1.1        ad 		return (rv);
    543   1.1        ad 	}
    544   1.1        ad 
    545   1.1        ad 	/*
    546   1.1        ad 	 * If the message has a scatter gather list, it must be comprised of
    547   1.1        ad 	 * simple elements.  If any one transfer contains multiple segments,
    548   1.1        ad 	 * we allocate a temporary buffer for it; otherwise, the buffer will
    549   1.2        ad 	 * be mapped directly.
    550   1.1        ad 	 */
    551  1.20     fredb 	mapped = 0;
    552   1.1        ad 	if ((sgoff = ((mh.msgflags >> 4) & 15)) != 0) {
    553   1.1        ad 		if ((sgoff + 2) > (msgsize >> 2)) {
    554   1.1        ad 			DPRINTF(("%s: invalid message size fields\n",
    555  1.45       chs 			    device_xname(sc->sc_dev)));
    556   1.1        ad 			return (EINVAL);
    557   1.1        ad 		}
    558   1.2        ad 
    559   1.2        ad 		memset(bufs, 0, sizeof(bufs));
    560   1.2        ad 
    561   1.1        ad 		p = mbtmp + sgoff;
    562   1.2        ad 		pmax = mbtmp + (msgsize >> 2) - 2;
    563   1.1        ad 
    564   1.2        ad 		for (nbuf = 0; nbuf < IOP_MAX_MSG_XFERS; nbuf++, p += 2) {
    565   1.2        ad 			if (p > pmax) {
    566   1.1        ad 				DPRINTF(("%s: invalid SGL (1)\n",
    567  1.45       chs 				    device_xname(sc->sc_dev)));
    568   1.2        ad 				goto bad;
    569   1.1        ad 			}
    570   1.1        ad 
    571   1.1        ad 			if ((p[0] & 0x30000000) != I2O_SGL_SIMPLE) {
    572   1.1        ad 				DPRINTF(("%s: invalid SGL (2)\n",
    573  1.45       chs 				    device_xname(sc->sc_dev)));
    574   1.2        ad 				goto bad;
    575   1.1        ad 			}
    576   1.1        ad 
    577   1.1        ad 			bufs[nbuf].db_out = (p[0] & I2O_SGL_DATA_OUT) != 0;
    578   1.2        ad 			bufs[nbuf].db_ptr = NULL;
    579   1.1        ad 
    580   1.1        ad 			if ((p[0] & I2O_SGL_END_BUFFER) != 0) {
    581   1.1        ad 				if ((p[0] & 0x00ffffff) > IOP_MAX_XFER) {
    582   1.1        ad 					DPRINTF(("%s: buffer too large\n",
    583  1.45       chs 					    device_xname(sc->sc_dev)));
    584   1.2        ad 					goto bad;
    585   1.1        ad 				}
    586   1.1        ad 
    587  1.47  christos 				// XXX: 32 bits
    588  1.47  christos 				bufs[nbuf].db_ptr = (void *)(intptr_t)p[1];
    589   1.1        ad 				bufs[nbuf].db_proc = proc;
    590   1.1        ad 				bufs[nbuf].db_size = p[0] & 0x00ffffff;
    591   1.1        ad 
    592   1.1        ad 				if ((p[0] & I2O_SGL_END) != 0)
    593   1.1        ad 					break;
    594   1.1        ad 
    595   1.1        ad 				continue;
    596   1.1        ad 			}
    597   1.1        ad 
    598   1.2        ad 			/*
    599   1.2        ad 			 * The buffer has multiple segments.  Determine the
    600   1.2        ad 			 * total size.
    601   1.2        ad 			 */
    602   1.2        ad 			nfrag = 0;
    603   1.2        ad 			sz = 0;
    604  1.16    simonb 			for (; p <= pmax; p += 2) {
    605   1.2        ad 				if (nfrag == DPTI_MAX_SEGS) {
    606   1.2        ad 					DPRINTF(("%s: too many segments\n",
    607  1.45       chs 					    device_xname(sc->sc_dev)));
    608   1.2        ad 					goto bad;
    609   1.2        ad 				}
    610   1.2        ad 
    611   1.2        ad 				bufs[nbuf].db_frags[nfrag].iov_len =
    612   1.2        ad 				    p[0] & 0x00ffffff;
    613  1.47  christos 				// XXX: 32 bits
    614  1.19     perry 				bufs[nbuf].db_frags[nfrag].iov_base =
    615  1.47  christos 				    (void *)(intptr_t)p[1];
    616   1.2        ad 
    617   1.2        ad 				sz += p[0] & 0x00ffffff;
    618   1.2        ad 				nfrag++;
    619   1.2        ad 
    620   1.2        ad 				if ((p[0] & I2O_SGL_END) != 0) {
    621   1.2        ad 					if ((p[0] & I2O_SGL_END_BUFFER) == 0) {
    622   1.2        ad 						DPRINTF((
    623   1.2        ad 						    "%s: invalid SGL (3)\n",
    624  1.45       chs 						    device_xname(sc->sc_dev)));
    625   1.2        ad 						goto bad;
    626   1.2        ad 					}
    627   1.2        ad 					break;
    628   1.2        ad 				}
    629   1.2        ad 				if ((p[0] & I2O_SGL_END_BUFFER) != 0)
    630   1.2        ad 					break;
    631   1.2        ad 			}
    632   1.2        ad 			bufs[nbuf].db_nfrag = nfrag;
    633   1.2        ad 
    634   1.2        ad 			if (p > pmax) {
    635   1.2        ad 				DPRINTF(("%s: invalid SGL (4)\n",
    636  1.45       chs 				    device_xname(sc->sc_dev)));
    637   1.2        ad 				goto bad;
    638   1.2        ad 			}
    639   1.2        ad 
    640   1.2        ad 			if (sz > IOP_MAX_XFER) {
    641   1.2        ad 				DPRINTF(("%s: buffer too large\n",
    642  1.45       chs 				    device_xname(sc->sc_dev)));
    643   1.2        ad 				goto bad;
    644   1.2        ad 			}
    645   1.2        ad 
    646   1.2        ad 			bufs[nbuf].db_size = sz;
    647   1.2        ad 			bufs[nbuf].db_ptr = malloc(sz, M_DEVBUF, M_WAITOK);
    648   1.2        ad 			if (bufs[nbuf].db_ptr == NULL) {
    649   1.2        ad 				DPRINTF(("%s: allocation failure\n",
    650  1.45       chs 				    device_xname(sc->sc_dev)));
    651   1.2        ad 				rv = ENOMEM;
    652   1.2        ad 				goto bad;
    653   1.2        ad 			}
    654   1.2        ad 
    655   1.2        ad 			for (i = 0, sz = 0; i < bufs[nbuf].db_nfrag; i++) {
    656   1.2        ad 				rv = copyin(bufs[nbuf].db_frags[i].iov_base,
    657  1.33  christos 				    (char *)bufs[nbuf].db_ptr + sz,
    658   1.2        ad 				    bufs[nbuf].db_frags[i].iov_len);
    659   1.2        ad 				if (rv != 0) {
    660   1.2        ad 					DPRINTF(("%s: frag copyin\n",
    661  1.45       chs 					    device_xname(sc->sc_dev)));
    662   1.2        ad 					goto bad;
    663   1.2        ad 				}
    664   1.2        ad 				sz += bufs[nbuf].db_frags[i].iov_len;
    665   1.2        ad 			}
    666   1.2        ad 
    667   1.2        ad 			if ((p[0] & I2O_SGL_END) != 0)
    668   1.2        ad 				break;
    669   1.1        ad 		}
    670   1.1        ad 
    671   1.1        ad 		if (nbuf == IOP_MAX_MSG_XFERS) {
    672   1.1        ad 			DPRINTF(("%s: too many transfers\n",
    673  1.45       chs 			    device_xname(sc->sc_dev)));
    674   1.2        ad 			goto bad;
    675   1.1        ad 		}
    676  1.15   mycroft 	} else
    677  1.15   mycroft 		nbuf = -1;
    678   1.1        ad 
    679   1.1        ad 	/*
    680   1.1        ad 	 * Allocate a wrapper, and adjust the message header fields to
    681   1.1        ad 	 * indicate that no scatter-gather list is currently present.
    682   1.1        ad 	 */
    683   1.2        ad 
    684   1.1        ad 	im = iop_msg_alloc(iop, IM_WAIT | IM_NOSTATUS);
    685   1.1        ad 	im->im_rb = (struct i2o_reply *)rbtmp;
    686   1.1        ad 	mf = (struct i2o_msg *)mbtmp;
    687   1.1        ad 	mf->msgictx = IOP_ICTX;
    688   1.1        ad 	mf->msgtctx = im->im_tctx;
    689   1.1        ad 
    690   1.1        ad 	if (sgoff != 0)
    691   1.1        ad 		mf->msgflags = (mf->msgflags & 0xff0f) | (sgoff << 16);
    692   1.1        ad 
    693   1.1        ad 	/*
    694   1.1        ad 	 * Map the data transfer(s).
    695   1.1        ad 	 */
    696   1.1        ad 	for (i = 0; i <= nbuf; i++) {
    697   1.1        ad 		rv = iop_msg_map(iop, im, mbtmp, bufs[i].db_ptr,
    698   1.1        ad 		    bufs[i].db_size, bufs[i].db_out, bufs[i].db_proc);
    699   1.1        ad 		if (rv != 0) {
    700   1.2        ad 			DPRINTF(("%s: msg_map failed, rv = %d\n",
    701  1.45       chs 			    device_xname(sc->sc_dev), rv));
    702   1.1        ad 			goto bad;
    703   1.1        ad 		}
    704   1.1        ad 		mapped = 1;
    705   1.1        ad 	}
    706   1.1        ad 
    707   1.1        ad 	/*
    708   1.1        ad 	 * Start the command and sleep until it completes.
    709   1.1        ad 	 */
    710   1.1        ad 	if ((rv = iop_msg_post(iop, im, mbtmp, 5*60*1000)) != 0)
    711   1.1        ad 		goto bad;
    712   1.1        ad 
    713   1.1        ad 	/*
    714   1.1        ad 	 * Copy out the reply frame.
    715   1.1        ad 	 */
    716  1.33  christos 	if ((rv = copyout(rbtmp, (char *)data + msgsize, repsize)) != 0) {
    717   1.1        ad 		DPRINTF(("%s: reply copyout() failed\n",
    718  1.45       chs 		    device_xname(sc->sc_dev)));
    719  1.27  christos 	}
    720   1.1        ad 
    721   1.1        ad  bad:
    722   1.2        ad 	/*
    723   1.2        ad 	 * Free resources and return to the caller.
    724   1.2        ad 	 */
    725   1.2        ad 	if (im != NULL) {
    726   1.2        ad 		if (mapped)
    727   1.2        ad 			iop_msg_unmap(iop, im);
    728   1.2        ad 		iop_msg_free(iop, im);
    729   1.2        ad 	}
    730   1.2        ad 
    731   1.2        ad 	for (i = 0; i <= nbuf; i++) {
    732   1.2        ad 		if (bufs[i].db_proc != NULL)
    733   1.2        ad 			continue;
    734   1.2        ad 
    735   1.2        ad 		if (!bufs[i].db_out && rv == 0) {
    736   1.2        ad 			for (j = 0, sz = 0; j < bufs[i].db_nfrag; j++) {
    737  1.33  christos 				rv = copyout((char *)bufs[i].db_ptr + sz,
    738   1.2        ad 				    bufs[i].db_frags[j].iov_base,
    739   1.2        ad 				    bufs[i].db_frags[j].iov_len);
    740   1.2        ad 				if (rv != 0)
    741   1.2        ad 					break;
    742   1.2        ad 				sz += bufs[i].db_frags[j].iov_len;
    743   1.2        ad 			}
    744   1.2        ad 		}
    745   1.1        ad 
    746   1.2        ad 		if (bufs[i].db_ptr != NULL)
    747   1.2        ad 			free(bufs[i].db_ptr, M_DEVBUF);
    748   1.2        ad 	}
    749   1.1        ad 
    750   1.1        ad 	return (rv);
    751   1.1        ad }
    752