1 /* $NetBSD: wmlcd.c,v 1.3 2021/08/07 16:18:48 thorpej Exp $ */ 2 /* 3 * Copyright (c) 2013 KIYOHARA Takashi 4 * 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 * 15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 16 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED 17 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE 18 * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, 19 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES 20 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR 21 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 22 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, 23 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN 24 * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 25 * POSSIBILITY OF SUCH DAMAGE. 26 */ 27 #include <sys/cdefs.h> 28 __KERNEL_RCSID(0, "$NetBSD: wmlcd.c,v 1.3 2021/08/07 16:18:48 thorpej Exp $"); 29 30 #include "rnd.h" 31 32 #include <sys/param.h> 33 #include <sys/bus.h> 34 #include <sys/device.h> 35 #include <sys/errno.h> 36 37 #include <uvm/uvm_extern.h> 38 39 #include <epoc32/windermere/windermerereg.h> 40 #include <epoc32/windermere/windermerevar.h> 41 42 #include <dev/cons.h> 43 #include <dev/wscons/wsconsio.h> 44 #include <dev/wscons/wsdisplayvar.h> 45 #include <dev/rasops/rasops.h> 46 47 #include "locators.h" 48 49 #define LCD_SIZE 0x100 50 51 static int is_console; 52 struct wmlcd_softc { 53 device_t sc_dev; 54 55 bus_space_tag_t sc_iot; 56 bus_space_handle_t sc_ioh; 57 58 vaddr_t sc_buffer; 59 60 struct rasops_info sc_ri; 61 }; 62 63 static int wmlcd_match(device_t, cfdata_t, void *); 64 static void wmlcd_attach(device_t, device_t, void *); 65 66 /* wsdisplay functions */ 67 static int wmlcd_ioctl(void *, void *, u_long, void *, int, struct lwp *); 68 static paddr_t wmlcd_mmap(void *, void *, off_t, int); 69 static int wmlcd_alloc_screen(void *, const struct wsscreen_descr *, void **, 70 int *, int *, long *); 71 static void wmlcd_free_screen(void *, void *); 72 static int wmlcd_show_screen(void *, void *, int, 73 void (*)(void *, int, int), void *); 74 75 CFATTACH_DECL_NEW(wmlcd, sizeof(struct wmlcd_softc), 76 wmlcd_match, wmlcd_attach, NULL, NULL); 77 78 79 #define WMLCD_DEFAULT_DEPTH 4 80 /* Linux like palette data */ 81 const static char palette_2bpp[] = { 82 0x00, 0x00, 0x05, 0x00, 0x0a, 0x00, 0x0f, 0x00, 83 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 84 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 85 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 86 }; 87 const static char palette_4bpp[] = { 88 0x00, 0x00, 0x01, 0x00, 0x06, 0x00, 0x07, 0x00, 89 0x03, 0x00, 0x04, 0x00, 0x06, 0x00, 0x0a, 0x00, 90 0x05, 0x00, 0x06, 0x00, 0x0b, 0x00, 0x0c, 0x00, 91 0x08, 0x00, 0x09, 0x00, 0x0e, 0x00, 0x0f, 0x00, 92 }; 93 94 static struct wsscreen_descr wmlcd_descr = { 95 .name = "wmlcd", 96 .fontwidth = 8, 97 .fontheight = 16, 98 .capabilities = WSSCREEN_WSCOLORS, 99 }; 100 static const struct wsscreen_descr *wmlcd_descrs[] = { 101 &wmlcd_descr 102 }; 103 104 static const struct wsscreen_list wmlcd_screen_list = { 105 .nscreens = __arraycount(wmlcd_descrs), 106 .screens = wmlcd_descrs, 107 }; 108 109 struct wsdisplay_accessops wmlcd_accessops = { 110 wmlcd_ioctl, 111 wmlcd_mmap, 112 wmlcd_alloc_screen, 113 wmlcd_free_screen, 114 wmlcd_show_screen, 115 NULL, 116 NULL, 117 NULL, 118 }; 119 120 /* ARGSUSED */ 121 static int 122 wmlcd_match(device_t parent, cfdata_t match, void *aux) 123 { 124 struct windermere_attach_args *aa = aux; 125 126 /* Wildcard not accept */ 127 if (aa->aa_offset == WINDERMERECF_OFFSET_DEFAULT) 128 return 0; 129 130 aa->aa_size = LCD_SIZE; 131 return 1; 132 } 133 134 /* ARGSUSED */ 135 static void 136 wmlcd_attach(device_t parent, device_t self, void *aux) 137 { 138 struct wmlcd_softc *sc = device_private(self); 139 struct windermere_attach_args *aa = aux; 140 struct wsemuldisplaydev_attach_args waa; 141 prop_dictionary_t dict = device_properties(self); 142 paddr_t paddr; 143 struct rasops_info *ri; 144 uint32_t lcdctl, width, height, addr, depth; 145 int c, i; 146 const char *palette; 147 148 aprint_naive("\n"); 149 aprint_normal("\n"); 150 151 sc->sc_dev = self; 152 if (windermere_bus_space_subregion(aa->aa_iot, *aa->aa_ioh, 153 aa->aa_offset, aa->aa_size, &sc->sc_ioh) != 0) { 154 aprint_error_dev(self, "can't map registers\n"); 155 return; 156 } 157 sc->sc_iot = aa->aa_iot; 158 159 if (!prop_dictionary_get_uint32(dict, "width", &width) || 160 !prop_dictionary_get_uint32(dict, "height", &height) || 161 !prop_dictionary_get_uint32(dict, "addr", &addr)) { 162 aprint_error_dev(self, "can't get properties\n"); 163 return; 164 } 165 sc->sc_buffer = addr; 166 pmap_extract(pmap_kernel(), addr, &paddr); 167 168 /* Setup palette data */ 169 depth = WMLCD_DEFAULT_DEPTH; 170 if (depth == 2) 171 palette = palette_2bpp; 172 else 173 palette = palette_4bpp; 174 for (i = 0; i < LCD_PALETTE_SIZE; i++) 175 *((uint8_t *)addr + i) = palette[i]; 176 *(uint16_t *)addr |= (depth >> 1) << 12; 177 178 lcdctl = bus_space_read_4(sc->sc_iot, sc->sc_ioh, LCDCTL); 179 bus_space_write_4(sc->sc_iot, sc->sc_ioh, LCDCTL, lcdctl & ~LCDCTL_EN); 180 181 bus_space_write_4(sc->sc_iot, sc->sc_ioh, LCDDBAR1, paddr); 182 183 lcdctl = bus_space_read_4(sc->sc_iot, sc->sc_ioh, LCDCTL); 184 bus_space_write_4(sc->sc_iot, sc->sc_ioh, LCDCTL, 185 lcdctl | LCDCTL_EN | LCDCTL_BW); 186 187 aprint_normal_dev(self, 188 ": %dx%d pixels, %d bpp mono\n", width, height, 1 << depth); 189 190 ri = &sc->sc_ri; 191 ri->ri_depth = depth; 192 ri->ri_bits = (void *)(addr + LCD_PALETTE_SIZE); 193 ri->ri_width = width; 194 ri->ri_height = height; 195 ri->ri_stride = width * ri->ri_depth / 8/*bits*/; 196 ri->ri_flg = RI_FORCEMONO | RI_CLEAR | RI_CENTER; 197 198 if (is_console) { 199 long defattr; 200 201 if (rasops_init(ri, 0, 0) < 0) 202 panic("rasops_init failed"); 203 204 if (ri->ri_depth == 4) { 205 /* XXXXX: Create color map. */ 206 ri->ri_devcmap[0] = 0; 207 for (i = 1; i < 15; i++) { 208 c = (i + 0xc) & 0xf; 209 ri->ri_devcmap[i] = 210 c | (c << 8) | (c << 16) | (c << 24); 211 } 212 } 213 ri->ri_devcmap[15] = -1; 214 215 wmlcd_descr.ncols = ri->ri_cols; 216 wmlcd_descr.nrows = ri->ri_rows; 217 wmlcd_descr.textops = &ri->ri_ops; 218 wmlcd_descr.capabilities = ri->ri_caps; 219 220 if ((ri->ri_ops.allocattr)(ri, 0, 0, 0, &defattr) != 0) 221 panic("allocattr failed"); 222 wsdisplay_cnattach(&wmlcd_descr, ri, ri->ri_ccol, ri->ri_crow, 223 defattr); 224 } 225 226 waa.console = is_console; 227 waa.scrdata = &wmlcd_screen_list; 228 waa.accessops = &wmlcd_accessops; 229 waa.accesscookie = sc; 230 231 config_found(self, &waa, wsemuldisplaydevprint, CFARGS_NONE); 232 } 233 234 static int 235 wmlcd_ioctl(void *v, void *vs, u_long cmd, void *data, int flag, struct lwp *l) 236 { 237 struct wmlcd_softc *sc = v; 238 struct wsdisplay_fbinfo *wsdisp_info; 239 240 switch (cmd) { 241 case WSDISPLAYIO_GTYPE: 242 *(int *)data = WSDISPLAY_TYPE_WINDERMERE; 243 return 0; 244 245 case WSDISPLAYIO_GINFO: 246 wsdisp_info = (struct wsdisplay_fbinfo *)data; 247 wsdisp_info->height = sc->sc_ri.ri_height; 248 wsdisp_info->width = sc->sc_ri.ri_width; 249 wsdisp_info->depth = sc->sc_ri.ri_depth; 250 wsdisp_info->cmsize = 0; 251 return 0; 252 253 case WSDISPLAYIO_GVIDEO: 254 if (1) /* XXXX */ 255 *(int *)data = WSDISPLAYIO_VIDEO_ON; 256 else 257 *(int *)data = WSDISPLAYIO_VIDEO_OFF; 258 return 0; 259 260 case WSDISPLAYIO_SVIDEO: 261 if (*(int *)data == WSDISPLAYIO_VIDEO_ON) { 262 /* XXXX: turn on */ 263 } else { 264 /* XXXX: turn off */ 265 } 266 return 0; 267 268 case WSDISPLAYIO_LINEBYTES: 269 *(int *)data = sc->sc_ri.ri_stride; 270 return 0; 271 } 272 273 return EPASSTHROUGH; 274 } 275 276 static paddr_t 277 wmlcd_mmap(void *v, void *vs, off_t off, int prot) 278 { 279 struct wmlcd_softc *sc = v; 280 281 if (off < 0 || sc->sc_ri.ri_stride * sc->sc_ri.ri_height <= off) 282 return -1; 283 284 return (paddr_t)sc->sc_ri.ri_bits + off; 285 } 286 287 static int 288 wmlcd_alloc_screen(void *v, const struct wsscreen_descr *scr, void **cookiep, 289 int *curxp, int *curyp, long *attrp) 290 { 291 printf("%s\n", __func__); 292 return -1; 293 } 294 295 static void 296 wmlcd_free_screen(void *v, void *cookie) 297 { 298 printf("%s\n", __func__); 299 } 300 301 static int 302 wmlcd_show_screen(void *v, void *cookie, int waitok, 303 void (*func)(void *, int, int), void *arg) 304 { 305 printf("%s\n", __func__); 306 return -1; 307 } 308 309 int 310 wmlcd_cnattach(void) 311 { 312 313 is_console = 1; 314 return 0; 315 } 316