1 /* $NetBSD: neptune.c,v 1.16 2007/03/11 08:09:25 isaki Exp $ */ 2 3 /*- 4 * Copyright (c) 1998 NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * This code is derived from software contributed to The NetBSD Foundation 8 * by Minoura Makoto. 9 * 10 * Redistribution and use in source and binary forms, with or without 11 * modification, are permitted provided that the following conditions 12 * are met: 13 * 1. Redistributions of source code must retain the above copyright 14 * notice, this list of conditions and the following disclaimer. 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in the 17 * documentation and/or other materials provided with the distribution. 18 * 3. All advertising materials mentioning features or use of this software 19 * must display the following acknowledgement: 20 * This product includes software developed by the NetBSD 21 * Foundation, Inc. and its contributors. 22 * 4. The name of the author may not be used to endorse or promote products 23 * derived from this software without specific prior written permission. 24 * 25 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 26 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 27 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 28 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 29 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 30 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 31 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 32 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 33 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 34 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 35 * POSSIBILITY OF SUCH DAMAGE. 36 */ 37 38 /* 39 * Neptune-X -- X68k-ISA Bus Bridge 40 */ 41 42 #include <sys/cdefs.h> 43 __KERNEL_RCSID(0, "$NetBSD: neptune.c,v 1.16 2007/03/11 08:09:25 isaki Exp $"); 44 45 #include <sys/param.h> 46 #include <sys/systm.h> 47 #include <sys/device.h> 48 #include <sys/malloc.h> 49 50 #include <machine/bus.h> 51 #include <machine/cpu.h> 52 #include <machine/frame.h> 53 54 #include <arch/x68k/dev/intiovar.h> 55 #include <arch/x68k/dev/neptunevar.h> 56 57 /* bus_space stuff */ 58 static int neptune_bus_space_map(bus_space_tag_t, bus_addr_t, bus_size_t, 59 int, bus_space_handle_t *); 60 static void neptune_bus_space_unmap(bus_space_tag_t, bus_space_handle_t, 61 bus_size_t); 62 static int neptune_bus_space_subregion(bus_space_tag_t, bus_space_handle_t, 63 bus_size_t, bus_size_t, bus_space_handle_t *); 64 65 static struct x68k_bus_space neptune_bus = { 66 #if 0 67 X68K_NEPUTUNE_BUS, 68 #endif 69 neptune_bus_space_map, neptune_bus_space_unmap, 70 neptune_bus_space_subregion, 71 x68k_bus_space_alloc, x68k_bus_space_free, 72 }; 73 74 75 static int neptune_match(struct device *, struct cfdata *, void *); 76 static void neptune_attach(struct device *, struct device *, void *); 77 static int neptune_search(struct device *, struct cfdata *cf, 78 const int *, void *); 79 static int neptune_print(void *, const char *); 80 81 CFATTACH_DECL(neptune, sizeof(struct neptune_softc), 82 neptune_match, neptune_attach, NULL, NULL); 83 84 static int 85 neptune_match(struct device *parent, struct cfdata *cf, void *aux) 86 { 87 struct intio_attach_args *ia = aux; 88 89 if (strcmp(ia->ia_name, "neptune") != 0) 90 return 0; 91 92 ia->ia_size = 0x400; 93 if (intio_map_allocate_region(parent, ia, INTIO_MAP_TESTONLY)) 94 return 0; 95 96 /* Neptune is a virtual device. Always there. */ 97 98 return (1); 99 } 100 101 102 static void 103 neptune_attach(struct device *parent, struct device *self, void *aux) 104 { 105 struct neptune_softc *sc = (struct neptune_softc *)self; 106 struct intio_attach_args *ia = aux; 107 struct neptune_attach_args na; 108 int r; 109 struct cfdata *cf; 110 111 ia->ia_size = 0x400; 112 r = intio_map_allocate_region(parent, ia, INTIO_MAP_ALLOCATE); 113 #ifdef DIAGNOSTIC 114 if (r) 115 panic("IO map for Neptune corruption??"); 116 #endif 117 118 sc->sc_bst = malloc(sizeof(struct x68k_bus_space), M_DEVBUF, M_NOWAIT); 119 if (sc->sc_bst == NULL) 120 panic("neptune_attach: can't allocate bus_space structure"); 121 *sc->sc_bst = neptune_bus; 122 sc->sc_bst->x68k_bus_device = self; 123 124 sc->sc_addr = (vaddr_t)(ia->ia_addr - PHYS_INTIODEV + intiobase); 125 126 na.na_bst = sc->sc_bst; 127 na.na_intr = ia->ia_intr; 128 129 cf = config_search_ia(neptune_search, self, "neptune", &na); 130 if (cf) { 131 printf(": Neptune-X ISA bridge\n"); 132 config_attach(self, cf, &na, neptune_print); 133 } else { 134 printf(": no device found.\n"); 135 intio_map_free_region(parent, ia); 136 } 137 } 138 139 static int 140 neptune_search(struct device *parent, struct cfdata *cf, 141 const int *ldesc, void *aux) 142 { 143 struct neptune_attach_args *na = aux; 144 145 na->na_addr = cf->neptune_cf_addr; 146 147 return config_match(parent, cf, na); 148 } 149 150 static int 151 neptune_print(void *aux, const char *name) 152 { 153 struct neptune_attach_args *na = aux; 154 155 /* if (na->na_addr > 0) */ 156 aprint_normal(" addr 0x%06x", na->na_addr); 157 158 return (QUIET); 159 } 160 161 162 /* 163 * neptune bus space stuff. 164 */ 165 static int 166 neptune_bus_space_map(bus_space_tag_t t, bus_addr_t bpa, bus_size_t size, 167 int flags, bus_space_handle_t *bshp) 168 { 169 vaddr_t start = ((struct neptune_softc*) ((struct x68k_bus_space*) t) 170 ->x68k_bus_device)->sc_addr; 171 172 /* 173 * Neptune bus is mapped permanently. 174 */ 175 *bshp = (bus_space_handle_t) ((u_int)start + ((u_int)bpa - 0x200) * 2); 176 177 if (badaddr((void *)*bshp)) { 178 return 1; 179 } 180 181 *bshp |= 0x80000000; /* higher byte (= even address) only */ 182 183 return (0); 184 } 185 186 static void 187 neptune_bus_space_unmap(bus_space_tag_t t, bus_space_handle_t bsh, 188 bus_size_t size) 189 { 190 return; 191 } 192 193 static int 194 neptune_bus_space_subregion(bus_space_tag_t t, bus_space_handle_t bsh, 195 bus_size_t offset, bus_size_t size, bus_space_handle_t *nbshp) 196 { 197 198 *nbshp = bsh + offset*2; 199 return (0); 200 } 201