src/video.c

   1 /*
   2  * This program is free software: you can redistribute it and/or modify
   3  * it under the terms of the GNU General Public License as published by
   4  * the Free Software Foundation, either version 3 of the License, or
   5  * (at your option) any later version.
   6  *
   7  * This program is distributed in the hope that it will be useful,
   8  * but WITHOUT ANY WARRANTY; without even the implied warranty of
   9  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  10  * GNU General Public License for more details.
  11  *
  12  * You should have received a copy of the GNU General Public License
  13  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  14  */
  15 #include <stdio.h>
  16 #include <stdlib.h>
  17 #include <string.h>
  18
  19 #include "video.h"
  20
  21
  22 ////////////////////////////////////////////////////////////////////////////////
  23 SDL_Surface *screen = NULL;
  24 Uint32 palette[256]; // converted
  25 Uint8 font[256][8];
  26
  27
  28 ////////////////////////////////////////////////////////////////////////////////
  29 static void quitCleanupCB (void) {
  30   //if (TTF_WasInit()) TTF_Quit();
  31   SDL_Quit();
  32 }
  33
  34
  35 ////////////////////////////////////////////////////////////////////////////////
  36 void sdlInit (void) {
  37   if (SDL_Init(SDL_INIT_VIDEO | SDL_INIT_TIMER) < 0) {
  38     fprintf(stderr, "FATAL: can't set videomode!\n");
  39     exit(1);
  40   }
  41   atexit(quitCleanupCB);
  42   //
  43   SDL_WM_SetCaption("Awish", "Awish");
  44   SDL_EnableKeyRepeat(200, 25);
  45   //SDL_EnableUNICODE(1); // just4fun
  46   SDL_EnableUNICODE(0); // just4fun
  47 }
  48
  49
  50 void initVideo (void) {
  51   screen = SDL_SetVideoMode(640, 400, 32, SDL_SWSURFACE/*|SDL_DOUBLEBUF*/);
  52   if (screen == NULL) {
  53     fprintf(stderr, "FATAL: can't set videomode!\n");
  54     exit(1);
  55   }
  56   //fprintf(stderr, "BPP: %u\n", screen->format->BytesPerPixel);
  57 }
  58
  59
  60 ////////////////////////////////////////////////////////////////////////////////
  61 // create 24bpp surface with color key
  62 SDL_Surface *createSurface (int w, int h) {
  63   //Uint32 rmask, gmask, bmask/*, amask*/;
  64   SDL_Surface *s;
  65   //
  66   if (w < 1 || h < 1) return NULL;
  67 /*
  68 #if SDL_BYTEORDER == SDL_BIG_ENDIAN
  69     rmask = 0xff000000;
  70     gmask = 0x00ff0000;
  71     bmask = 0x0000ff00;
  72     //amask = 0x000000ff;
  73 #else
  74     rmask = 0x000000ff;
  75     gmask = 0x0000ff00;
  76     bmask = 0x00ff0000;
  77     //amask = 0xff000000;
  78 #endif
  79   s = SDL_CreateRGBSurface(SDL_SRCCOLORKEY, w, h, 32, rmask, gmask, bmask, amask);
  80 */
  81   s = SDL_CreateRGBSurface(SDL_SRCCOLORKEY, w, h, screen->format->BitsPerPixel, screen->format->Rmask, screen->format->Gmask, screen->format->Bmask, screen->format->Amask);
  82   if (s != NULL) {
  83     SDL_SetColorKey(s, SDL_SRCCOLORKEY, palette[255]);
  84   }
  85   return s;
  86 }
  87
  88
  89 void blitSurfaceEx (SDL_Surface *dests, int destx, int desty, SDL_Surface *srcs, int srcx, int srcy, int srcw, int srch) {
  90   SDL_Rect src, dst;
  91   //
  92   if (srcw < 0) srcw = srcs->w;
  93   if (srch < 0) srch = srcs->h;
  94   src.x = srcx;
  95   src.y = srcy;
  96   src.w = srcw;
  97   src.h = srch;
  98   dst.x = destx;
  99   dst.y = desty;
 100   SDL_BlitSurface(srcs, &src, dests, &dst);
 101 }
 102
 103
 104 ////////////////////////////////////////////////////////////////////////////////
 105 void lockSurface (SurfaceLock *lock, SDL_Surface *s) {
 106   if (lock) {
 107     lock->s = s;
 108     lock->needUnlock = 0;
 109     if (s != NULL && SDL_MUSTLOCK(s)) {
 110       lock->needUnlock = (SDL_LockSurface(s) == 0);
 111     }
 112   }
 113 }
 114
 115
 116 void unlockSurface (SurfaceLock *lock) {
 117   if (lock && lock->s && lock->needUnlock) {
 118     SDL_UnlockSurface(lock->s);
 119     lock->needUnlock = 0;
 120   }
 121 }
 122
 123
 124 ////////////////////////////////////////////////////////////////////////////////
 125 // surface must be locked!
 126 void drawChar (SDL_Surface *s, char ch, int x, int y, Uint8 clr) {
 127   unsigned char c = (unsigned char)(ch);
 128   //
 129   for (int dy = 0; dy < 8; ++dy) {
 130     Uint8 b = font[c][dy];
 131     //
 132     for (int dx = 0; dx < 8; ++dx) {
 133       if (b&0x80) putPixel2x(s, x+dx, y+dy, clr);
 134       b = (b&0x7f)<<1;
 135     }
 136   }
 137 }
 138
 139
 140 void drawString (SDL_Surface *s, const char *str, int x, int y, Uint8 clr) {
 141   for (; *str; ++str) {
 142     drawChar(s, *str, x, y, clr);
 143     x += 8;
 144   }
 145 }