summaryrefslogtreecommitdiff
path: root/ext/gd/gd.c
diff options
context:
space:
mode:
authorLorry Tar Creator <lorry-tar-importer@baserock.org>2013-03-14 05:42:27 +0000
committer <>2013-04-03 16:25:08 +0000
commitc4dd7a1a684490673e25aaf4fabec5df138854c4 (patch)
tree4d57c44caae4480efff02b90b9be86f44bf25409 /ext/gd/gd.c
downloadphp2-master.tar.gz
Imported from /home/lorry/working-area/delta_php2/php-5.4.13.tar.bz2.HEADphp-5.4.13master
Diffstat (limited to 'ext/gd/gd.c')
-rw-r--r--ext/gd/gd.c5090
1 files changed, 5090 insertions, 0 deletions
diff --git a/ext/gd/gd.c b/ext/gd/gd.c
new file mode 100644
index 0000000..72abbba
--- /dev/null
+++ b/ext/gd/gd.c
@@ -0,0 +1,5090 @@
+/*
+ +----------------------------------------------------------------------+
+ | PHP Version 5 |
+ +----------------------------------------------------------------------+
+ | Copyright (c) 1997-2013 The PHP Group |
+ +----------------------------------------------------------------------+
+ | This source file is subject to version 3.01 of the PHP license, |
+ | that is bundled with this package in the file LICENSE, and is |
+ | available through the world-wide-web at the following url: |
+ | http://www.php.net/license/3_01.txt |
+ | If you did not receive a copy of the PHP license and are unable to |
+ | obtain it through the world-wide-web, please send a note to |
+ | license@php.net so we can mail you a copy immediately. |
+ +----------------------------------------------------------------------+
+ | Authors: Rasmus Lerdorf <rasmus@php.net> |
+ | Stig Bakken <ssb@php.net> |
+ | Jim Winstead <jimw@php.net> |
+ +----------------------------------------------------------------------+
+ */
+
+/* $Id$ */
+
+/* gd 1.2 is copyright 1994, 1995, Quest Protein Database Center,
+ Cold Spring Harbor Labs. */
+
+/* Note that there is no code from the gd package in this file */
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include "php.h"
+#include "php_ini.h"
+#include "ext/standard/head.h"
+#include <math.h>
+#include "SAPI.h"
+#include "php_gd.h"
+#include "ext/standard/info.h"
+#include "php_open_temporary_file.h"
+
+
+#if HAVE_SYS_WAIT_H
+# include <sys/wait.h>
+#endif
+#if HAVE_UNISTD_H
+# include <unistd.h>
+#endif
+#ifdef PHP_WIN32
+# include <io.h>
+# include <fcntl.h>
+# include <windows.h>
+# include <Winuser.h>
+# include <Wingdi.h>
+#endif
+
+#if HAVE_LIBGD
+#if !HAVE_GD_BUNDLED
+# include "libgd/gd_compat.h"
+#endif
+
+
+static int le_gd, le_gd_font;
+#if HAVE_LIBT1
+#include <t1lib.h>
+static int le_ps_font, le_ps_enc;
+static void php_free_ps_font(zend_rsrc_list_entry *rsrc TSRMLS_DC);
+static void php_free_ps_enc(zend_rsrc_list_entry *rsrc TSRMLS_DC);
+#endif
+
+#include <gd.h>
+#include <gdfontt.h> /* 1 Tiny font */
+#include <gdfonts.h> /* 2 Small font */
+#include <gdfontmb.h> /* 3 Medium bold font */
+#include <gdfontl.h> /* 4 Large font */
+#include <gdfontg.h> /* 5 Giant font */
+
+#ifdef HAVE_GD_WBMP
+#include "libgd/wbmp.h"
+#endif
+#ifdef ENABLE_GD_TTF
+# ifdef HAVE_LIBFREETYPE
+# include <ft2build.h>
+# include FT_FREETYPE_H
+# endif
+#endif
+
+#ifndef M_PI
+#define M_PI 3.14159265358979323846
+#endif
+
+#ifdef ENABLE_GD_TTF
+static void php_imagettftext_common(INTERNAL_FUNCTION_PARAMETERS, int, int);
+#endif
+
+#if HAVE_LIBGD15
+/* it's >= 1.5, i.e. has IOCtx */
+#define USE_GD_IOCTX 1
+#else
+#undef USE_GD_IOCTX
+#endif
+
+#ifdef USE_GD_IOCTX
+#include "gd_ctx.c"
+#else
+#define gdImageCreateFromGdCtx NULL
+#define gdImageCreateFromGd2Ctx NULL
+#define gdImageCreateFromGd2partCtx NULL
+#define gdImageCreateFromGifCtx NULL
+#define gdImageCreateFromJpegCtx NULL
+#define gdImageCreateFromPngCtx NULL
+#define gdImageCreateFromWBMPCtx NULL
+typedef FILE gdIOCtx;
+#define CTX_PUTC(c, fp) fputc(c, fp)
+#endif
+
+#ifndef HAVE_GDIMAGECOLORRESOLVE
+extern int gdImageColorResolve(gdImagePtr, int, int, int);
+#endif
+
+#if HAVE_COLORCLOSESTHWB
+int gdImageColorClosestHWB(gdImagePtr im, int r, int g, int b);
+#endif
+
+#ifndef HAVE_GD_DYNAMIC_CTX_EX
+#define gdNewDynamicCtxEx(len, data, val) gdNewDynamicCtx(len, data)
+#endif
+
+/* Section Filters Declarations */
+/* IMPORTANT NOTE FOR NEW FILTER
+ * Do not forget to update:
+ * IMAGE_FILTER_MAX: define the last filter index
+ * IMAGE_FILTER_MAX_ARGS: define the biggest amout of arguments
+ * image_filter array in PHP_FUNCTION(imagefilter)
+ * */
+#define IMAGE_FILTER_NEGATE 0
+#define IMAGE_FILTER_GRAYSCALE 1
+#define IMAGE_FILTER_BRIGHTNESS 2
+#define IMAGE_FILTER_CONTRAST 3
+#define IMAGE_FILTER_COLORIZE 4
+#define IMAGE_FILTER_EDGEDETECT 5
+#define IMAGE_FILTER_EMBOSS 6
+#define IMAGE_FILTER_GAUSSIAN_BLUR 7
+#define IMAGE_FILTER_SELECTIVE_BLUR 8
+#define IMAGE_FILTER_MEAN_REMOVAL 9
+#define IMAGE_FILTER_SMOOTH 10
+#define IMAGE_FILTER_PIXELATE 11
+#define IMAGE_FILTER_MAX 11
+#define IMAGE_FILTER_MAX_ARGS 6
+static void php_image_filter_negate(INTERNAL_FUNCTION_PARAMETERS);
+static void php_image_filter_grayscale(INTERNAL_FUNCTION_PARAMETERS);
+static void php_image_filter_brightness(INTERNAL_FUNCTION_PARAMETERS);
+static void php_image_filter_contrast(INTERNAL_FUNCTION_PARAMETERS);
+static void php_image_filter_colorize(INTERNAL_FUNCTION_PARAMETERS);
+static void php_image_filter_edgedetect(INTERNAL_FUNCTION_PARAMETERS);
+static void php_image_filter_emboss(INTERNAL_FUNCTION_PARAMETERS);
+static void php_image_filter_gaussian_blur(INTERNAL_FUNCTION_PARAMETERS);
+static void php_image_filter_selective_blur(INTERNAL_FUNCTION_PARAMETERS);
+static void php_image_filter_mean_removal(INTERNAL_FUNCTION_PARAMETERS);
+static void php_image_filter_smooth(INTERNAL_FUNCTION_PARAMETERS);
+static void php_image_filter_pixelate(INTERNAL_FUNCTION_PARAMETERS);
+
+/* End Section filters declarations */
+static gdImagePtr _php_image_create_from_string (zval **Data, char *tn, gdImagePtr (*ioctx_func_p)() TSRMLS_DC);
+static void _php_image_create_from(INTERNAL_FUNCTION_PARAMETERS, int image_type, char *tn, gdImagePtr (*func_p)(), gdImagePtr (*ioctx_func_p)());
+static void _php_image_output(INTERNAL_FUNCTION_PARAMETERS, int image_type, char *tn, void (*func_p)());
+static int _php_image_type(char data[8]);
+static void _php_image_convert(INTERNAL_FUNCTION_PARAMETERS, int image_type);
+static void _php_image_bw_convert(gdImagePtr im_org, gdIOCtx *out, int threshold);
+
+/* {{{ arginfo */
+ZEND_BEGIN_ARG_INFO(arginfo_gd_info, 0)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imageloadfont, 0)
+ ZEND_ARG_INFO(0, filename)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagesetstyle, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, styles) /* ARRAY_INFO(0, styles, 0) */
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagecreatetruecolor, 0)
+ ZEND_ARG_INFO(0, x_size)
+ ZEND_ARG_INFO(0, y_size)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imageistruecolor, 0)
+ ZEND_ARG_INFO(0, im)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagetruecolortopalette, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, ditherFlag)
+ ZEND_ARG_INFO(0, colorsWanted)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagecolormatch, 0)
+ ZEND_ARG_INFO(0, im1)
+ ZEND_ARG_INFO(0, im2)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagesetthickness, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, thickness)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagefilledellipse, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, cx)
+ ZEND_ARG_INFO(0, cy)
+ ZEND_ARG_INFO(0, w)
+ ZEND_ARG_INFO(0, h)
+ ZEND_ARG_INFO(0, color)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagefilledarc, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, cx)
+ ZEND_ARG_INFO(0, cy)
+ ZEND_ARG_INFO(0, w)
+ ZEND_ARG_INFO(0, h)
+ ZEND_ARG_INFO(0, s)
+ ZEND_ARG_INFO(0, e)
+ ZEND_ARG_INFO(0, col)
+ ZEND_ARG_INFO(0, style)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagealphablending, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, blend)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagesavealpha, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, save)
+ZEND_END_ARG_INFO()
+
+#if HAVE_GD_BUNDLED
+ZEND_BEGIN_ARG_INFO(arginfo_imagelayereffect, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, effect)
+ZEND_END_ARG_INFO()
+#endif
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagecolorallocatealpha, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, red)
+ ZEND_ARG_INFO(0, green)
+ ZEND_ARG_INFO(0, blue)
+ ZEND_ARG_INFO(0, alpha)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagecolorresolvealpha, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, red)
+ ZEND_ARG_INFO(0, green)
+ ZEND_ARG_INFO(0, blue)
+ ZEND_ARG_INFO(0, alpha)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagecolorclosestalpha, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, red)
+ ZEND_ARG_INFO(0, green)
+ ZEND_ARG_INFO(0, blue)
+ ZEND_ARG_INFO(0, alpha)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagecolorexactalpha, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, red)
+ ZEND_ARG_INFO(0, green)
+ ZEND_ARG_INFO(0, blue)
+ ZEND_ARG_INFO(0, alpha)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagecopyresampled, 0)
+ ZEND_ARG_INFO(0, dst_im)
+ ZEND_ARG_INFO(0, src_im)
+ ZEND_ARG_INFO(0, dst_x)
+ ZEND_ARG_INFO(0, dst_y)
+ ZEND_ARG_INFO(0, src_x)
+ ZEND_ARG_INFO(0, src_y)
+ ZEND_ARG_INFO(0, dst_w)
+ ZEND_ARG_INFO(0, dst_h)
+ ZEND_ARG_INFO(0, src_w)
+ ZEND_ARG_INFO(0, src_h)
+ZEND_END_ARG_INFO()
+
+#ifdef PHP_WIN32
+ZEND_BEGIN_ARG_INFO_EX(arginfo_imagegrabwindow, 0, 0, 1)
+ ZEND_ARG_INFO(0, handle)
+ ZEND_ARG_INFO(0, client_area)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagegrabscreen, 0)
+ZEND_END_ARG_INFO()
+#endif
+
+ZEND_BEGIN_ARG_INFO_EX(arginfo_imagerotate, 0, 0, 3)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, angle)
+ ZEND_ARG_INFO(0, bgdcolor)
+ ZEND_ARG_INFO(0, ignoretransparent)
+ZEND_END_ARG_INFO()
+
+#if HAVE_GD_IMAGESETTILE
+ZEND_BEGIN_ARG_INFO(arginfo_imagesettile, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, tile)
+ZEND_END_ARG_INFO()
+#endif
+
+#if HAVE_GD_IMAGESETBRUSH
+ZEND_BEGIN_ARG_INFO(arginfo_imagesetbrush, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, brush)
+ZEND_END_ARG_INFO()
+#endif
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagecreate, 0)
+ ZEND_ARG_INFO(0, x_size)
+ ZEND_ARG_INFO(0, y_size)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagetypes, 0)
+ZEND_END_ARG_INFO()
+
+#if HAVE_LIBGD15
+ZEND_BEGIN_ARG_INFO(arginfo_imagecreatefromstring, 0)
+ ZEND_ARG_INFO(0, image)
+ZEND_END_ARG_INFO()
+#endif
+
+#ifdef HAVE_GD_GIF_READ
+ZEND_BEGIN_ARG_INFO(arginfo_imagecreatefromgif, 0)
+ ZEND_ARG_INFO(0, filename)
+ZEND_END_ARG_INFO()
+#endif
+
+#ifdef HAVE_GD_JPG
+ZEND_BEGIN_ARG_INFO(arginfo_imagecreatefromjpeg, 0)
+ ZEND_ARG_INFO(0, filename)
+ZEND_END_ARG_INFO()
+#endif
+
+#ifdef HAVE_GD_PNG
+ZEND_BEGIN_ARG_INFO(arginfo_imagecreatefrompng, 0)
+ ZEND_ARG_INFO(0, filename)
+ZEND_END_ARG_INFO()
+#endif
+
+#ifdef HAVE_GD_WEBP
+ZEND_BEGIN_ARG_INFO(arginfo_imagecreatefromwebp, 0)
+ ZEND_ARG_INFO(0, filename)
+ZEND_END_ARG_INFO()
+#endif
+
+#ifdef HAVE_GD_XBM
+ZEND_BEGIN_ARG_INFO(arginfo_imagecreatefromxbm, 0)
+ ZEND_ARG_INFO(0, filename)
+ZEND_END_ARG_INFO()
+#endif
+
+#if defined(HAVE_GD_XPM) && defined(HAVE_GD_BUNDLED)
+ZEND_BEGIN_ARG_INFO(arginfo_imagecreatefromxpm, 0)
+ ZEND_ARG_INFO(0, filename)
+ZEND_END_ARG_INFO()
+#endif
+
+#ifdef HAVE_GD_WBMP
+ZEND_BEGIN_ARG_INFO(arginfo_imagecreatefromwbmp, 0)
+ ZEND_ARG_INFO(0, filename)
+ZEND_END_ARG_INFO()
+#endif
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagecreatefromgd, 0)
+ ZEND_ARG_INFO(0, filename)
+ZEND_END_ARG_INFO()
+
+#ifdef HAVE_GD_GD2
+ZEND_BEGIN_ARG_INFO(arginfo_imagecreatefromgd2, 0)
+ ZEND_ARG_INFO(0, filename)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagecreatefromgd2part, 0)
+ ZEND_ARG_INFO(0, filename)
+ ZEND_ARG_INFO(0, srcX)
+ ZEND_ARG_INFO(0, srcY)
+ ZEND_ARG_INFO(0, width)
+ ZEND_ARG_INFO(0, height)
+ZEND_END_ARG_INFO()
+#endif
+
+#if HAVE_GD_BUNDLED
+ZEND_BEGIN_ARG_INFO_EX(arginfo_imagexbm, 0, 0, 2)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, filename)
+ ZEND_ARG_INFO(0, foreground)
+ZEND_END_ARG_INFO()
+#endif
+
+#ifdef HAVE_GD_GIF_CREATE
+ZEND_BEGIN_ARG_INFO_EX(arginfo_imagegif, 0, 0, 1)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, filename)
+ZEND_END_ARG_INFO()
+#endif
+
+#ifdef HAVE_GD_PNG
+ZEND_BEGIN_ARG_INFO_EX(arginfo_imagepng, 0, 0, 1)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, filename)
+ZEND_END_ARG_INFO()
+#endif
+
+#ifdef HAVE_GD_WEBP
+ZEND_BEGIN_ARG_INFO_EX(arginfo_imagewebp, 0, 0, 1)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, filename)
+ZEND_END_ARG_INFO()
+#endif
+
+#ifdef HAVE_GD_JPG
+ZEND_BEGIN_ARG_INFO_EX(arginfo_imagejpeg, 0, 0, 1)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, filename)
+ ZEND_ARG_INFO(0, quality)
+ZEND_END_ARG_INFO()
+#endif
+
+#ifdef HAVE_GD_WBMP
+ZEND_BEGIN_ARG_INFO_EX(arginfo_imagewbmp, 0, 0, 1)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, filename)
+ ZEND_ARG_INFO(0, foreground)
+ZEND_END_ARG_INFO()
+#endif
+
+ZEND_BEGIN_ARG_INFO_EX(arginfo_imagegd, 0, 0, 1)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, filename)
+ZEND_END_ARG_INFO()
+
+#ifdef HAVE_GD_GD2
+ZEND_BEGIN_ARG_INFO_EX(arginfo_imagegd2, 0, 0, 1)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, filename)
+ ZEND_ARG_INFO(0, chunk_size)
+ ZEND_ARG_INFO(0, type)
+ZEND_END_ARG_INFO()
+#endif
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagedestroy, 0)
+ ZEND_ARG_INFO(0, im)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagecolorallocate, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, red)
+ ZEND_ARG_INFO(0, green)
+ ZEND_ARG_INFO(0, blue)
+ZEND_END_ARG_INFO()
+
+#if HAVE_LIBGD15
+ZEND_BEGIN_ARG_INFO(arginfo_imagepalettecopy, 0)
+ ZEND_ARG_INFO(0, dst)
+ ZEND_ARG_INFO(0, src)
+ZEND_END_ARG_INFO()
+#endif
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagecolorat, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, x)
+ ZEND_ARG_INFO(0, y)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagecolorclosest, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, red)
+ ZEND_ARG_INFO(0, green)
+ ZEND_ARG_INFO(0, blue)
+ZEND_END_ARG_INFO()
+
+#if HAVE_COLORCLOSESTHWB
+ZEND_BEGIN_ARG_INFO(arginfo_imagecolorclosesthwb, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, red)
+ ZEND_ARG_INFO(0, green)
+ ZEND_ARG_INFO(0, blue)
+ZEND_END_ARG_INFO()
+#endif
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagecolordeallocate, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, index)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagecolorresolve, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, red)
+ ZEND_ARG_INFO(0, green)
+ ZEND_ARG_INFO(0, blue)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagecolorexact, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, red)
+ ZEND_ARG_INFO(0, green)
+ ZEND_ARG_INFO(0, blue)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO_EX(arginfo_imagecolorset, 0, 0, 5)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, color)
+ ZEND_ARG_INFO(0, red)
+ ZEND_ARG_INFO(0, green)
+ ZEND_ARG_INFO(0, blue)
+ ZEND_ARG_INFO(0, alpha)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagecolorsforindex, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, index)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagegammacorrect, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, inputgamma)
+ ZEND_ARG_INFO(0, outputgamma)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagesetpixel, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, x)
+ ZEND_ARG_INFO(0, y)
+ ZEND_ARG_INFO(0, col)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imageline, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, x1)
+ ZEND_ARG_INFO(0, y1)
+ ZEND_ARG_INFO(0, x2)
+ ZEND_ARG_INFO(0, y2)
+ ZEND_ARG_INFO(0, col)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagedashedline, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, x1)
+ ZEND_ARG_INFO(0, y1)
+ ZEND_ARG_INFO(0, x2)
+ ZEND_ARG_INFO(0, y2)
+ ZEND_ARG_INFO(0, col)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagerectangle, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, x1)
+ ZEND_ARG_INFO(0, y1)
+ ZEND_ARG_INFO(0, x2)
+ ZEND_ARG_INFO(0, y2)
+ ZEND_ARG_INFO(0, col)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagefilledrectangle, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, x1)
+ ZEND_ARG_INFO(0, y1)
+ ZEND_ARG_INFO(0, x2)
+ ZEND_ARG_INFO(0, y2)
+ ZEND_ARG_INFO(0, col)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagearc, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, cx)
+ ZEND_ARG_INFO(0, cy)
+ ZEND_ARG_INFO(0, w)
+ ZEND_ARG_INFO(0, h)
+ ZEND_ARG_INFO(0, s)
+ ZEND_ARG_INFO(0, e)
+ ZEND_ARG_INFO(0, col)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imageellipse, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, cx)
+ ZEND_ARG_INFO(0, cy)
+ ZEND_ARG_INFO(0, w)
+ ZEND_ARG_INFO(0, h)
+ ZEND_ARG_INFO(0, color)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagefilltoborder, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, x)
+ ZEND_ARG_INFO(0, y)
+ ZEND_ARG_INFO(0, border)
+ ZEND_ARG_INFO(0, col)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagefill, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, x)
+ ZEND_ARG_INFO(0, y)
+ ZEND_ARG_INFO(0, col)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagecolorstotal, 0)
+ ZEND_ARG_INFO(0, im)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO_EX(arginfo_imagecolortransparent, 0, 0, 1)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, col)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO_EX(arginfo_imageinterlace, 0, 0, 1)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, interlace)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagepolygon, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, points) /* ARRAY_INFO(0, points, 0) */
+ ZEND_ARG_INFO(0, num_pos)
+ ZEND_ARG_INFO(0, col)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagefilledpolygon, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, points) /* ARRAY_INFO(0, points, 0) */
+ ZEND_ARG_INFO(0, num_pos)
+ ZEND_ARG_INFO(0, col)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagefontwidth, 0)
+ ZEND_ARG_INFO(0, font)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagefontheight, 0)
+ ZEND_ARG_INFO(0, font)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagechar, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, font)
+ ZEND_ARG_INFO(0, x)
+ ZEND_ARG_INFO(0, y)
+ ZEND_ARG_INFO(0, c)
+ ZEND_ARG_INFO(0, col)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagecharup, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, font)
+ ZEND_ARG_INFO(0, x)
+ ZEND_ARG_INFO(0, y)
+ ZEND_ARG_INFO(0, c)
+ ZEND_ARG_INFO(0, col)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagestring, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, font)
+ ZEND_ARG_INFO(0, x)
+ ZEND_ARG_INFO(0, y)
+ ZEND_ARG_INFO(0, str)
+ ZEND_ARG_INFO(0, col)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagestringup, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, font)
+ ZEND_ARG_INFO(0, x)
+ ZEND_ARG_INFO(0, y)
+ ZEND_ARG_INFO(0, str)
+ ZEND_ARG_INFO(0, col)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagecopy, 0)
+ ZEND_ARG_INFO(0, dst_im)
+ ZEND_ARG_INFO(0, src_im)
+ ZEND_ARG_INFO(0, dst_x)
+ ZEND_ARG_INFO(0, dst_y)
+ ZEND_ARG_INFO(0, src_x)
+ ZEND_ARG_INFO(0, src_y)
+ ZEND_ARG_INFO(0, src_w)
+ ZEND_ARG_INFO(0, src_h)
+ZEND_END_ARG_INFO()
+
+#if HAVE_LIBGD15
+ZEND_BEGIN_ARG_INFO(arginfo_imagecopymerge, 0)
+ ZEND_ARG_INFO(0, src_im)
+ ZEND_ARG_INFO(0, dst_im)
+ ZEND_ARG_INFO(0, dst_x)
+ ZEND_ARG_INFO(0, dst_y)
+ ZEND_ARG_INFO(0, src_x)
+ ZEND_ARG_INFO(0, src_y)
+ ZEND_ARG_INFO(0, src_w)
+ ZEND_ARG_INFO(0, src_h)
+ ZEND_ARG_INFO(0, pct)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagecopymergegray, 0)
+ ZEND_ARG_INFO(0, src_im)
+ ZEND_ARG_INFO(0, dst_im)
+ ZEND_ARG_INFO(0, dst_x)
+ ZEND_ARG_INFO(0, dst_y)
+ ZEND_ARG_INFO(0, src_x)
+ ZEND_ARG_INFO(0, src_y)
+ ZEND_ARG_INFO(0, src_w)
+ ZEND_ARG_INFO(0, src_h)
+ ZEND_ARG_INFO(0, pct)
+ZEND_END_ARG_INFO()
+#endif
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagecopyresized, 0)
+ ZEND_ARG_INFO(0, dst_im)
+ ZEND_ARG_INFO(0, src_im)
+ ZEND_ARG_INFO(0, dst_x)
+ ZEND_ARG_INFO(0, dst_y)
+ ZEND_ARG_INFO(0, src_x)
+ ZEND_ARG_INFO(0, src_y)
+ ZEND_ARG_INFO(0, dst_w)
+ ZEND_ARG_INFO(0, dst_h)
+ ZEND_ARG_INFO(0, src_w)
+ ZEND_ARG_INFO(0, src_h)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagesx, 0)
+ ZEND_ARG_INFO(0, im)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagesy, 0)
+ ZEND_ARG_INFO(0, im)
+ZEND_END_ARG_INFO()
+
+#ifdef ENABLE_GD_TTF
+#if HAVE_LIBFREETYPE && HAVE_GD_STRINGFTEX
+ZEND_BEGIN_ARG_INFO_EX(arginfo_imageftbbox, 0, 0, 4)
+ ZEND_ARG_INFO(0, size)
+ ZEND_ARG_INFO(0, angle)
+ ZEND_ARG_INFO(0, font_file)
+ ZEND_ARG_INFO(0, text)
+ ZEND_ARG_INFO(0, extrainfo) /* ARRAY_INFO(0, extrainfo, 0) */
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO_EX(arginfo_imagefttext, 0, 0, 8)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, size)
+ ZEND_ARG_INFO(0, angle)
+ ZEND_ARG_INFO(0, x)
+ ZEND_ARG_INFO(0, y)
+ ZEND_ARG_INFO(0, col)
+ ZEND_ARG_INFO(0, font_file)
+ ZEND_ARG_INFO(0, text)
+ ZEND_ARG_INFO(0, extrainfo) /* ARRAY_INFO(0, extrainfo, 0) */
+ZEND_END_ARG_INFO()
+#endif
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagettfbbox, 0)
+ ZEND_ARG_INFO(0, size)
+ ZEND_ARG_INFO(0, angle)
+ ZEND_ARG_INFO(0, font_file)
+ ZEND_ARG_INFO(0, text)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagettftext, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, size)
+ ZEND_ARG_INFO(0, angle)
+ ZEND_ARG_INFO(0, x)
+ ZEND_ARG_INFO(0, y)
+ ZEND_ARG_INFO(0, col)
+ ZEND_ARG_INFO(0, font_file)
+ ZEND_ARG_INFO(0, text)
+ZEND_END_ARG_INFO()
+#endif
+
+#ifdef HAVE_LIBT1
+ZEND_BEGIN_ARG_INFO(arginfo_imagepsloadfont, 0)
+ ZEND_ARG_INFO(0, pathname)
+ZEND_END_ARG_INFO()
+
+/*
+ZEND_BEGIN_ARG_INFO(arginfo_imagepscopyfont, 0)
+ ZEND_ARG_INFO(0, font_index)
+ZEND_END_ARG_INFO()
+*/
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagepsfreefont, 0)
+ ZEND_ARG_INFO(0, font_index)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagepsencodefont, 0)
+ ZEND_ARG_INFO(0, font_index)
+ ZEND_ARG_INFO(0, filename)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagepsextendfont, 0)
+ ZEND_ARG_INFO(0, font_index)
+ ZEND_ARG_INFO(0, extend)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imagepsslantfont, 0)
+ ZEND_ARG_INFO(0, font_index)
+ ZEND_ARG_INFO(0, slant)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO_EX(arginfo_imagepstext, 0, 0, 8)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, text)
+ ZEND_ARG_INFO(0, font)
+ ZEND_ARG_INFO(0, size)
+ ZEND_ARG_INFO(0, foreground)
+ ZEND_ARG_INFO(0, background)
+ ZEND_ARG_INFO(0, xcoord)
+ ZEND_ARG_INFO(0, ycoord)
+ ZEND_ARG_INFO(0, space)
+ ZEND_ARG_INFO(0, tightness)
+ ZEND_ARG_INFO(0, angle)
+ ZEND_ARG_INFO(0, antialias)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO_EX(arginfo_imagepsbbox, 0, 0, 3)
+ ZEND_ARG_INFO(0, text)
+ ZEND_ARG_INFO(0, font)
+ ZEND_ARG_INFO(0, size)
+ ZEND_ARG_INFO(0, space)
+ ZEND_ARG_INFO(0, tightness)
+ ZEND_ARG_INFO(0, angle)
+ZEND_END_ARG_INFO()
+#endif
+
+#ifdef HAVE_GD_WBMP
+ZEND_BEGIN_ARG_INFO_EX(arginfo_image2wbmp, 0, 0, 1)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, filename)
+ ZEND_ARG_INFO(0, threshold)
+ZEND_END_ARG_INFO()
+#endif
+
+#if defined(HAVE_GD_JPG) && defined(HAVE_GD_WBMP)
+ZEND_BEGIN_ARG_INFO(arginfo_jpeg2wbmp, 0)
+ ZEND_ARG_INFO(0, f_org)
+ ZEND_ARG_INFO(0, f_dest)
+ ZEND_ARG_INFO(0, d_height)
+ ZEND_ARG_INFO(0, d_width)
+ ZEND_ARG_INFO(0, d_threshold)
+ZEND_END_ARG_INFO()
+#endif
+
+#if defined(HAVE_GD_PNG) && defined(HAVE_GD_WBMP)
+ZEND_BEGIN_ARG_INFO(arginfo_png2wbmp, 0)
+ ZEND_ARG_INFO(0, f_org)
+ ZEND_ARG_INFO(0, f_dest)
+ ZEND_ARG_INFO(0, d_height)
+ ZEND_ARG_INFO(0, d_width)
+ ZEND_ARG_INFO(0, d_threshold)
+ZEND_END_ARG_INFO()
+#endif
+
+ZEND_BEGIN_ARG_INFO_EX(arginfo_imagefilter, 0, 0, 2)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, filtertype)
+ ZEND_ARG_INFO(0, arg1)
+ ZEND_ARG_INFO(0, arg2)
+ ZEND_ARG_INFO(0, arg3)
+ ZEND_ARG_INFO(0, arg4)
+ZEND_END_ARG_INFO()
+
+ZEND_BEGIN_ARG_INFO(arginfo_imageconvolution, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, matrix3x3) /* ARRAY_INFO(0, matrix3x3, 0) */
+ ZEND_ARG_INFO(0, div)
+ ZEND_ARG_INFO(0, offset)
+ZEND_END_ARG_INFO()
+
+#ifdef HAVE_GD_BUNDLED
+ZEND_BEGIN_ARG_INFO(arginfo_imageantialias, 0)
+ ZEND_ARG_INFO(0, im)
+ ZEND_ARG_INFO(0, on)
+ZEND_END_ARG_INFO()
+#endif
+
+/* }}} */
+
+/* {{{ gd_functions[]
+ */
+const zend_function_entry gd_functions[] = {
+ PHP_FE(gd_info, arginfo_gd_info)
+ PHP_FE(imagearc, arginfo_imagearc)
+ PHP_FE(imageellipse, arginfo_imageellipse)
+ PHP_FE(imagechar, arginfo_imagechar)
+ PHP_FE(imagecharup, arginfo_imagecharup)
+ PHP_FE(imagecolorat, arginfo_imagecolorat)
+ PHP_FE(imagecolorallocate, arginfo_imagecolorallocate)
+#if HAVE_LIBGD15
+ PHP_FE(imagepalettecopy, arginfo_imagepalettecopy)
+ PHP_FE(imagecreatefromstring, arginfo_imagecreatefromstring)
+#endif
+ PHP_FE(imagecolorclosest, arginfo_imagecolorclosest)
+#if HAVE_COLORCLOSESTHWB
+ PHP_FE(imagecolorclosesthwb, arginfo_imagecolorclosesthwb)
+#endif
+ PHP_FE(imagecolordeallocate, arginfo_imagecolordeallocate)
+ PHP_FE(imagecolorresolve, arginfo_imagecolorresolve)
+ PHP_FE(imagecolorexact, arginfo_imagecolorexact)
+ PHP_FE(imagecolorset, arginfo_imagecolorset)
+ PHP_FE(imagecolortransparent, arginfo_imagecolortransparent)
+ PHP_FE(imagecolorstotal, arginfo_imagecolorstotal)
+ PHP_FE(imagecolorsforindex, arginfo_imagecolorsforindex)
+ PHP_FE(imagecopy, arginfo_imagecopy)
+#if HAVE_LIBGD15
+ PHP_FE(imagecopymerge, arginfo_imagecopymerge)
+ PHP_FE(imagecopymergegray, arginfo_imagecopymergegray)
+#endif
+ PHP_FE(imagecopyresized, arginfo_imagecopyresized)
+ PHP_FE(imagecreate, arginfo_imagecreate)
+ PHP_FE(imagecreatetruecolor, arginfo_imagecreatetruecolor)
+ PHP_FE(imageistruecolor, arginfo_imageistruecolor)
+ PHP_FE(imagetruecolortopalette, arginfo_imagetruecolortopalette)
+ PHP_FE(imagesetthickness, arginfo_imagesetthickness)
+ PHP_FE(imagefilledarc, arginfo_imagefilledarc)
+ PHP_FE(imagefilledellipse, arginfo_imagefilledellipse)
+ PHP_FE(imagealphablending, arginfo_imagealphablending)
+ PHP_FE(imagesavealpha, arginfo_imagesavealpha)
+ PHP_FE(imagecolorallocatealpha, arginfo_imagecolorallocatealpha)
+ PHP_FE(imagecolorresolvealpha, arginfo_imagecolorresolvealpha)
+ PHP_FE(imagecolorclosestalpha, arginfo_imagecolorclosestalpha)
+ PHP_FE(imagecolorexactalpha, arginfo_imagecolorexactalpha)
+ PHP_FE(imagecopyresampled, arginfo_imagecopyresampled)
+
+#ifdef PHP_WIN32
+ PHP_FE(imagegrabwindow, arginfo_imagegrabwindow)
+ PHP_FE(imagegrabscreen, arginfo_imagegrabscreen)
+#endif
+
+ PHP_FE(imagerotate, arginfo_imagerotate)
+
+#ifdef HAVE_GD_BUNDLED
+ PHP_FE(imageantialias, arginfo_imageantialias)
+#endif
+
+#if HAVE_GD_IMAGESETTILE
+ PHP_FE(imagesettile, arginfo_imagesettile)
+#endif
+
+#if HAVE_GD_IMAGESETBRUSH
+ PHP_FE(imagesetbrush, arginfo_imagesetbrush)
+#endif
+
+ PHP_FE(imagesetstyle, arginfo_imagesetstyle)
+
+#ifdef HAVE_GD_PNG
+ PHP_FE(imagecreatefrompng, arginfo_imagecreatefrompng)
+#endif
+#ifdef HAVE_GD_WEBP
+ PHP_FE(imagecreatefromwebp, arginfo_imagecreatefromwebp)
+#endif
+#ifdef HAVE_GD_GIF_READ
+ PHP_FE(imagecreatefromgif, arginfo_imagecreatefromgif)
+#endif
+#ifdef HAVE_GD_JPG
+ PHP_FE(imagecreatefromjpeg, arginfo_imagecreatefromjpeg)
+#endif
+#ifdef HAVE_GD_WBMP
+ PHP_FE(imagecreatefromwbmp, arginfo_imagecreatefromwbmp)
+#endif
+#ifdef HAVE_GD_XBM
+ PHP_FE(imagecreatefromxbm, arginfo_imagecreatefromxbm)
+#endif
+#if defined(HAVE_GD_XPM) && defined(HAVE_GD_BUNDLED)
+ PHP_FE(imagecreatefromxpm, arginfo_imagecreatefromxpm)
+#endif
+ PHP_FE(imagecreatefromgd, arginfo_imagecreatefromgd)
+#ifdef HAVE_GD_GD2
+ PHP_FE(imagecreatefromgd2, arginfo_imagecreatefromgd2)
+ PHP_FE(imagecreatefromgd2part, arginfo_imagecreatefromgd2part)
+#endif
+#ifdef HAVE_GD_PNG
+ PHP_FE(imagepng, arginfo_imagepng)
+#endif
+#ifdef HAVE_GD_WEBP
+ PHP_FE(imagewebp, arginfo_imagewebp)
+#endif
+#ifdef HAVE_GD_GIF_CREATE
+ PHP_FE(imagegif, arginfo_imagegif)
+#endif
+#ifdef HAVE_GD_JPG
+ PHP_FE(imagejpeg, arginfo_imagejpeg)
+#endif
+#ifdef HAVE_GD_WBMP
+ PHP_FE(imagewbmp, arginfo_imagewbmp)
+#endif
+ PHP_FE(imagegd, arginfo_imagegd)
+#ifdef HAVE_GD_GD2
+ PHP_FE(imagegd2, arginfo_imagegd2)
+#endif
+
+ PHP_FE(imagedestroy, arginfo_imagedestroy)
+ PHP_FE(imagegammacorrect, arginfo_imagegammacorrect)
+ PHP_FE(imagefill, arginfo_imagefill)
+ PHP_FE(imagefilledpolygon, arginfo_imagefilledpolygon)
+ PHP_FE(imagefilledrectangle, arginfo_imagefilledrectangle)
+ PHP_FE(imagefilltoborder, arginfo_imagefilltoborder)
+ PHP_FE(imagefontwidth, arginfo_imagefontwidth)
+ PHP_FE(imagefontheight, arginfo_imagefontheight)
+ PHP_FE(imageinterlace, arginfo_imageinterlace)
+ PHP_FE(imageline, arginfo_imageline)
+ PHP_FE(imageloadfont, arginfo_imageloadfont)
+ PHP_FE(imagepolygon, arginfo_imagepolygon)
+ PHP_FE(imagerectangle, arginfo_imagerectangle)
+ PHP_FE(imagesetpixel, arginfo_imagesetpixel)
+ PHP_FE(imagestring, arginfo_imagestring)
+ PHP_FE(imagestringup, arginfo_imagestringup)
+ PHP_FE(imagesx, arginfo_imagesx)
+ PHP_FE(imagesy, arginfo_imagesy)
+ PHP_FE(imagedashedline, arginfo_imagedashedline)
+
+#ifdef ENABLE_GD_TTF
+ PHP_FE(imagettfbbox, arginfo_imagettfbbox)
+ PHP_FE(imagettftext, arginfo_imagettftext)
+#if HAVE_LIBFREETYPE && HAVE_GD_STRINGFTEX
+ PHP_FE(imageftbbox, arginfo_imageftbbox)
+ PHP_FE(imagefttext, arginfo_imagefttext)
+#endif
+#endif
+
+#ifdef HAVE_LIBT1
+ PHP_FE(imagepsloadfont, arginfo_imagepsloadfont)
+ /*
+ PHP_FE(imagepscopyfont, arginfo_imagepscopyfont)
+ */
+ PHP_FE(imagepsfreefont, arginfo_imagepsfreefont)
+ PHP_FE(imagepsencodefont, arginfo_imagepsencodefont)
+ PHP_FE(imagepsextendfont, arginfo_imagepsextendfont)
+ PHP_FE(imagepsslantfont, arginfo_imagepsslantfont)
+ PHP_FE(imagepstext, arginfo_imagepstext)
+ PHP_FE(imagepsbbox, arginfo_imagepsbbox)
+#endif
+ PHP_FE(imagetypes, arginfo_imagetypes)
+
+#if defined(HAVE_GD_JPG) && defined(HAVE_GD_WBMP)
+ PHP_FE(jpeg2wbmp, arginfo_jpeg2wbmp)
+#endif
+#if defined(HAVE_GD_PNG) && defined(HAVE_GD_WBMP)
+ PHP_FE(png2wbmp, arginfo_png2wbmp)
+#endif
+#ifdef HAVE_GD_WBMP
+ PHP_FE(image2wbmp, arginfo_image2wbmp)
+#endif
+#if HAVE_GD_BUNDLED
+ PHP_FE(imagelayereffect, arginfo_imagelayereffect)
+ PHP_FE(imagexbm, arginfo_imagexbm)
+#endif
+
+ PHP_FE(imagecolormatch, arginfo_imagecolormatch)
+
+/* gd filters */
+ PHP_FE(imagefilter, arginfo_imagefilter)
+ PHP_FE(imageconvolution, arginfo_imageconvolution)
+
+ PHP_FE_END
+};
+/* }}} */
+
+zend_module_entry gd_module_entry = {
+ STANDARD_MODULE_HEADER,
+ "gd",
+ gd_functions,
+ PHP_MINIT(gd),
+#if HAVE_LIBT1 || HAVE_GD_FONTMUTEX
+ PHP_MSHUTDOWN(gd),
+#else
+ NULL,
+#endif
+ NULL,
+#if HAVE_GD_STRINGFT && (HAVE_LIBFREETYPE && (HAVE_GD_FONTCACHESHUTDOWN || HAVE_GD_FREEFONTCACHE))
+ PHP_RSHUTDOWN(gd),
+#else
+ NULL,
+#endif
+ PHP_MINFO(gd),
+ NO_VERSION_YET,
+ STANDARD_MODULE_PROPERTIES
+};
+
+#ifdef COMPILE_DL_GD
+ZEND_GET_MODULE(gd)
+#endif
+
+/* {{{ PHP_INI_BEGIN */
+PHP_INI_BEGIN()
+ PHP_INI_ENTRY("gd.jpeg_ignore_warning", "0", PHP_INI_ALL, NULL)
+PHP_INI_END()
+/* }}} */
+
+/* {{{ php_free_gd_image
+ */
+static void php_free_gd_image(zend_rsrc_list_entry *rsrc TSRMLS_DC)
+{
+ gdImageDestroy((gdImagePtr) rsrc->ptr);
+}
+/* }}} */
+
+/* {{{ php_free_gd_font
+ */
+static void php_free_gd_font(zend_rsrc_list_entry *rsrc TSRMLS_DC)
+{
+ gdFontPtr fp = (gdFontPtr) rsrc->ptr;
+
+ if (fp->data) {
+ efree(fp->data);
+ }
+
+ efree(fp);
+}
+/* }}} */
+
+/* {{{ PHP_MSHUTDOWN_FUNCTION
+ */
+#if HAVE_LIBT1 || HAVE_GD_FONTMUTEX
+PHP_MSHUTDOWN_FUNCTION(gd)
+{
+#if HAVE_LIBT1
+ T1_CloseLib();
+#endif
+#if HAVE_GD_FONTMUTEX && HAVE_LIBFREETYPE
+ gdFontCacheMutexShutdown();
+#endif
+ UNREGISTER_INI_ENTRIES();
+ return SUCCESS;
+}
+#endif
+/* }}} */
+
+
+/* {{{ PHP_MINIT_FUNCTION
+ */
+PHP_MINIT_FUNCTION(gd)
+{
+ le_gd = zend_register_list_destructors_ex(php_free_gd_image, NULL, "gd", module_number);
+ le_gd_font = zend_register_list_destructors_ex(php_free_gd_font, NULL, "gd font", module_number);
+
+#if HAVE_GD_FONTMUTEX && HAVE_LIBFREETYPE
+ gdFontCacheMutexSetup();
+#endif
+#if HAVE_LIBT1
+ T1_SetBitmapPad(8);
+ T1_InitLib(NO_LOGFILE | IGNORE_CONFIGFILE | IGNORE_FONTDATABASE);
+ T1_SetLogLevel(T1LOG_DEBUG);
+ le_ps_font = zend_register_list_destructors_ex(php_free_ps_font, NULL, "gd PS font", module_number);
+ le_ps_enc = zend_register_list_destructors_ex(php_free_ps_enc, NULL, "gd PS encoding", module_number);
+#endif
+
+ REGISTER_INI_ENTRIES();
+
+ REGISTER_LONG_CONSTANT("IMG_GIF", 1, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("IMG_JPG", 2, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("IMG_JPEG", 2, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("IMG_PNG", 4, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("IMG_WBMP", 8, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("IMG_XPM", 16, CONST_CS | CONST_PERSISTENT);
+#ifdef gdTiled
+ /* special colours for gd */
+ REGISTER_LONG_CONSTANT("IMG_COLOR_TILED", gdTiled, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("IMG_COLOR_STYLED", gdStyled, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("IMG_COLOR_BRUSHED", gdBrushed, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("IMG_COLOR_STYLEDBRUSHED", gdStyledBrushed, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("IMG_COLOR_TRANSPARENT", gdTransparent, CONST_CS | CONST_PERSISTENT);
+#endif
+ /* for imagefilledarc */
+ REGISTER_LONG_CONSTANT("IMG_ARC_ROUNDED", gdArc, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("IMG_ARC_PIE", gdPie, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("IMG_ARC_CHORD", gdChord, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("IMG_ARC_NOFILL", gdNoFill, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("IMG_ARC_EDGED", gdEdged, CONST_CS | CONST_PERSISTENT);
+
+/* GD2 image format types */
+#ifdef GD2_FMT_RAW
+ REGISTER_LONG_CONSTANT("IMG_GD2_RAW", GD2_FMT_RAW, CONST_CS | CONST_PERSISTENT);
+#endif
+#ifdef GD2_FMT_COMPRESSED
+ REGISTER_LONG_CONSTANT("IMG_GD2_COMPRESSED", GD2_FMT_COMPRESSED, CONST_CS | CONST_PERSISTENT);
+#endif
+#if HAVE_GD_BUNDLED
+ REGISTER_LONG_CONSTANT("IMG_EFFECT_REPLACE", gdEffectReplace, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("IMG_EFFECT_ALPHABLEND", gdEffectAlphaBlend, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("IMG_EFFECT_NORMAL", gdEffectNormal, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("IMG_EFFECT_OVERLAY", gdEffectOverlay, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("GD_BUNDLED", 1, CONST_CS | CONST_PERSISTENT);
+#else
+ REGISTER_LONG_CONSTANT("GD_BUNDLED", 0, CONST_CS | CONST_PERSISTENT);
+#endif
+
+ /* Section Filters */
+ REGISTER_LONG_CONSTANT("IMG_FILTER_NEGATE", IMAGE_FILTER_NEGATE, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("IMG_FILTER_GRAYSCALE", IMAGE_FILTER_GRAYSCALE, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("IMG_FILTER_BRIGHTNESS", IMAGE_FILTER_BRIGHTNESS, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("IMG_FILTER_CONTRAST", IMAGE_FILTER_CONTRAST, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("IMG_FILTER_COLORIZE", IMAGE_FILTER_COLORIZE, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("IMG_FILTER_EDGEDETECT", IMAGE_FILTER_EDGEDETECT, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("IMG_FILTER_GAUSSIAN_BLUR", IMAGE_FILTER_GAUSSIAN_BLUR, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("IMG_FILTER_SELECTIVE_BLUR", IMAGE_FILTER_SELECTIVE_BLUR, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("IMG_FILTER_EMBOSS", IMAGE_FILTER_EMBOSS, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("IMG_FILTER_MEAN_REMOVAL", IMAGE_FILTER_MEAN_REMOVAL, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("IMG_FILTER_SMOOTH", IMAGE_FILTER_SMOOTH, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("IMG_FILTER_PIXELATE", IMAGE_FILTER_PIXELATE, CONST_CS | CONST_PERSISTENT);
+ /* End Section Filters */
+
+#ifdef GD_VERSION_STRING
+ REGISTER_STRING_CONSTANT("GD_VERSION", GD_VERSION_STRING, CONST_CS | CONST_PERSISTENT);
+#endif
+
+#if defined(GD_MAJOR_VERSION) && defined(GD_MINOR_VERSION) && defined(GD_RELEASE_VERSION) && defined(GD_EXTRA_VERSION)
+ REGISTER_LONG_CONSTANT("GD_MAJOR_VERSION", GD_MAJOR_VERSION, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("GD_MINOR_VERSION", GD_MINOR_VERSION, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("GD_RELEASE_VERSION", GD_RELEASE_VERSION, CONST_CS | CONST_PERSISTENT);
+ REGISTER_STRING_CONSTANT("GD_EXTRA_VERSION", GD_EXTRA_VERSION, CONST_CS | CONST_PERSISTENT);
+#endif
+
+
+#ifdef HAVE_GD_PNG
+
+ /*
+ * cannot include #include "png.h"
+ * /usr/include/pngconf.h:310:2: error: #error png.h already includes setjmp.h with some additional fixup.
+ * as error, use the values for now...
+ */
+ REGISTER_LONG_CONSTANT("PNG_NO_FILTER", 0x00, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("PNG_FILTER_NONE", 0x08, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("PNG_FILTER_SUB", 0x10, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("PNG_FILTER_UP", 0x20, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("PNG_FILTER_AVG", 0x40, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("PNG_FILTER_PAETH", 0x80, CONST_CS | CONST_PERSISTENT);
+ REGISTER_LONG_CONSTANT("PNG_ALL_FILTERS", 0x08 | 0x10 | 0x20 | 0x40 | 0x80, CONST_CS | CONST_PERSISTENT);
+#endif
+
+ return SUCCESS;
+}
+/* }}} */
+
+/* {{{ PHP_RSHUTDOWN_FUNCTION
+ */
+#if HAVE_GD_STRINGFT && (HAVE_LIBFREETYPE && (HAVE_GD_FONTCACHESHUTDOWN || HAVE_GD_FREEFONTCACHE))
+PHP_RSHUTDOWN_FUNCTION(gd)
+{
+#if HAVE_GD_FONTCACHESHUTDOWN
+ gdFontCacheShutdown();
+#else
+ gdFreeFontCache();
+#endif
+ return SUCCESS;
+}
+#endif
+/* }}} */
+
+#if HAVE_GD_BUNDLED
+#define PHP_GD_VERSION_STRING "bundled (2.0.34 compatible)"
+#else
+#define PHP_GD_VERSION_STRING "2.0"
+#endif
+
+/* {{{ PHP_MINFO_FUNCTION
+ */
+PHP_MINFO_FUNCTION(gd)
+{
+ php_info_print_table_start();
+ php_info_print_table_row(2, "GD Support", "enabled");
+
+ /* need to use a PHPAPI function here because it is external module in windows */
+
+ php_info_print_table_row(2, "GD Version", PHP_GD_VERSION_STRING);
+
+#ifdef ENABLE_GD_TTF
+ php_info_print_table_row(2, "FreeType Support", "enabled");
+#if HAVE_LIBFREETYPE
+ php_info_print_table_row(2, "FreeType Linkage", "with freetype");
+ {
+ char tmp[256];
+
+#ifdef FREETYPE_PATCH
+ snprintf(tmp, sizeof(tmp), "%d.%d.%d", FREETYPE_MAJOR, FREETYPE_MINOR, FREETYPE_PATCH);
+#elif defined(FREETYPE_MAJOR)
+ snprintf(tmp, sizeof(tmp), "%d.%d", FREETYPE_MAJOR, FREETYPE_MINOR);
+#else
+ snprintf(tmp, sizeof(tmp), "1.x");
+#endif
+ php_info_print_table_row(2, "FreeType Version", tmp);
+ }
+#else
+ php_info_print_table_row(2, "FreeType Linkage", "with unknown library");
+#endif
+#endif
+
+#ifdef HAVE_LIBT1
+ php_info_print_table_row(2, "T1Lib Support", "enabled");
+#endif
+
+/* this next part is stupid ... if I knew better, I'd put them all on one row (cmv) */
+
+#ifdef HAVE_GD_GIF_READ
+ php_info_print_table_row(2, "GIF Read Support", "enabled");
+#endif
+#ifdef HAVE_GD_GIF_CREATE
+ php_info_print_table_row(2, "GIF Create Support", "enabled");
+#endif
+#ifdef HAVE_GD_JPG
+ {
+ char tmp[12];
+ snprintf(tmp, sizeof(tmp), "%s", gdJpegGetVersionString());
+ php_info_print_table_row(2, "JPEG Support", "enabled");
+ php_info_print_table_row(2, "libJPEG Version", tmp);
+ }
+#endif
+
+#ifdef HAVE_GD_PNG
+ php_info_print_table_row(2, "PNG Support", "enabled");
+ php_info_print_table_row(2, "libPNG Version", gdPngGetVersionString());
+#endif
+#ifdef HAVE_GD_WBMP
+ php_info_print_table_row(2, "WBMP Support", "enabled");
+#endif
+#if defined(HAVE_GD_XPM) && defined(HAVE_GD_BUNDLED)
+ php_info_print_table_row(2, "XPM Support", "enabled");
+ {
+ char tmp[12];
+ snprintf(tmp, sizeof(tmp), "%d", XpmLibraryVersion());
+ php_info_print_table_row(2, "libXpm Version", tmp);
+ }
+#endif
+#ifdef HAVE_GD_XBM
+ php_info_print_table_row(2, "XBM Support", "enabled");
+#endif
+#if defined(USE_GD_JISX0208) && defined(HAVE_GD_BUNDLED)
+ php_info_print_table_row(2, "JIS-mapped Japanese Font Support", "enabled");
+#endif
+ php_info_print_table_end();
+ DISPLAY_INI_ENTRIES();
+}
+/* }}} */
+
+/* {{{ proto array gd_info()
+ */
+PHP_FUNCTION(gd_info)
+{
+ if (zend_parse_parameters_none() == FAILURE) {
+ RETURN_FALSE;
+ }
+
+ array_init(return_value);
+
+ add_assoc_string(return_value, "GD Version", PHP_GD_VERSION_STRING, 1);
+
+#ifdef ENABLE_GD_TTF
+ add_assoc_bool(return_value, "FreeType Support", 1);
+#if HAVE_LIBFREETYPE
+ add_assoc_string(return_value, "FreeType Linkage", "with freetype", 1);
+#else
+ add_assoc_string(return_value, "FreeType Linkage", "with unknown library", 1);
+#endif
+#else
+ add_assoc_bool(return_value, "FreeType Support", 0);
+#endif
+
+#ifdef HAVE_LIBT1
+ add_assoc_bool(return_value, "T1Lib Support", 1);
+#else
+ add_assoc_bool(return_value, "T1Lib Support", 0);
+#endif
+#ifdef HAVE_GD_GIF_READ
+ add_assoc_bool(return_value, "GIF Read Support", 1);
+#else
+ add_assoc_bool(return_value, "GIF Read Support", 0);
+#endif
+#ifdef HAVE_GD_GIF_CREATE
+ add_assoc_bool(return_value, "GIF Create Support", 1);
+#else
+ add_assoc_bool(return_value, "GIF Create Support", 0);
+#endif
+#ifdef HAVE_GD_JPG
+ add_assoc_bool(return_value, "JPEG Support", 1);
+#else
+ add_assoc_bool(return_value, "JPEG Support", 0);
+#endif
+#ifdef HAVE_GD_PNG
+ add_assoc_bool(return_value, "PNG Support", 1);
+#else
+ add_assoc_bool(return_value, "PNG Support", 0);
+#endif
+#ifdef HAVE_GD_WBMP
+ add_assoc_bool(return_value, "WBMP Support", 1);
+#else
+ add_assoc_bool(return_value, "WBMP Support", 0);
+#endif
+#if defined(HAVE_GD_XPM) && defined(HAVE_GD_BUNDLED)
+ add_assoc_bool(return_value, "XPM Support", 1);
+#else
+ add_assoc_bool(return_value, "XPM Support", 0);
+#endif
+#ifdef HAVE_GD_XBM
+ add_assoc_bool(return_value, "XBM Support", 1);
+#else
+ add_assoc_bool(return_value, "XBM Support", 0);
+#endif
+#if defined(USE_GD_JISX0208) && defined(HAVE_GD_BUNDLED)
+ add_assoc_bool(return_value, "JIS-mapped Japanese Font Support", 1);
+#else
+ add_assoc_bool(return_value, "JIS-mapped Japanese Font Support", 0);
+#endif
+}
+/* }}} */
+
+/* Need this for cpdf. See also comment in file.c php3i_get_le_fp() */
+PHP_GD_API int phpi_get_le_gd(void)
+{
+ return le_gd;
+}
+/* }}} */
+
+#ifndef HAVE_GDIMAGECOLORRESOLVE
+
+/* {{{ gdImageColorResolve
+ */
+/********************************************************************/
+/* gdImageColorResolve is a replacement for the old fragment: */
+/* */
+/* if ((color=gdImageColorExact(im,R,G,B)) < 0) */
+/* if ((color=gdImageColorAllocate(im,R,G,B)) < 0) */
+/* color=gdImageColorClosest(im,R,G,B); */
+/* */
+/* in a single function */
+
+int gdImageColorResolve(gdImagePtr im, int r, int g, int b)
+{
+ int c;
+ int ct = -1;
+ int op = -1;
+ long rd, gd, bd, dist;
+ long mindist = 3*255*255; /* init to max poss dist */
+
+ for (c = 0; c < im->colorsTotal; c++) {
+ if (im->open[c]) {
+ op = c; /* Save open slot */
+ continue; /* Color not in use */
+ }
+ rd = (long) (im->red [c] - r);
+ gd = (long) (im->green[c] - g);
+ bd = (long) (im->blue [c] - b);
+ dist = rd * rd + gd * gd + bd * bd;
+ if (dist < mindist) {
+ if (dist == 0) {
+ return c; /* Return exact match color */
+ }
+ mindist = dist;
+ ct = c;
+ }
+ }
+ /* no exact match. We now know closest, but first try to allocate exact */
+ if (op == -1) {
+ op = im->colorsTotal;
+ if (op == gdMaxColors) { /* No room for more colors */
+ return ct; /* Return closest available color */
+ }
+ im->colorsTotal++;
+ }
+ im->red [op] = r;
+ im->green[op] = g;
+ im->blue [op] = b;
+ im->open [op] = 0;
+ return op; /* Return newly allocated color */
+}
+/* }}} */
+
+#endif
+
+#define FLIPWORD(a) (((a & 0xff000000) >> 24) | ((a & 0x00ff0000) >> 8) | ((a & 0x0000ff00) << 8) | ((a & 0x000000ff) << 24))
+
+/* {{{ proto int imageloadfont(string filename)
+ Load a new font */
+PHP_FUNCTION(imageloadfont)
+{
+ char *file;
+ int file_name, hdr_size = sizeof(gdFont) - sizeof(char *);
+ int ind, body_size, n = 0, b, i, body_size_check;
+ gdFontPtr font;
+ php_stream *stream;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &file, &file_name) == FAILURE) {
+ return;
+ }
+
+ stream = php_stream_open_wrapper(file, "rb", IGNORE_PATH | IGNORE_URL_WIN | REPORT_ERRORS, NULL);
+ if (stream == NULL) {
+ RETURN_FALSE;
+ }
+
+ /* Only supports a architecture-dependent binary dump format
+ * at the moment.
+ * The file format is like this on machines with 32-byte integers:
+ *
+ * byte 0-3: (int) number of characters in the font
+ * byte 4-7: (int) value of first character in the font (often 32, space)
+ * byte 8-11: (int) pixel width of each character
+ * byte 12-15: (int) pixel height of each character
+ * bytes 16-: (char) array with character data, one byte per pixel
+ * in each character, for a total of
+ * (nchars*width*height) bytes.
+ */
+ font = (gdFontPtr) emalloc(sizeof(gdFont));
+ b = 0;
+ while (b < hdr_size && (n = php_stream_read(stream, (char*)&font[b], hdr_size - b))) {
+ b += n;
+ }
+
+ if (!n) {
+ efree(font);
+ if (php_stream_eof(stream)) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "End of file while reading header");
+ } else {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Error while reading header");
+ }
+ php_stream_close(stream);
+ RETURN_FALSE;
+ }
+ i = php_stream_tell(stream);
+ php_stream_seek(stream, 0, SEEK_END);
+ body_size_check = php_stream_tell(stream) - hdr_size;
+ php_stream_seek(stream, i, SEEK_SET);
+
+ body_size = font->w * font->h * font->nchars;
+ if (body_size != body_size_check) {
+ font->w = FLIPWORD(font->w);
+ font->h = FLIPWORD(font->h);
+ font->nchars = FLIPWORD(font->nchars);
+ body_size = font->w * font->h * font->nchars;
+ }
+
+ if (overflow2(font->nchars, font->h)) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Error reading font, invalid font header");
+ efree(font);
+ php_stream_close(stream);
+ RETURN_FALSE;
+ }
+ if (overflow2(font->nchars * font->h, font->w )) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Error reading font, invalid font header");
+ efree(font);
+ php_stream_close(stream);
+ RETURN_FALSE;
+ }
+
+ if (body_size != body_size_check) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Error reading font");
+ efree(font);
+ php_stream_close(stream);
+ RETURN_FALSE;
+ }
+
+ font->data = emalloc(body_size);
+ b = 0;
+ while (b < body_size && (n = php_stream_read(stream, &font->data[b], body_size - b))) {
+ b += n;
+ }
+
+ if (!n) {
+ efree(font->data);
+ efree(font);
+ if (php_stream_eof(stream)) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "End of file while reading body");
+ } else {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Error while reading body");
+ }
+ php_stream_close(stream);
+ RETURN_FALSE;
+ }
+ php_stream_close(stream);
+
+ /* Adding 5 to the font index so we will never have font indices
+ * that overlap with the old fonts (with indices 1-5). The first
+ * list index given out is always 1.
+ */
+ ind = 5 + zend_list_insert(font, le_gd_font TSRMLS_CC);
+
+ RETURN_LONG(ind);
+}
+/* }}} */
+
+/* {{{ proto bool imagesetstyle(resource im, array styles)
+ Set the line drawing styles for use with imageline and IMG_COLOR_STYLED. */
+PHP_FUNCTION(imagesetstyle)
+{
+ zval *IM, *styles;
+ gdImagePtr im;
+ int * stylearr;
+ int index;
+ HashPosition pos;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "ra", &IM, &styles) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ /* copy the style values in the stylearr */
+ stylearr = safe_emalloc(sizeof(int), zend_hash_num_elements(HASH_OF(styles)), 0);
+
+ zend_hash_internal_pointer_reset_ex(HASH_OF(styles), &pos);
+
+ for (index = 0;; zend_hash_move_forward_ex(HASH_OF(styles), &pos)) {
+ zval ** item;
+
+ if (zend_hash_get_current_data_ex(HASH_OF(styles), (void **) &item, &pos) == FAILURE) {
+ break;
+ }
+
+ convert_to_long_ex(item);
+
+ stylearr[index++] = Z_LVAL_PP(item);
+ }
+
+ gdImageSetStyle(im, stylearr, index);
+
+ efree(stylearr);
+
+ RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto resource imagecreatetruecolor(int x_size, int y_size)
+ Create a new true color image */
+PHP_FUNCTION(imagecreatetruecolor)
+{
+ long x_size, y_size;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "ll", &x_size, &y_size) == FAILURE) {
+ return;
+ }
+
+ if (x_size <= 0 || y_size <= 0 || x_size >= INT_MAX || y_size >= INT_MAX) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Invalid image dimensions");
+ RETURN_FALSE;
+ }
+
+ im = gdImageCreateTrueColor(x_size, y_size);
+
+ if (!im) {
+ RETURN_FALSE;
+ }
+
+ ZEND_REGISTER_RESOURCE(return_value, im, le_gd);
+}
+/* }}} */
+
+/* {{{ proto bool imageistruecolor(resource im)
+ return true if the image uses truecolor */
+PHP_FUNCTION(imageistruecolor)
+{
+ zval *IM;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &IM) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ RETURN_BOOL(im->trueColor);
+}
+/* }}} */
+
+/* {{{ proto void imagetruecolortopalette(resource im, bool ditherFlag, int colorsWanted)
+ Convert a true colour image to a palette based image with a number of colours, optionally using dithering. */
+PHP_FUNCTION(imagetruecolortopalette)
+{
+ zval *IM;
+ zend_bool dither;
+ long ncolors;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rbl", &IM, &dither, &ncolors) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ if (ncolors <= 0) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Number of colors has to be greater than zero");
+ RETURN_FALSE;
+ }
+ gdImageTrueColorToPalette(im, dither, ncolors);
+
+ RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto bool imagecolormatch(resource im1, resource im2)
+ Makes the colors of the palette version of an image more closely match the true color version */
+PHP_FUNCTION(imagecolormatch)
+{
+ zval *IM1, *IM2;
+ gdImagePtr im1, im2;
+ int result;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rr", &IM1, &IM2) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im1, gdImagePtr, &IM1, -1, "Image", le_gd);
+ ZEND_FETCH_RESOURCE(im2, gdImagePtr, &IM2, -1, "Image", le_gd);
+
+ result = gdImageColorMatch(im1, im2);
+ switch (result) {
+ case -1:
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Image1 must be TrueColor" );
+ RETURN_FALSE;
+ break;
+ case -2:
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Image2 must be Palette" );
+ RETURN_FALSE;
+ break;
+ case -3:
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Image1 and Image2 must be the same size" );
+ RETURN_FALSE;
+ break;
+ case -4:
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Image2 must have at least one color" );
+ RETURN_FALSE;
+ break;
+ }
+
+ RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto bool imagesetthickness(resource im, int thickness)
+ Set line thickness for drawing lines, ellipses, rectangles, polygons etc. */
+PHP_FUNCTION(imagesetthickness)
+{
+ zval *IM;
+ long thick;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl", &IM, &thick) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ gdImageSetThickness(im, thick);
+
+ RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto bool imagefilledellipse(resource im, int cx, int cy, int w, int h, int color)
+ Draw an ellipse */
+PHP_FUNCTION(imagefilledellipse)
+{
+ zval *IM;
+ long cx, cy, w, h, color;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlllll", &IM, &cx, &cy, &w, &h, &color) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ gdImageFilledEllipse(im, cx, cy, w, h, color);
+
+ RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto bool imagefilledarc(resource im, int cx, int cy, int w, int h, int s, int e, int col, int style)
+ Draw a filled partial ellipse */
+PHP_FUNCTION(imagefilledarc)
+{
+ zval *IM;
+ long cx, cy, w, h, ST, E, col, style;
+ gdImagePtr im;
+ int e, st;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rllllllll", &IM, &cx, &cy, &w, &h, &ST, &E, &col, &style) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ e = E;
+ if (e < 0) {
+ e %= 360;
+ }
+
+ st = ST;
+ if (st < 0) {
+ st %= 360;
+ }
+
+ gdImageFilledArc(im, cx, cy, w, h, st, e, col, style);
+
+ RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto bool imagealphablending(resource im, bool on)
+ Turn alpha blending mode on or off for the given image */
+PHP_FUNCTION(imagealphablending)
+{
+ zval *IM;
+ zend_bool blend;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rb", &IM, &blend) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+ gdImageAlphaBlending(im, blend);
+
+ RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto bool imagesavealpha(resource im, bool on)
+ Include alpha channel to a saved image */
+PHP_FUNCTION(imagesavealpha)
+{
+ zval *IM;
+ zend_bool save;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rb", &IM, &save) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+ gdImageSaveAlpha(im, save);
+
+ RETURN_TRUE;
+}
+/* }}} */
+
+#if HAVE_GD_BUNDLED
+/* {{{ proto bool imagelayereffect(resource im, int effect)
+ Set the alpha blending flag to use the bundled libgd layering effects */
+PHP_FUNCTION(imagelayereffect)
+{
+ zval *IM;
+ long effect;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl", &IM, &effect) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+ gdImageAlphaBlending(im, effect);
+
+ RETURN_TRUE;
+}
+/* }}} */
+#endif
+
+/* {{{ proto int imagecolorallocatealpha(resource im, int red, int green, int blue, int alpha)
+ Allocate a color with an alpha level. Works for true color and palette based images */
+PHP_FUNCTION(imagecolorallocatealpha)
+{
+ zval *IM;
+ long red, green, blue, alpha;
+ gdImagePtr im;
+ int ct = (-1);
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rllll", &IM, &red, &green, &blue, &alpha) == FAILURE) {
+ RETURN_FALSE;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+ ct = gdImageColorAllocateAlpha(im, red, green, blue, alpha);
+ if (ct < 0) {
+ RETURN_FALSE;
+ }
+ RETURN_LONG((long)ct);
+}
+/* }}} */
+
+/* {{{ proto int imagecolorresolvealpha(resource im, int red, int green, int blue, int alpha)
+ Resolve/Allocate a colour with an alpha level. Works for true colour and palette based images */
+PHP_FUNCTION(imagecolorresolvealpha)
+{
+ zval *IM;
+ long red, green, blue, alpha;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rllll", &IM, &red, &green, &blue, &alpha) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ RETURN_LONG(gdImageColorResolveAlpha(im, red, green, blue, alpha));
+}
+/* }}} */
+
+/* {{{ proto int imagecolorclosestalpha(resource im, int red, int green, int blue, int alpha)
+ Find the closest matching colour with alpha transparency */
+PHP_FUNCTION(imagecolorclosestalpha)
+{
+ zval *IM;
+ long red, green, blue, alpha;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rllll", &IM, &red, &green, &blue, &alpha) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ RETURN_LONG(gdImageColorClosestAlpha(im, red, green, blue, alpha));
+}
+/* }}} */
+
+/* {{{ proto int imagecolorexactalpha(resource im, int red, int green, int blue, int alpha)
+ Find exact match for colour with transparency */
+PHP_FUNCTION(imagecolorexactalpha)
+{
+ zval *IM;
+ long red, green, blue, alpha;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rllll", &IM, &red, &green, &blue, &alpha) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ RETURN_LONG(gdImageColorExactAlpha(im, red, green, blue, alpha));
+}
+/* }}} */
+
+/* {{{ proto bool imagecopyresampled(resource dst_im, resource src_im, int dst_x, int dst_y, int src_x, int src_y, int dst_w, int dst_h, int src_w, int src_h)
+ Copy and resize part of an image using resampling to help ensure clarity */
+PHP_FUNCTION(imagecopyresampled)
+{
+ zval *SIM, *DIM;
+ long SX, SY, SW, SH, DX, DY, DW, DH;
+ gdImagePtr im_dst, im_src;
+ int srcH, srcW, dstH, dstW, srcY, srcX, dstY, dstX;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rrllllllll", &DIM, &SIM, &DX, &DY, &SX, &SY, &DW, &DH, &SW, &SH) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im_dst, gdImagePtr, &DIM, -1, "Image", le_gd);
+ ZEND_FETCH_RESOURCE(im_src, gdImagePtr, &SIM, -1, "Image", le_gd);
+
+ srcX = SX;
+ srcY = SY;
+ srcH = SH;
+ srcW = SW;
+ dstX = DX;
+ dstY = DY;
+ dstH = DH;
+ dstW = DW;
+
+ gdImageCopyResampled(im_dst, im_src, dstX, dstY, srcX, srcY, dstW, dstH, srcW, srcH);
+
+ RETURN_TRUE;
+}
+/* }}} */
+
+#ifdef PHP_WIN32
+/* {{{ proto resource imagegrabwindow(int window_handle [, int client_area])
+ Grab a window or its client area using a windows handle (HWND property in COM instance) */
+PHP_FUNCTION(imagegrabwindow)
+{
+ HWND window;
+ long client_area = 0;
+ RECT rc = {0};
+ RECT rc_win = {0};
+ int Width, Height;
+ HDC hdc;
+ HDC memDC;
+ HBITMAP memBM;
+ HBITMAP hOld;
+ HINSTANCE handle;
+ long lwindow_handle;
+ typedef BOOL (WINAPI *tPrintWindow)(HWND, HDC,UINT);
+ tPrintWindow pPrintWindow = 0;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "l|l", &lwindow_handle, &client_area) == FAILURE) {
+ RETURN_FALSE;
+ }
+
+ window = (HWND) lwindow_handle;
+
+ if (!IsWindow(window)) {
+ php_error_docref(NULL TSRMLS_CC, E_NOTICE, "Invalid window handle");
+ RETURN_FALSE;
+ }
+
+ hdc = GetDC(0);
+
+ if (client_area) {
+ GetClientRect(window, &rc);
+ Width = rc.right;
+ Height = rc.bottom;
+ } else {
+ GetWindowRect(window, &rc);
+ Width = rc.right - rc.left;
+ Height = rc.bottom - rc.top;
+ }
+
+ Width = (Width/4)*4;
+
+ memDC = CreateCompatibleDC(hdc);
+ memBM = CreateCompatibleBitmap(hdc, Width, Height);
+ hOld = (HBITMAP) SelectObject (memDC, memBM);
+
+
+ handle = LoadLibrary("User32.dll");
+ if ( handle == 0 ) {
+ goto clean;
+ }
+ pPrintWindow = (tPrintWindow) GetProcAddress(handle, "PrintWindow");
+
+ if ( pPrintWindow ) {
+ pPrintWindow(window, memDC, (UINT) client_area);
+ } else {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Windows API too old");
+ goto clean;
+ }
+
+ FreeLibrary(handle);
+
+ im = gdImageCreateTrueColor(Width, Height);
+ if (im) {
+ int x,y;
+ for (y=0; y <= Height; y++) {
+ for (x=0; x <= Width; x++) {
+ int c = GetPixel(memDC, x,y);
+ gdImageSetPixel(im, x, y, gdTrueColor(GetRValue(c), GetGValue(c), GetBValue(c)));
+ }
+ }
+ }
+
+clean:
+ SelectObject(memDC,hOld);
+ DeleteObject(memBM);
+ DeleteDC(memDC);
+ ReleaseDC( 0, hdc );
+
+ if (!im) {
+ RETURN_FALSE;
+ } else {
+ ZEND_REGISTER_RESOURCE(return_value, im, le_gd);
+ }
+}
+/* }}} */
+
+/* {{{ proto resource imagegrabscreen()
+ Grab a screenshot */
+PHP_FUNCTION(imagegrabscreen)
+{
+ HWND window = GetDesktopWindow();
+ RECT rc = {0};
+ int Width, Height;
+ HDC hdc;
+ HDC memDC;
+ HBITMAP memBM;
+ HBITMAP hOld;
+ typedef BOOL (WINAPI *tPrintWindow)(HWND, HDC,UINT);
+ tPrintWindow pPrintWindow = 0;
+ gdImagePtr im;
+ hdc = GetDC(0);
+
+ if (zend_parse_parameters_none() == FAILURE) {
+ return;
+ }
+
+ if (!hdc) {
+ RETURN_FALSE;
+ }
+
+ GetWindowRect(window, &rc);
+ Width = rc.right - rc.left;
+ Height = rc.bottom - rc.top;
+
+ Width = (Width/4)*4;
+
+ memDC = CreateCompatibleDC(hdc);
+ memBM = CreateCompatibleBitmap(hdc, Width, Height);
+ hOld = (HBITMAP) SelectObject (memDC, memBM);
+ BitBlt( memDC, 0, 0, Width, Height , hdc, rc.left, rc.top , SRCCOPY );
+
+ im = gdImageCreateTrueColor(Width, Height);
+ if (im) {
+ int x,y;
+ for (y=0; y <= Height; y++) {
+ for (x=0; x <= Width; x++) {
+ int c = GetPixel(memDC, x,y);
+ gdImageSetPixel(im, x, y, gdTrueColor(GetRValue(c), GetGValue(c), GetBValue(c)));
+ }
+ }
+ }
+
+ SelectObject(memDC,hOld);
+ DeleteObject(memBM);
+ DeleteDC(memDC);
+ ReleaseDC( 0, hdc );
+
+ if (!im) {
+ RETURN_FALSE;
+ } else {
+ ZEND_REGISTER_RESOURCE(return_value, im, le_gd);
+ }
+}
+/* }}} */
+#endif /* PHP_WIN32 */
+
+/* {{{ proto resource imagerotate(resource src_im, float angle, int bgdcolor [, int ignoretransparent])
+ Rotate an image using a custom angle */
+PHP_FUNCTION(imagerotate)
+{
+ zval *SIM;
+ gdImagePtr im_dst, im_src;
+ double degrees;
+ long color;
+ long ignoretransparent = 0;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rdl|l", &SIM, &degrees, &color, &ignoretransparent) == FAILURE) {
+ RETURN_FALSE;
+ }
+
+ ZEND_FETCH_RESOURCE(im_src, gdImagePtr, &SIM, -1, "Image", le_gd);
+
+ im_dst = gdImageRotate(im_src, degrees, color, ignoretransparent);
+
+ if (im_dst != NULL) {
+ ZEND_REGISTER_RESOURCE(return_value, im_dst, le_gd);
+ } else {
+ RETURN_FALSE;
+ }
+}
+/* }}} */
+
+#if HAVE_GD_IMAGESETTILE
+/* {{{ proto bool imagesettile(resource image, resource tile)
+ Set the tile image to $tile when filling $image with the "IMG_COLOR_TILED" color */
+PHP_FUNCTION(imagesettile)
+{
+ zval *IM, *TILE;
+ gdImagePtr im, tile;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rr", &IM, &TILE) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+ ZEND_FETCH_RESOURCE(tile, gdImagePtr, &TILE, -1, "Image", le_gd);
+
+ gdImageSetTile(im, tile);
+
+ RETURN_TRUE;
+}
+/* }}} */
+#endif
+
+#if HAVE_GD_IMAGESETBRUSH
+/* {{{ proto bool imagesetbrush(resource image, resource brush)
+ Set the brush image to $brush when filling $image with the "IMG_COLOR_BRUSHED" color */
+PHP_FUNCTION(imagesetbrush)
+{
+ zval *IM, *TILE;
+ gdImagePtr im, tile;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rr", &IM, &TILE) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+ ZEND_FETCH_RESOURCE(tile, gdImagePtr, &TILE, -1, "Image", le_gd);
+
+ gdImageSetBrush(im, tile);
+
+ RETURN_TRUE;
+}
+/* }}} */
+#endif
+
+/* {{{ proto resource imagecreate(int x_size, int y_size)
+ Create a new image */
+PHP_FUNCTION(imagecreate)
+{
+ long x_size, y_size;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "ll", &x_size, &y_size) == FAILURE) {
+ return;
+ }
+
+ if (x_size <= 0 || y_size <= 0 || x_size >= INT_MAX || y_size >= INT_MAX) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Invalid image dimensions");
+ RETURN_FALSE;
+ }
+
+ im = gdImageCreate(x_size, y_size);
+
+ if (!im) {
+ RETURN_FALSE;
+ }
+
+ ZEND_REGISTER_RESOURCE(return_value, im, le_gd);
+}
+/* }}} */
+
+/* {{{ proto int imagetypes(void)
+ Return the types of images supported in a bitfield - 1=GIF, 2=JPEG, 4=PNG, 8=WBMP, 16=XPM */
+PHP_FUNCTION(imagetypes)
+{
+ int ret=0;
+#ifdef HAVE_GD_GIF_CREATE
+ ret = 1;
+#endif
+#ifdef HAVE_GD_JPG
+ ret |= 2;
+#endif
+#ifdef HAVE_GD_PNG
+ ret |= 4;
+#endif
+#ifdef HAVE_GD_WBMP
+ ret |= 8;
+#endif
+#if defined(HAVE_GD_XPM) && defined(HAVE_GD_BUNDLED)
+ ret |= 16;
+#endif
+
+ if (zend_parse_parameters_none() == FAILURE) {
+ return;
+ }
+
+ RETURN_LONG(ret);
+}
+/* }}} */
+
+/* {{{ _php_image_type
+ */
+static const char php_sig_gd2[3] = {'g', 'd', '2'};
+
+static int _php_image_type (char data[8])
+{
+#ifdef HAVE_LIBGD15
+ /* Based on ext/standard/image.c */
+
+ if (data == NULL) {
+ return -1;
+ }
+
+ if (!memcmp(data, php_sig_gd2, 3)) {
+ return PHP_GDIMG_TYPE_GD2;
+ } else if (!memcmp(data, php_sig_jpg, 3)) {
+ return PHP_GDIMG_TYPE_JPG;
+ } else if (!memcmp(data, php_sig_png, 3)) {
+ if (!memcmp(data, php_sig_png, 8)) {
+ return PHP_GDIMG_TYPE_PNG;
+ }
+ } else if (!memcmp(data, php_sig_gif, 3)) {
+ return PHP_GDIMG_TYPE_GIF;
+ }
+#ifdef HAVE_GD_WBMP
+ else {
+ gdIOCtx *io_ctx;
+ io_ctx = gdNewDynamicCtxEx(8, data, 0);
+ if (io_ctx) {
+ if (getmbi((int(*)(void *)) gdGetC, io_ctx) == 0 && skipheader((int(*)(void *)) gdGetC, io_ctx) == 0 ) {
+#if HAVE_LIBGD204
+ io_ctx->gd_free(io_ctx);
+#else
+ io_ctx->free(io_ctx);
+#endif
+ return PHP_GDIMG_TYPE_WBM;
+ } else {
+#if HAVE_LIBGD204
+ io_ctx->gd_free(io_ctx);
+#else
+ io_ctx->free(io_ctx);
+#endif
+ }
+ }
+ }
+#endif
+ return -1;
+#endif
+}
+/* }}} */
+
+#ifdef HAVE_LIBGD15
+/* {{{ _php_image_create_from_string
+ */
+gdImagePtr _php_image_create_from_string(zval **data, char *tn, gdImagePtr (*ioctx_func_p)() TSRMLS_DC)
+{
+ gdImagePtr im;
+ gdIOCtx *io_ctx;
+
+ io_ctx = gdNewDynamicCtxEx(Z_STRLEN_PP(data), Z_STRVAL_PP(data), 0);
+
+ if (!io_ctx) {
+ return NULL;
+ }
+
+ im = (*ioctx_func_p)(io_ctx);
+ if (!im) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Passed data is not in '%s' format", tn);
+#if HAVE_LIBGD204
+ io_ctx->gd_free(io_ctx);
+#else
+ io_ctx->free(io_ctx);
+#endif
+ return NULL;
+ }
+
+#if HAVE_LIBGD204
+ io_ctx->gd_free(io_ctx);
+#else
+ io_ctx->free(io_ctx);
+#endif
+
+ return im;
+}
+/* }}} */
+
+/* {{{ proto resource imagecreatefromstring(string image)
+ Create a new image from the image stream in the string */
+PHP_FUNCTION(imagecreatefromstring)
+{
+ zval **data;
+ gdImagePtr im;
+ int imtype;
+ char sig[8];
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "Z", &data) == FAILURE) {
+ return;
+ }
+
+ convert_to_string_ex(data);
+ if (Z_STRLEN_PP(data) < 8) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Empty string or invalid image");
+ RETURN_FALSE;
+ }
+
+ memcpy(sig, Z_STRVAL_PP(data), 8);
+
+ imtype = _php_image_type(sig);
+
+ switch (imtype) {
+ case PHP_GDIMG_TYPE_JPG:
+#ifdef HAVE_GD_JPG
+ im = _php_image_create_from_string(data, "JPEG", gdImageCreateFromJpegCtx TSRMLS_CC);
+#else
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "No JPEG support in this PHP build");
+ RETURN_FALSE;
+#endif
+ break;
+
+ case PHP_GDIMG_TYPE_PNG:
+#ifdef HAVE_GD_PNG
+ im = _php_image_create_from_string(data, "PNG", gdImageCreateFromPngCtx TSRMLS_CC);
+#else
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "No PNG support in this PHP build");
+ RETURN_FALSE;
+#endif
+ break;
+
+ case PHP_GDIMG_TYPE_GIF:
+#ifdef HAVE_GD_GIF_READ
+ im = _php_image_create_from_string(data, "GIF", gdImageCreateFromGifCtx TSRMLS_CC);
+#else
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "No GIF support in this PHP build");
+ RETURN_FALSE;
+#endif
+ break;
+
+ case PHP_GDIMG_TYPE_WBM:
+#ifdef HAVE_GD_WBMP
+ im = _php_image_create_from_string(data, "WBMP", gdImageCreateFromWBMPCtx TSRMLS_CC);
+#else
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "No WBMP support in this PHP build");
+ RETURN_FALSE;
+#endif
+ break;
+
+ case PHP_GDIMG_TYPE_GD2:
+#ifdef HAVE_GD_GD2
+ im = _php_image_create_from_string(data, "GD2", gdImageCreateFromGd2Ctx TSRMLS_CC);
+#else
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "No GD2 support in this PHP build");
+ RETURN_FALSE;
+#endif
+ break;
+
+ default:
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Data is not in a recognized format");
+ RETURN_FALSE;
+ }
+
+ if (!im) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Couldn't create GD Image Stream out of Data");
+ RETURN_FALSE;
+ }
+
+ ZEND_REGISTER_RESOURCE(return_value, im, le_gd);
+}
+/* }}} */
+#endif
+
+/* {{{ _php_image_create_from
+ */
+static void _php_image_create_from(INTERNAL_FUNCTION_PARAMETERS, int image_type, char *tn, gdImagePtr (*func_p)(), gdImagePtr (*ioctx_func_p)())
+{
+ char *file;
+ int file_len;
+ long srcx, srcy, width, height;
+ gdImagePtr im = NULL;
+ php_stream *stream;
+ FILE * fp = NULL;
+#ifdef HAVE_GD_JPG
+ long ignore_warning;
+#endif
+ if (image_type == PHP_GDIMG_TYPE_GD2PART) {
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "sllll", &file, &file_len, &srcx, &srcy, &width, &height) == FAILURE) {
+ return;
+ }
+ if (width < 1 || height < 1) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Zero width or height not allowed");
+ RETURN_FALSE;
+ }
+ } else {
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &file, &file_len) == FAILURE) {
+ return;
+ }
+ }
+
+ stream = php_stream_open_wrapper(file, "rb", REPORT_ERRORS|IGNORE_PATH|IGNORE_URL_WIN, NULL);
+ if (stream == NULL) {
+ RETURN_FALSE;
+ }
+
+#ifndef USE_GD_IOCTX
+ ioctx_func_p = NULL; /* don't allow sockets without IOCtx */
+#endif
+
+ if (image_type == PHP_GDIMG_TYPE_WEBP) {
+ size_t buff_size;
+ char *buff;
+
+ /* needs to be malloc (persistent) - GD will free() it later */
+ buff_size = php_stream_copy_to_mem(stream, &buff, PHP_STREAM_COPY_ALL, 1);
+ if (!buff_size) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING,"Cannot read image data");
+ goto out_err;
+ }
+ im = (*ioctx_func_p)(buff_size, buff);
+ if (!im) {
+ goto out_err;
+ }
+ goto register_im;
+ }
+
+ /* try and avoid allocating a FILE* if the stream is not naturally a FILE* */
+ if (php_stream_is(stream, PHP_STREAM_IS_STDIO)) {
+ if (FAILURE == php_stream_cast(stream, PHP_STREAM_AS_STDIO, (void**)&fp, REPORT_ERRORS)) {
+ goto out_err;
+ }
+ } else if (ioctx_func_p) {
+#ifdef USE_GD_IOCTX
+ /* we can create an io context */
+ gdIOCtx* io_ctx;
+ size_t buff_size;
+ char *buff;
+
+ /* needs to be malloc (persistent) - GD will free() it later */
+ buff_size = php_stream_copy_to_mem(stream, &buff, PHP_STREAM_COPY_ALL, 1);
+
+ if (!buff_size) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING,"Cannot read image data");
+ goto out_err;
+ }
+
+ io_ctx = gdNewDynamicCtxEx(buff_size, buff, 0);
+ if (!io_ctx) {
+ pefree(buff, 1);
+ php_error_docref(NULL TSRMLS_CC, E_WARNING,"Cannot allocate GD IO context");
+ goto out_err;
+ }
+
+ if (image_type == PHP_GDIMG_TYPE_GD2PART) {
+ im = (*ioctx_func_p)(io_ctx, srcx, srcy, width, height);
+ } else {
+ im = (*ioctx_func_p)(io_ctx);
+ }
+#if HAVE_LIBGD204
+ io_ctx->gd_free(io_ctx);
+#else
+ io_ctx->free(io_ctx);
+#endif
+ pefree(buff, 1);
+#endif
+ }
+ else {
+ /* try and force the stream to be FILE* */
+ if (FAILURE == php_stream_cast(stream, PHP_STREAM_AS_STDIO | PHP_STREAM_CAST_TRY_HARD, (void **) &fp, REPORT_ERRORS)) {
+ goto out_err;
+ }
+ }
+
+ if (!im && fp) {
+ switch (image_type) {
+ case PHP_GDIMG_TYPE_GD2PART:
+ im = (*func_p)(fp, srcx, srcy, width, height);
+ break;
+#if defined(HAVE_GD_XPM) && defined(HAVE_GD_BUNDLED)
+ case PHP_GDIMG_TYPE_XPM:
+ im = gdImageCreateFromXpm(file);
+ break;
+#endif
+
+#ifdef HAVE_GD_JPG
+ case PHP_GDIMG_TYPE_JPG:
+ ignore_warning = INI_INT("gd.jpeg_ignore_warning");
+#ifdef HAVE_GD_BUNDLED
+ im = gdImageCreateFromJpeg(fp, ignore_warning);
+#else
+ im = gdImageCreateFromJpeg(fp);
+#endif
+ break;
+#endif
+
+ default:
+ im = (*func_p)(fp);
+ break;
+ }
+
+ fflush(fp);
+ }
+
+register_im:
+ if (im) {
+ ZEND_REGISTER_RESOURCE(return_value, im, le_gd);
+ php_stream_close(stream);
+ return;
+ }
+
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "'%s' is not a valid %s file", file, tn);
+out_err:
+ php_stream_close(stream);
+ RETURN_FALSE;
+
+}
+/* }}} */
+
+#ifdef HAVE_GD_GIF_READ
+/* {{{ proto resource imagecreatefromgif(string filename)
+ Create a new image from GIF file or URL */
+PHP_FUNCTION(imagecreatefromgif)
+{
+ _php_image_create_from(INTERNAL_FUNCTION_PARAM_PASSTHRU, PHP_GDIMG_TYPE_GIF, "GIF", gdImageCreateFromGif, gdImageCreateFromGifCtx);
+}
+/* }}} */
+#endif /* HAVE_GD_GIF_READ */
+
+#ifdef HAVE_GD_JPG
+/* {{{ proto resource imagecreatefromjpeg(string filename)
+ Create a new image from JPEG file or URL */
+PHP_FUNCTION(imagecreatefromjpeg)
+{
+ _php_image_create_from(INTERNAL_FUNCTION_PARAM_PASSTHRU, PHP_GDIMG_TYPE_JPG, "JPEG", gdImageCreateFromJpeg, gdImageCreateFromJpegCtx);
+}
+/* }}} */
+#endif /* HAVE_GD_JPG */
+
+#ifdef HAVE_GD_PNG
+/* {{{ proto resource imagecreatefrompng(string filename)
+ Create a new image from PNG file or URL */
+PHP_FUNCTION(imagecreatefrompng)
+{
+ _php_image_create_from(INTERNAL_FUNCTION_PARAM_PASSTHRU, PHP_GDIMG_TYPE_PNG, "PNG", gdImageCreateFromPng, gdImageCreateFromPngCtx);
+}
+/* }}} */
+#endif /* HAVE_GD_PNG */
+
+#ifdef HAVE_GD_WEBP
+/* {{{ proto resource imagecreatefrompng(string filename)
+ Create a new image from PNG file or URL */
+PHP_FUNCTION(imagecreatefromwebp)
+{
+ _php_image_create_from(INTERNAL_FUNCTION_PARAM_PASSTHRU, PHP_GDIMG_TYPE_WEBP, "WEBP", gdImageCreateFromWebpPtr, gdImageCreateFromWebpPtr);
+}
+/* }}} */
+#endif /* HAVE_GD_VPX */
+
+#ifdef HAVE_GD_XBM
+/* {{{ proto resource imagecreatefromxbm(string filename)
+ Create a new image from XBM file or URL */
+PHP_FUNCTION(imagecreatefromxbm)
+{
+ _php_image_create_from(INTERNAL_FUNCTION_PARAM_PASSTHRU, PHP_GDIMG_TYPE_XBM, "XBM", gdImageCreateFromXbm, NULL);
+}
+/* }}} */
+#endif /* HAVE_GD_XBM */
+
+#if defined(HAVE_GD_XPM) && defined(HAVE_GD_BUNDLED)
+/* {{{ proto resource imagecreatefromxpm(string filename)
+ Create a new image from XPM file or URL */
+PHP_FUNCTION(imagecreatefromxpm)
+{
+ _php_image_create_from(INTERNAL_FUNCTION_PARAM_PASSTHRU, PHP_GDIMG_TYPE_XPM, "XPM", gdImageCreateFromXpm, NULL);
+}
+/* }}} */
+#endif
+
+#ifdef HAVE_GD_WBMP
+/* {{{ proto resource imagecreatefromwbmp(string filename)
+ Create a new image from WBMP file or URL */
+PHP_FUNCTION(imagecreatefromwbmp)
+{
+ _php_image_create_from(INTERNAL_FUNCTION_PARAM_PASSTHRU, PHP_GDIMG_TYPE_WBM, "WBMP", gdImageCreateFromWBMP, gdImageCreateFromWBMPCtx);
+}
+/* }}} */
+#endif /* HAVE_GD_WBMP */
+
+/* {{{ proto resource imagecreatefromgd(string filename)
+ Create a new image from GD file or URL */
+PHP_FUNCTION(imagecreatefromgd)
+{
+ _php_image_create_from(INTERNAL_FUNCTION_PARAM_PASSTHRU, PHP_GDIMG_TYPE_GD, "GD", gdImageCreateFromGd, gdImageCreateFromGdCtx);
+}
+/* }}} */
+
+#ifdef HAVE_GD_GD2
+/* {{{ proto resource imagecreatefromgd2(string filename)
+ Create a new image from GD2 file or URL */
+PHP_FUNCTION(imagecreatefromgd2)
+{
+ _php_image_create_from(INTERNAL_FUNCTION_PARAM_PASSTHRU, PHP_GDIMG_TYPE_GD2, "GD2", gdImageCreateFromGd2, gdImageCreateFromGd2Ctx);
+}
+/* }}} */
+
+/* {{{ proto resource imagecreatefromgd2part(string filename, int srcX, int srcY, int width, int height)
+ Create a new image from a given part of GD2 file or URL */
+PHP_FUNCTION(imagecreatefromgd2part)
+{
+ _php_image_create_from(INTERNAL_FUNCTION_PARAM_PASSTHRU, PHP_GDIMG_TYPE_GD2PART, "GD2", gdImageCreateFromGd2Part, gdImageCreateFromGd2PartCtx);
+}
+/* }}} */
+#endif /* HAVE_GD_GD2 */
+
+/* {{{ _php_image_output
+ */
+static void _php_image_output(INTERNAL_FUNCTION_PARAMETERS, int image_type, char *tn, void (*func_p)())
+{
+ zval *imgind;
+ char *file = NULL;
+ long quality = 0, type = 0;
+ gdImagePtr im;
+ char *fn = NULL;
+ FILE *fp;
+ int file_len = 0, argc = ZEND_NUM_ARGS();
+ int q = -1, i, t = 1;
+
+ /* The quality parameter for Wbmp stands for the threshold when called from image2wbmp() */
+ /* When called from imagewbmp() the quality parameter stands for the foreground color. Default: black. */
+ /* The quality parameter for gd2 stands for chunk size */
+
+ if (zend_parse_parameters(argc TSRMLS_CC, "r|pll", &imgind, &file, &file_len, &quality, &type) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &imgind, -1, "Image", le_gd);
+
+ if (argc > 1) {
+ fn = file;
+ if (argc == 3) {
+ q = quality;
+ }
+ if (argc == 4) {
+ t = type;
+ }
+ }
+
+ if (argc >= 2 && file_len) {
+ PHP_GD_CHECK_OPEN_BASEDIR(fn, "Invalid filename");
+
+ fp = VCWD_FOPEN(fn, "wb");
+ if (!fp) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Unable to open '%s' for writing", fn);
+ RETURN_FALSE;
+ }
+
+ switch (image_type) {
+#ifdef HAVE_GD_WBMP
+ case PHP_GDIMG_CONVERT_WBM:
+ if (q == -1) {
+ q = 0;
+ } else if (q < 0 || q > 255) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Invalid threshold value '%d'. It must be between 0 and 255", q);
+ q = 0;
+ }
+ gdImageWBMP(im, q, fp);
+ break;
+#endif
+ case PHP_GDIMG_TYPE_JPG:
+ (*func_p)(im, fp, q);
+ break;
+ case PHP_GDIMG_TYPE_WBM:
+ for (i = 0; i < gdImageColorsTotal(im); i++) {
+ if (gdImageRed(im, i) == 0) break;
+ }
+ (*func_p)(im, i, fp);
+ break;
+ case PHP_GDIMG_TYPE_GD:
+ if (im->trueColor){
+ gdImageTrueColorToPalette(im,1,256);
+ }
+ (*func_p)(im, fp);
+ break;
+#ifdef HAVE_GD_GD2
+ case PHP_GDIMG_TYPE_GD2:
+ if (q == -1) {
+ q = 128;
+ }
+ (*func_p)(im, fp, q, t);
+ break;
+#endif
+ default:
+ if (q == -1) {
+ q = 128;
+ }
+ (*func_p)(im, fp, q, t);
+ break;
+ }
+ fflush(fp);
+ fclose(fp);
+ } else {
+ int b;
+ FILE *tmp;
+ char buf[4096];
+ char *path;
+
+ tmp = php_open_temporary_file(NULL, NULL, &path TSRMLS_CC);
+ if (tmp == NULL) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Unable to open temporary file");
+ RETURN_FALSE;
+ }
+
+ switch (image_type) {
+#ifdef HAVE_GD_WBMP
+ case PHP_GDIMG_CONVERT_WBM:
+ if (q == -1) {
+ q = 0;
+ } else if (q < 0 || q > 255) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Invalid threshold value '%d'. It must be between 0 and 255", q);
+ q = 0;
+ }
+ gdImageWBMP(im, q, tmp);
+ break;
+#endif
+ case PHP_GDIMG_TYPE_JPG:
+ (*func_p)(im, tmp, q);
+ break;
+ case PHP_GDIMG_TYPE_WBM:
+ for (i = 0; i < gdImageColorsTotal(im); i++) {
+ if (gdImageRed(im, i) == 0) {
+ break;
+ }
+ }
+ (*func_p)(im, q, tmp);
+ break;
+ case PHP_GDIMG_TYPE_GD:
+ if (im->trueColor) {
+ gdImageTrueColorToPalette(im,1,256);
+ }
+ (*func_p)(im, tmp);
+ break;
+#ifdef HAVE_GD_GD2
+ case PHP_GDIMG_TYPE_GD2:
+ if (q == -1) {
+ q = 128;
+ }
+ (*func_p)(im, tmp, q, t);
+ break;
+#endif
+ default:
+ (*func_p)(im, tmp);
+ break;
+ }
+
+ fseek(tmp, 0, SEEK_SET);
+
+#if APACHE && defined(CHARSET_EBCDIC)
+ /* XXX this is unlikely to work any more thies@thieso.net */
+
+ /* This is a binary file already: avoid EBCDIC->ASCII conversion */
+ ap_bsetflag(php3_rqst->connection->client, B_EBCDIC2ASCII, 0);
+#endif
+ while ((b = fread(buf, 1, sizeof(buf), tmp)) > 0) {
+ php_write(buf, b TSRMLS_CC);
+ }
+
+ fclose(tmp);
+ VCWD_UNLINK((const char *)path); /* make sure that the temporary file is removed */
+ efree(path);
+ }
+ RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto int imagexbm(int im, string filename [, int foreground])
+ Output XBM image to browser or file */
+#if HAVE_GD_BUNDLED
+PHP_FUNCTION(imagexbm)
+{
+ _php_image_output_ctx(INTERNAL_FUNCTION_PARAM_PASSTHRU, PHP_GDIMG_TYPE_XBM, "GIF", gdImageXbmCtx);
+}
+#endif
+/* }}} */
+
+#ifdef HAVE_GD_GIF_CREATE
+/* {{{ proto bool imagegif(resource im [, string filename])
+ Output GIF image to browser or file */
+PHP_FUNCTION(imagegif)
+{
+ _php_image_output_ctx(INTERNAL_FUNCTION_PARAM_PASSTHRU, PHP_GDIMG_TYPE_GIF, "GIF", gdImageGifCtx);
+}
+/* }}} */
+#endif /* HAVE_GD_GIF_CREATE */
+
+#ifdef HAVE_GD_PNG
+/* {{{ proto bool imagepng(resource im [, string filename])
+ Output PNG image to browser or file */
+PHP_FUNCTION(imagepng)
+{
+ _php_image_output_ctx(INTERNAL_FUNCTION_PARAM_PASSTHRU, PHP_GDIMG_TYPE_PNG, "GIF", gdImagePngCtxEx);
+}
+/* }}} */
+#endif /* HAVE_GD_PNG */
+
+
+#ifdef HAVE_GD_WEBP
+/* {{{ proto bool imagewebp(resource im [, string filename[, quality]] )
+ Output PNG image to browser or file */
+PHP_FUNCTION(imagewebp)
+{
+ _php_image_output_ctx(INTERNAL_FUNCTION_PARAM_PASSTHRU, PHP_GDIMG_TYPE_WEBP, "GIF", gdImageWebpCtx);
+}
+/* }}} */
+#endif /* HAVE_GD_WEBP */
+
+
+#ifdef HAVE_GD_JPG
+/* {{{ proto bool imagejpeg(resource im [, string filename [, int quality]])
+ Output JPEG image to browser or file */
+PHP_FUNCTION(imagejpeg)
+{
+ _php_image_output_ctx(INTERNAL_FUNCTION_PARAM_PASSTHRU, PHP_GDIMG_TYPE_JPG, "GIF", gdImageJpegCtx);
+}
+/* }}} */
+#endif /* HAVE_GD_JPG */
+
+#ifdef HAVE_GD_WBMP
+/* {{{ proto bool imagewbmp(resource im [, string filename, [, int foreground]])
+ Output WBMP image to browser or file */
+PHP_FUNCTION(imagewbmp)
+{
+ _php_image_output_ctx(INTERNAL_FUNCTION_PARAM_PASSTHRU, PHP_GDIMG_TYPE_WBM, "GIF", gdImageWBMPCtx);
+}
+/* }}} */
+#endif /* HAVE_GD_WBMP */
+
+/* {{{ proto bool imagegd(resource im [, string filename])
+ Output GD image to browser or file */
+PHP_FUNCTION(imagegd)
+{
+ _php_image_output(INTERNAL_FUNCTION_PARAM_PASSTHRU, PHP_GDIMG_TYPE_GD, "GD", gdImageGd);
+}
+/* }}} */
+
+#ifdef HAVE_GD_GD2
+/* {{{ proto bool imagegd2(resource im [, string filename, [, int chunk_size, [, int type]]])
+ Output GD2 image to browser or file */
+PHP_FUNCTION(imagegd2)
+{
+ _php_image_output(INTERNAL_FUNCTION_PARAM_PASSTHRU, PHP_GDIMG_TYPE_GD2, "GD2", gdImageGd2);
+}
+/* }}} */
+#endif /* HAVE_GD_GD2 */
+
+/* {{{ proto bool imagedestroy(resource im)
+ Destroy an image */
+PHP_FUNCTION(imagedestroy)
+{
+ zval *IM;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &IM) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ zend_list_delete(Z_LVAL_P(IM));
+
+ RETURN_TRUE;
+}
+/* }}} */
+
+
+/* {{{ proto int imagecolorallocate(resource im, int red, int green, int blue)
+ Allocate a color for an image */
+PHP_FUNCTION(imagecolorallocate)
+{
+ zval *IM;
+ long red, green, blue;
+ gdImagePtr im;
+ int ct = (-1);
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlll", &IM, &red, &green, &blue) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ ct = gdImageColorAllocate(im, red, green, blue);
+ if (ct < 0) {
+ RETURN_FALSE;
+ }
+ RETURN_LONG(ct);
+}
+/* }}} */
+
+#if HAVE_LIBGD15
+/* {{{ proto void imagepalettecopy(resource dst, resource src)
+ Copy the palette from the src image onto the dst image */
+PHP_FUNCTION(imagepalettecopy)
+{
+ zval *dstim, *srcim;
+ gdImagePtr dst, src;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rr", &dstim, &srcim) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(dst, gdImagePtr, &dstim, -1, "Image", le_gd);
+ ZEND_FETCH_RESOURCE(src, gdImagePtr, &srcim, -1, "Image", le_gd);
+
+ gdImagePaletteCopy(dst, src);
+}
+/* }}} */
+#endif
+
+/* {{{ proto int imagecolorat(resource im, int x, int y)
+ Get the index of the color of a pixel */
+PHP_FUNCTION(imagecolorat)
+{
+ zval *IM;
+ long x, y;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rll", &IM, &x, &y) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ if (gdImageTrueColor(im)) {
+ if (im->tpixels && gdImageBoundsSafe(im, x, y)) {
+ RETURN_LONG(gdImageTrueColorPixel(im, x, y));
+ } else {
+ php_error_docref(NULL TSRMLS_CC, E_NOTICE, "%ld,%ld is out of bounds", x, y);
+ RETURN_FALSE;
+ }
+ } else {
+ if (im->pixels && gdImageBoundsSafe(im, x, y)) {
+ RETURN_LONG(im->pixels[y][x]);
+ } else {
+ php_error_docref(NULL TSRMLS_CC, E_NOTICE, "%ld,%ld is out of bounds", x, y);
+ RETURN_FALSE;
+ }
+ }
+}
+/* }}} */
+
+/* {{{ proto int imagecolorclosest(resource im, int red, int green, int blue)
+ Get the index of the closest color to the specified color */
+PHP_FUNCTION(imagecolorclosest)
+{
+ zval *IM;
+ long red, green, blue;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlll", &IM, &red, &green, &blue) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ RETURN_LONG(gdImageColorClosest(im, red, green, blue));
+}
+/* }}} */
+
+#if HAVE_COLORCLOSESTHWB
+/* {{{ proto int imagecolorclosesthwb(resource im, int red, int green, int blue)
+ Get the index of the color which has the hue, white and blackness nearest to the given color */
+PHP_FUNCTION(imagecolorclosesthwb)
+{
+ zval *IM;
+ long red, green, blue;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlll", &IM, &red, &green, &blue) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ RETURN_LONG(gdImageColorClosestHWB(im, red, green, blue));
+}
+/* }}} */
+#endif
+
+/* {{{ proto bool imagecolordeallocate(resource im, int index)
+ De-allocate a color for an image */
+PHP_FUNCTION(imagecolordeallocate)
+{
+ zval *IM;
+ long index;
+ int col;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl", &IM, &index) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ /* We can return right away for a truecolor image as deallocating colours is meaningless here */
+ if (gdImageTrueColor(im)) {
+ RETURN_TRUE;
+ }
+
+ col = index;
+
+ if (col >= 0 && col < gdImageColorsTotal(im)) {
+ gdImageColorDeallocate(im, col);
+ RETURN_TRUE;
+ } else {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Color index %d out of range", col);
+ RETURN_FALSE;
+ }
+}
+/* }}} */
+
+/* {{{ proto int imagecolorresolve(resource im, int red, int green, int blue)
+ Get the index of the specified color or its closest possible alternative */
+PHP_FUNCTION(imagecolorresolve)
+{
+ zval *IM;
+ long red, green, blue;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlll", &IM, &red, &green, &blue) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ RETURN_LONG(gdImageColorResolve(im, red, green, blue));
+}
+/* }}} */
+
+/* {{{ proto int imagecolorexact(resource im, int red, int green, int blue)
+ Get the index of the specified color */
+PHP_FUNCTION(imagecolorexact)
+{
+ zval *IM;
+ long red, green, blue;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlll", &IM, &red, &green, &blue) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ RETURN_LONG(gdImageColorExact(im, red, green, blue));
+}
+/* }}} */
+
+/* {{{ proto void imagecolorset(resource im, int col, int red, int green, int blue)
+ Set the color for the specified palette index */
+PHP_FUNCTION(imagecolorset)
+{
+ zval *IM;
+ long color, red, green, blue, alpha = 0;
+ int col;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rllll|l", &IM, &color, &red, &green, &blue, &alpha) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ col = color;
+
+ if (col >= 0 && col < gdImageColorsTotal(im)) {
+ im->red[col] = red;
+ im->green[col] = green;
+ im->blue[col] = blue;
+ im->alpha[col] = alpha;
+ } else {
+ RETURN_FALSE;
+ }
+}
+/* }}} */
+
+/* {{{ proto array imagecolorsforindex(resource im, int col)
+ Get the colors for an index */
+PHP_FUNCTION(imagecolorsforindex)
+{
+ zval *IM;
+ long index;
+ int col;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl", &IM, &index) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ col = index;
+
+ if ((col >= 0 && gdImageTrueColor(im)) || (!gdImageTrueColor(im) && col >= 0 && col < gdImageColorsTotal(im))) {
+ array_init(return_value);
+
+ add_assoc_long(return_value,"red", gdImageRed(im,col));
+ add_assoc_long(return_value,"green", gdImageGreen(im,col));
+ add_assoc_long(return_value,"blue", gdImageBlue(im,col));
+ add_assoc_long(return_value,"alpha", gdImageAlpha(im,col));
+ } else {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Color index %d out of range", col);
+ RETURN_FALSE;
+ }
+}
+/* }}} */
+
+/* {{{ proto bool imagegammacorrect(resource im, float inputgamma, float outputgamma)
+ Apply a gamma correction to a GD image */
+PHP_FUNCTION(imagegammacorrect)
+{
+ zval *IM;
+ gdImagePtr im;
+ int i;
+ double input, output;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rdd", &IM, &input, &output) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ if (gdImageTrueColor(im)) {
+ int x, y, c;
+
+ for (y = 0; y < gdImageSY(im); y++) {
+ for (x = 0; x < gdImageSX(im); x++) {
+ c = gdImageGetPixel(im, x, y);
+ gdImageSetPixel(im, x, y,
+ gdTrueColor(
+ (int) ((pow((pow((gdTrueColorGetRed(c) / 255.0), input)), 1.0 / output) * 255) + .5),
+ (int) ((pow((pow((gdTrueColorGetGreen(c) / 255.0), input)), 1.0 / output) * 255) + .5),
+ (int) ((pow((pow((gdTrueColorGetBlue(c) / 255.0), input)), 1.0 / output) * 255) + .5)
+ )
+ );
+ }
+ }
+ RETURN_TRUE;
+ }
+
+ for (i = 0; i < gdImageColorsTotal(im); i++) {
+ im->red[i] = (int)((pow((pow((im->red[i] / 255.0), input)), 1.0 / output) * 255) + .5);
+ im->green[i] = (int)((pow((pow((im->green[i] / 255.0), input)), 1.0 / output) * 255) + .5);
+ im->blue[i] = (int)((pow((pow((im->blue[i] / 255.0), input)), 1.0 / output) * 255) + .5);
+ }
+
+ RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto bool imagesetpixel(resource im, int x, int y, int col)
+ Set a single pixel */
+PHP_FUNCTION(imagesetpixel)
+{
+ zval *IM;
+ long x, y, col;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlll", &IM, &x, &y, &col) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+ gdImageSetPixel(im, x, y, col);
+ RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto bool imageline(resource im, int x1, int y1, int x2, int y2, int col)
+ Draw a line */
+PHP_FUNCTION(imageline)
+{
+ zval *IM;
+ long x1, y1, x2, y2, col;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlllll", &IM, &x1, &y1, &x2, &y2, &col) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+#ifdef HAVE_GD_BUNDLED
+ if (im->antialias) {
+ gdImageAALine(im, x1, y1, x2, y2, col);
+ } else
+#endif
+ {
+ gdImageLine(im, x1, y1, x2, y2, col);
+ }
+ RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto bool imagedashedline(resource im, int x1, int y1, int x2, int y2, int col)
+ Draw a dashed line */
+PHP_FUNCTION(imagedashedline)
+{
+ zval *IM;
+ long x1, y1, x2, y2, col;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlllll", &IM, &x1, &y1, &x2, &y2, &col) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+ gdImageDashedLine(im, x1, y1, x2, y2, col);
+ RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto bool imagerectangle(resource im, int x1, int y1, int x2, int y2, int col)
+ Draw a rectangle */
+PHP_FUNCTION(imagerectangle)
+{
+ zval *IM;
+ long x1, y1, x2, y2, col;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlllll", &IM, &x1, &y1, &x2, &y2, &col) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+ gdImageRectangle(im, x1, y1, x2, y2, col);
+ RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto bool imagefilledrectangle(resource im, int x1, int y1, int x2, int y2, int col)
+ Draw a filled rectangle */
+PHP_FUNCTION(imagefilledrectangle)
+{
+ zval *IM;
+ long x1, y1, x2, y2, col;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlllll", &IM, &x1, &y1, &x2, &y2, &col) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+ gdImageFilledRectangle(im, x1, y1, x2, y2, col);
+ RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto bool imagearc(resource im, int cx, int cy, int w, int h, int s, int e, int col)
+ Draw a partial ellipse */
+PHP_FUNCTION(imagearc)
+{
+ zval *IM;
+ long cx, cy, w, h, ST, E, col;
+ gdImagePtr im;
+ int e, st;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlllllll", &IM, &cx, &cy, &w, &h, &ST, &E, &col) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ e = E;
+ if (e < 0) {
+ e %= 360;
+ }
+
+ st = ST;
+ if (st < 0) {
+ st %= 360;
+ }
+
+ gdImageArc(im, cx, cy, w, h, st, e, col);
+ RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto bool imageellipse(resource im, int cx, int cy, int w, int h, int color)
+ Draw an ellipse */
+PHP_FUNCTION(imageellipse)
+{
+ zval *IM;
+ long cx, cy, w, h, color;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlllll", &IM, &cx, &cy, &w, &h, &color) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ gdImageEllipse(im, cx, cy, w, h, color);
+ RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto bool imagefilltoborder(resource im, int x, int y, int border, int col)
+ Flood fill to specific color */
+PHP_FUNCTION(imagefilltoborder)
+{
+ zval *IM;
+ long x, y, border, col;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rllll", &IM, &x, &y, &border, &col) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+ gdImageFillToBorder(im, x, y, border, col);
+ RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto bool imagefill(resource im, int x, int y, int col)
+ Flood fill */
+PHP_FUNCTION(imagefill)
+{
+ zval *IM;
+ long x, y, col;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlll", &IM, &x, &y, &col) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+ gdImageFill(im, x, y, col);
+ RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto int imagecolorstotal(resource im)
+ Find out the number of colors in an image's palette */
+PHP_FUNCTION(imagecolorstotal)
+{
+ zval *IM;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &IM) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ RETURN_LONG(gdImageColorsTotal(im));
+}
+/* }}} */
+
+/* {{{ proto int imagecolortransparent(resource im [, int col])
+ Define a color as transparent */
+PHP_FUNCTION(imagecolortransparent)
+{
+ zval *IM;
+ long COL = 0;
+ gdImagePtr im;
+ int argc = ZEND_NUM_ARGS();
+
+ if (zend_parse_parameters(argc TSRMLS_CC, "r|l", &IM, &COL) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ if (argc > 1) {
+ gdImageColorTransparent(im, COL);
+ }
+
+ RETURN_LONG(gdImageGetTransparent(im));
+}
+/* }}} */
+
+/* {{{ proto int imageinterlace(resource im [, int interlace])
+ Enable or disable interlace */
+PHP_FUNCTION(imageinterlace)
+{
+ zval *IM;
+ int argc = ZEND_NUM_ARGS();
+ long INT = 0;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(argc TSRMLS_CC, "r|l", &IM, &INT) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ if (argc > 1) {
+ gdImageInterlace(im, INT);
+ }
+
+ RETURN_LONG(gdImageGetInterlaced(im));
+}
+/* }}} */
+
+/* {{{ php_imagepolygon
+ arg = 0 normal polygon
+ arg = 1 filled polygon */
+/* im, points, num_points, col */
+static void php_imagepolygon(INTERNAL_FUNCTION_PARAMETERS, int filled)
+{
+ zval *IM, *POINTS;
+ long NPOINTS, COL;
+ zval **var = NULL;
+ gdImagePtr im;
+ gdPointPtr points;
+ int npoints, col, nelem, i;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rall", &IM, &POINTS, &NPOINTS, &COL) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ npoints = NPOINTS;
+ col = COL;
+
+ nelem = zend_hash_num_elements(Z_ARRVAL_P(POINTS));
+ if (nelem < 6) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "You must have at least 3 points in your array");
+ RETURN_FALSE;
+ }
+ if (npoints <= 0) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "You must give a positive number of points");
+ RETURN_FALSE;
+ }
+ if (nelem < npoints * 2) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Trying to use %d points in array with only %d points", npoints, nelem/2);
+ RETURN_FALSE;
+ }
+
+ points = (gdPointPtr) safe_emalloc(npoints, sizeof(gdPoint), 0);
+
+ for (i = 0; i < npoints; i++) {
+ if (zend_hash_index_find(Z_ARRVAL_P(POINTS), (i * 2), (void **) &var) == SUCCESS) {
+ SEPARATE_ZVAL((var));
+ convert_to_long(*var);
+ points[i].x = Z_LVAL_PP(var);
+ }
+ if (zend_hash_index_find(Z_ARRVAL_P(POINTS), (i * 2) + 1, (void **) &var) == SUCCESS) {
+ SEPARATE_ZVAL(var);
+ convert_to_long(*var);
+ points[i].y = Z_LVAL_PP(var);
+ }
+ }
+
+ if (filled) {
+ gdImageFilledPolygon(im, points, npoints, col);
+ } else {
+ gdImagePolygon(im, points, npoints, col);
+ }
+
+ efree(points);
+ RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto bool imagepolygon(resource im, array point, int num_points, int col)
+ Draw a polygon */
+PHP_FUNCTION(imagepolygon)
+{
+ php_imagepolygon(INTERNAL_FUNCTION_PARAM_PASSTHRU, 0);
+}
+/* }}} */
+
+/* {{{ proto bool imagefilledpolygon(resource im, array point, int num_points, int col)
+ Draw a filled polygon */
+PHP_FUNCTION(imagefilledpolygon)
+{
+ php_imagepolygon(INTERNAL_FUNCTION_PARAM_PASSTHRU, 1);
+}
+/* }}} */
+
+/* {{{ php_find_gd_font
+ */
+static gdFontPtr php_find_gd_font(int size TSRMLS_DC)
+{
+ gdFontPtr font;
+ int ind_type;
+
+ switch (size) {
+ case 1:
+ font = gdFontTiny;
+ break;
+ case 2:
+ font = gdFontSmall;
+ break;
+ case 3:
+ font = gdFontMediumBold;
+ break;
+ case 4:
+ font = gdFontLarge;
+ break;
+ case 5:
+ font = gdFontGiant;
+ break;
+ default:
+ font = zend_list_find(size - 5, &ind_type);
+ if (!font || ind_type != le_gd_font) {
+ if (size < 1) {
+ font = gdFontTiny;
+ } else {
+ font = gdFontGiant;
+ }
+ }
+ break;
+ }
+
+ return font;
+}
+/* }}} */
+
+/* {{{ php_imagefontsize
+ * arg = 0 ImageFontWidth
+ * arg = 1 ImageFontHeight
+ */
+static void php_imagefontsize(INTERNAL_FUNCTION_PARAMETERS, int arg)
+{
+ long SIZE;
+ gdFontPtr font;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "l", &SIZE) == FAILURE) {
+ return;
+ }
+
+ font = php_find_gd_font(SIZE TSRMLS_CC);
+ RETURN_LONG(arg ? font->h : font->w);
+}
+/* }}} */
+
+/* {{{ proto int imagefontwidth(int font)
+ Get font width */
+PHP_FUNCTION(imagefontwidth)
+{
+ php_imagefontsize(INTERNAL_FUNCTION_PARAM_PASSTHRU, 0);
+}
+/* }}} */
+
+/* {{{ proto int imagefontheight(int font)
+ Get font height */
+PHP_FUNCTION(imagefontheight)
+{
+ php_imagefontsize(INTERNAL_FUNCTION_PARAM_PASSTHRU, 1);
+}
+/* }}} */
+
+/* {{{ php_gdimagecharup
+ * workaround for a bug in gd 1.2 */
+static void php_gdimagecharup(gdImagePtr im, gdFontPtr f, int x, int y, int c, int color)
+{
+ int cx, cy, px, py, fline;
+ cx = 0;
+ cy = 0;
+
+ if ((c < f->offset) || (c >= (f->offset + f->nchars))) {
+ return;
+ }
+
+ fline = (c - f->offset) * f->h * f->w;
+ for (py = y; (py > (y - f->w)); py--) {
+ for (px = x; (px < (x + f->h)); px++) {
+ if (f->data[fline + cy * f->w + cx]) {
+ gdImageSetPixel(im, px, py, color);
+ }
+ cy++;
+ }
+ cy = 0;
+ cx++;
+ }
+}
+/* }}} */
+
+/* {{{ php_imagechar
+ * arg = 0 ImageChar
+ * arg = 1 ImageCharUp
+ * arg = 2 ImageString
+ * arg = 3 ImageStringUp
+ */
+static void php_imagechar(INTERNAL_FUNCTION_PARAMETERS, int mode)
+{
+ zval *IM;
+ long SIZE, X, Y, COL;
+ char *C;
+ int C_len;
+ gdImagePtr im;
+ int ch = 0, col, x, y, size, i, l = 0;
+ unsigned char *str = NULL;
+ gdFontPtr font;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlllsl", &IM, &SIZE, &X, &Y, &C, &C_len, &COL) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ col = COL;
+
+ if (mode < 2) {
+ ch = (int)((unsigned char)*C);
+ } else {
+ str = (unsigned char *) estrndup(C, C_len);
+ l = strlen((char *)str);
+ }
+
+ y = Y;
+ x = X;
+ size = SIZE;
+
+ font = php_find_gd_font(size TSRMLS_CC);
+
+ switch (mode) {
+ case 0:
+ gdImageChar(im, font, x, y, ch, col);
+ break;
+ case 1:
+ php_gdimagecharup(im, font, x, y, ch, col);
+ break;
+ case 2:
+ for (i = 0; (i < l); i++) {
+ gdImageChar(im, font, x, y, (int) ((unsigned char) str[i]), col);
+ x += font->w;
+ }
+ break;
+ case 3: {
+ for (i = 0; (i < l); i++) {
+ /* php_gdimagecharup(im, font, x, y, (int) str[i], col); */
+ gdImageCharUp(im, font, x, y, (int) str[i], col);
+ y -= font->w;
+ }
+ break;
+ }
+ }
+ if (str) {
+ efree(str);
+ }
+ RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto bool imagechar(resource im, int font, int x, int y, string c, int col)
+ Draw a character */
+PHP_FUNCTION(imagechar)
+{
+ php_imagechar(INTERNAL_FUNCTION_PARAM_PASSTHRU, 0);
+}
+/* }}} */
+
+/* {{{ proto bool imagecharup(resource im, int font, int x, int y, string c, int col)
+ Draw a character rotated 90 degrees counter-clockwise */
+PHP_FUNCTION(imagecharup)
+{
+ php_imagechar(INTERNAL_FUNCTION_PARAM_PASSTHRU, 1);
+}
+/* }}} */
+
+/* {{{ proto bool imagestring(resource im, int font, int x, int y, string str, int col)
+ Draw a string horizontally */
+PHP_FUNCTION(imagestring)
+{
+ php_imagechar(INTERNAL_FUNCTION_PARAM_PASSTHRU, 2);
+}
+/* }}} */
+
+/* {{{ proto bool imagestringup(resource im, int font, int x, int y, string str, int col)
+ Draw a string vertically - rotated 90 degrees counter-clockwise */
+PHP_FUNCTION(imagestringup)
+{
+ php_imagechar(INTERNAL_FUNCTION_PARAM_PASSTHRU, 3);
+}
+/* }}} */
+
+/* {{{ proto bool imagecopy(resource dst_im, resource src_im, int dst_x, int dst_y, int src_x, int src_y, int src_w, int src_h)
+ Copy part of an image */
+PHP_FUNCTION(imagecopy)
+{
+ zval *SIM, *DIM;
+ long SX, SY, SW, SH, DX, DY;
+ gdImagePtr im_dst, im_src;
+ int srcH, srcW, srcY, srcX, dstY, dstX;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rrllllll", &DIM, &SIM, &DX, &DY, &SX, &SY, &SW, &SH) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im_src, gdImagePtr, &SIM, -1, "Image", le_gd);
+ ZEND_FETCH_RESOURCE(im_dst, gdImagePtr, &DIM, -1, "Image", le_gd);
+
+ srcX = SX;
+ srcY = SY;
+ srcH = SH;
+ srcW = SW;
+ dstX = DX;
+ dstY = DY;
+
+ gdImageCopy(im_dst, im_src, dstX, dstY, srcX, srcY, srcW, srcH);
+ RETURN_TRUE;
+}
+/* }}} */
+
+#if HAVE_LIBGD15
+/* {{{ proto bool imagecopymerge(resource src_im, resource dst_im, int dst_x, int dst_y, int src_x, int src_y, int src_w, int src_h, int pct)
+ Merge one part of an image with another */
+PHP_FUNCTION(imagecopymerge)
+{
+ zval *SIM, *DIM;
+ long SX, SY, SW, SH, DX, DY, PCT;
+ gdImagePtr im_dst, im_src;
+ int srcH, srcW, srcY, srcX, dstY, dstX, pct;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rrlllllll", &DIM, &SIM, &DX, &DY, &SX, &SY, &SW, &SH, &PCT) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im_src, gdImagePtr, &SIM, -1, "Image", le_gd);
+ ZEND_FETCH_RESOURCE(im_dst, gdImagePtr, &DIM, -1, "Image", le_gd);
+
+ srcX = SX;
+ srcY = SY;
+ srcH = SH;
+ srcW = SW;
+ dstX = DX;
+ dstY = DY;
+ pct = PCT;
+
+ gdImageCopyMerge(im_dst, im_src, dstX, dstY, srcX, srcY, srcW, srcH, pct);
+ RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto bool imagecopymergegray(resource src_im, resource dst_im, int dst_x, int dst_y, int src_x, int src_y, int src_w, int src_h, int pct)
+ Merge one part of an image with another */
+PHP_FUNCTION(imagecopymergegray)
+{
+ zval *SIM, *DIM;
+ long SX, SY, SW, SH, DX, DY, PCT;
+ gdImagePtr im_dst, im_src;
+ int srcH, srcW, srcY, srcX, dstY, dstX, pct;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rrlllllll", &DIM, &SIM, &DX, &DY, &SX, &SY, &SW, &SH, &PCT) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im_src, gdImagePtr, &SIM, -1, "Image", le_gd);
+ ZEND_FETCH_RESOURCE(im_dst, gdImagePtr, &DIM, -1, "Image", le_gd);
+
+ srcX = SX;
+ srcY = SY;
+ srcH = SH;
+ srcW = SW;
+ dstX = DX;
+ dstY = DY;
+ pct = PCT;
+
+ gdImageCopyMergeGray(im_dst, im_src, dstX, dstY, srcX, srcY, srcW, srcH, pct);
+ RETURN_TRUE;
+}
+/* }}} */
+#endif
+
+/* {{{ proto bool imagecopyresized(resource dst_im, resource src_im, int dst_x, int dst_y, int src_x, int src_y, int dst_w, int dst_h, int src_w, int src_h)
+ Copy and resize part of an image */
+PHP_FUNCTION(imagecopyresized)
+{
+ zval *SIM, *DIM;
+ long SX, SY, SW, SH, DX, DY, DW, DH;
+ gdImagePtr im_dst, im_src;
+ int srcH, srcW, dstH, dstW, srcY, srcX, dstY, dstX;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rrllllllll", &DIM, &SIM, &DX, &DY, &SX, &SY, &DW, &DH, &SW, &SH) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im_dst, gdImagePtr, &DIM, -1, "Image", le_gd);
+ ZEND_FETCH_RESOURCE(im_src, gdImagePtr, &SIM, -1, "Image", le_gd);
+
+ srcX = SX;
+ srcY = SY;
+ srcH = SH;
+ srcW = SW;
+ dstX = DX;
+ dstY = DY;
+ dstH = DH;
+ dstW = DW;
+
+ if (dstW <= 0 || dstH <= 0 || srcW <= 0 || srcH <= 0) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Invalid image dimensions");
+ RETURN_FALSE;
+ }
+
+ gdImageCopyResized(im_dst, im_src, dstX, dstY, srcX, srcY, dstW, dstH, srcW, srcH);
+ RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto int imagesx(resource im)
+ Get image width */
+PHP_FUNCTION(imagesx)
+{
+ zval *IM;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &IM) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ RETURN_LONG(gdImageSX(im));
+}
+/* }}} */
+
+/* {{{ proto int imagesy(resource im)
+ Get image height */
+PHP_FUNCTION(imagesy)
+{
+ zval *IM;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &IM) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ RETURN_LONG(gdImageSY(im));
+}
+/* }}} */
+
+#ifdef ENABLE_GD_TTF
+#define TTFTEXT_DRAW 0
+#define TTFTEXT_BBOX 1
+#endif
+
+#ifdef ENABLE_GD_TTF
+
+#if HAVE_LIBFREETYPE && HAVE_GD_STRINGFTEX
+/* {{{ proto array imageftbbox(float size, float angle, string font_file, string text [, array extrainfo])
+ Give the bounding box of a text using fonts via freetype2 */
+PHP_FUNCTION(imageftbbox)
+{
+ php_imagettftext_common(INTERNAL_FUNCTION_PARAM_PASSTHRU, TTFTEXT_BBOX, 1);
+}
+/* }}} */
+
+/* {{{ proto array imagefttext(resource im, float size, float angle, int x, int y, int col, string font_file, string text [, array extrainfo])
+ Write text to the image using fonts via freetype2 */
+PHP_FUNCTION(imagefttext)
+{
+ php_imagettftext_common(INTERNAL_FUNCTION_PARAM_PASSTHRU, TTFTEXT_DRAW, 1);
+}
+/* }}} */
+#endif
+
+/* {{{ proto array imagettfbbox(float size, float angle, string font_file, string text)
+ Give the bounding box of a text using TrueType fonts */
+PHP_FUNCTION(imagettfbbox)
+{
+ php_imagettftext_common(INTERNAL_FUNCTION_PARAM_PASSTHRU, TTFTEXT_BBOX, 0);
+}
+/* }}} */
+
+/* {{{ proto array imagettftext(resource im, float size, float angle, int x, int y, int col, string font_file, string text)
+ Write text to the image using a TrueType font */
+PHP_FUNCTION(imagettftext)
+{
+ php_imagettftext_common(INTERNAL_FUNCTION_PARAM_PASSTHRU, TTFTEXT_DRAW, 0);
+}
+/* }}} */
+
+/* {{{ php_imagettftext_common
+ */
+static void php_imagettftext_common(INTERNAL_FUNCTION_PARAMETERS, int mode, int extended)
+{
+ zval *IM, *EXT = NULL;
+ gdImagePtr im=NULL;
+ long col = -1, x = -1, y = -1;
+ int str_len, fontname_len, i, brect[8];
+ double ptsize, angle;
+ char *str = NULL, *fontname = NULL;
+ char *error = NULL;
+ int argc = ZEND_NUM_ARGS();
+#if HAVE_GD_STRINGFTEX
+ gdFTStringExtra strex = {0};
+#endif
+
+#if !HAVE_GD_STRINGFTEX
+ assert(!extended);
+#endif
+
+ if (mode == TTFTEXT_BBOX) {
+ if (argc < 4 || argc > ((extended) ? 5 : 4)) {
+ ZEND_WRONG_PARAM_COUNT();
+ } else if (zend_parse_parameters(argc TSRMLS_CC, "ddss|a", &ptsize, &angle, &fontname, &fontname_len, &str, &str_len, &EXT) == FAILURE) {
+ RETURN_FALSE;
+ }
+ } else {
+ if (argc < 8 || argc > ((extended) ? 9 : 8)) {
+ ZEND_WRONG_PARAM_COUNT();
+ } else if (zend_parse_parameters(argc TSRMLS_CC, "rddlllss|a", &IM, &ptsize, &angle, &x, &y, &col, &fontname, &fontname_len, &str, &str_len, &EXT) == FAILURE) {
+ RETURN_FALSE;
+ }
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+ }
+
+ /* convert angle to radians */
+ angle = angle * (M_PI/180);
+
+#if HAVE_GD_STRINGFTEX
+ if (extended && EXT) { /* parse extended info */
+ HashPosition pos;
+
+ /* walk the assoc array */
+ zend_hash_internal_pointer_reset_ex(HASH_OF(EXT), &pos);
+ do {
+ zval ** item;
+ char * key;
+ ulong num_key;
+
+ if (zend_hash_get_current_key_ex(HASH_OF(EXT), &key, NULL, &num_key, 0, &pos) != HASH_KEY_IS_STRING) {
+ continue;
+ }
+
+ if (zend_hash_get_current_data_ex(HASH_OF(EXT), (void **) &item, &pos) == FAILURE) {
+ continue;
+ }
+
+ if (strcmp("linespacing", key) == 0) {
+ convert_to_double_ex(item);
+ strex.flags |= gdFTEX_LINESPACE;
+ strex.linespacing = Z_DVAL_PP(item);
+ }
+
+ } while (zend_hash_move_forward_ex(HASH_OF(EXT), &pos) == SUCCESS);
+ }
+#endif
+
+#ifdef VIRTUAL_DIR
+ {
+ char tmp_font_path[MAXPATHLEN];
+
+ if (!VCWD_REALPATH(fontname, tmp_font_path)) {
+ fontname = NULL;
+ }
+ }
+#endif
+
+ PHP_GD_CHECK_OPEN_BASEDIR(fontname, "Invalid font filename");
+
+#ifdef USE_GD_IMGSTRTTF
+# if HAVE_GD_STRINGFTEX
+ if (extended) {
+ error = gdImageStringFTEx(im, brect, col, fontname, ptsize, angle, x, y, str, &strex);
+ }
+ else
+# endif
+
+# if HAVE_GD_STRINGFT
+ error = gdImageStringFT(im, brect, col, fontname, ptsize, angle, x, y, str);
+# elif HAVE_GD_STRINGTTF
+ error = gdImageStringTTF(im, brect, col, fontname, ptsize, angle, x, y, str);
+# endif
+
+#endif
+
+ if (error) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "%s", error);
+ RETURN_FALSE;
+ }
+
+ array_init(return_value);
+
+ /* return array with the text's bounding box */
+ for (i = 0; i < 8; i++) {
+ add_next_index_long(return_value, brect[i]);
+ }
+}
+/* }}} */
+#endif /* ENABLE_GD_TTF */
+
+#if HAVE_LIBT1
+
+/* {{{ php_free_ps_font
+ */
+static void php_free_ps_font(zend_rsrc_list_entry *rsrc TSRMLS_DC)
+{
+ int *font = (int *) rsrc->ptr;
+
+ T1_DeleteFont(*font);
+ efree(font);
+}
+/* }}} */
+
+/* {{{ php_free_ps_enc
+ */
+static void php_free_ps_enc(zend_rsrc_list_entry *rsrc TSRMLS_DC)
+{
+ char **enc = (char **) rsrc->ptr;
+
+ T1_DeleteEncoding(enc);
+}
+/* }}} */
+
+/* {{{ proto resource imagepsloadfont(string pathname)
+ Load a new font from specified file */
+PHP_FUNCTION(imagepsloadfont)
+{
+ char *file;
+ int file_len, f_ind, *font;
+#ifdef PHP_WIN32
+ struct stat st;
+#endif
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &file, &file_len) == FAILURE) {
+ return;
+ }
+
+#ifdef PHP_WIN32
+ if (VCWD_STAT(file, &st) < 0) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Font file not found (%s)", file);
+ RETURN_FALSE;
+ }
+#endif
+
+ f_ind = T1_AddFont(file);
+
+ if (f_ind < 0) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "T1Lib Error (%i): %s", f_ind, T1_StrError(f_ind));
+ RETURN_FALSE;
+ }
+
+ if (T1_LoadFont(f_ind)) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Couldn't load the font");
+ RETURN_FALSE;
+ }
+
+ font = (int *) emalloc(sizeof(int));
+ *font = f_ind;
+ ZEND_REGISTER_RESOURCE(return_value, font, le_ps_font);
+}
+/* }}} */
+
+/* {{{ proto int imagepscopyfont(int font_index)
+ Make a copy of a font for purposes like extending or reenconding */
+/* The function in t1lib which this function uses seem to be buggy...
+PHP_FUNCTION(imagepscopyfont)
+{
+ int l_ind, type;
+ gd_ps_font *nf_ind, *of_ind;
+ long fnt;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "l", &fnt) == FAILURE) {
+ return;
+ }
+
+ of_ind = zend_list_find(fnt, &type);
+
+ if (type != le_ps_font) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "%ld is not a Type 1 font index", fnt);
+ RETURN_FALSE;
+ }
+
+ nf_ind = emalloc(sizeof(gd_ps_font));
+ nf_ind->font_id = T1_CopyFont(of_ind->font_id);
+
+ if (nf_ind->font_id < 0) {
+ l_ind = nf_ind->font_id;
+ efree(nf_ind);
+ switch (l_ind) {
+ case -1:
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "FontID %d is not loaded in memory", l_ind);
+ RETURN_FALSE;
+ break;
+ case -2:
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Tried to copy a logical font");
+ RETURN_FALSE;
+ break;
+ case -3:
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Memory allocation fault in t1lib");
+ RETURN_FALSE;
+ break;
+ default:
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "An unknown error occurred in t1lib");
+ RETURN_FALSE;
+ break;
+ }
+ }
+
+ nf_ind->extend = 1;
+ l_ind = zend_list_insert(nf_ind, le_ps_font TSRMLS_CC);
+ RETURN_LONG(l_ind);
+}
+*/
+/* }}} */
+
+/* {{{ proto bool imagepsfreefont(resource font_index)
+ Free memory used by a font */
+PHP_FUNCTION(imagepsfreefont)
+{
+ zval *fnt;
+ int *f_ind;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &fnt) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(f_ind, int *, &fnt, -1, "Type 1 font", le_ps_font);
+ zend_list_delete(Z_LVAL_P(fnt));
+ RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto bool imagepsencodefont(resource font_index, string filename)
+ To change a fonts character encoding vector */
+PHP_FUNCTION(imagepsencodefont)
+{
+ zval *fnt;
+ char *enc, **enc_vector;
+ int enc_len, *f_ind;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rs", &fnt, &enc, &enc_len) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(f_ind, int *, &fnt, -1, "Type 1 font", le_ps_font);
+
+ if ((enc_vector = T1_LoadEncoding(enc)) == NULL) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Couldn't load encoding vector from %s", enc);
+ RETURN_FALSE;
+ }
+
+ T1_DeleteAllSizes(*f_ind);
+ if (T1_ReencodeFont(*f_ind, enc_vector)) {
+ T1_DeleteEncoding(enc_vector);
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Couldn't re-encode font");
+ RETURN_FALSE;
+ }
+
+ zend_list_insert(enc_vector, le_ps_enc TSRMLS_CC);
+
+ RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto bool imagepsextendfont(resource font_index, float extend)
+ Extend or or condense (if extend < 1) a font */
+PHP_FUNCTION(imagepsextendfont)
+{
+ zval *fnt;
+ double ext;
+ int *f_ind;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rd", &fnt, &ext) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(f_ind, int *, &fnt, -1, "Type 1 font", le_ps_font);
+
+ T1_DeleteAllSizes(*f_ind);
+
+ if (ext <= 0) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Second parameter %F out of range (must be > 0)", ext);
+ RETURN_FALSE;
+ }
+
+ if (T1_ExtendFont(*f_ind, ext) != 0) {
+ RETURN_FALSE;
+ }
+
+ RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto bool imagepsslantfont(resource font_index, float slant)
+ Slant a font */
+PHP_FUNCTION(imagepsslantfont)
+{
+ zval *fnt;
+ double slt;
+ int *f_ind;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rd", &fnt, &slt) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(f_ind, int *, &fnt, -1, "Type 1 font", le_ps_font);
+
+ if (T1_SlantFont(*f_ind, slt) != 0) {
+ RETURN_FALSE;
+ }
+
+ RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto array imagepstext(resource image, string text, resource font, int size, int foreground, int background, int xcoord, int ycoord [, int space [, int tightness [, float angle [, int antialias])
+ Rasterize a string over an image */
+PHP_FUNCTION(imagepstext)
+{
+ zval *img, *fnt;
+ int i, j;
+ long _fg, _bg, x, y, size, space = 0, aa_steps = 4, width = 0;
+ int *f_ind;
+ int h_lines, v_lines, c_ind;
+ int rd, gr, bl, fg_rd, fg_gr, fg_bl, bg_rd, bg_gr, bg_bl;
+ int fg_al, bg_al, al;
+ int aa[16];
+ int amount_kern, add_width;
+ double angle = 0.0, extend;
+ unsigned long aa_greys[] = {0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16};
+ gdImagePtr bg_img;
+ GLYPH *str_img;
+ T1_OUTLINE *char_path, *str_path;
+ T1_TMATRIX *transform = NULL;
+ char *str;
+ int str_len;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rsrlllll|lldl", &img, &str, &str_len, &fnt, &size, &_fg, &_bg, &x, &y, &space, &width, &angle, &aa_steps) == FAILURE) {
+ return;
+ }
+
+ if (aa_steps != 4 && aa_steps != 16) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Antialias steps must be 4 or 16");
+ RETURN_FALSE;
+ }
+
+ ZEND_FETCH_RESOURCE(bg_img, gdImagePtr, &img, -1, "Image", le_gd);
+ ZEND_FETCH_RESOURCE(f_ind, int *, &fnt, -1, "Type 1 font", le_ps_font);
+
+ /* Ensure that the provided colors are valid */
+ if (_fg < 0 || (!gdImageTrueColor(bg_img) && _fg > gdImageColorsTotal(bg_img))) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Foreground color index %ld out of range", _fg);
+ RETURN_FALSE;
+ }
+
+ if (_bg < 0 || (!gdImageTrueColor(bg_img) && _fg > gdImageColorsTotal(bg_img))) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Background color index %ld out of range", _bg);
+ RETURN_FALSE;
+ }
+
+ fg_rd = gdImageRed (bg_img, _fg);
+ fg_gr = gdImageGreen(bg_img, _fg);
+ fg_bl = gdImageBlue (bg_img, _fg);
+ fg_al = gdImageAlpha(bg_img, _fg);
+
+ bg_rd = gdImageRed (bg_img, _bg);
+ bg_gr = gdImageGreen(bg_img, _bg);
+ bg_bl = gdImageBlue (bg_img, _bg);
+ bg_al = gdImageAlpha(bg_img, _bg);
+
+ for (i = 0; i < aa_steps; i++) {
+ rd = bg_rd + (double) (fg_rd - bg_rd) / aa_steps * (i + 1);
+ gr = bg_gr + (double) (fg_gr - bg_gr) / aa_steps * (i + 1);
+ bl = bg_bl + (double) (fg_bl - bg_bl) / aa_steps * (i + 1);
+ al = bg_al + (double) (fg_al - bg_al) / aa_steps * (i + 1);
+ aa[i] = gdImageColorResolveAlpha(bg_img, rd, gr, bl, al);
+ }
+
+ T1_AASetBitsPerPixel(8);
+
+ switch (aa_steps) {
+ case 4:
+ T1_AASetGrayValues(0, 1, 2, 3, 4);
+ T1_AASetLevel(T1_AA_LOW);
+ break;
+ case 16:
+ T1_AAHSetGrayValues(aa_greys);
+ T1_AASetLevel(T1_AA_HIGH);
+ break;
+ default:
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Invalid value %ld as number of steps for antialiasing", aa_steps);
+ RETURN_FALSE;
+ }
+
+ if (angle) {
+ transform = T1_RotateMatrix(NULL, angle);
+ }
+
+ if (width) {
+ extend = T1_GetExtend(*f_ind);
+ str_path = T1_GetCharOutline(*f_ind, str[0], size, transform);
+
+ if (!str_path) {
+ if (T1_errno) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "T1Lib Error: %s", T1_StrError(T1_errno));
+ }
+ RETURN_FALSE;
+ }
+
+ for (i = 1; i < str_len; i++) {
+ amount_kern = (int) T1_GetKerning(*f_ind, str[i - 1], str[i]);
+ amount_kern += str[i - 1] == ' ' ? space : 0;
+ add_width = (int) (amount_kern + width) / extend;
+
+ char_path = T1_GetMoveOutline(*f_ind, add_width, 0, 0, size, transform);
+ str_path = T1_ConcatOutlines(str_path, char_path);
+
+ char_path = T1_GetCharOutline(*f_ind, str[i], size, transform);
+ str_path = T1_ConcatOutlines(str_path, char_path);
+ }
+ str_img = T1_AAFillOutline(str_path, 0);
+ } else {
+ str_img = T1_AASetString(*f_ind, str, str_len, space, T1_KERNING, size, transform);
+ }
+ if (T1_errno) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "T1Lib Error: %s", T1_StrError(T1_errno));
+ RETURN_FALSE;
+ }
+
+ h_lines = str_img->metrics.ascent - str_img->metrics.descent;
+ v_lines = str_img->metrics.rightSideBearing - str_img->metrics.leftSideBearing;
+
+ for (i = 0; i < v_lines; i++) {
+ for (j = 0; j < h_lines; j++) {
+ switch (str_img->bits[j * v_lines + i]) {
+ case 0:
+ break;
+ default:
+ c_ind = aa[str_img->bits[j * v_lines + i] - 1];
+ gdImageSetPixel(bg_img, x + str_img->metrics.leftSideBearing + i, y - str_img->metrics.ascent + j, c_ind);
+ break;
+ }
+ }
+ }
+
+ array_init(return_value);
+
+ add_next_index_long(return_value, str_img->metrics.leftSideBearing);
+ add_next_index_long(return_value, str_img->metrics.descent);
+ add_next_index_long(return_value, str_img->metrics.rightSideBearing);
+ add_next_index_long(return_value, str_img->metrics.ascent);
+}
+/* }}} */
+
+/* {{{ proto array imagepsbbox(string text, resource font, int size [, int space, int tightness, float angle])
+ Return the bounding box needed by a string if rasterized */
+PHP_FUNCTION(imagepsbbox)
+{
+ zval *fnt;
+ long sz = 0, sp = 0, wd = 0;
+ char *str;
+ int i, space = 0, add_width = 0, char_width, amount_kern;
+ int cur_x, cur_y, dx, dy;
+ int x1, y1, x2, y2, x3, y3, x4, y4;
+ int *f_ind;
+ int str_len, per_char = 0;
+ int argc = ZEND_NUM_ARGS();
+ double angle = 0, sin_a = 0, cos_a = 0;
+ BBox char_bbox, str_bbox = {0, 0, 0, 0};
+
+ if (argc != 3 && argc != 6) {
+ ZEND_WRONG_PARAM_COUNT();
+ }
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "srl|lld", &str, &str_len, &fnt, &sz, &sp, &wd, &angle) == FAILURE) {
+ return;
+ }
+
+ if (argc == 6) {
+ space = sp;
+ add_width = wd;
+ angle = angle * M_PI / 180;
+ sin_a = sin(angle);
+ cos_a = cos(angle);
+ per_char = add_width || angle ? 1 : 0;
+ }
+
+ ZEND_FETCH_RESOURCE(f_ind, int *, &fnt, -1, "Type 1 font", le_ps_font);
+
+#define max(a, b) (a > b ? a : b)
+#define min(a, b) (a < b ? a : b)
+#define new_x(a, b) (int) ((a) * cos_a - (b) * sin_a)
+#define new_y(a, b) (int) ((a) * sin_a + (b) * cos_a)
+
+ if (per_char) {
+ space += T1_GetCharWidth(*f_ind, ' ');
+ cur_x = cur_y = 0;
+
+ for (i = 0; i < str_len; i++) {
+ if (str[i] == ' ') {
+ char_bbox.llx = char_bbox.lly = char_bbox.ury = 0;
+ char_bbox.urx = char_width = space;
+ } else {
+ char_bbox = T1_GetCharBBox(*f_ind, str[i]);
+ char_width = T1_GetCharWidth(*f_ind, str[i]);
+ }
+ amount_kern = i ? T1_GetKerning(*f_ind, str[i - 1], str[i]) : 0;
+
+ /* Transfer character bounding box to right place */
+ x1 = new_x(char_bbox.llx, char_bbox.lly) + cur_x;
+ y1 = new_y(char_bbox.llx, char_bbox.lly) + cur_y;
+ x2 = new_x(char_bbox.llx, char_bbox.ury) + cur_x;
+ y2 = new_y(char_bbox.llx, char_bbox.ury) + cur_y;
+ x3 = new_x(char_bbox.urx, char_bbox.ury) + cur_x;
+ y3 = new_y(char_bbox.urx, char_bbox.ury) + cur_y;
+ x4 = new_x(char_bbox.urx, char_bbox.lly) + cur_x;
+ y4 = new_y(char_bbox.urx, char_bbox.lly) + cur_y;
+
+ /* Find min & max values and compare them with current bounding box */
+ str_bbox.llx = min(str_bbox.llx, min(x1, min(x2, min(x3, x4))));
+ str_bbox.lly = min(str_bbox.lly, min(y1, min(y2, min(y3, y4))));
+ str_bbox.urx = max(str_bbox.urx, max(x1, max(x2, max(x3, x4))));
+ str_bbox.ury = max(str_bbox.ury, max(y1, max(y2, max(y3, y4))));
+
+ /* Move to the next base point */
+ dx = new_x(char_width + add_width + amount_kern, 0);
+ dy = new_y(char_width + add_width + amount_kern, 0);
+ cur_x += dx;
+ cur_y += dy;
+ /*
+ printf("%d\t%d\t%d\t%d\t%d\t%d\t%d\t%d\t%d\t%d\t%d\t%d\t%d\t%d\t%d\t%d\t%d\t%d\n", x1, y1, x2, y2, x3, y3, x4, y4, char_bbox.llx, char_bbox.lly, char_bbox.urx, char_bbox.ury, char_width, amount_kern, cur_x, cur_y, dx, dy);
+ */
+ }
+
+ } else {
+ str_bbox = T1_GetStringBBox(*f_ind, str, str_len, space, T1_KERNING);
+ }
+
+ if (T1_errno) {
+ RETURN_FALSE;
+ }
+
+ array_init(return_value);
+ /*
+ printf("%d %d %d %d\n", str_bbox.llx, str_bbox.lly, str_bbox.urx, str_bbox.ury);
+ */
+ add_next_index_long(return_value, (int) ceil(((double) str_bbox.llx)*sz/1000));
+ add_next_index_long(return_value, (int) ceil(((double) str_bbox.lly)*sz/1000));
+ add_next_index_long(return_value, (int) ceil(((double) str_bbox.urx)*sz/1000));
+ add_next_index_long(return_value, (int) ceil(((double) str_bbox.ury)*sz/1000));
+}
+/* }}} */
+#endif
+
+#ifdef HAVE_GD_WBMP
+/* {{{ proto bool image2wbmp(resource im [, string filename [, int threshold]])
+ Output WBMP image to browser or file */
+PHP_FUNCTION(image2wbmp)
+{
+ _php_image_output(INTERNAL_FUNCTION_PARAM_PASSTHRU, PHP_GDIMG_CONVERT_WBM, "WBMP", _php_image_bw_convert);
+}
+/* }}} */
+#endif /* HAVE_GD_WBMP */
+
+#if defined(HAVE_GD_JPG) && defined(HAVE_GD_WBMP)
+/* {{{ proto bool jpeg2wbmp (string f_org, string f_dest, int d_height, int d_width, int threshold)
+ Convert JPEG image to WBMP image */
+PHP_FUNCTION(jpeg2wbmp)
+{
+ _php_image_convert(INTERNAL_FUNCTION_PARAM_PASSTHRU, PHP_GDIMG_TYPE_JPG);
+}
+/* }}} */
+#endif
+
+#if defined(HAVE_GD_PNG) && defined(HAVE_GD_WBMP)
+/* {{{ proto bool png2wbmp (string f_org, string f_dest, int d_height, int d_width, int threshold)
+ Convert PNG image to WBMP image */
+PHP_FUNCTION(png2wbmp)
+{
+ _php_image_convert(INTERNAL_FUNCTION_PARAM_PASSTHRU, PHP_GDIMG_TYPE_PNG);
+}
+/* }}} */
+#endif
+
+#ifdef HAVE_GD_WBMP
+/* {{{ _php_image_bw_convert
+ * It converts a gd Image to bw using a threshold value */
+static void _php_image_bw_convert(gdImagePtr im_org, gdIOCtx *out, int threshold)
+{
+ gdImagePtr im_dest;
+ int white, black;
+ int color, color_org, median;
+ int dest_height = gdImageSY(im_org);
+ int dest_width = gdImageSX(im_org);
+ int x, y;
+ TSRMLS_FETCH();
+
+ im_dest = gdImageCreate(dest_width, dest_height);
+ if (im_dest == NULL) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Unable to allocate temporary buffer");
+ return;
+ }
+
+ white = gdImageColorAllocate(im_dest, 255, 255, 255);
+ if (white == -1) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Unable to allocate the colors for the destination buffer");
+ return;
+ }
+
+ black = gdImageColorAllocate(im_dest, 0, 0, 0);
+ if (black == -1) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Unable to allocate the colors for the destination buffer");
+ return;
+ }
+
+ if (im_org->trueColor) {
+ gdImageTrueColorToPalette(im_org, 1, 256);
+ }
+
+ for (y = 0; y < dest_height; y++) {
+ for (x = 0; x < dest_width; x++) {
+ color_org = gdImageGetPixel(im_org, x, y);
+ median = (im_org->red[color_org] + im_org->green[color_org] + im_org->blue[color_org]) / 3;
+ if (median < threshold) {
+ color = black;
+ } else {
+ color = white;
+ }
+ gdImageSetPixel (im_dest, x, y, color);
+ }
+ }
+#ifdef USE_GD_IOCTX
+ gdImageWBMPCtx (im_dest, black, out);
+#else
+ gdImageWBMP (im_dest, black, out);
+#endif
+
+}
+/* }}} */
+
+/* {{{ _php_image_convert
+ * _php_image_convert converts jpeg/png images to wbmp and resizes them as needed */
+static void _php_image_convert(INTERNAL_FUNCTION_PARAMETERS, int image_type )
+{
+ char *f_org, *f_dest;
+ int f_org_len, f_dest_len;
+ long height, width, threshold;
+ gdImagePtr im_org, im_dest, im_tmp;
+ char *fn_org = NULL;
+ char *fn_dest = NULL;
+ FILE *org, *dest;
+ int dest_height = -1;
+ int dest_width = -1;
+ int org_height, org_width;
+ int white, black;
+ int color, color_org, median;
+ int int_threshold;
+ int x, y;
+ float x_ratio, y_ratio;
+#ifdef HAVE_GD_JPG
+ long ignore_warning;
+#endif
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "pplll", &f_org, &f_org_len, &f_dest, &f_dest_len, &height, &width, &threshold) == FAILURE) {
+ return;
+ }
+
+ fn_org = f_org;
+ fn_dest = f_dest;
+ dest_height = height;
+ dest_width = width;
+ int_threshold = threshold;
+
+ /* Check threshold value */
+ if (int_threshold < 0 || int_threshold > 8) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Invalid threshold value '%d'", int_threshold);
+ RETURN_FALSE;
+ }
+
+ /* Check origin file */
+ PHP_GD_CHECK_OPEN_BASEDIR(fn_org, "Invalid origin filename");
+
+ /* Check destination file */
+ PHP_GD_CHECK_OPEN_BASEDIR(fn_dest, "Invalid destination filename");
+
+ /* Open origin file */
+ org = VCWD_FOPEN(fn_org, "rb");
+ if (!org) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Unable to open '%s' for reading", fn_org);
+ RETURN_FALSE;
+ }
+
+ /* Open destination file */
+ dest = VCWD_FOPEN(fn_dest, "wb");
+ if (!dest) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Unable to open '%s' for writing", fn_dest);
+ RETURN_FALSE;
+ }
+
+ switch (image_type) {
+#ifdef HAVE_GD_GIF_READ
+ case PHP_GDIMG_TYPE_GIF:
+ im_org = gdImageCreateFromGif(org);
+ if (im_org == NULL) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Unable to open '%s' Not a valid GIF file", fn_dest);
+ RETURN_FALSE;
+ }
+ break;
+#endif /* HAVE_GD_GIF_READ */
+
+#ifdef HAVE_GD_JPG
+ case PHP_GDIMG_TYPE_JPG:
+ ignore_warning = INI_INT("gd.jpeg_ignore_warning");
+#ifdef HAVE_GD_BUNDLED
+ im_org = gdImageCreateFromJpeg(org, ignore_warning);
+#else
+ im_org = gdImageCreateFromJpeg(org);
+#endif
+ if (im_org == NULL) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Unable to open '%s' Not a valid JPEG file", fn_dest);
+ RETURN_FALSE;
+ }
+ break;
+#endif /* HAVE_GD_JPG */
+
+
+#ifdef HAVE_GD_PNG
+ case PHP_GDIMG_TYPE_PNG:
+ im_org = gdImageCreateFromPng(org);
+ if (im_org == NULL) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Unable to open '%s' Not a valid PNG file", fn_dest);
+ RETURN_FALSE;
+ }
+ break;
+#endif /* HAVE_GD_PNG */
+
+ default:
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Format not supported");
+ RETURN_FALSE;
+ break;
+ }
+
+ org_width = gdImageSX (im_org);
+ org_height = gdImageSY (im_org);
+
+ x_ratio = (float) org_width / (float) dest_width;
+ y_ratio = (float) org_height / (float) dest_height;
+
+ if (x_ratio > 1 && y_ratio > 1) {
+ if (y_ratio > x_ratio) {
+ x_ratio = y_ratio;
+ } else {
+ y_ratio = x_ratio;
+ }
+ dest_width = (int) (org_width / x_ratio);
+ dest_height = (int) (org_height / y_ratio);
+ } else {
+ x_ratio = (float) dest_width / (float) org_width;
+ y_ratio = (float) dest_height / (float) org_height;
+
+ if (y_ratio < x_ratio) {
+ x_ratio = y_ratio;
+ } else {
+ y_ratio = x_ratio;
+ }
+ dest_width = (int) (org_width * x_ratio);
+ dest_height = (int) (org_height * y_ratio);
+ }
+
+ im_tmp = gdImageCreate (dest_width, dest_height);
+ if (im_tmp == NULL ) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Unable to allocate temporary buffer");
+ RETURN_FALSE;
+ }
+
+ gdImageCopyResized (im_tmp, im_org, 0, 0, 0, 0, dest_width, dest_height, org_width, org_height);
+
+ gdImageDestroy(im_org);
+
+ fclose(org);
+
+ im_dest = gdImageCreate(dest_width, dest_height);
+ if (im_dest == NULL) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Unable to allocate destination buffer");
+ RETURN_FALSE;
+ }
+
+ white = gdImageColorAllocate(im_dest, 255, 255, 255);
+ if (white == -1) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Unable to allocate the colors for the destination buffer");
+ RETURN_FALSE;
+ }
+
+ black = gdImageColorAllocate(im_dest, 0, 0, 0);
+ if (black == -1) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "Unable to allocate the colors for the destination buffer");
+ RETURN_FALSE;
+ }
+
+ int_threshold = int_threshold * 32;
+
+ for (y = 0; y < dest_height; y++) {
+ for (x = 0; x < dest_width; x++) {
+ color_org = gdImageGetPixel (im_tmp, x, y);
+ median = (im_tmp->red[color_org] + im_tmp->green[color_org] + im_tmp->blue[color_org]) / 3;
+ if (median < int_threshold) {
+ color = black;
+ } else {
+ color = white;
+ }
+ gdImageSetPixel (im_dest, x, y, color);
+ }
+ }
+
+ gdImageDestroy (im_tmp );
+
+ gdImageWBMP(im_dest, black , dest);
+
+ fflush(dest);
+ fclose(dest);
+
+ gdImageDestroy(im_dest);
+
+ RETURN_TRUE;
+}
+/* }}} */
+#endif /* HAVE_GD_WBMP */
+
+#endif /* HAVE_LIBGD */
+
+/* Section Filters */
+#define PHP_GD_SINGLE_RES \
+ zval *SIM; \
+ gdImagePtr im_src; \
+ if (zend_parse_parameters(1 TSRMLS_CC, "r", &SIM) == FAILURE) { \
+ RETURN_FALSE; \
+ } \
+ ZEND_FETCH_RESOURCE(im_src, gdImagePtr, &SIM, -1, "Image", le_gd); \
+ if (im_src == NULL) { \
+ RETURN_FALSE; \
+ }
+
+static void php_image_filter_negate(INTERNAL_FUNCTION_PARAMETERS)
+{
+ PHP_GD_SINGLE_RES
+
+ if (gdImageNegate(im_src) == 1) {
+ RETURN_TRUE;
+ }
+
+ RETURN_FALSE;
+}
+
+static void php_image_filter_grayscale(INTERNAL_FUNCTION_PARAMETERS)
+{
+ PHP_GD_SINGLE_RES
+
+ if (gdImageGrayScale(im_src) == 1) {
+ RETURN_TRUE;
+ }
+
+ RETURN_FALSE;
+}
+
+static void php_image_filter_brightness(INTERNAL_FUNCTION_PARAMETERS)
+{
+ zval *SIM;
+ gdImagePtr im_src;
+ long brightness, tmp;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "zll", &SIM, &tmp, &brightness) == FAILURE) {
+ RETURN_FALSE;
+ }
+
+ ZEND_FETCH_RESOURCE(im_src, gdImagePtr, &SIM, -1, "Image", le_gd);
+
+ if (im_src == NULL) {
+ RETURN_FALSE;
+ }
+
+ if (gdImageBrightness(im_src, (int)brightness) == 1) {
+ RETURN_TRUE;
+ }
+
+ RETURN_FALSE;
+}
+
+static void php_image_filter_contrast(INTERNAL_FUNCTION_PARAMETERS)
+{
+ zval *SIM;
+ gdImagePtr im_src;
+ long contrast, tmp;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rll", &SIM, &tmp, &contrast) == FAILURE) {
+ RETURN_FALSE;
+ }
+
+ ZEND_FETCH_RESOURCE(im_src, gdImagePtr, &SIM, -1, "Image", le_gd);
+
+ if (im_src == NULL) {
+ RETURN_FALSE;
+ }
+
+ if (gdImageContrast(im_src, (int)contrast) == 1) {
+ RETURN_TRUE;
+ }
+
+ RETURN_FALSE;
+}
+
+static void php_image_filter_colorize(INTERNAL_FUNCTION_PARAMETERS)
+{
+ zval *SIM;
+ gdImagePtr im_src;
+ long r,g,b,tmp;
+ long a = 0;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rllll|l", &SIM, &tmp, &r, &g, &b, &a) == FAILURE) {
+ RETURN_FALSE;
+ }
+
+ ZEND_FETCH_RESOURCE(im_src, gdImagePtr, &SIM, -1, "Image", le_gd);
+
+ if (im_src == NULL) {
+ RETURN_FALSE;
+ }
+
+ if (gdImageColor(im_src, (int) r, (int) g, (int) b, (int) a) == 1) {
+ RETURN_TRUE;
+ }
+
+ RETURN_FALSE;
+}
+
+static void php_image_filter_edgedetect(INTERNAL_FUNCTION_PARAMETERS)
+{
+ PHP_GD_SINGLE_RES
+
+ if (gdImageEdgeDetectQuick(im_src) == 1) {
+ RETURN_TRUE;
+ }
+
+ RETURN_FALSE;
+}
+
+static void php_image_filter_emboss(INTERNAL_FUNCTION_PARAMETERS)
+{
+ PHP_GD_SINGLE_RES
+
+ if (gdImageEmboss(im_src) == 1) {
+ RETURN_TRUE;
+ }
+
+ RETURN_FALSE;
+}
+
+static void php_image_filter_gaussian_blur(INTERNAL_FUNCTION_PARAMETERS)
+{
+ PHP_GD_SINGLE_RES
+
+ if (gdImageGaussianBlur(im_src) == 1) {
+ RETURN_TRUE;
+ }
+
+ RETURN_FALSE;
+}
+
+static void php_image_filter_selective_blur(INTERNAL_FUNCTION_PARAMETERS)
+{
+ PHP_GD_SINGLE_RES
+
+ if (gdImageSelectiveBlur(im_src) == 1) {
+ RETURN_TRUE;
+ }
+
+ RETURN_FALSE;
+}
+
+static void php_image_filter_mean_removal(INTERNAL_FUNCTION_PARAMETERS)
+{
+ PHP_GD_SINGLE_RES
+
+ if (gdImageMeanRemoval(im_src) == 1) {
+ RETURN_TRUE;
+ }
+
+ RETURN_FALSE;
+}
+
+static void php_image_filter_smooth(INTERNAL_FUNCTION_PARAMETERS)
+{
+ zval *SIM;
+ long tmp;
+ gdImagePtr im_src;
+ double weight;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rld", &SIM, &tmp, &weight) == FAILURE) {
+ RETURN_FALSE;
+ }
+
+ ZEND_FETCH_RESOURCE(im_src, gdImagePtr, &SIM, -1, "Image", le_gd);
+
+ if (im_src == NULL) {
+ RETURN_FALSE;
+ }
+
+ if (gdImageSmooth(im_src, (float)weight)==1) {
+ RETURN_TRUE;
+ }
+
+ RETURN_FALSE;
+}
+
+static void php_image_filter_pixelate(INTERNAL_FUNCTION_PARAMETERS)
+{
+ zval *IM;
+ gdImagePtr im;
+ long tmp, blocksize;
+ zend_bool mode = 0;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rll|b", &IM, &tmp, &blocksize, &mode) == FAILURE) {
+ RETURN_FALSE;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+
+ if (im == NULL) {
+ RETURN_FALSE;
+ }
+
+ if (gdImagePixelate(im, (int) blocksize, (const unsigned int) mode)) {
+ RETURN_TRUE;
+ }
+
+ RETURN_FALSE;
+}
+
+/* {{{ proto bool imagefilter(resource src_im, int filtertype, [args] )
+ Applies Filter an image using a custom angle */
+PHP_FUNCTION(imagefilter)
+{
+ zval *tmp;
+
+ typedef void (*image_filter)(INTERNAL_FUNCTION_PARAMETERS);
+ long filtertype;
+ image_filter filters[] =
+ {
+ php_image_filter_negate ,
+ php_image_filter_grayscale,
+ php_image_filter_brightness,
+ php_image_filter_contrast,
+ php_image_filter_colorize,
+ php_image_filter_edgedetect,
+ php_image_filter_emboss,
+ php_image_filter_gaussian_blur,
+ php_image_filter_selective_blur,
+ php_image_filter_mean_removal,
+ php_image_filter_smooth,
+ php_image_filter_pixelate
+ };
+
+ if (ZEND_NUM_ARGS() < 2 || ZEND_NUM_ARGS() > IMAGE_FILTER_MAX_ARGS) {
+ WRONG_PARAM_COUNT;
+ } else if (zend_parse_parameters(2 TSRMLS_CC, "rl", &tmp, &filtertype) == FAILURE) {
+ return;
+ }
+
+ if (filtertype >= 0 && filtertype <= IMAGE_FILTER_MAX) {
+ filters[filtertype](INTERNAL_FUNCTION_PARAM_PASSTHRU);
+ }
+}
+/* }}} */
+
+/* {{{ proto resource imageconvolution(resource src_im, array matrix3x3, double div, double offset)
+ Apply a 3x3 convolution matrix, using coefficient div and offset */
+PHP_FUNCTION(imageconvolution)
+{
+ zval *SIM, *hash_matrix;
+ zval **var = NULL, **var2 = NULL;
+ gdImagePtr im_src = NULL;
+ double div, offset;
+ int nelem, i, j, res;
+ float matrix[3][3] = {{0,0,0}, {0,0,0}, {0,0,0}};
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "radd", &SIM, &hash_matrix, &div, &offset) == FAILURE) {
+ RETURN_FALSE;
+ }
+
+ ZEND_FETCH_RESOURCE(im_src, gdImagePtr, &SIM, -1, "Image", le_gd);
+
+ nelem = zend_hash_num_elements(Z_ARRVAL_P(hash_matrix));
+ if (nelem != 3) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "You must have 3x3 array");
+ RETURN_FALSE;
+ }
+
+ for (i=0; i<3; i++) {
+ if (zend_hash_index_find(Z_ARRVAL_P(hash_matrix), (i), (void **) &var) == SUCCESS && Z_TYPE_PP(var) == IS_ARRAY) {
+ if (Z_TYPE_PP(var) != IS_ARRAY || zend_hash_num_elements(Z_ARRVAL_PP(var)) != 3 ) {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "You must have 3x3 array");
+ RETURN_FALSE;
+ }
+
+ for (j=0; j<3; j++) {
+ if (zend_hash_index_find(Z_ARRVAL_PP(var), (j), (void **) &var2) == SUCCESS) {
+ SEPARATE_ZVAL(var2);
+ convert_to_double(*var2);
+ matrix[i][j] = Z_DVAL_PP(var2);
+ } else {
+ php_error_docref(NULL TSRMLS_CC, E_WARNING, "You must have a 3x3 matrix");
+ RETURN_FALSE;
+ }
+ }
+ }
+ }
+ res = gdImageConvolution(im_src, matrix, div, offset);
+
+ if (res) {
+ RETURN_TRUE;
+ } else {
+ RETURN_FALSE;
+ }
+}
+/* }}} */
+/* End section: Filters */
+
+#ifdef HAVE_GD_BUNDLED
+/* {{{ proto bool imageantialias(resource im, bool on)
+ Should antialiased functions used or not*/
+PHP_FUNCTION(imageantialias)
+{
+ zval *IM;
+ zend_bool alias;
+ gdImagePtr im;
+
+ if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rb", &IM, &alias) == FAILURE) {
+ return;
+ }
+
+ ZEND_FETCH_RESOURCE(im, gdImagePtr, &IM, -1, "Image", le_gd);
+ gdImageAntialias(im, alias);
+ RETURN_TRUE;
+}
+/* }}} */
+#endif
+
+/*
+ * Local variables:
+ * tab-width: 4
+ * c-basic-offset: 4
+ * End:
+ * vim600: sw=4 ts=4 fdm=marker
+ * vim<600: sw=4 ts=4
+ */