1 /* $NetBSD: ofrom.c,v 1.15 2007/03/04 10:21:26 christos Exp $ */ 2 3 /* 4 * Copyright 1998 5 * Digital Equipment Corporation. All rights reserved. 6 * 7 * This software is furnished under license and may be used and 8 * copied only in accordance with the following terms and conditions. 9 * Subject to these conditions, you may download, copy, install, 10 * use, modify and distribute this software in source and/or binary 11 * form. No title or ownership is transferred hereby. 12 * 13 * 1) Any source code used, modified or distributed must reproduce 14 * and retain this copyright notice and list of conditions as 15 * they appear in the source file. 16 * 17 * 2) No right is granted to use any trade name, trademark, or logo of 18 * Digital Equipment Corporation. Neither the "Digital Equipment 19 * Corporation" name nor any trademark or logo of Digital Equipment 20 * Corporation may be used to endorse or promote products derived 21 * from this software without the prior written permission of 22 * Digital Equipment Corporation. 23 * 24 * 3) This software is provided "AS-IS" and any express or implied 25 * warranties, including but not limited to, any implied warranties 26 * of merchantability, fitness for a particular purpose, or 27 * non-infringement are disclaimed. In no event shall DIGITAL be 28 * liable for any damages whatsoever, and in particular, DIGITAL 29 * shall not be liable for special, indirect, consequential, or 30 * incidental damages or damages for lost profits, loss of 31 * revenue or loss of use, whether such damages arise in contract, 32 * negligence, tort, under statute, in equity, at law or otherwise, 33 * even if advised of the possibility of such damage. 34 */ 35 36 /* 37 * XXX open for writing (for user programs to mmap, and write contents) 38 */ 39 40 #include <sys/cdefs.h> 41 __KERNEL_RCSID(0, "$NetBSD: ofrom.c,v 1.15 2007/03/04 10:21:26 christos Exp $"); 42 43 #include <sys/param.h> 44 #include <sys/device.h> 45 #include <sys/systm.h> 46 #include <sys/conf.h> 47 #include <sys/fcntl.h> 48 49 #include <uvm/uvm_extern.h> 50 51 #include <machine/bus.h> 52 #include <dev/ofw/openfirm.h> 53 54 struct ofrom_softc { 55 struct device sc_dev; 56 int enabled; 57 paddr_t base; 58 paddr_t size; 59 }; 60 61 int ofromprobe __P((struct device *, struct cfdata *, void *)); 62 void ofromattach __P((struct device *, struct device *, void *)); 63 64 CFATTACH_DECL(ofrom, sizeof(struct ofrom_softc), 65 ofromprobe, ofromattach, NULL, NULL); 66 67 extern struct cfdriver ofrom_cd; 68 69 dev_type_open(ofromopen); 70 dev_type_read(ofromrw); 71 dev_type_mmap(ofrommmap); 72 73 const struct cdevsw ofrom_cdevsw = { 74 ofromopen, nullclose, ofromrw, ofromrw, noioctl, 75 nostop, notty, nopoll, ofrommmap, nokqfilter, 76 }; 77 78 int 79 ofromprobe(parent, cf, aux) 80 struct device *parent; 81 struct cfdata *cf; 82 void *aux; 83 { 84 struct ofbus_attach_args *oba = aux; 85 static const char *const compatible_strings[] = { "rom", NULL }; 86 87 return (of_compatible(oba->oba_phandle, compatible_strings) == -1) ? 88 0 : 5; 89 } 90 91 92 void 93 ofromattach(parent, self, aux) 94 struct device *parent, *self; 95 void *aux; 96 { 97 struct ofrom_softc *sc = (struct ofrom_softc *)self; 98 struct ofbus_attach_args *oba = aux; 99 char regbuf[8]; 100 101 if (OF_getproplen(oba->oba_phandle, "reg") != 8) { 102 printf(": invalid reg property\n"); 103 return; 104 } 105 if (OF_getprop(oba->oba_phandle, "reg", regbuf, sizeof regbuf) != 8) { 106 printf(": couldn't read reg property\n"); 107 return; 108 } 109 sc->base = of_decode_int(®buf[0]); 110 sc->size = of_decode_int(®buf[4]); 111 sc->enabled = 1; 112 113 printf(": %#lx-%#lx\n", sc->base, sc->base + sc->size - 1); 114 } 115 116 int 117 ofromopen(dev, oflags, devtype, l) 118 dev_t dev; 119 int oflags, devtype; 120 struct lwp *l; 121 { 122 struct ofrom_softc *sc; 123 int unit = minor(dev); 124 125 if (unit >= ofrom_cd.cd_ndevs) 126 return (ENXIO); 127 sc = ofrom_cd.cd_devs[unit]; 128 if (!sc || !sc->enabled) 129 return (ENXIO); 130 131 if (oflags & FWRITE) 132 return (EINVAL); 133 134 return (0); 135 } 136 137 int 138 ofromrw(dev, uio, flags) 139 dev_t dev; 140 struct uio *uio; 141 int flags; 142 { 143 struct ofrom_softc *sc; 144 int c, error = 0, unit = minor(dev); 145 struct iovec *iov; 146 paddr_t v; 147 psize_t o; 148 extern int physlock; 149 extern char *memhook; 150 151 if (unit >= ofrom_cd.cd_ndevs) 152 return (ENXIO); /* XXX PANIC */ 153 sc = ofrom_cd.cd_devs[unit]; 154 if (!sc || !sc->enabled) 155 return (ENXIO); /* XXX PANIC */ 156 157 /* lock against other uses of shared vmmap */ 158 while (physlock > 0) { 159 physlock++; 160 error = tsleep((void *)&physlock, PZERO | PCATCH, "ofromrw", 161 0); 162 if (error) 163 return (error); 164 } 165 physlock = 1; 166 167 while (uio->uio_resid > 0 && error == 0) { 168 iov = uio->uio_iov; 169 if (iov->iov_len == 0) { 170 uio->uio_iov++; 171 uio->uio_iovcnt--; 172 if (uio->uio_iovcnt < 0) 173 panic("ofromrw"); 174 continue; 175 } 176 177 /* 178 * Since everything is page aligned and no more 179 * than the rest of a page is done at once, we 180 * can just check that the offset isn't too big. 181 */ 182 if (uio->uio_offset >= sc->size) 183 break; 184 185 v = sc->base + uio->uio_offset; 186 pmap_enter(pmap_kernel(), (vaddr_t)memhook, 187 trunc_page(v), uio->uio_rw == UIO_READ ? 188 VM_PROT_READ : VM_PROT_WRITE, PMAP_WIRED); 189 pmap_update(pmap_kernel()); 190 o = uio->uio_offset & PGOFSET; 191 c = min(uio->uio_resid, (int)(PAGE_SIZE - o)); 192 error = uiomove((char *)memhook + o, c, uio); 193 pmap_remove(pmap_kernel(), (vaddr_t)memhook, 194 (vaddr_t)memhook + PAGE_SIZE); 195 pmap_update(pmap_kernel()); 196 } 197 198 if (physlock > 1) 199 wakeup((void *)&physlock); 200 physlock = 0; 201 202 return (error); 203 } 204 205 paddr_t 206 ofrommmap(dev, off, prot) 207 dev_t dev; 208 off_t off; 209 int prot; 210 { 211 struct ofrom_softc *sc; 212 int unit = minor(dev); 213 214 if (unit >= ofrom_cd.cd_ndevs) 215 return (-1); /* XXX PANIC */ 216 sc = ofrom_cd.cd_devs[unit]; 217 if (!sc || !sc->enabled) 218 return (-1); /* XXX PANIC */ 219 220 if ((u_int)off >= sc->size) 221 return (-1); 222 223 return arm_btop(sc->base + off); 224 } 225