sys/powerpc/mpc85xx/fsl_diu.c

   1 /*-
   2  * Copyright (c) 2016 Justin Hibbits
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  *
  14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  24  * SUCH DAMAGE.
  25  */
  26
  27 #include <sys/param.h>
  28 #include <sys/systm.h>
  29 #include <sys/bus.h>
  30 #include <sys/endian.h>
  31 #include <sys/kernel.h>
  32 #include <sys/module.h>
  33 #include <sys/malloc.h>
  34 #include <sys/rman.h>
  35 #include <sys/fbio.h>
  36 #include <sys/consio.h>
  37
  38 #include <vm/vm.h>
  39 #include <vm/pmap.h>
  40
  41 #include <dev/fdt/fdt_common.h>
  42 #include <dev/ofw/openfirm.h>
  43 #include <dev/ofw/ofw_bus.h>
  44 #include <dev/ofw/ofw_bus_subr.h>
  45
  46 #include <dev/videomode/videomode.h>
  47 #include <dev/videomode/edidvar.h>
  48
  49 #include <dev/vt/vt.h>
  50 #include <dev/vt/colors/vt_termcolors.h>
  51
  52 #include <powerpc/mpc85xx/mpc85xx.h>
  53
  54 #include <machine/bus.h>
  55 #include <machine/cpu.h>
  56
  57 #include "fb_if.h"
  58
  59 #define DIU_DESC_1              0x000   /* Plane1 Area Descriptor Pointer Register */
  60 #define DIU_DESC_2              0x004   /* Plane2 Area Descriptor Pointer Register */
  61 #define DIU_DESC_3              0x008   /* Plane3 Area Descriptor Pointer Register */
  62 #define DIU_GAMMA               0x00C   /* Gamma Register */
  63 #define DIU_PALETTE             0x010   /* Palette Register */
  64 #define DIU_CURSOR              0x014   /* Cursor Register */
  65 #define DIU_CURS_POS            0x018   /* Cursor Position Register */
  66 #define  CURSOR_Y_SHIFT          16
  67 #define  CURSOR_X_SHIFT          0
  68 #define DIU_DIU_MODE            0x01C   /* DIU4 Mode */
  69 #define  DIU_MODE_M             0x7
  70 #define  DIU_MODE_S             0
  71 #define  DIU_MODE_NORMAL        0x1
  72 #define  DIU_MODE_2             0x2
  73 #define  DIU_MODE_3             0x3
  74 #define  DIU_MODE_COLBAR        0x4
  75 #define DIU_BGND                0x020   /* Background */
  76 #define DIU_BGND_WB             0x024   /* Background Color in write back Mode Register */
  77 #define DIU_DISP_SIZE           0x028   /* Display Size */
  78 #define  DELTA_Y_S              16
  79 #define  DELTA_X_S              0
  80 #define DIU_WB_SIZE             0x02C   /* Write back Plane Size Register */
  81 #define  DELTA_Y_WB_S           16
  82 #define  DELTA_X_WB_S           0
  83 #define DIU_WB_MEM_ADDR         0x030   /* Address to Store the write back Plane Register */
  84 #define DIU_HSYN_PARA           0x034   /* Horizontal Sync Parameter */
  85 #define  BP_H_SHIFT             22
  86 #define  PW_H_SHIFT             11
  87 #define  FP_H_SHIFT             0
  88 #define DIU_VSYN_PARA           0x038   /* Vertical Sync Parameter */
  89 #define  BP_V_SHIFT             22
  90 #define  PW_V_SHIFT             11
  91 #define  FP_V_SHIFT             0
  92 #define DIU_SYNPOL              0x03C   /* Synchronize Polarity */
  93 #define  BP_VS                  (1 << 4)
  94 #define  BP_HS                  (1 << 3)
  95 #define  INV_CS                 (1 << 2)
  96 #define  INV_VS                 (1 << 1)
  97 #define  INV_HS                 (1 << 0)
  98 #define  INV_PDI_VS             (1 << 8) /* Polarity of PDI input VSYNC. */
  99 #define  INV_PDI_HS             (1 << 9) /* Polarity of PDI input HSYNC. */
 100 #define  INV_PDI_DE             (1 << 10) /* Polarity of PDI input DE. */
 101 #define DIU_THRESHOLD           0x040   /* Threshold */
 102 #define  LS_BF_VS_SHIFT         16
 103 #define  OUT_BUF_LOW_SHIFT      0
 104 #define DIU_INT_STATUS          0x044   /* Interrupt Status */
 105 #define DIU_INT_MASK            0x048   /* Interrupt Mask */
 106 #define DIU_COLBAR_1            0x04C   /* COLBAR_1 */
 107 #define  DIU_COLORBARn_R(x)      ((x & 0xff) << 16)
 108 #define  DIU_COLORBARn_G(x)      ((x & 0xff) << 8)
 109 #define  DIU_COLORBARn_B(x)      ((x & 0xff) << 0)
 110 #define DIU_COLBAR_2            0x050   /* COLBAR_2 */
 111 #define DIU_COLBAR_3            0x054   /* COLBAR_3 */
 112 #define DIU_COLBAR_4            0x058   /* COLBAR_4 */
 113 #define DIU_COLBAR_5            0x05c   /* COLBAR_5 */
 114 #define DIU_COLBAR_6            0x060   /* COLBAR_6 */
 115 #define DIU_COLBAR_7            0x064   /* COLBAR_7 */
 116 #define DIU_COLBAR_8            0x068   /* COLBAR_8 */
 117 #define DIU_FILLING             0x06C   /* Filling Register */
 118 #define DIU_PLUT                0x070   /* Priority Look Up Table Register */
 119
 120 /* Control Descriptor */
 121 #define DIU_CTRLDESCL(n, m)     0x200 + (0x40 * n) + 0x4 * (m - 1)
 122 #define DIU_CTRLDESCLn_1(n)     DIU_CTRLDESCL(n, 1)
 123 #define DIU_CTRLDESCLn_2(n)     DIU_CTRLDESCL(n, 2)
 124 #define DIU_CTRLDESCLn_3(n)     DIU_CTRLDESCL(n, 3)
 125 #define  TRANS_SHIFT            20
 126 #define DIU_CTRLDESCLn_4(n)     DIU_CTRLDESCL(n, 4)
 127 #define  BPP_MASK               0xf             /* Bit per pixel Mask */
 128 #define  BPP_SHIFT              16              /* Bit per pixel Shift */
 129 #define  BPP24                  0x5
 130 #define  EN_LAYER               (1 << 31)       /* Enable the layer */
 131 #define DIU_CTRLDESCLn_5(n)     DIU_CTRLDESCL(n, 5)
 132 #define DIU_CTRLDESCLn_6(n)     DIU_CTRLDESCL(n, 6)
 133 #define DIU_CTRLDESCLn_7(n)     DIU_CTRLDESCL(n, 7)
 134 #define DIU_CTRLDESCLn_8(n)     DIU_CTRLDESCL(n, 8)
 135 #define DIU_CTRLDESCLn_9(n)     DIU_CTRLDESCL(n, 9)
 136
 137 #define NUM_LAYERS      1
 138
 139 struct panel_info {
 140         uint32_t        panel_width;
 141         uint32_t        panel_height;
 142         uint32_t        panel_hbp;
 143         uint32_t        panel_hpw;
 144         uint32_t        panel_hfp;
 145         uint32_t        panel_vbp;
 146         uint32_t        panel_vpw;
 147         uint32_t        panel_vfp;
 148         uint32_t        panel_freq;
 149         uint32_t        clk_div;
 150 };
 151
 152 struct diu_area_descriptor {
 153         uint32_t        pixel_format;
 154         uint32_t        bitmap_address;
 155         uint32_t        source_size;
 156         uint32_t        aoi_size;
 157         uint32_t        aoi_offset;
 158         uint32_t        display_offset;
 159         uint32_t        chroma_key_max;
 160         uint32_t        chroma_key_min;
 161         uint32_t        next_ad_addr;
 162 } __aligned(32);
 163
 164 struct diu_softc {
 165         struct resource         *res[2];
 166         void                    *ih;
 167         device_t                sc_dev;
 168         device_t                sc_fbd;         /* fbd child */
 169         struct fb_info          sc_info;
 170         struct panel_info       sc_panel;
 171         struct diu_area_descriptor *sc_planes[3];
 172         uint8_t                 *sc_gamma;
 173         uint8_t                 *sc_cursor;
 174 };
 175
 176 static struct resource_spec diu_spec[] = {
 177         { SYS_RES_MEMORY,       0,      RF_ACTIVE },
 178         { SYS_RES_IRQ,          0,      RF_ACTIVE },
 179         { -1, 0 }
 180 };
 181
 182 static int
 183 diu_probe(device_t dev)
 184 {
 185
 186         if (!ofw_bus_status_okay(dev))
 187                 return (ENXIO);
 188
 189         if (!ofw_bus_is_compatible(dev, "fsl,diu"))
 190                 return (ENXIO);
 191
 192         device_set_desc(dev, "Freescale Display Interface Unit");
 193         return (BUS_PROBE_DEFAULT);
 194 }
 195
 196 static void
 197 diu_intr(void *arg)
 198 {
 199         struct diu_softc *sc;
 200         int reg;
 201
 202         sc = arg;
 203
 204         /* Ack interrupts */
 205         reg = bus_read_4(sc->res[0], DIU_INT_STATUS);
 206         bus_write_4(sc->res[0], DIU_INT_STATUS, reg);
 207
 208         /* TODO interrupt handler */
 209 }
 210
 211 static int
 212 diu_set_pxclk(device_t dev, unsigned int freq)
 213 {
 214         unsigned long bus_freq;
 215         uint32_t pxclk_set;
 216         uint32_t clkdvd;
 217
 218         if ((bus_freq = mpc85xx_get_platform_clock()) <= 0) {
 219                 device_printf(dev, "Unable to get bus frequency\n");
 220                 return (ENXIO);
 221         }
 222
 223         /* freq is in kHz */
 224         freq *= 1000;
 225         /* adding freq/2 to round-to-closest */
 226         pxclk_set = min(max((bus_freq + freq/2) / freq, 2), 255) << 16;
 227         pxclk_set |= OCP85XX_CLKDVDR_PXCKEN;
 228         clkdvd = ccsr_read4(OCP85XX_CLKDVDR);
 229         clkdvd &= ~(OCP85XX_CLKDVDR_PXCKEN | OCP85XX_CLKDVDR_PXCKINV |
 230                 OCP85XX_CLKDVDR_PXCLK_MASK);
 231         ccsr_write4(OCP85XX_CLKDVDR, clkdvd);
 232         ccsr_write4(OCP85XX_CLKDVDR, clkdvd | pxclk_set);
 233
 234         return (0);
 235 }
 236
 237 static int
 238 diu_init(struct diu_softc *sc)
 239 {
 240         struct panel_info *panel;
 241         int reg;
 242
 243         panel = &sc->sc_panel;
 244
 245         /* Temporarily disable the DIU while configuring */
 246         reg = bus_read_4(sc->res[0], DIU_DIU_MODE);
 247         reg &= ~(DIU_MODE_M << DIU_MODE_S);
 248         bus_write_4(sc->res[0], DIU_DIU_MODE, reg);
 249
 250         if (diu_set_pxclk(sc->sc_dev, panel->panel_freq) < 0) {
 251                 return (ENXIO);
 252         }
 253
 254         /* Configure DIU */
 255         /* Need to set these somehow later... */
 256         bus_write_4(sc->res[0], DIU_GAMMA, vtophys(sc->sc_gamma));
 257         bus_write_4(sc->res[0], DIU_CURSOR, vtophys(sc->sc_cursor));
 258         bus_write_4(sc->res[0], DIU_CURS_POS, 0);
 259
 260         reg = ((sc->sc_info.fb_height) << DELTA_Y_S);
 261         reg |= sc->sc_info.fb_width;
 262         bus_write_4(sc->res[0], DIU_DISP_SIZE, reg);
 263
 264         reg = (panel->panel_hbp << BP_H_SHIFT);
 265         reg |= (panel->panel_hpw << PW_H_SHIFT);
 266         reg |= (panel->panel_hfp << FP_H_SHIFT);
 267         bus_write_4(sc->res[0], DIU_HSYN_PARA, reg);
 268
 269         reg = (panel->panel_vbp << BP_V_SHIFT);
 270         reg |= (panel->panel_vpw << PW_V_SHIFT);
 271         reg |= (panel->panel_vfp << FP_V_SHIFT);
 272         bus_write_4(sc->res[0], DIU_VSYN_PARA, reg);
 273
 274         bus_write_4(sc->res[0], DIU_BGND, 0);
 275
 276         /* Mask all the interrupts */
 277         bus_write_4(sc->res[0], DIU_INT_MASK, 0x3f);
 278
 279         /* Reset all layers */
 280         sc->sc_planes[0] = contigmalloc(sizeof(struct diu_area_descriptor),
 281                 M_DEVBUF, M_ZERO, 0, BUS_SPACE_MAXADDR_32BIT, 32, 0);
 282         bus_write_4(sc->res[0], DIU_DESC_1, vtophys(sc->sc_planes[0]));
 283         bus_write_4(sc->res[0], DIU_DESC_2, 0);
 284         bus_write_4(sc->res[0], DIU_DESC_3, 0);
 285
 286         /* Setup first plane */
 287         /* Area descriptor fields are little endian, so byte swap. */
 288         /* Word 0: Pixel format */
 289         /* Set to 8:8:8:8 ARGB, 4 bytes per pixel, no flip. */
 290 #define MAKE_PXLFMT(as,rs,gs,bs,a,r,g,b,f,s)    \
 291                 htole32((as << (4 * a)) | (rs << 4 * r) | \
 292                     (gs << 4 * g) | (bs << 4 * b) | \
 293                     (f << 28) | (s << 16) | \
 294                     (a << 25) | (r << 19) | \
 295                     (g << 21) | (b << 24))
 296         reg = MAKE_PXLFMT(8, 8, 8, 8, 3, 2, 1, 0, 1, 3);
 297         sc->sc_planes[0]->pixel_format = reg;
 298         /* Word 1: Bitmap address */
 299         sc->sc_planes[0]->bitmap_address = htole32(sc->sc_info.fb_pbase);
 300         /* Word 2: Source size/global alpha */
 301         reg = (sc->sc_info.fb_width | (sc->sc_info.fb_height << 12));
 302         sc->sc_planes[0]->source_size = htole32(reg);
 303         /* Word 3: AOI Size */
 304         reg = (sc->sc_info.fb_width | (sc->sc_info.fb_height << 16));
 305         sc->sc_planes[0]->aoi_size = htole32(reg);
 306         /* Word 4: AOI Offset */
 307         sc->sc_planes[0]->aoi_offset = 0;
 308         /* Word 5: Display offset */
 309         sc->sc_planes[0]->display_offset = 0;
 310         /* Word 6: Chroma key max */
 311         sc->sc_planes[0]->chroma_key_max = 0;
 312         /* Word 7: Chroma key min */
 313         reg = 255 << 16 | 255 << 8 | 255;
 314         sc->sc_planes[0]->chroma_key_min = htole32(reg);
 315         /* Word 8: Next AD */
 316         sc->sc_planes[0]->next_ad_addr = 0;
 317
 318         /* TODO: derive this from the panel size */
 319         bus_write_4(sc->res[0], DIU_PLUT, 0x1f5f666);
 320
 321         /* Enable DIU in normal mode */
 322         reg = bus_read_4(sc->res[0], DIU_DIU_MODE);
 323         reg &= ~(DIU_MODE_M << DIU_MODE_S);
 324         reg |= (DIU_MODE_NORMAL << DIU_MODE_S);
 325         bus_write_4(sc->res[0], DIU_DIU_MODE, reg);
 326
 327         return (0);
 328 }
 329
 330 static int
 331 diu_attach(device_t dev)
 332 {
 333         struct edid_info edid;
 334         struct diu_softc *sc;
 335         const struct videomode *videomode;
 336         void *edid_cells;
 337         const char *vm_name;
 338         phandle_t node;
 339         int h, r, w;
 340         int err, i;
 341
 342         sc = device_get_softc(dev);
 343         sc->sc_dev = dev;
 344
 345         if (bus_alloc_resources(dev, diu_spec, sc->res)) {
 346                 device_printf(dev, "could not allocate resources\n");
 347                 return (ENXIO);
 348         }
 349
 350         node = ofw_bus_get_node(dev);
 351         /* Setup interrupt handler */
 352         err = bus_setup_intr(dev, sc->res[1], INTR_TYPE_BIO | INTR_MPSAFE,
 353             NULL, diu_intr, sc, &sc->ih);
 354         if (err) {
 355                 device_printf(dev, "Unable to alloc interrupt resource.\n");
 356                 return (ENXIO);
 357         }
 358
 359         /* TODO: Eventually, allow EDID to be dynamically provided. */
 360         if (OF_getprop_alloc(node, "edid", &edid_cells) <= 0) {
 361                 /* Get a resource hint: hint.fb.N.mode */
 362                 if (resource_string_value(device_get_name(dev),
 363                     device_get_unit(dev), "mode", &vm_name) != 0) {
 364                         device_printf(dev,
 365                             "No EDID data and no video-mode env set\n");
 366                         return (ENXIO);
 367                 }
 368         }
 369         if (edid_cells != NULL) {
 370                 if (edid_parse(edid_cells, &edid) != 0) {
 371                         device_printf(dev, "Error parsing EDID\n");
 372                         OF_prop_free(edid_cells);
 373                         return (ENXIO);
 374                 }
 375                 videomode = edid.edid_preferred_mode;
 376         } else {
 377                 /* Parse video-mode kenv variable. */
 378                 if ((err = sscanf(vm_name, "%dx%d@%d", &w, &h, &r)) != 3) {
 379                         device_printf(dev,
 380                             "Cannot parse video mode: %s\n", vm_name);
 381                         return (ENXIO);
 382                 }
 383                 videomode = pick_mode_by_ref(w, h, r);
 384                 if (videomode == NULL) {
 385                         device_printf(dev,
 386                             "Cannot find mode for %dx%d@%d", w, h, r);
 387                         return (ENXIO);
 388                 }
 389         }
 390
 391         sc->sc_panel.panel_width = videomode->hdisplay;
 392         sc->sc_panel.panel_height = videomode->vdisplay;
 393         sc->sc_panel.panel_hbp = videomode->hsync_start - videomode->hdisplay;
 394         sc->sc_panel.panel_hfp = videomode->htotal - videomode->hsync_end;
 395         sc->sc_panel.panel_hpw = videomode->hsync_end - videomode->hsync_start;
 396         sc->sc_panel.panel_vbp = videomode->vsync_start - videomode->vdisplay;
 397         sc->sc_panel.panel_vfp = videomode->vtotal - videomode->vsync_end;
 398         sc->sc_panel.panel_vpw = videomode->vsync_end - videomode->vsync_start;
 399         sc->sc_panel.panel_freq = videomode->dot_clock;
 400
 401         sc->sc_info.fb_width = sc->sc_panel.panel_width;
 402         sc->sc_info.fb_height = sc->sc_panel.panel_height;
 403         sc->sc_info.fb_stride = sc->sc_info.fb_width * 4;
 404         sc->sc_info.fb_bpp = sc->sc_info.fb_depth = 32;
 405         sc->sc_info.fb_size = sc->sc_info.fb_height * sc->sc_info.fb_stride;
 406         sc->sc_info.fb_vbase = (intptr_t)contigmalloc(sc->sc_info.fb_size,
 407             M_DEVBUF, M_ZERO, 0, BUS_SPACE_MAXADDR_32BIT, PAGE_SIZE, 0);
 408         sc->sc_info.fb_pbase = (intptr_t)vtophys(sc->sc_info.fb_vbase);
 409         sc->sc_info.fb_flags = FB_FLAG_MEMATTR;
 410         sc->sc_info.fb_memattr = VM_MEMATTR_DEFAULT;
 411
 412         /* Gamma table is 3 consecutive segments of 256 bytes. */
 413         sc->sc_gamma = contigmalloc(3 * 256, M_DEVBUF, 0, 0,
 414             BUS_SPACE_MAXADDR_32BIT, PAGE_SIZE, 0);
 415         /* Initialize gamma to default */
 416         for (i = 0; i < 3 * 256; i++)
 417                 sc->sc_gamma[i] = (i % 256);
 418
 419         /* Cursor format is 32x32x16bpp */
 420         sc->sc_cursor = contigmalloc(32 * 32 * 2, M_DEVBUF, M_ZERO, 0,
 421             BUS_SPACE_MAXADDR_32BIT, PAGE_SIZE, 0);
 422
 423         diu_init(sc);
 424
 425         sc->sc_info.fb_name = device_get_nameunit(dev);
 426
 427         /* Ask newbus to attach framebuffer device to me. */
 428         sc->sc_fbd = device_add_child(dev, "fbd", device_get_unit(dev));
 429         if (sc->sc_fbd == NULL)
 430                 device_printf(dev, "Can't attach fbd device\n");
 431
 432         if ((err = device_probe_and_attach(sc->sc_fbd)) != 0) {
 433                 device_printf(dev, "Failed to attach fbd device: %d\n", err);
 434         }
 435
 436         return (0);
 437 }
 438
 439 static struct fb_info *
 440 diu_fb_getinfo(device_t dev)
 441 {
 442         struct diu_softc *sc = device_get_softc(dev);
 443
 444         return (&sc->sc_info);
 445 }
 446
 447 static device_method_t diu_methods[] = {
 448         DEVMETHOD(device_probe,         diu_probe),
 449         DEVMETHOD(device_attach,        diu_attach),
 450
 451         /* Framebuffer service methods */
 452         DEVMETHOD(fb_getinfo,           diu_fb_getinfo),
 453         { 0, 0 }
 454 };
 455
 456 static driver_t diu_driver = {
 457         "fb",
 458         diu_methods,
 459         sizeof(struct diu_softc),
 460 };
 461
 462 DRIVER_MODULE(fb, simplebus, diu_driver, 0, 0);