1 /* $NetBSD: mediabay.c,v 1.14 2007/10/17 19:55:19 garbled Exp $ */ 2 3 /*- 4 * Copyright (C) 1999 Tsubai Masanari. All rights reserved. 5 * 6 * Redistribution and use in source and binary forms, with or without 7 * modification, are permitted provided that the following conditions 8 * are met: 9 * 1. Redistributions of source code must retain the above copyright 10 * notice, this list of conditions and the following disclaimer. 11 * 2. Redistributions in binary form must reproduce the above copyright 12 * notice, this list of conditions and the following disclaimer in the 13 * documentation and/or other materials provided with the distribution. 14 * 3. The name of the author may not be used to endorse or promote products 15 * derived from this software without specific prior written permission. 16 * 17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 18 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 19 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 20 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 21 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 22 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE 26 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 27 */ 28 29 #include <sys/cdefs.h> 30 __KERNEL_RCSID(0, "$NetBSD: mediabay.c,v 1.14 2007/10/17 19:55:19 garbled Exp $"); 31 32 #include <sys/param.h> 33 #include <sys/device.h> 34 #include <sys/kernel.h> 35 #include <sys/kthread.h> 36 #include <sys/systm.h> 37 38 #include <uvm/uvm_extern.h> 39 40 #include <dev/ofw/openfirm.h> 41 42 #include <machine/autoconf.h> 43 #include <machine/pio.h> 44 45 struct mediabay_softc { 46 struct device sc_dev; 47 bus_space_tag_t sc_tag; 48 int sc_node; 49 u_int *sc_addr; 50 u_int *sc_fcr; 51 u_int sc_baseaddr; 52 struct device *sc_content; 53 lwp_t *sc_kthread; 54 }; 55 56 void mediabay_attach __P((struct device *, struct device *, void *)); 57 int mediabay_match __P((struct device *, struct cfdata *, void *)); 58 int mediabay_print __P((void *, const char *)); 59 void mediabay_attach_content __P((struct mediabay_softc *)); 60 int mediabay_intr __P((void *)); 61 void mediabay_kthread __P((void *)); 62 63 CFATTACH_DECL(mediabay, sizeof(struct mediabay_softc), 64 mediabay_match, mediabay_attach, NULL, NULL); 65 66 #ifdef MEDIABAY_DEBUG 67 # define DPRINTF printf 68 #else 69 # define DPRINTF while (0) printf 70 #endif 71 72 #define FCR_MEDIABAY_RESET 0x00000002 73 #define FCR_MEDIABAY_IDE_ENABLE 0x00000008 74 #define FCR_MEDIABAY_FD_ENABLE 0x00000010 75 #define FCR_MEDIABAY_ENABLE 0x00000080 76 #define FCR_MEDIABAY_CD_POWER 0x00800000 77 78 #define MEDIABAY_ID(x) (((x) >> 12) & 0xf) 79 #define MEDIABAY_ID_FD 0 80 #define MEDIABAY_ID_CD 3 81 #define MEDIABAY_ID_NONE 7 82 83 int 84 mediabay_match(parent, cf, aux) 85 struct device *parent; 86 struct cfdata *cf; 87 void *aux; 88 { 89 struct confargs *ca = aux; 90 91 if (strcmp(ca->ca_name, "media-bay") == 0) 92 return 1; 93 94 return 0; 95 } 96 97 /* 98 * Attach all the sub-devices we can find 99 */ 100 void 101 mediabay_attach(parent, self, aux) 102 struct device *parent, *self; 103 void *aux; 104 { 105 struct mediabay_softc *sc = (struct mediabay_softc *)self; 106 struct confargs *ca = aux; 107 int irq, itype; 108 109 ca->ca_reg[0] += ca->ca_baseaddr; 110 111 sc->sc_addr = mapiodev(ca->ca_reg[0], PAGE_SIZE); 112 sc->sc_fcr = sc->sc_addr + 1; 113 sc->sc_node = ca->ca_node; 114 sc->sc_baseaddr = ca->ca_baseaddr; 115 sc->sc_tag = ca->ca_tag; 116 irq = ca->ca_intr[0]; 117 itype = IST_EDGE; 118 119 if (ca->ca_nintr == 8 && ca->ca_intr[1] != 0) 120 itype = IST_LEVEL; 121 122 printf(" irq %d %s\n", irq, intr_typename(itype)); 123 124 intr_establish(irq, itype, IPL_BIO, mediabay_intr, sc); 125 126 sc->sc_content = NULL; 127 128 if (MEDIABAY_ID(in32rb(sc->sc_addr)) != MEDIABAY_ID_NONE) 129 mediabay_attach_content(sc); 130 131 kthread_create(PRI_NONE, 0, NULL, mediabay_kthread, sc, 132 &sc->sc_kthread, "media-bay"); 133 } 134 135 void 136 mediabay_attach_content(sc) 137 struct mediabay_softc *sc; 138 { 139 int child; 140 u_int fcr; 141 struct device *content; 142 struct confargs ca; 143 u_int reg[20], intr[5]; 144 char name[32]; 145 146 fcr = in32rb(sc->sc_fcr); 147 148 /* 149 * if the mediabay isn't powered up we need to wait a few seconds 150 * before probing devices 151 */ 152 if ((fcr & (FCR_MEDIABAY_ENABLE | FCR_MEDIABAY_IDE_ENABLE 153 | FCR_MEDIABAY_CD_POWER)) != (FCR_MEDIABAY_ENABLE 154 | FCR_MEDIABAY_IDE_ENABLE | FCR_MEDIABAY_CD_POWER)) { 155 fcr |= FCR_MEDIABAY_ENABLE | FCR_MEDIABAY_RESET; 156 out32rb(sc->sc_fcr, fcr); 157 delay(50000); 158 159 fcr &= ~FCR_MEDIABAY_RESET; 160 out32rb(sc->sc_fcr, fcr); 161 delay(50000); 162 163 fcr |= FCR_MEDIABAY_IDE_ENABLE | FCR_MEDIABAY_CD_POWER; 164 out32rb(sc->sc_fcr, fcr); 165 delay(50000); 166 printf("%s: powering up...\n", sc->sc_dev.dv_xname); 167 delay(2000000); 168 } 169 170 for (child = OF_child(sc->sc_node); child; child = OF_peer(child)) { 171 memset(name, 0, sizeof(name)); 172 if (OF_getprop(child, "name", name, sizeof(name)) == -1) 173 continue; 174 ca.ca_name = name; 175 ca.ca_node = child; 176 ca.ca_baseaddr = sc->sc_baseaddr; 177 ca.ca_tag = sc->sc_tag; 178 179 ca.ca_nreg = OF_getprop(child, "reg", reg, sizeof(reg)); 180 ca.ca_nintr = OF_getprop(child, "AAPL,interrupts", intr, 181 sizeof(intr)); 182 if (ca.ca_nintr == -1) 183 ca.ca_nintr = OF_getprop(child, "interrupts", intr, 184 sizeof(intr)); 185 ca.ca_reg = reg; 186 ca.ca_intr = intr; 187 188 content = config_found(&sc->sc_dev, &ca, mediabay_print); 189 if (content) { 190 sc->sc_content = content; 191 return; 192 } 193 } 194 195 /* No devices found. Disable media-bay. */ 196 fcr &= ~(FCR_MEDIABAY_ENABLE | FCR_MEDIABAY_IDE_ENABLE | 197 FCR_MEDIABAY_CD_POWER | FCR_MEDIABAY_FD_ENABLE); 198 out32rb(sc->sc_fcr, fcr); 199 } 200 201 int 202 mediabay_print(aux, mediabay) 203 void *aux; 204 const char *mediabay; 205 { 206 struct confargs *ca = aux; 207 208 if (mediabay == NULL && ca->ca_nreg > 0) 209 aprint_normal(" offset 0x%x", ca->ca_reg[0]); 210 211 return QUIET; 212 } 213 214 int 215 mediabay_intr(v) 216 void *v; 217 { 218 struct mediabay_softc *sc = v; 219 220 wakeup(&sc->sc_kthread); 221 222 return 1; 223 } 224 225 void 226 mediabay_kthread(v) 227 void *v; 228 { 229 struct mediabay_softc *sc = v; 230 u_int x, fcr; 231 232 for (;;) { 233 tsleep(&sc->sc_kthread, PRIBIO, "mbayev", 0); 234 235 /* sleep 0.25 sec */ 236 tsleep(mediabay_kthread, PRIBIO, "mbayev", hz/4); 237 238 DPRINTF("%s: ", sc->sc_dev.dv_xname); 239 x = in32rb(sc->sc_addr); 240 241 switch (MEDIABAY_ID(x)) { 242 case MEDIABAY_ID_NONE: 243 DPRINTF("removed\n"); 244 if (sc->sc_content != NULL) { 245 config_detach(sc->sc_content, DETACH_FORCE); 246 DPRINTF("%s: detach done\n", 247 sc->sc_dev.dv_xname); 248 sc->sc_content = NULL; 249 250 /* disable media-bay */ 251 fcr = in32rb(sc->sc_fcr); 252 fcr &= ~(FCR_MEDIABAY_ENABLE | 253 FCR_MEDIABAY_IDE_ENABLE | 254 FCR_MEDIABAY_CD_POWER | 255 FCR_MEDIABAY_FD_ENABLE); 256 out32rb(sc->sc_fcr, fcr); 257 } 258 break; 259 case MEDIABAY_ID_FD: 260 DPRINTF("FD inserted\n"); 261 break; 262 case MEDIABAY_ID_CD: 263 DPRINTF("CD inserted\n"); 264 265 if (sc->sc_content == NULL) 266 mediabay_attach_content(sc); 267 break; 268 default: 269 printf("unknown event (0x%x)\n", x); 270 } 271 } 272 } 273 274 /* PBG3: 0x7025X0c0 */ 275 /* 3400: 0x7070X080 */ 276 /* 2400: 0x0070X0a8 */ 277