Annotation of embedaddon/php/ext/gd/gd_ctx.c, revision 1.1.1.3
1.1 misho 1: /*
2: +----------------------------------------------------------------------+
3: | PHP Version 5 |
4: +----------------------------------------------------------------------+
1.1.1.3 ! misho 5: | Copyright (c) 1997-2013 The PHP Group |
1.1 misho 6: +----------------------------------------------------------------------+
7: | This source file is subject to version 3.01 of the PHP license, |
8: | that is bundled with this package in the file LICENSE, and is |
9: | available through the world-wide-web at the following url: |
10: | http://www.php.net/license/3_01.txt |
11: | If you did not receive a copy of the PHP license and are unable to |
12: | obtain it through the world-wide-web, please send a note to |
13: | license@php.net so we can mail you a copy immediately. |
14: +----------------------------------------------------------------------+
15: | Authors: Stanislav Malyshev <stas@php.net> |
16: +----------------------------------------------------------------------+
17: */
18:
1.1.1.2 misho 19: /* $Id$ */
1.1 misho 20:
21: #include "php_gd.h"
22:
23: #define CTX_PUTC(c,ctx) ctx->putC(ctx, c)
24:
25: static void _php_image_output_putc(struct gdIOCtx *ctx, int c)
26: {
27: /* without the following downcast, the write will fail
28: * (i.e., will write a zero byte) for all
29: * big endian architectures:
30: */
31: unsigned char ch = (unsigned char) c;
32: TSRMLS_FETCH();
33: php_write(&ch, 1 TSRMLS_CC);
34: }
35:
36: static int _php_image_output_putbuf(struct gdIOCtx *ctx, const void* buf, int l)
37: {
38: TSRMLS_FETCH();
39: return php_write((void *)buf, l TSRMLS_CC);
40: }
41:
42: static void _php_image_output_ctxfree(struct gdIOCtx *ctx)
43: {
44: if(ctx) {
45: efree(ctx);
46: }
47: }
48:
1.1.1.2 misho 49: static void _php_image_stream_putc(struct gdIOCtx *ctx, int c) {
50: char ch = (char) c;
51: php_stream * stream = (php_stream *)ctx->data;
52: TSRMLS_FETCH();
53: php_stream_write(stream, &ch, 1);
54: }
55:
56: static int _php_image_stream_putbuf(struct gdIOCtx *ctx, const void* buf, int l)
57: {
58: php_stream * stream = (php_stream *)ctx->data;
59: TSRMLS_FETCH();
60: return php_stream_write(stream, (void *)buf, l);
61: }
62:
63: static void _php_image_stream_ctxfree(struct gdIOCtx *ctx)
64: {
65: TSRMLS_FETCH();
66:
67: if(ctx->data) {
68: php_stream_close((php_stream *) ctx->data);
69: ctx->data = NULL;
70: }
71: if(ctx) {
72: efree(ctx);
73: }
74: }
75:
1.1 misho 76: /* {{{ _php_image_output_ctx */
77: static void _php_image_output_ctx(INTERNAL_FUNCTION_PARAMETERS, int image_type, char *tn, void (*func_p)())
78: {
79: zval *imgind;
80: char *file = NULL;
81: int file_len = 0;
82: long quality, basefilter;
83: gdImagePtr im;
84: int argc = ZEND_NUM_ARGS();
85: int q = -1, i;
86: int f = -1;
1.1.1.2 misho 87: gdIOCtx *ctx = NULL;
88: zval *to_zval = NULL;
89: php_stream *stream;
1.1 misho 90:
91: /* The third (quality) parameter for Wbmp stands for the threshold when called from image2wbmp().
92: * The third (quality) parameter for Wbmp and Xbm stands for the foreground color index when called
93: * from imagey<type>().
94: */
95: if (image_type == PHP_GDIMG_TYPE_XBM) {
1.1.1.2 misho 96: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rp!|ll", &imgind, &file, &file_len, &quality, &basefilter) == FAILURE) {
1.1 misho 97: return;
98: }
99: } else {
100: /* PHP_GDIMG_TYPE_GIF
101: * PHP_GDIMG_TYPE_PNG
102: * PHP_GDIMG_TYPE_JPG
1.1.1.2 misho 103: * PHP_GDIMG_TYPE_WBM
104: * PHP_GDIMG_TYPE_WEBP
105: * */
106: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r|z/!ll", &imgind, &to_zval, &quality, &basefilter) == FAILURE) {
1.1 misho 107: return;
108: }
109: }
110:
111: ZEND_FETCH_RESOURCE(im, gdImagePtr, &imgind, -1, "Image", phpi_get_le_gd());
112:
1.1.1.2 misho 113: if (argc >= 3) {
114: q = quality; /* or colorindex for foreground of BW images (defaults to black) */
115: if (argc == 4) {
116: f = basefilter;
1.1 misho 117: }
118: }
119:
1.1.1.2 misho 120: if (argc > 1 && to_zval != NULL) {
121: if (Z_TYPE_P(to_zval) == IS_RESOURCE) {
122: php_stream_from_zval_no_verify(stream, &to_zval);
123: if (stream == NULL) {
124: RETURN_FALSE;
125: }
126: } else if (Z_TYPE_P(to_zval) == IS_STRING) {
127: stream = php_stream_open_wrapper(Z_STRVAL_P(to_zval), "wb", REPORT_ERRORS|IGNORE_PATH|IGNORE_URL_WIN, NULL);
128: if (stream == NULL) {
129: RETURN_FALSE;
130: }
131: } else {
132: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Invalid 2nd parameter, it must a filename or a stream");
1.1 misho 133: RETURN_FALSE;
134: }
135: } else {
136: ctx = emalloc(sizeof(gdIOCtx));
137: ctx->putC = _php_image_output_putc;
138: ctx->putBuf = _php_image_output_putbuf;
139: ctx->gd_free = _php_image_output_ctxfree;
140:
141: #if APACHE && defined(CHARSET_EBCDIC)
142: /* XXX this is unlikely to work any more thies@thieso.net */
143: /* This is a binary file already: avoid EBCDIC->ASCII conversion */
144: ap_bsetflag(php3_rqst->connection->client, B_EBCDIC2ASCII, 0);
145: #endif
146: }
147:
1.1.1.2 misho 148: if (!ctx) {
149: ctx = emalloc(sizeof(gdIOCtx));
150: ctx->putC = _php_image_stream_putc;
151: ctx->putBuf = _php_image_stream_putbuf;
152: ctx->gd_free = _php_image_stream_ctxfree;
153: ctx->data = (void *)stream;
154: }
155:
1.1 misho 156: switch(image_type) {
157: case PHP_GDIMG_CONVERT_WBM:
158: if(q<0||q>255) {
159: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Invalid threshold value '%d'. It must be between 0 and 255", q);
160: }
161: case PHP_GDIMG_TYPE_JPG:
162: (*func_p)(im, ctx, q);
163: break;
1.1.1.2 misho 164: case PHP_GDIMG_TYPE_WEBP:
165: if (q == -1) {
166: q = 80;
167: }
168: (*func_p)(im, ctx, q);
169: break;
1.1 misho 170: case PHP_GDIMG_TYPE_PNG:
171: (*func_p)(im, ctx, q, f);
172: break;
173: case PHP_GDIMG_TYPE_XBM:
174: case PHP_GDIMG_TYPE_WBM:
175: if (argc < 3) {
176: for(i=0; i < gdImageColorsTotal(im); i++) {
177: if(!gdImageRed(im, i) && !gdImageGreen(im, i) && !gdImageBlue(im, i)) break;
178: }
179: q = i;
180: }
181: if (image_type == PHP_GDIMG_TYPE_XBM) {
182: (*func_p)(im, file, q, ctx);
183: } else {
184: (*func_p)(im, q, ctx);
185: }
186: break;
187: default:
188: (*func_p)(im, ctx);
189: break;
190: }
191:
192: #if HAVE_LIBGD204
193: ctx->gd_free(ctx);
194: #else
195: ctx->free(ctx);
196: #endif
197:
1.1.1.2 misho 198: RETURN_TRUE;
1.1 misho 199: }
200: /* }}} */
201:
202: /*
203: * Local variables:
204: * tab-width: 4
205: * c-basic-offset: 4
206: * End:
207: * vim600: sw=4 ts=4 fdm=marker
208: * vim<600: sw=4 ts=4
209: */
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>