2 Copyright (C) 2003, 2010 - Wolfire Games
3 Copyright (C) 2010-2016 - Lugaru contributors (see AUTHORS file)
5 This file is part of Lugaru.
7 Lugaru is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version.
12 Lugaru is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with Lugaru. If not, see <http://www.gnu.org/licenses/>.
21 /**> HEADER FILES <**/
31 extern bool visibleloading;
33 /* These two are needed for screenshot */
34 extern int kContextWidth;
35 extern int kContextHeight;
37 static bool load_png(const char * fname, ImageRec & tex);
38 static bool load_jpg(const char * fname, ImageRec & tex);
39 static bool save_screenshot_png(const char * fname);
43 data = ( GLubyte* )malloc( 1024 * 1024 * 4 );
52 bool load_image(const char *file_name, ImageRec &tex)
55 Game::LoadingScreen();
57 if ( tex.data == NULL )
60 const char *ptr = strrchr((char *)file_name, '.');
62 if (strcasecmp(ptr + 1, "png") == 0)
63 return load_png(file_name, tex);
64 else if (strcasecmp(ptr + 1, "jpg") == 0)
65 return load_jpg(file_name, tex);
68 STUBBED("Unsupported image type");
72 bool save_screenshot(const char *file_name)
74 const char *ptr = strrchr((char *)file_name, '.');
76 if (strcasecmp(ptr + 1, "png") == 0)
77 return save_screenshot_png(file_name);
80 STUBBED("Unsupported image type");
85 struct jpeg_error_mgr pub; /* "public" fields */
86 jmp_buf setjmp_buffer; /* for return to caller */
88 typedef struct my_error_mgr * my_error_ptr;
90 static void my_error_exit(j_common_ptr cinfo)
92 struct my_error_mgr *err = (struct my_error_mgr *)cinfo->err;
93 longjmp(err->setjmp_buffer, 1);
96 /* stolen from public domain example.c code in libjpg distribution. */
97 static bool load_jpg(const char *file_name, ImageRec &tex)
99 struct jpeg_decompress_struct cinfo;
100 struct my_error_mgr jerr;
101 JSAMPROW buffer[1]; /* Output row buffer */
102 int row_stride; /* physical row width in output buffer */
103 FILE *infile = fopen(file_name, "rb");
108 cinfo.err = jpeg_std_error(&jerr.pub);
109 jerr.pub.error_exit = my_error_exit;
110 if (setjmp(jerr.setjmp_buffer)) {
111 jpeg_destroy_decompress(&cinfo);
116 jpeg_create_decompress(&cinfo);
117 jpeg_stdio_src(&cinfo, infile);
118 (void) jpeg_read_header(&cinfo, TRUE);
120 cinfo.out_color_space = JCS_RGB;
121 cinfo.quantize_colors = 0;
122 (void) jpeg_calc_output_dimensions(&cinfo);
123 (void) jpeg_start_decompress(&cinfo);
125 row_stride = cinfo.output_width * cinfo.output_components;
126 tex.sizeX = cinfo.output_width;
127 tex.sizeY = cinfo.output_height;
130 while (cinfo.output_scanline < cinfo.output_height) {
131 buffer[0] = (JSAMPROW)(char *)tex.data +
132 ((cinfo.output_height - 1) - cinfo.output_scanline) * row_stride;
133 (void) jpeg_read_scanlines(&cinfo, buffer, 1);
136 (void) jpeg_finish_decompress(&cinfo);
137 jpeg_destroy_decompress(&cinfo);
143 /* stolen from public domain example.c code in libpng distribution. */
144 static bool load_png(const char *file_name, ImageRec &tex)
146 bool hasalpha = false;
147 png_structp png_ptr = NULL;
148 png_infop info_ptr = NULL;
149 png_uint_32 width, height;
150 int bit_depth, color_type, interlace_type;
152 png_byte **row_pointers = NULL;
153 FILE *fp = fopen(file_name, "rb");
156 cerr << file_name << " not found" << endl;
160 png_ptr = png_create_read_struct(PNG_LIBPNG_VER_STRING, NULL, NULL, NULL);
164 info_ptr = png_create_info_struct(png_ptr);
165 if (info_ptr == NULL)
168 if (setjmp(png_jmpbuf(png_ptr)))
171 png_init_io(png_ptr, fp);
172 png_read_png(png_ptr, info_ptr,
173 PNG_TRANSFORM_STRIP_16 | PNG_TRANSFORM_PACKING,
175 png_get_IHDR(png_ptr, info_ptr, &width, &height,
176 &bit_depth, &color_type, &interlace_type, NULL, NULL);
178 if (bit_depth != 8) // transform SHOULD handle this...
181 if (color_type & PNG_COLOR_MASK_PALETTE) // !!! FIXME?
184 if ((color_type & PNG_COLOR_MASK_COLOR) == 0) // !!! FIXME?
187 hasalpha = ((color_type & PNG_COLOR_MASK_ALPHA) != 0);
188 row_pointers = png_get_rows(png_ptr, info_ptr);
193 png_byte *dst = tex.data;
194 for (int i = height - 1; i >= 0; i--) {
195 png_byte *src = row_pointers[i];
196 for (unsigned j = 0; j < width; j++) {
208 png_byte *dst = tex.data;
209 int pitch = width * 4;
210 for (int i = height - 1; i >= 0; i--, dst += pitch)
211 memcpy(dst, row_pointers[i], pitch);
221 cerr << "There was a problem loading " << file_name << endl;
223 png_destroy_read_struct(&png_ptr, &info_ptr, NULL);
229 static bool save_screenshot_png(const char *file_name)
232 png_structp png_ptr = NULL;
233 png_infop info_ptr = NULL;
236 fp = fopen(file_name, "wb");
240 png_bytep *row_pointers = new png_bytep[kContextHeight];
241 png_bytep screenshot = new png_byte[kContextWidth * kContextHeight * 3];
242 if ((!screenshot) || (!row_pointers))
246 glReadPixels(0, 0, kContextWidth, kContextHeight,
247 GL_RGB, GL_UNSIGNED_BYTE, screenshot);
248 if (glGetError() != GL_NO_ERROR)
251 for (int i = 0; i < kContextHeight; i++)
252 row_pointers[i] = screenshot + ((kContextWidth * ((kContextHeight - 1) - i)) * 3);
254 png_ptr = png_create_write_struct(PNG_LIBPNG_VER_STRING, NULL, NULL, NULL);
258 info_ptr = png_create_info_struct(png_ptr);
259 if (info_ptr == NULL)
262 if (setjmp(png_jmpbuf(png_ptr)))
265 png_init_io(png_ptr, fp);
267 if (setjmp(png_jmpbuf(png_ptr)))
270 png_set_IHDR(png_ptr, info_ptr, kContextWidth, kContextHeight,
271 8, PNG_COLOR_TYPE_RGB, PNG_INTERLACE_NONE,
272 PNG_COMPRESSION_TYPE_BASE, PNG_FILTER_TYPE_BASE);
274 png_write_info(png_ptr, info_ptr);
276 if (setjmp(png_jmpbuf(png_ptr)))
279 png_write_image(png_ptr, row_pointers);
281 if (setjmp(png_jmpbuf(png_ptr)))
284 png_write_end(png_ptr, NULL);
288 png_destroy_write_struct(&png_ptr, &info_ptr);
290 delete[] row_pointers;
294 unlink(ConvertFileName(file_name));