source: libcaca/trunk/caca-php/php_caca.c @ 3126

Last change on this file since 3126 was 3126, checked in by nico, 11 years ago
  • Add php bindings for 9 functions
  • Modify php bloc headers in samples programs
  • Add list of import/export formats in examples/drivers.php
File size: 50.7 KB
Line 
1/*
2 *  php-caca      Php binding for Libcaca
3 *  Copyright (c) 2008 Vion Nicolas <nico@picapo.net>
4 *
5 *
6 *  This library is free software. It comes without any warranty, to
7 *  the extent permitted by applicable law. You can redistribute it
8 *  and/or modify it under the terms of the Do What The Fuck You Want
9 *  To Public License, Version 2, as published by Sam Hocevar. See
10 *  http://sam.zoy.org/wtfpl/COPYING for more details.
11 */
12
13#ifdef HAVE_CONFIG_H
14#include "config.h"
15#endif
16
17#include "php.h"
18#include "php_caca.h"
19#include <gd.h>
20
21static function_entry caca_functions[] = {
22        PHP_FE(caca_create_event, NULL)
23        PHP_FE(caca_create_canvas, NULL)
24        PHP_FE(caca_set_canvas_size, NULL)
25        PHP_FE(caca_get_canvas_width, NULL)
26        PHP_FE(caca_get_canvas_height, NULL)
27        PHP_FE(caca_get_canvas_chars, NULL)
28        PHP_FE(caca_get_canvas_attrs, NULL)
29        PHP_FE(caca_rand, NULL)
30        PHP_FE(caca_get_version, NULL)
31        PHP_FE(caca_gotoxy, NULL)
32        PHP_FE(caca_get_cursor_x, NULL)
33        PHP_FE(caca_get_cursor_y, NULL)
34        PHP_FE(caca_put_char, NULL)
35        PHP_FE(caca_get_char, NULL)
36        PHP_FE(caca_put_str, NULL)
37        PHP_FE(caca_clear_canvas, NULL)
38        PHP_FE(caca_set_canvas_handle, NULL)
39        PHP_FE(caca_get_canvas_handle_x, NULL)
40        PHP_FE(caca_get_canvas_handle_y, NULL)
41        PHP_FE(caca_blit, NULL)
42        PHP_FE(caca_set_canvas_boundaries, NULL)
43        PHP_FE(caca_invert, NULL)
44        PHP_FE(caca_flip, NULL)
45        PHP_FE(caca_flop, NULL)
46        PHP_FE(caca_rotate_180, NULL)
47        PHP_FE(caca_rotate_left, NULL)
48        PHP_FE(caca_rotate_right, NULL)
49        PHP_FE(caca_stretch_left, NULL)
50        PHP_FE(caca_stretch_right, NULL)
51        PHP_FE(caca_get_attr, NULL)
52        PHP_FE(caca_set_attr, NULL)
53        PHP_FE(caca_put_attr, NULL)
54        PHP_FE(caca_set_color_ansi, NULL)
55        PHP_FE(caca_set_color_argb, NULL)
56        PHP_FE(caca_attr_to_ansi, NULL)
57        PHP_FE(caca_attr_to_ansi_fg, NULL)
58        PHP_FE(caca_attr_to_ansi_bg, NULL)
59        PHP_FE(caca_attr_to_rgb12_fg, NULL)
60        PHP_FE(caca_attr_to_rgb12_bg, NULL)
61        PHP_FE(caca_attr_to_argb64, NULL)
62        PHP_FE(caca_utf8_to_utf32, NULL)
63        PHP_FE(caca_utf32_to_utf8, NULL)
64        PHP_FE(caca_utf32_to_cp437, NULL)
65        PHP_FE(caca_cp437_to_utf32, NULL)
66        PHP_FE(caca_utf32_to_ascii, NULL)
67        PHP_FE(caca_utf32_is_fullwidth, NULL)
68        PHP_FE(caca_draw_line, NULL)
69        PHP_FE(caca_draw_polyline, NULL)
70        PHP_FE(caca_draw_thin_line, NULL)
71        PHP_FE(caca_draw_thin_polyline, NULL)
72        PHP_FE(caca_draw_circle, NULL)
73        PHP_FE(caca_draw_ellipse, NULL)
74        PHP_FE(caca_draw_thin_ellipse, NULL)
75        PHP_FE(caca_fill_ellipse, NULL)
76        PHP_FE(caca_draw_box, NULL)
77        PHP_FE(caca_draw_thin_box, NULL)
78        PHP_FE(caca_draw_cp437_box, NULL)
79        PHP_FE(caca_fill_box, NULL)
80        PHP_FE(caca_draw_triangle, NULL)
81        PHP_FE(caca_draw_thin_triangle, NULL)
82        PHP_FE(caca_fill_triangle, NULL)
83        PHP_FE(caca_get_frame_count, NULL)
84        PHP_FE(caca_set_frame, NULL)
85        PHP_FE(caca_set_frame_name, NULL)
86        PHP_FE(caca_create_frame, NULL)
87        PHP_FE(caca_free_frame, NULL)
88        PHP_FE(caca_create_dither, NULL)
89        PHP_FE(caca_create_dither_gd, NULL)
90        PHP_FE(caca_set_dither_palette, NULL)
91        PHP_FE(caca_set_dither_brightness, NULL)
92        PHP_FE(caca_get_dither_brightness, NULL)
93        PHP_FE(caca_set_dither_gamma, NULL)
94        PHP_FE(caca_get_dither_gamma, NULL)
95        PHP_FE(caca_set_dither_contrast, NULL)
96        PHP_FE(caca_get_dither_contrast, NULL)
97        PHP_FE(caca_set_dither_antialias, NULL)
98        PHP_FE(caca_get_dither_antialias_list, NULL)
99        PHP_FE(caca_get_dither_antialias, NULL)
100        PHP_FE(caca_set_dither_color, NULL)
101        PHP_FE(caca_get_dither_color_list, NULL)
102        PHP_FE(caca_get_dither_color, NULL)
103        PHP_FE(caca_set_dither_charset, NULL)
104        PHP_FE(caca_get_dither_charset_list, NULL)
105        PHP_FE(caca_get_dither_charset, NULL)
106        PHP_FE(caca_set_dither_algorithm, NULL)
107        PHP_FE(caca_get_dither_algorithm_list, NULL)
108        PHP_FE(caca_get_dither_algorithm, NULL)
109        PHP_FE(caca_dither_bitmap_gd, NULL)
110        PHP_FE(caca_get_font_list, NULL)
111        PHP_FE(caca_get_font_width, NULL)
112        PHP_FE(caca_get_font_height, NULL)
113        PHP_FE(caca_render_canvas, NULL)
114        PHP_FE(caca_canvas_set_figfont, NULL)
115        PHP_FE(caca_put_figchar, NULL)
116        PHP_FE(caca_flush_figlet, NULL)
117        PHP_FE(caca_file_open, NULL)
118        PHP_FE(caca_file_close, NULL)
119        PHP_FE(caca_file_tell, NULL)
120        PHP_FE(caca_file_read, NULL)
121        PHP_FE(caca_file_write, NULL)
122        PHP_FE(caca_file_gets, NULL)
123        PHP_FE(caca_file_eof, NULL)
124        PHP_FE(caca_import_string, NULL)
125        PHP_FE(caca_import_file, NULL)
126        PHP_FE(caca_get_import_list, NULL)
127        PHP_FE(caca_export_string, NULL)
128        PHP_FE(caca_get_export_list, NULL)
129        PHP_FE(caca_create_display, NULL)
130        PHP_FE(caca_create_display_with_driver, NULL)
131        PHP_FE(caca_get_display_driver_list, NULL)
132        PHP_FE(caca_get_display_driver, NULL)
133        PHP_FE(caca_set_display_driver, NULL)
134        PHP_FE(caca_get_canvas, NULL)
135        PHP_FE(caca_refresh_display, NULL)
136        PHP_FE(caca_set_display_time, NULL)
137        PHP_FE(caca_get_display_time, NULL)
138        PHP_FE(caca_get_display_width, NULL)
139        PHP_FE(caca_get_display_height, NULL)
140        PHP_FE(caca_set_display_title, NULL)
141        PHP_FE(caca_set_mouse, NULL)
142        PHP_FE(caca_set_cursor, NULL)
143        PHP_FE(caca_get_event, NULL)
144        PHP_FE(caca_get_mouse_x, NULL)
145        PHP_FE(caca_get_mouse_y, NULL)
146        PHP_FE(caca_get_event_type, NULL)
147        PHP_FE(caca_get_event_key_ch, NULL)
148        PHP_FE(caca_get_event_mouse_button, NULL)
149        PHP_FE(caca_get_event_mouse_x, NULL)
150        PHP_FE(caca_get_event_mouse_y, NULL)
151        PHP_FE(caca_get_event_resize_width, NULL)
152        PHP_FE(caca_get_event_resize_height, NULL)
153
154        {NULL, NULL, NULL}
155};
156
157zend_module_entry caca_module_entry = {
158#if ZEND_MODULE_API_NO >= 20010901
159        STANDARD_MODULE_HEADER,
160#endif
161        PHP_CACA_EXTNAME,
162        caca_functions,
163        PHP_MINIT(caca),
164        NULL,
165        NULL,
166        NULL,
167        PHP_MINFO(caca),
168#if ZEND_MODULE_API_NO >= 20010901
169        PHP_CACA_VERSION,
170#endif
171        STANDARD_MODULE_PROPERTIES
172};
173
174#ifdef COMPILE_DL_CACA
175ZEND_GET_MODULE(caca)
176#endif
177
178PHP_MINFO_FUNCTION(caca) {
179        php_info_print_table_start();
180        php_info_print_table_row(2, "Caca library version", caca_get_version());
181        php_info_print_table_end();
182}
183
184//-------- Caca's ressources destructors -----------//
185
186static void php_caca_canvas_dtor(zend_rsrc_list_entry *rsrc TSRMLS_DC) {
187        caca_free_canvas(rsrc->ptr);
188}
189
190static void php_caca_dither_dtor(zend_rsrc_list_entry *rsrc TSRMLS_DC) {
191        caca_free_dither(rsrc->ptr);
192}
193
194static void php_caca_font_dtor(zend_rsrc_list_entry *rsrc TSRMLS_DC) {
195        caca_free_font(rsrc->ptr);
196}
197
198static void php_caca_file_dtor(zend_rsrc_list_entry *rsrc TSRMLS_DC) {
199}
200
201static void php_caca_display_dtor(zend_rsrc_list_entry *rsrc TSRMLS_DC) {
202        caca_free_display(rsrc->ptr);
203}
204
205static void php_caca_event_dtor(zend_rsrc_list_entry *rsrc TSRMLS_DC) {
206        efree((caca_event_t *) rsrc->ptr);
207}
208
209//-------- Initialization ---------//
210
211PHP_MINIT_FUNCTION(caca) {
212
213        le_caca_canvas = zend_register_list_destructors_ex(php_caca_canvas_dtor, NULL, PHP_CACA_CANVAS_RES_NAME, module_number);
214        le_caca_dither = zend_register_list_destructors_ex(php_caca_dither_dtor, NULL, PHP_CACA_DITHER_RES_NAME, module_number);
215        le_caca_font = zend_register_list_destructors_ex(php_caca_font_dtor, NULL, PHP_CACA_FONT_RES_NAME, module_number);
216        le_caca_file = zend_register_list_destructors_ex(php_caca_file_dtor, NULL, PHP_CACA_FILE_RES_NAME, module_number);
217        le_caca_display = zend_register_list_destructors_ex(php_caca_display_dtor, NULL, PHP_CACA_DISPLAY_RES_NAME, module_number);
218        le_caca_event = zend_register_list_destructors_ex(php_caca_event_dtor, NULL, PHP_CACA_EVENT_RES_NAME, module_number);
219       
220        REGISTER_LONG_CONSTANT("CACA_BLACK", CACA_BLACK, CONST_CS | CONST_PERSISTENT);
221        REGISTER_LONG_CONSTANT("CACA_BLUE", CACA_BLUE, CONST_CS | CONST_PERSISTENT);
222        REGISTER_LONG_CONSTANT("CACA_GREEN", CACA_GREEN, CONST_CS | CONST_PERSISTENT);
223        REGISTER_LONG_CONSTANT("CACA_CYAN", CACA_CYAN, CONST_CS | CONST_PERSISTENT);
224        REGISTER_LONG_CONSTANT("CACA_RED", CACA_RED, CONST_CS | CONST_PERSISTENT);
225        REGISTER_LONG_CONSTANT("CACA_MAGENTA", CACA_MAGENTA, CONST_CS | CONST_PERSISTENT);
226        REGISTER_LONG_CONSTANT("CACA_BROWN", CACA_BROWN, CONST_CS | CONST_PERSISTENT);
227        REGISTER_LONG_CONSTANT("CACA_LIGHTGRAY", CACA_LIGHTGRAY, CONST_CS | CONST_PERSISTENT);
228        REGISTER_LONG_CONSTANT("CACA_DARKGRAY", CACA_DARKGRAY, CONST_CS | CONST_PERSISTENT);
229        REGISTER_LONG_CONSTANT("CACA_LIGHTBLUE", CACA_LIGHTBLUE, CONST_CS | CONST_PERSISTENT);
230        REGISTER_LONG_CONSTANT("CACA_LIGHTGREEN", CACA_LIGHTGREEN, CONST_CS | CONST_PERSISTENT);
231        REGISTER_LONG_CONSTANT("CACA_LIGHTCYAN", CACA_LIGHTCYAN, CONST_CS | CONST_PERSISTENT);
232        REGISTER_LONG_CONSTANT("CACA_LIGHTRED", CACA_LIGHTRED, CONST_CS | CONST_PERSISTENT);
233        REGISTER_LONG_CONSTANT("CACA_LIGHTMAGENTA", CACA_LIGHTMAGENTA, CONST_CS | CONST_PERSISTENT);
234        REGISTER_LONG_CONSTANT("CACA_YELLOW", CACA_YELLOW, CONST_CS | CONST_PERSISTENT);
235        REGISTER_LONG_CONSTANT("CACA_WHITE", CACA_WHITE, CONST_CS | CONST_PERSISTENT);
236        REGISTER_LONG_CONSTANT("CACA_DEFAULT", CACA_DEFAULT, CONST_CS | CONST_PERSISTENT);
237        REGISTER_LONG_CONSTANT("CACA_TRANSPARENT", CACA_TRANSPARENT, CONST_CS | CONST_PERSISTENT);
238        REGISTER_LONG_CONSTANT("CACA_BOLD", CACA_BOLD, CONST_CS | CONST_PERSISTENT);
239        REGISTER_LONG_CONSTANT("CACA_ITALICS", CACA_ITALICS, CONST_CS | CONST_PERSISTENT);
240        REGISTER_LONG_CONSTANT("CACA_UNDERLINE", CACA_UNDERLINE, CONST_CS | CONST_PERSISTENT);
241        REGISTER_LONG_CONSTANT("CACA_BLINK", CACA_BLINK, CONST_CS | CONST_PERSISTENT);
242
243        REGISTER_LONG_CONSTANT("CACA_EVENT_NONE", CACA_EVENT_NONE, CONST_CS | CONST_PERSISTENT);
244        REGISTER_LONG_CONSTANT("CACA_EVENT_KEY_PRESS", CACA_EVENT_KEY_PRESS, CONST_CS | CONST_PERSISTENT);
245        REGISTER_LONG_CONSTANT("CACA_EVENT_KEY_RELEASE", CACA_EVENT_KEY_RELEASE, CONST_CS | CONST_PERSISTENT);
246        REGISTER_LONG_CONSTANT("CACA_EVENT_MOUSE_PRESS", CACA_EVENT_MOUSE_PRESS, CONST_CS | CONST_PERSISTENT);
247        REGISTER_LONG_CONSTANT("CACA_EVENT_MOUSE_RELEASE", CACA_EVENT_MOUSE_RELEASE, CONST_CS | CONST_PERSISTENT);
248        REGISTER_LONG_CONSTANT("CACA_EVENT_MOUSE_MOTION", CACA_EVENT_MOUSE_MOTION, CONST_CS | CONST_PERSISTENT);
249        REGISTER_LONG_CONSTANT("CACA_EVENT_RESIZE", CACA_EVENT_RESIZE, CONST_CS | CONST_PERSISTENT);
250        REGISTER_LONG_CONSTANT("CACA_EVENT_QUIT", CACA_EVENT_QUIT, CONST_CS | CONST_PERSISTENT);
251        REGISTER_LONG_CONSTANT("CACA_EVENT_ANY", CACA_EVENT_ANY, CONST_CS | CONST_PERSISTENT);
252
253        REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_A", CACA_KEY_CTRL_A, CONST_CS | CONST_PERSISTENT);
254        REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_B", CACA_KEY_CTRL_B, CONST_CS | CONST_PERSISTENT);
255        REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_C", CACA_KEY_CTRL_C, CONST_CS | CONST_PERSISTENT);
256        REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_D", CACA_KEY_CTRL_D, CONST_CS | CONST_PERSISTENT);
257        REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_E", CACA_KEY_CTRL_E, CONST_CS | CONST_PERSISTENT);
258        REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_F", CACA_KEY_CTRL_F, CONST_CS | CONST_PERSISTENT);
259        REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_G", CACA_KEY_CTRL_G, CONST_CS | CONST_PERSISTENT);
260        REGISTER_LONG_CONSTANT("CACA_KEY_BACKSPACE", CACA_KEY_BACKSPACE, CONST_CS | CONST_PERSISTENT);
261        REGISTER_LONG_CONSTANT("CACA_KEY_TAB", CACA_KEY_TAB, CONST_CS | CONST_PERSISTENT);
262        REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_J", CACA_KEY_CTRL_J, CONST_CS | CONST_PERSISTENT);
263        REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_K", CACA_KEY_CTRL_K, CONST_CS | CONST_PERSISTENT);
264        REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_L", CACA_KEY_CTRL_L, CONST_CS | CONST_PERSISTENT);
265        REGISTER_LONG_CONSTANT("CACA_KEY_RETURN", CACA_KEY_RETURN, CONST_CS | CONST_PERSISTENT);
266        REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_N", CACA_KEY_CTRL_N, CONST_CS | CONST_PERSISTENT);
267        REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_O", CACA_KEY_CTRL_O, CONST_CS | CONST_PERSISTENT);
268        REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_P", CACA_KEY_CTRL_P, CONST_CS | CONST_PERSISTENT);
269        REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_Q", CACA_KEY_CTRL_Q, CONST_CS | CONST_PERSISTENT);
270        REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_R", CACA_KEY_CTRL_R, CONST_CS | CONST_PERSISTENT);
271        REGISTER_LONG_CONSTANT("CACA_KEY_PAUSE", CACA_KEY_PAUSE, CONST_CS | CONST_PERSISTENT);
272        REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_T", CACA_KEY_CTRL_T, CONST_CS | CONST_PERSISTENT);
273        REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_U", CACA_KEY_CTRL_U, CONST_CS | CONST_PERSISTENT);
274        REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_V", CACA_KEY_CTRL_V, CONST_CS | CONST_PERSISTENT);
275        REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_W", CACA_KEY_CTRL_W, CONST_CS | CONST_PERSISTENT);
276        REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_X", CACA_KEY_CTRL_X, CONST_CS | CONST_PERSISTENT);
277        REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_Y", CACA_KEY_CTRL_Y, CONST_CS | CONST_PERSISTENT);
278        REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_Z", CACA_KEY_CTRL_Z, CONST_CS | CONST_PERSISTENT);
279        REGISTER_LONG_CONSTANT("CACA_KEY_ESCAPE", CACA_KEY_ESCAPE, CONST_CS | CONST_PERSISTENT);
280        REGISTER_LONG_CONSTANT("CACA_KEY_DELETE", CACA_KEY_DELETE, CONST_CS | CONST_PERSISTENT);
281        REGISTER_LONG_CONSTANT("CACA_KEY_UP", CACA_KEY_UP, CONST_CS | CONST_PERSISTENT);
282        REGISTER_LONG_CONSTANT("CACA_KEY_DOWN", CACA_KEY_DOWN, CONST_CS | CONST_PERSISTENT);
283        REGISTER_LONG_CONSTANT("CACA_KEY_LEFT", CACA_KEY_LEFT, CONST_CS | CONST_PERSISTENT);
284        REGISTER_LONG_CONSTANT("CACA_KEY_RIGHT", CACA_KEY_RIGHT, CONST_CS | CONST_PERSISTENT);
285        REGISTER_LONG_CONSTANT("CACA_KEY_INSERT", CACA_KEY_INSERT, CONST_CS | CONST_PERSISTENT);
286        REGISTER_LONG_CONSTANT("CACA_KEY_HOME", CACA_KEY_HOME, CONST_CS | CONST_PERSISTENT);
287        REGISTER_LONG_CONSTANT("CACA_KEY_END", CACA_KEY_END, CONST_CS | CONST_PERSISTENT);
288        REGISTER_LONG_CONSTANT("CACA_KEY_PAGEUP", CACA_KEY_PAGEUP, CONST_CS | CONST_PERSISTENT);
289        REGISTER_LONG_CONSTANT("CACA_KEY_PAGEDOWN", CACA_KEY_PAGEDOWN, CONST_CS | CONST_PERSISTENT);
290        REGISTER_LONG_CONSTANT("CACA_KEY_F1", CACA_KEY_F1, CONST_CS | CONST_PERSISTENT);
291        REGISTER_LONG_CONSTANT("CACA_KEY_F2", CACA_KEY_F2, CONST_CS | CONST_PERSISTENT);
292        REGISTER_LONG_CONSTANT("CACA_KEY_F3", CACA_KEY_F3, CONST_CS | CONST_PERSISTENT);
293        REGISTER_LONG_CONSTANT("CACA_KEY_F4", CACA_KEY_F4, CONST_CS | CONST_PERSISTENT);
294        REGISTER_LONG_CONSTANT("CACA_KEY_F5", CACA_KEY_F5, CONST_CS | CONST_PERSISTENT);
295        REGISTER_LONG_CONSTANT("CACA_KEY_F6", CACA_KEY_F6, CONST_CS | CONST_PERSISTENT);
296        REGISTER_LONG_CONSTANT("CACA_KEY_F7", CACA_KEY_F7, CONST_CS | CONST_PERSISTENT);
297        REGISTER_LONG_CONSTANT("CACA_KEY_F8", CACA_KEY_F8, CONST_CS | CONST_PERSISTENT);
298        REGISTER_LONG_CONSTANT("CACA_KEY_F9", CACA_KEY_F9, CONST_CS | CONST_PERSISTENT);
299        REGISTER_LONG_CONSTANT("CACA_KEY_F10", CACA_KEY_F10, CONST_CS | CONST_PERSISTENT);
300        REGISTER_LONG_CONSTANT("CACA_KEY_F11", CACA_KEY_F11, CONST_CS | CONST_PERSISTENT);
301        REGISTER_LONG_CONSTANT("CACA_KEY_F12", CACA_KEY_F12, CONST_CS | CONST_PERSISTENT);
302        REGISTER_LONG_CONSTANT("CACA_KEY_F13", CACA_KEY_F13, CONST_CS | CONST_PERSISTENT);
303        REGISTER_LONG_CONSTANT("CACA_KEY_F14", CACA_KEY_F14, CONST_CS | CONST_PERSISTENT);
304        REGISTER_LONG_CONSTANT("CACA_KEY_F15", CACA_KEY_F15, CONST_CS | CONST_PERSISTENT);
305
306        return SUCCESS;
307}
308
309//---------- Some usefull macros ---------------//
310
311#define FETCH_CANVAS(canvas) \
312        zval *_zval; \
313        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) { \
314                RETURN_FALSE; \
315        } \
316        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
317
318#define FETCH_DISPLAY(display) \
319        zval *_zval; \
320        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) { \
321                RETURN_FALSE; \
322        } \
323        ZEND_FETCH_RESOURCE(display, caca_display_t*, &_zval, -1, PHP_CACA_DISPLAY_RES_NAME, le_caca_display);
324
325#define FETCH_EVENT(event) \
326        zval *_zval; \
327        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) { \
328                RETURN_FALSE; \
329        } \
330        ZEND_FETCH_RESOURCE(event, caca_event_t*, &_zval, -1, PHP_CACA_EVENT_RES_NAME, le_caca_event);
331
332#define FETCH_LONG(l) \
333        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "l", &l) == FAILURE) { \
334                RETURN_FALSE; \
335        }
336
337#define RETURN_CHAR(c) \
338        char *str = emalloc(2); \
339        str[0] = c; \
340        str[1] = '\0'; \
341        RETURN_STRING(str, 0);
342
343#define RETURN_SUCCESS(i) \
344        RETURN_BOOL((i) == 0);
345
346//---------- Some usefull functions --------------------//
347
348//Fetch external php resources such as gd resouces
349
350void *fetch_external_resource(zval *_zval, char const *type_name) {
351        int resource_id = _zval->value.lval;
352        int resource_type;
353        void *result = zend_list_find(resource_id, &resource_type);
354        if (!result)
355                return NULL;
356        char *resource_type_name = zend_rsrc_list_get_rsrc_type(resource_id);
357        return (strcmp(resource_type_name, type_name) == 0) ? result : NULL;
358}
359
360//Fetch buffer of pixels from gdImage
361
362void *gd_get_pixels(gdImage *img) {
363        if (!img->trueColor)
364                return NULL;
365
366        int line_size = img->sx * sizeof(int);
367        void *result = malloc(img->sy * line_size);
368        int j;         
369        for (j = 0; j < img->sy; j++)
370                memcpy(result + (j * line_size), (const void *) img->tpixels[j], line_size);
371        return result;
372}
373
374//------- PHP Binding's specific functions ----------//
375
376PHP_FUNCTION(caca_create_event) {
377        caca_event_t *event;
378        event = emalloc(sizeof(caca_event_t));
379        ZEND_REGISTER_RESOURCE(return_value, event, le_caca_event);
380}
381
382//------- Caca's functions ----------------//
383
384PHP_FUNCTION(caca_create_canvas) {
385        long width, height = 0;
386        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "ll", &width, &height) == FAILURE) {
387                RETURN_FALSE;
388        }
389        caca_canvas_t *canvas = caca_create_canvas(width, height);
390        if (!canvas) {
391                RETURN_FALSE;
392        }
393        ZEND_REGISTER_RESOURCE(return_value, canvas, le_caca_canvas);
394}
395
396PHP_FUNCTION(caca_set_canvas_size) {
397        zval *_zval;
398        long width, height = 0;
399        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rll", &_zval, &width, &height) == FAILURE) {
400                RETURN_FALSE;
401        }
402        caca_canvas_t *canvas;
403        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
404        RETURN_SUCCESS(caca_set_canvas_size(canvas, width, height));
405}
406
407PHP_FUNCTION(caca_get_canvas_width) {
408        caca_canvas_t *canvas;
409        FETCH_CANVAS(canvas);
410        RETURN_LONG(caca_get_canvas_width(canvas));
411}
412
413PHP_FUNCTION(caca_get_canvas_height) {
414        caca_canvas_t *canvas;
415        FETCH_CANVAS(canvas);
416        RETURN_LONG(caca_get_canvas_height(canvas));
417}
418
419PHP_FUNCTION(caca_get_canvas_chars) {
420        caca_canvas_t *canvas;
421        FETCH_CANVAS(canvas);
422        RETURN_STRING((char *) caca_get_canvas_chars(canvas), 1); //TODO: check that return \0 terminated string
423}
424
425PHP_FUNCTION(caca_get_canvas_attrs) {
426        caca_canvas_t *canvas;
427        FETCH_CANVAS(canvas);
428        RETURN_STRING((char *) caca_get_canvas_attrs(canvas), 1); //TODO: check that return \0 terminated string
429}
430
431PHP_FUNCTION(caca_rand) {
432        long min, max = 0;
433        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "ll", &min, &max) == FAILURE) {
434                RETURN_FALSE;
435        }
436        RETURN_LONG(caca_rand(min, max));
437}
438
439PHP_FUNCTION(caca_get_version) {
440        RETURN_STRING((char *) caca_get_version(), 1);
441}
442
443PHP_FUNCTION(caca_gotoxy) {
444        zval *_zval;
445        long x, y = 0;
446        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rll", &_zval, &x, &y) == FAILURE) {
447                RETURN_FALSE;
448        }
449        caca_canvas_t *canvas;
450        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
451        RETURN_SUCCESS(caca_gotoxy(canvas, x, y));
452}
453
454PHP_FUNCTION(caca_get_cursor_x) {
455        caca_canvas_t *canvas;
456        FETCH_CANVAS(canvas);
457        RETURN_LONG(caca_get_cursor_x(canvas));
458}
459
460PHP_FUNCTION(caca_get_cursor_y) {
461        caca_canvas_t *canvas;
462        FETCH_CANVAS(canvas);
463        RETURN_LONG(caca_get_cursor_y(canvas));
464}
465
466PHP_FUNCTION(caca_put_char) {
467        zval *_zval;
468        char *str;
469        long str_len, x, y = 0;
470        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlls", &_zval, &x, &y, &str, &str_len) == FAILURE) {
471                RETURN_FALSE;
472        }
473        caca_canvas_t *canvas;
474        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
475        if (str_len != 1) {
476                RETURN_FALSE;
477        }
478        RETURN_SUCCESS(caca_put_char(canvas, x, y, str[0]));
479}
480
481PHP_FUNCTION(caca_get_char) {
482        zval *_zval;
483        long x, y = 0;
484        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rll", &_zval, &x, &y) == FAILURE) {
485                RETURN_FALSE;
486        }
487        caca_canvas_t *canvas;
488        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
489        RETURN_CHAR(caca_get_char(canvas, x, y));
490}
491
492PHP_FUNCTION(caca_put_str) {
493        zval *_zval;
494        char *str;
495        long x, y, str_len = 0;
496        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlls", &_zval, &x, &y, &str, &str_len) == FAILURE) {
497                RETURN_FALSE;
498        }
499        caca_canvas_t *canvas;
500        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
501        RETURN_SUCCESS(caca_put_str(canvas, x, y, str));
502}
503
504PHP_FUNCTION(caca_clear_canvas) {
505        caca_canvas_t *canvas;
506        FETCH_CANVAS(canvas);
507        RETURN_LONG(caca_clear_canvas(canvas));
508}
509
510PHP_FUNCTION(caca_set_canvas_handle) {
511        zval *_zval;
512        long x, y = 0;
513        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rll", &_zval, &x, &y) == FAILURE) {
514                RETURN_FALSE;
515        }
516        caca_canvas_t *canvas;
517        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
518        RETURN_SUCCESS(caca_set_canvas_handle(canvas, x, y));
519}
520
521PHP_FUNCTION(caca_get_canvas_handle_x) {
522        caca_canvas_t *canvas;
523        FETCH_CANVAS(canvas);
524        RETURN_LONG(caca_get_canvas_handle_x(canvas));
525}
526
527PHP_FUNCTION(caca_get_canvas_handle_y) {
528        caca_canvas_t *canvas;
529        FETCH_CANVAS(canvas);
530        RETURN_LONG(caca_get_canvas_handle_y(canvas));
531}
532
533PHP_FUNCTION(caca_blit) {
534        zval *_zval1, *_zval2, *_zval3 = NULL;
535        long x, y = 0;
536        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rllr|r", &_zval1, &x, &y, &_zval2, &_zval3) == FAILURE) {
537                RETURN_FALSE;
538        }
539        caca_canvas_t *dst, *src, *mask = NULL;
540        ZEND_FETCH_RESOURCE(dst, caca_canvas_t*, &_zval1, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
541        ZEND_FETCH_RESOURCE(src, caca_canvas_t*, &_zval2, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
542        if (_zval3) {
543                ZEND_FETCH_RESOURCE(mask, caca_canvas_t*, &_zval3, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
544        }
545        RETURN_SUCCESS(caca_blit(dst, x, y, src, NULL));
546}
547
548PHP_FUNCTION(caca_set_canvas_boundaries) {
549        zval *_zval;
550        long x, y, width, height = 0;
551        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rllll", &_zval, &x, &y, &width, &height) == FAILURE) {
552                RETURN_FALSE;
553        }
554        caca_canvas_t *canvas;
555        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
556        RETURN_SUCCESS(caca_set_canvas_boundaries(canvas, x, y, width, height));
557}
558
559PHP_FUNCTION(caca_invert) {
560        caca_canvas_t *canvas;
561        FETCH_CANVAS(canvas);
562        RETURN_SUCCESS(caca_invert(canvas));
563}
564
565PHP_FUNCTION(caca_flip) {
566        caca_canvas_t *canvas;
567        FETCH_CANVAS(canvas);
568        RETURN_SUCCESS(caca_flip(canvas));
569}
570
571PHP_FUNCTION(caca_flop) {
572        caca_canvas_t *canvas;
573        FETCH_CANVAS(canvas);
574        RETURN_SUCCESS(caca_flop(canvas));
575}
576
577PHP_FUNCTION(caca_rotate_180) {
578        caca_canvas_t *canvas;
579        FETCH_CANVAS(canvas);
580        RETURN_SUCCESS(caca_rotate_180(canvas));
581}
582
583PHP_FUNCTION(caca_rotate_left) {
584        caca_canvas_t *canvas;
585        FETCH_CANVAS(canvas);
586        RETURN_SUCCESS(caca_rotate_left(canvas));
587}
588
589PHP_FUNCTION(caca_rotate_right) {
590        caca_canvas_t *canvas;
591        FETCH_CANVAS(canvas);
592        RETURN_SUCCESS(caca_rotate_right(canvas));
593}
594
595PHP_FUNCTION(caca_stretch_left) {
596        caca_canvas_t *canvas;
597        FETCH_CANVAS(canvas);
598        RETURN_SUCCESS(caca_stretch_left(canvas));
599}
600
601PHP_FUNCTION(caca_stretch_right) {
602        caca_canvas_t *canvas;
603        FETCH_CANVAS(canvas);
604        RETURN_SUCCESS(caca_stretch_right(canvas));
605}
606
607PHP_FUNCTION(caca_get_attr) {
608        zval *_zval;
609        long x, y = 0;
610        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rll", &_zval, &x, &y) == FAILURE) {
611                RETURN_FALSE;
612        }
613        caca_canvas_t *canvas;
614        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
615        RETURN_LONG(caca_get_attr(canvas, x, y));
616}
617
618PHP_FUNCTION(caca_set_attr) {
619        zval *_zval;
620        long attr = 0;
621        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rll", &_zval, &attr) == FAILURE) {
622                RETURN_FALSE;
623        }
624        caca_canvas_t *canvas;
625        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
626        RETURN_SUCCESS(caca_set_attr(canvas, attr));
627}
628
629PHP_FUNCTION(caca_put_attr) {
630        zval *_zval;
631        long x, y, attr = 0;
632        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlll", &_zval, &x, &y, &attr) == FAILURE) {
633                RETURN_FALSE;
634        }
635        caca_canvas_t *canvas;
636        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
637        RETURN_SUCCESS(caca_put_attr(canvas, x, y, attr));
638}
639
640PHP_FUNCTION(caca_set_color_ansi) {
641        zval *_zval;
642        long foreground, background = 0;
643        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rll", &_zval, &foreground, &background) == FAILURE) {
644                RETURN_FALSE;
645        }
646        caca_canvas_t *canvas;
647        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
648        RETURN_SUCCESS(caca_set_color_ansi(canvas, foreground, background));
649}
650
651PHP_FUNCTION(caca_set_color_argb) {
652        zval *_zval;
653        long foreground, background = 0;
654        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rll", &_zval, &foreground, &background) == FAILURE) {
655                RETURN_FALSE;
656        }
657        caca_canvas_t *canvas;
658        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
659        RETURN_SUCCESS(caca_set_color_argb(canvas, foreground, background));
660}
661
662PHP_FUNCTION(caca_attr_to_ansi) {
663        long l;
664        FETCH_LONG(l);
665        RETURN_LONG(caca_attr_to_ansi(l));
666}
667
668PHP_FUNCTION(caca_attr_to_ansi_fg) {
669        long l;
670        FETCH_LONG(l);
671        RETURN_LONG(caca_attr_to_ansi_fg(l));
672}
673
674PHP_FUNCTION(caca_attr_to_ansi_bg) {
675        long l;
676        FETCH_LONG(l);
677        RETURN_LONG(caca_attr_to_ansi_bg(l));
678}
679
680PHP_FUNCTION(caca_attr_to_rgb12_fg) {
681        long l;
682        FETCH_LONG(l);
683        RETURN_LONG(caca_attr_to_rgb12_fg(l));
684}
685
686PHP_FUNCTION(caca_attr_to_rgb12_bg) {
687        long l;
688        FETCH_LONG(l);
689        RETURN_LONG(caca_attr_to_rgb12_bg(l));
690}
691
692PHP_FUNCTION(caca_attr_to_argb64) {
693}
694
695PHP_FUNCTION(caca_utf8_to_utf32) {
696}
697
698PHP_FUNCTION(caca_utf32_to_utf8) {
699}
700
701PHP_FUNCTION(caca_utf32_to_cp437) {
702}
703
704PHP_FUNCTION(caca_cp437_to_utf32) {
705}
706
707PHP_FUNCTION(caca_utf32_to_ascii) {
708}
709
710PHP_FUNCTION(caca_utf32_is_fullwidth) {
711}
712
713PHP_FUNCTION(caca_draw_line) {
714        zval *_zval;
715        char *str;
716        long str_len, xa, ya, xb, yb = 0;
717        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlllls", &_zval, &xa, &ya, &xb, &yb, &str, &str_len) == FAILURE) {
718                RETURN_FALSE;
719        }
720        caca_canvas_t *canvas;
721        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
722        if (str_len != 1) {
723                RETURN_FALSE;
724        }
725        RETURN_SUCCESS(caca_draw_line(canvas, xa, ya, xb, yb, str[0]));
726}
727
728PHP_FUNCTION(caca_draw_polyline) {
729}
730
731PHP_FUNCTION(caca_draw_thin_line) {
732        zval *_zval;
733        long xa, ya, xb, yb = 0;
734        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rllll", &_zval, &xa, &ya, &xb, &yb) == FAILURE) {
735                RETURN_FALSE;
736        }
737        caca_canvas_t *canvas;
738        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
739        RETURN_SUCCESS(caca_draw_thin_line(canvas, xa, ya, xb, yb));
740}
741
742PHP_FUNCTION(caca_draw_thin_polyline) {
743}
744
745PHP_FUNCTION(caca_draw_circle) {
746        zval *_zval;
747        char *str;
748        long str_len, x, y, r = 0;
749        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rllls", &_zval, &x, &y, &r, &str, &str_len) == FAILURE) {
750                RETURN_FALSE;
751        }
752        caca_canvas_t *canvas;
753        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
754        if (str_len != 1) {
755                RETURN_FALSE;
756        }
757        RETURN_SUCCESS(caca_draw_circle(canvas, x, y, r, str[0]));
758}
759
760PHP_FUNCTION(caca_draw_ellipse) {
761        zval *_zval;
762        char *str;
763        long str_len, xa, ya, xb, yb = 0;
764        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlllls", &_zval, &xa, &ya, &xb, &yb, &str, &str_len) == FAILURE) {
765                RETURN_FALSE;
766        }
767        caca_canvas_t *canvas;
768        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
769        if (str_len != 1) {
770                RETURN_FALSE;
771        }
772        RETURN_SUCCESS(caca_draw_ellipse(canvas, xa, ya, xb, yb, str[0]));
773}
774
775PHP_FUNCTION(caca_draw_thin_ellipse) {
776        zval *_zval;
777        long xa, ya, xb, yb = 0;
778        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rllll", &_zval, &xa, &ya, &xb, &yb) == FAILURE) {
779                RETURN_FALSE;
780        }
781        caca_canvas_t *canvas;
782        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
783        RETURN_SUCCESS(caca_draw_thin_ellipse(canvas, xa, ya, xb, yb));
784}
785
786PHP_FUNCTION(caca_fill_ellipse) {
787        zval *_zval;
788        char *str;
789        long str_len, xa, ya, xb, yb = 0;
790        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlllls", &_zval, &xa, &ya, &xb, &yb, &str, &str_len) == FAILURE) {
791                RETURN_FALSE;
792        }
793        caca_canvas_t *canvas;
794        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
795        if (str_len != 1) {
796                RETURN_FALSE;
797        }
798        RETURN_SUCCESS(caca_fill_ellipse(canvas, xa, ya, xb, yb, str[0]));
799}
800
801PHP_FUNCTION(caca_draw_box) {
802        zval *_zval;
803        char *str;
804        long str_len, xa, ya, xb, yb = 0;
805        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlllls", &_zval, &xa, &ya, &xb, &yb, &str, &str_len) == FAILURE) {
806                RETURN_FALSE;
807        }
808        caca_canvas_t *canvas;
809        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
810        if (str_len != 1) {
811                RETURN_FALSE;
812        }
813        RETURN_SUCCESS(caca_draw_box(canvas, xa, ya, xb, yb, str[0]));
814}
815
816PHP_FUNCTION(caca_draw_thin_box) {
817        zval *_zval;
818        long xa, ya, xb, yb = 0;
819        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rllll", &_zval, &xa, &ya, &xb, &yb) == FAILURE) {
820                RETURN_FALSE;
821        }
822        caca_canvas_t *canvas;
823        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
824        RETURN_SUCCESS(caca_draw_thin_box(canvas, xa, ya, xb, yb));
825}
826
827PHP_FUNCTION(caca_draw_cp437_box) {
828        zval *_zval;
829        long xa, ya, xb, yb = 0;
830        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rllll", &_zval, &xa, &ya, &xb, &yb) == FAILURE) {
831                RETURN_FALSE;
832        }
833        caca_canvas_t *canvas;
834        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
835        RETURN_SUCCESS(caca_draw_cp437_box(canvas, xa, ya, xb, yb));
836}
837
838PHP_FUNCTION(caca_fill_box) {
839        zval *_zval;
840        char *str;
841        long str_len, xa, ya, xb, yb = 0;
842        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlllls", &_zval, &xa, &ya, &xb, &yb, &str, &str_len) == FAILURE) {
843                RETURN_FALSE;
844        }
845        caca_canvas_t *canvas;
846        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
847        if (str_len != 1) {
848                RETURN_FALSE;
849        }
850        RETURN_SUCCESS(caca_fill_box(canvas, xa, ya, xb, yb, str[0]));
851}
852
853PHP_FUNCTION(caca_draw_triangle) {
854        zval *_zval;
855        char *str;
856        long str_len, xa, ya, xb, yb, xc, yc = 0;
857        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlllllls", &_zval, &xa, &ya, &xb, &yb, &xc, &yc, &str, &str_len) == FAILURE) {
858                RETURN_FALSE;
859        }
860        caca_canvas_t *canvas;
861        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
862        if (str_len != 1) {
863                RETURN_FALSE;
864        }
865        RETURN_SUCCESS(caca_draw_triangle(canvas, xa, ya, xb, yb, xc, yc, str[0]));
866}
867
868PHP_FUNCTION(caca_draw_thin_triangle) {
869        zval *_zval;
870        long xa, ya, xb, yb, xc, yc = 0;
871        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rllllll", &_zval, &xa, &ya, &xb, &yb, &xc, &yc) == FAILURE) {
872                RETURN_FALSE;
873        }
874        caca_canvas_t *canvas;
875        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
876        RETURN_SUCCESS(caca_draw_thin_triangle(canvas, xa, ya, xb, yb, xc, yc));
877}
878
879PHP_FUNCTION(caca_fill_triangle) {
880        zval *_zval;
881        char *str;
882        long str_len, xa, ya, xb, yb, xc, yc = 0;
883        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlllllls", &_zval, &xa, &ya, &xb, &yb, &xc, &yc, &str, &str_len) == FAILURE) {
884                RETURN_FALSE;
885        }
886        caca_canvas_t *canvas;
887        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
888        if (str_len != 1) {
889                RETURN_FALSE;
890        }
891        RETURN_SUCCESS(caca_fill_triangle(canvas, xa, ya, xb, yb, xc, yc, str[0]));
892}
893
894PHP_FUNCTION(caca_get_frame_count) {
895        zval *_zval;
896        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) {
897                RETURN_FALSE;
898        }
899        caca_canvas_t *canvas;
900        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
901        RETURN_LONG(caca_get_canvas_count(canvas));
902}
903
904PHP_FUNCTION(caca_set_frame) {
905        zval *_zval;
906        long id;
907        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl", &_zval, &id) == FAILURE) {
908                RETURN_FALSE;
909        }
910        caca_canvas_t *canvas;
911        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
912        RETURN_SUCCESS(caca_set_frame(canvas, id));
913}
914
915PHP_FUNCTION(caca_set_frame_name) {
916        zval *_zval;
917        char *str;
918        long str_len;
919        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rs", &_zval, &str, &str_len) == FAILURE) {
920                RETURN_FALSE;
921        }
922        caca_canvas_t *canvas;
923        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
924        RETURN_SUCCESS(caca_set_frame_name(canvas, str));
925}
926
927PHP_FUNCTION(caca_create_frame) {
928        zval *_zval;
929        long id;
930        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl", &_zval, &id) == FAILURE) {
931                RETURN_FALSE;
932        }
933        caca_canvas_t *canvas;
934        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
935        RETURN_SUCCESS(caca_create_frame(canvas, id));
936}
937
938PHP_FUNCTION(caca_free_frame) {
939        zval *_zval;
940        long id;
941        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl", &_zval, &id) == FAILURE) {
942                RETURN_FALSE;
943        }
944        caca_canvas_t *canvas;
945        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
946        RETURN_SUCCESS(caca_free_frame(canvas, id));
947}
948
949PHP_FUNCTION(caca_create_dither) {
950        long bpp, w, h, pitch, rmask, gmask, bmask, amask = 0;
951        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "llllllll", &bpp, &w, &h, &pitch, &rmask, &gmask, &bmask, &amask) == FAILURE) {
952                RETURN_FALSE;
953        }
954        caca_dither_t *dither = caca_create_dither(bpp, w, h, pitch, rmask, gmask, bmask, amask);
955        ZEND_REGISTER_RESOURCE(return_value, dither, le_caca_dither);
956}
957
958PHP_FUNCTION(caca_create_dither_gd) {
959        zval *_zval;
960        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) {
961                RETURN_FALSE;
962        }
963
964        gdImage *img = fetch_external_resource(_zval, "gd");
965        if (!img | !img->trueColor) {
966                RETURN_FALSE;
967        }
968        caca_dither_t *dither = caca_create_dither(sizeof(int) * 8, img->sx, img->sy, img->sx * sizeof(int), 0x00ff0000, 0x0000ff00, 0x000000ff, 0x00000000);
969        ZEND_REGISTER_RESOURCE(return_value, dither, le_caca_dither);
970}
971
972PHP_FUNCTION(caca_set_dither_palette) {
973}
974
975PHP_FUNCTION(caca_set_dither_brightness) {
976        zval *_zval;
977        double value;
978        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rd", &_zval, &value) == FAILURE) {
979                RETURN_FALSE;
980        }
981        caca_dither_t *dither;
982        ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither);
983        RETURN_SUCCESS(caca_set_dither_brightness(dither, value));
984}
985
986PHP_FUNCTION(caca_get_dither_brightness) {
987        zval *_zval;
988        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) {
989                RETURN_FALSE;
990        }
991        caca_dither_t *dither;
992        ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither);
993        RETURN_DOUBLE(caca_get_dither_brightness(dither));
994}
995
996PHP_FUNCTION(caca_set_dither_gamma) {
997        zval *_zval;
998        double value;
999        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rd", &_zval, &value) == FAILURE) {
1000                RETURN_FALSE;
1001        }
1002        caca_dither_t *dither;
1003        ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither);
1004        RETURN_SUCCESS(caca_set_dither_gamma(dither, value));
1005}
1006
1007PHP_FUNCTION(caca_get_dither_gamma) {
1008        zval *_zval;
1009        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) {
1010                RETURN_FALSE;
1011        }
1012        caca_dither_t *dither;
1013        ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither);
1014        RETURN_DOUBLE(caca_get_dither_gamma(dither));
1015}
1016
1017PHP_FUNCTION(caca_set_dither_contrast) {
1018        zval *_zval;
1019        double value;
1020        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rd", &_zval, &value) == FAILURE) {
1021                RETURN_FALSE;
1022        }
1023        caca_dither_t *dither;
1024        ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither);
1025        RETURN_SUCCESS(caca_set_dither_contrast(dither, value));
1026}
1027
1028PHP_FUNCTION(caca_get_dither_contrast) {
1029        zval *_zval;
1030        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) {
1031                RETURN_FALSE;
1032        }
1033        caca_dither_t *dither;
1034        ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither);
1035        RETURN_DOUBLE(caca_get_dither_contrast(dither));
1036}
1037
1038PHP_FUNCTION(caca_set_dither_antialias) {
1039        zval *_zval;
1040        int str_len;
1041        char *str;
1042        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rs", &_zval, &str, &str_len) == FAILURE) {
1043                RETURN_FALSE;
1044        }
1045        caca_dither_t *dither;
1046        ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither);
1047        RETURN_SUCCESS(caca_set_dither_antialias(dither, str));
1048}
1049
1050PHP_FUNCTION(caca_get_dither_antialias_list) {
1051}
1052
1053PHP_FUNCTION(caca_get_dither_antialias) {
1054        zval *_zval;
1055        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) {
1056                RETURN_FALSE;
1057        }
1058        caca_dither_t *dither;
1059        ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither);
1060        RETURN_STRING((char *) caca_get_dither_antialias(dither), 1);
1061}
1062
1063PHP_FUNCTION(caca_set_dither_color) {
1064        zval *_zval;
1065        int str_len;
1066        char *str;
1067        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rs", &_zval, &str, &str_len) == FAILURE) {
1068                RETURN_FALSE;
1069        }
1070        caca_dither_t *dither;
1071        ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither);
1072        RETURN_SUCCESS(caca_set_dither_color(dither, str));
1073}
1074
1075PHP_FUNCTION(caca_get_dither_color_list) {
1076        zval *_zval;
1077        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) {
1078                RETURN_FALSE;
1079        }
1080        caca_dither_t *dither;
1081        ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither);
1082
1083        char const * const *list = caca_get_dither_antialias_list(dither);
1084        int i;
1085        array_init(return_value);       
1086        for(i = 0; list[i]; i += 2)
1087                add_assoc_string(return_value, (char*) list[i], (char*) list[i + 1], 1);
1088}
1089
1090PHP_FUNCTION(caca_get_dither_color) {
1091        zval *_zval;
1092        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) {
1093                RETURN_FALSE;
1094        }
1095        caca_dither_t *dither;
1096        ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither);
1097        RETURN_STRING((char *) caca_get_dither_color(dither), 1);
1098}
1099
1100PHP_FUNCTION(caca_set_dither_charset) {
1101        zval *_zval;
1102        int str_len;
1103        char *str;
1104        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rs", &_zval, &str, &str_len) == FAILURE) {
1105                RETURN_FALSE;
1106        }
1107        caca_dither_t *dither;
1108        ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither);
1109        RETURN_SUCCESS(caca_set_dither_charset(dither, str));
1110}
1111
1112PHP_FUNCTION(caca_get_dither_charset_list) {
1113        zval *_zval;
1114        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) {
1115                RETURN_FALSE;
1116        }
1117        caca_dither_t *dither;
1118        ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither);
1119
1120        char const * const *list = caca_get_dither_charset_list(dither);
1121        int i;
1122        array_init(return_value);       
1123        for(i = 0; list[i]; i += 2)
1124                add_assoc_string(return_value, (char*) list[i], (char*) list[i + 1], 1);
1125}
1126
1127PHP_FUNCTION(caca_get_dither_charset) {
1128        zval *_zval;
1129        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) {
1130                RETURN_FALSE;
1131        }
1132        caca_dither_t *dither;
1133        ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither);
1134        RETURN_STRING((char *) caca_get_dither_charset(dither), 1);
1135}
1136
1137PHP_FUNCTION(caca_set_dither_algorithm) {
1138        zval *_zval;
1139        int str_len;
1140        char *str;
1141        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rs", &_zval, &str, &str_len) == FAILURE) {
1142                RETURN_FALSE;
1143        }
1144        caca_dither_t *dither;
1145        ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither);
1146        RETURN_SUCCESS(caca_set_dither_algorithm(dither, str));
1147}
1148
1149PHP_FUNCTION(caca_get_dither_algorithm_list) {
1150        zval *_zval;
1151        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) {
1152                RETURN_FALSE;
1153        }
1154        caca_dither_t *dither;
1155        ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither);
1156
1157        char const * const *list = caca_get_dither_algorithm_list(dither);
1158        int i;
1159        array_init(return_value);       
1160        for(i = 0; list[i]; i += 2)
1161                add_assoc_string(return_value, (char*) list[i], (char*) list[i + 1], 1);
1162}
1163
1164PHP_FUNCTION(caca_get_dither_algorithm) {
1165        zval *_zval;
1166        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) {
1167                RETURN_FALSE;
1168        }
1169        caca_dither_t *dither;
1170        ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither);
1171        RETURN_STRING((char *) caca_get_dither_algorithm(dither), 1);
1172}
1173
1174PHP_FUNCTION(caca_dither_bitmap_gd) {
1175        zval *_zval1, *_zval2, *_zval3;
1176        long x, y, w, h = 0;
1177        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rllllrr", &_zval1, &x, &y, &w, &h, &_zval2, &_zval3) == FAILURE) {
1178                RETURN_FALSE;
1179        }
1180
1181        caca_canvas_t *canvas;
1182        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval1, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
1183        caca_dither_t *dither;
1184        ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval2, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither);
1185
1186        gdImage *img = fetch_external_resource(_zval3, "gd");
1187        if (!img) {
1188                RETURN_FALSE;
1189        }
1190
1191        void *pixels = gd_get_pixels(img);
1192        if (!pixels) {
1193                RETURN_FALSE;
1194        }
1195
1196        caca_dither_bitmap(canvas, x, y, w, h, dither, pixels);
1197        free(pixels);
1198        RETURN_TRUE;
1199}
1200
1201PHP_FUNCTION(caca_get_font_list) {
1202        char const * const *list = caca_get_font_list();
1203        int i;
1204        array_init(return_value);       
1205        for(i = 0; list[i]; i += 1)
1206                add_next_index_string(return_value, (char*) list[i], 1);
1207}
1208
1209PHP_FUNCTION(caca_get_font_width) {
1210        zval *_zval;
1211        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) {
1212                RETURN_FALSE;
1213        }
1214        caca_font_t *font;
1215        ZEND_FETCH_RESOURCE(font, caca_font_t*, &_zval, -1, PHP_CACA_FONT_RES_NAME, le_caca_font);
1216        RETURN_LONG(caca_get_font_width(font));
1217}
1218
1219PHP_FUNCTION(caca_get_font_height) {
1220        zval *_zval;
1221        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) {
1222                RETURN_FALSE;
1223        }
1224        caca_font_t *font;
1225        ZEND_FETCH_RESOURCE(font, caca_font_t*, &_zval, -1, PHP_CACA_FONT_RES_NAME, le_caca_font);
1226        RETURN_LONG(caca_get_font_height(font));
1227}
1228
1229PHP_FUNCTION(caca_render_canvas) {
1230}
1231
1232PHP_FUNCTION(caca_canvas_set_figfont) {
1233        zval *_zval;
1234        char *font;
1235        long font_len;
1236        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rs", &_zval, &font, &font_len) == FAILURE) {
1237                RETURN_FALSE;
1238        }
1239        caca_canvas_t *canvas;
1240        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
1241        RETURN_SUCCESS(caca_canvas_set_figfont(canvas, font));
1242}
1243
1244PHP_FUNCTION(caca_put_figchar) {
1245}
1246
1247PHP_FUNCTION(caca_flush_figlet) {
1248        zval *_zval;
1249        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) {
1250                RETURN_FALSE;
1251        }
1252        caca_canvas_t *canvas;
1253        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
1254        RETURN_SUCCESS(caca_flush_figlet(canvas));
1255}
1256
1257PHP_FUNCTION(caca_file_open) {
1258        char *path, *mode;
1259        long path_len, mode_len;
1260        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "ss", &path, &path_len, &mode, &mode_len) == FAILURE) {
1261                RETURN_FALSE;
1262        }
1263        caca_file_t *file = caca_file_open(path, mode);
1264        ZEND_REGISTER_RESOURCE(return_value, file, le_caca_file);
1265}
1266
1267PHP_FUNCTION(caca_file_close) {
1268        zval *_zval;
1269        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) {
1270                RETURN_FALSE;
1271        }
1272        caca_file_t *file;
1273        ZEND_FETCH_RESOURCE(file, caca_file_t*, &_zval, -1, PHP_CACA_FILE_RES_NAME, le_caca_file);
1274        //TODO: check that file was not already closed
1275        RETURN_SUCCESS(caca_file_close(file));
1276}
1277
1278PHP_FUNCTION(caca_file_tell) {
1279        zval *_zval;
1280        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) {
1281                RETURN_FALSE;
1282        }
1283        caca_file_t *file;
1284        ZEND_FETCH_RESOURCE(file, caca_file_t*, &_zval, -1, PHP_CACA_FILE_RES_NAME, le_caca_file);
1285        RETURN_LONG(caca_file_tell(file));
1286}
1287
1288PHP_FUNCTION(caca_file_read) {
1289}
1290
1291PHP_FUNCTION(caca_file_write) {
1292}
1293
1294PHP_FUNCTION(caca_file_gets) {
1295}
1296
1297PHP_FUNCTION(caca_file_eof) {
1298        zval *_zval;
1299        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) {
1300                RETURN_FALSE;
1301        }
1302        caca_file_t *file;
1303        ZEND_FETCH_RESOURCE(file, caca_file_t*, &_zval, -1, PHP_CACA_FILE_RES_NAME, le_caca_file);
1304        RETURN_BOOL(caca_file_eof(file) != 0);
1305}
1306
1307PHP_FUNCTION(caca_import_string) {
1308        zval *_zval;
1309        char *src, *format;
1310        long src_len, format_len = 0;
1311        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rss", &_zval, &src, &src_len, &format, &format_len) == FAILURE) {
1312                RETURN_FALSE;
1313        }
1314        caca_canvas_t *canvas;
1315        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
1316
1317        RETURN_LONG(caca_import_memory(canvas, src, src_len, format));
1318}
1319
1320PHP_FUNCTION(caca_import_file) {
1321        zval *_zval;
1322        char *filename, *format;
1323        long filename_len, format_len = 0;
1324        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rss", &_zval, &filename, &filename_len, &format, &format_len) == FAILURE) {
1325                RETURN_FALSE;
1326        }
1327        caca_canvas_t *canvas;
1328        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
1329
1330        RETURN_LONG(caca_import_file(canvas, filename, format));
1331}
1332
1333PHP_FUNCTION(caca_get_import_list) {
1334        char const * const *list = caca_get_import_list();
1335        int i;
1336        array_init(return_value);       
1337        for(i = 0; list[i]; i += 2)
1338                add_assoc_string(return_value, (char*) list[i], (char*) list[i + 1], 1);
1339}
1340
1341PHP_FUNCTION(caca_export_string) {
1342        zval *_zval;
1343        char *type;
1344        long type_len;
1345        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rs", &_zval, &type, &type_len) == FAILURE) {
1346                RETURN_FALSE;
1347        }
1348        caca_canvas_t *canvas;
1349        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
1350
1351        void *buffer;
1352        size_t len;
1353        buffer = caca_export_memory(canvas, type, &len);
1354        if (!buffer) {
1355                RETURN_FALSE;
1356        }
1357        return_value->type = IS_STRING;
1358        return_value->value.str.len = len;
1359        return_value->value.str.val = emalloc(len);
1360        memcpy(return_value->value.str.val, buffer, len);
1361        free(buffer);
1362}
1363
1364PHP_FUNCTION(caca_get_export_list) {
1365        char const * const *list = caca_get_export_list();
1366        int i;
1367        array_init(return_value);       
1368        for(i = 0; list[i]; i += 2)
1369                add_assoc_string(return_value, (char*) list[i], (char*) list[i + 1], 1);
1370}
1371
1372PHP_FUNCTION(caca_create_display) {
1373        caca_canvas_t *canvas;
1374        FETCH_CANVAS(canvas);
1375
1376        caca_display_t *display = caca_create_display(canvas);
1377        ZEND_REGISTER_RESOURCE(return_value, display, le_caca_display);
1378}
1379
1380PHP_FUNCTION(caca_create_display_with_driver) {
1381        zval *_zval;
1382        char *str;
1383        long str_len = 0;
1384        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rs", &_zval, &str, &str_len) == FAILURE) {
1385                RETURN_FALSE;
1386        }
1387        caca_canvas_t *canvas;
1388        ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas);
1389
1390        caca_display_t *display = caca_create_display_with_driver(canvas, str);
1391        if (!display) {
1392                RETURN_FALSE;
1393        }
1394        ZEND_REGISTER_RESOURCE(return_value, display, le_caca_display);
1395}
1396
1397PHP_FUNCTION(caca_get_display_driver_list) {
1398        char const * const *list = caca_get_display_driver_list();
1399        int i;
1400        array_init(return_value);       
1401        for(i = 0; list[i]; i += 2)
1402                add_assoc_string(return_value, (char*) list[i], (char*) list[i + 1], 1);
1403}
1404
1405PHP_FUNCTION(caca_get_display_driver) {
1406        zval *_zval;
1407        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) {
1408                RETURN_FALSE;
1409        }
1410        caca_display_t *display;
1411        ZEND_FETCH_RESOURCE(display, caca_display_t*, &_zval, -1, PHP_CACA_DISPLAY_RES_NAME, le_caca_display);
1412        RETURN_STRING((char *) caca_get_display_driver(display), 1);
1413}
1414
1415PHP_FUNCTION(caca_set_display_driver) {
1416        zval *_zval;
1417        char *str;
1418        long str_len;
1419        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rs", &_zval, &str, &str_len) == FAILURE) {
1420                RETURN_FALSE;
1421        }
1422        caca_display_t *display;
1423        ZEND_FETCH_RESOURCE(display, caca_display_t*, &_zval, -1, PHP_CACA_DISPLAY_RES_NAME, le_caca_display);
1424        RETURN_SUCESS(caca_set_display_driver(display, str));
1425}
1426
1427PHP_FUNCTION(caca_get_canvas) {
1428        zval *_zval;
1429        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) {
1430                RETURN_FALSE;
1431        }
1432        caca_display_t *display;
1433        ZEND_FETCH_RESOURCE(display, caca_display_t*, &_zval, -1, PHP_CACA_DISPLAY_RES_NAME, le_caca_display);
1434        caca_canvas_t *canvas = caca_get_canvas(display);
1435        ZEND_REGISTER_RESOURCE(return_value, canvas, le_caca_canvas);
1436}
1437
1438PHP_FUNCTION(caca_refresh_display) {
1439        caca_display_t *display;
1440        FETCH_DISPLAY(display);
1441        RETURN_SUCCESS(caca_refresh_display(display));
1442}
1443
1444PHP_FUNCTION(caca_set_display_time) {
1445        zval *_zval;
1446        long value = 0;
1447        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl", &_zval, &value) == FAILURE) {
1448                RETURN_FALSE;
1449        }
1450        caca_display_t *display;
1451        ZEND_FETCH_RESOURCE(display, caca_display_t*, &_zval, -1, PHP_CACA_DISPLAY_RES_NAME, le_caca_display);
1452        RETURN_SUCCESS(caca_set_display_time(display, value));
1453}
1454
1455PHP_FUNCTION(caca_get_display_time) {
1456        caca_display_t *display;
1457        FETCH_DISPLAY(display);
1458        RETURN_LONG(caca_get_display_time(display));
1459}
1460
1461PHP_FUNCTION(caca_get_display_width) {
1462        caca_display_t *display;
1463        FETCH_DISPLAY(display);
1464        RETURN_LONG(caca_get_display_width(display));
1465}
1466
1467PHP_FUNCTION(caca_get_display_height) {
1468        caca_display_t *display;
1469        FETCH_DISPLAY(display);
1470        RETURN_LONG(caca_get_display_height(display));
1471}
1472
1473PHP_FUNCTION(caca_set_display_title) {
1474        zval *_zval;
1475        char *str;
1476        long str_len = 0;
1477        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rs", &_zval, &str, &str_len) == FAILURE) {
1478                RETURN_FALSE;
1479        }
1480        caca_display_t *display;
1481        ZEND_FETCH_RESOURCE(display, caca_display_t*, &_zval, -1, PHP_CACA_DISPLAY_RES_NAME, le_caca_display);
1482        RETURN_SUCCESS(caca_set_display(display, str));
1483}
1484
1485PHP_FUNCTION(caca_set_mouse) {
1486        zval *_zval;
1487        long value = 0;
1488        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl", &_zval, &value) == FAILURE) {
1489                RETURN_FALSE;
1490        }
1491        caca_display_t *display;
1492        ZEND_FETCH_RESOURCE(display, caca_display_t*, &_zval, -1, PHP_CACA_DISPLAY_RES_NAME, le_caca_display);
1493        RETURN_SUCCESS(caca_set_mouse(display, value));
1494}
1495
1496PHP_FUNCTION(caca_set_cursor) {
1497        zval *_zval;
1498        long value = 0;
1499        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl", &_zval, &value) == FAILURE) {
1500                RETURN_FALSE;
1501        }
1502        caca_display_t *display;
1503        ZEND_FETCH_RESOURCE(display, caca_display_t*, &_zval, -1, PHP_CACA_DISPLAY_RES_NAME, le_caca_display);
1504        RETURN_SUCCESS(caca_set_cursor(display, value));
1505}
1506
1507PHP_FUNCTION(caca_get_event) {
1508        zval *_zval1, *_zval2 = NULL;
1509        long g, aa = 0;
1510        if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl|rl", &_zval1, &g, &_zval2, &aa) == FAILURE) {
1511                RETURN_FALSE;
1512        }
1513        caca_display_t *display;
1514        ZEND_FETCH_RESOURCE(display, caca_display_t*, &_zval1, -1, PHP_CACA_DISPLAY_RES_NAME, le_caca_display);
1515
1516        caca_event_t *event = NULL;
1517        if (_zval2) {
1518                ZEND_FETCH_RESOURCE(event, caca_event_t*, &_zval2, -1, PHP_CACA_EVENT_RES_NAME, le_caca_event);
1519        }
1520        RETURN_LONG(caca_get_event(display, g, event, aa));
1521}
1522
1523PHP_FUNCTION(caca_get_mouse_x) {
1524        caca_display_t *display;
1525        FETCH_DISPLAY(display);
1526        RETURN_LONG(caca_get_mouse_x(display));
1527}
1528
1529PHP_FUNCTION(caca_get_mouse_y) {
1530        caca_display_t *display;
1531        FETCH_DISPLAY(display);
1532        RETURN_LONG(caca_get_mouse_y(display));
1533}
1534
1535PHP_FUNCTION(caca_get_event_type) {
1536        caca_event_t *event;
1537        FETCH_EVENT(event);
1538        RETURN_LONG(caca_get_event_type(event));
1539}
1540
1541PHP_FUNCTION(caca_get_event_key_ch) {
1542        caca_event_t *event;
1543        FETCH_EVENT(event);
1544        RETURN_LONG(caca_get_event_key_ch(event));
1545}
1546
1547PHP_FUNCTION(caca_get_event_mouse_button) {
1548        caca_event_t *event;
1549        FETCH_EVENT(event);
1550        RETURN_LONG(caca_get_event_mouse_button(event));
1551}
1552
1553PHP_FUNCTION(caca_get_event_mouse_x) {
1554        caca_event_t *event;
1555        FETCH_EVENT(event);
1556        RETURN_LONG(caca_get_event_mouse_x(event));
1557}
1558
1559PHP_FUNCTION(caca_get_event_mouse_y) {
1560        caca_event_t *event;
1561        FETCH_EVENT(event);
1562        RETURN_LONG(caca_get_event_mouse_y(event));
1563}
1564
1565PHP_FUNCTION(caca_get_event_resize_width) {
1566        caca_event_t *event;
1567        FETCH_EVENT(event);
1568        RETURN_LONG(caca_get_event_resize_width(event));
1569}
1570
1571PHP_FUNCTION(caca_get_event_resize_height) {
1572        caca_event_t *event;
1573        FETCH_EVENT(event);
1574        RETURN_LONG(caca_get_event_resize_height(event));
1575}
1576
Note: See TracBrowser for help on using the repository browser.