graphics.c

Go to the documentation of this file.

/***********************************************************************
 Freeciv - Copyright (C) 1996 - A Kjeldberg, L Gregersen, P Unold
   This program is free software; you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published by
   the Free Software Foundation; either version 2, or (at your option)
   any later version.
 
   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.
***********************************************************************/
 
/***********************************************************************
                          graphics.c  -  description
                             -------------------
    begin                : Mon Jul 1 2002
    copyright            : (C) 2000 by Michael Speck
                         : (C) 2002 by Rafał Bursig
    email                : Michael Speck <kulkanie@gmx.net>
                         : Rafał Bursig <bursig@poczta.fm>
***********************************************************************/
 
#ifdef HAVE_CONFIG_H
#include <fc_config.h>
#endif
 
/* SDL3 */
#include <SDL3_image/SDL_image.h>
#include <SDL3_ttf/SDL_ttf.h>
 
/* utility */
#include "fcintl.h"
#include "log.h"
 
/* client */
#include "tilespec.h"
 
/* gui-sdl3 */
#include "colors.h"
#include "gui_tilespec.h"
#include "mapview.h"
#include "themebackgrounds.h"
#include "themespec.h"
 
#include "graphics.h"
 
/* ------------------------------ */
 
struct sdl3_data main_data;
 
static SDL_Surface *main_surface = NULL;
 
static bool render_dirty = TRUE;
 
/**********************************************************************/
struct gui_layer *gui_layer_new(int x, int y, SDL_Surface *surface)
{
  struct gui_layer *result;
 
  result = fc_calloc(1, sizeof(struct gui_layer));
 
  result->dest_rect = (SDL_Rect){x, y, 0, 0};
  result->surface = surface;
 
  return result;
}
 
/**********************************************************************/
void gui_layer_destroy(struct gui_layer **gui_layer)
{
  FREESURFACE((*gui_layer)->surface);
  FC_FREE(*gui_layer);
}
 
/**********************************************************************/
struct gui_layer *get_gui_layer(SDL_Surface *surface)
{
  int i = 0;
 
  while ((i < main_data.guis_count) && main_data.guis[i]) {
    if (main_data.guis[i]->surface == surface) {
      return main_data.guis[i];
    }
    i++;
  }
 
  return NULL;
}
 
/**********************************************************************/
struct gui_layer *add_gui_layer(int width, int height)
{
  struct gui_layer *gui_layer = NULL;
  SDL_Surface *buffer;
 
  buffer = create_surf(width, height);
  gui_layer = gui_layer_new(0, 0, buffer);
 
  /* Add to buffers array */
  if (main_data.guis) {
    int i;
 
    /* Find NULL element */
    for (i = 0; i < main_data.guis_count; i++) {
      if (!main_data.guis[i]) {
        main_data.guis[i] = gui_layer;
        return gui_layer;
      }
    }
    main_data.guis_count++;
    main_data.guis = fc_realloc(main_data.guis,
                                main_data.guis_count * sizeof(struct gui_layer *));
    main_data.guis[main_data.guis_count - 1] = gui_layer;
  } else {
    main_data.guis = fc_calloc(1, sizeof(struct gui_layer *));
    main_data.guis[0] = gui_layer;
    main_data.guis_count = 1;
  }
 
  return gui_layer;
}
 
/**********************************************************************/
void remove_gui_layer(struct gui_layer *gui_layer)
{
  int i;
 
  for (i = 0; i < main_data.guis_count - 1; i++) {
    if (main_data.guis[i] && (main_data.guis[i] == gui_layer)) {
      gui_layer_destroy(&main_data.guis[i]);
      main_data.guis[i] = main_data.guis[i + 1];
      main_data.guis[i + 1] = NULL;
    } else {
      if (!main_data.guis[i]) {
        main_data.guis[i] = main_data.guis[i + 1];
        main_data.guis[i + 1] = NULL;
      }
    }
  }
 
  if (main_data.guis[main_data.guis_count - 1]) {
    gui_layer_destroy(&main_data.guis[main_data.guis_count - 1]);
  }
}
 
/**********************************************************************/
void screen_rect_to_layer_rect(struct gui_layer *gui_layer,
                               SDL_Rect *dest_rect)
{
  if (gui_layer) {
    dest_rect->x = dest_rect->x - gui_layer->dest_rect.x;
    dest_rect->y = dest_rect->y - gui_layer->dest_rect.y;
  }
}
 
/**********************************************************************/
void layer_rect_to_screen_rect(struct gui_layer *gui_layer,
                               SDL_Rect *dest_rect)
{
  if (gui_layer) {
    dest_rect->x = dest_rect->x + gui_layer->dest_rect.x;
    dest_rect->y = dest_rect->y + gui_layer->dest_rect.y;
  }
}
 
/* ============ Freeciv sdl graphics function =========== */
 
/**********************************************************************/
int alphablit(SDL_Surface *src, SDL_Rect *srcrect,
              SDL_Surface *dst, SDL_Rect *dstrect,
              unsigned char alpha_mod)
{
  bool ret;
 
  if (src == NULL || dst == NULL) {
    return 1;
  }
 
  SDL_SetSurfaceAlphaMod(src, alpha_mod);
 
  ret = SDL_BlitSurface(src, srcrect, dst, dstrect);
 
  if (!ret) {
    log_error("SDL_BlitSurface() fails: %s", SDL_GetError());
 
    return -1;
  }
 
  return 0;
}
 
/**********************************************************************/
int screen_blit(SDL_Surface *src, SDL_Rect *srcrect, SDL_Rect *dstrect,
                unsigned char alpha_mod)
{
  render_dirty = TRUE;
 
  return alphablit(src, srcrect, main_surface, dstrect, alpha_mod);
}
 
/**********************************************************************/
SDL_Surface *crop_rect_from_surface(SDL_Surface *psource,
                                    SDL_Rect *prect)
{
  SDL_Surface *new_surf = create_surf_with_format(psource->format,
                                              prect ? prect->w : psource->w,
                                              prect ? prect->h : psource->h);
 
  if (alphablit(psource, prect, new_surf, NULL, 255) != 0) {
    FREESURFACE(new_surf);
 
    return NULL;
  }
 
  return new_surf;
}
 
/**********************************************************************/
SDL_Surface *mask_surface(SDL_Surface *src, SDL_Surface *mask,
                          int mask_offset_x, int mask_offset_y)
{
  SDL_Surface *dest = NULL;
  int row, col;
  Uint32 *src_pixel = NULL;
  Uint32 *dest_pixel = NULL;
  Uint32 *mask_pixel = NULL;
  unsigned char src_alpha, mask_alpha;
  const SDL_PixelFormatDetails *src_details
    = SDL_GetPixelFormatDetails(src->format);
  const SDL_PixelFormatDetails *mask_details
    = SDL_GetPixelFormatDetails(mask->format);
  const SDL_PixelFormatDetails *dest_details;
 
  dest = copy_surface(src);
 
  dest_details = SDL_GetPixelFormatDetails(dest->format);
 
  lock_surf(src);
  lock_surf(mask);
  lock_surf(dest);
 
  src_pixel = (Uint32 *)src->pixels;
  dest_pixel = (Uint32 *)dest->pixels;
 
  for (row = 0; row < src->h; row++) {
    mask_pixel = (Uint32 *)mask->pixels
                 + mask->w * (row + mask_offset_y)
                 + mask_offset_x;
 
    for (col = 0; col < src->w; col++) {
      src_alpha = (*src_pixel & src_details->Amask) >> src_details->Ashift;
      mask_alpha = (*mask_pixel & mask_details->Amask) >> mask_details->Ashift;
 
      *dest_pixel = (*src_pixel & ~src_details->Amask)
        | (((src_alpha * mask_alpha) / 255) << dest_details->Ashift);
 
      src_pixel++; dest_pixel++; mask_pixel++;
    }
  }
 
  unlock_surf(dest);
  unlock_surf(mask);
  unlock_surf(src);
 
  return dest;
}
 
/**********************************************************************/
SDL_Surface *load_surf(const char *fname)
{
  SDL_Surface *buf;
 
  if (!fname) {
    return NULL;
  }
 
  if ((buf = IMG_Load(fname)) == NULL) {
    log_error(_("load_surf: Failed to load graphic file %s!"), fname);
 
    return NULL;
  }
 
  return buf;
}
 
/**********************************************************************/
SDL_Surface *create_surf_with_format(SDL_PixelFormat pf,
                                     int width, int height)
{
  SDL_Surface *surf = SDL_CreateSurface(width, height, pf);
 
  if (surf == NULL) {
    log_error(_("Unable to create Sprite (Surface) of size "
                "%d x %d %d Bits"),
              width, height, SDL_GetPixelFormatDetails(pf)->bits_per_pixel);
    return NULL;
  }
 
  return surf;
}
 
/**********************************************************************/
SDL_Surface *create_surf(int width, int height)
{
  return create_surf_with_format(main_surface->format, width, height);
}
 
/**********************************************************************/
SDL_Surface *convert_surf(SDL_Surface *surf_in)
{
  return SDL_ConvertSurface(surf_in, main_surface->format);
}
 
/**********************************************************************/
SDL_Surface *create_filled_surface(Uint16 w, Uint16 h, SDL_Color *pcolor)
{
  SDL_Surface *new_surf;
  SDL_Color color = {255, 255, 255, 128};
 
  new_surf = create_surf(w, h);
 
  if (!new_surf) {
    return NULL;
  }
 
  if (!pcolor) {
    /* pcolor->unused == ALPHA */
    pcolor = &color;
  }
 
  SDL_FillSurfaceRect(new_surf, NULL,
                      SDL_MapRGBA(SDL_GetPixelFormatDetails(new_surf->format),
                                  NULL,
                                  pcolor->r, pcolor->g, pcolor->b,
                                  pcolor->a));
 
  if (pcolor->a != 255) {
    SDL_SetSurfaceAlphaMod(new_surf, pcolor->a);
  }
 
  return new_surf;
}
 
/**********************************************************************/
int clear_surface(SDL_Surface *surf, SDL_Rect *dstrect)
{
  /* SDL_FillSurfaceRect() might change the rectangle, so we create a copy */
  if (dstrect) {
    SDL_Rect _dstrect = *dstrect;
 
    return SDL_FillSurfaceRect(surf, &_dstrect,
                               SDL_MapRGBA(SDL_GetPixelFormatDetails(surf->format),
                                           NULL, 0, 0, 0, 0));
  } else {
    return SDL_FillSurfaceRect(surf, NULL,
                               SDL_MapRGBA(SDL_GetPixelFormatDetails(surf->format),
                                           NULL, 0, 0, 0, 0));
  }
}
 
/**********************************************************************/
int blit_entire_src(SDL_Surface *psrc, SDL_Surface *pdest,
                    Sint16 dest_x, Sint16 dest_y)
{
  SDL_Rect dest_rect = { dest_x, dest_y, 0, 0 };
 
  return alphablit(psrc, NULL, pdest, &dest_rect, 255);
}
 
/**********************************************************************/
Uint32 get_pixel(SDL_Surface *surf, Sint16 x, Sint16 y)
{
  if (!surf) {
    return 0x0;
  }
 
  switch (SDL_GetPixelFormatDetails(surf->format)->bytes_per_pixel) {
  case 1:
    return *(Uint8 *) ((Uint8 *) surf->pixels + y * surf->pitch + x);
 
  case 2:
    return *((Uint16 *)surf->pixels + y * surf->pitch / sizeof(Uint16) + x);
 
  case 3:
    {
      /* Here ptr is the address to the pixel we want to retrieve */
      Uint8 *ptr =
        (Uint8 *) surf->pixels + y * surf->pitch + x * 3;
 
      if (is_bigendian()) {
        return ptr[0] << 16 | ptr[1] << 8 | ptr[2];
      } else {
        return ptr[0] | ptr[1] << 8 | ptr[2] << 16;
      }
    }
  case 4:
    return *((Uint32 *)surf->pixels + y * surf->pitch / sizeof(Uint32) + x);
 
  default:
    return 0; /* Shouldn't happen, but avoids warnings */
  }
}
 
/**********************************************************************/
Uint32 get_first_pixel(SDL_Surface *surf)
{
  if (!surf) {
    return 0;
  }
 
  switch (SDL_GetPixelFormatDetails(surf->format)->bytes_per_pixel) {
  case 1:
    return *((Uint8 *)surf->pixels);
 
  case 2:
    return *((Uint16 *)surf->pixels);
 
  case 3:
    {
      if (is_bigendian()) {
        return (((Uint8 *)surf->pixels)[0] << 16)
          | (((Uint8 *)surf->pixels)[1] << 8)
          | ((Uint8 *)surf->pixels)[2];
      } else {
        return ((Uint8 *)surf->pixels)[0]
          | (((Uint8 *)surf->pixels)[1] << 8)
          | (((Uint8 *)surf->pixels)[2] << 16);
      }
    }
  case 4:
    return *((Uint32 *)surf->pixels);
 
  default:
    return 0; /* Shouldn't happen, but avoids warnings */
  }
}
 
/* ===================================================================== */
 
/**********************************************************************/
void init_sdl(int flags)
{
  bool success;
 
  main_data.screen = NULL;
  main_data.guis = NULL;
  main_data.gui = NULL;
  main_data.map = NULL;
  main_data.dummy = NULL; /* Can't create yet -- hope we don't need it */
  main_data.renderer = NULL;
  main_data.rects_count = 0;
  main_data.guis_count = 0;
 
  if (SDL_WasInit(SDL_INIT_AUDIO)) {
    success = SDL_InitSubSystem(flags);
  } else {
    success = SDL_Init(flags);
  }
  if (!success) {
    log_fatal(_("Unable to initialize SDL3 library: %s"), SDL_GetError());
    exit(EXIT_FAILURE);
  }
 
  atexit(SDL_Quit);
 
  /* Initialize the TTF library */
  if (!TTF_Init()) {
    log_fatal(_("Unable to initialize SDL3_ttf library: %s"), SDL_GetError());
    exit(EXIT_FAILURE);
  }
 
  atexit(TTF_Quit);
}
 
/**********************************************************************/
static void free_surfaces(void)
{
  if (main_data.renderer != NULL) {
    SDL_DestroyRenderer(main_data.renderer);
    main_data.renderer = NULL;
 
    FREESURFACE(main_surface);
  }
}
 
/**********************************************************************/
bool create_surfaces(int width, int height)
{
  free_surfaces();
 
  main_surface = SDL_CreateSurface(width, height, SDL_PIXELFORMAT_RGBA8888);
  main_data.map = SDL_CreateSurface(width, height, SDL_PIXELFORMAT_RGBA8888);
 
  if (main_surface == NULL || main_data.map == NULL) {
    log_fatal(_("Failed to create RGB surface: %s"), SDL_GetError());
    return FALSE;
  }
 
  main_data.renderer = SDL_CreateRenderer(main_data.screen, NULL);
 
  if (main_data.renderer == NULL) {
    log_fatal(_("Failed to create renderer: %s"), SDL_GetError());
    return FALSE;
  }
 
  main_data.maintext = SDL_CreateTexture(main_data.renderer,
                                         SDL_PIXELFORMAT_RGBA8888,
                                         SDL_TEXTUREACCESS_STREAMING,
                                         width, height);
 
  if (main_data.maintext == NULL) {
    log_fatal(_("Failed to create texture: %s"), SDL_GetError());
    return FALSE;
  }
 
  if (main_data.gui) {
    FREESURFACE(main_data.gui->surface);
    main_data.gui->surface = create_surf(width, height);
  } else {
    main_data.gui = add_gui_layer(width, height);
  }
 
  clear_surface(main_data.gui->surface, NULL);
 
  return TRUE;
}
 
/**********************************************************************/
void quit_sdl(void)
{
  FC_FREE(main_data.guis);
  gui_layer_destroy(&main_data.gui);
  FREESURFACE(main_data.map);
  FREESURFACE(main_data.dummy);
  SDL_DestroyTexture(main_data.maintext);
 
  free_surfaces();
}
 
/**********************************************************************/
bool set_video_mode(unsigned width, unsigned height, unsigned flags_in)
{
  main_data.screen = SDL_CreateWindow(_("SDL3 Client for Freeciv"),
                                      width, height, 0);
 
  if (main_data.screen == NULL) {
    log_fatal(_("Failed to create main window: %s"), SDL_GetError());
    return FALSE;
  }
 
  if (flags_in & SDL_WINDOW_FULLSCREEN) {
    const SDL_DisplayMode *mode;
 
    SDL_SetWindowFullscreen(main_data.screen, SDL_WINDOW_FULLSCREEN);
    mode = SDL_GetWindowFullscreenMode(main_data.screen);
    width = mode->w;
    height = mode->h;
  }
 
  if (!create_surfaces(width, height)) {
    return FALSE;
  }
 
  return TRUE;
}
 
/**********************************************************************/
void update_main_screen(void)
{
  if (render_dirty) {
    SDL_UpdateTexture(main_data.maintext, NULL,
                      main_surface->pixels, main_surface->pitch);
    SDL_RenderClear(main_data.renderer);
    SDL_RenderTexture(main_data.renderer, main_data.maintext, NULL, NULL);
    SDL_RenderPresent(main_data.renderer);
 
    render_dirty = FALSE;
  }
}
 
/**********************************************************************/
int main_window_width(void)
{
  return main_surface->w;
}
 
/**********************************************************************/
int main_window_height(void)
{
  return main_surface->h;
}
 
/**********************************************************************/
int fill_rect_alpha(SDL_Surface *surf, SDL_Rect *prect,
                    SDL_Color *pcolor)
{
  SDL_Surface *colorbar;
 
  if (prect && (prect->x < - prect->w || prect->x >= surf->w
                || prect->y < - prect->h || prect->y >= surf->h)) {
    return -2;
  }
 
  if (pcolor->a == 255) {
    return SDL_FillSurfaceRect(surf, prect,
                               SDL_MapRGB(SDL_GetPixelFormatDetails(surf->format),
                                          NULL,
                                          pcolor->r, pcolor->g, pcolor->b));
  }
 
  if (!pcolor->a) {
    return -3;
  }
 
  colorbar = create_surf(surf->w, surf->h);
 
  SDL_FillSurfaceRect(colorbar, prect,
                      SDL_MapRGB(SDL_GetPixelFormatDetails(surf->format),
                                 NULL,
                                 pcolor->r, pcolor->g, pcolor->b));
 
  return alphablit(colorbar, NULL, surf, NULL, pcolor->a);
}
 
/**********************************************************************/
bool correct_rect_region(SDL_Rect *prect)
{
  int ww = prect->w, hh = prect->h;
 
  if (prect->x < 0) {
    ww += prect->x;
    prect->x = 0;
  }
 
  if (prect->y < 0) {
    hh += prect->y;
    prect->y = 0;
  }
 
  if (prect->x + ww > main_window_width()) {
    ww = main_window_width() - prect->x;
  }
 
  if (prect->y + hh > main_window_height()) {
    hh = main_window_height() - prect->y;
  }
 
  /* End Correction */
 
  if (ww <= 0 || hh <= 0) {
    return FALSE; /* surprise :) */
  } else {
    prect->w = ww;
    prect->h = hh;
  }
 
  return TRUE;
}
 
/**********************************************************************/
bool is_in_rect_area(int x, int y, const SDL_Rect *rect)
{
  return ((x >= rect->x) && (x < rect->x + rect->w)
          && (y >= rect->y) && (y < rect->y + rect->h));
}
 
/* ===================================================================== */
 
/**********************************************************************/
void get_smaller_surface_rect(SDL_Surface *surf, SDL_Rect *rect)
{
  int w, h, x, y;
  Uint16 minX, maxX, minY, maxY;
  Uint32 colorkey;
  Uint32 mask;
  const struct SDL_PixelFormatDetails *details
    = SDL_GetPixelFormatDetails(surf->format);
 
  fc_assert(surf != NULL);
  fc_assert(rect != NULL);
 
  minX = surf->w;
  maxX = 0;
  minY = surf->h;
  maxY = 0;
 
  if (!SDL_GetSurfaceColorKey(surf, &colorkey)) {
    /* Use alpha instead of colorkey */
    mask = details->Amask;
    colorkey = 0;
  } else {
    mask = 0xffffffff;
  }
 
  lock_surf(surf);
 
  switch (details->bytes_per_pixel) {
  case 1:
  {
    Uint8 *pixel = (Uint8 *)surf->pixels;
    Uint8 *start = pixel;
 
    x = 0;
    y = 0;
    w = surf->w;
    h = surf->h;
    while (h--) {
      do {
        if (*pixel != colorkey) {
          if (minY > y) {
            minY = y;
          }
 
          if (minX > x) {
            minX = x;
          }
          break;
        }
        pixel++;
        x++;
      } while (--w > 0);
      w = surf->w;
      x = 0;
      y++;
      pixel = start + surf->pitch;
      start = pixel;
    }
 
    w = surf->w;
    h = surf->h;
    x = w - 1;
    y = h - 1;
    pixel = (Uint8 *)((Uint8 *)surf->pixels + (y * surf->pitch) + x);
    start = pixel;
    while (h--) {
      do {
        if (*pixel != colorkey) {
          if (maxY < y) {
            maxY = y;
          }
 
          if (maxX < x) {
            maxX = x;
          }
          break;
        }
        pixel--;
        x--;
      } while (--w > 0);
      w = surf->w;
      x = w - 1;
      y--;
      pixel = start - surf->pitch;
      start = pixel;
    }
    break;
  }
  case 2:
  {
    Uint16 *pixel = (Uint16 *)surf->pixels;
    Uint16 *start = pixel;
 
    x = 0;
    y = 0;
    w = surf->w;
    h = surf->h;
    while (h--) {
      do {
        if (*pixel != colorkey) {
          if (minY > y) {
            minY = y;
          }
 
          if (minX > x) {
            minX = x;
          }
          break;
        }
        pixel++;
        x++;
      } while (--w > 0);
      w = surf->w;
      x = 0;
      y++;
      pixel = start + surf->pitch / 2;
      start = pixel;
    }
 
    w = surf->w;
    h = surf->h;
    x = w - 1;
    y = h - 1;
    pixel = ((Uint16 *)surf->pixels + (y * surf->pitch / 2) + x);
    start = pixel;
    while (h--) {
      do {
        if (*pixel != colorkey) {
          if (maxY < y) {
            maxY = y;
          }
 
          if (maxX < x) {
            maxX = x;
          }
          break;
        }
        pixel--;
        x--;
      } while (--w > 0);
      w = surf->w;
      x = w - 1;
      y--;
      pixel = start - surf->pitch / 2;
      start = pixel;
    }
    break;
  }
  case 3:
  {
    Uint8 *pixel = (Uint8 *)surf->pixels;
    Uint8 *start = pixel;
    Uint32 color;
 
    x = 0;
    y = 0;
    w = surf->w;
    h = surf->h;
    while (h--) {
      do {
        if (is_bigendian()) {
          color = (pixel[0] << 16 | pixel[1] << 8 | pixel[2]);
        } else {
          color = (pixel[0] | pixel[1] << 8 | pixel[2] << 16);
        }
        if (color != colorkey) {
          if (minY > y) {
            minY = y;
          }
 
          if (minX > x) {
            minX = x;
          }
          break;
        }
        pixel += 3;
        x++;
      } while (--w > 0);
      w = surf->w;
      x = 0;
      y++;
      pixel = start + surf->pitch / 3;
      start = pixel;
    }
 
    w = surf->w;
    h = surf->h;
    x = w - 1;
    y = h - 1;
    pixel = (Uint8 *)((Uint8 *)surf->pixels + (y * surf->pitch) + x * 3);
    start = pixel;
    while (h--) {
      do {
        if (is_bigendian()) {
          color = (pixel[0] << 16 | pixel[1] << 8 | pixel[2]);
        } else {
          color = (pixel[0] | pixel[1] << 8 | pixel[2] << 16);
        }
        if (color != colorkey) {
          if (maxY < y) {
            maxY = y;
          }
 
          if (maxX < x) {
            maxX = x;
          }
          break;
        }
        pixel -= 3;
        x--;
      } while (--w > 0);
      w = surf->w;
      x = w - 1;
      y--;
      pixel = start - surf->pitch / 3;
      start = pixel;
    }
    break;
  }
  case 4:
  {
    Uint32 *pixel = (Uint32 *)surf->pixels;
    Uint32 *start = pixel;
 
    x = 0;
    y = 0;
    w = surf->w;
    h = surf->h;
    while (h--) {
      do {
        if (((*pixel) & mask) != colorkey) {
          if (minY > y) {
            minY = y;
          }
 
          if (minX > x) {
            minX = x;
          }
          break;
        }
        pixel++;
        x++;
      } while (--w > 0);
      w = surf->w;
      x = 0;
      y++;
      pixel = start + surf->pitch / 4;
      start = pixel;
    }
 
    w = surf->w;
    h = surf->h;
    x = w - 1;
    y = h - 1;
    pixel = ((Uint32 *)surf->pixels + (y * surf->pitch / 4) + x);
    start = pixel;
    while (h--) {
      do {
        if (((*pixel) & mask) != colorkey) {
          if (maxY < y) {
            maxY = y;
          }
 
          if (maxX < x) {
            maxX = x;
          }
          break;
        }
        pixel--;
        x--;
      } while (--w > 0);
      w = surf->w;
      x = w - 1;
      y--;
      pixel = start - surf->pitch / 4;
      start = pixel;
    }
    break;
  }
  }
 
  unlock_surf(surf);
  rect->x = minX;
  rect->y = minY;
  rect->w = maxX - minX + 1;
  rect->h = maxY - minY + 1;
}
 
/**********************************************************************/
SDL_Surface *crop_visible_part_from_surface(SDL_Surface *psrc)
{
  SDL_Rect src;
 
  get_smaller_surface_rect(psrc, &src);
 
  return crop_rect_from_surface(psrc, &src);
}
 
/**********************************************************************/
SDL_Surface *resize_surface(const SDL_Surface *psrc, Uint16 new_width,
                            Uint16 new_height, int smooth)
{
  if (psrc == NULL) {
    return NULL;
  }
 
  return zoomSurface((SDL_Surface*)psrc,
                     (double)new_width / psrc->w,
                     (double)new_height / psrc->h,
                     smooth);
}
 
/**********************************************************************/
SDL_Surface *resize_surface_box(const SDL_Surface *psrc,
                                Uint16 new_width, Uint16 new_height,
                                int smooth, bool scale_up,
                                bool absolute_dimensions)
{
  SDL_Surface *tmp_surface, *result;
 
  if (psrc == NULL) {
    return NULL;
  }
 
  if (!(!scale_up && ((new_width >= psrc->w) && (new_height >= psrc->h)))) {
    if ((new_width - psrc->w) <= (new_height - psrc->h)) {
      /* horizontal limit */
      tmp_surface = zoomSurface((SDL_Surface*)psrc,
                               (double)new_width / psrc->w,
                               (double)new_width / psrc->w,
                               smooth);
    } else {
      /* vertical limit */
      tmp_surface = zoomSurface((SDL_Surface*)psrc,
                               (double)new_height / psrc->h,
                               (double)new_height / psrc->h,
                               smooth);
    }
  } else {
    tmp_surface = zoomSurface((SDL_Surface*)psrc,
                             1.0,
                             1.0,
                             smooth);
  }
 
  if (absolute_dimensions) {
    SDL_Rect area = {
      (new_width - tmp_surface->w) / 2,
      (new_height - tmp_surface->h) / 2,
      0, 0
    };
 
    result = create_surf(new_width, new_height);
    alphablit(tmp_surface, NULL, result, &area, 255);
    FREESURFACE(tmp_surface);
  } else {
    result = tmp_surface;
  }
 
  return result;
}
 
/**********************************************************************/
SDL_Surface *copy_surface(SDL_Surface *src)
{
  SDL_Surface *copy = SDL_CreateSurface(src->w, src->h, src->format);
 
  alphablit(src, NULL, copy, NULL, 255);
 
  return copy;
}
 
/* ============ Freeciv game graphics function =========== */
 
/**********************************************************************/
bool is_view_supported(enum ts_type type)
{
  switch (type) {
  case TS_ISOMETRIC:
  case TS_OVERHEAD:
    return TRUE;
  }
 
  return FALSE;
}
 
/**********************************************************************/
void tileset_type_set(enum ts_type type)
{
}
 
/**********************************************************************/
void create_frame(SDL_Surface *dest, Sint16 left, Sint16 top,
                  Sint16 width, Sint16 height,
                  SDL_Color *pcolor)
{
  struct color gsdl3_color = { .color = pcolor };
  struct sprite *vertical = create_sprite(1, height, &gsdl3_color);
  struct sprite *horizontal = create_sprite(width, 1, &gsdl3_color);
  SDL_Rect tmp, dst = { .x = left, .y = top, .w = 0, .h = 0 };
 
  tmp = dst;
  alphablit(vertical->psurface, NULL, dest, &tmp, 255);
 
  dst.x += width - 1;
  tmp = dst;
  alphablit(vertical->psurface, NULL, dest, &tmp, 255);
 
  dst.x = left;
  tmp = dst;
  alphablit(horizontal->psurface, NULL, dest, &tmp, 255);
 
  dst.y += height - 1;
  tmp = dst;
  alphablit(horizontal->psurface, NULL, dest, &tmp, 255);
 
  free_sprite(horizontal);
  free_sprite(vertical);
}
 
/**********************************************************************/
void create_line(SDL_Surface *dest, Sint16 x0, Sint16 y0, Sint16 x1, Sint16 y1,
                 SDL_Color *pcolor)
{
  int xl = x0 < x1 ? x0 : x1;
  int xr = x0 < x1 ? x1 : x0;
  int yt = y0 < y1 ? y0 : y1;
  int yb = y0 < y1 ? y1 : y0;
  int w = (xr - xl) + 1;
  int h = (yb - yt) + 1;
  struct sprite *spr;
  SDL_Rect dst = { xl, yt, w, h };
  SDL_Color *pcol;
  struct color gsdl3_color;
  int l = MAX((xr - xl) + 1, (yb - yt) + 1);
  int i;
  const struct SDL_PixelFormatDetails *details;
 
  pcol = fc_malloc(sizeof(pcol));
  pcol->r = pcolor->r;
  pcol->g = pcolor->g;
  pcol->b = pcolor->b;
  pcol->a = 0; /* Fill with transparency */
 
  gsdl3_color.color = pcol;
  spr = create_sprite(w, h, &gsdl3_color);
 
  lock_surf(spr->psurface);
  details = SDL_GetPixelFormatDetails(spr->psurface->format);
 
  /* Set off transparency from pixels belonging to the line */
  if ((x0 <= x1 && y0 <= y1)
      || (x1 <= x0 && y1 <= y0)) {
    for (i = 0; i < l; i++) {
      int cx = (xr - xl) * i / l;
      int cy = (yb - yt) * i / l;
 
      *((Uint32 *)spr->psurface->pixels + spr->psurface->w * cy + cx)
        |= (pcolor->a << details->Ashift);
    }
  } else {
    for (i = 0; i < l; i++) {
      int cx = (xr - xl) * i / l;
      int cy = yb - yt - (yb - yt) * i / l;
 
      *((Uint32 *)spr->psurface->pixels + spr->psurface->w * cy + cx)
        |= (pcolor->a << details->Ashift);
    }
  }
 
  unlock_surf(spr->psurface);
 
  alphablit(spr->psurface, NULL, dest, &dst, 255);
 
  free_sprite(spr);
  free(pcol);
}