Home | History | Annotate | Line # | Download | only in gio
gio.c revision 1.23
      1 /*	$NetBSD: gio.c,v 1.23 2006/12/22 20:29:18 rumble Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 2000 Soren S. Jorvang
      5  * All rights reserved.
      6  *
      7  * Redistribution and use in source and binary forms, with or without
      8  * modification, are permitted provided that the following conditions
      9  * are met:
     10  * 1. Redistributions of source code must retain the above copyright
     11  *    notice, this list of conditions and the following disclaimer.
     12  * 2. Redistributions in binary form must reproduce the above copyright
     13  *    notice, this list of conditions and the following disclaimer in the
     14  *    documentation and/or other materials provided with the distribution.
     15  * 3. All advertising materials mentioning features or use of this software
     16  *    must display the following acknowledgement:
     17  *          This product includes software developed for the
     18  *          NetBSD Project.  See http://www.NetBSD.org/ for
     19  *          information about NetBSD.
     20  * 4. The name of the author may not be used to endorse or promote products
     21  *    derived from this software without specific prior written permission.
     22  *
     23  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     24  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     25  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     26  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     27  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     28  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     29  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     30  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     31  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     32  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     33  */
     34 
     35 #include <sys/cdefs.h>
     36 __KERNEL_RCSID(0, "$NetBSD: gio.c,v 1.23 2006/12/22 20:29:18 rumble Exp $");
     37 
     38 #include "opt_ddb.h"
     39 
     40 #include <sys/param.h>
     41 #include <sys/systm.h>
     42 #include <sys/device.h>
     43 
     44 #define _SGIMIPS_BUS_DMA_PRIVATE
     45 #include <machine/bus.h>
     46 #include <machine/machtype.h>
     47 
     48 #include <sgimips/gio/gioreg.h>
     49 #include <sgimips/gio/giovar.h>
     50 #include <sgimips/gio/giodevs_data.h>
     51 
     52 #include "locators.h"
     53 #include "newport.h"
     54 #include "grtwo.h"
     55 #include "imc.h"
     56 #include "pic.h"
     57 
     58 #if (NNEWPORT > 0)
     59 #include <sgimips/gio/newportvar.h>
     60 #endif
     61 
     62 #if (NGRTWO > 0)
     63 #include <sgimips/gio/grtwovar.h>
     64 #endif
     65 
     66 #if (NIMC > 0)
     67 extern int imc_gio64_arb_config(int, uint32_t);
     68 #endif
     69 
     70 #if (NPIC > 0)
     71 extern int pic_gio32_arb_config(int, uint32_t);
     72 #endif
     73 
     74 
     75 struct gio_softc {
     76 	struct	device sc_dev;
     77 };
     78 
     79 static int	gio_match(struct device *, struct cfdata *, void *);
     80 static void	gio_attach(struct device *, struct device *, void *);
     81 static int	gio_print(void *, const char *);
     82 static int	gio_search(struct device *, struct cfdata *,
     83 			   const int *, void *);
     84 static int	gio_submatch(struct device *, struct cfdata *,
     85 			     const int *, void *);
     86 
     87 CFATTACH_DECL(gio, sizeof(struct gio_softc),
     88     gio_match, gio_attach, NULL, NULL);
     89 
     90 static uint32_t gio_slot_addr[] = {
     91 	0x1f400000,
     92 	0x1f600000,
     93 	0x1f000000,
     94 	0
     95 };
     96 
     97 static int
     98 gio_match(struct device *parent, struct cfdata *match, void *aux)
     99 {
    100 
    101 	return 1;
    102 }
    103 
    104 static void
    105 gio_attach(struct device *parent, struct device *self, void *aux)
    106 {
    107 	struct gio_attach_args ga;
    108 	int i;
    109 
    110 	printf("\n");
    111 
    112 	for (i=0; gio_slot_addr[i] != 0; i++) {
    113 		ga.ga_slot = (gio_slot_addr[i] == 0x1f000000) ? GIO_SLOT_GFX :
    114 		             (gio_slot_addr[i] == 0x1f400000) ? GIO_SLOT_EXP0 :
    115 								GIO_SLOT_EXP1;
    116 		ga.ga_addr = gio_slot_addr[i];
    117 		ga.ga_iot = 0;
    118 		ga.ga_ioh = MIPS_PHYS_TO_KSEG1(gio_slot_addr[i]);
    119 		ga.ga_dmat = &sgimips_default_bus_dma_tag;
    120 
    121 #if 0
    122 		/* XXX */
    123 		if (bus_space_peek_4(ga.ga_iot, ga.ga_ioh, 0, &ga.ga_product))
    124 			continue;
    125 #else
    126 		if (badaddr((void *)ga.ga_ioh,sizeof(uint32_t)))
    127 			continue;
    128 
    129 		ga.ga_product = bus_space_read_4(ga.ga_iot, ga.ga_ioh, 0);
    130 #endif
    131 
    132 		config_found_sm_loc(self, "gio", NULL, &ga, gio_print,
    133 				    gio_submatch);
    134 	}
    135 
    136 	config_search_ia(gio_search, self, "gio", &ga);
    137 }
    138 
    139 static int
    140 gio_print(void *aux, const char *pnp)
    141 {
    142 	struct gio_attach_args *ga = aux;
    143 	int i = 0;
    144 
    145 	if (pnp != NULL) {
    146 	  	int product, revision;
    147 
    148 		product = GIO_PRODUCT_PRODUCTID(ga->ga_product);
    149 
    150 		if (GIO_PRODUCT_32BIT_ID(ga->ga_product))
    151 			revision = GIO_PRODUCT_REVISION(ga->ga_product);
    152 		else
    153 			revision = 0;
    154 
    155 		while (gio_knowndevs[i].productid != 0) {
    156 			if (gio_knowndevs[i].productid == product) {
    157 				aprint_normal("%s", gio_knowndevs[i].product);
    158 				break;
    159 			}
    160 			i++;
    161 		}
    162 
    163 		if (gio_knowndevs[i].productid == 0)
    164 			aprint_normal("unknown GIO card");
    165 
    166 		aprint_normal(" (product 0x%02x revision 0x%02x) at %s",
    167 		    product, revision, pnp);
    168 	}
    169 
    170 	if (ga->ga_slot != GIOCF_SLOT_DEFAULT)
    171 		aprint_normal(" slot %d", ga->ga_slot);
    172 	if (ga->ga_addr != (uint32_t) GIOCF_ADDR_DEFAULT)
    173 		aprint_normal(" addr 0x%x", ga->ga_addr);
    174 
    175 	return UNCONF;
    176 }
    177 
    178 static int
    179 gio_search(struct device *parent, struct cfdata *cf,
    180 	   const int *ldesc, void *aux)
    181 {
    182 	struct gio_attach_args *ga = aux;
    183 
    184 	do {
    185 		/* Handled by direct configuration, so skip here */
    186 		if (cf->cf_loc[GIOCF_ADDR] == GIOCF_ADDR_DEFAULT)
    187 			return 0;
    188 
    189 		ga->ga_slot = cf->cf_loc[GIOCF_SLOT];
    190 		ga->ga_addr = cf->cf_loc[GIOCF_ADDR];
    191 		ga->ga_iot = 0;
    192 		ga->ga_ioh = MIPS_PHYS_TO_KSEG1(ga->ga_addr);
    193 
    194 		if (config_match(parent, cf, ga) > 0)
    195 			config_attach(parent, cf, ga, gio_print);
    196 	} while (cf->cf_fstate == FSTATE_STAR);
    197 
    198 	return 0;
    199 }
    200 
    201 static int
    202 gio_submatch(struct device *parent, struct cfdata *cf,
    203 	     const int *ldesc, void *aux)
    204 {
    205 	struct gio_attach_args *ga = aux;
    206 
    207 	if (cf->cf_loc[GIOCF_SLOT] != GIOCF_SLOT_DEFAULT &&
    208 	    cf->cf_loc[GIOCF_SLOT] != ga->ga_slot)
    209 		return 0;
    210 
    211 	if (cf->cf_loc[GIOCF_ADDR] != GIOCF_ADDR_DEFAULT &&
    212 	    cf->cf_loc[GIOCF_ADDR] != ga->ga_addr)
    213 		return 0;
    214 
    215 	return config_match(parent, cf, aux);
    216 }
    217 
    218 int
    219 gio_cnattach()
    220 {
    221 	struct gio_attach_args ga;
    222 	int i;
    223 
    224 	/* XXX Duplicate code XXX */
    225 	for (i=0; gio_slot_addr[i] != 0; i++) {
    226 		ga.ga_slot = i;
    227 		ga.ga_addr = gio_slot_addr[i];
    228 		ga.ga_iot = 0;
    229 		ga.ga_ioh = MIPS_PHYS_TO_KSEG1(gio_slot_addr[i]);
    230 
    231 #if 0
    232 		/* XXX */
    233 		if (bus_space_peek_4(ga.ga_iot, ga.ga_ioh, 0, &ga.ga_product))
    234 			continue;
    235 #else
    236 
    237 		if (badaddr((void *)ga.ga_ioh,sizeof(uint32_t)))
    238 			continue;
    239 
    240 		ga.ga_product = bus_space_read_4(ga.ga_iot, ga.ga_ioh, 0);
    241 #endif
    242 
    243 #if (NGRTWO > 0)
    244 		if (grtwo_cnattach(&ga) == 0)
    245 			return 0;
    246 #endif
    247 
    248 		/* XXX This probably attaches console to the wrong newport on
    249 		 * dualhead Indys, as GFX slot is tried last not first */
    250 #if (NNEWPORT > 0)
    251 		if (newport_cnattach(&ga) == 0)
    252 			return 0;
    253 #endif
    254 
    255 	}
    256 
    257 	return ENXIO;
    258 }
    259 
    260 /*
    261  * Devices living in the expansion slots must enable or disable some
    262  * GIO arbiter settings. This is accomplished via imc(4) or pic(4)
    263  * registers, depending on the machine in question.
    264  */
    265 int
    266 gio_arb_config(int slot, uint32_t flags)
    267 {
    268 
    269 	if (flags == 0)
    270 		return (EINVAL);
    271 
    272 	if (flags & ~(GIO_ARB_RT | GIO_ARB_LB | GIO_ARB_MST | GIO_ARB_SLV |
    273 	    GIO_ARB_PIPE | GIO_ARB_NOPIPE))
    274 		return (EINVAL);
    275 
    276 	if (((flags & GIO_ARB_RT)   && (flags & GIO_ARB_LB))  ||
    277 	    ((flags & GIO_ARB_MST)  && (flags & GIO_ARB_SLV)) ||
    278 	    ((flags & GIO_ARB_PIPE) && (flags & GIO_ARB_NOPIPE)))
    279 		return (EINVAL);
    280 
    281 #if (NPIC > 0)
    282 	if (mach_type == MACH_SGI_IP12)
    283 		return (pic_gio32_arb_config(slot, flags));
    284 #endif
    285 
    286 #if (NIMC > 0)
    287 	if (mach_type == MACH_SGI_IP20 || mach_type == MACH_SGI_IP22)
    288 		return (imc_gio64_arb_config(slot, flags));
    289 #endif
    290 
    291 	return (EINVAL);
    292 }
    293 
    294 /*
    295  * Establish an interrupt handler for the specified slot.
    296  *
    297  * Indy and Challenge S have an interrupt per GIO slot. Indigo and Indigo2
    298  * share a single interrupt, however.
    299  */
    300 void *
    301 gio_intr_establish(int slot, int level, int (*func)(void *), void *arg)
    302 {
    303 	int intr;
    304 
    305 	switch (mach_type) {
    306 	case MACH_SGI_IP12:
    307 	case MACH_SGI_IP20:
    308 		if (slot == GIO_SLOT_GFX)
    309 			panic("gio_intr_establish: slot %d", slot);
    310 		intr = 6;
    311 		break;
    312 
    313 	case MACH_SGI_IP22:
    314 		if (mach_subtype == MACH_SGI_IP22_FULLHOUSE) {
    315 			if (slot == GIO_SLOT_EXP1)
    316 				panic("gio_intr_establish: slot %d", slot);
    317 			intr = 6;
    318 		} else {
    319 			if (slot == GIO_SLOT_GFX)
    320 				panic("gio_intr_establish: slot %d", slot);
    321 			intr = (slot == GIO_SLOT_EXP0) ? 22 : 23;
    322 		}
    323 		break;
    324 
    325 	default:
    326 		panic("gio_intr_establish: mach_type");
    327 	}
    328 
    329 	return (cpu_intr_establish(intr, level, func, arg));
    330 }
    331 
    332 const char *
    333 gio_product_string(int prid)
    334 {
    335 	int i;
    336 
    337 	for (i = 0; gio_knowndevs[i].product != NULL; i++)
    338 		if (gio_knowndevs[i].productid == prid)
    339 			return (gio_knowndevs[i].product);
    340 
    341 	return (NULL);
    342 }
    343