1 /*
2 SDL - Simple DirectMedia Layer
3 Copyright (C) 2003 Sam Hocevar
4
5 This library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Library General Public
7 License as published by the Free Software Foundation; either
8 version 2 of the License, or (at your option) any later version.
9
10 This library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Library General Public License for more details.
14
15 You should have received a copy of the GNU Library General Public
16 License along with this library; if not, write to the Free
17 Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
18
19 Sam Hocevar
20 sam@zoy.org
21 */
22
23 #ifdef SAVE_RCSID
24 static char rcsid =
25 "@(#) $Id: libsdl-1.2.11-libcaca.patch,v 1.1 2006/09/18 16:06:06 mr_bones_ Exp $";
26 #endif
27
28 /* libcaca based SDL video driver implementation.
29 */
30
31 #include <stdlib.h>
32 #include <stdio.h>
33 #include <string.h>
34 #include <unistd.h>
35 #include <sys/stat.h>
36
37
38 #include "SDL.h"
39 #include "SDL_error.h"
40 #include "SDL_video.h"
41 #include "SDL_mouse.h"
42 #include "../SDL_sysvideo.h"
43 #include "../SDL_pixels_c.h"
44 #include "../../events/SDL_events_c.h"
45
46 #include "SDL_cacavideo.h"
47 #include "SDL_cacaevents_c.h"
48
49 #include <caca.h>
50 #ifdef CACA_API_VERSION_1
51 #include <caca0.h>
52 #endif
53
54 /* Initialization/Query functions */
55 static int Caca_VideoInit(_THIS, SDL_PixelFormat *vformat);
56 static SDL_Rect **Caca_ListModes(_THIS, SDL_PixelFormat *format, Uint32 flags);
57 static SDL_Surface *Caca_SetVideoMode(_THIS, SDL_Surface *current, int width, int height, int bpp, Uint32 flags);
58 static void Caca_VideoQuit(_THIS);
59
60 /* Hardware surface functions */
61 static int Caca_AllocHWSurface(_THIS, SDL_Surface *surface);
62 static int Caca_LockHWSurface(_THIS, SDL_Surface *surface);
63 static int Caca_FlipHWSurface(_THIS, SDL_Surface *surface);
64 static void Caca_UnlockHWSurface(_THIS, SDL_Surface *surface);
65 static void Caca_FreeHWSurface(_THIS, SDL_Surface *surface);
66
67 /* Cache the VideoDevice struct */
68 static struct SDL_VideoDevice *local_this;
69
70 /* libcaca driver bootstrap functions */
71
Caca_Available(void)72 static int Caca_Available(void)
73 {
74 return 1; /* Always available ! */
75 }
76
Caca_DeleteDevice(SDL_VideoDevice * device)77 static void Caca_DeleteDevice(SDL_VideoDevice *device)
78 {
79 free(device->hidden);
80 free(device);
81 }
Caca_CreateDevice(int devindex)82 static SDL_VideoDevice *Caca_CreateDevice(int devindex)
83 {
84 SDL_VideoDevice *device;
85
86 /* Initialize all variables that we clean on shutdown */
87 device = (SDL_VideoDevice *)malloc(sizeof(SDL_VideoDevice));
88 if ( device ) {
89 memset(device, 0, (sizeof *device));
90 device->hidden = (struct SDL_PrivateVideoData *)
91 malloc((sizeof *device->hidden));
92 }
93 if ( (device == NULL) || (device->hidden == NULL) ) {
94 SDL_OutOfMemory();
95 if ( device ) {
96 free(device);
97 }
98 return(0);
99 }
100 memset(device->hidden, 0, (sizeof *device->hidden));
101
102 /* Set the function pointers */
103 device->VideoInit = Caca_VideoInit;
104 device->ListModes = Caca_ListModes;
105 device->SetVideoMode = Caca_SetVideoMode;
106 device->CreateYUVOverlay = NULL;
107 device->SetColors = NULL;
108 device->UpdateRects = NULL;
109 device->VideoQuit = Caca_VideoQuit;
110 device->AllocHWSurface = Caca_AllocHWSurface;
111 device->CheckHWBlit = NULL;
112 device->FillHWRect = NULL;
113 device->SetHWColorKey = NULL;
114 device->SetHWAlpha = NULL;
115 device->LockHWSurface = Caca_LockHWSurface;
116 device->UnlockHWSurface = Caca_UnlockHWSurface;
117 device->FlipHWSurface = NULL;
118 device->FreeHWSurface = Caca_FreeHWSurface;
119 device->SetCaption = NULL;
120 device->SetIcon = NULL;
121 device->IconifyWindow = NULL;
122 device->GrabInput = NULL;
123 device->GetWMInfo = NULL;
124 device->InitOSKeymap = Caca_InitOSKeymap;
125 device->PumpEvents = Caca_PumpEvents;
126
127 device->free = Caca_DeleteDevice;
128
129 return device;
130 }
131
132 VideoBootStrap CACA_bootstrap = {
133 "caca", "Color ASCII Art Library",
134 Caca_Available, Caca_CreateDevice
135 };
136
Caca_VideoInit(_THIS,SDL_PixelFormat * vformat)137 int Caca_VideoInit(_THIS, SDL_PixelFormat *vformat)
138 {
139 int i;
140
141 /* Initialize all variables that we clean on shutdown */
142 for ( i=0; i<SDL_NUMMODES; ++i ) {
143 SDL_modelist[i] = malloc(sizeof(SDL_Rect));
144 SDL_modelist[i]->x = SDL_modelist[i]->y = 0;
145 }
146 /* Modes sorted largest to smallest */
147 SDL_modelist[0]->w = 1024; SDL_modelist[0]->h = 768;
148 SDL_modelist[1]->w = 800; SDL_modelist[1]->h = 600;
149 SDL_modelist[2]->w = 640; SDL_modelist[2]->h = 480;
150 SDL_modelist[3]->w = 320; SDL_modelist[3]->h = 400;
151 SDL_modelist[4]->w = 320; SDL_modelist[4]->h = 240;
152 SDL_modelist[5]->w = 320; SDL_modelist[5]->h = 200;
153 SDL_modelist[6] = NULL;
154
155 Caca_mutex = SDL_CreateMutex();
156
157 /* Initialize the library */
158 if ( caca_init() != 0 ) {
159 SDL_SetError("Unable to initialize libcaca");
160 return(-1);
161 }
162
163 /* Initialize private variables */
164 Caca_lastkey = 0;
165 Caca_bitmap = NULL;
166 Caca_buffer = NULL;
167
168 local_this = this;
169
170 /* Determine the screen depth (use default 8-bit depth) */
171 vformat->BitsPerPixel = 8;
172 vformat->BytesPerPixel = 1;
173
174 /* We're done! */
175 return(0);
176 }
177
Caca_ListModes(_THIS,SDL_PixelFormat * format,Uint32 flags)178 SDL_Rect **Caca_ListModes(_THIS, SDL_PixelFormat *format, Uint32 flags)
179 {
180 if(format->BitsPerPixel != 8)
181 return NULL;
182
183 if ( flags & SDL_FULLSCREEN ) {
184 return SDL_modelist;
185 } else {
186 return (SDL_Rect **) -1;
187 }
188 }
189
190 /* Various screen update functions available */
191 static void Caca_DirectUpdate(_THIS, int numrects, SDL_Rect *rects);
192
Caca_SetVideoMode(_THIS,SDL_Surface * current,int width,int height,int bpp,Uint32 flags)193 SDL_Surface *Caca_SetVideoMode(_THIS, SDL_Surface *current,
194 int width, int height, int bpp, Uint32 flags)
195 {
196 if ( Caca_buffer ) {
197 free( Caca_buffer );
198 Caca_buffer = NULL;
199 }
200
201 if ( Caca_bitmap ) {
202 caca_free_bitmap( Caca_bitmap );
203 Caca_bitmap = NULL;
204 }
205
206 Caca_buffer = malloc(2 * ((width + 15) & ~15) * height);
207 if ( ! Caca_buffer ) {
208 SDL_SetError("Couldn't allocate buffer for requested mode");
209 return(NULL);
210 }
211
212 memset(Caca_buffer, 0, 2 * ((width + 15) & ~15) * height);
213
214 /* Allocate the new pixel format for the screen */
215 if ( ! SDL_ReallocFormat(current, 16, 0xf800, 0x07e0, 0x001f, 0) ) {
216 return(NULL);
217 }
218
219 /* Set up the new mode framebuffer */
220 current->flags = SDL_FULLSCREEN;
221 Caca_w = current->w = width;
222 Caca_h = current->h = height;
223 current->pitch = 2 * ((width + 15) & ~15);
224 current->pixels = Caca_buffer;
225
226 /* Create the libcaca bitmap */
227 Caca_bitmap = caca_create_bitmap( 16, width, height, current->pitch, 0xf800, 0x07e0, 0x001f, 0x0000 );
228 if ( ! Caca_bitmap ) {
229 SDL_SetError("Couldn't allocate libcaca bitmap");
230 return(NULL);
231 }
232
233 /* Set the blit function */
234 this->UpdateRects = Caca_DirectUpdate;
235
236 /* We're done */
237 return(current);
238 }
239
240 /* We don't actually allow hardware surfaces other than the main one */
Caca_AllocHWSurface(_THIS,SDL_Surface * surface)241 static int Caca_AllocHWSurface(_THIS, SDL_Surface *surface)
242 {
243 return(-1);
244 }
Caca_FreeHWSurface(_THIS,SDL_Surface * surface)245 static void Caca_FreeHWSurface(_THIS, SDL_Surface *surface)
246 {
247 return;
248 }
249
250 /* We need to wait for vertical retrace on page flipped displays */
Caca_LockHWSurface(_THIS,SDL_Surface * surface)251 static int Caca_LockHWSurface(_THIS, SDL_Surface *surface)
252 {
253 /* TODO ? */
254 return(0);
255 }
Caca_UnlockHWSurface(_THIS,SDL_Surface * surface)256 static void Caca_UnlockHWSurface(_THIS, SDL_Surface *surface)
257 {
258 return;
259 }
260
261 /* FIXME: How is this done with libcaca? */
Caca_FlipHWSurface(_THIS,SDL_Surface * surface)262 static int Caca_FlipHWSurface(_THIS, SDL_Surface *surface)
263 {
264 SDL_mutexP(Caca_mutex);
265 caca_refresh();
266 SDL_mutexV(Caca_mutex);
267 return(0);
268 }
269
Caca_DirectUpdate(_THIS,int numrects,SDL_Rect * rects)270 static void Caca_DirectUpdate(_THIS, int numrects, SDL_Rect *rects)
271 {
272 SDL_mutexP(Caca_mutex);
273 caca_draw_bitmap( 0, 0, caca_get_width() - 1, caca_get_height() - 1,
274 Caca_bitmap, Caca_buffer );
275 caca_refresh();
276 SDL_mutexV(Caca_mutex);
277 return;
278 }
279
280 /* Note: If we are terminated, this could be called in the middle of
281 another SDL video routine -- notably UpdateRects.
282 */
Caca_VideoQuit(_THIS)283 void Caca_VideoQuit(_THIS)
284 {
285 int i;
286
287 /* Free video mode lists */
288 for ( i=0; i<SDL_NUMMODES; ++i ) {
289 if ( SDL_modelist[i] != NULL ) {
290 free(SDL_modelist[i]);
291 SDL_modelist[i] = NULL;
292 }
293 }
294
295 if ( Caca_bitmap ) {
296 caca_free_bitmap( Caca_bitmap );
297 Caca_bitmap = NULL;
298 }
299
300 caca_end();
301
302 SDL_DestroyMutex(Caca_mutex);
303 }
304
305