rfreeimage 0.1.0

data/vendor/FreeImage/Source/FreeImage/PluginKOALA.cpp

@@ -0,0 +1,243 @@
+// ==========================================================
+// KOALA Loader
+//
+// Design and implementation by
+// - Floris van den Berg (flvdberg@wxs.nl)
+//
+// This file is part of FreeImage 3
+//
+// COVERED CODE IS PROVIDED UNDER THIS LICENSE ON AN "AS IS" BASIS, WITHOUT WARRANTY
+// OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, WITHOUT LIMITATION, WARRANTIES
+// THAT THE COVERED CODE IS FREE OF DEFECTS, MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE
+// OR NON-INFRINGING. THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE COVERED
+// CODE IS WITH YOU. SHOULD ANY COVERED CODE PROVE DEFECTIVE IN ANY RESPECT, YOU (NOT
+// THE INITIAL DEVELOPER OR ANY OTHER CONTRIBUTOR) ASSUME THE COST OF ANY NECESSARY
+// SERVICING, REPAIR OR CORRECTION. THIS DISCLAIMER OF WARRANTY CONSTITUTES AN ESSENTIAL
+// PART OF THIS LICENSE. NO USE OF ANY COVERED CODE IS AUTHORIZED HEREUNDER EXCEPT UNDER
+// THIS DISCLAIMER.
+//
+// Use at your own risk!
+// ==========================================================
+
+#include "FreeImage.h"
+#include "Utilities.h"
+
+// ----------------------------------------------------------
+//   Constants + headers
+// ----------------------------------------------------------
+
+#ifdef _WIN32
+#pragma pack(push, 1)
+#else
+#pragma pack(1)
+#endif
+
+typedef struct tagKOALA {
+	BYTE image[8000];		// pixmap image
+	BYTE colour1[1000];		// first colourmap (colour 1 and 2)
+	BYTE colour2[1000];		// second colourmap (colour 3)
+	BYTE background;		// background colour
+} koala_t;
+
+struct colour_t {
+	int	r;
+	int g;
+	int b;	
+};
+
+#ifdef _WIN32
+#pragma pack(pop)
+#else
+#pragma pack()
+#endif
+
+// ----------------------------------------------------------
+
+#define CBM_WIDTH  320
+#define CBM_HEIGHT 200
+
+// ----------------------------------------------------------
+
+const colour_t c64colours[16] = {
+	{   0,   0,   0 },	// Black
+	{ 255, 255, 255 },	// White
+	{ 170,  17,  17 },	// Red
+	{  12, 204, 204 },	// Cyan
+	{ 221,  51, 221 },	// Purple
+	{  0,  187,  0 },	// Green
+	{   0,   0, 204 },	// Blue
+	{ 255, 255, 140 },	// Yellow
+	{ 204, 119,  34 },	// Orange
+	{ 136,  68,   0 },	// Brown
+	{ 255, 153, 136 },	// Light red
+	{  92,  92,  92 },	// Gray 1
+	{ 170, 170, 170 },	// Gray 2
+	{ 140, 255, 178 },	// Light green
+	{  39, 148, 255 },	// Light blue
+	{ 196, 196, 196 }	// Gray 3
+};
+
+// ==========================================================
+// Plugin Interface
+// ==========================================================
+
+static int s_format_id;
+
+// ==========================================================
+// Plugin Implementation
+// ==========================================================
+
+const char * DLL_CALLCONV
+Format() {
+	return "KOALA";
+}
+
+const char * DLL_CALLCONV
+Description() {
+	return "C64 Koala Graphics";
+}
+
+const char * DLL_CALLCONV
+Extension() {
+	return "koa";
+}
+
+const char * DLL_CALLCONV
+RegExpr() {
+	return NULL;
+}
+
+static const char * DLL_CALLCONV
+MimeType() {
+	return "image/x-koala";
+}
+
+static BOOL DLL_CALLCONV
+Validate(FreeImageIO *io, fi_handle handle) {
+	BYTE koala_signature[] = { 0x00, 0x60 };
+	BYTE signature[2] = { 0, 0 };
+
+	io->read_proc(signature, 1, sizeof(koala_signature), handle);
+
+	return (memcmp(koala_signature, signature, sizeof(koala_signature)) == 0);
+}
+
+static BOOL DLL_CALLCONV
+SupportsExportDepth(int depth) {
+	return FALSE;
+}
+
+static BOOL DLL_CALLCONV 
+SupportsExportType(FREE_IMAGE_TYPE type) {
+	return FALSE;
+}
+
+// ----------------------------------------------------------
+
+FIBITMAP * DLL_CALLCONV
+Load(FreeImageIO *io, fi_handle handle, int page, int flags, void *data) {
+	if (handle) {
+		koala_t image;
+
+		// read the load address
+
+		unsigned char load_address[2];  // highbit, lowbit
+
+		io->read_proc(&load_address, 1, 2, handle);
+
+		// if the load address is correct, skip it. otherwise ignore the load address
+
+		if ((load_address[0] != 0x00) || (load_address[1] != 0x60)) {
+			((BYTE *)&image)[0] = load_address[0];
+			((BYTE *)&image)[1] = load_address[1];
+
+			io->read_proc((BYTE *)&image + 2, 1, 10001 - 2, handle);
+		} else {
+			io->read_proc(&image, 1, 10001, handle);
+		}		
+
+		// build DIB in memory
+
+		FIBITMAP *dib = FreeImage_Allocate(CBM_WIDTH, CBM_HEIGHT, 4);
+
+		if (dib) {
+			// write out the commodore 64 color palette
+
+			RGBQUAD *palette = FreeImage_GetPalette(dib);
+
+			for (int i = 0; i < 16; i++) {
+				palette[i].rgbBlue  = (BYTE)c64colours[i].b;
+				palette[i].rgbGreen = (BYTE)c64colours[i].g;
+				palette[i].rgbRed   = (BYTE)c64colours[i].r;
+			}
+
+			// write out bitmap data
+
+			BYTE pixel_mask[4]         = { 0xc0, 0x30, 0x0c, 0x03 };
+			BYTE pixel_displacement[4] = { 6, 4, 2, 0 };
+			int	pixel, index, colourindex;
+			unsigned char found_color = 0;
+
+			for (int y = 0; y < 200; y++) {
+				for (int x = 0; x < 160; x++) {
+					// Get value of pixel at (x,y)
+
+					index = (x / 4) * 8 + (y % 8) + (y / 8) * CBM_WIDTH;
+					colourindex = (x / 4) + (y / 8) * 40;
+					pixel = (image.image[index] & pixel_mask[x % 4]) >> pixel_displacement[x % 4];
+
+					// Retrieve RGB values
+
+					switch (pixel) {
+						case 0: // Background
+							found_color = image.background;
+							break;
+							
+						case 1: // Colour 1
+							found_color = image.colour1[colourindex] >> 4;
+							break;
+							
+						case 2: // Colour 2
+							found_color = image.colour1[colourindex] & 0xf;
+							break;
+							
+						case 3: // Colour 3
+							found_color = image.colour2[colourindex] & 0xf;
+							break;
+					};
+
+					*(FreeImage_GetScanLine(dib, CBM_HEIGHT - y - 1) + x) = (found_color << 4) | found_color;
+				}
+			}
+
+			return dib;
+		}
+	}
+
+	return NULL;
+}
+
+// ==========================================================
+//   Init
+// ==========================================================
+
+void DLL_CALLCONV
+InitKOALA(Plugin *plugin, int format_id) {
+	s_format_id = format_id;
+
+	plugin->format_proc = Format;
+	plugin->description_proc = Description;
+	plugin->extension_proc = Extension;
+	plugin->regexpr_proc = RegExpr;
+	plugin->open_proc = NULL;
+	plugin->close_proc = NULL;
+	plugin->pagecount_proc = NULL;
+	plugin->pagecapability_proc = NULL;
+	plugin->load_proc = Load;
+	plugin->save_proc = NULL;
+	plugin->validate_proc = Validate;
+	plugin->mime_proc = MimeType;
+	plugin->supports_export_bpp_proc = SupportsExportDepth;
+	plugin->supports_export_type_proc = SupportsExportType;
+	plugin->supports_icc_profiles_proc = NULL;
+}

data/vendor/FreeImage/Source/FreeImage/PluginMNG.cpp

@@ -0,0 +1,153 @@
+// ==========================================================
+// MNG loader
+//
+// Design and implementation by
+// - Herve Drolon (drolon@infonie.fr)
+//
+// This file is part of FreeImage 3
+//
+// COVERED CODE IS PROVIDED UNDER THIS LICENSE ON AN "AS IS" BASIS, WITHOUT WARRANTY
+// OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, WITHOUT LIMITATION, WARRANTIES
+// THAT THE COVERED CODE IS FREE OF DEFECTS, MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE
+// OR NON-INFRINGING. THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE COVERED
+// CODE IS WITH YOU. SHOULD ANY COVERED CODE PROVE DEFECTIVE IN ANY RESPECT, YOU (NOT
+// THE INITIAL DEVELOPER OR ANY OTHER CONTRIBUTOR) ASSUME THE COST OF ANY NECESSARY
+// SERVICING, REPAIR OR CORRECTION. THIS DISCLAIMER OF WARRANTY CONSTITUTES AN ESSENTIAL
+// PART OF THIS LICENSE. NO USE OF ANY COVERED CODE IS AUTHORIZED HEREUNDER EXCEPT UNDER
+// THIS DISCLAIMER.
+//
+// Use at your own risk!
+// ==========================================================
+
+#include "FreeImage.h"
+#include "Utilities.h"
+
+// ==========================================================
+// Plugin Interface
+// ==========================================================
+
+static int s_format_id;
+
+// ----------------------------------------------------------
+
+#define MNG_SIGNATURE_SIZE 8	// size of the signature
+
+// ----------------------------------------------------------
+
+// ----------------------------------------------------------
+//   mng interface (see MNGHelper.cpp)
+// ----------------------------------------------------------
+
+FIBITMAP* mng_ReadChunks(int format_id, FreeImageIO *io, fi_handle handle, long Offset, int flags = 0);
+
+
+// ==========================================================
+// Plugin Implementation
+// ==========================================================
+
+static const char * DLL_CALLCONV
+Format() {
+	return "MNG";
+}
+
+static const char * DLL_CALLCONV
+Description() {
+	return "Multiple-image Network Graphics";
+}
+
+static const char * DLL_CALLCONV
+Extension() {
+	return "mng";
+}
+
+static const char * DLL_CALLCONV
+RegExpr() {
+	return NULL;
+}
+
+static const char * DLL_CALLCONV
+MimeType() {
+	return "video/x-mng";
+}
+
+static BOOL DLL_CALLCONV
+Validate(FreeImageIO *io, fi_handle handle) {
+	BYTE mng_signature[8] = { 138, 77, 78, 71, 13, 10, 26, 10 };
+	BYTE signature[8] = { 0, 0, 0, 0, 0, 0, 0, 0 };
+
+	io->read_proc(&signature, 1, MNG_SIGNATURE_SIZE, handle);
+
+	return (memcmp(mng_signature, signature, MNG_SIGNATURE_SIZE) == 0) ? TRUE : FALSE;
+}
+
+static BOOL DLL_CALLCONV
+SupportsExportDepth(int depth) {
+	return FALSE;
+}
+
+static BOOL DLL_CALLCONV 
+SupportsExportType(FREE_IMAGE_TYPE type) {
+	return FALSE;
+}
+
+static BOOL DLL_CALLCONV
+SupportsICCProfiles() {
+	return TRUE;
+}
+
+static BOOL DLL_CALLCONV
+SupportsNoPixels() {
+	return FALSE;
+}
+
+
+// ----------------------------------------------------------
+
+static void * DLL_CALLCONV
+Open(FreeImageIO *io, fi_handle handle, BOOL read) {
+	return NULL;
+}
+
+static void DLL_CALLCONV
+Close(FreeImageIO *io, fi_handle handle, void *data) {
+}
+
+static FIBITMAP * DLL_CALLCONV
+Load(FreeImageIO *io, fi_handle handle, int page, int flags, void *data) {
+	long offset = MNG_SIGNATURE_SIZE;	// move to skip first 8 bytes of signature
+
+	// check the signature (8 bytes)
+	if(Validate(io, handle) == FALSE) {
+		return NULL;
+	}
+	
+	// parse chunks and decode a jng or mng bitmap
+	return mng_ReadChunks(s_format_id, io, handle, offset, flags);
+}
+
+
+// ==========================================================
+//   Init
+// ==========================================================
+
+void DLL_CALLCONV
+InitMNG(Plugin *plugin, int format_id) {
+	s_format_id = format_id;
+
+	plugin->format_proc = Format;
+	plugin->description_proc = Description;
+	plugin->extension_proc = Extension;
+	plugin->regexpr_proc = RegExpr;
+	plugin->open_proc = Open;
+	plugin->close_proc = Close;
+	plugin->pagecount_proc = NULL;
+	plugin->pagecapability_proc = NULL;
+	plugin->load_proc = Load;
+	plugin->save_proc = NULL;
+	plugin->validate_proc = Validate;
+	plugin->mime_proc = MimeType;
+	plugin->supports_export_bpp_proc = SupportsExportDepth;
+	plugin->supports_export_type_proc = SupportsExportType;
+	plugin->supports_icc_profiles_proc = SupportsICCProfiles;
+	plugin->supports_no_pixels_proc = SupportsNoPixels;
+}

data/vendor/FreeImage/Source/FreeImage/PluginPCD.cpp

@@ -0,0 +1,251 @@
+// ==========================================================
+// Kodak PhotoCD Loader
+//
+// Design and implementation by
+// - Floris van den Berg (flvdberg@wxs.nl)
+// 
+// Based on pascal code developed by Alex Kwak
+//
+// This file is part of FreeImage 3
+//
+// COVERED CODE IS PROVIDED UNDER THIS LICENSE ON AN "AS IS" BASIS, WITHOUT WARRANTY
+// OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, WITHOUT LIMITATION, WARRANTIES
+// THAT THE COVERED CODE IS FREE OF DEFECTS, MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE
+// OR NON-INFRINGING. THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE COVERED
+// CODE IS WITH YOU. SHOULD ANY COVERED CODE PROVE DEFECTIVE IN ANY RESPECT, YOU (NOT
+// THE INITIAL DEVELOPER OR ANY OTHER CONTRIBUTOR) ASSUME THE COST OF ANY NECESSARY
+// SERVICING, REPAIR OR CORRECTION. THIS DISCLAIMER OF WARRANTY CONSTITUTES AN ESSENTIAL
+// PART OF THIS LICENSE. NO USE OF ANY COVERED CODE IS AUTHORIZED HEREUNDER EXCEPT UNDER
+// THIS DISCLAIMER.
+//
+// Use at your own risk!
+// ==========================================================
+
+#include "FreeImage.h"
+#include "Utilities.h"
+
+// ==========================================================
+// Internal functions
+// ==========================================================
+
+static int 
+clamp(double x) {
+	int a = (int)floor(x + 0.5);
+	return (a < 0) ? 0 : (a > 255) ? 255 : a;
+}
+
+static void
+YUV2RGB(int y, int cb, int cr, int &r, int &g, int &b) {
+	double c11 = 0.0054980  * 256.0;
+	double c12 = 0.0000001  * 256.0;
+	double c13 = 0.0051681  * 256.0;
+	double c21 = 0.0054980  * 256.0;
+	double c22 = -0.0015446 * 256.0;
+	double c23 = -0.0026325 * 256.0;
+	double c31 = 0.0054980  * 256.0;
+	double c32 = 0.0079533  * 256.0;
+	double c33 = 0.0000001  * 256.0;
+
+	r = clamp(c11 * y + c12 * (cb - 156) + c13 * (cr - 137));
+	g = clamp(c21 * y + c22 * (cb - 156) + c23 * (cr - 137));
+	b = clamp(c31 * y + c32 * (cb - 156) + c33 * (cr - 137));
+}
+
+static BOOL
+VerticalOrientation(FreeImageIO *io, fi_handle handle) {
+	char buffer[128];
+
+	io->read_proc(buffer, 128, 1, handle);
+
+	return (buffer[72] & 63) == 8;
+}
+
+// ==========================================================
+// Plugin Interface
+// ==========================================================
+
+static int s_format_id;
+
+// ==========================================================
+// Plugin Implementation
+// ==========================================================
+
+static const char * DLL_CALLCONV
+Format() {
+	return "PCD";
+}
+
+static const char * DLL_CALLCONV
+Description() {
+	return "Kodak PhotoCD";
+}
+
+static const char * DLL_CALLCONV
+Extension() {
+	return "pcd";
+}
+
+static const char * DLL_CALLCONV
+RegExpr() {
+	return NULL;
+}
+
+static const char * DLL_CALLCONV
+MimeType() {
+	return "image/x-photo-cd";
+}
+
+static BOOL DLL_CALLCONV
+SupportsExportDepth(int depth) {
+	return FALSE;
+}
+
+static BOOL DLL_CALLCONV 
+SupportsExportType(FREE_IMAGE_TYPE type) {
+	return FALSE;
+}
+
+static BOOL DLL_CALLCONV
+SupportsNoPixels() {
+	return TRUE;
+}
+
+// ----------------------------------------------------------
+
+static FIBITMAP * DLL_CALLCONV
+Load(FreeImageIO *io, fi_handle handle, int page, int flags, void *data) {
+	FIBITMAP *dib = NULL;
+	unsigned width;
+	unsigned height;
+	const unsigned bpp = 24;
+	int scan_line_add   = 1;
+	int start_scan_line = 0;
+	
+	BYTE *y1 = NULL, *y2 = NULL, *cbcr = NULL;
+
+	BOOL header_only = (flags & FIF_LOAD_NOPIXELS) == FIF_LOAD_NOPIXELS;
+
+	// to make absolute seeks possible we store the current position in the file
+	
+	long offset_in_file = io->tell_proc(handle);
+	long seek = 0;
+
+	// decide which bitmap in the cabinet to load
+
+	switch (flags) {
+		case PCD_BASEDIV4 :
+			seek = 0x2000;
+			width = 192;
+			height = 128;
+			break;
+
+		case PCD_BASEDIV16 :
+			seek = 0xB800;
+			width = 384;
+			height = 256;
+			break;
+
+		default :
+			seek = 0x30000;
+			width = 768;
+			height = 512;
+			break;
+	}
+
+	try {
+		// allocate the dib and write out the header
+		dib = FreeImage_AllocateHeader(header_only, width, height, bpp, FI_RGBA_RED_MASK, FI_RGBA_GREEN_MASK, FI_RGBA_BLUE_MASK);
+		if(!dib) throw FI_MSG_ERROR_DIB_MEMORY;
+
+		if(header_only) {
+			return dib;
+		}
+
+		// check if the PCD is bottom-up
+
+		if (VerticalOrientation(io, handle)) {
+			scan_line_add = -1;
+			start_scan_line = height - 1;		
+		}
+
+		// temporary stuff to load PCD
+
+		BYTE *y1 = (BYTE*)malloc(width * sizeof(BYTE));
+		BYTE *y2 = (BYTE*)malloc(width * sizeof(BYTE));
+		BYTE *cbcr = (BYTE*)malloc(width * sizeof(BYTE));
+		if(!y1 || !y2 || !cbcr) throw FI_MSG_ERROR_MEMORY;
+
+		BYTE *yl[] = { y1, y2 };
+
+		// seek to the part where the bitmap data begins
+
+		io->seek_proc(handle, offset_in_file, SEEK_SET);
+		io->seek_proc(handle, seek, SEEK_CUR);
+
+		// read the data
+
+		for (unsigned y = 0; y < height / 2; y++) {
+			io->read_proc(y1, width, 1, handle);
+			io->read_proc(y2, width, 1, handle);
+			io->read_proc(cbcr, width, 1, handle);
+
+			for (int i = 0; i < 2; i++) {
+				BYTE *bits = FreeImage_GetScanLine(dib, start_scan_line);
+				for (unsigned x = 0; x < width; x++) {
+					int r, g, b;
+
+					YUV2RGB(yl[i][x], cbcr[x / 2], cbcr[(width / 2) + (x / 2)], r, g, b);
+
+					bits[FI_RGBA_BLUE]  = (BYTE)b;
+					bits[FI_RGBA_GREEN] = (BYTE)g;
+					bits[FI_RGBA_RED]   = (BYTE)r;
+					bits += 3;
+				}
+
+				start_scan_line += scan_line_add;
+			}
+		}
+
+		free(cbcr);
+		free(y2);
+		free(y1);
+
+		return dib;
+
+	} catch(const char *text) {
+		if(dib) FreeImage_Unload(dib);
+		if(cbcr) free(cbcr);
+		if(y2) free(y2);
+		if(y1) free(y1);
+
+		FreeImage_OutputMessageProc(s_format_id, text);
+
+		return NULL;
+	}
+}
+
+// ==========================================================
+//   Init
+// ==========================================================
+
+void DLL_CALLCONV
+InitPCD(Plugin *plugin, int format_id) {
+	s_format_id = format_id;
+
+	plugin->format_proc = Format;
+	plugin->description_proc = Description;
+	plugin->extension_proc = Extension;
+	plugin->regexpr_proc = RegExpr;
+	plugin->open_proc = NULL;
+	plugin->close_proc = NULL;
+	plugin->pagecount_proc = NULL;
+	plugin->pagecapability_proc = NULL;
+	plugin->load_proc = Load;
+	plugin->save_proc = NULL;
+	plugin->validate_proc = NULL;
+	plugin->mime_proc = MimeType;
+	plugin->supports_export_bpp_proc = SupportsExportDepth;
+	plugin->supports_export_type_proc = SupportsExportType;
+	plugin->supports_icc_profiles_proc = NULL;
+	plugin->supports_no_pixels_proc = SupportsNoPixels;
+}