restore trunk
[supertux.git] / src / video / sdl_renderer.cpp
1 //  $Id: sdl_renderer.cpp 5063 2007-05-27 11:32:00Z matzeb $
2 //
3 //  SuperTux
4 //  Copyright (C) 2006 Matthias Braun <matze@braunis.de>
5 //
6 //  This program is free software; you can redistribute it and/or
7 //  modify it under the terms of the GNU General Public License
8 //  as published by the Free Software Foundation; either version 2
9 //  of the License, or (at your option) any later version.
10 //
11 //  This program is distributed in the hope that it will be useful,
12 //  but WITHOUT ANY WARRANTY; without even the implied warranty of
13 //  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14 //  GNU General Public License for more details.
15 //
16 //  You should have received a copy of the GNU General Public License
17 //  along with this program; if not, write to the Free Software
18 //  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
19 #include <config.h>
20
21 #include <functional>
22 #include <algorithm>
23 #include <stdexcept>
24 #include <cassert>
25 #include <iostream>
26 #include <SDL_image.h>
27 #include <sstream>
28 #include <iomanip>
29 #include <physfs.h>
30
31 #include "glutil.hpp"
32 #include "sdl_renderer.hpp"
33 #include "sdl_texture.hpp"
34 #include "sdl_surface_data.hpp"
35 #include "drawing_context.hpp"
36 #include "drawing_request.hpp"
37 #include "surface.hpp"
38 #include "font.hpp"
39 #include "main.hpp"
40 #include "gameconfig.hpp"
41 #include "log.hpp"
42 #include "texture.hpp"
43 #include "texture_manager.hpp"
44 #include "obstack/obstackpp.hpp"
45
46 namespace
47 {
48   SDL_Surface *apply_alpha(SDL_Surface *src, float alpha_factor)
49   {
50     // FIXME: This is really slow
51     assert(src->format->Amask);
52     int alpha = (int) (alpha_factor * 256);
53     SDL_Surface *dst = SDL_CreateRGBSurface(src->flags, src->w, src->h, src->format->BitsPerPixel, src->format->Rmask,  src->format->Gmask, src->format->Bmask, src->format->Amask);
54     int bpp = dst->format->BytesPerPixel;
55     if(SDL_MUSTLOCK(src))
56     {
57       SDL_LockSurface(src);
58     }
59     if(SDL_MUSTLOCK(dst))
60     {
61       SDL_LockSurface(dst);
62     }
63     for(int y = 0;y < dst->h;y++) {
64       for(int x = 0;x < dst->w;x++) {
65         Uint8 *srcpixel = (Uint8 *) src->pixels + y * src->pitch + x * bpp;
66         Uint8 *dstpixel = (Uint8 *) dst->pixels + y * dst->pitch + x * bpp;
67         Uint32 mapped = 0;
68         switch(bpp) {
69           case 1:
70             mapped = *srcpixel;
71             break;
72           case 2:
73             mapped = *(Uint16 *)srcpixel;
74             break;
75           case 3:
76 #if SDL_BYTEORDER == SDL_BIG_ENDIAN
77             mapped |= srcpixel[0] << 16;
78             mapped |= srcpixel[1] << 8;
79             mapped |= srcpixel[2] << 0;
80 #else
81             mapped |= srcpixel[0] << 0;
82             mapped |= srcpixel[1] << 8;
83             mapped |= srcpixel[2] << 16;
84 #endif
85             break;
86           case 4:
87             mapped = *(Uint32 *)srcpixel;
88             break;
89         }
90         Uint8 r, g, b, a;
91         SDL_GetRGBA(mapped, src->format, &r, &g, &b, &a);
92         mapped = SDL_MapRGBA(dst->format, r, g, b, (a * alpha) >> 8);
93         switch(bpp) {
94           case 1:
95             *dstpixel = mapped;
96             break;
97           case 2:
98             *(Uint16 *)dstpixel = mapped;
99             break;
100           case 3:
101 #if SDL_BYTEORDER == SDL_BIG_ENDIAN
102             dstpixel[0] = (mapped >> 16) & 0xff;
103             dstpixel[1] = (mapped >> 8) & 0xff;
104             dstpixel[2] = (mapped >> 0) & 0xff;
105 #else
106             dstpixel[0] = (mapped >> 0) & 0xff;
107             dstpixel[1] = (mapped >> 8) & 0xff;
108             dstpixel[2] = (mapped >> 16) & 0xff;
109 #endif
110             break;
111           case 4:
112             *(Uint32 *)dstpixel = mapped;
113             break;
114         }
115       }
116     }
117     if(SDL_MUSTLOCK(dst))
118     {
119       SDL_UnlockSurface(dst);
120     }
121     if(SDL_MUSTLOCK(src))
122     {
123       SDL_UnlockSurface(src);
124     }
125     return dst;
126   }
127 }
128
129 namespace SDL
130 {
131   Renderer::Renderer()
132   {
133     const SDL_VideoInfo *info = SDL_GetVideoInfo();
134     log_info << "Hardware surfaces are " << (info->hw_available ? "" : "not ") << "available." << std::endl;
135     log_info << "Hardware to hardware blits are " << (info->blit_hw ? "" : "not ") << "accelerated." << std::endl;
136     log_info << "Hardware to hardware blits with colorkey are " << (info->blit_hw_CC ? "" : "not ") << "accelerated." << std::endl;
137     log_info << "Hardware to hardware blits with alpha are " << (info->blit_hw_A ? "" : "not ") << "accelerated." << std::endl;
138     log_info << "Software to hardware blits are " << (info->blit_sw ? "" : "not ") << "accelerated." << std::endl;
139     log_info << "Software to hardware blits with colorkey are " << (info->blit_sw_CC ? "" : "not ") << "accelerated." << std::endl;
140     log_info << "Software to hardware blits with alpha are " << (info->blit_sw_A ? "" : "not ") << "accelerated." << std::endl;
141     log_info << "Color fills are " << (info->blit_fill ? "" : "not ") << "accelerated." << std::endl;
142
143     int flags = SDL_SWSURFACE | SDL_ANYFORMAT;
144     if(config->use_fullscreen)
145       flags |= SDL_FULLSCREEN;
146     int width = config->screenwidth;
147     int height = config->screenheight;
148
149     screen = SDL_SetVideoMode(width, height, 0, flags);
150     if(screen == 0) {
151       std::stringstream msg;
152       msg << "Couldn't set video mode (" << width << "x" << height
153           << "): " << SDL_GetError();
154       throw std::runtime_error(msg.str());
155     }
156
157     float xfactor = (float) config->screenwidth / SCREEN_WIDTH;
158     float yfactor = (float) config->screenheight / SCREEN_HEIGHT;
159     if(xfactor < yfactor)
160     {
161       numerator = config->screenwidth;
162       denominator = SCREEN_WIDTH;
163     }
164     else
165     {
166       numerator = config->screenheight;
167       denominator = SCREEN_HEIGHT;
168     }
169
170     if(texture_manager == 0)
171       texture_manager = new TextureManager();
172   }
173
174   Renderer::~Renderer()
175   {
176   }
177
178   void
179   Renderer::draw_surface(const DrawingRequest& request)
180   {
181     //FIXME: support parameters request.alpha, request.angle, request.blend
182     const Surface* surface = (const Surface*) request.request_data;
183     SDL::Texture *sdltexture = dynamic_cast<SDL::Texture *>(surface->get_texture());
184     SDL::SurfaceData *surface_data = reinterpret_cast<SDL::SurfaceData *>(surface->get_surface_data());
185
186     DrawingEffect effect = request.drawing_effect;
187     if (surface->get_flipx()) effect = HORIZONTAL_FLIP;
188
189     SDL_Surface *transform = sdltexture->get_transform(request.color, effect);
190
191     // get and check SDL_Surface
192     if (transform == 0) {
193       std::cerr << "Warning: Tried to draw NULL surface, skipped draw" << std::endl;
194       return;
195     }   
196
197     SDL_Rect *src_rect = surface_data->get_src_rect(effect);
198     SDL_Rect dst_rect;
199     dst_rect.x = (int) request.pos.x * numerator / denominator;
200     dst_rect.y = (int) request.pos.y * numerator / denominator;
201
202     Uint8 alpha = 0;
203     if(request.alpha != 1.0)
204     {
205       if(!transform->format->Amask)
206       {
207         if(transform->flags & SDL_SRCALPHA)
208         {
209           alpha = transform->format->alpha;
210         }
211         else
212         {
213           alpha = 255;
214         }
215         SDL_SetAlpha(transform, SDL_SRCALPHA, (Uint8) (request.alpha * alpha));
216       }
217       /*else
218       {
219         transform = apply_alpha(transform, request.alpha);
220       }*/
221     }
222
223     SDL_BlitSurface(transform, src_rect, screen, &dst_rect);
224
225     if(request.alpha != 1.0)
226     {
227       if(!transform->format->Amask)
228       {
229         if(alpha == 255)
230         {
231           SDL_SetAlpha(transform, SDL_RLEACCEL, 0);
232         }
233         else
234         {
235           SDL_SetAlpha(transform, SDL_SRCALPHA | SDL_RLEACCEL, alpha);
236         }
237       }
238       /*else
239       {
240         SDL_FreeSurface(transform);
241       }*/
242     }
243   }
244
245   void
246   Renderer::draw_surface_part(const DrawingRequest& request)
247   {
248     const SurfacePartRequest* surfacepartrequest
249       = (SurfacePartRequest*) request.request_data;
250
251     const Surface* surface = surfacepartrequest->surface;
252     SDL::Texture *sdltexture = dynamic_cast<SDL::Texture *>(surface->get_texture());
253
254     DrawingEffect effect = request.drawing_effect;
255     if (surface->get_flipx()) effect = HORIZONTAL_FLIP;
256
257     SDL_Surface *transform = sdltexture->get_transform(Color(1.0, 1.0, 1.0), effect);
258
259     // get and check SDL_Surface
260     if (transform == 0) {
261       std::cerr << "Warning: Tried to draw NULL surface, skipped draw" << std::endl;
262       return;
263     }   
264
265     int ox, oy;
266     if (effect == HORIZONTAL_FLIP)
267     {
268       ox = sdltexture->get_texture_width() - surface->get_x() - (int) surfacepartrequest->size.x;
269     }
270     else
271     {
272       ox = surface->get_x();
273     }
274     if (effect == VERTICAL_FLIP)
275     {
276       oy = sdltexture->get_texture_height() - surface->get_y() - (int) surfacepartrequest->size.y;
277     }
278     else
279     {
280       oy = surface->get_y();
281     }
282
283     SDL_Rect src_rect;
284     src_rect.x = (ox + (int) surfacepartrequest->source.x) * numerator / denominator;
285     src_rect.y = (oy + (int) surfacepartrequest->source.y) * numerator / denominator;
286     src_rect.w = (int) surfacepartrequest->size.x * numerator / denominator;
287     src_rect.h = (int) surfacepartrequest->size.y * numerator / denominator;
288
289     SDL_Rect dst_rect;
290     dst_rect.x = (int) request.pos.x * numerator / denominator;
291     dst_rect.y = (int) request.pos.y * numerator / denominator;
292
293     Uint8 alpha = 0;
294     if(request.alpha != 1.0)
295     {
296       if(!transform->format->Amask)
297       {
298         if(transform->flags & SDL_SRCALPHA)
299         {
300           alpha = transform->format->alpha;
301         }
302         else
303         {
304           alpha = 255;
305         }
306         SDL_SetAlpha(transform, SDL_SRCALPHA, (Uint8) (request.alpha * alpha));
307       }
308       /*else
309       {
310         transform = apply_alpha(transform, request.alpha);
311       }*/
312     }
313
314     SDL_BlitSurface(transform, &src_rect, screen, &dst_rect);
315
316     if(request.alpha != 1.0)
317     {
318       if(!transform->format->Amask)
319       {
320         if(alpha == 255)
321         {
322           SDL_SetAlpha(transform, SDL_RLEACCEL, 0);
323         }
324         else
325         {
326           SDL_SetAlpha(transform, SDL_SRCALPHA | SDL_RLEACCEL, alpha);
327         }
328       }
329       /*else
330       {
331         SDL_FreeSurface(transform);
332       }*/
333     }
334   }
335
336   void
337   Renderer::draw_gradient(const DrawingRequest& request)
338   {
339     const GradientRequest* gradientrequest 
340       = (GradientRequest*) request.request_data;
341     const Color& top = gradientrequest->top;
342     const Color& bottom = gradientrequest->bottom;
343
344     for(int y = 0;y < screen->h;++y)
345     {
346       Uint8 r = (Uint8)((((float)(top.red-bottom.red)/(0-screen->h)) * y + top.red) * 255);
347       Uint8 g = (Uint8)((((float)(top.green-bottom.green)/(0-screen->h)) * y + top.green) * 255);
348       Uint8 b = (Uint8)((((float)(top.blue-bottom.blue)/(0-screen->h)) * y + top.blue) * 255);
349       Uint8 a = (Uint8)((((float)(top.alpha-bottom.alpha)/(0-screen->h)) * y + top.alpha) * 255);
350       Uint32 color = SDL_MapRGB(screen->format, r, g, b);
351
352       SDL_Rect rect;
353       rect.x = 0;
354       rect.y = y;
355       rect.w = screen->w;
356       rect.h = 1;
357
358       if(a == SDL_ALPHA_OPAQUE) {
359         SDL_FillRect(screen, &rect, color);
360       } else if(a != SDL_ALPHA_TRANSPARENT) {
361         SDL_Surface *temp = SDL_CreateRGBSurface(screen->flags, rect.w, rect.h, screen->format->BitsPerPixel, screen->format->Rmask, screen->format->Gmask, screen->format->Bmask, screen->format->Amask);
362
363         SDL_FillRect(temp, 0, color);
364         SDL_SetAlpha(temp, SDL_SRCALPHA | SDL_RLEACCEL, a);
365         SDL_BlitSurface(temp, 0, screen, &rect);
366         SDL_FreeSurface(temp);
367       }
368     }
369   }
370
371   void
372   Renderer::draw_filled_rect(const DrawingRequest& request)
373   {
374     const FillRectRequest* fillrectrequest
375       = (FillRectRequest*) request.request_data;
376
377     SDL_Rect rect;
378     rect.x = (Sint16)request.pos.x * screen->w / SCREEN_WIDTH;
379     rect.y = (Sint16)request.pos.y * screen->h / SCREEN_HEIGHT;
380     rect.w = (Uint16)fillrectrequest->size.x * screen->w / SCREEN_WIDTH;
381     rect.h = (Uint16)fillrectrequest->size.y * screen->h / SCREEN_HEIGHT;
382     Uint8 r = static_cast<Uint8>(fillrectrequest->color.red * 255);
383     Uint8 g = static_cast<Uint8>(fillrectrequest->color.green * 255);
384     Uint8 b = static_cast<Uint8>(fillrectrequest->color.blue * 255);
385     Uint8 a = static_cast<Uint8>(fillrectrequest->color.alpha * 255);
386     Uint32 color = SDL_MapRGB(screen->format, r, g, b);
387     if(a == SDL_ALPHA_OPAQUE) {
388       SDL_FillRect(screen, &rect, color);
389     } else if(a != SDL_ALPHA_TRANSPARENT) {
390       SDL_Surface *temp = SDL_CreateRGBSurface(screen->flags, rect.w, rect.h, screen->format->BitsPerPixel, screen->format->Rmask, screen->format->Gmask, screen->format->Bmask, screen->format->Amask);
391
392       SDL_FillRect(temp, 0, color);
393       SDL_SetAlpha(temp, SDL_SRCALPHA | SDL_RLEACCEL, a);
394       SDL_BlitSurface(temp, 0, screen, &rect);
395       SDL_FreeSurface(temp);
396     }
397   }
398
399   void 
400   Renderer::do_take_screenshot()
401   {
402     // [Christoph] TODO: Yes, this method also takes care of the actual disk I/O. Split it?
403
404     SDL_Surface *screen = SDL_GetVideoSurface();
405
406     // save screenshot
407     static const std::string writeDir = PHYSFS_getWriteDir();
408     static const std::string dirSep = PHYSFS_getDirSeparator();
409     static const std::string baseName = "screenshot";
410     static const std::string fileExt = ".bmp";
411     std::string fullFilename;
412     for (int num = 0; num < 1000; num++) {
413       std::ostringstream oss;
414       oss << baseName;
415       oss << std::setw(3) << std::setfill('0') << num;
416       oss << fileExt;
417       std::string fileName = oss.str();
418       fullFilename = writeDir + dirSep + fileName;
419       if (!PHYSFS_exists(fileName.c_str())) {
420         SDL_SaveBMP(screen, fullFilename.c_str());
421         log_debug << "Wrote screenshot to \"" << fullFilename << "\"" << std::endl;
422         return;
423       }
424     }
425     log_warning << "Did not save screenshot, because all files up to \"" << fullFilename << "\" already existed" << std::endl;
426   }
427
428   void
429   Renderer::flip()
430   {
431     SDL_Flip(screen);
432   }
433 }