2 * Copyright (C) 2003 Robert Kooima
4 * NEVERBALL is free software; you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License as published
6 * by the Free Software Foundation; either version 2 of the License,
7 * or (at your option) any later version.
9 * This program is distributed in the hope that it will be useful, but
10 * WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 * General Public License for more details.
24 #include "base_image.h"
30 /*---------------------------------------------------------------------------*/
32 void image_snap(const char *filename)
35 png_structp writep = NULL;
36 png_infop infop = NULL;
37 png_bytep *bytep = NULL;
39 int w = config_get_d(CONFIG_WIDTH);
40 int h = config_get_d(CONFIG_HEIGHT);
43 unsigned char *p = NULL;
45 /* Initialize all PNG export data structures. */
47 if (!(filep = fs_open(filename, "w")))
49 if (!(writep = png_create_write_struct(PNG_LIBPNG_VER_STRING, 0, 0, 0)))
51 if (!(infop = png_create_info_struct(writep)))
54 /* Enable the default PNG error handler. */
56 if (setjmp(png_jmpbuf(writep)) == 0)
58 /* Initialize the PNG header. */
60 png_set_write_fn(writep, filep, fs_png_write, fs_png_flush);
61 png_set_IHDR(writep, infop, w, h, 8,
64 PNG_COMPRESSION_TYPE_DEFAULT,
65 PNG_FILTER_TYPE_DEFAULT);
67 /* Allocate the pixel buffer and copy pixels there. */
69 if ((p = (unsigned char *) malloc(w * h * 3)))
71 glReadPixels(0, 0, w, h, GL_RGB, GL_UNSIGNED_BYTE, p);
73 /* Allocate and initialize the row pointers. */
75 if ((bytep = (png_bytep *) png_malloc(writep, h * sizeof (png_bytep))))
77 for (i = 0; i < h; ++i)
78 bytep[h - i - 1] = (png_bytep) (p + i * w * 3);
80 png_set_rows (writep, infop, bytep);
82 /* Write the PNG image file. */
84 png_write_info(writep, infop);
85 png_write_png (writep, infop, 0, NULL);
93 /* Release all resources. */
95 png_destroy_write_struct(&writep, &infop);
99 /*---------------------------------------------------------------------------*/
102 * Create an OpenGL texture object using the given image buffer.
104 static GLuint make_texture(const void *p, int w, int h, int b)
106 static const GLenum format[] =
107 { 0, GL_LUMINANCE, GL_LUMINANCE_ALPHA, GL_RGB, GL_RGBA };
111 /* Scale the image as configured, or to fit the OpenGL limitations. */
113 #ifdef GL_TEXTURE_MAX_ANISOTROPY_EXT
114 int a = config_get_d(CONFIG_ANISO);
116 int m = config_get_d(CONFIG_MIPMAP);
117 int k = config_get_d(CONFIG_TEXTURES);
125 glGetIntegerv(GL_MAX_TEXTURE_SIZE, &max);
127 while (w / k > (int) max || h / k > (int) max)
131 q = image_scale(p, w, h, b, &W, &H, k);
133 /* Generate and configure a new OpenGL texture. */
135 glGenTextures(1, &o);
136 glBindTexture(GL_TEXTURE_2D, o);
138 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_CLAMP);
139 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_CLAMP);
141 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
142 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
144 #ifdef GL_GENERATE_MIPMAP_SGIS
147 glTexParameteri(GL_TEXTURE_2D, GL_GENERATE_MIPMAP_SGIS, GL_TRUE);
148 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER,
149 GL_LINEAR_MIPMAP_LINEAR);
152 #ifdef GL_TEXTURE_MAX_ANISOTROPY_EXT
153 if (a) glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAX_ANISOTROPY_EXT, a);
156 /* Copy the image to an OpenGL texture. */
158 glTexImage2D(GL_TEXTURE_2D, 0,
160 format[b], GL_UNSIGNED_BYTE, q ? q : p);
169 * Load an image from the named file. Return an OpenGL texture object.
171 GLuint make_image_from_file(const char *filename)
179 /* Load the image. */
181 if ((p = image_load(filename, &w, &h, &b)))
183 o = make_texture(p, w, h, b);
190 /*---------------------------------------------------------------------------*/
193 * Render the given string using the given font. Transfer the image
194 * to a surface of power-of-2 size large enough to fit the string.
195 * Return an OpenGL texture object.
197 GLuint make_image_from_font(int *W, int *H,
199 const char *text, TTF_Font *font)
203 /* Render the text. */
205 if (font && text && strlen(text) > 0)
207 SDL_Color col = { 0xFF, 0xFF, 0xFF, 0xFF };
210 if ((orig = TTF_RenderUTF8_Blended(font, text, col)))
215 int b = orig->format->BitsPerPixel / 8;
227 if ((src = SDL_ConvertSurface(orig, &fmt, orig->flags)) == NULL)
229 fprintf(stderr, _("Failed to convert SDL_ttf surface: %s\n"),
232 /* Pretend everything's just fine. */
237 SDL_FreeSurface(orig);
239 /* Pad the text to power-of-two. */
241 p = image_next2(src->pixels, src->w, src->h, b, &w2, &h2);
248 /* Saturate the color channels. Modulate ONLY in alpha. */
250 image_white(p, w2, h2, b);
252 /* Create the OpenGL texture object. */
254 o = make_texture(p, w2, h2, b);
257 SDL_FreeSurface(src);
273 /*---------------------------------------------------------------------------*/
276 * Load an image from the named file. Return an SDL surface.
278 SDL_Surface *load_surface(const char *filename)
285 SDL_Surface *srf = NULL;
287 if ((p = image_load(filename, &w, &h, &b)))
291 if ((q = image_flip(p, w, h, b, 0, 1)))
292 srf = SDL_CreateRGBSurfaceFrom(q, w, h, b * 8, w * b,
293 RMASK, GMASK, BMASK, AMASK);
299 /*---------------------------------------------------------------------------*/