]> git.vomp.tv Git - vompclient-marten.git/blob - surfacemvp.cc
Windows fixes
[vompclient-marten.git] / surfacemvp.cc
1 /*
2     Copyright 2004-2005 Chris Tallon
3     Portions copyright 2004 Jon Gettler
4
5     This file is part of VOMP.
6
7     VOMP is free software; you can redistribute it and/or modify
8     it under the terms of the GNU General Public License as published by
9     the Free Software Foundation; either version 2 of the License, or
10     (at your option) any later version.
11
12     VOMP is distributed in the hope that it will be useful,
13     but WITHOUT ANY WARRANTY; without even the implied warranty of
14     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15     GNU General Public License for more details.
16
17     You should have received a copy of the GNU General Public License
18     along with VOMP; if not, write to the Free Software
19     Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
20 */
21
22 #include "surfacemvp.h"
23 #include "osd.h"
24
25 SurfaceMVP::SurfaceMVP(int id)
26 : Surface(id)
27 {
28   fdOsd = Osd::getInstance()->getFD();
29   memset(&surface, 0, sizeof(osd_surface_t));
30   memset(&surface.sfc, 0, sizeof(stbgfx_sfc_t));
31   memset(&surface.map, 0, sizeof(stbgfx_map_t));
32 }
33
34 SurfaceMVP::~SurfaceMVP()
35 {
36   for (int i = 0; i < 3; i++)
37   {
38     if (surface.base[i]) munmap(surface.base[i], surface.map.map[i].size);
39   }
40
41   int a;
42
43   a = ioctl(fdOsd, GFX_FB_SFC_UNMAP, surface.sfc.handle);
44   if (a) Log::getInstance()->log("Surface", Log::ERR, "Surface unmap failed");
45
46   a = ioctl(fdOsd, GFX_FB_SFC_FREE, surface.sfc.handle);
47   if (a) Log::getInstance()->log("Surface", Log::ERR, "Surface destroy failed");
48
49 }
50
51 int SurfaceMVP::create(UINT width, UINT height)
52 {
53   int r = 0;
54   int displayNumber = 0; // mvpmc iterates 0->15 till it gets one that works?
55
56   surface.sfc.width = width;
57   surface.sfc.height = height;
58   surface.sfc.flags = 0x3f1533;
59
60   surface.sfc.unknown = -1;
61
62 //  r = ioctl(fdOsd, GFX_FB_SET_OSD, &displayNumber);
63 //  if (r) return 0;
64
65   r = ioctl(fdOsd, GFX_FB_OSD_SURFACE, &displayNumber);
66   if (r) return 0;
67
68   r = ioctl(fdOsd, GFX_FB_SFC_ALLOC, &surface.sfc);
69   if (r) return 0;
70
71   surface.map.map[0].unknown = surface.sfc.handle;
72   r = ioctl(fdOsd, GFX_FB_MAP, &surface.map);
73   if (r) return 0;
74
75   surface.base[0] = (unsigned char *)mmap(NULL, surface.map.map[0].size, PROT_READ|PROT_WRITE, MAP_SHARED, fdOsd, surface.map.map[0].addr);
76   if (surface.base[0] == MAP_FAILED) return 0;
77
78   surface.base[1] = (unsigned char *)mmap(NULL, surface.map.map[1].size, PROT_READ|PROT_WRITE, MAP_SHARED, fdOsd, surface.map.map[1].addr);
79   if (surface.base[1] == MAP_FAILED) return 0;
80
81   surface.base[2] = (unsigned char *)mmap(NULL, surface.map.map[2].size, PROT_READ|PROT_WRITE, MAP_SHARED, fdOsd, surface.map.map[2].addr);
82   if (surface.base[2] == MAP_FAILED) return 0;
83
84 //  surface.display.num = displayNumber;
85 //  r = ioctl(fdOsd, GFX_FB_MOVE_DISPLAY, &surface.display);
86 //  if (r) return 0;
87
88 //  r = ioctl(fdOsd, GFX_FB_SET_DISPLAY, &surface.display);
89 //  if (r) return 0;
90
91   return 1;
92 }
93
94 void SurfaceMVP::display()
95 {
96   unsigned long fb_descriptor[2];
97
98   fb_descriptor[0] = surface.sfc.handle;
99   fb_descriptor[1] = 1;
100
101   ioctl(fdOsd, GFX_FB_ATTACH, fb_descriptor);
102 }
103
104 unsigned long SurfaceMVP::getSurfaceHandle()
105 {
106   return surface.sfc.handle;
107 }
108
109 // ----------------------------------------------------------------------------
110
111 // Now for the drawing functions
112
113 /*
114  * RGB to YUV conversion tables
115  */
116 int SurfaceMVP::conv_YB[256];
117 int SurfaceMVP::conv_YG[256];
118 int SurfaceMVP::conv_YR[256];
119 int SurfaceMVP::conv_UB[256];
120 int SurfaceMVP::conv_UG[256];
121 int SurfaceMVP::conv_UR[256];
122 int SurfaceMVP::conv_VB[256];
123 int SurfaceMVP::conv_VG[256];
124 int SurfaceMVP::conv_VR[256];
125
126 int SurfaceMVP::conv_BY[256];
127 int SurfaceMVP::conv_GY[256];
128 int SurfaceMVP::conv_RY[256];
129 int SurfaceMVP::conv_BU[256];
130 int SurfaceMVP::conv_GU[256];
131 int SurfaceMVP::conv_RU[256];
132 int SurfaceMVP::conv_BV[256];
133 int SurfaceMVP::conv_GV[256];
134 int SurfaceMVP::conv_RV[256];
135
136 /*
137  * gfx_init() - initialize the RGB to YUV conversion tables
138  */
139 void SurfaceMVP::initConversionTables(void)
140 {
141   int i;
142
143   for (i=0; i<256; i++) {
144     conv_YB[i] = (int)(0.299 * (double)i);
145     conv_BY[i] = i;
146   }
147   for (i=0; i<256; i++) {
148     conv_YG[i] = (int)(0.587 * (double)i);
149     conv_GY[i] = i;
150   }
151   for (i=0; i<256; i++) {
152     conv_YR[i] = (int)(0.114 * (double)i);
153     conv_RY[i] = i;
154   }
155
156   for (i=0; i<256; i++) {
157     conv_UB[i] = (int)(0.5 * (double)i);
158     conv_BU[i] = (int)(1.732 * (i - 128));
159   }
160   for (i=0; i<256; i++) {
161     conv_UG[i] = (int)(-0.33126 * (double)i);
162     conv_GU[i] = (int)(-0.338 * (i - 128));
163   }
164   for (i=0; i<256; i++) {
165     conv_UR[i] = (int)(-0.16874 * (double)i);
166     conv_RU[i] = 0;
167   }
168
169   for (i=0; i<256; i++) {
170     conv_VB[i] = (int)(-0.08131 * (double)i);
171     conv_BV[i] = 0;
172   }
173   for (i=0; i<256; i++) {
174     conv_VG[i] = (int)(-0.41869 * (double)i);
175     conv_GV[i] = (int)(-0.698 * (i - 128));
176   }
177   for (i=0; i<256; i++) {
178     conv_VR[i] = (int)(0.5 * (double)i);
179     conv_RV[i] = (int)(1.370 * ((double)i - 128));
180   }
181 }
182
183 /*
184  * rgb2yuv() - convert an RGB pixel to YUV
185  */
186  //inline me?
187 void SurfaceMVP::rgb2yuv(unsigned char r, unsigned char g, unsigned char b, unsigned char *y, unsigned char *u, unsigned char *v)
188 {
189   int Y, U, V;
190
191   Y = conv_YB[b] + conv_YG[g] + conv_YR[r];
192   U = conv_UB[b] + conv_UG[g] + conv_UR[r] + 128;
193   V = conv_VB[b] + conv_VG[g] + conv_VR[r] + 128;
194
195   if (Y > 255)
196     Y = 255;
197   else if (Y < 0)
198     Y = 0;
199   if (U > 255)
200     U = 255;
201   else if (U < 0)
202     U = 0;
203   if (V > 255)
204     V = 255;
205   else if (V < 0)
206     V = 0;
207
208   *y = Y;
209   *u = U;
210   *v = V;
211 }
212
213 int SurfaceMVP::fillblt(int x, int y, int width, int height, unsigned int c)
214 {
215   osd_fillblt_t fblt;
216
217   fblt.handle = surface.sfc.handle;
218   fblt.x = x;
219   fblt.y = y;
220   fblt.width = width;
221   fblt.height = height;
222   fblt.colour = c;
223
224   return ioctl(fdOsd, GFX_FB_OSD_FILLBLT, &fblt);
225 }
226
227 void SurfaceMVP::drawPixel(int x, int y, unsigned int c)
228 {
229   int offset;
230   unsigned char r, g, b, a, Y, U, V;
231   unsigned int line, remainder;
232
233   if ((x >= (int)surface.sfc.width) || (y >= (int)surface.sfc.height))
234     return;
235
236   c2rgba(c, &r, &g, &b, &a);
237
238   rgb2yuv(r, g, b, &Y, &U, &V);
239
240   remainder = (surface.sfc.width % 4);
241   if (remainder == 0)
242     line = surface.sfc.width;
243   else
244     line = surface.sfc.width + (4 - remainder);
245
246   offset = (y * line) + x;
247
248   *(surface.base[0] + offset) = Y;
249   *(surface.base[1] + (offset & 0xfffffffe)) = U;
250   *(surface.base[1] + (offset & 0xfffffffe) + 1) = V;
251   *(surface.base[2] + offset) = a;
252
253 }
254
255 void SurfaceMVP::drawHorzLine(int x1, int x2, int y, unsigned int c)
256 {
257   fillblt(x1, y, x2-x1, 1, c);
258 }
259
260 void SurfaceMVP::drawVertLine(int x, int y1, int y2, unsigned int c)
261 {
262   fillblt(x, y1, 1, y2-y1, c);
263 }
264
265
266   /* surface update to screen needs:
267   source x distance into this surface
268   source y distance into this surface
269   width of update
270   height of update
271   destination x on screen
272   destination y on screen
273   */
274 int SurfaceMVP::updateToScreen(int sx, int sy, int w, int h, int dx, int dy) // FIXME new, replace others with this FIXME
275 {
276   return blt(fdOsd, surface.sfc.handle, sx, sy, w, h, ((SurfaceMVP*)screen)->getSurfaceHandle(), dx, dy);
277 }
278
279 int SurfaceMVP::blt(int fd, unsigned long shandle, int sx, int sy, int width, int height, unsigned long dhandle, int dx, int dy)
280 {
281   osd_bitblt_t fblt;
282   memset(&fblt, 0, sizeof(fblt));
283
284   fblt.dst_handle = dhandle;
285   fblt.dst_x = dx;
286   fblt.dst_y = dy;
287
288   fblt.src_handle = shandle;
289   fblt.src_x = sx;
290   fblt.src_y = sy;
291
292   fblt.width = width;
293   fblt.height = height;
294
295   fblt.u1 = 1;
296   fblt.u2 = 0;
297   fblt.u3 = 0x0f;
298
299   return ioctl(fd, GFX_FB_OSD_BITBLT, &fblt);
300 }
301
302 void SurfaceMVP::screenShot(char* fileName)
303 {
304   Log* logger = Log::getInstance();
305
306   FILE* outfile = fopen(fileName, "w");
307   if (outfile == NULL)
308   {
309     logger->log("Surface", Log::ERR, "Can't open JPEG");
310     return;
311   }
312   logger->log("Surface", Log::DEBUG, "File opened %u %u", surface.sfc.height, surface.sfc.width);
313
314   struct jpeg_compress_struct cinfo;
315   struct jpeg_error_mgr jerr;
316   cinfo.err = jpeg_std_error(&jerr);
317   jpeg_create_compress(&cinfo);
318   jpeg_stdio_dest(&cinfo, outfile);
319   cinfo.image_width = surface.sfc.width;
320   cinfo.image_height = surface.sfc.height;
321   cinfo.input_components = 3;
322   cinfo.in_color_space = JCS_RGB;
323   jpeg_set_defaults(&cinfo);
324   jpeg_start_compress(&cinfo, TRUE);
325
326
327   unsigned char row[surface.sfc.width * 3];
328   unsigned char* prow = (unsigned char*)&row;
329   unsigned char r, g, b;
330
331   while (cinfo.next_scanline < cinfo.image_height)
332   {
333     for(unsigned int i = 0; i < surface.sfc.width; i++)
334     {
335       readPixel(i, cinfo.next_scanline, &r, &g, &b);
336       row[i * 3] = r;
337       row[(i * 3) + 1] = g;
338       row[(i * 3) + 2] = b;
339     }
340     jpeg_write_scanlines(&cinfo, (JSAMPLE **)&prow, 1);
341   }
342
343   jpeg_finish_compress(&cinfo);
344   jpeg_destroy_compress(&cinfo);
345   fclose(outfile);
346   logger->log("Surface", Log::DEBUG, "Jpeg saved");
347 }
348
349 void SurfaceMVP::readPixel(int x, int y, unsigned char* r, unsigned char* g, unsigned char* b)
350 {
351   int offset;
352   unsigned char a, Y, U, V;
353   unsigned int line, remainder;
354
355   if (((unsigned int)x >= surface.sfc.width) || ((unsigned int)y >= surface.sfc.height)) return;
356
357   remainder = (surface.sfc.width % 4);
358   if (remainder == 0)
359     line = surface.sfc.width;
360   else
361     line = surface.sfc.width + (4 - remainder);
362
363   offset = (y * line) + x;
364
365   Y = *(surface.base[0] + offset);
366   U = *(surface.base[1] + (offset & 0xfffffffe));
367   V = *(surface.base[1] + (offset & 0xfffffffe) + 1);
368   a = *(surface.base[2] + offset);
369
370   yuv2rgb(Y, U, V, r, g, b);
371 }
372
373 void SurfaceMVP::yuv2rgb(int y, int u, int v, unsigned char* pr, unsigned char* pg, unsigned char* pb)
374 {
375    // from http://www.fourcc.org/index.php?http%3A//www.fourcc.org/fccyvrgb.php
376
377 //   unsigned int pixel32;
378 //   unsigned char *pixel = (unsigned char *)&pixel32;
379    int r, g, b;
380
381
382    /*
383      One formula I found:  (not the right one)
384
385      R = 1.164(Y - 16) + 1.596(Cr - 128)
386      G = 1.164(Y - 16) - 0.813(Cr - 128) - 0.391(Cb - 128)
387      B = 1.164(Y - 16)                   + 2.018(Cb - 128)
388
389
390    r = (1.164 * (y - 16))
391       + (2.018 * (v - 128));
392    g = (1.164 * (y - 16))
393       - (0.813 * (u - 128))
394       - (0.391 * (v - 128));
395    b = (1.164 * (y - 16))
396       + (1.596 * (u - 128));
397
398
399      Another formula I found:  (seems to work)
400
401      R = Y + 1.370705 (V-128)
402      G = Y - 0.698001 (V-128) - 0.337633 (U-128)
403      B = Y + 1.732446 (U-128)
404    */
405
406    r = (int)( y + (1.370705 * (v-128)) );
407    g = (int)( y - (0.698001 * (v-128)) - (0.337633 * (u-128)) );
408    b = (int)( y + (1.732446 * (u-128)) );
409
410    // Even with proper conversion, some values still need clipping.
411    if (r > 255) r = 255;
412    if (g > 255) g = 255;
413    if (b > 255) b = 255;
414    if (r < 0) r = 0;
415    if (g < 0) g = 0;
416    if (b < 0) b = 0;
417
418    // Values only go from 0-220..  Why?
419 //   pixel[0] = r * 220 / 256;
420 //   pixel[1] = g * 220 / 256;
421 //   pixel[2] = b * 220 / 256;
422 //   pixel[3] = 0;
423
424    *pr = (unsigned char) (r * 220 / 256);
425    *pg = (unsigned char) (g * 220 / 256);
426    *pb = (unsigned char) (b * 220 / 256);
427
428    /* Debug
429    //printf("yuv2rgb(%i, %i, %i) -> %i, %i, %i  (0x%x)\n",
430     y, u, v,
431     pixel[0], pixel[1], pixel[2],
432     pixel32);
433    */
434
435 //   return pixel32;
436 }