1 /* $NetBSD: mediabay.c,v 1.18 2009/03/14 21:04:11 dsl 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.18 2009/03/14 21:04:11 dsl 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 enum mediabay_controller { 46 MB_CONTROLLER_KEYLARGO, 47 MB_CONTROLLER_OTHER 48 }; 49 50 struct mediabay_softc { 51 struct device sc_dev; 52 bus_space_tag_t sc_tag; 53 int sc_node; 54 u_int *sc_addr; 55 u_int *sc_fcr; 56 u_int sc_baseaddr; 57 struct device *sc_content; 58 lwp_t *sc_kthread; 59 enum mediabay_controller sc_type; 60 }; 61 62 static const char *mediabay_keylargo[] = { 63 "keylargo-media-bay", 64 NULL 65 }; 66 67 void mediabay_attach(struct device *, struct device *, void *); 68 int mediabay_match(struct device *, struct cfdata *, void *); 69 int mediabay_print(void *, const char *); 70 void mediabay_attach_content(struct mediabay_softc *); 71 int mediabay_intr(void *); 72 void mediabay_kthread(void *); 73 74 CFATTACH_DECL(mediabay, sizeof(struct mediabay_softc), 75 mediabay_match, mediabay_attach, NULL, NULL); 76 77 #ifdef MEDIABAY_DEBUG 78 # define DPRINTF printf 79 #else 80 # define DPRINTF while (0) printf 81 #endif 82 83 #define FCR_MEDIABAY_RESET 0x00000002 84 #define FCR_MEDIABAY_IDE_ENABLE 0x00000008 85 #define FCR_MEDIABAY_FD_ENABLE 0x00000010 86 #define FCR_MEDIABAY_ENABLE 0x00000080 87 #define FCR_MEDIABAY_CD_POWER 0x00800000 88 89 #define MBCR_MEDIABAY0_ENABLE 0x00000100 90 #define MBCR_MEDIABAY0_RESET 0x00000200 91 #define MBCR_MEDIABAY0_POWER 0x00000400 92 #define MBCR_MEDIABAY0_IDE_ENABLE 0x00001000 93 #define MBCR_MEDIABAY0_DEVMASK 0x00007800 94 95 #define FCR1_EIDE0_ENABLE 0x00800000 96 #define FCR1_EIDE0_RESET 0x01000000 97 98 #define MEDIABAY_ID(sc, x) \ 99 ((sc)->sc_type == MB_CONTROLLER_KEYLARGO ? \ 100 (((x) >> 4) & 0xf) : \ 101 (((x) >> 12) & 0xf)) 102 #define MEDIABAY_ID_FD 0 103 #define MEDIABAY_ID_CD 3 104 #define MEDIABAY_ID_NONE 7 105 106 int 107 mediabay_match(struct device *parent, struct cfdata *cf, void *aux) 108 { 109 struct confargs *ca = aux; 110 111 if (strcmp(ca->ca_name, "media-bay") == 0) 112 return 1; 113 114 return 0; 115 } 116 117 /* 118 * Attach all the sub-devices we can find 119 */ 120 void 121 mediabay_attach(struct device *parent, struct device *self, void *aux) 122 { 123 struct mediabay_softc *sc = (struct mediabay_softc *)self; 124 struct confargs *ca = aux; 125 int irq, itype; 126 127 ca->ca_reg[0] += ca->ca_baseaddr; 128 129 sc->sc_addr = mapiodev(ca->ca_reg[0], PAGE_SIZE); 130 sc->sc_node = ca->ca_node; 131 sc->sc_baseaddr = ca->ca_baseaddr; 132 sc->sc_tag = ca->ca_tag; 133 irq = ca->ca_intr[0]; 134 itype = IST_EDGE; 135 136 if (of_compatible(ca->ca_node, mediabay_keylargo) != -1) { 137 sc->sc_type = MB_CONTROLLER_KEYLARGO; 138 sc->sc_fcr = sc->sc_addr + 2; 139 } else { 140 sc->sc_type = MB_CONTROLLER_OTHER; 141 sc->sc_fcr = sc->sc_addr + 1; 142 } 143 144 if (ca->ca_nintr == 8 && ca->ca_intr[1] != 0) 145 itype = IST_LEVEL; 146 147 printf(" irq %d %s\n", irq, intr_typename(itype)); 148 149 intr_establish(irq, itype, IPL_BIO, mediabay_intr, sc); 150 151 sc->sc_content = NULL; 152 153 if (MEDIABAY_ID(sc, in32rb(sc->sc_addr)) != MEDIABAY_ID_NONE) 154 mediabay_attach_content(sc); 155 156 kthread_create(PRI_NONE, 0, NULL, mediabay_kthread, sc, 157 &sc->sc_kthread, "media-bay"); 158 } 159 160 void 161 mediabay_attach_content(struct mediabay_softc *sc) 162 { 163 int child; 164 u_int fcr = 0; 165 struct device *content; 166 struct confargs ca; 167 u_int reg[20], intr[5]; 168 char name[32]; 169 170 if (sc->sc_type != MB_CONTROLLER_KEYLARGO) { 171 fcr = in32rb(sc->sc_fcr); 172 173 /* 174 * if the mediabay isn't powered up we need to wait a few seconds 175 * before probing devices 176 */ 177 if ((fcr & (FCR_MEDIABAY_ENABLE | FCR_MEDIABAY_IDE_ENABLE 178 | FCR_MEDIABAY_CD_POWER)) != (FCR_MEDIABAY_ENABLE 179 | FCR_MEDIABAY_IDE_ENABLE | FCR_MEDIABAY_CD_POWER)) { 180 fcr |= FCR_MEDIABAY_ENABLE | FCR_MEDIABAY_RESET; 181 out32rb(sc->sc_fcr, fcr); 182 delay(50000); 183 184 fcr &= ~FCR_MEDIABAY_RESET; 185 out32rb(sc->sc_fcr, fcr); 186 delay(50000); 187 188 fcr |= FCR_MEDIABAY_IDE_ENABLE | FCR_MEDIABAY_CD_POWER; 189 out32rb(sc->sc_fcr, fcr); 190 delay(50000); 191 printf("%s: powering up...\n", sc->sc_dev.dv_xname); 192 delay(2000000); 193 } 194 } else { 195 printf("%s: powering up keylargo-media-bay..", sc->sc_dev.dv_xname); 196 197 out32rb(sc->sc_addr, in32rb(sc->sc_addr) & ~MBCR_MEDIABAY0_RESET); 198 out32rb(sc->sc_addr, in32rb(sc->sc_addr) & ~MBCR_MEDIABAY0_POWER); 199 delay(50000); 200 201 out32rb(sc->sc_addr, in32rb(sc->sc_addr) & ~MBCR_MEDIABAY0_ENABLE); 202 delay(50000); 203 204 out32rb(sc->sc_addr, 205 in32rb(sc->sc_addr) | MBCR_MEDIABAY0_IDE_ENABLE); 206 delay(50000); 207 208 out32rb(sc->sc_addr, in32rb(sc->sc_addr) | MBCR_MEDIABAY0_RESET); 209 delay(50000); 210 211 out32rb(sc->sc_fcr, in32rb(sc->sc_fcr) | FCR1_EIDE0_RESET); 212 out32rb(sc->sc_fcr, in32rb(sc->sc_fcr) | FCR1_EIDE0_ENABLE); 213 delay(50000); 214 215 out32rb(sc->sc_addr, in32rb(sc->sc_addr) | MBCR_MEDIABAY0_ENABLE); 216 __asm volatile ("eieio"); 217 delay(50000); 218 219 out32rb(sc->sc_addr, in32rb(sc->sc_addr) & ~0xf); 220 __asm volatile ("eieio"); 221 delay(50000); 222 223 tsleep(sc, PRI_NONE, "mediabay", hz*1); 224 225 printf(" done.\n"); 226 } 227 228 for (child = OF_child(sc->sc_node); child; child = OF_peer(child)) { 229 memset(name, 0, sizeof(name)); 230 if (OF_getprop(child, "name", name, sizeof(name)) == -1) 231 continue; 232 ca.ca_name = name; 233 ca.ca_node = child; 234 ca.ca_baseaddr = sc->sc_baseaddr; 235 ca.ca_tag = sc->sc_tag; 236 237 ca.ca_nreg = OF_getprop(child, "reg", reg, sizeof(reg)); 238 ca.ca_nintr = OF_getprop(child, "AAPL,interrupts", intr, 239 sizeof(intr)); 240 if (ca.ca_nintr == -1) 241 ca.ca_nintr = OF_getprop(child, "interrupts", intr, 242 sizeof(intr)); 243 ca.ca_reg = reg; 244 ca.ca_intr = intr; 245 246 content = config_found(&sc->sc_dev, &ca, mediabay_print); 247 if (content) { 248 sc->sc_content = content; 249 return; 250 } 251 } 252 253 if (sc->sc_type != MB_CONTROLLER_KEYLARGO) { 254 /* No devices found. Disable media-bay. */ 255 fcr &= ~(FCR_MEDIABAY_ENABLE | FCR_MEDIABAY_IDE_ENABLE | 256 FCR_MEDIABAY_CD_POWER | FCR_MEDIABAY_FD_ENABLE); 257 out32rb(sc->sc_fcr, fcr); 258 } 259 } 260 261 int 262 mediabay_print(void *aux, const char *mediabay) 263 { 264 struct confargs *ca = aux; 265 266 if (mediabay == NULL && ca->ca_nreg > 0) 267 aprint_normal(" offset 0x%x", ca->ca_reg[0]); 268 269 return QUIET; 270 } 271 272 int 273 mediabay_intr(void *v) 274 { 275 struct mediabay_softc *sc = v; 276 277 wakeup(&sc->sc_kthread); 278 279 return 1; 280 } 281 282 void 283 mediabay_kthread(void *v) 284 { 285 struct mediabay_softc *sc = v; 286 u_int x, fcr; 287 288 for (;;) { 289 tsleep(&sc->sc_kthread, PRIBIO, "mbayev", 0); 290 291 /* sleep 0.25 sec */ 292 tsleep(mediabay_kthread, PRIBIO, "mbayev", hz/4); 293 294 DPRINTF("%s: ", sc->sc_dev.dv_xname); 295 x = in32rb(sc->sc_addr); 296 297 switch (MEDIABAY_ID(sc, x)) { 298 case MEDIABAY_ID_NONE: 299 DPRINTF("removed\n"); 300 if (sc->sc_content != NULL) { 301 config_detach(sc->sc_content, DETACH_FORCE); 302 DPRINTF("%s: detach done\n", 303 sc->sc_dev.dv_xname); 304 sc->sc_content = NULL; 305 306 if (sc->sc_type != MB_CONTROLLER_KEYLARGO) { 307 /* disable media-bay */ 308 fcr = in32rb(sc->sc_fcr); 309 fcr &= ~(FCR_MEDIABAY_ENABLE | 310 FCR_MEDIABAY_IDE_ENABLE | 311 FCR_MEDIABAY_CD_POWER | 312 FCR_MEDIABAY_FD_ENABLE); 313 out32rb(sc->sc_fcr, fcr); 314 } 315 } 316 break; 317 case MEDIABAY_ID_FD: 318 DPRINTF("FD inserted\n"); 319 break; 320 case MEDIABAY_ID_CD: 321 DPRINTF("CD inserted\n"); 322 323 if (sc->sc_content == NULL) 324 mediabay_attach_content(sc); 325 break; 326 default: 327 printf("unknown event (0x%x)\n", x); 328 } 329 } 330 } 331 332 /* PBG3: 0x7025X0c0 */ 333 /* 3400: 0x7070X080 */ 334 /* 2400: 0x0070X0a8 */ 335