platform/gp2x/vid_mmsp2.c

   1 /*
   2  * (C) Gražvydas "notaz" Ignotas, 2006-2009,2013
   3  *
   4  * This work is licensed under the terms of any of these licenses
   5  * (at your option):
   6  *  - GNU GPL, version 2 or later.
   7  *  - GNU LGPL, version 2.1 or later.
   8  *  - MAME license.
   9  * See the COPYING file in the top-level directory.
  10  */
  11
  12 #include <stdio.h>
  13 #include <stdlib.h>
  14 #include <string.h>
  15 #include <linux/fb.h>
  16 #include <sys/mman.h>
  17
  18 #include "../libpicofe/gp2x/plat_gp2x.h"
  19 #include "../libpicofe/gp2x/soc.h"
  20 #include "../common/arm_utils.h"
  21 #include "../common/emu.h"
  22 #include "plat.h"
  23
  24 #define FRAMEBUFF_SIZE  0x30000
  25 #define FRAMEBUFF_WHOLESIZE (FRAMEBUFF_SIZE*4) // 320*240*2 + some more
  26 #define FRAMEBUFF_ADDR0 (0x4000000 - FRAMEBUFF_WHOLESIZE)
  27 #define FRAMEBUFF_ADDR1 (FRAMEBUFF_ADDR0 + FRAMEBUFF_SIZE)
  28 #define FRAMEBUFF_ADDR2 (FRAMEBUFF_ADDR1 + FRAMEBUFF_SIZE)
  29 #define FRAMEBUFF_ADDR3 (FRAMEBUFF_ADDR2 + FRAMEBUFF_SIZE)
  30
  31 static const int gp2x_screenaddrs[4] = { FRAMEBUFF_ADDR0, FRAMEBUFF_ADDR1, FRAMEBUFF_ADDR2, FRAMEBUFF_ADDR3 };
  32 static int gp2x_screenaddrs_use[4];
  33
  34 static unsigned short gp2x_screenaddr_old[4];
  35 static int screensel;
  36
  37 static void gp2x_video_flip_(void)
  38 {
  39         unsigned short lsw = (unsigned short) gp2x_screenaddrs_use[screensel&3];
  40         unsigned short msw = (unsigned short)(gp2x_screenaddrs_use[screensel&3] >> 16);
  41
  42         memregs[0x2910>>1] = msw;
  43         memregs[0x2914>>1] = msw;
  44         memregs[0x290E>>1] = lsw;
  45         memregs[0x2912>>1] = lsw;
  46
  47         // jump to other buffer:
  48         g_screen_ptr = gp2x_screens[++screensel&3];
  49 }
  50
  51 /* doulblebuffered flip */
  52 static void gp2x_video_flip2_(void)
  53 {
  54         unsigned short msw = (unsigned short)(gp2x_screenaddrs_use[screensel&1] >> 16);
  55
  56         memregs[0x2910>>1] = msw;
  57         memregs[0x2914>>1] = msw;
  58         memregs[0x290E>>1] = 0;
  59         memregs[0x2912>>1] = 0;
  60
  61         // jump to other buffer:
  62         g_screen_ptr = gp2x_screens[++screensel&1];
  63 }
  64
  65 static void gp2x_video_changemode_ll_(int bpp)
  66 {
  67 printf("changemode %d\n", bpp);
  68         memregs[0x28DA>>1] = (((bpp+1)/8)<<9)|0xAB; /*8/15/16/24bpp...*/
  69         memregs[0x290C>>1] = 320*((bpp+1)/8); /*line width in bytes*/
  70 }
  71
  72 static void gp2x_video_setpalette_(int *pal, int len)
  73 {
  74         unsigned short *g = (unsigned short *)pal;
  75         volatile unsigned short *memreg = &memregs[0x295A>>1];
  76
  77         memregs[0x2958>>1] = 0;
  78
  79         len *= 2;
  80         while (len--)
  81                 *memreg = *g++;
  82 }
  83
  84 static void gp2x_video_RGB_setscaling_(int ln_offs, int W, int H)
  85 {
  86         float escalaw, escalah;
  87         int bpp = (memregs[0x28DA>>1]>>9)&0x3;
  88         unsigned short scalw;
  89
  90         // set offset
  91         gp2x_screenaddrs_use[0] = gp2x_screenaddrs[0] + ln_offs * 320 * bpp;
  92         gp2x_screenaddrs_use[1] = gp2x_screenaddrs[1] + ln_offs * 320 * bpp;
  93         gp2x_screenaddrs_use[2] = gp2x_screenaddrs[2] + ln_offs * 320 * bpp;
  94         gp2x_screenaddrs_use[3] = gp2x_screenaddrs[3] + ln_offs * 320 * bpp;
  95
  96         escalaw = 1024.0; // RGB Horiz LCD
  97         escalah = 320.0; // RGB Vert LCD
  98
  99         if (memregs[0x2800>>1]&0x100) //TV-Out
 100         {
 101                 escalaw=489.0; // RGB Horiz TV (PAL, NTSC)
 102                 if (memregs[0x2818>>1]  == 287) //PAL
 103                         escalah=274.0; // RGB Vert TV PAL
 104                 else if (memregs[0x2818>>1]  == 239) //NTSC
 105                         escalah=331.0; // RGB Vert TV NTSC
 106         }
 107
 108         // scale horizontal
 109         scalw = (unsigned short)((float)escalaw *(W/320.0));
 110         /* if there is no horizontal scaling, vertical doesn't work.
 111          * Here is a nasty wrokaround... */
 112         if (H != 240 && W == 320) scalw--;
 113         memregs[0x2906>>1]=scalw;
 114         // scale vertical
 115         memregl[0x2908>>2]=(unsigned long)((float)escalah *bpp *(H/240.0));
 116 }
 117
 118 static void gp2x_video_wait_vsync_(void)
 119 {
 120         unsigned short v = memregs[0x1182>>1];
 121         while (!((v ^ memregs[0x1182>>1]) & 0x10))
 122                 spend_cycles(1024);
 123 }
 124
 125
 126 void vid_mmsp2_init(void)
 127 {
 128         int i;
 129
 130         gp2x_screens[0] = mmap(0, FRAMEBUFF_WHOLESIZE, PROT_WRITE, MAP_SHARED,
 131                 memdev, gp2x_screenaddrs[0]);
 132         if (gp2x_screens[0] == MAP_FAILED)
 133         {
 134                 perror("mmap(g_screen_ptr)");
 135                 exit(1);
 136         }
 137         printf("framebuffers:\n");
 138         printf("  %08x -> %p\n", gp2x_screenaddrs[0], gp2x_screens[0]);
 139         for (i = 1; i < 4; i++)
 140         {
 141                 gp2x_screens[i] = (char *) gp2x_screens[i - 1] + FRAMEBUFF_SIZE;
 142                 printf("  %08x -> %p\n", gp2x_screenaddrs[i], gp2x_screens[i]);
 143         }
 144
 145         g_screen_ptr = gp2x_screens[0];
 146         screensel = 0;
 147
 148         gp2x_screenaddr_old[0] = memregs[0x290E>>1];
 149         gp2x_screenaddr_old[1] = memregs[0x2910>>1];
 150         gp2x_screenaddr_old[2] = memregs[0x2912>>1];
 151         gp2x_screenaddr_old[3] = memregs[0x2914>>1];
 152
 153         memcpy(gp2x_screenaddrs_use, gp2x_screenaddrs, sizeof(gp2x_screenaddrs));
 154
 155         gp2x_video_flip = gp2x_video_flip_;
 156         gp2x_video_flip2 = gp2x_video_flip2_;
 157         gp2x_video_changemode_ll = gp2x_video_changemode_ll_;
 158         gp2x_video_setpalette = gp2x_video_setpalette_;
 159         gp2x_video_RGB_setscaling = gp2x_video_RGB_setscaling_;
 160         gp2x_video_wait_vsync = gp2x_video_wait_vsync_;
 161 }
 162
 163 void vid_mmsp2_finish(void)
 164 {
 165         gp2x_video_RGB_setscaling_(0, 320, 240);
 166         gp2x_video_changemode_ll_(16);
 167
 168         memregs[0x290E>>1] = gp2x_screenaddr_old[0];
 169         memregs[0x2910>>1] = gp2x_screenaddr_old[1];
 170         memregs[0x2912>>1] = gp2x_screenaddr_old[2];
 171         memregs[0x2914>>1] = gp2x_screenaddr_old[3];
 172
 173         munmap(gp2x_screens[0], FRAMEBUFF_WHOLESIZE);
 174 }