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 #ifndef AWISH_NO_SOUND
  22 # include "SDL_mixer.h"
  23 #endif
  24
  25
  26 ////////////////////////////////////////////////////////////////////////////////
  27 SDL_Surface *screen = NULL;
  28 SDL_Surface *backbuf = NULL;
  29 Uint32 palette[256]; // converted
  30 Uint8 font[256][8];
  31
  32
  33 ////////////////////////////////////////////////////////////////////////////////
  34 static void quitCleanupCB (void) {
  35   //if (TTF_WasInit()) TTF_Quit();
  36   Mix_CloseAudio();
  37   SDL_Quit();
  38 }
  39
  40
  41 ////////////////////////////////////////////////////////////////////////////////
  42 void sdlInit (void) {
  43   if (SDL_Init(SDL_INIT_VIDEO | SDL_INIT_TIMER
  44 #ifndef AWISH_NO_SOUND
  45        | SDL_INIT_AUDIO
  46 #endif
  47       ) < 0) {
  48     fprintf(stderr, "FATAL: can't set videomode!\n");
  49     exit(1);
  50   }
  51   SDL_WM_SetCaption("Awish", "Awish");
  52   SDL_EnableKeyRepeat(200, 25);
  53   //SDL_EnableUNICODE(1); // just4fun
  54   SDL_EnableUNICODE(0); // just4fun
  55 #ifndef AWISH_NO_SOUND
  56   Mix_Init(0);
  57   if (Mix_OpenAudio(22050, AUDIO_U8, 0, 8192)) {
  58     SDL_Quit();
  59     fprintf(stderr, "FATAL: unable to open audio!\n");
  60     exit(1);
  61   }
  62 #endif
  63   atexit(quitCleanupCB);
  64 }
  65
  66
  67 void initVideo (void) {
  68   screen = SDL_SetVideoMode(640, 400, 32, SDL_SWSURFACE/*|SDL_DOUBLEBUF*/);
  69   if (screen == NULL) {
  70     fprintf(stderr, "FATAL: can't set videomode!\n");
  71     exit(1);
  72   }
  73   //
  74   backbuf = createSurface(640, 480);
  75   if (backbuf == NULL) {
  76     fprintf(stderr, "FATAL: can't create backbuffer!\n");
  77     exit(1);
  78   }
  79   SDL_SetColorKey(backbuf, 0, 0);
  80   //fprintf(stderr, "BPP: %u\n", screen->format->BytesPerPixel);
  81 }
  82
  83
  84 ////////////////////////////////////////////////////////////////////////////////
  85 // create 24bpp surface with color key
  86 SDL_Surface *createSurface (int w, int h) {
  87   //Uint32 rmask, gmask, bmask/*, amask*/;
  88   SDL_Surface *s;
  89   //
  90   if (w < 1 || h < 1) return NULL;
  91 /*
  92 #if SDL_BYTEORDER == SDL_BIG_ENDIAN
  93     rmask = 0xff000000;
  94     gmask = 0x00ff0000;
  95     bmask = 0x0000ff00;
  96     //amask = 0x000000ff;
  97 #else
  98     rmask = 0x000000ff;
  99     gmask = 0x0000ff00;
 100     bmask = 0x00ff0000;
 101     //amask = 0xff000000;
 102 #endif
 103   s = SDL_CreateRGBSurface(SDL_SRCCOLORKEY, w, h, 32, rmask, gmask, bmask, amask);
 104 */
 105   s = SDL_CreateRGBSurface(SDL_SRCCOLORKEY, w, h, screen->format->BitsPerPixel, screen->format->Rmask, screen->format->Gmask, screen->format->Bmask, screen->format->Amask);
 106   if (s != NULL) {
 107     SDL_SetColorKey(s, SDL_SRCCOLORKEY, palette[255]);
 108   }
 109   return s;
 110 }
 111
 112
 113 void blitSurfaceEx (SDL_Surface *dests, int destx, int desty, SDL_Surface *srcs, int srcx, int srcy, int srcw, int srch) {
 114   SDL_Rect src, dst;
 115   //
 116   if (srcw < 0) srcw = srcs->w;
 117   if (srch < 0) srch = srcs->h;
 118   src.x = srcx;
 119   src.y = srcy;
 120   src.w = srcw;
 121   src.h = srch;
 122   dst.x = destx;
 123   dst.y = desty;
 124   SDL_BlitSurface(srcs, &src, dests, &dst);
 125 }
 126
 127
 128 ////////////////////////////////////////////////////////////////////////////////
 129 void lockSurface (SurfaceLock *lock, SDL_Surface *s) {
 130   if (lock) {
 131     lock->s = s;
 132     lock->needUnlock = 0;
 133     if (s != NULL && SDL_MUSTLOCK(s)) {
 134       lock->needUnlock = (SDL_LockSurface(s) == 0);
 135     }
 136   }
 137 }
 138
 139
 140 void unlockSurface (SurfaceLock *lock) {
 141   if (lock && lock->s && lock->needUnlock) {
 142     SDL_UnlockSurface(lock->s);
 143     lock->needUnlock = 0;
 144   }
 145 }
 146
 147
 148 ////////////////////////////////////////////////////////////////////////////////
 149 // surface must be locked!
 150 void drawChar (SDL_Surface *s, char ch, int x, int y, Uint8 clr) {
 151   unsigned char c = (unsigned char)(ch);
 152   //
 153   for (int dy = 0; dy < 8; ++dy) {
 154     Uint8 b = font[c][dy];
 155     //
 156     for (int dx = 0; dx < 8; ++dx) {
 157       if (b&0x80) putPixel2x(s, x+dx, y+dy, clr);
 158       b = (b&0x7f)<<1;
 159     }
 160   }
 161 }
 162
 163
 164 void drawString (SDL_Surface *s, const char *str, int x, int y, Uint8 clr) {
 165   for (; *str; ++str) {
 166     drawChar(s, *str, x, y, clr);
 167     x += 8;
 168   }
 169 }