minetestmapper/Image.cpp

#include <cstdio>
#include <cerrno>
#include <cstring>
#include <iostream>
#include <sstream>
#include <stdexcept>
#include <gd.h>
#include <gdfontmb.h>
#include <math.h>

#include "Image.h"

#ifndef NDEBUG
// allow x,y to be 256 pixels outside of the image.
// this allows stuff like the playername labels to be drawn somewhat outside of the
// image (relying on gd's built in clipping) while still catching probable
// buggy draw operations
#define SIZECHECK_FUZZY(x, y) check_bounds((x), (y), m_width, m_height, 256)
#else
#define SIZECHECK_FUZZY(x, y) do {} while(0)
#endif


// ARGB but with inverted alpha

static inline int color2int(Color c)
{
	u8 a = (255 - c.a) * gdAlphaMax / 255;
	return (a << 24) | (c.r << 16) | (c.g << 8) | c.b;
}

static inline Color int2color(int c)
{
	Color c2;
	u8 a;
	c2.b = c & 0xff;
	c2.g = (c >> 8) & 0xff;
	c2.r = (c >> 16) & 0xff;
	a = (c >> 24) & 0xff;
	c2.a = 255 - (a*255 / gdAlphaMax);
	return c2;
}

static inline void check_bounds(int x, int y, int width, int height, int border)
{
	if(x < -border || x >= width + border) {
		std::ostringstream oss;
		oss << "Access outside image bounds (x), 0 < "
			<< x << " < " << width << " is false.";
		throw std::out_of_range(oss.str());
	}
	if(y < -border || y >= height + border) {
		std::ostringstream oss;
		oss << "Access outside image bounds (y)," << -border << " 0 < "
			<< y << " < " << height+border << " is false.";
		throw std::out_of_range(oss.str());
	}
}


Image::Image(int width, int height) :
	m_width(width), m_height(height), m_image(NULL)
{
	m_image = gdImageCreateTrueColor(m_width, m_height);
	gdImageAlphaBlending(m_image, gdEffectAlphaBlend);
	gdImageSaveAlpha(m_image, true);
}

Image::~Image()
{
	gdImageDestroy(m_image);
}

void Image::setPixel(int x, int y, const Color &c)
{
	SIZECHECK_FUZZY(x, y);
	m_image->tpixels[y][x] = color2int(c);
}

Color Image::getPixel(int x, int y) const
{
	SIZECHECK_FUZZY(x, y);
	return int2color(m_image->tpixels[y][x]);
}

void Image::drawLine(int x1, int y1, int x2, int y2, const Color &c)
{
	SIZECHECK_FUZZY(x1, y1);
	SIZECHECK_FUZZY(x2, y2);
	gdImageLine(m_image, x1, y1, x2, y2, color2int(c));
}

void Image::drawText(int x, int y, const std::string &s, const Color &c)
{
	SIZECHECK_FUZZY(x, y);
	gdImageString(m_image, gdFontGetMediumBold(), x, y, (unsigned char*) s.c_str(), color2int(c));
}

void Image::drawFilledRect(int x, int y, int w, int h, const Color &c)
{
	SIZECHECK_FUZZY(x, y);
	SIZECHECK_FUZZY(x + w - 1, y + h - 1);
	gdImageFilledRectangle(m_image, x, y, x + w - 1, y + h - 1, color2int(c));
}

void Image::drawCircle(int x, int y, int diameter, const Color &c)
{
	SIZECHECK_FUZZY(x, y);
	gdImageArc(m_image, x, y, diameter, diameter, 0, 360, color2int(c));
}

void Image::save(const std::string &filename) const
{
#if (GD_MAJOR_VERSION == 2 && GD_MINOR_VERSION == 1 && GD_RELEASE_VERSION >= 1) || (GD_MAJOR_VERSION == 2 && GD_MINOR_VERSION > 1) || GD_MAJOR_VERSION > 2
	const char *f = filename.c_str();
	if (gdSupportsFileType(f, 1) == GD_FALSE)
		throw std::runtime_error("Image format not supported by gd");
	if (gdImageFile(m_image, f) == GD_FALSE)
		throw std::runtime_error("Error saving image");
#else
	if (filename.compare(filename.length() - 4, 4, ".png") != 0)
		throw std::runtime_error("Only PNG is supported");
	FILE *f = fopen(filename.c_str(), "wb");
	if (!f) {
		std::ostringstream oss;
		oss << "Error opening image file: " << std::strerror(errno);
		throw std::runtime_error(oss.str());
	}
	gdImagePng(m_image, f);
	fclose(f);
#endif
}

Image::Image(std::string const &fileName)
{
	m_image = gdImageCreateFromFile(fileName.c_str());

	if (!m_image)
	{
		std::ostringstream oss;
		oss << "Error loading image file: " << fileName;
		throw std::runtime_error(oss.str());
	}

	m_width = gdImageSX(m_image);
	m_height = gdImageSY(m_image);
}


void Image::scaleBlit(Image *to, int x, int y, int w, int h) const
{
	gdImageCopyResampled(to->m_image, m_image, x,y, 0,0, w, h, gdImageSX(m_image),gdImageSY(m_image));
}

void Image::fill(const Color &c, bool setAlpha)
{
	if (setAlpha)
	{
			gdImageAlphaBlending(m_image, gdEffectReplace);
	}
	gdImageFilledRectangle(m_image, 0, 0, m_width - 1 , m_height - 1, color2int(c));
	if (setAlpha)
	{
			gdImageAlphaBlending(m_image, gdEffectAlphaBlend);
	}
}


void Image::blit(Image *to, int x, int y)
{
	gdImageCopy(to->m_image, m_image, x, y, 0,0, m_width, m_height);
}

void Image::blit(Image *to, int xs, int ys, int xd, int yd, int w, int h)
{
	gdImageCopy(to->m_image, m_image, xd, yd, xs,ys, w, h);
}


void Image::drawFilledPolygon(int nrPoints, ImagePoint const *p, Color const &c, bool setAlpha)
{
	if (setAlpha)
	{
			gdImageAlphaBlending(m_image, gdEffectReplace);
	}
	gdImageFilledPolygon(m_image, const_cast<ImagePoint *>(p), nrPoints, color2int(c));
	{
			gdImageAlphaBlending(m_image, gdEffectAlphaBlend);
	}
}

Color Color::gamma(double gamma) const
{
	Color ret;

	ret.a = a;
	ret.r = (u8)(255 * pow( r/255., 1.0/gamma));
	ret.g = (u8)(255 * pow( g/255., 1.0/gamma));
	ret.b = (u8)(255 * pow( b/255., 1.0/gamma));

	return ret;
}

void Image::crop(int x1, int y1, int x2, int y2)
{
	gdRect r = { x1, y1, x2-x1, y2-y1 };

	gdImagePtr tmp = gdImageCreateTrueColor(r.width, r.height);

	gdImageAlphaBlending(tmp, gdEffectReplace);
	gdImageCopy(tmp, m_image, 0,0, r.x, r.y, r.width, r.height);
	gdImageAlphaBlending(tmp, gdEffectAlphaBlend);

	gdImageDestroy(m_image);
	m_image = tmp;
	gdImageSaveAlpha(m_image, true);

	m_width = x2 - x1;
	m_height = y2 - y1;
}