1 /*
2 SDL - Simple DirectMedia Layer
3 Copyright (C) 1997-2012 Sam Lantinga
4
5 This library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 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 Lesser General Public License for more details.
14
15 You should have received a copy of the GNU Lesser General Public
16 License along with this library; if not, write to the Free Software
17 Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
18
19 Sam Lantinga
20 slouken@libsdl.org
21 */
22 #include "SDL_config.h"
23
24 /* AAlib based SDL video driver implementation.
25 */
26
27 #include <unistd.h>
28 #include <sys/stat.h>
29
30
31 #include "SDL_video.h"
32 #include "SDL_mouse.h"
33 #include "../SDL_sysvideo.h"
34 #include "../SDL_pixels_c.h"
35 #include "../../events/SDL_events_c.h"
36
37 #include "SDL_aavideo.h"
38 #include "SDL_aaevents_c.h"
39 #include "SDL_aamouse_c.h"
40
41 #include <aalib.h>
42
43 /* Initialization/Query functions */
44 static int AA_VideoInit(_THIS, SDL_PixelFormat *vformat);
45 static SDL_Rect **AA_ListModes(_THIS, SDL_PixelFormat *format, Uint32 flags);
46 static SDL_Surface *AA_SetVideoMode(_THIS, SDL_Surface *current, int width, int height, int bpp, Uint32 flags);
47 static int AA_SetColors(_THIS, int firstcolor, int ncolors, SDL_Color *colors);
48 static void AA_VideoQuit(_THIS);
49
50 /* Hardware surface functions */
51 static int AA_AllocHWSurface(_THIS, SDL_Surface *surface);
52 static int AA_LockHWSurface(_THIS, SDL_Surface *surface);
53 static int AA_FlipHWSurface(_THIS, SDL_Surface *surface);
54 static void AA_UnlockHWSurface(_THIS, SDL_Surface *surface);
55 static void AA_FreeHWSurface(_THIS, SDL_Surface *surface);
56
57 /* Cache the VideoDevice struct */
58 static struct SDL_VideoDevice *local_this;
59
60 /* AAlib driver bootstrap functions */
61
AA_Available(void)62 static int AA_Available(void)
63 {
64 return 1; /* Always available ! */
65 }
66
AA_DeleteDevice(SDL_VideoDevice * device)67 static void AA_DeleteDevice(SDL_VideoDevice *device)
68 {
69 SDL_free(device->hidden);
70 SDL_free(device);
71 }
72
AA_CreateDevice(int devindex)73 static SDL_VideoDevice *AA_CreateDevice(int devindex)
74 {
75 SDL_VideoDevice *device;
76
77 /* Initialize all variables that we clean on shutdown */
78 device = (SDL_VideoDevice *)SDL_malloc(sizeof(SDL_VideoDevice));
79 if ( device ) {
80 SDL_memset(device, 0, (sizeof *device));
81 device->hidden = (struct SDL_PrivateVideoData *)
82 SDL_malloc((sizeof *device->hidden));
83 }
84 if ( (device == NULL) || (device->hidden == NULL) ) {
85 SDL_OutOfMemory();
86 if ( device ) {
87 SDL_free(device);
88 }
89 return(0);
90 }
91 SDL_memset(device->hidden, 0, (sizeof *device->hidden));
92
93 /* Set the function pointers */
94 device->VideoInit = AA_VideoInit;
95 device->ListModes = AA_ListModes;
96 device->SetVideoMode = AA_SetVideoMode;
97 device->CreateYUVOverlay = NULL;
98 device->SetColors = AA_SetColors;
99 device->UpdateRects = NULL;
100 device->VideoQuit = AA_VideoQuit;
101 device->AllocHWSurface = AA_AllocHWSurface;
102 device->CheckHWBlit = NULL;
103 device->FillHWRect = NULL;
104 device->SetHWColorKey = NULL;
105 device->SetHWAlpha = NULL;
106 device->LockHWSurface = AA_LockHWSurface;
107 device->UnlockHWSurface = AA_UnlockHWSurface;
108 device->FlipHWSurface = NULL;
109 device->FreeHWSurface = AA_FreeHWSurface;
110 device->SetCaption = NULL;
111 device->SetIcon = NULL;
112 device->IconifyWindow = NULL;
113 device->GrabInput = NULL;
114 device->GetWMInfo = NULL;
115 device->InitOSKeymap = AA_InitOSKeymap;
116 device->PumpEvents = AA_PumpEvents;
117
118 device->free = AA_DeleteDevice;
119
120 return device;
121 }
122
123 VideoBootStrap AALIB_bootstrap = {
124 "aalib", "ASCII Art Library",
125 AA_Available, AA_CreateDevice
126 };
127
128 static void AA_ResizeHandler(aa_context *);
129
AA_VideoInit(_THIS,SDL_PixelFormat * vformat)130 int AA_VideoInit(_THIS, SDL_PixelFormat *vformat)
131 {
132 int keyboard;
133 int i;
134
135 /* Initialize all variables that we clean on shutdown */
136 for ( i=0; i<SDL_NUMMODES; ++i ) {
137 SDL_modelist[i] = SDL_malloc(sizeof(SDL_Rect));
138 SDL_modelist[i]->x = SDL_modelist[i]->y = 0;
139 }
140 /* Modes sorted largest to smallest */
141 SDL_modelist[0]->w = 1024; SDL_modelist[0]->h = 768;
142 SDL_modelist[1]->w = 800; SDL_modelist[1]->h = 600;
143 SDL_modelist[2]->w = 640; SDL_modelist[2]->h = 480;
144 SDL_modelist[3]->w = 320; SDL_modelist[3]->h = 400;
145 SDL_modelist[4]->w = 320; SDL_modelist[4]->h = 240;
146 SDL_modelist[5]->w = 320; SDL_modelist[5]->h = 200;
147 SDL_modelist[6] = NULL;
148
149 /* Initialize the library */
150
151 AA_mutex = SDL_CreateMutex();
152
153 aa_parseoptions (NULL, NULL, NULL, NULL);
154
155 AA_context = aa_autoinit(&aa_defparams);
156 if ( ! AA_context ) {
157 SDL_SetError("Unable to initialize AAlib");
158 return(-1);
159 }
160
161 /* Enable mouse and keyboard support */
162
163 if ( ! aa_autoinitkbd (AA_context, AA_SENDRELEASE) ) {
164 SDL_SetError("Unable to initialize AAlib keyboard");
165 return(-1);
166 }
167 if ( ! aa_autoinitmouse (AA_context, AA_SENDRELEASE) ) {
168 fprintf(stderr,"Warning: Unable to initialize AAlib mouse");
169 }
170 AA_rparams = aa_getrenderparams();
171
172 local_this = this;
173
174 aa_resizehandler(AA_context, AA_ResizeHandler);
175
176 fprintf(stderr,"Using AAlib driver: %s (%s)\n", AA_context->driver->name, AA_context->driver->shortname);
177
178 AA_in_x11 = (SDL_strcmp(AA_context->driver->shortname,"X11") == 0);
179 /* Determine the screen depth (use default 8-bit depth) */
180 vformat->BitsPerPixel = 8;
181 vformat->BytesPerPixel = 1;
182
183 /* We're done! */
184 return(0);
185 }
186
AA_ListModes(_THIS,SDL_PixelFormat * format,Uint32 flags)187 SDL_Rect **AA_ListModes(_THIS, SDL_PixelFormat *format, Uint32 flags)
188 {
189 if(format->BitsPerPixel != 8)
190 return NULL;
191
192 if ( flags & SDL_FULLSCREEN ) {
193 return SDL_modelist;
194 } else {
195 return (SDL_Rect **) -1;
196 }
197 }
198
199 /* From aavga.c
200 AAlib does not give us the choice of the actual resolution, thus we have to simulate additional
201 resolution by scaling down manually each frame
202 */
fastscale(register char * b1,register char * b2,int x1,int x2,int y1,int y2)203 static void fastscale (register char *b1, register char *b2, int x1, int x2, int y1, int y2)
204 {
205 register int ex, spx = 0, ddx, ddx1;
206 int ddy1, ddy, spy = 0, ey;
207 int x;
208 char *bb1 = b1;
209 if (!x1 || !x2 || !y1 || !y2)
210 return;
211 ddx = x1 + x1;
212 ddx1 = x2 + x2;
213 if (ddx1 < ddx)
214 spx = ddx / ddx1, ddx %= ddx1;
215 ddy = y1 + y1;
216 ddy1 = y2 + y2;
217 if (ddy1 < ddy)
218 spy = (ddy / ddy1) * x1, ddy %= ddy1;
219 ey = -ddy1;
220 for (; y2; y2--) {
221 ex = -ddx1;
222 for (x = x2; x; x--) {
223 *b2 = *b1;
224 b2++;
225 b1 += spx;
226 ex += ddx;
227 if (ex > 0) {
228 b1++;
229 ex -= ddx1;
230 }
231 }
232 bb1 += spy;
233 ey += ddy;
234 if (ey > 0) {
235 bb1 += x1;
236 ey -= ddy1;
237 }
238 b1 = bb1;
239 }
240 }
241
242 /* Various screen update functions available */
243 static void AA_DirectUpdate(_THIS, int numrects, SDL_Rect *rects);
244
AA_SetVideoMode(_THIS,SDL_Surface * current,int width,int height,int bpp,Uint32 flags)245 SDL_Surface *AA_SetVideoMode(_THIS, SDL_Surface *current,
246 int width, int height, int bpp, Uint32 flags)
247 {
248 int mode;
249
250 if ( AA_buffer ) {
251 SDL_free( AA_buffer );
252 }
253
254 AA_buffer = SDL_malloc(width * height);
255 if ( ! AA_buffer ) {
256 SDL_SetError("Couldn't allocate buffer for requested mode");
257 return(NULL);
258 }
259
260 /* printf("Setting mode %dx%d\n", width, height); */
261
262 SDL_memset(aa_image(AA_context), 0, aa_imgwidth(AA_context) * aa_imgheight(AA_context));
263 SDL_memset(AA_buffer, 0, width * height);
264
265 /* Allocate the new pixel format for the screen */
266 if ( ! SDL_ReallocFormat(current, 8, 0, 0, 0, 0) ) {
267 return(NULL);
268 }
269
270 /* Set up the new mode framebuffer */
271 current->flags = SDL_FULLSCREEN;
272 AA_w = current->w = width;
273 AA_h = current->h = height;
274 current->pitch = current->w;
275 current->pixels = AA_buffer;
276
277 AA_x_ratio = ((double)aa_imgwidth(AA_context)) / ((double)width);
278 AA_y_ratio = ((double)aa_imgheight(AA_context)) / ((double)height);
279
280 /* Set the blit function */
281 this->UpdateRects = AA_DirectUpdate;
282
283 /* We're done */
284 return(current);
285 }
286
AA_ResizeHandler(aa_context * context)287 static void AA_ResizeHandler(aa_context *context)
288 {
289 aa_resize(context);
290 local_this->hidden->x_ratio = ((double)aa_imgwidth(context)) / ((double)local_this->screen->w);
291 local_this->hidden->y_ratio = ((double)aa_imgheight(context)) / ((double)local_this->screen->h);
292
293 fastscale (local_this->hidden->buffer, aa_image(context), local_this->hidden->w, aa_imgwidth (context), local_this->hidden->h, aa_imgheight (context));
294 aa_renderpalette(context, local_this->hidden->palette, local_this->hidden->rparams, 0, 0, aa_scrwidth(context), aa_scrheight(context));
295 aa_flush(context);
296 }
297
298 /* We don't actually allow hardware surfaces other than the main one */
AA_AllocHWSurface(_THIS,SDL_Surface * surface)299 static int AA_AllocHWSurface(_THIS, SDL_Surface *surface)
300 {
301 return(-1);
302 }
AA_FreeHWSurface(_THIS,SDL_Surface * surface)303 static void AA_FreeHWSurface(_THIS, SDL_Surface *surface)
304 {
305 return;
306 }
307
308 /* We need to wait for vertical retrace on page flipped displays */
AA_LockHWSurface(_THIS,SDL_Surface * surface)309 static int AA_LockHWSurface(_THIS, SDL_Surface *surface)
310 {
311 /* TODO ? */
312 return(0);
313 }
AA_UnlockHWSurface(_THIS,SDL_Surface * surface)314 static void AA_UnlockHWSurface(_THIS, SDL_Surface *surface)
315 {
316 return;
317 }
318
319 /* FIXME: How is this done with AAlib? */
AA_FlipHWSurface(_THIS,SDL_Surface * surface)320 static int AA_FlipHWSurface(_THIS, SDL_Surface *surface)
321 {
322 SDL_mutexP(AA_mutex);
323 aa_flush(AA_context);
324 SDL_mutexV(AA_mutex);
325 return(0);
326 }
327
AA_DirectUpdate(_THIS,int numrects,SDL_Rect * rects)328 static void AA_DirectUpdate(_THIS, int numrects, SDL_Rect *rects)
329 {
330 int i;
331 SDL_Rect *rect;
332
333 fastscale (AA_buffer, aa_image(AA_context), AA_w, aa_imgwidth (AA_context), AA_h, aa_imgheight (AA_context));
334 #if 1
335 aa_renderpalette(AA_context, AA_palette, AA_rparams, 0, 0, aa_scrwidth(AA_context), aa_scrheight(AA_context));
336 #else
337 /* Render only the rectangles in the list */
338 printf("Update rects : ");
339 for ( i=0; i < numrects; ++i ) {
340 rect = &rects[i];
341 printf("(%d,%d-%d,%d)", rect->x, rect->y, rect->w, rect->h);
342 aa_renderpalette(AA_context, AA_palette, AA_rparams, rect->x * AA_x_ratio, rect->y * AA_y_ratio, rect->w * AA_x_ratio, rect->h * AA_y_ratio);
343 }
344 printf("\n");
345 #endif
346 SDL_mutexP(AA_mutex);
347 aa_flush(AA_context);
348 SDL_mutexV(AA_mutex);
349 return;
350 }
351
AA_SetColors(_THIS,int firstcolor,int ncolors,SDL_Color * colors)352 int AA_SetColors(_THIS, int firstcolor, int ncolors, SDL_Color *colors)
353 {
354 int i;
355
356 for ( i=0; i < ncolors; i++ ) {
357 aa_setpalette(AA_palette, firstcolor + i,
358 colors[i].r>>2,
359 colors[i].g>>2,
360 colors[i].b>>2);
361 }
362 return(1);
363 }
364
365 /* Note: If we are terminated, this could be called in the middle of
366 another SDL video routine -- notably UpdateRects.
367 */
AA_VideoQuit(_THIS)368 void AA_VideoQuit(_THIS)
369 {
370 int i;
371
372 aa_uninitkbd(AA_context);
373 aa_uninitmouse(AA_context);
374
375 /* Free video mode lists */
376 for ( i=0; i<SDL_NUMMODES; ++i ) {
377 if ( SDL_modelist[i] != NULL ) {
378 SDL_free(SDL_modelist[i]);
379 SDL_modelist[i] = NULL;
380 }
381 }
382
383 aa_close(AA_context);
384
385 SDL_DestroyMutex(AA_mutex);
386
387 this->screen->pixels = NULL;
388 }
389