xref: /openbmc/qemu/hw/display/omap_lcdc.c (revision 886fb67020e32ce6a2cf7049c6f017acf1f0d69a)
1  /*
2   * OMAP LCD controller.
3   *
4   * Copyright (C) 2006-2007 Andrzej Zaborowski  <balrog@zabor.org>
5   *
6   * This program is free software; you can redistribute it and/or
7   * modify it under the terms of the GNU General Public License as
8   * published by the Free Software Foundation; either version 2 of
9   * the License, or (at your option) any later version.
10   *
11   * This program is distributed in the hope that it will be useful,
12   * but WITHOUT ANY WARRANTY; without even the implied warranty of
13   * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14   * GNU General Public License for more details.
15   *
16   * You should have received a copy of the GNU General Public License along
17   * with this program; if not, see <http://www.gnu.org/licenses/>.
18   */
19  
20  #include "qemu/osdep.h"
21  #include "hw/irq.h"
22  #include "ui/console.h"
23  #include "hw/arm/omap.h"
24  #include "framebuffer.h"
25  #include "ui/pixel_ops.h"
26  
27  struct omap_lcd_panel_s {
28      MemoryRegion *sysmem;
29      MemoryRegion iomem;
30      MemoryRegionSection fbsection;
31      qemu_irq irq;
32      QemuConsole *con;
33  
34      int plm;
35      int tft;
36      int mono;
37      int enable;
38      int width;
39      int height;
40      int interrupts;
41      uint32_t timing[3];
42      uint32_t subpanel;
43      uint32_t ctrl;
44  
45      struct omap_dma_lcd_channel_s *dma;
46      uint16_t palette[256];
47      int palette_done;
48      int frame_done;
49      int invalidate;
50      int sync_error;
51  };
52  
omap_lcd_interrupts(struct omap_lcd_panel_s * s)53  static void omap_lcd_interrupts(struct omap_lcd_panel_s *s)
54  {
55      if (s->frame_done && (s->interrupts & 1)) {
56          qemu_irq_raise(s->irq);
57          return;
58      }
59  
60      if (s->palette_done && (s->interrupts & 2)) {
61          qemu_irq_raise(s->irq);
62          return;
63      }
64  
65      if (s->sync_error) {
66          qemu_irq_raise(s->irq);
67          return;
68      }
69  
70      qemu_irq_lower(s->irq);
71  }
72  
73  /*
74   * 2-bit colour
75   */
draw_line2_32(void * opaque,uint8_t * d,const uint8_t * s,int width,int deststep)76  static void draw_line2_32(void *opaque, uint8_t *d, const uint8_t *s,
77                            int width, int deststep)
78  {
79      uint16_t *pal = opaque;
80      uint8_t v, r, g, b;
81  
82      do {
83          v = ldub_p((void *) s);
84          r = (pal[v & 3] >> 4) & 0xf0;
85          g = pal[v & 3] & 0xf0;
86          b = (pal[v & 3] << 4) & 0xf0;
87          ((uint32_t *) d)[0] = rgb_to_pixel32(r, g, b);
88          d += 4;
89          v >>= 2;
90          r = (pal[v & 3] >> 4) & 0xf0;
91          g = pal[v & 3] & 0xf0;
92          b = (pal[v & 3] << 4) & 0xf0;
93          ((uint32_t *) d)[0] = rgb_to_pixel32(r, g, b);
94          d += 4;
95          v >>= 2;
96          r = (pal[v & 3] >> 4) & 0xf0;
97          g = pal[v & 3] & 0xf0;
98          b = (pal[v & 3] << 4) & 0xf0;
99          ((uint32_t *) d)[0] = rgb_to_pixel32(r, g, b);
100          d += 4;
101          v >>= 2;
102          r = (pal[v & 3] >> 4) & 0xf0;
103          g = pal[v & 3] & 0xf0;
104          b = (pal[v & 3] << 4) & 0xf0;
105          ((uint32_t *) d)[0] = rgb_to_pixel32(r, g, b);
106          d += 4;
107          s++;
108          width -= 4;
109      } while (width > 0);
110  }
111  
112  /*
113   * 4-bit colour
114   */
draw_line4_32(void * opaque,uint8_t * d,const uint8_t * s,int width,int deststep)115  static void draw_line4_32(void *opaque, uint8_t *d, const uint8_t *s,
116                            int width, int deststep)
117  {
118      uint16_t *pal = opaque;
119      uint8_t v, r, g, b;
120  
121      do {
122          v = ldub_p((void *) s);
123          r = (pal[v & 0xf] >> 4) & 0xf0;
124          g = pal[v & 0xf] & 0xf0;
125          b = (pal[v & 0xf] << 4) & 0xf0;
126          ((uint32_t *) d)[0] = rgb_to_pixel32(r, g, b);
127          d += 4;
128          v >>= 4;
129          r = (pal[v & 0xf] >> 4) & 0xf0;
130          g = pal[v & 0xf] & 0xf0;
131          b = (pal[v & 0xf] << 4) & 0xf0;
132          ((uint32_t *) d)[0] = rgb_to_pixel32(r, g, b);
133          d += 4;
134          s++;
135          width -= 2;
136      } while (width > 0);
137  }
138  
139  /*
140   * 8-bit colour
141   */
draw_line8_32(void * opaque,uint8_t * d,const uint8_t * s,int width,int deststep)142  static void draw_line8_32(void *opaque, uint8_t *d, const uint8_t *s,
143                            int width, int deststep)
144  {
145      uint16_t *pal = opaque;
146      uint8_t v, r, g, b;
147  
148      do {
149          v = ldub_p((void *) s);
150          r = (pal[v] >> 4) & 0xf0;
151          g = pal[v] & 0xf0;
152          b = (pal[v] << 4) & 0xf0;
153          ((uint32_t *) d)[0] = rgb_to_pixel32(r, g, b);
154          s++;
155          d += 4;
156      } while (-- width != 0);
157  }
158  
159  /*
160   * 12-bit colour
161   */
draw_line12_32(void * opaque,uint8_t * d,const uint8_t * s,int width,int deststep)162  static void draw_line12_32(void *opaque, uint8_t *d, const uint8_t *s,
163                             int width, int deststep)
164  {
165      uint16_t v;
166      uint8_t r, g, b;
167  
168      do {
169          v = lduw_le_p((void *) s);
170          r = (v >> 4) & 0xf0;
171          g = v & 0xf0;
172          b = (v << 4) & 0xf0;
173          ((uint32_t *) d)[0] = rgb_to_pixel32(r, g, b);
174          s += 2;
175          d += 4;
176      } while (-- width != 0);
177  }
178  
179  /*
180   * 16-bit colour
181   */
draw_line16_32(void * opaque,uint8_t * d,const uint8_t * s,int width,int deststep)182  static void draw_line16_32(void *opaque, uint8_t *d, const uint8_t *s,
183                             int width, int deststep)
184  {
185      uint16_t v;
186      uint8_t r, g, b;
187  
188      do {
189          v = lduw_le_p((void *) s);
190          r = (v >> 8) & 0xf8;
191          g = (v >> 3) & 0xfc;
192          b = (v << 3) & 0xf8;
193          ((uint32_t *) d)[0] = rgb_to_pixel32(r, g, b);
194          s += 2;
195          d += 4;
196      } while (-- width != 0);
197  }
198  
omap_update_display(void * opaque)199  static void omap_update_display(void *opaque)
200  {
201      struct omap_lcd_panel_s *omap_lcd = opaque;
202      DisplaySurface *surface;
203      drawfn draw_line;
204      int size, height, first, last;
205      int width, linesize, step, bpp, frame_offset;
206      hwaddr frame_base;
207  
208      if (!omap_lcd || omap_lcd->plm == 1 || !omap_lcd->enable) {
209          return;
210      }
211  
212      surface = qemu_console_surface(omap_lcd->con);
213      if (!surface_bits_per_pixel(surface)) {
214          return;
215      }
216  
217      frame_offset = 0;
218      if (omap_lcd->plm != 2) {
219          cpu_physical_memory_read(
220                  omap_lcd->dma->phys_framebuffer[omap_lcd->dma->current_frame],
221                  omap_lcd->palette, 0x200);
222          switch (omap_lcd->palette[0] >> 12 & 7) {
223          case 3 ... 7:
224              frame_offset += 0x200;
225              break;
226          default:
227              frame_offset += 0x20;
228          }
229      }
230  
231      /* Colour depth */
232      switch ((omap_lcd->palette[0] >> 12) & 7) {
233      case 1:
234          draw_line = draw_line2_32;
235          bpp = 2;
236          break;
237  
238      case 2:
239          draw_line = draw_line4_32;
240          bpp = 4;
241          break;
242  
243      case 3:
244          draw_line = draw_line8_32;
245          bpp = 8;
246          break;
247  
248      case 4 ... 7:
249          if (!omap_lcd->tft)
250              draw_line = draw_line12_32;
251          else
252              draw_line = draw_line16_32;
253          bpp = 16;
254          break;
255  
256      default:
257          /* Unsupported at the moment.  */
258          return;
259      }
260  
261      /* Resolution */
262      width = omap_lcd->width;
263      if (width != surface_width(surface) ||
264          omap_lcd->height != surface_height(surface)) {
265          qemu_console_resize(omap_lcd->con,
266                              omap_lcd->width, omap_lcd->height);
267          surface = qemu_console_surface(omap_lcd->con);
268          omap_lcd->invalidate = 1;
269      }
270  
271      if (omap_lcd->dma->current_frame == 0)
272          size = omap_lcd->dma->src_f1_bottom - omap_lcd->dma->src_f1_top;
273      else
274          size = omap_lcd->dma->src_f2_bottom - omap_lcd->dma->src_f2_top;
275  
276      if (frame_offset + ((width * omap_lcd->height * bpp) >> 3) > size + 2) {
277          omap_lcd->sync_error = 1;
278          omap_lcd_interrupts(omap_lcd);
279          omap_lcd->enable = 0;
280          return;
281      }
282  
283      /* Content */
284      frame_base = omap_lcd->dma->phys_framebuffer[
285              omap_lcd->dma->current_frame] + frame_offset;
286      omap_lcd->dma->condition |= 1 << omap_lcd->dma->current_frame;
287      if (omap_lcd->dma->interrupts & 1)
288          qemu_irq_raise(omap_lcd->dma->irq);
289      if (omap_lcd->dma->dual)
290          omap_lcd->dma->current_frame ^= 1;
291  
292      if (!surface_bits_per_pixel(surface)) {
293          return;
294      }
295  
296      first = 0;
297      height = omap_lcd->height;
298      if (omap_lcd->subpanel & (1 << 31)) {
299          if (omap_lcd->subpanel & (1 << 29))
300              first = (omap_lcd->subpanel >> 16) & 0x3ff;
301          else
302              height = (omap_lcd->subpanel >> 16) & 0x3ff;
303          /* TODO: fill the rest of the panel with DPD */
304      }
305  
306      step = width * bpp >> 3;
307      linesize = surface_stride(surface);
308      if (omap_lcd->invalidate) {
309          framebuffer_update_memory_section(&omap_lcd->fbsection,
310                                            omap_lcd->sysmem, frame_base,
311                                            height, step);
312      }
313  
314      framebuffer_update_display(surface, &omap_lcd->fbsection,
315                                 width, height,
316                                 step, linesize, 0,
317                                 omap_lcd->invalidate,
318                                 draw_line, omap_lcd->palette,
319                                 &first, &last);
320  
321      if (first >= 0) {
322          dpy_gfx_update(omap_lcd->con, 0, first, width, last - first + 1);
323      }
324      omap_lcd->invalidate = 0;
325  }
326  
omap_invalidate_display(void * opaque)327  static void omap_invalidate_display(void *opaque) {
328      struct omap_lcd_panel_s *omap_lcd = opaque;
329      omap_lcd->invalidate = 1;
330  }
331  
omap_lcd_update(struct omap_lcd_panel_s * s)332  static void omap_lcd_update(struct omap_lcd_panel_s *s) {
333      if (!s->enable) {
334          s->dma->current_frame = -1;
335          s->sync_error = 0;
336          if (s->plm != 1)
337              s->frame_done = 1;
338          omap_lcd_interrupts(s);
339          return;
340      }
341  
342      if (s->dma->current_frame == -1) {
343          s->frame_done = 0;
344          s->palette_done = 0;
345          s->dma->current_frame = 0;
346      }
347  
348      if (!s->dma->mpu->port[s->dma->src].addr_valid(s->dma->mpu,
349                              s->dma->src_f1_top) ||
350                      !s->dma->mpu->port[
351                      s->dma->src].addr_valid(s->dma->mpu,
352                              s->dma->src_f1_bottom) ||
353                      (s->dma->dual &&
354                       (!s->dma->mpu->port[
355                        s->dma->src].addr_valid(s->dma->mpu,
356                                s->dma->src_f2_top) ||
357                        !s->dma->mpu->port[
358                        s->dma->src].addr_valid(s->dma->mpu,
359                                s->dma->src_f2_bottom)))) {
360          s->dma->condition |= 1 << 2;
361          if (s->dma->interrupts & (1 << 1))
362              qemu_irq_raise(s->dma->irq);
363          s->enable = 0;
364          return;
365      }
366  
367      s->dma->phys_framebuffer[0] = s->dma->src_f1_top;
368      s->dma->phys_framebuffer[1] = s->dma->src_f2_top;
369  
370      if (s->plm != 2 && !s->palette_done) {
371          cpu_physical_memory_read(
372                              s->dma->phys_framebuffer[s->dma->current_frame],
373                              s->palette, 0x200);
374          s->palette_done = 1;
375          omap_lcd_interrupts(s);
376      }
377  }
378  
omap_lcdc_read(void * opaque,hwaddr addr,unsigned size)379  static uint64_t omap_lcdc_read(void *opaque, hwaddr addr, unsigned size)
380  {
381      struct omap_lcd_panel_s *s = opaque;
382  
383      switch (addr) {
384      case 0x00:	/* LCD_CONTROL */
385          return (s->tft << 23) | (s->plm << 20) |
386                  (s->tft << 7) | (s->interrupts << 3) |
387                  (s->mono << 1) | s->enable | s->ctrl | 0xfe000c34;
388  
389      case 0x04:	/* LCD_TIMING0 */
390          return (s->timing[0] << 10) | (s->width - 1) | 0x0000000f;
391  
392      case 0x08:	/* LCD_TIMING1 */
393          return (s->timing[1] << 10) | (s->height - 1);
394  
395      case 0x0c:	/* LCD_TIMING2 */
396          return s->timing[2] | 0xfc000000;
397  
398      case 0x10:	/* LCD_STATUS */
399          return (s->palette_done << 6) | (s->sync_error << 2) | s->frame_done;
400  
401      case 0x14:	/* LCD_SUBPANEL */
402          return s->subpanel;
403  
404      default:
405          break;
406      }
407      OMAP_BAD_REG(addr);
408      return 0;
409  }
410  
omap_lcdc_write(void * opaque,hwaddr addr,uint64_t value,unsigned size)411  static void omap_lcdc_write(void *opaque, hwaddr addr,
412                              uint64_t value, unsigned size)
413  {
414      struct omap_lcd_panel_s *s = opaque;
415  
416      switch (addr) {
417      case 0x00:	/* LCD_CONTROL */
418          s->plm = (value >> 20) & 3;
419          s->tft = (value >> 7) & 1;
420          s->interrupts = (value >> 3) & 3;
421          s->mono = (value >> 1) & 1;
422          s->ctrl = value & 0x01cff300;
423          if (s->enable != (value & 1)) {
424              s->enable = value & 1;
425              omap_lcd_update(s);
426          }
427          break;
428  
429      case 0x04:	/* LCD_TIMING0 */
430          s->timing[0] = value >> 10;
431          s->width = (value & 0x3ff) + 1;
432          break;
433  
434      case 0x08:	/* LCD_TIMING1 */
435          s->timing[1] = value >> 10;
436          s->height = (value & 0x3ff) + 1;
437          break;
438  
439      case 0x0c:	/* LCD_TIMING2 */
440          s->timing[2] = value;
441          break;
442  
443      case 0x10:	/* LCD_STATUS */
444          break;
445  
446      case 0x14:	/* LCD_SUBPANEL */
447          s->subpanel = value & 0xa1ffffff;
448          break;
449  
450      default:
451          OMAP_BAD_REG(addr);
452      }
453  }
454  
455  static const MemoryRegionOps omap_lcdc_ops = {
456      .read = omap_lcdc_read,
457      .write = omap_lcdc_write,
458      .endianness = DEVICE_NATIVE_ENDIAN,
459  };
460  
omap_lcdc_reset(struct omap_lcd_panel_s * s)461  void omap_lcdc_reset(struct omap_lcd_panel_s *s)
462  {
463      s->dma->current_frame = -1;
464      s->plm = 0;
465      s->tft = 0;
466      s->mono = 0;
467      s->enable = 0;
468      s->width = 0;
469      s->height = 0;
470      s->interrupts = 0;
471      s->timing[0] = 0;
472      s->timing[1] = 0;
473      s->timing[2] = 0;
474      s->subpanel = 0;
475      s->palette_done = 0;
476      s->frame_done = 0;
477      s->sync_error = 0;
478      s->invalidate = 1;
479      s->subpanel = 0;
480      s->ctrl = 0;
481  }
482  
483  static const GraphicHwOps omap_ops = {
484      .invalidate  = omap_invalidate_display,
485      .gfx_update  = omap_update_display,
486  };
487  
omap_lcdc_init(MemoryRegion * sysmem,hwaddr base,qemu_irq irq,struct omap_dma_lcd_channel_s * dma,omap_clk clk)488  struct omap_lcd_panel_s *omap_lcdc_init(MemoryRegion *sysmem,
489                                          hwaddr base,
490                                          qemu_irq irq,
491                                          struct omap_dma_lcd_channel_s *dma,
492                                          omap_clk clk)
493  {
494      struct omap_lcd_panel_s *s = g_new0(struct omap_lcd_panel_s, 1);
495  
496      s->irq = irq;
497      s->dma = dma;
498      s->sysmem = sysmem;
499      omap_lcdc_reset(s);
500  
501      memory_region_init_io(&s->iomem, NULL, &omap_lcdc_ops, s, "omap.lcdc", 0x100);
502      memory_region_add_subregion(sysmem, base, &s->iomem);
503  
504      s->con = graphic_console_init(NULL, 0, &omap_ops, s);
505  
506      return s;
507  }
508