drivers/video/mb862xx.c

   1 /*
   2  * (C) Copyright 2007
   3  * DENX Software Engineering, Anatolij Gustschin, agust@denx.de
   4  *
   5  * See file CREDITS for list of people who contributed to this
   6  * project.
   7  *
   8  * This program is free software; you can redistribute it and/or
   9  * modify it under the terms of the GNU General Public License as
  10  * published by the Free Software Foundation; either version 2 of
  11  * the License, or (at your option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  * GNU General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program; if not, write to the Free Software
  20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
  21  * MA 02111-1307 USA
  22  */
  23
  24 /*
  25  * mb862xx.c - Graphic interface for Fujitsu CoralP/Lime
  26  * PCI and video mode code was derived from smiLynxEM driver.
  27  */
  28
  29 #include <common.h>
  30
  31 #include <asm/io.h>
  32 #include <pci.h>
  33 #include <video_fb.h>
  34 #include "videomodes.h"
  35 #include <mb862xx.h>
  36
  37 #if defined(CONFIG_POST)
  38 #include <post.h>
  39 #endif
  40
  41 /*
  42  * Graphic Device
  43  */
  44 GraphicDevice mb862xx;
  45
  46 /*
  47  * 32MB external RAM - 256K Chip MMIO = 0x1FC0000 ;
  48  */
  49 #define VIDEO_MEM_SIZE  0x01FC0000
  50
  51 #if defined(CONFIG_PCI)
  52 #if defined(CONFIG_VIDEO_CORALP)
  53
  54 static struct pci_device_id supported[] = {
  55         { PCI_VENDOR_ID_FUJITSU, PCI_DEVICE_ID_CORAL_P },
  56         { PCI_VENDOR_ID_FUJITSU, PCI_DEVICE_ID_CORAL_PA },
  57         { }
  58 };
  59
  60 /* Internal clock frequency divider table, index is mode number */
  61 unsigned int fr_div[] = { 0x00000f00, 0x00000900, 0x00000500 };
  62 #endif
  63 #endif
  64
  65 #if defined(CONFIG_VIDEO_CORALP)
  66 #define rd_io           in32r
  67 #define wr_io           out32r
  68 #else
  69 #define rd_io(addr)     in_be32((volatile unsigned *)(addr))
  70 #define wr_io(addr, val)        out_be32((volatile unsigned *)(addr), (val))
  71 #endif
  72
  73 #define HOST_RD_REG(off)        rd_io((dev->frameAdrs + GC_HOST_BASE + (off)))
  74 #define HOST_WR_REG(off, val)   wr_io((dev->frameAdrs + GC_HOST_BASE + (off)), \
  75                                       (val))
  76 #define DISP_RD_REG(off)        rd_io((dev->frameAdrs + GC_DISP_BASE + (off)))
  77 #define DISP_WR_REG(off, val)   wr_io((dev->frameAdrs + GC_DISP_BASE + (off)), \
  78                                       (val))
  79 #define DE_RD_REG(off)          rd_io((dev->dprBase + (off)))
  80 #define DE_WR_REG(off, val)     wr_io((dev->dprBase + (off)), (val))
  81
  82 #if defined(CONFIG_VIDEO_CORALP)
  83 #define DE_WR_FIFO(val)         wr_io((dev->dprBase + (GC_GEO_FIFO)), (val))
  84 #else
  85 #define DE_WR_FIFO(val)         wr_io((dev->dprBase + (GC_FIFO)), (val))
  86 #endif
  87
  88 #define L0PAL_WR_REG(idx, val)  wr_io((dev->frameAdrs + \
  89                                        (GC_DISP_BASE | GC_L0PAL0) + \
  90                                        ((idx) << 2)), (val))
  91
  92 #if defined(CONFIG_VIDEO_MB862xx_ACCEL)
  93 static void gdc_sw_reset (void)
  94 {
  95         GraphicDevice *dev = &mb862xx;
  96
  97         HOST_WR_REG (GC_SRST, 0x1);
  98         udelay (500);
  99         video_hw_init ();
 100 }
 101
 102
 103 static void de_wait (void)
 104 {
 105         GraphicDevice *dev = &mb862xx;
 106         int lc = 0x10000;
 107
 108         /*
 109          * Sync with software writes to framebuffer,
 110          * try to reset if engine locked
 111          */
 112         while (DE_RD_REG (GC_CTR) & 0x00000131)
 113                 if (lc-- < 0) {
 114                         gdc_sw_reset ();
 115                         puts ("gdc reset done after drawing engine lock.\n");
 116                         break;
 117                 }
 118 }
 119
 120 static void de_wait_slots (int slots)
 121 {
 122         GraphicDevice *dev = &mb862xx;
 123         int lc = 0x10000;
 124
 125         /* Wait for free fifo slots */
 126         while (DE_RD_REG (GC_IFCNT) < slots)
 127                 if (lc-- < 0) {
 128                         gdc_sw_reset ();
 129                         puts ("gdc reset done after drawing engine lock.\n");
 130                         break;
 131                 }
 132 }
 133 #endif
 134
 135 #if !defined(CONFIG_VIDEO_CORALP)
 136 static void board_disp_init (void)
 137 {
 138         GraphicDevice *dev = &mb862xx;
 139         const gdc_regs *regs = board_get_regs ();
 140
 141         while (regs->index) {
 142                 DISP_WR_REG (regs->index, regs->value);
 143                 regs++;
 144         }
 145 }
 146 #endif
 147
 148 /*
 149  * Init drawing engine if accel enabled.
 150  * Also clears visible framebuffer.
 151  */
 152 static void de_init (void)
 153 {
 154         GraphicDevice *dev = &mb862xx;
 155 #if defined(CONFIG_VIDEO_MB862xx_ACCEL)
 156         int cf = (dev->gdfBytesPP == 1) ? 0x0000 : 0x8000;
 157
 158         dev->dprBase = dev->frameAdrs + GC_DRAW_BASE;
 159
 160         /* Setup mode and fbbase, xres, fg, bg */
 161         de_wait_slots (2);
 162         DE_WR_FIFO (0xf1010108);
 163         DE_WR_FIFO (cf | 0x0300);
 164         DE_WR_REG (GC_FBR, 0x0);
 165         DE_WR_REG (GC_XRES, dev->winSizeX);
 166         DE_WR_REG (GC_FC, 0x0);
 167         DE_WR_REG (GC_BC, 0x0);
 168         /* Reset clipping */
 169         DE_WR_REG (GC_CXMIN, 0x0);
 170         DE_WR_REG (GC_CXMAX, dev->winSizeX);
 171         DE_WR_REG (GC_CYMIN, 0x0);
 172         DE_WR_REG (GC_CYMAX, dev->winSizeY);
 173
 174         /* Clear framebuffer using drawing engine */
 175         de_wait_slots (3);
 176         DE_WR_FIFO (0x09410000);
 177         DE_WR_FIFO (0x00000000);
 178         DE_WR_FIFO (dev->winSizeY << 16 | dev->winSizeX);
 179         /* sync with SW access to framebuffer */
 180         de_wait ();
 181 #else
 182         unsigned int i, *p;
 183
 184         i = dev->winSizeX * dev->winSizeY;
 185         p = (unsigned int *)dev->frameAdrs;
 186         while (i--)
 187                 *p++ = 0;
 188 #endif
 189 }
 190
 191 #if defined(CONFIG_VIDEO_CORALP)
 192 /* use CCF and MMR parameters for Coral-P Eval. Board as default */
 193 #ifndef CONFIG_SYS_MB862xx_CCF
 194 #define CONFIG_SYS_MB862xx_CCF  0x00090000
 195 #endif
 196 #ifndef CONFIG_SYS_MB862xx_MMR
 197 #define CONFIG_SYS_MB862xx_MMR  0x11d7fa13
 198 #endif
 199
 200 unsigned int pci_video_init (void)
 201 {
 202         GraphicDevice *dev = &mb862xx;
 203         pci_dev_t devbusfn;
 204         u16 device;
 205
 206         if ((devbusfn = pci_find_devices (supported, 0)) < 0) {
 207                 puts("controller not present\n");
 208                 return 0;
 209         }
 210
 211         /* PCI setup */
 212         pci_write_config_dword (devbusfn, PCI_COMMAND,
 213                                 (PCI_COMMAND_MEMORY | PCI_COMMAND_IO));
 214         pci_read_config_dword (devbusfn, PCI_BASE_ADDRESS_0, &dev->frameAdrs);
 215         dev->frameAdrs = pci_mem_to_phys (devbusfn, dev->frameAdrs);
 216
 217         if (dev->frameAdrs == 0) {
 218                 puts ("PCI config: failed to get base address\n");
 219                 return 0;
 220         }
 221
 222         dev->pciBase = dev->frameAdrs;
 223
 224         puts("Coral-");
 225
 226         pci_read_config_word(devbusfn, PCI_DEVICE_ID, &device);
 227         switch (device) {
 228         case PCI_DEVICE_ID_CORAL_P:
 229                 puts("P\n");
 230                 break;
 231         case PCI_DEVICE_ID_CORAL_PA:
 232                 puts("PA\n");
 233                 break;
 234         default:
 235                 puts("Unknown\n");
 236                 return 0;
 237         }
 238
 239         /* Setup clocks and memory mode for Coral-P(A) */
 240         HOST_WR_REG(GC_CCF, CONFIG_SYS_MB862xx_CCF);
 241         udelay (200);
 242         HOST_WR_REG(GC_MMR, CONFIG_SYS_MB862xx_MMR);
 243         udelay (100);
 244         return dev->frameAdrs;
 245 }
 246
 247 unsigned int card_init (void)
 248 {
 249         GraphicDevice *dev = &mb862xx;
 250         unsigned int cf, videomode, div = 0;
 251         unsigned long t1, hsync, vsync;
 252         char *penv;
 253         int tmp, i, bpp;
 254         struct ctfb_res_modes *res_mode;
 255         struct ctfb_res_modes var_mode;
 256
 257         memset (dev, 0, sizeof (GraphicDevice));
 258
 259         if (!pci_video_init ())
 260                 return 0;
 261
 262         tmp = 0;
 263         videomode = 0x310;
 264         /* get video mode via environment */
 265         if ((penv = getenv ("videomode")) != NULL) {
 266                 /* decide if it is a string */
 267                 if (penv[0] <= '9') {
 268                         videomode = (int) simple_strtoul (penv, NULL, 16);
 269                         tmp = 1;
 270                 }
 271         } else {
 272                 tmp = 1;
 273         }
 274
 275         if (tmp) {
 276                 /* parameter are vesa modes, search params */
 277                 for (i = 0; i < VESA_MODES_COUNT; i++) {
 278                         if (vesa_modes[i].vesanr == videomode)
 279                                 break;
 280                 }
 281                 if (i == VESA_MODES_COUNT) {
 282                         printf ("\tno VESA Mode found, fallback to mode 0x%x\n",
 283                                 videomode);
 284                         i = 0;
 285                 }
 286                 res_mode = (struct ctfb_res_modes *)
 287                            &res_mode_init[vesa_modes[i].resindex];
 288                 if (vesa_modes[i].resindex > 2) {
 289                         puts ("\tUnsupported resolution, using default\n");
 290                         bpp = vesa_modes[1].bits_per_pixel;
 291                         div = fr_div[1];
 292                 }
 293                 bpp = vesa_modes[i].bits_per_pixel;
 294                 div = fr_div[vesa_modes[i].resindex];
 295         } else {
 296                 res_mode = (struct ctfb_res_modes *) &var_mode;
 297                 bpp = video_get_params (res_mode, penv);
 298         }
 299
 300         /* calculate hsync and vsync freq (info only) */
 301         t1 = (res_mode->left_margin + res_mode->xres +
 302               res_mode->right_margin + res_mode->hsync_len) / 8;
 303         t1 *= 8;
 304         t1 *= res_mode->pixclock;
 305         t1 /= 1000;
 306         hsync = 1000000000L / t1;
 307         t1 *= (res_mode->upper_margin + res_mode->yres +
 308                res_mode->lower_margin + res_mode->vsync_len);
 309         t1 /= 1000;
 310         vsync = 1000000000L / t1;
 311
 312         /* fill in Graphic device struct */
 313         sprintf (dev->modeIdent, "%dx%dx%d %ldkHz %ldHz", res_mode->xres,
 314                  res_mode->yres, bpp, (hsync / 1000), (vsync / 1000));
 315         printf ("\t%s\n", dev->modeIdent);
 316         dev->winSizeX = res_mode->xres;
 317         dev->winSizeY = res_mode->yres;
 318         dev->memSize = VIDEO_MEM_SIZE;
 319
 320         switch (bpp) {
 321         case 8:
 322                 dev->gdfIndex = GDF__8BIT_INDEX;
 323                 dev->gdfBytesPP = 1;
 324                 break;
 325         case 15:
 326         case 16:
 327                 dev->gdfIndex = GDF_15BIT_555RGB;
 328                 dev->gdfBytesPP = 2;
 329                 break;
 330         default:
 331                 printf ("\t%d bpp configured, but only 8,15 and 16 supported\n",
 332                         bpp);
 333                 puts ("\tfallback to 15bpp\n");
 334                 dev->gdfIndex = GDF_15BIT_555RGB;
 335                 dev->gdfBytesPP = 2;
 336         }
 337
 338         /* Setup dot clock (internal pll, division rate) */
 339         DISP_WR_REG (GC_DCM1, div);
 340         /* L0 init */
 341         cf = (dev->gdfBytesPP == 1) ? 0x00000000 : 0x80000000;
 342         DISP_WR_REG (GC_L0M, ((dev->winSizeX * dev->gdfBytesPP) / 64) << 16 |
 343                              (dev->winSizeY - 1) | cf);
 344         DISP_WR_REG (GC_L0OA0, 0x0);
 345         DISP_WR_REG (GC_L0DA0, 0x0);
 346         DISP_WR_REG (GC_L0DY_L0DX, 0x0);
 347         DISP_WR_REG (GC_L0EM, 0x0);
 348         DISP_WR_REG (GC_L0WY_L0WX, 0x0);
 349         DISP_WR_REG (GC_L0WH_L0WW, (dev->winSizeY - 1) << 16 | dev->winSizeX);
 350
 351         /* Display timing init */
 352         DISP_WR_REG (GC_HTP_A, (dev->winSizeX +
 353                                 res_mode->left_margin +
 354                                 res_mode->right_margin +
 355                                 res_mode->hsync_len - 1) << 16);
 356         DISP_WR_REG (GC_HDB_HDP_A, (dev->winSizeX - 1) << 16 |
 357                                    (dev->winSizeX - 1));
 358         DISP_WR_REG (GC_VSW_HSW_HSP_A,  (res_mode->vsync_len - 1) << 24 |
 359                                         (res_mode->hsync_len - 1) << 16 |
 360                                         (dev->winSizeX +
 361                                          res_mode->right_margin - 1));
 362         DISP_WR_REG (GC_VTR_A, (dev->winSizeY + res_mode->lower_margin +
 363                                 res_mode->upper_margin +
 364                                 res_mode->vsync_len - 1) << 16);
 365         DISP_WR_REG (GC_VDP_VSP_A, (dev->winSizeY-1) << 16 |
 366                                    (dev->winSizeY +
 367                                     res_mode->lower_margin - 1));
 368         DISP_WR_REG (GC_WY_WX, 0x0);
 369         DISP_WR_REG (GC_WH_WW, dev->winSizeY << 16 | dev->winSizeX);
 370         /* Display enable, L0 layer */
 371         DISP_WR_REG (GC_DCM1, 0x80010000 | div);
 372
 373         return dev->frameAdrs;
 374 }
 375 #endif
 376
 377
 378 #if !defined(CONFIG_VIDEO_CORALP)
 379 int mb862xx_probe(unsigned int addr)
 380 {
 381         GraphicDevice *dev = &mb862xx;
 382         unsigned int reg;
 383
 384         dev->frameAdrs = addr;
 385         dev->dprBase = dev->frameAdrs + GC_DRAW_BASE;
 386
 387         /* Try to access GDC ID/Revision registers */
 388         reg = HOST_RD_REG (GC_CID);
 389         reg = HOST_RD_REG (GC_CID);
 390         if (reg == 0x303) {
 391                 reg = DE_RD_REG(GC_REV);
 392                 reg = DE_RD_REG(GC_REV);
 393                 if ((reg & ~0xff) == 0x20050100)
 394                         return MB862XX_TYPE_LIME;
 395         }
 396
 397         return 0;
 398 }
 399 #endif
 400
 401 void *video_hw_init (void)
 402 {
 403         GraphicDevice *dev = &mb862xx;
 404
 405         puts ("Video: Fujitsu ");
 406
 407         memset (dev, 0, sizeof (GraphicDevice));
 408
 409 #if defined(CONFIG_VIDEO_CORALP)
 410         if (card_init () == 0)
 411                 return NULL;
 412 #else
 413         /*
 414          * Preliminary init of the onboard graphic controller,
 415          * retrieve base address
 416          */
 417         if ((dev->frameAdrs = board_video_init ()) == 0) {
 418                 puts ("Controller not found!\n");
 419                 return NULL;
 420         } else {
 421                 puts ("Lime\n");
 422
 423                 /* Set Change of Clock Frequency Register */
 424                 HOST_WR_REG (GC_CCF, CONFIG_SYS_MB862xx_CCF);
 425                 /* Delay required */
 426                 udelay(300);
 427                 /* Set Memory I/F Mode Register) */
 428                 HOST_WR_REG (GC_MMR, CONFIG_SYS_MB862xx_MMR);
 429         }
 430 #endif
 431
 432         de_init ();
 433
 434 #if !defined(CONFIG_VIDEO_CORALP)
 435         board_disp_init ();
 436 #endif
 437
 438 #if (defined(CONFIG_LWMON5) || \
 439      defined(CONFIG_SOCRATES)) && !(CONFIG_POST & CONFIG_SYS_POST_SYSMON)
 440         /* Lamp on */
 441         board_backlight_switch (1);
 442 #endif
 443
 444         return dev;
 445 }
 446
 447 /*
 448  * Set a RGB color in the LUT
 449  */
 450 void video_set_lut (unsigned int index, unsigned char r,
 451                     unsigned char g, unsigned char b)
 452 {
 453         GraphicDevice *dev = &mb862xx;
 454
 455         L0PAL_WR_REG (index, (r << 16) | (g << 8) | (b));
 456 }
 457
 458 #if defined(CONFIG_VIDEO_MB862xx_ACCEL)
 459 /*
 460  * Drawing engine Fill and BitBlt screen region
 461  */
 462 void video_hw_rectfill (unsigned int bpp, unsigned int dst_x,
 463                         unsigned int dst_y, unsigned int dim_x,
 464                         unsigned int dim_y, unsigned int color)
 465 {
 466         GraphicDevice *dev = &mb862xx;
 467
 468         de_wait_slots (3);
 469         DE_WR_REG (GC_FC, color);
 470         DE_WR_FIFO (0x09410000);
 471         DE_WR_FIFO ((dst_y << 16) | dst_x);
 472         DE_WR_FIFO ((dim_y << 16) | dim_x);
 473         de_wait ();
 474 }
 475
 476 void video_hw_bitblt (unsigned int bpp, unsigned int src_x,
 477                       unsigned int src_y, unsigned int dst_x,
 478                       unsigned int dst_y, unsigned int width,
 479                       unsigned int height)
 480 {
 481         GraphicDevice *dev = &mb862xx;
 482         unsigned int ctrl = 0x0d000000L;
 483
 484         if (src_x >= dst_x && src_y >= dst_y)
 485                 ctrl |= 0x00440000L;
 486         else if (src_x >= dst_x && src_y <= dst_y)
 487                 ctrl |= 0x00460000L;
 488         else if (src_x <= dst_x && src_y >= dst_y)
 489                 ctrl |= 0x00450000L;
 490         else
 491                 ctrl |= 0x00470000L;
 492
 493         de_wait_slots (4);
 494         DE_WR_FIFO (ctrl);
 495         DE_WR_FIFO ((src_y << 16) | src_x);
 496         DE_WR_FIFO ((dst_y << 16) | dst_x);
 497         DE_WR_FIFO ((height << 16) | width);
 498         de_wait (); /* sync */
 499 }
 500 #endif