1 /* $NetBSD: jensenio_bus_intio.c,v 1.6 2021/07/04 22:42:35 thorpej Exp $ */ 2 3 /*- 4 * Copyright (c) 1999 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * This code is derived from software contributed to The NetBSD Foundation 8 * by Jason R. Thorpe. 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 * 19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 29 * POSSIBILITY OF SUCH DAMAGE. 30 */ 31 32 #include <sys/cdefs.h> /* RCS ID & Copyright macro defns */ 33 34 __KERNEL_RCSID(0, "$NetBSD: jensenio_bus_intio.c,v 1.6 2021/07/04 22:42:35 thorpej Exp $"); 35 36 #include <sys/param.h> 37 #include <sys/systm.h> 38 #include <sys/device.h> 39 #include <sys/extent.h> 40 41 #include <sys/bus.h> 42 43 #include <dev/eisa/eisavar.h> 44 45 #include <dev/isa/isavar.h> 46 47 #include <alpha/jensenio/jensenioreg.h> 48 #include <alpha/jensenio/jenseniovar.h> 49 50 /* mapping/unmapping */ 51 int jensenio_intio_map(void *, bus_addr_t, bus_size_t, int, 52 bus_space_handle_t *, int); 53 void jensenio_intio_unmap(void *, bus_space_handle_t, 54 bus_size_t, int); 55 int jensenio_intio_subregion(void *, bus_space_handle_t, 56 bus_size_t, bus_size_t, bus_space_handle_t *); 57 58 /* allocation/deallocation */ 59 /* Not supported for Internal space */ 60 61 /* barrier */ 62 static inline void jensenio_intio_barrier(void *, bus_space_handle_t, 63 bus_size_t, bus_size_t, int); 64 65 /* read (single) */ 66 static inline uint8_t jensenio_intio_read_1(void *, bus_space_handle_t, bus_size_t); 67 68 /* read multiple */ 69 void jensenio_intio_read_multi_1(void *, bus_space_handle_t, 70 bus_size_t, uint8_t *, bus_size_t); 71 72 /* read region */ 73 /* Not supported for Internal space */ 74 75 /* write (single) */ 76 static inline void jensenio_intio_write_1(void *, bus_space_handle_t, 77 bus_size_t, uint8_t); 78 79 /* write multiple */ 80 void jensenio_intio_write_multi_1(void *, bus_space_handle_t, 81 bus_size_t, const uint8_t *, bus_size_t); 82 83 /* write region */ 84 /* Not supported for Internal space */ 85 86 /* set multiple */ 87 void jensenio_intio_set_multi_1(void *, bus_space_handle_t, 88 bus_size_t, uint8_t, bus_size_t); 89 90 /* set region */ 91 /* Not supported for Internal space */ 92 93 /* copy */ 94 /* Not supported for Internal space */ 95 96 void 97 jensenio_bus_intio_init(bus_space_tag_t t, void *v) 98 { 99 100 /* 101 * Initialize the bus space tag. 102 */ 103 104 memset(t, 0, sizeof(*t)); 105 106 /* cookie */ 107 t->abs_cookie = v; 108 109 /* mapping/unmapping */ 110 t->abs_map = jensenio_intio_map; 111 t->abs_unmap = jensenio_intio_unmap; 112 t->abs_subregion = jensenio_intio_subregion; 113 114 /* barrier */ 115 t->abs_barrier = jensenio_intio_barrier; 116 117 /* read (single) */ 118 t->abs_r_1 = jensenio_intio_read_1; 119 120 /* read multiple */ 121 t->abs_rm_1 = jensenio_intio_read_multi_1; 122 123 /* write (single) */ 124 t->abs_w_1 = jensenio_intio_write_1; 125 126 /* write multiple */ 127 t->abs_wm_1 = jensenio_intio_write_multi_1; 128 129 /* set multiple */ 130 t->abs_sm_1 = jensenio_intio_set_multi_1; 131 132 /* 133 * Extent map is already set up. 134 */ 135 } 136 137 int 138 jensenio_intio_map(void *v, bus_addr_t ioaddr, bus_size_t iosize, int flags, 139 bus_space_handle_t *iohp, int acct) 140 { 141 struct jensenio_config *jcp = v; 142 int linear = flags & BUS_SPACE_MAP_LINEAR; 143 int error; 144 145 /* 146 * Can't map i/o space linearly. 147 */ 148 if (linear) 149 return (EOPNOTSUPP); 150 151 if (acct) { 152 #ifdef EXTENT_DEBUG 153 printf("intio: allocating 0x%lx to 0x%lx\n", ioaddr, 154 ioaddr + iosize - 1); 155 #endif 156 error = extent_alloc_region(jcp->jc_io_ex, ioaddr, iosize, 157 EX_NOWAIT | (jcp->jc_mallocsafe ? EX_MALLOCOK : 0)); 158 if (error) { 159 #ifdef EXTENT_DEBUG 160 printf("intio: allocation failed (%d)\n", error); 161 extent_print(jcp->jc_io_ex); 162 #endif 163 return (error); 164 } 165 } 166 167 *iohp = ALPHA_PHYS_TO_K0SEG((ioaddr << 9) + JENSEN_VL82C106); 168 return (0); 169 } 170 171 void 172 jensenio_intio_unmap(void *v, bus_space_handle_t ioh, bus_size_t iosize, 173 int acct) 174 { 175 struct jensenio_config *jcp = v; 176 bus_addr_t ioaddr; 177 int error; 178 179 if (acct == 0) 180 return; 181 182 #ifdef EXTENT_DEBUG 183 printf("intio: freeing handle 0x%lx for 0x%lx\n", ioh, iosize); 184 #endif 185 186 ioh = ALPHA_K0SEG_TO_PHYS(ioh); 187 188 ioaddr = (ioh - JENSEN_VL82C106) >> 9; 189 190 #ifdef EXTENT_DEBUG 191 printf("intio: freeing 0x%lx to 0x%lx\n", ioaddr, ioaddr + iosize - 1); 192 #endif 193 error = extent_free(jcp->jc_io_ex, ioaddr, iosize, 194 EX_NOWAIT | (jcp->jc_mallocsafe ? EX_MALLOCOK : 0)); 195 if (error) { 196 printf("WARNING: could not unmap 0x%lx-0x%lx (error %d)\n", 197 ioaddr, ioaddr + iosize - 1, error); 198 #ifdef EXTENT_DEBUG 199 extent_print(jcp->jc_io_ex); 200 #endif 201 } 202 } 203 204 int 205 jensenio_intio_subregion(void *v, bus_space_handle_t ioh, bus_size_t offset, 206 bus_size_t size, bus_space_handle_t *nioh) 207 { 208 209 *nioh = ioh + (offset << 9); 210 return (0); 211 } 212 213 static inline void 214 jensenio_intio_barrier(void *v, bus_space_handle_t h, bus_size_t o, 215 bus_size_t l, int f) 216 { 217 218 if ((f & BUS_SPACE_BARRIER_READ) != 0) 219 alpha_mb(); 220 else if ((f & BUS_SPACE_BARRIER_WRITE) != 0) 221 alpha_wmb(); 222 } 223 224 static inline uint8_t 225 jensenio_intio_read_1(void *v, bus_space_handle_t ioh, bus_size_t off) 226 { 227 register uint32_t *port; 228 229 alpha_mb(); 230 231 port = (uint32_t *)(ioh + (off << 9)); 232 return (*port & 0xff); 233 } 234 235 void 236 jensenio_intio_read_multi_1(void *v, bus_space_handle_t h, bus_size_t o, 237 uint8_t *a, bus_size_t c) 238 { 239 240 while (c-- > 0) { 241 jensenio_intio_barrier(v, h, o, sizeof *a, 242 BUS_SPACE_BARRIER_READ); 243 *a++ = jensenio_intio_read_1(v, h, o); 244 } 245 } 246 247 static inline void 248 jensenio_intio_write_1(void *v, bus_space_handle_t ioh, bus_size_t off, 249 uint8_t val) 250 { 251 register uint32_t *port; 252 253 port = (uint32_t *)(ioh + (off << 9)); 254 *port = val; 255 alpha_mb(); 256 } 257 258 void 259 jensenio_intio_write_multi_1(void *v, bus_space_handle_t h, bus_size_t o, 260 const uint8_t *a, bus_size_t c) 261 { 262 263 while (c-- > 0) { 264 jensenio_intio_write_1(v, h, o, *a++); 265 jensenio_intio_barrier(v, h, o, sizeof *a, 266 BUS_SPACE_BARRIER_WRITE); 267 } 268 } 269 270 void 271 jensenio_intio_set_multi_1(void *v, bus_space_handle_t h, bus_size_t o, 272 uint8_t val, bus_size_t c) 273 { 274 275 while (c-- > 0) { 276 jensenio_intio_write_1(v, h, o, val); 277 jensenio_intio_barrier(v, h, o, sizeof val, 278 BUS_SPACE_BARRIER_WRITE); 279 } 280 } 281