IMG.c
author Sam Lantinga <slouken@lokigames.com>
Wed, 06 Dec 2000 18:00:38 +0000
changeset 11 b3d1b573a542
parent 7 e1b6443ffb6b
child 24 69f3d44d56da
permissions -rw-r--r--
Mattias Engdeg�rd - Wed Dec 6 10:00:07 PST 2000
* Improved the XPM loading code
slouken@0
     1
/*
slouken@0
     2
    IMGLIB:  An example image loading library for use with SDL
slouken@0
     3
    Copyright (C) 1999  Sam Lantinga
slouken@0
     4
slouken@0
     5
    This library is free software; you can redistribute it and/or
slouken@0
     6
    modify it under the terms of the GNU Library General Public
slouken@0
     7
    License as published by the Free Software Foundation; either
slouken@0
     8
    version 2 of the License, or (at your option) any later version.
slouken@0
     9
slouken@0
    10
    This library is distributed in the hope that it will be useful,
slouken@0
    11
    but WITHOUT ANY WARRANTY; without even the implied warranty of
slouken@0
    12
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
slouken@0
    13
    Library General Public License for more details.
slouken@0
    14
slouken@0
    15
    You should have received a copy of the GNU Library General Public
slouken@0
    16
    License along with this library; if not, write to the Free
slouken@0
    17
    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
slouken@0
    18
slouken@0
    19
    Sam Lantinga
slouken@0
    20
    5635-34 Springhouse Dr.
slouken@0
    21
    Pleasanton, CA 94588 (USA)
slouken@0
    22
    slouken@devolution.com
slouken@0
    23
*/
slouken@0
    24
slouken@0
    25
/* A simple library to load images of various formats as SDL surfaces */
slouken@0
    26
slouken@0
    27
#include <stdio.h>
slouken@0
    28
#include <string.h>
slouken@0
    29
#include <ctype.h>
slouken@0
    30
slouken@0
    31
#include "SDL_image.h"
slouken@0
    32
slouken@7
    33
#define ARRAYSIZE(a) (sizeof(a) / sizeof((a)[0]))
slouken@7
    34
slouken@0
    35
/* Table of image detection and loading functions */
slouken@0
    36
static struct {
slouken@0
    37
	char *type;
slouken@0
    38
	int (*is)(SDL_RWops *src);
slouken@0
    39
	SDL_Surface *(*load)(SDL_RWops *src);
slouken@0
    40
} supported[] = {
slouken@0
    41
        /* keep magicless formats first (denoted by is==NULL) */
slouken@0
    42
	{ "TGA", NULL,      IMG_LoadTGA_RW },
slouken@0
    43
	{ "BMP", IMG_isBMP, IMG_LoadBMP_RW },
slouken@0
    44
	{ "PPM", IMG_isPPM, IMG_LoadPPM_RW },
slouken@7
    45
	{ "XPM", IMG_isXPM, IMG_LoadXPM_RW },
slouken@0
    46
	{ "PCX", IMG_isPCX, IMG_LoadPCX_RW },
slouken@0
    47
	{ "GIF", IMG_isGIF, IMG_LoadGIF_RW },
slouken@0
    48
	{ "JPG", IMG_isJPG, IMG_LoadJPG_RW },
slouken@0
    49
	{ "TIF", IMG_isTIF, IMG_LoadTIF_RW },
slouken@7
    50
	{ "PNG", IMG_isPNG, IMG_LoadPNG_RW }
slouken@0
    51
};
slouken@0
    52
slouken@0
    53
/* Load an image from a file */
slouken@0
    54
SDL_Surface *IMG_Load(const char *file)
slouken@0
    55
{
slouken@0
    56
    SDL_RWops *src = SDL_RWFromFile(file, "rb");
slouken@0
    57
    char *ext = strrchr(file, '.');
slouken@0
    58
    if(ext)
slouken@0
    59
	ext++;
slouken@0
    60
    return IMG_LoadTyped_RW(src, 1, ext);
slouken@0
    61
}
slouken@0
    62
slouken@0
    63
/* Load an image from an SDL datasource (for compatibility) */
slouken@0
    64
SDL_Surface *IMG_Load_RW(SDL_RWops *src, int freesrc)
slouken@0
    65
{
slouken@0
    66
    return IMG_LoadTyped_RW(src, freesrc, NULL);
slouken@0
    67
}
slouken@0
    68
slouken@0
    69
/* Portable case-insensitive string compare function */
slouken@11
    70
int IMG_string_equals(const char *str1, const char *str2)
slouken@0
    71
{
slouken@0
    72
	while ( *str1 && *str2 ) {
slouken@0
    73
		if ( toupper((unsigned char)*str1) !=
slouken@0
    74
		     toupper((unsigned char)*str2) )
slouken@0
    75
			break;
slouken@0
    76
		++str1;
slouken@0
    77
		++str2;
slouken@0
    78
	}
slouken@0
    79
	return (!*str1 && !*str2);
slouken@0
    80
}
slouken@0
    81
slouken@0
    82
/* Load an image from an SDL datasource, optionally specifying the type */
slouken@0
    83
SDL_Surface *IMG_LoadTyped_RW(SDL_RWops *src, int freesrc, char *type)
slouken@0
    84
{
slouken@0
    85
	int i, start;
slouken@0
    86
	SDL_Surface *image;
slouken@0
    87
slouken@0
    88
	/* Make sure there is something to do.. */
slouken@0
    89
	if ( src == NULL ) {
slouken@0
    90
		return(NULL);
slouken@0
    91
	}
slouken@0
    92
slouken@0
    93
	/* See whether or not this data source can handle seeking */
slouken@0
    94
	if ( SDL_RWseek(src, 0, SEEK_CUR) < 0 ) {
slouken@0
    95
		IMG_SetError("Can't seek in this data source");
slouken@0
    96
		return(NULL);
slouken@0
    97
	}
slouken@0
    98
slouken@0
    99
	/* Detect the type of image being loaded */
slouken@0
   100
	start = SDL_RWtell(src);
slouken@0
   101
	image = NULL;
slouken@11
   102
	for ( i=0; i < ARRAYSIZE(supported); ++i ) {
slouken@0
   103
	        if( (supported[i].is
slouken@0
   104
		     && (SDL_RWseek(src, start, SEEK_SET),
slouken@0
   105
			 supported[i].is(src)))
slouken@11
   106
		    || (type && IMG_string_equals(type, supported[i].type))) {
slouken@0
   107
#ifdef DEBUG_IMGLIB
slouken@0
   108
			fprintf(stderr, "IMGLIB: Loading image as %s\n",
slouken@0
   109
							supported[i].type);
slouken@0
   110
#endif
slouken@0
   111
			SDL_RWseek(src, start, SEEK_SET);
slouken@0
   112
			image = supported[i].load(src);
slouken@0
   113
			break;
slouken@0
   114
		}
slouken@0
   115
	}
slouken@0
   116
slouken@0
   117
	/* Clean up, check for errors, and return */
slouken@0
   118
	if ( freesrc ) {
slouken@0
   119
		SDL_RWclose(src);
slouken@0
   120
	}
slouken@11
   121
	if ( i == ARRAYSIZE(supported) ) {
slouken@0
   122
		IMG_SetError("Unsupported image format");
slouken@0
   123
	}
slouken@0
   124
	return(image);
slouken@0
   125
}
slouken@0
   126
slouken@0
   127
/* Invert the alpha of a surface for use with OpenGL
slouken@4
   128
   This function is a no-op and only kept for backwards compatibility.
slouken@0
   129
 */
slouken@0
   130
int IMG_InvertAlpha(int on)
slouken@0
   131
{
slouken@4
   132
    return 1;
slouken@0
   133
}