[3089] | 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" |
---|
[3153] | 19 | |
---|
| 20 | #ifdef HAVE_GD |
---|
[3119] | 21 | #include <gd.h> |
---|
[3153] | 22 | #endif |
---|
[3089] | 23 | |
---|
| 24 | static function_entry caca_functions[] = { |
---|
[3091] | 25 | PHP_FE(caca_create_canvas, NULL) |
---|
[3089] | 26 | PHP_FE(caca_set_canvas_size, NULL) |
---|
| 27 | PHP_FE(caca_get_canvas_width, NULL) |
---|
| 28 | PHP_FE(caca_get_canvas_height, NULL) |
---|
[3091] | 29 | PHP_FE(caca_get_canvas_chars, NULL) |
---|
| 30 | PHP_FE(caca_get_canvas_attrs, NULL) |
---|
[3089] | 31 | PHP_FE(caca_rand, NULL) |
---|
| 32 | PHP_FE(caca_get_version, NULL) |
---|
| 33 | PHP_FE(caca_gotoxy, NULL) |
---|
| 34 | PHP_FE(caca_get_cursor_x, NULL) |
---|
| 35 | PHP_FE(caca_get_cursor_y, NULL) |
---|
| 36 | PHP_FE(caca_put_char, NULL) |
---|
[3091] | 37 | PHP_FE(caca_get_char, NULL) |
---|
[3089] | 38 | PHP_FE(caca_put_str, NULL) |
---|
| 39 | PHP_FE(caca_clear_canvas, NULL) |
---|
| 40 | PHP_FE(caca_set_canvas_handle, NULL) |
---|
| 41 | PHP_FE(caca_get_canvas_handle_x, NULL) |
---|
| 42 | PHP_FE(caca_get_canvas_handle_y, NULL) |
---|
| 43 | PHP_FE(caca_blit, NULL) |
---|
| 44 | PHP_FE(caca_set_canvas_boundaries, NULL) |
---|
| 45 | PHP_FE(caca_invert, NULL) |
---|
| 46 | PHP_FE(caca_flip, NULL) |
---|
| 47 | PHP_FE(caca_flop, NULL) |
---|
[3110] | 48 | PHP_FE(caca_rotate_180, NULL) |
---|
[3089] | 49 | PHP_FE(caca_rotate_left, NULL) |
---|
| 50 | PHP_FE(caca_rotate_right, NULL) |
---|
| 51 | PHP_FE(caca_stretch_left, NULL) |
---|
| 52 | PHP_FE(caca_stretch_right, NULL) |
---|
[3091] | 53 | PHP_FE(caca_get_attr, NULL) |
---|
[3089] | 54 | PHP_FE(caca_set_attr, NULL) |
---|
| 55 | PHP_FE(caca_put_attr, NULL) |
---|
| 56 | PHP_FE(caca_set_color_ansi, NULL) |
---|
| 57 | PHP_FE(caca_set_color_argb, NULL) |
---|
[3092] | 58 | PHP_FE(caca_attr_to_ansi, NULL) |
---|
| 59 | PHP_FE(caca_attr_to_ansi_fg, NULL) |
---|
| 60 | PHP_FE(caca_attr_to_ansi_bg, NULL) |
---|
[3110] | 61 | PHP_FE(caca_attr_to_rgb12_fg, NULL) |
---|
| 62 | PHP_FE(caca_attr_to_rgb12_bg, NULL) |
---|
| 63 | PHP_FE(caca_attr_to_argb64, NULL) |
---|
| 64 | PHP_FE(caca_utf8_to_utf32, NULL) |
---|
| 65 | PHP_FE(caca_utf32_to_utf8, NULL) |
---|
| 66 | PHP_FE(caca_utf32_to_cp437, NULL) |
---|
| 67 | PHP_FE(caca_cp437_to_utf32, NULL) |
---|
| 68 | PHP_FE(caca_utf32_to_ascii, NULL) |
---|
| 69 | PHP_FE(caca_utf32_is_fullwidth, NULL) |
---|
[3089] | 70 | PHP_FE(caca_draw_line, NULL) |
---|
| 71 | PHP_FE(caca_draw_polyline, NULL) |
---|
| 72 | PHP_FE(caca_draw_thin_line, NULL) |
---|
| 73 | PHP_FE(caca_draw_thin_polyline, NULL) |
---|
| 74 | PHP_FE(caca_draw_circle, NULL) |
---|
| 75 | PHP_FE(caca_draw_ellipse, NULL) |
---|
| 76 | PHP_FE(caca_draw_thin_ellipse, NULL) |
---|
| 77 | PHP_FE(caca_fill_ellipse, NULL) |
---|
| 78 | PHP_FE(caca_draw_box, NULL) |
---|
| 79 | PHP_FE(caca_draw_thin_box, NULL) |
---|
[3108] | 80 | PHP_FE(caca_draw_cp437_box, NULL) |
---|
[3089] | 81 | PHP_FE(caca_fill_box, NULL) |
---|
| 82 | PHP_FE(caca_draw_triangle, NULL) |
---|
| 83 | PHP_FE(caca_draw_thin_triangle, NULL) |
---|
| 84 | PHP_FE(caca_fill_triangle, NULL) |
---|
| 85 | PHP_FE(caca_get_frame_count, NULL) |
---|
| 86 | PHP_FE(caca_set_frame, NULL) |
---|
| 87 | PHP_FE(caca_set_frame_name, NULL) |
---|
| 88 | PHP_FE(caca_create_frame, NULL) |
---|
| 89 | PHP_FE(caca_free_frame, NULL) |
---|
[3120] | 90 | PHP_FE(caca_create_dither, NULL) |
---|
[3089] | 91 | PHP_FE(caca_set_dither_palette, NULL) |
---|
| 92 | PHP_FE(caca_set_dither_brightness, NULL) |
---|
| 93 | PHP_FE(caca_get_dither_brightness, NULL) |
---|
| 94 | PHP_FE(caca_set_dither_gamma, NULL) |
---|
| 95 | PHP_FE(caca_get_dither_gamma, NULL) |
---|
| 96 | PHP_FE(caca_set_dither_contrast, NULL) |
---|
| 97 | PHP_FE(caca_get_dither_contrast, NULL) |
---|
| 98 | PHP_FE(caca_set_dither_antialias, NULL) |
---|
| 99 | PHP_FE(caca_get_dither_antialias_list, NULL) |
---|
| 100 | PHP_FE(caca_get_dither_antialias, NULL) |
---|
| 101 | PHP_FE(caca_set_dither_color, NULL) |
---|
| 102 | PHP_FE(caca_get_dither_color_list, NULL) |
---|
| 103 | PHP_FE(caca_get_dither_color, NULL) |
---|
| 104 | PHP_FE(caca_set_dither_charset, NULL) |
---|
| 105 | PHP_FE(caca_get_dither_charset_list, NULL) |
---|
| 106 | PHP_FE(caca_get_dither_charset, NULL) |
---|
| 107 | PHP_FE(caca_set_dither_algorithm, NULL) |
---|
| 108 | PHP_FE(caca_get_dither_algorithm_list, NULL) |
---|
| 109 | PHP_FE(caca_get_dither_algorithm, NULL) |
---|
[3148] | 110 | PHP_FE(caca_dither_bitmap, NULL) |
---|
[3127] | 111 | PHP_FE(caca_load_font, NULL) |
---|
[3149] | 112 | PHP_FE(caca_load_builtin_font, NULL) |
---|
[3089] | 113 | PHP_FE(caca_get_font_list, NULL) |
---|
| 114 | PHP_FE(caca_get_font_width, NULL) |
---|
| 115 | PHP_FE(caca_get_font_height, NULL) |
---|
[3129] | 116 | PHP_FE(caca_get_font_blocks, NULL) |
---|
[3089] | 117 | PHP_FE(caca_render_canvas, NULL) |
---|
| 118 | PHP_FE(caca_canvas_set_figfont, NULL) |
---|
| 119 | PHP_FE(caca_put_figchar, NULL) |
---|
| 120 | PHP_FE(caca_flush_figlet, NULL) |
---|
[3126] | 121 | PHP_FE(caca_file_open, NULL) |
---|
[3089] | 122 | PHP_FE(caca_file_close, NULL) |
---|
[3092] | 123 | PHP_FE(caca_file_tell, NULL) |
---|
| 124 | PHP_FE(caca_file_read, NULL) |
---|
| 125 | PHP_FE(caca_file_write, NULL) |
---|
[3089] | 126 | PHP_FE(caca_file_gets, NULL) |
---|
| 127 | PHP_FE(caca_file_eof, NULL) |
---|
[3112] | 128 | PHP_FE(caca_import_string, NULL) |
---|
[3092] | 129 | PHP_FE(caca_import_file, NULL) |
---|
[3089] | 130 | PHP_FE(caca_get_import_list, NULL) |
---|
[3112] | 131 | PHP_FE(caca_export_string, NULL) |
---|
[3089] | 132 | PHP_FE(caca_get_export_list, NULL) |
---|
[3092] | 133 | PHP_FE(caca_create_display, NULL) |
---|
| 134 | PHP_FE(caca_create_display_with_driver, NULL) |
---|
[3089] | 135 | PHP_FE(caca_get_display_driver_list, NULL) |
---|
| 136 | PHP_FE(caca_get_display_driver, NULL) |
---|
| 137 | PHP_FE(caca_set_display_driver, NULL) |
---|
[3092] | 138 | PHP_FE(caca_get_canvas, NULL) |
---|
[3089] | 139 | PHP_FE(caca_refresh_display, NULL) |
---|
| 140 | PHP_FE(caca_set_display_time, NULL) |
---|
| 141 | PHP_FE(caca_get_display_time, NULL) |
---|
| 142 | PHP_FE(caca_get_display_width, NULL) |
---|
| 143 | PHP_FE(caca_get_display_height, NULL) |
---|
| 144 | PHP_FE(caca_set_display_title, NULL) |
---|
| 145 | PHP_FE(caca_set_mouse, NULL) |
---|
| 146 | PHP_FE(caca_set_cursor, NULL) |
---|
| 147 | PHP_FE(caca_get_event, NULL) |
---|
| 148 | PHP_FE(caca_get_mouse_x, NULL) |
---|
| 149 | PHP_FE(caca_get_mouse_y, NULL) |
---|
| 150 | PHP_FE(caca_get_event_type, NULL) |
---|
| 151 | PHP_FE(caca_get_event_key_ch, NULL) |
---|
| 152 | PHP_FE(caca_get_event_mouse_button, NULL) |
---|
| 153 | PHP_FE(caca_get_event_mouse_x, NULL) |
---|
| 154 | PHP_FE(caca_get_event_mouse_y, NULL) |
---|
| 155 | PHP_FE(caca_get_event_resize_width, NULL) |
---|
| 156 | PHP_FE(caca_get_event_resize_height, NULL) |
---|
| 157 | |
---|
| 158 | {NULL, NULL, NULL} |
---|
| 159 | }; |
---|
| 160 | |
---|
| 161 | zend_module_entry caca_module_entry = { |
---|
| 162 | #if ZEND_MODULE_API_NO >= 20010901 |
---|
| 163 | STANDARD_MODULE_HEADER, |
---|
| 164 | #endif |
---|
| 165 | PHP_CACA_EXTNAME, |
---|
| 166 | caca_functions, |
---|
| 167 | PHP_MINIT(caca), |
---|
| 168 | NULL, |
---|
| 169 | NULL, |
---|
| 170 | NULL, |
---|
| 171 | PHP_MINFO(caca), |
---|
| 172 | #if ZEND_MODULE_API_NO >= 20010901 |
---|
| 173 | PHP_CACA_VERSION, |
---|
| 174 | #endif |
---|
| 175 | STANDARD_MODULE_PROPERTIES |
---|
| 176 | }; |
---|
| 177 | |
---|
| 178 | #ifdef COMPILE_DL_CACA |
---|
| 179 | ZEND_GET_MODULE(caca) |
---|
| 180 | #endif |
---|
| 181 | |
---|
| 182 | PHP_MINFO_FUNCTION(caca) { |
---|
| 183 | php_info_print_table_start(); |
---|
| 184 | php_info_print_table_row(2, "Caca library version", caca_get_version()); |
---|
[3166] | 185 | #ifdef HAVE_GD |
---|
[3169] | 186 | php_info_print_table_row(2, "Gd support", "enabled"); |
---|
[3166] | 187 | php_info_print_table_row(2, "Gd API version", GD_VERSION_STRING); |
---|
| 188 | #else |
---|
[3169] | 189 | php_info_print_table_row(2, "Compiled with gd support", "disabled"); |
---|
[3166] | 190 | #endif |
---|
[3089] | 191 | php_info_print_table_end(); |
---|
| 192 | } |
---|
[3091] | 193 | |
---|
[3108] | 194 | //-------- Caca's ressources destructors -----------// |
---|
[3091] | 195 | |
---|
| 196 | static void php_caca_canvas_dtor(zend_rsrc_list_entry *rsrc TSRMLS_DC) { |
---|
| 197 | caca_free_canvas(rsrc->ptr); |
---|
| 198 | } |
---|
| 199 | |
---|
| 200 | static void php_caca_dither_dtor(zend_rsrc_list_entry *rsrc TSRMLS_DC) { |
---|
| 201 | caca_free_dither(rsrc->ptr); |
---|
| 202 | } |
---|
| 203 | |
---|
| 204 | static void php_caca_font_dtor(zend_rsrc_list_entry *rsrc TSRMLS_DC) { |
---|
| 205 | caca_free_font(rsrc->ptr); |
---|
| 206 | } |
---|
| 207 | |
---|
| 208 | static void php_caca_file_dtor(zend_rsrc_list_entry *rsrc TSRMLS_DC) { |
---|
[3151] | 209 | caca_file_close(rsrc->ptr); |
---|
[3091] | 210 | } |
---|
| 211 | |
---|
| 212 | static void php_caca_display_dtor(zend_rsrc_list_entry *rsrc TSRMLS_DC) { |
---|
| 213 | caca_free_display(rsrc->ptr); |
---|
| 214 | } |
---|
| 215 | |
---|
| 216 | static void php_caca_event_dtor(zend_rsrc_list_entry *rsrc TSRMLS_DC) { |
---|
[3108] | 217 | efree((caca_event_t *) rsrc->ptr); |
---|
[3091] | 218 | } |
---|
| 219 | |
---|
[3108] | 220 | //-------- Initialization ---------// |
---|
[3089] | 221 | |
---|
| 222 | PHP_MINIT_FUNCTION(caca) { |
---|
[3091] | 223 | |
---|
| 224 | le_caca_canvas = zend_register_list_destructors_ex(php_caca_canvas_dtor, NULL, PHP_CACA_CANVAS_RES_NAME, module_number); |
---|
| 225 | le_caca_dither = zend_register_list_destructors_ex(php_caca_dither_dtor, NULL, PHP_CACA_DITHER_RES_NAME, module_number); |
---|
| 226 | le_caca_font = zend_register_list_destructors_ex(php_caca_font_dtor, NULL, PHP_CACA_FONT_RES_NAME, module_number); |
---|
| 227 | le_caca_file = zend_register_list_destructors_ex(php_caca_file_dtor, NULL, PHP_CACA_FILE_RES_NAME, module_number); |
---|
| 228 | le_caca_display = zend_register_list_destructors_ex(php_caca_display_dtor, NULL, PHP_CACA_DISPLAY_RES_NAME, module_number); |
---|
| 229 | le_caca_event = zend_register_list_destructors_ex(php_caca_event_dtor, NULL, PHP_CACA_EVENT_RES_NAME, module_number); |
---|
[3089] | 230 | |
---|
| 231 | REGISTER_LONG_CONSTANT("CACA_BLACK", CACA_BLACK, CONST_CS | CONST_PERSISTENT); |
---|
| 232 | REGISTER_LONG_CONSTANT("CACA_BLUE", CACA_BLUE, CONST_CS | CONST_PERSISTENT); |
---|
| 233 | REGISTER_LONG_CONSTANT("CACA_GREEN", CACA_GREEN, CONST_CS | CONST_PERSISTENT); |
---|
| 234 | REGISTER_LONG_CONSTANT("CACA_CYAN", CACA_CYAN, CONST_CS | CONST_PERSISTENT); |
---|
| 235 | REGISTER_LONG_CONSTANT("CACA_RED", CACA_RED, CONST_CS | CONST_PERSISTENT); |
---|
| 236 | REGISTER_LONG_CONSTANT("CACA_MAGENTA", CACA_MAGENTA, CONST_CS | CONST_PERSISTENT); |
---|
| 237 | REGISTER_LONG_CONSTANT("CACA_BROWN", CACA_BROWN, CONST_CS | CONST_PERSISTENT); |
---|
| 238 | REGISTER_LONG_CONSTANT("CACA_LIGHTGRAY", CACA_LIGHTGRAY, CONST_CS | CONST_PERSISTENT); |
---|
| 239 | REGISTER_LONG_CONSTANT("CACA_DARKGRAY", CACA_DARKGRAY, CONST_CS | CONST_PERSISTENT); |
---|
| 240 | REGISTER_LONG_CONSTANT("CACA_LIGHTBLUE", CACA_LIGHTBLUE, CONST_CS | CONST_PERSISTENT); |
---|
| 241 | REGISTER_LONG_CONSTANT("CACA_LIGHTGREEN", CACA_LIGHTGREEN, CONST_CS | CONST_PERSISTENT); |
---|
| 242 | REGISTER_LONG_CONSTANT("CACA_LIGHTCYAN", CACA_LIGHTCYAN, CONST_CS | CONST_PERSISTENT); |
---|
| 243 | REGISTER_LONG_CONSTANT("CACA_LIGHTRED", CACA_LIGHTRED, CONST_CS | CONST_PERSISTENT); |
---|
| 244 | REGISTER_LONG_CONSTANT("CACA_LIGHTMAGENTA", CACA_LIGHTMAGENTA, CONST_CS | CONST_PERSISTENT); |
---|
| 245 | REGISTER_LONG_CONSTANT("CACA_YELLOW", CACA_YELLOW, CONST_CS | CONST_PERSISTENT); |
---|
| 246 | REGISTER_LONG_CONSTANT("CACA_WHITE", CACA_WHITE, CONST_CS | CONST_PERSISTENT); |
---|
| 247 | REGISTER_LONG_CONSTANT("CACA_DEFAULT", CACA_DEFAULT, CONST_CS | CONST_PERSISTENT); |
---|
| 248 | REGISTER_LONG_CONSTANT("CACA_TRANSPARENT", CACA_TRANSPARENT, CONST_CS | CONST_PERSISTENT); |
---|
| 249 | REGISTER_LONG_CONSTANT("CACA_BOLD", CACA_BOLD, CONST_CS | CONST_PERSISTENT); |
---|
| 250 | REGISTER_LONG_CONSTANT("CACA_ITALICS", CACA_ITALICS, CONST_CS | CONST_PERSISTENT); |
---|
| 251 | REGISTER_LONG_CONSTANT("CACA_UNDERLINE", CACA_UNDERLINE, CONST_CS | CONST_PERSISTENT); |
---|
| 252 | REGISTER_LONG_CONSTANT("CACA_BLINK", CACA_BLINK, CONST_CS | CONST_PERSISTENT); |
---|
| 253 | |
---|
[3091] | 254 | REGISTER_LONG_CONSTANT("CACA_EVENT_NONE", CACA_EVENT_NONE, CONST_CS | CONST_PERSISTENT); |
---|
| 255 | REGISTER_LONG_CONSTANT("CACA_EVENT_KEY_PRESS", CACA_EVENT_KEY_PRESS, CONST_CS | CONST_PERSISTENT); |
---|
| 256 | REGISTER_LONG_CONSTANT("CACA_EVENT_KEY_RELEASE", CACA_EVENT_KEY_RELEASE, CONST_CS | CONST_PERSISTENT); |
---|
| 257 | REGISTER_LONG_CONSTANT("CACA_EVENT_MOUSE_PRESS", CACA_EVENT_MOUSE_PRESS, CONST_CS | CONST_PERSISTENT); |
---|
| 258 | REGISTER_LONG_CONSTANT("CACA_EVENT_MOUSE_RELEASE", CACA_EVENT_MOUSE_RELEASE, CONST_CS | CONST_PERSISTENT); |
---|
| 259 | REGISTER_LONG_CONSTANT("CACA_EVENT_MOUSE_MOTION", CACA_EVENT_MOUSE_MOTION, CONST_CS | CONST_PERSISTENT); |
---|
| 260 | REGISTER_LONG_CONSTANT("CACA_EVENT_RESIZE", CACA_EVENT_RESIZE, CONST_CS | CONST_PERSISTENT); |
---|
| 261 | REGISTER_LONG_CONSTANT("CACA_EVENT_QUIT", CACA_EVENT_QUIT, CONST_CS | CONST_PERSISTENT); |
---|
| 262 | REGISTER_LONG_CONSTANT("CACA_EVENT_ANY", CACA_EVENT_ANY, CONST_CS | CONST_PERSISTENT); |
---|
| 263 | |
---|
| 264 | REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_A", CACA_KEY_CTRL_A, CONST_CS | CONST_PERSISTENT); |
---|
| 265 | REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_B", CACA_KEY_CTRL_B, CONST_CS | CONST_PERSISTENT); |
---|
| 266 | REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_C", CACA_KEY_CTRL_C, CONST_CS | CONST_PERSISTENT); |
---|
| 267 | REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_D", CACA_KEY_CTRL_D, CONST_CS | CONST_PERSISTENT); |
---|
| 268 | REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_E", CACA_KEY_CTRL_E, CONST_CS | CONST_PERSISTENT); |
---|
| 269 | REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_F", CACA_KEY_CTRL_F, CONST_CS | CONST_PERSISTENT); |
---|
| 270 | REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_G", CACA_KEY_CTRL_G, CONST_CS | CONST_PERSISTENT); |
---|
| 271 | REGISTER_LONG_CONSTANT("CACA_KEY_BACKSPACE", CACA_KEY_BACKSPACE, CONST_CS | CONST_PERSISTENT); |
---|
| 272 | REGISTER_LONG_CONSTANT("CACA_KEY_TAB", CACA_KEY_TAB, CONST_CS | CONST_PERSISTENT); |
---|
| 273 | REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_J", CACA_KEY_CTRL_J, CONST_CS | CONST_PERSISTENT); |
---|
| 274 | REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_K", CACA_KEY_CTRL_K, CONST_CS | CONST_PERSISTENT); |
---|
| 275 | REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_L", CACA_KEY_CTRL_L, CONST_CS | CONST_PERSISTENT); |
---|
| 276 | REGISTER_LONG_CONSTANT("CACA_KEY_RETURN", CACA_KEY_RETURN, CONST_CS | CONST_PERSISTENT); |
---|
| 277 | REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_N", CACA_KEY_CTRL_N, CONST_CS | CONST_PERSISTENT); |
---|
| 278 | REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_O", CACA_KEY_CTRL_O, CONST_CS | CONST_PERSISTENT); |
---|
| 279 | REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_P", CACA_KEY_CTRL_P, CONST_CS | CONST_PERSISTENT); |
---|
| 280 | REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_Q", CACA_KEY_CTRL_Q, CONST_CS | CONST_PERSISTENT); |
---|
| 281 | REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_R", CACA_KEY_CTRL_R, CONST_CS | CONST_PERSISTENT); |
---|
| 282 | REGISTER_LONG_CONSTANT("CACA_KEY_PAUSE", CACA_KEY_PAUSE, CONST_CS | CONST_PERSISTENT); |
---|
| 283 | REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_T", CACA_KEY_CTRL_T, CONST_CS | CONST_PERSISTENT); |
---|
| 284 | REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_U", CACA_KEY_CTRL_U, CONST_CS | CONST_PERSISTENT); |
---|
| 285 | REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_V", CACA_KEY_CTRL_V, CONST_CS | CONST_PERSISTENT); |
---|
| 286 | REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_W", CACA_KEY_CTRL_W, CONST_CS | CONST_PERSISTENT); |
---|
| 287 | REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_X", CACA_KEY_CTRL_X, CONST_CS | CONST_PERSISTENT); |
---|
| 288 | REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_Y", CACA_KEY_CTRL_Y, CONST_CS | CONST_PERSISTENT); |
---|
| 289 | REGISTER_LONG_CONSTANT("CACA_KEY_CTRL_Z", CACA_KEY_CTRL_Z, CONST_CS | CONST_PERSISTENT); |
---|
| 290 | REGISTER_LONG_CONSTANT("CACA_KEY_ESCAPE", CACA_KEY_ESCAPE, CONST_CS | CONST_PERSISTENT); |
---|
| 291 | REGISTER_LONG_CONSTANT("CACA_KEY_DELETE", CACA_KEY_DELETE, CONST_CS | CONST_PERSISTENT); |
---|
| 292 | REGISTER_LONG_CONSTANT("CACA_KEY_UP", CACA_KEY_UP, CONST_CS | CONST_PERSISTENT); |
---|
| 293 | REGISTER_LONG_CONSTANT("CACA_KEY_DOWN", CACA_KEY_DOWN, CONST_CS | CONST_PERSISTENT); |
---|
| 294 | REGISTER_LONG_CONSTANT("CACA_KEY_LEFT", CACA_KEY_LEFT, CONST_CS | CONST_PERSISTENT); |
---|
| 295 | REGISTER_LONG_CONSTANT("CACA_KEY_RIGHT", CACA_KEY_RIGHT, CONST_CS | CONST_PERSISTENT); |
---|
| 296 | REGISTER_LONG_CONSTANT("CACA_KEY_INSERT", CACA_KEY_INSERT, CONST_CS | CONST_PERSISTENT); |
---|
| 297 | REGISTER_LONG_CONSTANT("CACA_KEY_HOME", CACA_KEY_HOME, CONST_CS | CONST_PERSISTENT); |
---|
| 298 | REGISTER_LONG_CONSTANT("CACA_KEY_END", CACA_KEY_END, CONST_CS | CONST_PERSISTENT); |
---|
| 299 | REGISTER_LONG_CONSTANT("CACA_KEY_PAGEUP", CACA_KEY_PAGEUP, CONST_CS | CONST_PERSISTENT); |
---|
| 300 | REGISTER_LONG_CONSTANT("CACA_KEY_PAGEDOWN", CACA_KEY_PAGEDOWN, CONST_CS | CONST_PERSISTENT); |
---|
| 301 | REGISTER_LONG_CONSTANT("CACA_KEY_F1", CACA_KEY_F1, CONST_CS | CONST_PERSISTENT); |
---|
| 302 | REGISTER_LONG_CONSTANT("CACA_KEY_F2", CACA_KEY_F2, CONST_CS | CONST_PERSISTENT); |
---|
| 303 | REGISTER_LONG_CONSTANT("CACA_KEY_F3", CACA_KEY_F3, CONST_CS | CONST_PERSISTENT); |
---|
| 304 | REGISTER_LONG_CONSTANT("CACA_KEY_F4", CACA_KEY_F4, CONST_CS | CONST_PERSISTENT); |
---|
| 305 | REGISTER_LONG_CONSTANT("CACA_KEY_F5", CACA_KEY_F5, CONST_CS | CONST_PERSISTENT); |
---|
| 306 | REGISTER_LONG_CONSTANT("CACA_KEY_F6", CACA_KEY_F6, CONST_CS | CONST_PERSISTENT); |
---|
| 307 | REGISTER_LONG_CONSTANT("CACA_KEY_F7", CACA_KEY_F7, CONST_CS | CONST_PERSISTENT); |
---|
| 308 | REGISTER_LONG_CONSTANT("CACA_KEY_F8", CACA_KEY_F8, CONST_CS | CONST_PERSISTENT); |
---|
| 309 | REGISTER_LONG_CONSTANT("CACA_KEY_F9", CACA_KEY_F9, CONST_CS | CONST_PERSISTENT); |
---|
| 310 | REGISTER_LONG_CONSTANT("CACA_KEY_F10", CACA_KEY_F10, CONST_CS | CONST_PERSISTENT); |
---|
| 311 | REGISTER_LONG_CONSTANT("CACA_KEY_F11", CACA_KEY_F11, CONST_CS | CONST_PERSISTENT); |
---|
| 312 | REGISTER_LONG_CONSTANT("CACA_KEY_F12", CACA_KEY_F12, CONST_CS | CONST_PERSISTENT); |
---|
| 313 | REGISTER_LONG_CONSTANT("CACA_KEY_F13", CACA_KEY_F13, CONST_CS | CONST_PERSISTENT); |
---|
| 314 | REGISTER_LONG_CONSTANT("CACA_KEY_F14", CACA_KEY_F14, CONST_CS | CONST_PERSISTENT); |
---|
| 315 | REGISTER_LONG_CONSTANT("CACA_KEY_F15", CACA_KEY_F15, CONST_CS | CONST_PERSISTENT); |
---|
| 316 | |
---|
[3089] | 317 | return SUCCESS; |
---|
| 318 | } |
---|
| 319 | |
---|
[3108] | 320 | //---------- Some usefull macros ---------------// |
---|
[3091] | 321 | |
---|
| 322 | #define FETCH_CANVAS(canvas) \ |
---|
| 323 | zval *_zval; \ |
---|
| 324 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) { \ |
---|
| 325 | RETURN_FALSE; \ |
---|
| 326 | } \ |
---|
| 327 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
| 328 | |
---|
[3094] | 329 | #define FETCH_DISPLAY(display) \ |
---|
| 330 | zval *_zval; \ |
---|
| 331 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) { \ |
---|
| 332 | RETURN_FALSE; \ |
---|
| 333 | } \ |
---|
| 334 | ZEND_FETCH_RESOURCE(display, caca_display_t*, &_zval, -1, PHP_CACA_DISPLAY_RES_NAME, le_caca_display); |
---|
[3091] | 335 | |
---|
[3094] | 336 | #define FETCH_EVENT(event) \ |
---|
| 337 | zval *_zval; \ |
---|
| 338 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) { \ |
---|
| 339 | RETURN_FALSE; \ |
---|
| 340 | } \ |
---|
| 341 | ZEND_FETCH_RESOURCE(event, caca_event_t*, &_zval, -1, PHP_CACA_EVENT_RES_NAME, le_caca_event); |
---|
| 342 | |
---|
[3113] | 343 | #define FETCH_LONG(l) \ |
---|
| 344 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "l", &l) == FAILURE) { \ |
---|
| 345 | RETURN_FALSE; \ |
---|
| 346 | } |
---|
| 347 | |
---|
[3101] | 348 | #define RETURN_CHAR(c) \ |
---|
| 349 | char *str = emalloc(2); \ |
---|
| 350 | str[0] = c; \ |
---|
| 351 | str[1] = '\0'; \ |
---|
| 352 | RETURN_STRING(str, 0); |
---|
| 353 | |
---|
[3110] | 354 | #define RETURN_SUCCESS(i) \ |
---|
| 355 | RETURN_BOOL((i) == 0); |
---|
| 356 | |
---|
[3122] | 357 | //---------- Some usefull functions --------------------// |
---|
[3119] | 358 | |
---|
[3122] | 359 | //Fetch external php resources such as gd resouces |
---|
| 360 | |
---|
[3119] | 361 | void *fetch_external_resource(zval *_zval, char const *type_name) { |
---|
| 362 | int resource_id = _zval->value.lval; |
---|
| 363 | int resource_type; |
---|
| 364 | void *result = zend_list_find(resource_id, &resource_type); |
---|
[3122] | 365 | if (!result) |
---|
| 366 | return NULL; |
---|
[3119] | 367 | char *resource_type_name = zend_rsrc_list_get_rsrc_type(resource_id); |
---|
| 368 | return (strcmp(resource_type_name, type_name) == 0) ? result : NULL; |
---|
| 369 | } |
---|
| 370 | |
---|
[3122] | 371 | //Fetch buffer of pixels from gdImage |
---|
| 372 | |
---|
[3153] | 373 | #ifdef HAVE_GD |
---|
[3122] | 374 | void *gd_get_pixels(gdImage *img) { |
---|
[3149] | 375 | void *result; |
---|
| 376 | int j, pitch; |
---|
[3138] | 377 | if (img->trueColor) { |
---|
[3149] | 378 | pitch = img->sx * sizeof(int); |
---|
| 379 | result = malloc(img->sy * pitch); |
---|
[3138] | 380 | for (j = 0; j < img->sy; j++) |
---|
[3149] | 381 | memcpy(result + (j * pitch), (const void *) img->tpixels[j], pitch); |
---|
[3138] | 382 | } |
---|
| 383 | else { |
---|
[3149] | 384 | pitch = img->sx * sizeof(char); |
---|
| 385 | result = malloc(img->sy * pitch); |
---|
[3138] | 386 | for (j = 0; j < img->sy; j++) |
---|
[3149] | 387 | memcpy(result + (j * pitch), (const void *) img->pixels[j], pitch); |
---|
[3138] | 388 | } |
---|
[3149] | 389 | return result; |
---|
[3122] | 390 | } |
---|
| 391 | |
---|
[3148] | 392 | int gd_load_palette(gdImage *img, caca_dither_t *dither) { |
---|
| 393 | if (!img || img->trueColor || gdMaxColors != 256) { |
---|
| 394 | return -1; |
---|
| 395 | } |
---|
| 396 | |
---|
| 397 | uint32_t r[256], g[256], b[256], a[256]; |
---|
| 398 | int i; |
---|
| 399 | for (i = 0; i < 256; i++) { |
---|
| 400 | r[i] = img->red[i] << 4; |
---|
| 401 | g[i] = img->green[i] << 4; |
---|
| 402 | b[i] = img->blue[i] << 4; |
---|
| 403 | a[i] = img->alpha[i] << 4; |
---|
| 404 | } |
---|
| 405 | |
---|
| 406 | return caca_set_dither_palette(dither, &r[0], &g[0], &b[0], &a[0]); |
---|
| 407 | } |
---|
[3153] | 408 | #endif |
---|
[3108] | 409 | //------- Caca's functions ----------------// |
---|
| 410 | |
---|
[3091] | 411 | PHP_FUNCTION(caca_create_canvas) { |
---|
[3093] | 412 | long width, height = 0; |
---|
| 413 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "ll", &width, &height) == FAILURE) { |
---|
| 414 | RETURN_FALSE; |
---|
| 415 | } |
---|
[3104] | 416 | caca_canvas_t *canvas = caca_create_canvas(width, height); |
---|
| 417 | if (!canvas) { |
---|
| 418 | RETURN_FALSE; |
---|
| 419 | } |
---|
| 420 | ZEND_REGISTER_RESOURCE(return_value, canvas, le_caca_canvas); |
---|
[3091] | 421 | } |
---|
| 422 | |
---|
[3089] | 423 | PHP_FUNCTION(caca_set_canvas_size) { |
---|
[3101] | 424 | zval *_zval; |
---|
| 425 | long width, height = 0; |
---|
| 426 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rll", &_zval, &width, &height) == FAILURE) { |
---|
| 427 | RETURN_FALSE; |
---|
| 428 | } |
---|
| 429 | caca_canvas_t *canvas; |
---|
| 430 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
[3110] | 431 | RETURN_SUCCESS(caca_set_canvas_size(canvas, width, height)); |
---|
[3089] | 432 | } |
---|
| 433 | |
---|
| 434 | PHP_FUNCTION(caca_get_canvas_width) { |
---|
[3093] | 435 | caca_canvas_t *canvas; |
---|
| 436 | FETCH_CANVAS(canvas); |
---|
| 437 | RETURN_LONG(caca_get_canvas_width(canvas)); |
---|
[3089] | 438 | } |
---|
| 439 | |
---|
| 440 | PHP_FUNCTION(caca_get_canvas_height) { |
---|
[3093] | 441 | caca_canvas_t *canvas; |
---|
| 442 | FETCH_CANVAS(canvas); |
---|
| 443 | RETURN_LONG(caca_get_canvas_height(canvas)); |
---|
[3089] | 444 | } |
---|
| 445 | |
---|
[3091] | 446 | PHP_FUNCTION(caca_get_canvas_chars) { |
---|
[3093] | 447 | caca_canvas_t *canvas; |
---|
| 448 | FETCH_CANVAS(canvas); |
---|
[3131] | 449 | RETURN_STRING((char *) caca_get_canvas_chars(canvas), 1); |
---|
[3089] | 450 | } |
---|
| 451 | |
---|
[3091] | 452 | PHP_FUNCTION(caca_get_canvas_attrs) { |
---|
[3093] | 453 | caca_canvas_t *canvas; |
---|
| 454 | FETCH_CANVAS(canvas); |
---|
[3131] | 455 | RETURN_STRING((char *) caca_get_canvas_attrs(canvas), 1); |
---|
[3091] | 456 | } |
---|
| 457 | |
---|
[3089] | 458 | PHP_FUNCTION(caca_rand) { |
---|
[3093] | 459 | long min, max = 0; |
---|
| 460 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "ll", &min, &max) == FAILURE) { |
---|
| 461 | RETURN_FALSE; |
---|
| 462 | } |
---|
| 463 | RETURN_LONG(caca_rand(min, max)); |
---|
[3089] | 464 | } |
---|
| 465 | |
---|
| 466 | PHP_FUNCTION(caca_get_version) { |
---|
[3156] | 467 | if (ZEND_NUM_ARGS() != 0) { |
---|
| 468 | WRONG_PARAM_COUNT; |
---|
| 469 | } |
---|
[3113] | 470 | RETURN_STRING((char *) caca_get_version(), 1); |
---|
[3089] | 471 | } |
---|
| 472 | |
---|
| 473 | PHP_FUNCTION(caca_gotoxy) { |
---|
[3093] | 474 | zval *_zval; |
---|
| 475 | long x, y = 0; |
---|
| 476 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rll", &_zval, &x, &y) == FAILURE) { |
---|
| 477 | RETURN_FALSE; |
---|
| 478 | } |
---|
| 479 | caca_canvas_t *canvas; |
---|
| 480 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
[3110] | 481 | RETURN_SUCCESS(caca_gotoxy(canvas, x, y)); |
---|
[3089] | 482 | } |
---|
| 483 | |
---|
| 484 | PHP_FUNCTION(caca_get_cursor_x) { |
---|
[3091] | 485 | caca_canvas_t *canvas; |
---|
| 486 | FETCH_CANVAS(canvas); |
---|
| 487 | RETURN_LONG(caca_get_cursor_x(canvas)); |
---|
[3089] | 488 | } |
---|
| 489 | |
---|
| 490 | PHP_FUNCTION(caca_get_cursor_y) { |
---|
[3091] | 491 | caca_canvas_t *canvas; |
---|
| 492 | FETCH_CANVAS(canvas); |
---|
| 493 | RETURN_LONG(caca_get_cursor_y(canvas)); |
---|
[3089] | 494 | } |
---|
| 495 | |
---|
| 496 | PHP_FUNCTION(caca_put_char) { |
---|
[3101] | 497 | zval *_zval; |
---|
[3132] | 498 | long x, y, c; |
---|
| 499 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlll", &_zval, &x, &y, &c) == FAILURE) { |
---|
[3101] | 500 | RETURN_FALSE; |
---|
| 501 | } |
---|
| 502 | caca_canvas_t *canvas; |
---|
| 503 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
[3132] | 504 | RETURN_SUCCESS(caca_put_char(canvas, x, y, c)); |
---|
[3089] | 505 | } |
---|
| 506 | |
---|
[3091] | 507 | PHP_FUNCTION(caca_get_char) { |
---|
[3101] | 508 | zval *_zval; |
---|
| 509 | long x, y = 0; |
---|
| 510 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rll", &_zval, &x, &y) == FAILURE) { |
---|
| 511 | RETURN_FALSE; |
---|
| 512 | } |
---|
| 513 | caca_canvas_t *canvas; |
---|
| 514 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
| 515 | RETURN_CHAR(caca_get_char(canvas, x, y)); |
---|
[3091] | 516 | } |
---|
| 517 | |
---|
[3089] | 518 | PHP_FUNCTION(caca_put_str) { |
---|
[3101] | 519 | zval *_zval; |
---|
| 520 | char *str; |
---|
| 521 | long x, y, str_len = 0; |
---|
| 522 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlls", &_zval, &x, &y, &str, &str_len) == FAILURE) { |
---|
| 523 | RETURN_FALSE; |
---|
| 524 | } |
---|
| 525 | caca_canvas_t *canvas; |
---|
| 526 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
[3110] | 527 | RETURN_SUCCESS(caca_put_str(canvas, x, y, str)); |
---|
[3089] | 528 | } |
---|
| 529 | |
---|
| 530 | PHP_FUNCTION(caca_clear_canvas) { |
---|
[3101] | 531 | caca_canvas_t *canvas; |
---|
| 532 | FETCH_CANVAS(canvas); |
---|
| 533 | RETURN_LONG(caca_clear_canvas(canvas)); |
---|
[3089] | 534 | } |
---|
| 535 | |
---|
| 536 | PHP_FUNCTION(caca_set_canvas_handle) { |
---|
[3101] | 537 | zval *_zval; |
---|
| 538 | long x, y = 0; |
---|
| 539 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rll", &_zval, &x, &y) == FAILURE) { |
---|
| 540 | RETURN_FALSE; |
---|
| 541 | } |
---|
| 542 | caca_canvas_t *canvas; |
---|
| 543 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
[3110] | 544 | RETURN_SUCCESS(caca_set_canvas_handle(canvas, x, y)); |
---|
[3089] | 545 | } |
---|
| 546 | |
---|
| 547 | PHP_FUNCTION(caca_get_canvas_handle_x) { |
---|
[3091] | 548 | caca_canvas_t *canvas; |
---|
| 549 | FETCH_CANVAS(canvas); |
---|
| 550 | RETURN_LONG(caca_get_canvas_handle_x(canvas)); |
---|
[3089] | 551 | } |
---|
| 552 | |
---|
| 553 | PHP_FUNCTION(caca_get_canvas_handle_y) { |
---|
[3091] | 554 | caca_canvas_t *canvas; |
---|
| 555 | FETCH_CANVAS(canvas); |
---|
| 556 | RETURN_LONG(caca_get_canvas_handle_y(canvas)); |
---|
[3089] | 557 | } |
---|
| 558 | |
---|
| 559 | PHP_FUNCTION(caca_blit) { |
---|
[3104] | 560 | zval *_zval1, *_zval2, *_zval3 = NULL; |
---|
[3101] | 561 | long x, y = 0; |
---|
[3104] | 562 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rllr|r", &_zval1, &x, &y, &_zval2, &_zval3) == FAILURE) { |
---|
[3101] | 563 | RETURN_FALSE; |
---|
| 564 | } |
---|
[3104] | 565 | caca_canvas_t *dst, *src, *mask = NULL; |
---|
[3101] | 566 | ZEND_FETCH_RESOURCE(dst, caca_canvas_t*, &_zval1, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
| 567 | ZEND_FETCH_RESOURCE(src, caca_canvas_t*, &_zval2, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
[3104] | 568 | if (_zval3) { |
---|
| 569 | ZEND_FETCH_RESOURCE(mask, caca_canvas_t*, &_zval3, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
| 570 | } |
---|
[3110] | 571 | RETURN_SUCCESS(caca_blit(dst, x, y, src, NULL)); |
---|
[3089] | 572 | } |
---|
| 573 | |
---|
| 574 | PHP_FUNCTION(caca_set_canvas_boundaries) { |
---|
[3101] | 575 | zval *_zval; |
---|
| 576 | long x, y, width, height = 0; |
---|
| 577 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rllll", &_zval, &x, &y, &width, &height) == FAILURE) { |
---|
| 578 | RETURN_FALSE; |
---|
| 579 | } |
---|
| 580 | caca_canvas_t *canvas; |
---|
| 581 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
[3110] | 582 | RETURN_SUCCESS(caca_set_canvas_boundaries(canvas, x, y, width, height)); |
---|
[3089] | 583 | } |
---|
| 584 | |
---|
| 585 | PHP_FUNCTION(caca_invert) { |
---|
[3091] | 586 | caca_canvas_t *canvas; |
---|
| 587 | FETCH_CANVAS(canvas); |
---|
[3110] | 588 | RETURN_SUCCESS(caca_invert(canvas)); |
---|
[3089] | 589 | } |
---|
| 590 | |
---|
| 591 | PHP_FUNCTION(caca_flip) { |
---|
[3091] | 592 | caca_canvas_t *canvas; |
---|
| 593 | FETCH_CANVAS(canvas); |
---|
[3110] | 594 | RETURN_SUCCESS(caca_flip(canvas)); |
---|
[3089] | 595 | } |
---|
| 596 | |
---|
| 597 | PHP_FUNCTION(caca_flop) { |
---|
[3091] | 598 | caca_canvas_t *canvas; |
---|
| 599 | FETCH_CANVAS(canvas); |
---|
[3110] | 600 | RETURN_SUCCESS(caca_flop(canvas)); |
---|
[3089] | 601 | } |
---|
| 602 | |
---|
| 603 | PHP_FUNCTION(caca_rotate_180) { |
---|
[3091] | 604 | caca_canvas_t *canvas; |
---|
| 605 | FETCH_CANVAS(canvas); |
---|
[3110] | 606 | RETURN_SUCCESS(caca_rotate_180(canvas)); |
---|
[3089] | 607 | } |
---|
| 608 | |
---|
| 609 | PHP_FUNCTION(caca_rotate_left) { |
---|
[3091] | 610 | caca_canvas_t *canvas; |
---|
| 611 | FETCH_CANVAS(canvas); |
---|
[3110] | 612 | RETURN_SUCCESS(caca_rotate_left(canvas)); |
---|
[3089] | 613 | } |
---|
| 614 | |
---|
| 615 | PHP_FUNCTION(caca_rotate_right) { |
---|
[3091] | 616 | caca_canvas_t *canvas; |
---|
| 617 | FETCH_CANVAS(canvas); |
---|
[3110] | 618 | RETURN_SUCCESS(caca_rotate_right(canvas)); |
---|
[3089] | 619 | } |
---|
| 620 | |
---|
| 621 | PHP_FUNCTION(caca_stretch_left) { |
---|
[3091] | 622 | caca_canvas_t *canvas; |
---|
| 623 | FETCH_CANVAS(canvas); |
---|
[3110] | 624 | RETURN_SUCCESS(caca_stretch_left(canvas)); |
---|
[3089] | 625 | } |
---|
| 626 | |
---|
| 627 | PHP_FUNCTION(caca_stretch_right) { |
---|
[3091] | 628 | caca_canvas_t *canvas; |
---|
| 629 | FETCH_CANVAS(canvas); |
---|
[3110] | 630 | RETURN_SUCCESS(caca_stretch_right(canvas)); |
---|
[3089] | 631 | } |
---|
| 632 | |
---|
[3091] | 633 | PHP_FUNCTION(caca_get_attr) { |
---|
[3110] | 634 | zval *_zval; |
---|
| 635 | long x, y = 0; |
---|
| 636 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rll", &_zval, &x, &y) == FAILURE) { |
---|
| 637 | RETURN_FALSE; |
---|
| 638 | } |
---|
| 639 | caca_canvas_t *canvas; |
---|
| 640 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
| 641 | RETURN_LONG(caca_get_attr(canvas, x, y)); |
---|
[3091] | 642 | } |
---|
| 643 | |
---|
[3089] | 644 | PHP_FUNCTION(caca_set_attr) { |
---|
[3112] | 645 | zval *_zval; |
---|
| 646 | long attr = 0; |
---|
[3260] | 647 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl", &_zval, &attr) == FAILURE) { |
---|
[3112] | 648 | RETURN_FALSE; |
---|
| 649 | } |
---|
| 650 | caca_canvas_t *canvas; |
---|
| 651 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
| 652 | RETURN_SUCCESS(caca_set_attr(canvas, attr)); |
---|
[3089] | 653 | } |
---|
| 654 | |
---|
| 655 | PHP_FUNCTION(caca_put_attr) { |
---|
[3110] | 656 | zval *_zval; |
---|
| 657 | long x, y, attr = 0; |
---|
| 658 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlll", &_zval, &x, &y, &attr) == FAILURE) { |
---|
| 659 | RETURN_FALSE; |
---|
| 660 | } |
---|
| 661 | caca_canvas_t *canvas; |
---|
| 662 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
| 663 | RETURN_SUCCESS(caca_put_attr(canvas, x, y, attr)); |
---|
[3089] | 664 | } |
---|
| 665 | |
---|
| 666 | PHP_FUNCTION(caca_set_color_ansi) { |
---|
[3104] | 667 | zval *_zval; |
---|
| 668 | long foreground, background = 0; |
---|
| 669 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rll", &_zval, &foreground, &background) == FAILURE) { |
---|
| 670 | RETURN_FALSE; |
---|
| 671 | } |
---|
| 672 | caca_canvas_t *canvas; |
---|
| 673 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
[3110] | 674 | RETURN_SUCCESS(caca_set_color_ansi(canvas, foreground, background)); |
---|
[3089] | 675 | } |
---|
| 676 | |
---|
| 677 | PHP_FUNCTION(caca_set_color_argb) { |
---|
[3113] | 678 | zval *_zval; |
---|
| 679 | long foreground, background = 0; |
---|
| 680 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rll", &_zval, &foreground, &background) == FAILURE) { |
---|
| 681 | RETURN_FALSE; |
---|
| 682 | } |
---|
| 683 | caca_canvas_t *canvas; |
---|
| 684 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
| 685 | RETURN_SUCCESS(caca_set_color_argb(canvas, foreground, background)); |
---|
[3089] | 686 | } |
---|
| 687 | |
---|
[3092] | 688 | PHP_FUNCTION(caca_attr_to_ansi) { |
---|
[3113] | 689 | long l; |
---|
| 690 | FETCH_LONG(l); |
---|
| 691 | RETURN_LONG(caca_attr_to_ansi(l)); |
---|
[3089] | 692 | } |
---|
| 693 | |
---|
[3092] | 694 | PHP_FUNCTION(caca_attr_to_ansi_fg) { |
---|
[3113] | 695 | long l; |
---|
| 696 | FETCH_LONG(l); |
---|
| 697 | RETURN_LONG(caca_attr_to_ansi_fg(l)); |
---|
[3089] | 698 | } |
---|
| 699 | |
---|
[3092] | 700 | PHP_FUNCTION(caca_attr_to_ansi_bg) { |
---|
[3113] | 701 | long l; |
---|
| 702 | FETCH_LONG(l); |
---|
| 703 | RETURN_LONG(caca_attr_to_ansi_bg(l)); |
---|
[3089] | 704 | } |
---|
| 705 | |
---|
[3110] | 706 | PHP_FUNCTION(caca_attr_to_rgb12_fg) { |
---|
[3113] | 707 | long l; |
---|
| 708 | FETCH_LONG(l); |
---|
| 709 | RETURN_LONG(caca_attr_to_rgb12_fg(l)); |
---|
[3110] | 710 | } |
---|
| 711 | |
---|
| 712 | PHP_FUNCTION(caca_attr_to_rgb12_bg) { |
---|
[3113] | 713 | long l; |
---|
| 714 | FETCH_LONG(l); |
---|
| 715 | RETURN_LONG(caca_attr_to_rgb12_bg(l)); |
---|
[3110] | 716 | } |
---|
| 717 | |
---|
| 718 | PHP_FUNCTION(caca_attr_to_argb64) { |
---|
[3143] | 719 | //TODO: write or delete |
---|
[3110] | 720 | } |
---|
| 721 | |
---|
| 722 | PHP_FUNCTION(caca_utf8_to_utf32) { |
---|
[3143] | 723 | //TODO: write or delete |
---|
[3110] | 724 | } |
---|
| 725 | |
---|
| 726 | PHP_FUNCTION(caca_utf32_to_utf8) { |
---|
[3143] | 727 | //TODO: write or delete |
---|
[3110] | 728 | } |
---|
| 729 | |
---|
| 730 | PHP_FUNCTION(caca_utf32_to_cp437) { |
---|
[3137] | 731 | long l; |
---|
| 732 | FETCH_LONG(l); |
---|
| 733 | RETURN_LONG(caca_utf32_to_cp437(l)); |
---|
[3110] | 734 | } |
---|
| 735 | |
---|
| 736 | PHP_FUNCTION(caca_cp437_to_utf32) { |
---|
[3137] | 737 | long l; |
---|
| 738 | FETCH_LONG(l); |
---|
| 739 | RETURN_LONG(caca_cp437_to_utf32(l)); |
---|
[3110] | 740 | } |
---|
| 741 | |
---|
| 742 | PHP_FUNCTION(caca_utf32_to_ascii) { |
---|
[3137] | 743 | long l; |
---|
| 744 | FETCH_LONG(l); |
---|
| 745 | RETURN_CHAR(caca_utf32_to_ascii(l)); |
---|
[3110] | 746 | } |
---|
| 747 | |
---|
| 748 | PHP_FUNCTION(caca_utf32_is_fullwidth) { |
---|
[3156] | 749 | //TODO: write or delete |
---|
[3110] | 750 | } |
---|
| 751 | |
---|
[3089] | 752 | PHP_FUNCTION(caca_draw_line) { |
---|
[3107] | 753 | zval *_zval; |
---|
[3132] | 754 | long xa, ya, xb, yb, c; |
---|
| 755 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlllll", &_zval, &xa, &ya, &xb, &yb, &c) == FAILURE) { |
---|
[3107] | 756 | RETURN_FALSE; |
---|
| 757 | } |
---|
| 758 | caca_canvas_t *canvas; |
---|
| 759 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
[3132] | 760 | RETURN_SUCCESS(caca_draw_line(canvas, xa, ya, xb, yb, c)); |
---|
[3089] | 761 | } |
---|
| 762 | |
---|
| 763 | PHP_FUNCTION(caca_draw_polyline) { |
---|
[3131] | 764 | zval *zval_res, *zval_arr; |
---|
[3132] | 765 | long c; |
---|
[3131] | 766 | |
---|
[3132] | 767 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "ral", &zval_res, &zval_arr, &c) == FAILURE) { |
---|
[3131] | 768 | RETURN_FALSE; |
---|
| 769 | } |
---|
| 770 | |
---|
| 771 | caca_canvas_t *canvas; |
---|
| 772 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &zval_res, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
| 773 | |
---|
| 774 | HashTable *arr_hash = Z_ARRVAL_P(zval_arr); |
---|
| 775 | int lenmax = zend_hash_num_elements(arr_hash); |
---|
| 776 | int *tbl_x, *tbl_y; |
---|
| 777 | int tbl_count = 0; |
---|
| 778 | tbl_x = malloc(sizeof(int) * lenmax); |
---|
| 779 | tbl_y = malloc(sizeof(int) * lenmax); |
---|
| 780 | |
---|
| 781 | HashPosition pos; |
---|
| 782 | zval **pt, **x, **y; |
---|
| 783 | for ( |
---|
| 784 | zend_hash_internal_pointer_reset_ex(arr_hash, &pos); |
---|
| 785 | zend_hash_get_current_data_ex(arr_hash, (void**) &pt, &pos) == SUCCESS; |
---|
| 786 | zend_hash_move_forward_ex(arr_hash, &pos) |
---|
| 787 | ) { |
---|
| 788 | if ( |
---|
| 789 | Z_TYPE_P(*pt) == IS_ARRAY |
---|
| 790 | && (zend_hash_index_find(Z_ARRVAL_P(*pt), 0, (void**) &x) != FAILURE) |
---|
| 791 | && (zend_hash_index_find(Z_ARRVAL_P(*pt), 1, (void**) &y) != FAILURE) |
---|
| 792 | ) { |
---|
| 793 | convert_to_long_ex(x); |
---|
| 794 | convert_to_long_ex(y); |
---|
| 795 | tbl_x[tbl_count] = Z_LVAL_PP(x); |
---|
| 796 | tbl_y[tbl_count] = Z_LVAL_PP(y); |
---|
| 797 | tbl_count++; |
---|
| 798 | } |
---|
| 799 | } |
---|
[3132] | 800 | int res = caca_draw_polyline(canvas, tbl_x, tbl_y, tbl_count - 1, c); |
---|
[3131] | 801 | free(tbl_x); |
---|
| 802 | free(tbl_y); |
---|
| 803 | RETURN_SUCCESS(res); |
---|
[3089] | 804 | } |
---|
| 805 | |
---|
| 806 | PHP_FUNCTION(caca_draw_thin_line) { |
---|
[3107] | 807 | zval *_zval; |
---|
| 808 | long xa, ya, xb, yb = 0; |
---|
| 809 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rllll", &_zval, &xa, &ya, &xb, &yb) == FAILURE) { |
---|
| 810 | RETURN_FALSE; |
---|
| 811 | } |
---|
| 812 | caca_canvas_t *canvas; |
---|
| 813 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
[3110] | 814 | RETURN_SUCCESS(caca_draw_thin_line(canvas, xa, ya, xb, yb)); |
---|
[3089] | 815 | } |
---|
| 816 | |
---|
| 817 | PHP_FUNCTION(caca_draw_thin_polyline) { |
---|
[3131] | 818 | zval *zval_res, *zval_arr; |
---|
| 819 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "ra", &zval_res, &zval_arr) == FAILURE) { |
---|
| 820 | RETURN_FALSE; |
---|
| 821 | } |
---|
| 822 | |
---|
| 823 | caca_canvas_t *canvas; |
---|
| 824 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &zval_res, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
| 825 | |
---|
| 826 | HashTable *arr_hash = Z_ARRVAL_P(zval_arr); |
---|
| 827 | int lenmax = zend_hash_num_elements(arr_hash); |
---|
| 828 | int *tbl_x, *tbl_y; |
---|
| 829 | int tbl_count = 0; |
---|
| 830 | tbl_x = malloc(sizeof(int) * lenmax); |
---|
| 831 | tbl_y = malloc(sizeof(int) * lenmax); |
---|
[3143] | 832 | |
---|
| 833 | if (!tbl_x || !tbl_y) { |
---|
| 834 | RETURN_FALSE; |
---|
| 835 | } |
---|
[3131] | 836 | |
---|
| 837 | HashPosition pos; |
---|
| 838 | zval **pt, **x, **y; |
---|
| 839 | for ( |
---|
| 840 | zend_hash_internal_pointer_reset_ex(arr_hash, &pos); |
---|
| 841 | zend_hash_get_current_data_ex(arr_hash, (void**) &pt, &pos) == SUCCESS; |
---|
| 842 | zend_hash_move_forward_ex(arr_hash, &pos) |
---|
| 843 | ) { |
---|
| 844 | if ( |
---|
| 845 | Z_TYPE_P(*pt) == IS_ARRAY |
---|
| 846 | && (zend_hash_index_find(Z_ARRVAL_P(*pt), 0, (void**) &x) != FAILURE) |
---|
| 847 | && (zend_hash_index_find(Z_ARRVAL_P(*pt), 1, (void**) &y) != FAILURE) |
---|
| 848 | ) { |
---|
| 849 | convert_to_long_ex(x); |
---|
| 850 | convert_to_long_ex(y); |
---|
| 851 | tbl_x[tbl_count] = Z_LVAL_PP(x); |
---|
| 852 | tbl_y[tbl_count] = Z_LVAL_PP(y); |
---|
| 853 | tbl_count++; |
---|
| 854 | } |
---|
| 855 | } |
---|
| 856 | int res = caca_draw_thin_polyline(canvas, tbl_x, tbl_y, tbl_count - 1); |
---|
| 857 | free(tbl_x); |
---|
| 858 | free(tbl_y); |
---|
| 859 | RETURN_SUCCESS(res); |
---|
[3089] | 860 | } |
---|
| 861 | |
---|
| 862 | PHP_FUNCTION(caca_draw_circle) { |
---|
[3109] | 863 | zval *_zval; |
---|
[3132] | 864 | long x, y, r, c; |
---|
| 865 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rllll", &_zval, &x, &y, &r, &c) == FAILURE) { |
---|
[3109] | 866 | RETURN_FALSE; |
---|
| 867 | } |
---|
| 868 | caca_canvas_t *canvas; |
---|
| 869 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
[3132] | 870 | RETURN_SUCCESS(caca_draw_circle(canvas, x, y, r, c)); |
---|
[3089] | 871 | } |
---|
| 872 | |
---|
| 873 | PHP_FUNCTION(caca_draw_ellipse) { |
---|
[3108] | 874 | zval *_zval; |
---|
[3132] | 875 | long xa, ya, xb, yb, c = 0; |
---|
| 876 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlllll", &_zval, &xa, &ya, &xb, &yb, &c) == FAILURE) { |
---|
[3108] | 877 | RETURN_FALSE; |
---|
| 878 | } |
---|
| 879 | caca_canvas_t *canvas; |
---|
| 880 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
[3132] | 881 | RETURN_SUCCESS(caca_draw_ellipse(canvas, xa, ya, xb, yb, c)); |
---|
[3089] | 882 | } |
---|
| 883 | |
---|
| 884 | PHP_FUNCTION(caca_draw_thin_ellipse) { |
---|
[3108] | 885 | zval *_zval; |
---|
| 886 | long xa, ya, xb, yb = 0; |
---|
| 887 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rllll", &_zval, &xa, &ya, &xb, &yb) == FAILURE) { |
---|
| 888 | RETURN_FALSE; |
---|
| 889 | } |
---|
| 890 | caca_canvas_t *canvas; |
---|
| 891 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
[3110] | 892 | RETURN_SUCCESS(caca_draw_thin_ellipse(canvas, xa, ya, xb, yb)); |
---|
[3089] | 893 | } |
---|
| 894 | |
---|
| 895 | PHP_FUNCTION(caca_fill_ellipse) { |
---|
[3108] | 896 | zval *_zval; |
---|
[3132] | 897 | long xa, ya, xb, yb, c; |
---|
| 898 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlllll", &_zval, &xa, &ya, &xb, &yb, &c) == FAILURE) { |
---|
[3108] | 899 | RETURN_FALSE; |
---|
| 900 | } |
---|
| 901 | caca_canvas_t *canvas; |
---|
| 902 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
[3132] | 903 | RETURN_SUCCESS(caca_fill_ellipse(canvas, xa, ya, xb, yb, c)); |
---|
[3089] | 904 | } |
---|
| 905 | |
---|
| 906 | PHP_FUNCTION(caca_draw_box) { |
---|
[3108] | 907 | zval *_zval; |
---|
[3132] | 908 | long xa, ya, xb, yb, c; |
---|
| 909 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlllll", &_zval, &xa, &ya, &xb, &yb, &c) == FAILURE) { |
---|
[3108] | 910 | RETURN_FALSE; |
---|
| 911 | } |
---|
| 912 | caca_canvas_t *canvas; |
---|
| 913 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
[3132] | 914 | RETURN_SUCCESS(caca_draw_box(canvas, xa, ya, xb, yb, c)); |
---|
[3089] | 915 | } |
---|
| 916 | |
---|
| 917 | PHP_FUNCTION(caca_draw_thin_box) { |
---|
[3108] | 918 | zval *_zval; |
---|
| 919 | long xa, ya, xb, yb = 0; |
---|
| 920 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rllll", &_zval, &xa, &ya, &xb, &yb) == FAILURE) { |
---|
| 921 | RETURN_FALSE; |
---|
| 922 | } |
---|
| 923 | caca_canvas_t *canvas; |
---|
| 924 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
[3110] | 925 | RETURN_SUCCESS(caca_draw_thin_box(canvas, xa, ya, xb, yb)); |
---|
[3089] | 926 | } |
---|
| 927 | |
---|
[3108] | 928 | PHP_FUNCTION(caca_draw_cp437_box) { |
---|
| 929 | zval *_zval; |
---|
[3132] | 930 | long xa, ya, xb, yb; |
---|
[3108] | 931 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rllll", &_zval, &xa, &ya, &xb, &yb) == FAILURE) { |
---|
| 932 | RETURN_FALSE; |
---|
| 933 | } |
---|
| 934 | caca_canvas_t *canvas; |
---|
| 935 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
[3110] | 936 | RETURN_SUCCESS(caca_draw_cp437_box(canvas, xa, ya, xb, yb)); |
---|
[3108] | 937 | } |
---|
| 938 | |
---|
[3089] | 939 | PHP_FUNCTION(caca_fill_box) { |
---|
[3108] | 940 | zval *_zval; |
---|
[3132] | 941 | long xa, ya, xb, yb, c; |
---|
| 942 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlllll", &_zval, &xa, &ya, &xb, &yb, &c) == FAILURE) { |
---|
[3108] | 943 | RETURN_FALSE; |
---|
| 944 | } |
---|
| 945 | caca_canvas_t *canvas; |
---|
| 946 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
[3132] | 947 | RETURN_SUCCESS(caca_fill_box(canvas, xa, ya, xb, yb, c)); |
---|
[3089] | 948 | } |
---|
| 949 | |
---|
| 950 | PHP_FUNCTION(caca_draw_triangle) { |
---|
[3109] | 951 | zval *_zval; |
---|
[3132] | 952 | long xa, ya, xb, yb, xc, yc, c; |
---|
| 953 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlllllll", &_zval, &xa, &ya, &xb, &yb, &xc, &yc, &c) == FAILURE) { |
---|
[3109] | 954 | RETURN_FALSE; |
---|
| 955 | } |
---|
| 956 | caca_canvas_t *canvas; |
---|
| 957 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
[3132] | 958 | RETURN_SUCCESS(caca_draw_triangle(canvas, xa, ya, xb, yb, xc, yc, c)); |
---|
[3089] | 959 | } |
---|
| 960 | |
---|
| 961 | PHP_FUNCTION(caca_draw_thin_triangle) { |
---|
[3109] | 962 | zval *_zval; |
---|
| 963 | long xa, ya, xb, yb, xc, yc = 0; |
---|
| 964 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rllllll", &_zval, &xa, &ya, &xb, &yb, &xc, &yc) == FAILURE) { |
---|
| 965 | RETURN_FALSE; |
---|
| 966 | } |
---|
| 967 | caca_canvas_t *canvas; |
---|
| 968 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
[3110] | 969 | RETURN_SUCCESS(caca_draw_thin_triangle(canvas, xa, ya, xb, yb, xc, yc)); |
---|
[3089] | 970 | } |
---|
| 971 | |
---|
| 972 | PHP_FUNCTION(caca_fill_triangle) { |
---|
[3109] | 973 | zval *_zval; |
---|
[3132] | 974 | long xa, ya, xb, yb, xc, yc, c = 0; |
---|
| 975 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlllllll", &_zval, &xa, &ya, &xb, &yb, &xc, &yc, &c) == FAILURE) { |
---|
[3109] | 976 | RETURN_FALSE; |
---|
| 977 | } |
---|
| 978 | caca_canvas_t *canvas; |
---|
| 979 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
[3132] | 980 | RETURN_SUCCESS(caca_fill_triangle(canvas, xa, ya, xb, yb, xc, yc, c)); |
---|
[3089] | 981 | } |
---|
| 982 | |
---|
| 983 | PHP_FUNCTION(caca_get_frame_count) { |
---|
[3113] | 984 | zval *_zval; |
---|
| 985 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) { |
---|
| 986 | RETURN_FALSE; |
---|
| 987 | } |
---|
| 988 | caca_canvas_t *canvas; |
---|
| 989 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
| 990 | RETURN_LONG(caca_get_canvas_count(canvas)); |
---|
[3089] | 991 | } |
---|
| 992 | |
---|
| 993 | PHP_FUNCTION(caca_set_frame) { |
---|
[3113] | 994 | zval *_zval; |
---|
| 995 | long id; |
---|
| 996 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl", &_zval, &id) == FAILURE) { |
---|
| 997 | RETURN_FALSE; |
---|
| 998 | } |
---|
| 999 | caca_canvas_t *canvas; |
---|
| 1000 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
| 1001 | RETURN_SUCCESS(caca_set_frame(canvas, id)); |
---|
[3089] | 1002 | } |
---|
| 1003 | |
---|
| 1004 | PHP_FUNCTION(caca_set_frame_name) { |
---|
[3113] | 1005 | zval *_zval; |
---|
| 1006 | char *str; |
---|
| 1007 | long str_len; |
---|
| 1008 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rs", &_zval, &str, &str_len) == FAILURE) { |
---|
| 1009 | RETURN_FALSE; |
---|
| 1010 | } |
---|
| 1011 | caca_canvas_t *canvas; |
---|
| 1012 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
| 1013 | RETURN_SUCCESS(caca_set_frame_name(canvas, str)); |
---|
[3089] | 1014 | } |
---|
| 1015 | |
---|
| 1016 | PHP_FUNCTION(caca_create_frame) { |
---|
[3113] | 1017 | zval *_zval; |
---|
| 1018 | long id; |
---|
| 1019 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl", &_zval, &id) == FAILURE) { |
---|
| 1020 | RETURN_FALSE; |
---|
| 1021 | } |
---|
| 1022 | caca_canvas_t *canvas; |
---|
| 1023 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
| 1024 | RETURN_SUCCESS(caca_create_frame(canvas, id)); |
---|
[3089] | 1025 | } |
---|
| 1026 | |
---|
| 1027 | PHP_FUNCTION(caca_free_frame) { |
---|
[3113] | 1028 | zval *_zval; |
---|
| 1029 | long id; |
---|
| 1030 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl", &_zval, &id) == FAILURE) { |
---|
| 1031 | RETURN_FALSE; |
---|
| 1032 | } |
---|
| 1033 | caca_canvas_t *canvas; |
---|
| 1034 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
| 1035 | RETURN_SUCCESS(caca_free_frame(canvas, id)); |
---|
[3089] | 1036 | } |
---|
| 1037 | |
---|
[3120] | 1038 | PHP_FUNCTION(caca_create_dither) { |
---|
[3123] | 1039 | zval *_zval; |
---|
| 1040 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) { |
---|
| 1041 | RETURN_FALSE; |
---|
| 1042 | } |
---|
[3153] | 1043 | #ifdef HAVE_GD |
---|
[3123] | 1044 | gdImage *img = fetch_external_resource(_zval, "gd"); |
---|
[3138] | 1045 | if (!img) { |
---|
[3123] | 1046 | RETURN_FALSE; |
---|
| 1047 | } |
---|
[3138] | 1048 | |
---|
| 1049 | caca_dither_t *dither; |
---|
| 1050 | if (img->trueColor) |
---|
| 1051 | dither = caca_create_dither(sizeof(int) * 8, img->sx, img->sy, img->sx * sizeof(int), 0x00ff0000, 0x0000ff00, 0x000000ff, 0x00000000); |
---|
| 1052 | else |
---|
| 1053 | dither = caca_create_dither(sizeof(char) * 8, img->sx, img->sy, img->sx * sizeof(char), 0, 0, 0, 0); |
---|
| 1054 | |
---|
[3149] | 1055 | if (!dither) { |
---|
| 1056 | RETURN_FALSE; |
---|
| 1057 | } |
---|
| 1058 | |
---|
[3123] | 1059 | ZEND_REGISTER_RESOURCE(return_value, dither, le_caca_dither); |
---|
[3153] | 1060 | #else |
---|
| 1061 | RETURN_FALSE |
---|
| 1062 | #endif |
---|
[3123] | 1063 | } |
---|
| 1064 | |
---|
[3089] | 1065 | PHP_FUNCTION(caca_set_dither_palette) { |
---|
[3134] | 1066 | zval *zval_res, *arr; |
---|
| 1067 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "ra", &zval_res, &arr) == FAILURE) { |
---|
| 1068 | RETURN_FALSE; |
---|
| 1069 | } |
---|
| 1070 | |
---|
| 1071 | caca_dither_t *dither; |
---|
| 1072 | ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &zval_res, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_dither); |
---|
| 1073 | |
---|
| 1074 | uint32_t tbl[4][256]; |
---|
| 1075 | zval **color, **value; |
---|
| 1076 | int i, j; |
---|
| 1077 | for (i = 0; i < 256; i++) { |
---|
[3143] | 1078 | if (zend_hash_index_find(Z_ARRVAL_P(arr), i, (void**) &color) == FAILURE || Z_TYPE_P(*color) != IS_ARRAY) { |
---|
[3134] | 1079 | RETURN_FALSE; |
---|
| 1080 | } |
---|
| 1081 | for (j = 0; j < 4; j++) { |
---|
| 1082 | if (zend_hash_index_find(Z_ARRVAL_P(*color), j, (void**) &value) == FAILURE) { |
---|
| 1083 | RETURN_FALSE; |
---|
| 1084 | } |
---|
| 1085 | convert_to_long_ex(value); |
---|
| 1086 | tbl[j][i] = Z_LVAL_PP(value); |
---|
| 1087 | } |
---|
| 1088 | } |
---|
[3138] | 1089 | RETURN_SUCCESS(caca_set_dither_palette(dither, tbl[0], tbl[1], tbl[2], tbl[3])); |
---|
[3089] | 1090 | } |
---|
| 1091 | |
---|
| 1092 | PHP_FUNCTION(caca_set_dither_brightness) { |
---|
[3117] | 1093 | zval *_zval; |
---|
| 1094 | double value; |
---|
| 1095 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rd", &_zval, &value) == FAILURE) { |
---|
| 1096 | RETURN_FALSE; |
---|
| 1097 | } |
---|
| 1098 | caca_dither_t *dither; |
---|
| 1099 | ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither); |
---|
| 1100 | RETURN_SUCCESS(caca_set_dither_brightness(dither, value)); |
---|
[3089] | 1101 | } |
---|
| 1102 | |
---|
| 1103 | PHP_FUNCTION(caca_get_dither_brightness) { |
---|
[3117] | 1104 | zval *_zval; |
---|
| 1105 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) { |
---|
| 1106 | RETURN_FALSE; |
---|
| 1107 | } |
---|
| 1108 | caca_dither_t *dither; |
---|
| 1109 | ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither); |
---|
| 1110 | RETURN_DOUBLE(caca_get_dither_brightness(dither)); |
---|
[3089] | 1111 | } |
---|
| 1112 | |
---|
| 1113 | PHP_FUNCTION(caca_set_dither_gamma) { |
---|
[3117] | 1114 | zval *_zval; |
---|
| 1115 | double value; |
---|
| 1116 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rd", &_zval, &value) == FAILURE) { |
---|
| 1117 | RETURN_FALSE; |
---|
| 1118 | } |
---|
| 1119 | caca_dither_t *dither; |
---|
| 1120 | ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither); |
---|
| 1121 | RETURN_SUCCESS(caca_set_dither_gamma(dither, value)); |
---|
[3089] | 1122 | } |
---|
| 1123 | |
---|
| 1124 | PHP_FUNCTION(caca_get_dither_gamma) { |
---|
[3117] | 1125 | zval *_zval; |
---|
| 1126 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) { |
---|
| 1127 | RETURN_FALSE; |
---|
| 1128 | } |
---|
| 1129 | caca_dither_t *dither; |
---|
| 1130 | ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither); |
---|
| 1131 | RETURN_DOUBLE(caca_get_dither_gamma(dither)); |
---|
[3089] | 1132 | } |
---|
| 1133 | |
---|
| 1134 | PHP_FUNCTION(caca_set_dither_contrast) { |
---|
[3117] | 1135 | zval *_zval; |
---|
| 1136 | double value; |
---|
| 1137 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rd", &_zval, &value) == FAILURE) { |
---|
| 1138 | RETURN_FALSE; |
---|
| 1139 | } |
---|
| 1140 | caca_dither_t *dither; |
---|
| 1141 | ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither); |
---|
| 1142 | RETURN_SUCCESS(caca_set_dither_contrast(dither, value)); |
---|
[3089] | 1143 | } |
---|
| 1144 | |
---|
| 1145 | PHP_FUNCTION(caca_get_dither_contrast) { |
---|
[3117] | 1146 | zval *_zval; |
---|
| 1147 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) { |
---|
| 1148 | RETURN_FALSE; |
---|
| 1149 | } |
---|
| 1150 | caca_dither_t *dither; |
---|
| 1151 | ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither); |
---|
| 1152 | RETURN_DOUBLE(caca_get_dither_contrast(dither)); |
---|
[3089] | 1153 | } |
---|
| 1154 | |
---|
| 1155 | PHP_FUNCTION(caca_set_dither_antialias) { |
---|
[3117] | 1156 | zval *_zval; |
---|
| 1157 | int str_len; |
---|
| 1158 | char *str; |
---|
| 1159 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rs", &_zval, &str, &str_len) == FAILURE) { |
---|
| 1160 | RETURN_FALSE; |
---|
| 1161 | } |
---|
| 1162 | caca_dither_t *dither; |
---|
| 1163 | ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither); |
---|
| 1164 | RETURN_SUCCESS(caca_set_dither_antialias(dither, str)); |
---|
[3089] | 1165 | } |
---|
| 1166 | |
---|
| 1167 | PHP_FUNCTION(caca_get_dither_antialias_list) { |
---|
[3149] | 1168 | zval *_zval; |
---|
| 1169 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) { |
---|
| 1170 | RETURN_FALSE; |
---|
| 1171 | } |
---|
| 1172 | caca_dither_t *dither; |
---|
| 1173 | ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither); |
---|
| 1174 | |
---|
| 1175 | char const * const *list = caca_get_dither_antialias_list(dither); |
---|
| 1176 | int i; |
---|
| 1177 | array_init(return_value); |
---|
| 1178 | for(i = 0; list[i]; i += 1) |
---|
| 1179 | add_next_index_string(return_value, (char*) list[i], 1); |
---|
[3089] | 1180 | } |
---|
| 1181 | |
---|
| 1182 | PHP_FUNCTION(caca_get_dither_antialias) { |
---|
[3117] | 1183 | zval *_zval; |
---|
| 1184 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) { |
---|
| 1185 | RETURN_FALSE; |
---|
| 1186 | } |
---|
| 1187 | caca_dither_t *dither; |
---|
| 1188 | ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither); |
---|
| 1189 | RETURN_STRING((char *) caca_get_dither_antialias(dither), 1); |
---|
[3089] | 1190 | } |
---|
| 1191 | |
---|
| 1192 | PHP_FUNCTION(caca_set_dither_color) { |
---|
[3117] | 1193 | zval *_zval; |
---|
| 1194 | int str_len; |
---|
| 1195 | char *str; |
---|
| 1196 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rs", &_zval, &str, &str_len) == FAILURE) { |
---|
| 1197 | RETURN_FALSE; |
---|
| 1198 | } |
---|
| 1199 | caca_dither_t *dither; |
---|
| 1200 | ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither); |
---|
| 1201 | RETURN_SUCCESS(caca_set_dither_color(dither, str)); |
---|
[3089] | 1202 | } |
---|
| 1203 | |
---|
| 1204 | PHP_FUNCTION(caca_get_dither_color_list) { |
---|
[3114] | 1205 | zval *_zval; |
---|
| 1206 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) { |
---|
| 1207 | RETURN_FALSE; |
---|
| 1208 | } |
---|
| 1209 | caca_dither_t *dither; |
---|
| 1210 | ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither); |
---|
| 1211 | |
---|
| 1212 | char const * const *list = caca_get_dither_antialias_list(dither); |
---|
| 1213 | int i; |
---|
| 1214 | array_init(return_value); |
---|
| 1215 | for(i = 0; list[i]; i += 2) |
---|
| 1216 | add_assoc_string(return_value, (char*) list[i], (char*) list[i + 1], 1); |
---|
[3089] | 1217 | } |
---|
| 1218 | |
---|
| 1219 | PHP_FUNCTION(caca_get_dither_color) { |
---|
[3115] | 1220 | zval *_zval; |
---|
| 1221 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) { |
---|
| 1222 | RETURN_FALSE; |
---|
| 1223 | } |
---|
| 1224 | caca_dither_t *dither; |
---|
| 1225 | ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither); |
---|
| 1226 | RETURN_STRING((char *) caca_get_dither_color(dither), 1); |
---|
[3089] | 1227 | } |
---|
| 1228 | |
---|
| 1229 | PHP_FUNCTION(caca_set_dither_charset) { |
---|
[3117] | 1230 | zval *_zval; |
---|
| 1231 | int str_len; |
---|
| 1232 | char *str; |
---|
| 1233 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rs", &_zval, &str, &str_len) == FAILURE) { |
---|
| 1234 | RETURN_FALSE; |
---|
| 1235 | } |
---|
| 1236 | caca_dither_t *dither; |
---|
| 1237 | ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither); |
---|
| 1238 | RETURN_SUCCESS(caca_set_dither_charset(dither, str)); |
---|
[3089] | 1239 | } |
---|
| 1240 | |
---|
| 1241 | PHP_FUNCTION(caca_get_dither_charset_list) { |
---|
[3114] | 1242 | zval *_zval; |
---|
| 1243 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) { |
---|
| 1244 | RETURN_FALSE; |
---|
| 1245 | } |
---|
| 1246 | caca_dither_t *dither; |
---|
| 1247 | ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither); |
---|
| 1248 | |
---|
| 1249 | char const * const *list = caca_get_dither_charset_list(dither); |
---|
| 1250 | int i; |
---|
| 1251 | array_init(return_value); |
---|
| 1252 | for(i = 0; list[i]; i += 2) |
---|
| 1253 | add_assoc_string(return_value, (char*) list[i], (char*) list[i + 1], 1); |
---|
[3089] | 1254 | } |
---|
| 1255 | |
---|
| 1256 | PHP_FUNCTION(caca_get_dither_charset) { |
---|
[3115] | 1257 | zval *_zval; |
---|
| 1258 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) { |
---|
| 1259 | RETURN_FALSE; |
---|
| 1260 | } |
---|
| 1261 | caca_dither_t *dither; |
---|
| 1262 | ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither); |
---|
| 1263 | RETURN_STRING((char *) caca_get_dither_charset(dither), 1); |
---|
[3089] | 1264 | } |
---|
| 1265 | |
---|
| 1266 | PHP_FUNCTION(caca_set_dither_algorithm) { |
---|
[3117] | 1267 | zval *_zval; |
---|
| 1268 | int str_len; |
---|
| 1269 | char *str; |
---|
| 1270 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rs", &_zval, &str, &str_len) == FAILURE) { |
---|
| 1271 | RETURN_FALSE; |
---|
| 1272 | } |
---|
| 1273 | caca_dither_t *dither; |
---|
| 1274 | ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither); |
---|
| 1275 | RETURN_SUCCESS(caca_set_dither_algorithm(dither, str)); |
---|
[3089] | 1276 | } |
---|
| 1277 | |
---|
| 1278 | PHP_FUNCTION(caca_get_dither_algorithm_list) { |
---|
[3114] | 1279 | zval *_zval; |
---|
| 1280 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) { |
---|
| 1281 | RETURN_FALSE; |
---|
| 1282 | } |
---|
| 1283 | caca_dither_t *dither; |
---|
| 1284 | ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither); |
---|
| 1285 | |
---|
| 1286 | char const * const *list = caca_get_dither_algorithm_list(dither); |
---|
| 1287 | int i; |
---|
| 1288 | array_init(return_value); |
---|
| 1289 | for(i = 0; list[i]; i += 2) |
---|
| 1290 | add_assoc_string(return_value, (char*) list[i], (char*) list[i + 1], 1); |
---|
[3089] | 1291 | } |
---|
| 1292 | |
---|
| 1293 | PHP_FUNCTION(caca_get_dither_algorithm) { |
---|
[3115] | 1294 | zval *_zval; |
---|
| 1295 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) { |
---|
| 1296 | RETURN_FALSE; |
---|
| 1297 | } |
---|
| 1298 | caca_dither_t *dither; |
---|
| 1299 | ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither); |
---|
| 1300 | RETURN_STRING((char *) caca_get_dither_algorithm(dither), 1); |
---|
[3089] | 1301 | } |
---|
| 1302 | |
---|
[3148] | 1303 | PHP_FUNCTION(caca_dither_bitmap) { |
---|
[3120] | 1304 | zval *_zval1, *_zval2, *_zval3; |
---|
| 1305 | long x, y, w, h = 0; |
---|
[3148] | 1306 | zend_bool load_palette = 1; |
---|
| 1307 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rllllrr|b", &_zval1, &x, &y, &w, &h, &_zval2, &_zval3, &load_palette) == FAILURE) { |
---|
[3117] | 1308 | RETURN_FALSE; |
---|
| 1309 | } |
---|
[3120] | 1310 | |
---|
| 1311 | caca_canvas_t *canvas; |
---|
| 1312 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval1, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
| 1313 | caca_dither_t *dither; |
---|
| 1314 | ZEND_FETCH_RESOURCE(dither, caca_dither_t*, &_zval2, -1, PHP_CACA_DITHER_RES_NAME, le_caca_dither); |
---|
| 1315 | |
---|
[3153] | 1316 | #ifdef HAVE_GD |
---|
[3120] | 1317 | gdImage *img = fetch_external_resource(_zval3, "gd"); |
---|
| 1318 | if (!img) { |
---|
| 1319 | RETURN_FALSE; |
---|
[3119] | 1320 | } |
---|
[3120] | 1321 | |
---|
[3122] | 1322 | void *pixels = gd_get_pixels(img); |
---|
| 1323 | if (!pixels) { |
---|
| 1324 | RETURN_FALSE; |
---|
[3120] | 1325 | } |
---|
[3122] | 1326 | |
---|
[3148] | 1327 | //load palette if image is not true color |
---|
| 1328 | if (load_palette && !img->trueColor && gd_load_palette(img, dither) != 0) { |
---|
| 1329 | RETURN_FALSE; |
---|
| 1330 | } |
---|
| 1331 | |
---|
[3122] | 1332 | caca_dither_bitmap(canvas, x, y, w, h, dither, pixels); |
---|
| 1333 | free(pixels); |
---|
| 1334 | RETURN_TRUE; |
---|
[3153] | 1335 | #else |
---|
| 1336 | RETURN_FALSE; |
---|
| 1337 | #endif |
---|
[3089] | 1338 | } |
---|
| 1339 | |
---|
[3127] | 1340 | PHP_FUNCTION(caca_load_font) { |
---|
[3129] | 1341 | char *str; |
---|
| 1342 | long str_len; |
---|
| 1343 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &str, &str_len) == FAILURE) { |
---|
| 1344 | RETURN_FALSE; |
---|
| 1345 | } |
---|
| 1346 | caca_font_t *font = caca_load_font(str, str_len); |
---|
[3149] | 1347 | if (!font) { |
---|
| 1348 | RETURN_FALSE; |
---|
| 1349 | } |
---|
[3129] | 1350 | ZEND_REGISTER_RESOURCE(return_value, font, le_caca_font); |
---|
[3127] | 1351 | } |
---|
| 1352 | |
---|
[3149] | 1353 | PHP_FUNCTION(caca_load_builtin_font) { |
---|
| 1354 | char *str; |
---|
| 1355 | long str_len; |
---|
| 1356 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &str, &str_len) == FAILURE) { |
---|
| 1357 | RETURN_FALSE; |
---|
| 1358 | } |
---|
| 1359 | caca_font_t *font = caca_load_font(str, 0); |
---|
| 1360 | if (!font) { |
---|
| 1361 | RETURN_FALSE; |
---|
| 1362 | } |
---|
| 1363 | ZEND_REGISTER_RESOURCE(return_value, font, le_caca_font); |
---|
| 1364 | } |
---|
| 1365 | |
---|
[3089] | 1366 | PHP_FUNCTION(caca_get_font_list) { |
---|
[3156] | 1367 | if (ZEND_NUM_ARGS() != 0) { |
---|
| 1368 | WRONG_PARAM_COUNT; |
---|
| 1369 | } |
---|
[3114] | 1370 | char const * const *list = caca_get_font_list(); |
---|
| 1371 | int i; |
---|
| 1372 | array_init(return_value); |
---|
| 1373 | for(i = 0; list[i]; i += 1) |
---|
| 1374 | add_next_index_string(return_value, (char*) list[i], 1); |
---|
[3089] | 1375 | } |
---|
| 1376 | |
---|
| 1377 | PHP_FUNCTION(caca_get_font_width) { |
---|
[3114] | 1378 | zval *_zval; |
---|
| 1379 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) { |
---|
| 1380 | RETURN_FALSE; |
---|
| 1381 | } |
---|
| 1382 | caca_font_t *font; |
---|
| 1383 | ZEND_FETCH_RESOURCE(font, caca_font_t*, &_zval, -1, PHP_CACA_FONT_RES_NAME, le_caca_font); |
---|
| 1384 | RETURN_LONG(caca_get_font_width(font)); |
---|
[3089] | 1385 | } |
---|
| 1386 | |
---|
| 1387 | PHP_FUNCTION(caca_get_font_height) { |
---|
[3114] | 1388 | zval *_zval; |
---|
| 1389 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) { |
---|
| 1390 | RETURN_FALSE; |
---|
| 1391 | } |
---|
| 1392 | caca_font_t *font; |
---|
| 1393 | ZEND_FETCH_RESOURCE(font, caca_font_t*, &_zval, -1, PHP_CACA_FONT_RES_NAME, le_caca_font); |
---|
| 1394 | RETURN_LONG(caca_get_font_height(font)); |
---|
[3089] | 1395 | } |
---|
| 1396 | |
---|
[3129] | 1397 | PHP_FUNCTION(caca_get_font_blocks) { |
---|
| 1398 | zval *_zval; |
---|
| 1399 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) { |
---|
| 1400 | RETURN_FALSE; |
---|
| 1401 | } |
---|
| 1402 | caca_font_t *font; |
---|
| 1403 | ZEND_FETCH_RESOURCE(font, caca_font_t*, &_zval, -1, PHP_CACA_FONT_RES_NAME, le_caca_font); |
---|
| 1404 | |
---|
| 1405 | uint32_t const *list = caca_get_font_blocks(font); |
---|
| 1406 | |
---|
| 1407 | int i; |
---|
| 1408 | array_init(return_value); |
---|
| 1409 | for(i = 0; list[i]; i += 1) |
---|
| 1410 | add_next_index_long(return_value, list[i]); |
---|
[3127] | 1411 | } |
---|
| 1412 | |
---|
[3089] | 1413 | PHP_FUNCTION(caca_render_canvas) { |
---|
[3149] | 1414 | zval *_zval1, *_zval2, *_zval3; |
---|
| 1415 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rrr", &_zval1, &_zval2, &_zval3) == FAILURE) { |
---|
| 1416 | RETURN_FALSE; |
---|
| 1417 | } |
---|
| 1418 | caca_canvas_t *canvas; |
---|
| 1419 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval1, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
| 1420 | caca_font_t *font; |
---|
| 1421 | ZEND_FETCH_RESOURCE(font, caca_font_t*, &_zval2, -1, PHP_CACA_FONT_RES_NAME, le_caca_font); |
---|
| 1422 | |
---|
[3153] | 1423 | #ifdef HAVE_GD |
---|
[3149] | 1424 | gdImage *img = fetch_external_resource(_zval3, "gd"); |
---|
| 1425 | if (!img || !img->trueColor) { |
---|
| 1426 | RETURN_FALSE; |
---|
| 1427 | } |
---|
| 1428 | |
---|
[3150] | 1429 | int pitch = img->sx * 4; |
---|
| 1430 | uint8_t *buffer = malloc(pitch * img->sy); |
---|
[3149] | 1431 | if (!buffer) { |
---|
| 1432 | RETURN_FALSE; |
---|
| 1433 | } |
---|
| 1434 | |
---|
[3150] | 1435 | caca_render_canvas(canvas, font, (void *) buffer, img->sx, img->sy, pitch); |
---|
| 1436 | int i, j; |
---|
| 1437 | for (i = 0; i < img->sy; i++) { |
---|
| 1438 | for (j = 0; j < img->sx; j++) { |
---|
| 1439 | uint8_t *src = buffer + i * pitch + j * 4; |
---|
| 1440 | img->tpixels[i][j] = *(src + 3) | (*(src + 2) << 8) | (*(src + 1) << 16) | (*(src + 0) << 24); |
---|
| 1441 | } |
---|
| 1442 | } |
---|
[3149] | 1443 | |
---|
| 1444 | free(buffer); |
---|
| 1445 | RETURN_TRUE; |
---|
[3153] | 1446 | #else |
---|
| 1447 | RETURN_FALSE; |
---|
| 1448 | #endif |
---|
[3089] | 1449 | } |
---|
| 1450 | |
---|
| 1451 | PHP_FUNCTION(caca_canvas_set_figfont) { |
---|
[3126] | 1452 | zval *_zval; |
---|
| 1453 | char *font; |
---|
| 1454 | long font_len; |
---|
| 1455 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rs", &_zval, &font, &font_len) == FAILURE) { |
---|
| 1456 | RETURN_FALSE; |
---|
| 1457 | } |
---|
| 1458 | caca_canvas_t *canvas; |
---|
| 1459 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
| 1460 | RETURN_SUCCESS(caca_canvas_set_figfont(canvas, font)); |
---|
[3089] | 1461 | } |
---|
| 1462 | |
---|
| 1463 | PHP_FUNCTION(caca_put_figchar) { |
---|
[3129] | 1464 | zval *_zval; |
---|
| 1465 | long c; |
---|
| 1466 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl", &_zval, &c) == FAILURE) { |
---|
| 1467 | RETURN_FALSE; |
---|
| 1468 | } |
---|
| 1469 | caca_canvas_t *canvas; |
---|
| 1470 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
| 1471 | |
---|
[3131] | 1472 | RETURN_SUCCESS(caca_put_figchar(canvas, c)); |
---|
[3089] | 1473 | } |
---|
| 1474 | |
---|
| 1475 | PHP_FUNCTION(caca_flush_figlet) { |
---|
[3126] | 1476 | zval *_zval; |
---|
| 1477 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) { |
---|
| 1478 | RETURN_FALSE; |
---|
| 1479 | } |
---|
| 1480 | caca_canvas_t *canvas; |
---|
| 1481 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
| 1482 | RETURN_SUCCESS(caca_flush_figlet(canvas)); |
---|
[3089] | 1483 | } |
---|
| 1484 | |
---|
[3126] | 1485 | PHP_FUNCTION(caca_file_open) { |
---|
| 1486 | char *path, *mode; |
---|
| 1487 | long path_len, mode_len; |
---|
| 1488 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "ss", &path, &path_len, &mode, &mode_len) == FAILURE) { |
---|
| 1489 | RETURN_FALSE; |
---|
| 1490 | } |
---|
| 1491 | caca_file_t *file = caca_file_open(path, mode); |
---|
[3149] | 1492 | if (!file) { |
---|
| 1493 | RETURN_FALSE; |
---|
| 1494 | } |
---|
[3126] | 1495 | ZEND_REGISTER_RESOURCE(return_value, file, le_caca_file); |
---|
| 1496 | } |
---|
| 1497 | |
---|
[3089] | 1498 | PHP_FUNCTION(caca_file_close) { |
---|
[3126] | 1499 | zval *_zval; |
---|
| 1500 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) { |
---|
| 1501 | RETURN_FALSE; |
---|
| 1502 | } |
---|
| 1503 | caca_file_t *file; |
---|
| 1504 | ZEND_FETCH_RESOURCE(file, caca_file_t*, &_zval, -1, PHP_CACA_FILE_RES_NAME, le_caca_file); |
---|
[3150] | 1505 | |
---|
| 1506 | int res = caca_file_close(file); |
---|
| 1507 | |
---|
| 1508 | //Delete php resource |
---|
| 1509 | zend_list_delete(_zval->value.lval); |
---|
| 1510 | RETURN_SUCCESS(res); |
---|
[3089] | 1511 | } |
---|
| 1512 | |
---|
[3092] | 1513 | PHP_FUNCTION(caca_file_tell) { |
---|
[3126] | 1514 | zval *_zval; |
---|
| 1515 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) { |
---|
| 1516 | RETURN_FALSE; |
---|
| 1517 | } |
---|
| 1518 | caca_file_t *file; |
---|
| 1519 | ZEND_FETCH_RESOURCE(file, caca_file_t*, &_zval, -1, PHP_CACA_FILE_RES_NAME, le_caca_file); |
---|
| 1520 | RETURN_LONG(caca_file_tell(file)); |
---|
[3092] | 1521 | } |
---|
| 1522 | |
---|
| 1523 | PHP_FUNCTION(caca_file_read) { |
---|
[3127] | 1524 | zval *_zval; |
---|
| 1525 | long len; |
---|
| 1526 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl", &_zval, &len) == FAILURE) { |
---|
| 1527 | RETURN_FALSE; |
---|
| 1528 | } |
---|
| 1529 | caca_file_t *file; |
---|
| 1530 | ZEND_FETCH_RESOURCE(file, caca_file_t*, &_zval, -1, PHP_CACA_FILE_RES_NAME, le_caca_file); |
---|
| 1531 | |
---|
[3128] | 1532 | if (len < 1) { |
---|
| 1533 | RETURN_FALSE; |
---|
| 1534 | } |
---|
[3127] | 1535 | char *buffer = emalloc(len); |
---|
[3128] | 1536 | if (!buffer) { |
---|
| 1537 | RETURN_FALSE; |
---|
| 1538 | } |
---|
[3127] | 1539 | caca_file_read(file, buffer, len); |
---|
| 1540 | |
---|
[3188] | 1541 | RETURN_STRINGL(buffer, len, 1); |
---|
[3092] | 1542 | } |
---|
| 1543 | |
---|
| 1544 | PHP_FUNCTION(caca_file_write) { |
---|
[3127] | 1545 | zval *_zval; |
---|
| 1546 | char *buf; |
---|
| 1547 | long buf_len = 0; |
---|
| 1548 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rs", &_zval, &buf, &buf_len) == FAILURE) { |
---|
| 1549 | RETURN_FALSE; |
---|
| 1550 | } |
---|
| 1551 | caca_file_t *file; |
---|
| 1552 | ZEND_FETCH_RESOURCE(file, caca_file_t*, &_zval, -1, PHP_CACA_FILE_RES_NAME, le_caca_file); |
---|
| 1553 | RETURN_LONG(caca_file_write(file, buf, buf_len)); |
---|
[3092] | 1554 | } |
---|
| 1555 | |
---|
[3089] | 1556 | PHP_FUNCTION(caca_file_gets) { |
---|
[3128] | 1557 | zval *_zval; |
---|
| 1558 | long len = 0; |
---|
| 1559 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl", &_zval, &len) == FAILURE) { |
---|
| 1560 | RETURN_FALSE; |
---|
| 1561 | } |
---|
| 1562 | caca_file_t *file; |
---|
| 1563 | ZEND_FETCH_RESOURCE(file, caca_file_t*, &_zval, -1, PHP_CACA_FILE_RES_NAME, le_caca_file); |
---|
| 1564 | |
---|
| 1565 | if (len < 1) { |
---|
| 1566 | RETURN_FALSE; |
---|
| 1567 | } |
---|
| 1568 | char *buffer = emalloc(len); |
---|
| 1569 | if (!buffer) { |
---|
| 1570 | RETURN_FALSE; |
---|
| 1571 | } |
---|
| 1572 | char *result = caca_file_gets(file, buffer, len); |
---|
| 1573 | if (!result) { |
---|
| 1574 | RETURN_FALSE; |
---|
| 1575 | } |
---|
[3188] | 1576 | RETURN_STRINGL(result, len, 1); |
---|
[3089] | 1577 | } |
---|
| 1578 | |
---|
| 1579 | PHP_FUNCTION(caca_file_eof) { |
---|
[3126] | 1580 | zval *_zval; |
---|
| 1581 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) { |
---|
| 1582 | RETURN_FALSE; |
---|
| 1583 | } |
---|
| 1584 | caca_file_t *file; |
---|
| 1585 | ZEND_FETCH_RESOURCE(file, caca_file_t*, &_zval, -1, PHP_CACA_FILE_RES_NAME, le_caca_file); |
---|
| 1586 | RETURN_BOOL(caca_file_eof(file) != 0); |
---|
[3089] | 1587 | } |
---|
| 1588 | |
---|
[3112] | 1589 | PHP_FUNCTION(caca_import_string) { |
---|
[3104] | 1590 | zval *_zval; |
---|
[3126] | 1591 | char *src, *format; |
---|
| 1592 | long src_len, format_len = 0; |
---|
| 1593 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rss", &_zval, &src, &src_len, &format, &format_len) == FAILURE) { |
---|
[3104] | 1594 | RETURN_FALSE; |
---|
| 1595 | } |
---|
| 1596 | caca_canvas_t *canvas; |
---|
| 1597 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
| 1598 | |
---|
[3126] | 1599 | RETURN_LONG(caca_import_memory(canvas, src, src_len, format)); |
---|
[3089] | 1600 | } |
---|
| 1601 | |
---|
[3092] | 1602 | PHP_FUNCTION(caca_import_file) { |
---|
[3126] | 1603 | zval *_zval; |
---|
| 1604 | char *filename, *format; |
---|
| 1605 | long filename_len, format_len = 0; |
---|
| 1606 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rss", &_zval, &filename, &filename_len, &format, &format_len) == FAILURE) { |
---|
| 1607 | RETURN_FALSE; |
---|
| 1608 | } |
---|
| 1609 | caca_canvas_t *canvas; |
---|
| 1610 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
| 1611 | |
---|
| 1612 | RETURN_LONG(caca_import_file(canvas, filename, format)); |
---|
[3089] | 1613 | } |
---|
| 1614 | |
---|
[3092] | 1615 | PHP_FUNCTION(caca_get_import_list) { |
---|
[3156] | 1616 | if (ZEND_NUM_ARGS() != 0) { |
---|
| 1617 | WRONG_PARAM_COUNT; |
---|
| 1618 | } |
---|
[3126] | 1619 | char const * const *list = caca_get_import_list(); |
---|
| 1620 | int i; |
---|
| 1621 | array_init(return_value); |
---|
| 1622 | for(i = 0; list[i]; i += 2) |
---|
| 1623 | add_assoc_string(return_value, (char*) list[i], (char*) list[i + 1], 1); |
---|
[3092] | 1624 | } |
---|
| 1625 | |
---|
[3112] | 1626 | PHP_FUNCTION(caca_export_string) { |
---|
| 1627 | zval *_zval; |
---|
| 1628 | char *type; |
---|
| 1629 | long type_len; |
---|
| 1630 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rs", &_zval, &type, &type_len) == FAILURE) { |
---|
| 1631 | RETURN_FALSE; |
---|
| 1632 | } |
---|
| 1633 | caca_canvas_t *canvas; |
---|
| 1634 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
| 1635 | |
---|
[3128] | 1636 | void *buffer, *copy; |
---|
[3187] | 1637 | size_t len = 0; |
---|
[3112] | 1638 | buffer = caca_export_memory(canvas, type, &len); |
---|
[3128] | 1639 | copy = emalloc(len); |
---|
[3143] | 1640 | if (!buffer || !copy) { |
---|
[3121] | 1641 | RETURN_FALSE; |
---|
| 1642 | } |
---|
[3128] | 1643 | memcpy(copy, buffer, len); |
---|
| 1644 | free(buffer); |
---|
| 1645 | |
---|
[3188] | 1646 | RETURN_STRINGL((char*) copy, len, 0); |
---|
[3112] | 1647 | } |
---|
| 1648 | |
---|
[3089] | 1649 | PHP_FUNCTION(caca_get_export_list) { |
---|
[3156] | 1650 | if (ZEND_NUM_ARGS() != 0) { |
---|
| 1651 | WRONG_PARAM_COUNT; |
---|
| 1652 | } |
---|
[3114] | 1653 | char const * const *list = caca_get_export_list(); |
---|
| 1654 | int i; |
---|
| 1655 | array_init(return_value); |
---|
| 1656 | for(i = 0; list[i]; i += 2) |
---|
| 1657 | add_assoc_string(return_value, (char*) list[i], (char*) list[i + 1], 1); |
---|
[3089] | 1658 | } |
---|
| 1659 | |
---|
[3092] | 1660 | PHP_FUNCTION(caca_create_display) { |
---|
[3104] | 1661 | caca_canvas_t *canvas; |
---|
| 1662 | FETCH_CANVAS(canvas); |
---|
| 1663 | |
---|
| 1664 | caca_display_t *display = caca_create_display(canvas); |
---|
[3149] | 1665 | if (!display) { |
---|
| 1666 | RETURN_FALSE; |
---|
| 1667 | } |
---|
[3104] | 1668 | ZEND_REGISTER_RESOURCE(return_value, display, le_caca_display); |
---|
[3092] | 1669 | } |
---|
| 1670 | |
---|
| 1671 | PHP_FUNCTION(caca_create_display_with_driver) { |
---|
[3104] | 1672 | zval *_zval; |
---|
| 1673 | char *str; |
---|
| 1674 | long str_len = 0; |
---|
| 1675 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rs", &_zval, &str, &str_len) == FAILURE) { |
---|
| 1676 | RETURN_FALSE; |
---|
| 1677 | } |
---|
| 1678 | caca_canvas_t *canvas; |
---|
| 1679 | ZEND_FETCH_RESOURCE(canvas, caca_canvas_t*, &_zval, -1, PHP_CACA_CANVAS_RES_NAME, le_caca_canvas); |
---|
| 1680 | |
---|
| 1681 | caca_display_t *display = caca_create_display_with_driver(canvas, str); |
---|
| 1682 | if (!display) { |
---|
| 1683 | RETURN_FALSE; |
---|
| 1684 | } |
---|
| 1685 | ZEND_REGISTER_RESOURCE(return_value, display, le_caca_display); |
---|
[3092] | 1686 | } |
---|
| 1687 | |
---|
[3089] | 1688 | PHP_FUNCTION(caca_get_display_driver_list) { |
---|
[3156] | 1689 | if (ZEND_NUM_ARGS() != 0) { |
---|
| 1690 | WRONG_PARAM_COUNT; |
---|
| 1691 | } |
---|
[3113] | 1692 | char const * const *list = caca_get_display_driver_list(); |
---|
| 1693 | int i; |
---|
| 1694 | array_init(return_value); |
---|
| 1695 | for(i = 0; list[i]; i += 2) |
---|
| 1696 | add_assoc_string(return_value, (char*) list[i], (char*) list[i + 1], 1); |
---|
[3089] | 1697 | } |
---|
| 1698 | |
---|
| 1699 | PHP_FUNCTION(caca_get_display_driver) { |
---|
[3113] | 1700 | zval *_zval; |
---|
| 1701 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) { |
---|
| 1702 | RETURN_FALSE; |
---|
| 1703 | } |
---|
| 1704 | caca_display_t *display; |
---|
| 1705 | ZEND_FETCH_RESOURCE(display, caca_display_t*, &_zval, -1, PHP_CACA_DISPLAY_RES_NAME, le_caca_display); |
---|
| 1706 | RETURN_STRING((char *) caca_get_display_driver(display), 1); |
---|
[3089] | 1707 | } |
---|
| 1708 | |
---|
| 1709 | PHP_FUNCTION(caca_set_display_driver) { |
---|
[3113] | 1710 | zval *_zval; |
---|
| 1711 | char *str; |
---|
| 1712 | long str_len; |
---|
| 1713 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rs", &_zval, &str, &str_len) == FAILURE) { |
---|
| 1714 | RETURN_FALSE; |
---|
| 1715 | } |
---|
| 1716 | caca_display_t *display; |
---|
| 1717 | ZEND_FETCH_RESOURCE(display, caca_display_t*, &_zval, -1, PHP_CACA_DISPLAY_RES_NAME, le_caca_display); |
---|
| 1718 | RETURN_SUCESS(caca_set_display_driver(display, str)); |
---|
[3089] | 1719 | } |
---|
| 1720 | |
---|
[3092] | 1721 | PHP_FUNCTION(caca_get_canvas) { |
---|
[3113] | 1722 | zval *_zval; |
---|
| 1723 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &_zval) == FAILURE) { |
---|
| 1724 | RETURN_FALSE; |
---|
| 1725 | } |
---|
| 1726 | caca_display_t *display; |
---|
| 1727 | ZEND_FETCH_RESOURCE(display, caca_display_t*, &_zval, -1, PHP_CACA_DISPLAY_RES_NAME, le_caca_display); |
---|
| 1728 | caca_canvas_t *canvas = caca_get_canvas(display); |
---|
[3149] | 1729 | if (!canvas) { |
---|
| 1730 | RETURN_FALSE; |
---|
| 1731 | } |
---|
[3113] | 1732 | ZEND_REGISTER_RESOURCE(return_value, canvas, le_caca_canvas); |
---|
[3092] | 1733 | } |
---|
| 1734 | |
---|
[3089] | 1735 | PHP_FUNCTION(caca_refresh_display) { |
---|
[3104] | 1736 | caca_display_t *display; |
---|
| 1737 | FETCH_DISPLAY(display); |
---|
[3110] | 1738 | RETURN_SUCCESS(caca_refresh_display(display)); |
---|
[3089] | 1739 | } |
---|
| 1740 | |
---|
| 1741 | PHP_FUNCTION(caca_set_display_time) { |
---|
[3105] | 1742 | zval *_zval; |
---|
| 1743 | long value = 0; |
---|
| 1744 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl", &_zval, &value) == FAILURE) { |
---|
| 1745 | RETURN_FALSE; |
---|
| 1746 | } |
---|
| 1747 | caca_display_t *display; |
---|
| 1748 | ZEND_FETCH_RESOURCE(display, caca_display_t*, &_zval, -1, PHP_CACA_DISPLAY_RES_NAME, le_caca_display); |
---|
[3110] | 1749 | RETURN_SUCCESS(caca_set_display_time(display, value)); |
---|
[3089] | 1750 | } |
---|
| 1751 | |
---|
| 1752 | PHP_FUNCTION(caca_get_display_time) { |
---|
[3094] | 1753 | caca_display_t *display; |
---|
| 1754 | FETCH_DISPLAY(display); |
---|
[3126] | 1755 | RETURN_LONG(caca_get_display_time(display)); |
---|
[3089] | 1756 | } |
---|
| 1757 | |
---|
| 1758 | PHP_FUNCTION(caca_get_display_width) { |
---|
[3094] | 1759 | caca_display_t *display; |
---|
| 1760 | FETCH_DISPLAY(display); |
---|
| 1761 | RETURN_LONG(caca_get_display_width(display)); |
---|
[3089] | 1762 | } |
---|
| 1763 | |
---|
| 1764 | PHP_FUNCTION(caca_get_display_height) { |
---|
[3094] | 1765 | caca_display_t *display; |
---|
| 1766 | FETCH_DISPLAY(display); |
---|
| 1767 | RETURN_LONG(caca_get_display_height(display)); |
---|
[3089] | 1768 | } |
---|
| 1769 | |
---|
| 1770 | PHP_FUNCTION(caca_set_display_title) { |
---|
[3094] | 1771 | zval *_zval; |
---|
| 1772 | char *str; |
---|
| 1773 | long str_len = 0; |
---|
| 1774 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rs", &_zval, &str, &str_len) == FAILURE) { |
---|
| 1775 | RETURN_FALSE; |
---|
| 1776 | } |
---|
| 1777 | caca_display_t *display; |
---|
| 1778 | ZEND_FETCH_RESOURCE(display, caca_display_t*, &_zval, -1, PHP_CACA_DISPLAY_RES_NAME, le_caca_display); |
---|
[3110] | 1779 | RETURN_SUCCESS(caca_set_display(display, str)); |
---|
[3089] | 1780 | } |
---|
| 1781 | |
---|
| 1782 | PHP_FUNCTION(caca_set_mouse) { |
---|
[3094] | 1783 | zval *_zval; |
---|
| 1784 | long value = 0; |
---|
| 1785 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl", &_zval, &value) == FAILURE) { |
---|
| 1786 | RETURN_FALSE; |
---|
| 1787 | } |
---|
| 1788 | caca_display_t *display; |
---|
| 1789 | ZEND_FETCH_RESOURCE(display, caca_display_t*, &_zval, -1, PHP_CACA_DISPLAY_RES_NAME, le_caca_display); |
---|
[3110] | 1790 | RETURN_SUCCESS(caca_set_mouse(display, value)); |
---|
[3089] | 1791 | } |
---|
| 1792 | |
---|
| 1793 | PHP_FUNCTION(caca_set_cursor) { |
---|
[3094] | 1794 | zval *_zval; |
---|
| 1795 | long value = 0; |
---|
| 1796 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl", &_zval, &value) == FAILURE) { |
---|
| 1797 | RETURN_FALSE; |
---|
| 1798 | } |
---|
| 1799 | caca_display_t *display; |
---|
| 1800 | ZEND_FETCH_RESOURCE(display, caca_display_t*, &_zval, -1, PHP_CACA_DISPLAY_RES_NAME, le_caca_display); |
---|
[3110] | 1801 | RETURN_SUCCESS(caca_set_cursor(display, value)); |
---|
[3089] | 1802 | } |
---|
| 1803 | |
---|
| 1804 | PHP_FUNCTION(caca_get_event) { |
---|
[3142] | 1805 | zval *_zval = NULL; |
---|
[3105] | 1806 | long g, aa = 0; |
---|
[3142] | 1807 | if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rl|l", &_zval, &g, &aa) == FAILURE) { |
---|
[3105] | 1808 | RETURN_FALSE; |
---|
| 1809 | } |
---|
| 1810 | caca_display_t *display; |
---|
[3142] | 1811 | ZEND_FETCH_RESOURCE(display, caca_display_t*, &_zval, -1, PHP_CACA_DISPLAY_RES_NAME, le_caca_display); |
---|
[3105] | 1812 | |
---|
[3142] | 1813 | caca_event_t *event = emalloc(sizeof(caca_event_t)); |
---|
| 1814 | if (!event) { |
---|
| 1815 | RETURN_FALSE; |
---|
[3105] | 1816 | } |
---|
[3142] | 1817 | |
---|
| 1818 | caca_get_event(display, g, event, aa); |
---|
| 1819 | |
---|
| 1820 | if (caca_get_event_type(event) == CACA_EVENT_NONE) { |
---|
| 1821 | efree(event); |
---|
| 1822 | RETURN_FALSE; |
---|
| 1823 | } |
---|
| 1824 | ZEND_REGISTER_RESOURCE(return_value, event, le_caca_event); |
---|
[3089] | 1825 | } |
---|
| 1826 | |
---|
| 1827 | PHP_FUNCTION(caca_get_mouse_x) { |
---|
[3094] | 1828 | caca_display_t *display; |
---|
| 1829 | FETCH_DISPLAY(display); |
---|
| 1830 | RETURN_LONG(caca_get_mouse_x(display)); |
---|
[3089] | 1831 | } |
---|
| 1832 | |
---|
| 1833 | PHP_FUNCTION(caca_get_mouse_y) { |
---|
[3094] | 1834 | caca_display_t *display; |
---|
| 1835 | FETCH_DISPLAY(display); |
---|
| 1836 | RETURN_LONG(caca_get_mouse_y(display)); |
---|
[3089] | 1837 | } |
---|
| 1838 | |
---|
| 1839 | PHP_FUNCTION(caca_get_event_type) { |
---|
[3108] | 1840 | caca_event_t *event; |
---|
| 1841 | FETCH_EVENT(event); |
---|
| 1842 | RETURN_LONG(caca_get_event_type(event)); |
---|
[3089] | 1843 | } |
---|
| 1844 | |
---|
| 1845 | PHP_FUNCTION(caca_get_event_key_ch) { |
---|
[3108] | 1846 | caca_event_t *event; |
---|
| 1847 | FETCH_EVENT(event); |
---|
| 1848 | RETURN_LONG(caca_get_event_key_ch(event)); |
---|
[3089] | 1849 | } |
---|
| 1850 | |
---|
| 1851 | PHP_FUNCTION(caca_get_event_mouse_button) { |
---|
[3094] | 1852 | caca_event_t *event; |
---|
| 1853 | FETCH_EVENT(event); |
---|
| 1854 | RETURN_LONG(caca_get_event_mouse_button(event)); |
---|
[3089] | 1855 | } |
---|
| 1856 | |
---|
| 1857 | PHP_FUNCTION(caca_get_event_mouse_x) { |
---|
[3094] | 1858 | caca_event_t *event; |
---|
| 1859 | FETCH_EVENT(event); |
---|
| 1860 | RETURN_LONG(caca_get_event_mouse_x(event)); |
---|
[3089] | 1861 | } |
---|
| 1862 | |
---|
| 1863 | PHP_FUNCTION(caca_get_event_mouse_y) { |
---|
[3094] | 1864 | caca_event_t *event; |
---|
| 1865 | FETCH_EVENT(event); |
---|
| 1866 | RETURN_LONG(caca_get_event_mouse_y(event)); |
---|
[3089] | 1867 | } |
---|
| 1868 | |
---|
| 1869 | PHP_FUNCTION(caca_get_event_resize_width) { |
---|
[3094] | 1870 | caca_event_t *event; |
---|
| 1871 | FETCH_EVENT(event); |
---|
| 1872 | RETURN_LONG(caca_get_event_resize_width(event)); |
---|
[3089] | 1873 | } |
---|
| 1874 | |
---|
| 1875 | PHP_FUNCTION(caca_get_event_resize_height) { |
---|
[3094] | 1876 | caca_event_t *event; |
---|
| 1877 | FETCH_EVENT(event); |
---|
| 1878 | RETURN_LONG(caca_get_event_resize_height(event)); |
---|
[3089] | 1879 | } |
---|
| 1880 | |
---|