FUNCTIONS

1. AA_Available
2. AA_DeleteDevice
3. AA_CreateDevice
4. AA_VideoInit
5. AA_ListModes
6. fastscale
7. AA_SetVideoMode
8. AA_ResizeHandler
9. AA_AllocHWSurface
10. AA_FreeHWSurface
11. AA_LockHWSurface
12. AA_UnlockHWSurface
13. AA_FlipHWSurface
14. AA_DirectUpdate
15. AA_SetColors
16. AA_VideoQuit

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