gp2x/soc_pollux.c

   1 #include <stdio.h>
   2 #include <stdlib.h>
   3 #include <string.h>
   4 #include <math.h>
   5 #include <sys/types.h>
   6 #include <sys/stat.h>
   7 #include <fcntl.h>
   8 #include <sys/mman.h>
   9 #include <unistd.h>
  10 #include <sys/ioctl.h>
  11 #include <linux/fb.h>
  12
  13 #include "soc.h"
  14 #include "plat_gp2x.h"
  15 #include "../common/emu.h"
  16 #include "../common/arm_utils.h"
  17 #include "pollux_set.h"
  18
  19 static volatile unsigned short *memregs;
  20 static volatile unsigned long  *memregl;
  21 static int memdev = -1;
  22
  23 extern void *gp2x_screens[4];
  24
  25 #define fb_buf_count 4
  26 static unsigned int fb_paddr[fb_buf_count];
  27 static int fb_work_buf;
  28 static int fbdev = -1;
  29
  30 static char cpuclk_was_changed = 0;
  31 static unsigned short memtimex_old[2];
  32 static unsigned int pllsetreg0;
  33
  34
  35 /* video stuff */
  36 static void pollux_video_flip(int buf_count)
  37 {
  38         memregl[0x406C>>2] = fb_paddr[fb_work_buf];
  39         memregl[0x4058>>2] |= 0x10;
  40         fb_work_buf++;
  41         if (fb_work_buf >= buf_count)
  42                 fb_work_buf = 0;
  43         g_screen_ptr = gp2x_screens[fb_work_buf];
  44 }
  45
  46 static void gp2x_video_flip_(void)
  47 {
  48         pollux_video_flip(fb_buf_count);
  49 }
  50
  51 /* doulblebuffered flip */
  52 static void gp2x_video_flip2_(void)
  53 {
  54         pollux_video_flip(2);
  55 }
  56
  57 static void gp2x_video_changemode_ll_(int bpp)
  58 {
  59         int code = 0, bytes = 2;
  60         unsigned int r;
  61         switch (bpp)
  62         {
  63                 case 8:
  64                         code = 0x443a;
  65                         bytes = 1;
  66                         break;
  67
  68                 case 15:
  69                 case 16:
  70                         code = 0x4432;
  71                         bytes = 2;
  72                         break;
  73
  74                 default:
  75                         printf("unhandled bpp request: %d\n", bpp);
  76                         return;
  77         }
  78
  79         memregl[0x405c>>2] = bytes;
  80         memregl[0x4060>>2] = bytes * 320;
  81
  82         r = memregl[0x4058>>2];
  83         r = (r & 0xffff) | (code << 16) | 0x10;
  84         memregl[0x4058>>2] = r;
  85 }
  86
  87 static void gp2x_video_setpalette_(int *pal, int len)
  88 {
  89         /* pollux palette is 16bpp only.. */
  90         int i;
  91         for (i = 0; i < len; i++)
  92         {
  93                 int c = pal[i];
  94                 c = ((c >> 8) & 0xf800) | ((c >> 5) & 0x07c0) | ((c >> 3) & 0x001f);
  95                 memregl[0x4070>>2] = (i << 24) | c;
  96         }
  97 }
  98
  99 static void gp2x_video_RGB_setscaling_(int ln_offs, int W, int H)
 100 {
 101         /* maybe a job for 3d hardware? */
 102 }
 103
 104 static void gp2x_video_wait_vsync_(void)
 105 {
 106         while (!(memregl[0x308c>>2] & (1 << 10)));
 107                 spend_cycles(128);
 108         memregl[0x308c>>2] |= 1 << 10;
 109 }
 110
 111 /* CPU clock */
 112 static void gp2x_set_cpuclk_(unsigned int mhz)
 113 {
 114         char buff[24];
 115         snprintf(buff, sizeof(buff), "cpuclk=%u", mhz);
 116         pollux_set(memregs, buff);
 117
 118         cpuclk_was_changed = 1;
 119 }
 120
 121 /* misc */
 122 static void pollux_set_fromenv(const char *env_var)
 123 {
 124         const char *set_string;
 125         set_string = getenv(env_var);
 126         if (set_string)
 127                 pollux_set(memregs, set_string);
 128         else
 129                 printf("env var %s not defined.\n", env_var);
 130 }
 131
 132 /* RAM timings */
 133 static void set_ram_timings_(void)
 134 {
 135         pollux_set_fromenv("POLLUX_RAM_TIMINGS");
 136 }
 137
 138 static void unset_ram_timings_(void)
 139 {
 140         int i;
 141
 142         memregs[0x14802>>1] = memtimex_old[0];
 143         memregs[0x14804>>1] = memtimex_old[1] | 0x8000;
 144
 145         for (i = 0; i < 0x100000; i++)
 146                 if (!(memregs[0x14804>>1] & 0x8000))
 147                         break;
 148
 149         printf("RAM timings reset to startup values.\n");
 150 }
 151
 152 /* LCD refresh */
 153 static void set_lcd_custom_rate_(int is_pal)
 154 {
 155         char buff[32];
 156
 157         snprintf(buff, sizeof(buff), "POLLUX_LCD_TIMINGS_%s", is_pal ? "PAL" : "NTSC");
 158         pollux_set_fromenv(buff);
 159 }
 160
 161 static void unset_lcd_custom_rate_(void)
 162 {
 163 }
 164
 165 static void set_lcd_gamma_(int g100, int A_SNs_curve)
 166 {
 167         /* hm, the LCD possibly can do it (but not POLLUX) */
 168 }
 169
 170 void pollux_init(void)
 171 {
 172         struct fb_fix_screeninfo fbfix;
 173         int i, ret;
 174
 175         memdev = open("/dev/mem", O_RDWR);
 176         if (memdev == -1) {
 177                 perror("open(/dev/mem) failed");
 178                 exit(1);
 179         }
 180
 181         memregs = mmap(0, 0x20000, PROT_READ|PROT_WRITE, MAP_SHARED, memdev, 0xc0000000);
 182         if (memregs == MAP_FAILED) {
 183                 perror("mmap(memregs) failed");
 184                 exit(1);
 185         }
 186         memregl = (volatile void *)memregs;
 187
 188         fbdev = open("/dev/fb0", O_RDWR);
 189         if (fbdev < 0) {
 190                 perror("can't open fbdev");
 191                 exit(1);
 192         }
 193
 194         ret = ioctl(fbdev, FBIOGET_FSCREENINFO, &fbfix);
 195         if (ret == -1) {
 196                 perror("ioctl(fbdev) failed");
 197                 exit(1);
 198         }
 199
 200         printf("framebuffer: \"%s\" @ %08lx\n", fbfix.id, fbfix.smem_start);
 201         fb_paddr[0] = fbfix.smem_start;
 202
 203         gp2x_screens[0] = mmap(0, 320*240*2*fb_buf_count, PROT_READ|PROT_WRITE,
 204                         MAP_SHARED, memdev, fb_paddr[0]);
 205         if (gp2x_screens[0] == MAP_FAILED)
 206         {
 207                 perror("mmap(gp2x_screens) failed");
 208                 exit(1);
 209         }
 210         memset(gp2x_screens[0], 0, 320*240*2*fb_buf_count);
 211
 212         printf("  %p -> %08x\n", gp2x_screens[0], fb_paddr[0]);
 213         for (i = 1; i < fb_buf_count; i++)
 214         {
 215                 fb_paddr[i] = fb_paddr[i-1] + 320*240*2;
 216                 gp2x_screens[i] = (char *)gp2x_screens[i-1] + 320*240*2;
 217                 printf("  %p -> %08x\n", gp2x_screens[i], fb_paddr[i]);
 218         }
 219         fb_work_buf = 0;
 220         g_screen_ptr = gp2x_screens[0];
 221
 222         pllsetreg0 = memregl[0xf004];
 223         memtimex_old[0] = memregs[0x14802>>1];
 224         memtimex_old[1] = memregs[0x14804>>1];
 225
 226         gp2x_video_flip = gp2x_video_flip_;
 227         gp2x_video_flip2 = gp2x_video_flip2_;
 228         gp2x_video_changemode_ll = gp2x_video_changemode_ll_;
 229         gp2x_video_setpalette = gp2x_video_setpalette_;
 230         gp2x_video_RGB_setscaling = gp2x_video_RGB_setscaling_;
 231         gp2x_video_wait_vsync = gp2x_video_wait_vsync_;
 232
 233         gp2x_set_cpuclk = gp2x_set_cpuclk_;
 234
 235         set_lcd_custom_rate = set_lcd_custom_rate_;
 236         unset_lcd_custom_rate = unset_lcd_custom_rate_;
 237         set_lcd_gamma = set_lcd_gamma_;
 238
 239         set_ram_timings = set_ram_timings_;
 240         unset_ram_timings = unset_ram_timings_;
 241 }
 242
 243 void pollux_finish(void)
 244 {
 245         /* switch to default fb mem, turn portrait off */
 246         memregl[0x406C>>2] = fb_paddr[0];
 247         memregl[0x4058>>2] |= 0x10;
 248 //      wiz_lcd_set_portrait(0);
 249         close(fbdev);
 250
 251         gp2x_video_changemode_ll_(16);
 252         unset_ram_timings_();
 253         if (cpuclk_was_changed) {
 254                 memregl[0xf004>>2] = pllsetreg0;
 255                 memregl[0xf07c>>2] |= 0x8000;
 256         }
 257
 258         munmap((void *)memregs, 0x20000);
 259         close(memdev);
 260 }
 261