diff options
Diffstat (limited to 'ext/ming/ming.c')
| -rw-r--r-- | ext/ming/ming.c | 3158 |
1 files changed, 0 insertions, 3158 deletions
diff --git a/ext/ming/ming.c b/ext/ming/ming.c deleted file mode 100644 index 69bcb57c3a..0000000000 --- a/ext/ming/ming.c +++ /dev/null @@ -1,3158 +0,0 @@ -/* - +----------------------------------------------------------------------+ - | PHP Version 4 | - +----------------------------------------------------------------------+ - | Copyright (c) 1997-2002 The PHP Group | - +----------------------------------------------------------------------+ - | This source file is subject to version 2.01 of the PHP license, | - | that is bundled with this package in the file LICENSE, and is | - | available at through the world-wide-web at | - | http://www.php.net/license/2_01.txt. | - | If you did not receive a copy of the PHP license and are unable to | - | obtain it through the world-wide-web, please send a note to | - | license@php.net so we can mail you a copy immediately. | - +----------------------------------------------------------------------+ - | Author: dave@opaque.net | - +----------------------------------------------------------------------+ -*/ - -#include <stdio.h> -#include <math.h> - -#ifdef HAVE_CONFIG_H -#include "config.h" -#endif - -#include "php.h" -#include "php_ming.h" -#include "ext/standard/info.h" -#include "ext/standard/file.h" -#include "ext/standard/fsock.h" - -#if HAVE_MING - -static zend_function_entry ming_functions[] = { - PHP_FALIAS(ming_setcubicthreshold, ming_setCubicThreshold, NULL) - PHP_FALIAS(ming_setscale, ming_setScale, NULL) - PHP_FALIAS(ming_useswfversion, ming_useSWFVersion, NULL) - PHP_FALIAS(swfbutton_keypress, swfbutton_keypress, NULL) - { NULL, NULL, NULL } -}; - -static SWFMovie getMovie(zval *id TSRMLS_DC); -static SWFFill getFill(zval *id TSRMLS_DC); -static SWFGradient getGradient(zval *id TSRMLS_DC); -static SWFBitmap getBitmap(zval *id TSRMLS_DC); -static SWFShape getShape(zval *id TSRMLS_DC); -static SWFFont getFont(zval *id TSRMLS_DC); -static SWFText getText(zval *id TSRMLS_DC); -static SWFTextField getTextField(zval *id TSRMLS_DC); -static SWFDisplayItem getDisplayItem(zval *id TSRMLS_DC); -static SWFButton getButton(zval *id TSRMLS_DC); -static SWFAction getAction(zval *id TSRMLS_DC); -static SWFMorph getMorph(zval *id TSRMLS_DC); -static SWFMovieClip getSprite(zval *id TSRMLS_DC); - -/* {{{ proto void ming_setcubicthreshold (int threshold) - Set cubic threshold (?) */ -PHP_FUNCTION(ming_setCubicThreshold) -{ - zval **num; - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &num) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_long_ex(num); - - Ming_setCubicThreshold(Z_LVAL_PP(num)); -} -/* }}} */ - -/* {{{ proto void ming_setscale(int scale) - Set scale (?) */ -PHP_FUNCTION(ming_setScale) -{ - zval **num; - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &num) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(num); - - Ming_setScale(Z_DVAL_PP(num)); -} -/* }}} */ - -/* {{{ proto void ming_useswfversion(int version) - Use SWF version (?) */ -PHP_FUNCTION(ming_useSWFVersion) -{ - zval **num; - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &num) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_long_ex(num); - - Ming_useSWFVersion(Z_LVAL_PP(num)); -} -/* }}} */ - -static int le_swfmoviep; -static int le_swfshapep; -static int le_swffillp; -static int le_swfgradientp; -static int le_swfbitmapp; -static int le_swffontp; -static int le_swftextp; -static int le_swftextfieldp; -static int le_swfdisplayitemp; -static int le_swfbuttonp; -static int le_swfactionp; -static int le_swfmorphp; -static int le_swfspritep; -static int le_swfinputp; - -zend_class_entry movie_class_entry; -zend_class_entry shape_class_entry; -zend_class_entry fill_class_entry; -zend_class_entry gradient_class_entry; -zend_class_entry bitmap_class_entry; -zend_class_entry font_class_entry; -zend_class_entry text_class_entry; -zend_class_entry textfield_class_entry; -zend_class_entry displayitem_class_entry; -zend_class_entry button_class_entry; -zend_class_entry action_class_entry; -zend_class_entry morph_class_entry; -zend_class_entry sprite_class_entry; - -/* {{{ internal function SWFgetProperty - */ - -static void *SWFgetProperty(zval *id, char *name, int namelen, int proptype TSRMLS_DC) -{ - zval **tmp; - int id_to_find; - void *property; - int type; - - if(id) - { - if(zend_hash_find(Z_OBJPROP_P(id), name, namelen+1, (void **)&tmp) == FAILURE) - { - php_error(E_WARNING, "unable to find property %s", name); - return NULL; - } - id_to_find = Z_LVAL_PP(tmp); - } - else - return NULL; - - property = zend_list_find(id_to_find, &type); - - if (!property || type != proptype) - { - php_error(E_WARNING, "unable to find identifier (%d)", id_to_find); - return NULL; - } - - return property; -} - -/* }}} */ -/* {{{ SWFCharacter - not a real class */ - -/* {{{ internal function SWFCharacter getCharacter(zval *id) - Returns the SWFCharacter contained in zval *id */ - -SWFCharacter getCharacter(zval *id TSRMLS_DC) -{ - if(Z_OBJCE_P(id) == &shape_class_entry) - return (SWFCharacter)getShape(id TSRMLS_CC); - else if(Z_OBJCE_P(id) == &font_class_entry) - return (SWFCharacter)getFont(id TSRMLS_CC); - else if(Z_OBJCE_P(id) == &text_class_entry) - return (SWFCharacter)getText(id TSRMLS_CC); - else if(Z_OBJCE_P(id) == &textfield_class_entry) - return (SWFCharacter)getTextField(id TSRMLS_CC); - else if(Z_OBJCE_P(id) == &button_class_entry) - return (SWFCharacter)getButton(id TSRMLS_CC); - else if(Z_OBJCE_P(id) == &morph_class_entry) - return (SWFCharacter)getMorph(id TSRMLS_CC); - else if(Z_OBJCE_P(id) == &sprite_class_entry) - return (SWFCharacter)getSprite(id TSRMLS_CC); - else if(Z_OBJCE_P(id) == &bitmap_class_entry) - return (SWFCharacter)getBitmap(id TSRMLS_CC); - else - php_error(E_ERROR, "called object is not an SWFCharacter"); - return NULL; -} - -/* }}} */ - -/* }}} */ -/* {{{ getInput - utility func for making an SWFInput from an fopened resource */ - -static void destroy_SWFInput_resource(zend_rsrc_list_entry *resource TSRMLS_DC) -{ - destroySWFInput((SWFInput)resource->ptr); -} - -#define SOCKBUF_INCREMENT 10240 - -/* turn a socket into an SWFInput by copying everything to a buffer. */ -/* not pretty, but it works */ - -static SWFInput newSWFInput_sock(int socket) -{ - char *buffer = NULL; - int l, offset = 0, alloced = 0; - - do - { - if(offset <= alloced) - { - alloced += SOCKBUF_INCREMENT; - buffer = realloc(buffer, alloced); - } - - l = SOCK_FREAD(buffer+offset, SOCKBUF_INCREMENT, socket); - - offset += l; - } - while(l > 0); - - return newSWFInput_allocedBuffer(buffer, offset); -} - -static SWFInput getInput(zval **zfile TSRMLS_DC) -{ - FILE *file; - int type; - SWFInput input; - - file = (FILE *) zend_fetch_resource(zfile TSRMLS_CC, -1, "File-Handle", &type, 3, php_file_le_fopen(), php_file_le_popen(), php_file_le_socket()); - - if(type == php_file_le_socket()) - input = newSWFInput_sock(*(int *)file); - else - { - input = newSWFInput_file(file); - zend_list_addref(Z_LVAL_PP(zfile)); - } - - zend_list_addref(zend_list_insert(input, le_swfinputp)); - - return input; -} - -/* }}} */ - -/* {{{ SWFAction */ - -static zend_function_entry swfaction_functions[] = { - PHP_FALIAS(swfaction, swfaction_init, NULL) - { NULL, NULL, NULL } -}; - -/* {{{ proto object swfaction_init(string) - Returns a new SWFAction object, compiling the given script */ - -PHP_FUNCTION(swfaction_init) -{ - SWFAction action; - zval **script; - int ret; - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &script) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_string_ex(script); - - action = compileSWFActionCode(Z_STRVAL_PP(script)); - - if(!action) - php_error(E_ERROR, "Couldn't compile actionscript."); - - ret = zend_list_insert(action, le_swfactionp); - - object_init_ex(getThis(), &action_class_entry); - add_property_resource(getThis(), "action", ret); - zend_list_addref(ret); -} -/* no destructor for SWFAction, it's not a character */ - -/* }}} */ -/* {{{ internal function getAction - Returns the SWFAction object contained in zval *id */ - -static SWFAction getAction(zval *id TSRMLS_DC) -{ - void *action = SWFgetProperty(id, "action", 6, le_swfactionp TSRMLS_CC); - - if(!action) - php_error(E_ERROR, "called object is not an SWFAction!"); - - return (SWFAction)action; -} - -/* }}} */ - -/* }}} */ -/* {{{ SWFBitmap */ - -static zend_function_entry swfbitmap_functions[] = { - PHP_FALIAS(swfbitmap, swfbitmap_init, NULL) - PHP_FALIAS(getwidth, swfbitmap_getWidth, NULL) - PHP_FALIAS(getheight, swfbitmap_getHeight, NULL) - { NULL, NULL, NULL } -}; - -/* {{{ proto class swfbitmap_init(file [, maskfile]) - Returns a new SWFBitmap object from jpg (with optional mask) or dbl file */ - -PHP_FUNCTION(swfbitmap_init) -{ - zval **zfile, **zmask = NULL; - SWFBitmap bitmap; - SWFInput input, maskinput; - int ret; - - if(ZEND_NUM_ARGS() == 1) - { - if(zend_get_parameters_ex(1, &zfile) == FAILURE) - WRONG_PARAM_COUNT; - } - else if(ZEND_NUM_ARGS() == 2) - { - if(zend_get_parameters_ex(2, &zfile, &zmask) == FAILURE) - WRONG_PARAM_COUNT; - } - else - WRONG_PARAM_COUNT; - - if(Z_TYPE_PP(zfile) != IS_RESOURCE) - { - convert_to_string_ex(zfile); - input = newSWFInput_buffer(Z_STRVAL_PP(zfile), Z_STRLEN_PP(zfile)); - zend_list_addref(zend_list_insert(input, le_swfinputp)); - } - else - input = getInput(zfile TSRMLS_CC); - - if(zmask != NULL) - { - if(Z_TYPE_PP(zmask) != IS_RESOURCE) - { - convert_to_string_ex(zmask); - maskinput = newSWFInput_buffer(Z_STRVAL_PP(zmask), Z_STRLEN_PP(zmask)); - zend_list_addref(zend_list_insert(maskinput, le_swfinputp)); - } - else - maskinput = getInput(zmask TSRMLS_CC); - - bitmap = newSWFJpegWithAlpha_fromInput(input, maskinput); - } - else - bitmap = newSWFBitmap_fromInput(input); - - ret = zend_list_insert(bitmap, le_swfbitmapp); - object_init_ex(getThis(), &bitmap_class_entry); - add_property_resource(getThis(), "bitmap", ret); - zend_list_addref(ret); -} - -static void destroy_SWFBitmap_resource(zend_rsrc_list_entry *resource TSRMLS_DC) -{ - destroySWFBitmap((SWFBitmap)resource->ptr); -} - -/* }}} */ -/* {{{ internal function getBitmap - Returns the SWFBitmap object contained in zval *id */ - -static SWFBitmap getBitmap(zval *id TSRMLS_DC) -{ - void *bitmap = SWFgetProperty(id, "bitmap", 6, le_swfbitmapp TSRMLS_CC); - - if(!bitmap) - php_error(E_ERROR, "called object is not an SWFBitmap!"); - - return (SWFBitmap)bitmap; -} - -/* }}} */ -/* {{{ proto void swfbitmap_getWidth(void) - Returns the width of this bitmap */ - -PHP_FUNCTION(swfbitmap_getWidth) -{ - if(ZEND_NUM_ARGS() != 0) - WRONG_PARAM_COUNT; - - RETURN_DOUBLE(SWFBitmap_getWidth(getBitmap(getThis() TSRMLS_CC))); -} - -/* }}} */ -/* {{{ proto void swfbitmap_getHeight(void) - Returns the height of this bitmap */ - -PHP_FUNCTION(swfbitmap_getHeight) -{ - if(ZEND_NUM_ARGS() != 0) - WRONG_PARAM_COUNT; - - RETURN_DOUBLE(SWFBitmap_getHeight(getBitmap(getThis() TSRMLS_CC))); -} - -/* }}} */ - -/* }}} */ -/* {{{ SWFButton */ - -static zend_function_entry swfbutton_functions[] = { - PHP_FALIAS(swfbutton, swfbutton_init, NULL) - PHP_FALIAS(sethit, swfbutton_setHit, NULL) - PHP_FALIAS(setover, swfbutton_setOver, NULL) - PHP_FALIAS(setup, swfbutton_setUp, NULL) - PHP_FALIAS(setdown, swfbutton_setDown, NULL) - PHP_FALIAS(setaction, swfbutton_setAction, NULL) - PHP_FALIAS(addshape, swfbutton_addShape, NULL) - PHP_FALIAS(addaction, swfbutton_addAction, NULL) - { NULL, NULL, NULL } -}; - -/* {{{ proto object swfbutton_init(void) - Returns a new SWFButton object */ - -PHP_FUNCTION(swfbutton_init) -{ - SWFButton button = newSWFButton(); - int ret = zend_list_insert(button, le_swfbuttonp); - - object_init_ex(getThis(), &button_class_entry); - add_property_resource(getThis(), "button", ret); - zend_list_addref(ret); -} -static void destroy_SWFButton_resource(zend_rsrc_list_entry *resource TSRMLS_DC) -{ - destroySWFButton((SWFButton)resource->ptr); -} - -/* }}} */ -/* {{{ internal function getButton - Returns the SWFButton object contained in zval *id */ - -static SWFButton getButton(zval *id TSRMLS_DC) -{ - void *button = SWFgetProperty(id, "button", 6, le_swfbuttonp TSRMLS_CC); - - if(!button) - php_error(E_ERROR, "called object is not an SWFButton!"); - - return (SWFButton)button; -} - -/* }}} */ -/* {{{ proto void swfbutton_setHit(SWFCharacter) - Sets the character for this button's hit test state */ - -PHP_FUNCTION(swfbutton_setHit) -{ - zval **zchar; - SWFButton button = getButton(getThis() TSRMLS_CC); - SWFCharacter character; - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &zchar) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_object_ex(zchar); - character = getCharacter(*zchar TSRMLS_CC); - - SWFButton_addShape(button, character, SWFBUTTONRECORD_HITSTATE); -} - -/* }}} */ -/* {{{ proto void swfbutton_setOver(SWFCharacter) - Sets the character for this button's over state */ - -PHP_FUNCTION(swfbutton_setOver) -{ - zval **zchar; - SWFButton button = getButton(getThis() TSRMLS_CC); - SWFCharacter character; - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &zchar) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_object_ex(zchar); - character = getCharacter(*zchar TSRMLS_CC); - - SWFButton_addShape(button, character, SWFBUTTONRECORD_OVERSTATE); -} - -/* }}} */ -/* {{{ proto void swfbutton_setUp(SWFCharacter) - Sets the character for this button's up state */ - -PHP_FUNCTION(swfbutton_setUp) -{ - zval **zchar; - SWFButton button = getButton(getThis() TSRMLS_CC); - SWFCharacter character; - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &zchar) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_object_ex(zchar); - character = getCharacter(*zchar TSRMLS_CC); - - SWFButton_addShape(button, character, SWFBUTTONRECORD_UPSTATE); -} - -/* }}} */ -/* {{{ proto void swfbutton_setDown(SWFCharacter) - Sets the character for this button's down state */ - -PHP_FUNCTION(swfbutton_setDown) -{ - zval **zchar; - SWFButton button = getButton(getThis() TSRMLS_CC); - SWFCharacter character; - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &zchar) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_object_ex(zchar); - character = getCharacter(*zchar TSRMLS_CC); - - SWFButton_addShape(button, character, SWFBUTTONRECORD_DOWNSTATE); -} - -/* }}} */ -/* {{{ proto void swfbutton_addShape(SWFCharacter character, int flags) - Sets the character to display for the condition described in flags */ - -PHP_FUNCTION(swfbutton_addShape) -{ - zval **zchar, **flags; - SWFButton button = getButton(getThis() TSRMLS_CC); - SWFCharacter character; - - if(ZEND_NUM_ARGS() != 2 || - zend_get_parameters_ex(2, &zchar, &flags) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_object_ex(zchar); - character = getCharacter(*zchar TSRMLS_CC); - - convert_to_long_ex(flags); - - SWFButton_addShape(button, character, Z_LVAL_PP(flags)); -} - -/* }}} */ -/* {{{ proto void swfbutton_setAction(SWFAction) - Sets the action to perform when button is pressed */ - -PHP_FUNCTION(swfbutton_setAction) -{ - zval **zaction; - SWFButton button = getButton(getThis() TSRMLS_CC); - SWFAction action; - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &zaction) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_object_ex(zaction); - action = getAction(*zaction TSRMLS_CC); - - SWFButton_addAction(button, action, SWFBUTTON_OVERDOWNTOOVERUP); -} - -/* }}} */ -/* {{{ proto void swfbutton_addAction(SWFAction action, int flags) - Sets the action to perform when conditions described in flags is met */ - -PHP_FUNCTION(swfbutton_addAction) -{ - zval **zaction, **flags; - SWFButton button = getButton(getThis() TSRMLS_CC); - SWFAction action; - - if(ZEND_NUM_ARGS() != 2 || - zend_get_parameters_ex(2, &zaction, &flags) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_object_ex(zaction); - action = getAction(*zaction TSRMLS_CC); - - convert_to_long_ex(flags); - - SWFButton_addAction(button, action, Z_LVAL_PP(flags)); -} - -/* }}} */ - -/* {{{ proto int swfbutton_keypress(string str) - Returns the action flag for keyPress(char) */ -PHP_FUNCTION(swfbutton_keypress) -{ - zval **key; - char c; - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &key) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_string_ex(key); - - if(Z_STRLEN_PP(key) > 1) - php_error(E_ERROR, "SWFBUTTON_KEYPRESS expects only one character!"); - - c = Z_STRVAL_PP(key)[0]; - - RETURN_LONG((c&0x7f)<<9); -} - -/* }}} */ -/* }}} */ -/* {{{ SWFDisplayitem */ - -static zend_function_entry swfdisplayitem_functions[] = { - PHP_FALIAS(moveto, swfdisplayitem_moveTo, NULL) - PHP_FALIAS(move, swfdisplayitem_move, NULL) - PHP_FALIAS(scaleto, swfdisplayitem_scaleTo, NULL) - PHP_FALIAS(scale, swfdisplayitem_scale, NULL) - PHP_FALIAS(rotateto, swfdisplayitem_rotateTo, NULL) - PHP_FALIAS(rotate, swfdisplayitem_rotate, NULL) - PHP_FALIAS(skewxto, swfdisplayitem_skewXTo, NULL) - PHP_FALIAS(skewx, swfdisplayitem_skewX, NULL) - PHP_FALIAS(skewyto, swfdisplayitem_skewYTo, NULL) - PHP_FALIAS(skewy, swfdisplayitem_skewY, NULL) - PHP_FALIAS(setmatrix, swfdisplayitem_setMatrix, NULL) - PHP_FALIAS(setdepth, swfdisplayitem_setDepth, NULL) - PHP_FALIAS(setratio, swfdisplayitem_setRatio, NULL) - PHP_FALIAS(addcolor, swfdisplayitem_addColor, NULL) - PHP_FALIAS(multcolor, swfdisplayitem_multColor, NULL) - PHP_FALIAS(setname, swfdisplayitem_setName, NULL) - PHP_FALIAS(addaction, swfdisplayitem_addAction, NULL) - { NULL, NULL, NULL } -}; - -/* {{{ internal function getDisplayItem - Returns the SWFDisplayItem contained in zval *id */ - -static SWFDisplayItem getDisplayItem(zval *id TSRMLS_DC) -{ - void *item = SWFgetProperty(id, "displayitem", 11, le_swfdisplayitemp TSRMLS_CC); - - if(!item) - php_error(E_ERROR, "called object is not an SWFDisplayItem!"); - - return (SWFDisplayItem)item; -} - -/* }}} */ -/* {{{ proto void swfdisplayitem_moveTo(int x, int y) - Moves this SWFDisplayItem to movie coordinates (x, y) */ - -PHP_FUNCTION(swfdisplayitem_moveTo) -{ - zval **x, **y; - - if(ZEND_NUM_ARGS() != 2 || zend_get_parameters_ex(2, &x, &y) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(x); - convert_to_double_ex(y); - - SWFDisplayItem_moveTo(getDisplayItem(getThis() TSRMLS_CC), Z_DVAL_PP(x), Z_DVAL_PP(y)); -} - -/* }}} */ -/* {{{ proto void swfdisplayitem_move(int dx, int dy) - Displaces this SWFDisplayItem by (dx, dy) in movie coordinates */ - -PHP_FUNCTION(swfdisplayitem_move) -{ - zval **x, **y; - - if(ZEND_NUM_ARGS() != 2 || zend_get_parameters_ex(2, &x, &y) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(x); - convert_to_double_ex(y); - - SWFDisplayItem_move(getDisplayItem(getThis() TSRMLS_CC), Z_DVAL_PP(x), Z_DVAL_PP(y)); -} - -/* }}} */ -/* {{{ proto void swfdisplayitem_scaleTo(float xScale [, float yScale]) - Scales this SWFDisplayItem by xScale in the x direction, yScale in the y, or both to xScale if only one arg */ - -PHP_FUNCTION(swfdisplayitem_scaleTo) -{ - zval **x, **y; - - if(ZEND_NUM_ARGS() == 1) - { - if(zend_get_parameters_ex(1, &x) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(x); - - SWFDisplayItem_scaleTo(getDisplayItem(getThis() TSRMLS_CC), - Z_DVAL_PP(x), Z_DVAL_PP(x)); - } - else if(ZEND_NUM_ARGS() == 2) - { - if(zend_get_parameters_ex(2, &x, &y) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(x); - convert_to_double_ex(y); - - SWFDisplayItem_scaleTo(getDisplayItem(getThis() TSRMLS_CC), - Z_DVAL_PP(x), Z_DVAL_PP(y)); - } - else - WRONG_PARAM_COUNT; -} - -/* }}} */ -/* {{{ proto void swfdisplayitem_scale(float xScale, float yScale) - Multiplies this SWFDisplayItem's current x scale by xScale, its y scale by yScale */ - -PHP_FUNCTION(swfdisplayitem_scale) -{ - zval **x, **y; - - if(ZEND_NUM_ARGS() != 2 || zend_get_parameters_ex(2, &x, &y) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(x); - convert_to_double_ex(y); - - SWFDisplayItem_scale(getDisplayItem(getThis() TSRMLS_CC), Z_DVAL_PP(x), Z_DVAL_PP(y)); -} - -/* }}} */ -/* {{{ proto void swfdisplayitem_rotateTo(float degrees) - Rotates this SWFDisplayItem the given (clockwise) degrees from its original orientation */ - -PHP_FUNCTION(swfdisplayitem_rotateTo) -{ - zval **degrees; - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, °rees) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(degrees); - - SWFDisplayItem_rotateTo(getDisplayItem(getThis() TSRMLS_CC), Z_DVAL_PP(degrees)); -} - -/* }}} */ -/* {{{ proto void swfdisplayitem_rotate(float degrees) - Rotates this SWFDisplayItem the given (clockwise) degrees from its current orientation */ - -PHP_FUNCTION(swfdisplayitem_rotate) -{ - zval **degrees; - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, °rees) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(degrees); - - SWFDisplayItem_rotate(getDisplayItem(getThis() TSRMLS_CC), Z_DVAL_PP(degrees)); -} - -/* }}} */ -/* {{{ proto void swfdisplayitem_skewXTo(float xSkew) - Sets this SWFDisplayItem's x skew value to xSkew */ - -PHP_FUNCTION(swfdisplayitem_skewXTo) -{ - zval **x; - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &x) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(x); - - SWFDisplayItem_skewXTo(getDisplayItem(getThis() TSRMLS_CC), Z_DVAL_PP(x)); -} - -/* }}} */ -/* {{{ proto void swfdisplayitem_skewX(float xSkew) - Adds xSkew to this SWFDisplayItem's x skew value */ - -PHP_FUNCTION(swfdisplayitem_skewX) -{ - zval **x; - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &x) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(x); - - SWFDisplayItem_skewX(getDisplayItem(getThis() TSRMLS_CC), Z_DVAL_PP(x)); -} - -/* }}} */ -/* {{{ proto void swfdisplayitem_skewYTo(float ySkew) - Sets this SWFDisplayItem's y skew value to ySkew */ - -PHP_FUNCTION(swfdisplayitem_skewYTo) -{ - zval **y; - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &y) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(y); - - SWFDisplayItem_skewYTo(getDisplayItem(getThis() TSRMLS_CC), Z_DVAL_PP(y)); -} - -/* }}} */ -/* {{{ proto void swfdisplayitem_skewY(float ySkew) - Adds ySkew to this SWFDisplayItem's y skew value */ - -PHP_FUNCTION(swfdisplayitem_skewY) -{ - zval **y; - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &y) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(y); - - SWFDisplayItem_skewY(getDisplayItem(getThis() TSRMLS_CC), Z_DVAL_PP(y)); -} - -/* }}} */ -/* {{{ proto void swfdisplayitem_setMatrix(float a, float b, float c, float d, float x, float y) - Sets the item's transform matrix */ - -PHP_FUNCTION(swfdisplayitem_setMatrix) -{ - zval **a, **b, **c, **d, **x, **y; - - if(ZEND_NUM_ARGS() != 6 || - zend_get_parameters_ex(6, &a, &b, &c, &d, &x, &y) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(a); - convert_to_double_ex(b); - convert_to_double_ex(c); - convert_to_double_ex(d); - convert_to_double_ex(x); - convert_to_double_ex(y); - - SWFDisplayItem_setMatrix(getDisplayItem(getThis() TSRMLS_CC), - Z_DVAL_PP(a), Z_DVAL_PP(b), Z_DVAL_PP(c), - Z_DVAL_PP(d), Z_DVAL_PP(x), Z_DVAL_PP(y)); -} - -/* }}} */ -/* {{{ proto void swfdisplayitem_setDepth(int depth) - Sets this SWFDisplayItem's z-depth to depth. Items with higher depth values are drawn on top of those with lower values */ - -PHP_FUNCTION(swfdisplayitem_setDepth) -{ - zval **depth; - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &depth) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_long_ex(depth); - - SWFDisplayItem_setDepth(getDisplayItem(getThis() TSRMLS_CC), Z_LVAL_PP(depth)); -} - -/* }}} */ -/* {{{ proto void swfdisplayitem_setRatio(float ratio) - Sets this SWFDisplayItem's ratio to ratio. Obviously only does anything if displayitem was created from an SWFMorph */ - -PHP_FUNCTION(swfdisplayitem_setRatio) -{ - zval **ratio; - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &ratio) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(ratio); - - SWFDisplayItem_setRatio(getDisplayItem(getThis() TSRMLS_CC), Z_DVAL_PP(ratio)); -} - -/* }}} */ -/* {{{ proto void swfdisplayitem_addColor(int r, int g, int b [, int a]) - Sets the add color part of this SWFDisplayItem's CXform to (r, g, b [, a]), a defaults to 0 */ - -PHP_FUNCTION(swfdisplayitem_addColor) -{ - zval **r, **g, **b, **za; - int a = 0; - - if(ZEND_NUM_ARGS() == 4) - { - if(zend_get_parameters_ex(4, &r, &g, &b, &za) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_long_ex(za); - a = Z_LVAL_PP(za); - } - else if(ZEND_NUM_ARGS() == 3) - { - if(zend_get_parameters_ex(3, &r, &g, &b) == FAILURE) - WRONG_PARAM_COUNT; - } - else - WRONG_PARAM_COUNT; - - convert_to_long_ex(r); - convert_to_long_ex(g); - convert_to_long_ex(b); - - SWFDisplayItem_setColorAdd(getDisplayItem(getThis() TSRMLS_CC), - Z_LVAL_PP(r), Z_LVAL_PP(g), Z_LVAL_PP(b), a); -} - -/* }}} */ -/* {{{ proto void swfdisplayitem_multColor(float r, float g, float b [, float a]) - Sets the multiply color part of this SWFDisplayItem's CXform to (r, g, b [, a]), - a defaults to 1.0 */ - -PHP_FUNCTION(swfdisplayitem_multColor) -{ - zval **r, **g, **b, **za; - float a = 1.0; - - if(ZEND_NUM_ARGS() == 4) - { - if(zend_get_parameters_ex(4, &r, &g, &b, &za) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(za); - a = Z_DVAL_PP(za); - } - else if(ZEND_NUM_ARGS() == 3) - { - if(zend_get_parameters_ex(3, &r, &g, &b) == FAILURE) - WRONG_PARAM_COUNT; - } - else - WRONG_PARAM_COUNT; - - convert_to_double_ex(r); - convert_to_double_ex(g); - convert_to_double_ex(b); - - SWFDisplayItem_setColorMult(getDisplayItem(getThis() TSRMLS_CC), - Z_DVAL_PP(r), Z_DVAL_PP(g), Z_DVAL_PP(b), a); -} - -/* }}} */ -/* {{{ proto void swfdisplayitem_setName(string name) - Sets this SWFDisplayItem's name to name */ - -PHP_FUNCTION(swfdisplayitem_setName) -{ - zval **name; - SWFDisplayItem item = getDisplayItem(getThis() TSRMLS_CC); - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &name) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_string_ex(name); - - SWFDisplayItem_setName(item, Z_STRVAL_PP(name)); -} - -/* }}} */ -/* {{{ proto void swfdisplayitem_addAction(SWFAction action, int flags) - Adds this SWFAction to the given SWFSprite instance */ - -PHP_FUNCTION(swfdisplayitem_addAction) -{ - zval **zaction, **flags; - SWFAction action; - SWFDisplayItem item = getDisplayItem(getThis() TSRMLS_CC); - - if(ZEND_NUM_ARGS() != 2 || - zend_get_parameters_ex(2, &zaction, &flags) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_object_ex(zaction); - convert_to_long_ex(flags); - - action = (SWFBlock)getAction(*zaction TSRMLS_CC); - - SWFDisplayItem_addAction(item, action, Z_LVAL_PP(flags)); -} - -/* }}} */ - -/* }}} */ -/* {{{ SWFFill */ - -static zend_function_entry swffill_functions[] = { - PHP_FALIAS(swffill, swffill_init, NULL) - PHP_FALIAS(moveto, swffill_moveTo, NULL) - PHP_FALIAS(scaleto, swffill_scaleTo, NULL) - PHP_FALIAS(rotateto, swffill_rotateTo, NULL) - PHP_FALIAS(skewxto, swffill_skewXTo, NULL) - PHP_FALIAS(skewyto, swffill_skewYTo, NULL) - { NULL, NULL, NULL } -}; - -/* {{{ proto class swffill_init(void) - Returns a new SWFFill object */ - -PHP_FUNCTION(swffill_init) -{ - php_error(E_ERROR, "Instantiating SWFFill won't do any good- use SWFShape::addFill() instead!"); -} -static void destroy_SWFFill_resource(zend_rsrc_list_entry *resource TSRMLS_DC) -{ - /* this only destroys the shallow wrapper for SWFFillStyle, - which SWFShape destroys. So everything's okay. I hope. */ - - destroySWFFill((SWFFill)resource->ptr); -} - -/* }}} */ -/* {{{ internal function getFill - Returns the SWFFill object contained in zval *id */ - -static SWFFill getFill(zval *id TSRMLS_DC) -{ - void *fill = SWFgetProperty(id, "fill", 4, le_swffillp TSRMLS_CC); - - if(!fill) - php_error(E_ERROR, "called object is not an SWFFill!"); - - return (SWFFill)fill; -} - -/* }}} */ - -/* {{{ proto void swffill_moveTo(int x, int y) - Moves this SWFFill to shape coordinates (x,y) */ - -PHP_FUNCTION(swffill_moveTo) -{ - zval **x, **y; - - if(ZEND_NUM_ARGS() != 2 || zend_get_parameters_ex(2, &x, &y) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(x); - convert_to_double_ex(y); - - SWFFill_moveTo(getFill(getThis() TSRMLS_CC), Z_DVAL_PP(x), Z_DVAL_PP(y)); -} - -/* }}} */ -/* {{{ proto void swffill_scaleTo(float xScale [, float yScale]) - Scales this SWFFill by xScale in the x direction, yScale in the y, or both to xScale if only one arg */ - -PHP_FUNCTION(swffill_scaleTo) -{ - zval **x, **y; - - if(ZEND_NUM_ARGS() == 1) - { - if(zend_get_parameters_ex(1, &x) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(x); - - SWFFill_scaleXYTo(getFill(getThis() TSRMLS_CC), Z_DVAL_PP(x), Z_DVAL_PP(x)); - } - else if(ZEND_NUM_ARGS() == 2) - { - if(zend_get_parameters_ex(2, &x, &y) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(x); - convert_to_double_ex(y); - - SWFFill_scaleXYTo(getFill(getThis() TSRMLS_CC), Z_DVAL_PP(x), Z_DVAL_PP(y)); - } - else - WRONG_PARAM_COUNT; -} - -/* }}} */ -/* {{{ proto void swffill_rotateTo(float degrees) - Rotates this SWFFill the given (clockwise) degrees from its original orientation */ - -PHP_FUNCTION(swffill_rotateTo) -{ - zval **degrees; - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, °rees) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(degrees); - - SWFFill_rotateTo(getFill(getThis() TSRMLS_CC), Z_DVAL_PP(degrees)); -} - -/* }}} */ -/* {{{ proto void swffill_skewXTo(float xSkew) - Sets this SWFFill's x skew value to xSkew */ - -PHP_FUNCTION(swffill_skewXTo) -{ - zval **x; - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &x) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(x); - - SWFFill_skewXTo(getFill(getThis() TSRMLS_CC), Z_DVAL_PP(x)); -} - -/* }}} */ -/* {{{ proto void swffill_skewYTo(float ySkew) - Sets this SWFFill's y skew value to ySkew */ - -PHP_FUNCTION(swffill_skewYTo) -{ - zval **y; - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &y) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(y); - - SWFFill_skewYTo(getFill(getThis() TSRMLS_CC), Z_DVAL_PP(y)); -} - -/* }}} */ - -/* }}} */ -/* {{{ SWFFont */ - -static zend_function_entry swffont_functions[] = { - PHP_FALIAS(swffont, swffont_init, NULL) - PHP_FALIAS(getwidth, swffont_getWidth, NULL) - PHP_FALIAS(getascent, swffont_getAscent, NULL) - PHP_FALIAS(getdescent, swffont_getDescent, NULL) - PHP_FALIAS(getleading, swffont_getLeading, NULL) - { NULL, NULL, NULL } -}; - -/* {{{ internal function SWFText getFont(zval *id) - Returns the Font object in zval *id */ - -SWFFont getFont(zval *id TSRMLS_DC) -{ - void *font = SWFgetProperty(id, "font", 4, le_swffontp TSRMLS_CC); - - if(!font) - php_error(E_ERROR, "called object is not an SWFFont!"); - - return (SWFFont)font; -} - -/* }}} */ -/* {{{ proto class swffont_init(string filename) - Returns a new SWFFont object from given file */ - -PHP_FUNCTION(swffont_init) -{ - FILE *file; - zval **zfile; - SWFFont font; - int ret; - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &zfile) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_string_ex(zfile); - - if(strcmp(Z_STRVAL_PP(zfile)+Z_STRLEN_PP(zfile)-4, ".fdb") == 0) - { - file = VCWD_FOPEN(Z_STRVAL_PP(zfile), "rb"); - - if(!file) - php_error(E_ERROR, "Couldn't find FDB file %s", Z_STRVAL_PP(zfile)); - - font = loadSWFFontFromFile(file); - fclose(file); - } - else - font = newSWFBrowserFont(Z_STRVAL_PP(zfile)); - - ret = zend_list_insert(font, le_swffontp); - - object_init_ex(getThis(), &font_class_entry); - add_property_resource(getThis(), "font", ret); - zend_list_addref(ret); -} -static void destroy_SWFFont_resource(zend_rsrc_list_entry *resource TSRMLS_DC) -{ - destroySWFBlock((SWFBlock)resource->ptr); -} - -/* }}} */ -/* {{{ proto int swffont_getWidth(string) - Calculates the width of the given string in this font at full height */ - -PHP_FUNCTION(swffont_getWidth) -{ - zval **zstring; - float width; - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &zstring) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_string_ex(zstring); - - width = SWFFont_getStringWidth(getFont(getThis() TSRMLS_CC), Z_STRVAL_PP(zstring)); - - RETURN_DOUBLE(width); -} - -/* }}} */ -/* {{{ proto int swffont_getAscent(void) - Returns the ascent of the font, or 0 if not available */ - -PHP_FUNCTION(swffont_getAscent) -{ - if(ZEND_NUM_ARGS() != 0) - WRONG_PARAM_COUNT; - - RETURN_DOUBLE(SWFFont_getAscent(getFont(getThis() TSRMLS_CC))); -} - -/* }}} */ -/* {{{ proto int swffont_getDescent(void) - Returns the descent of the font, or 0 if not available */ - -PHP_FUNCTION(swffont_getDescent) -{ - if(ZEND_NUM_ARGS() != 0) - WRONG_PARAM_COUNT; - - RETURN_DOUBLE(SWFFont_getDescent(getFont(getThis() TSRMLS_CC))); -} - -/* }}} */ -/* {{{ proto int swffont_getLeading(void) - Returns the leading of the font, or 0 if not available */ - -PHP_FUNCTION(swffont_getLeading) -{ - if(ZEND_NUM_ARGS() != 0) - WRONG_PARAM_COUNT; - - RETURN_DOUBLE(SWFFont_getLeading(getFont(getThis() TSRMLS_CC))); -} - -/* }}} */ - -/* }}} */ -/* {{{ SWFGradient */ - -static zend_function_entry swfgradient_functions[] = { - PHP_FALIAS(swfgradient, swfgradient_init, NULL) - PHP_FALIAS(addentry, swfgradient_addEntry, NULL) - { NULL, NULL, NULL } -}; - -/* {{{ proto class swfgradient_init(void) - Returns a new SWFGradient object */ - -PHP_FUNCTION(swfgradient_init) -{ - SWFGradient gradient = newSWFGradient(); - int ret = zend_list_insert(gradient, le_swfgradientp); - - object_init_ex(getThis(), &gradient_class_entry); - add_property_resource(getThis(), "gradient", ret); - zend_list_addref(ret); -} - - -static void destroy_SWFGradient_resource(zend_rsrc_list_entry *resource TSRMLS_DC) -{ - destroySWFGradient((SWFGradient)resource->ptr); -} - -/* }}} */ -/* {{{ internal function getGradient - Returns the SWFGradient object contained in zval *id */ - -static SWFGradient getGradient(zval *id TSRMLS_DC) -{ - void *gradient = SWFgetProperty(id, "gradient", 8, le_swfgradientp TSRMLS_CC); - - if(!gradient) - php_error(E_ERROR, "called object is not an SWFGradient!"); - - return (SWFGradient)gradient; -} - -/* }}} */ -/* {{{ proto void swfgradient_addEntry(float ratio, string r, string g, string b [, string a] - Adds given entry to the gradient */ - -PHP_FUNCTION(swfgradient_addEntry) -{ - zval **ratio, **r, **g, **b; - byte a = 0xff; - - if(ZEND_NUM_ARGS() == 4) - { - if(zend_get_parameters_ex(4, &ratio, &r, &g, &b) == FAILURE) - WRONG_PARAM_COUNT; - } - else if(ZEND_NUM_ARGS() == 5) - { - zval **za; - - if(zend_get_parameters_ex(5, &ratio, &r, &g, &b, &za) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_long_ex(za); - a = Z_LVAL_PP(za); - } - else - WRONG_PARAM_COUNT; - - convert_to_double_ex(ratio); - convert_to_long_ex(r); - convert_to_long_ex(g); - convert_to_long_ex(b); - - SWFGradient_addEntry(getGradient(getThis() TSRMLS_CC), Z_DVAL_PP(ratio), - Z_LVAL_PP(r), Z_LVAL_PP(g), Z_LVAL_PP(b), a); -} - -/* }}} */ - -/* }}} */ -/* {{{ SWFMorph */ - -static zend_function_entry swfmorph_functions[] = { - PHP_FALIAS(swfmorph, swfmorph_init, NULL) - PHP_FALIAS(getshape1, swfmorph_getShape1, NULL) - PHP_FALIAS(getshape2, swfmorph_getShape2, NULL) - { NULL, NULL, NULL } -}; - -/* {{{ proto object swfmorph_init(void) - Returns a new SWFMorph object */ - -PHP_FUNCTION(swfmorph_init) -{ - SWFMorph morph = newSWFMorphShape(); - int ret = zend_list_insert(morph, le_swfmorphp); - - object_init_ex(getThis(), &morph_class_entry); - add_property_resource(getThis(), "morph", ret); - zend_list_addref(ret); -} - - -static void destroy_SWFMorph_resource(zend_rsrc_list_entry *resource TSRMLS_DC) -{ - destroySWFMorph((SWFMorph)resource->ptr); -} - -/* }}} */ -/* {{{ internal function getMorph - Returns the SWFMorph object contained in zval *id */ - -static SWFMorph getMorph(zval *id TSRMLS_DC) -{ - void *morph = SWFgetProperty(id, "morph", 5, le_swfmorphp TSRMLS_CC); - - if(!morph) - php_error(E_ERROR, "called object is not an SWFMorph!"); - - return (SWFMorph)morph; -} - -/* }}} */ -/* {{{ proto SWFShape swfmorph_getShape1(void) - Return's this SWFMorph's start shape */ - -PHP_FUNCTION(swfmorph_getShape1) -{ - SWFMorph morph = getMorph(getThis() TSRMLS_CC); - SWFShape shape = SWFMorph_getShape1(morph); - int ret = zend_list_insert(shape, le_swfshapep); - - object_init_ex(return_value, &shape_class_entry); - add_property_resource(return_value, "shape", ret); - zend_list_addref(ret); -} - -/* }}} */ -/* {{{ proto SWFShape swfmorph_getShape2(void) - Return's this SWFMorph's start shape */ - -PHP_FUNCTION(swfmorph_getShape2) -{ - SWFMorph morph = getMorph(getThis() TSRMLS_CC); - SWFShape shape = SWFMorph_getShape2(morph); - int ret = zend_list_insert(shape, le_swfshapep); - - object_init_ex(return_value, &shape_class_entry); - add_property_resource(return_value, "shape", ret); - zend_list_addref(ret); -} - -/* }}} */ - -/* }}} */ -/* {{{ SWFMovie */ - -static zend_function_entry swfmovie_functions[] = { - PHP_FALIAS(swfmovie, swfmovie_init, NULL) - PHP_FALIAS(nextframe, swfmovie_nextFrame, NULL) - PHP_FALIAS(labelframe, swfmovie_labelFrame, NULL) - PHP_FALIAS(add, swfmovie_add, NULL) - PHP_FALIAS(remove, swfmovie_remove, NULL) - PHP_FALIAS(output, swfmovie_output, NULL) - PHP_FALIAS(save, swfmovie_save, NULL) - PHP_FALIAS(savetofile, swfmovie_saveToFile, NULL) - PHP_FALIAS(setbackground, swfmovie_setBackground, NULL) - PHP_FALIAS(setrate, swfmovie_setRate, NULL) - PHP_FALIAS(setdimension, swfmovie_setDimension, NULL) - PHP_FALIAS(setframes, swfmovie_setFrames, NULL) - PHP_FALIAS(streammp3, swfmovie_streamMp3, NULL) - { NULL, NULL, NULL } -}; - -/* {{{ swfmovie_init */ - -PHP_FUNCTION(swfmovie_init) -{ - zval **version; - SWFMovie movie; - int ret; - - if(ZEND_NUM_ARGS() == 1) - { - if(zend_get_parameters_ex(1, &version) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_long_ex(version); - - movie = newSWFMovie(Z_LVAL_PP(version)); - } - else - movie = newSWFMovie(4); /* default version 4 */ - - ret = zend_list_insert(movie, le_swfmoviep); - - object_init_ex(getThis(), &movie_class_entry); - add_property_resource(getThis(), "movie", ret); - zend_list_addref(ret); -} - - -static void destroy_SWFMovie_resource(zend_rsrc_list_entry *resource TSRMLS_DC) -{ - destroySWFMovie((SWFMovie)resource->ptr); -} - -/* }}} */ -/* {{{ getMovie */ - -SWFMovie getMovie(zval *id TSRMLS_DC) -{ - void *movie = SWFgetProperty(id, "movie", 5, le_swfmoviep TSRMLS_CC); - - if(!movie) - php_error(E_ERROR, "called object is not an SWFMovie!"); - - return (SWFMovie)movie; -} - -/* }}} */ -/* {{{ swfmovie_nextframe */ - -PHP_FUNCTION(swfmovie_nextFrame) -{ - SWFMovie_nextFrame(getMovie(getThis() TSRMLS_CC)); -} - -/* }}} */ -/* {{{ swfmovie_labelframe */ - -PHP_FUNCTION(swfmovie_labelFrame) -{ - zval **label; - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &label) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_string_ex(label); - - SWFMovie_labelFrame(getMovie(getThis() TSRMLS_CC), Z_STRVAL_PP(label)); -} - -/* }}} */ -/* {{{ swfmovie_add */ - -PHP_FUNCTION(swfmovie_add) -{ - zval **zchar; - int ret; - SWFBlock block; - SWFDisplayItem item; - SWFMovie movie = getMovie(getThis() TSRMLS_CC); - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &zchar) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_object_ex(zchar); - - /* XXX - SWFMovie_add deals w/ all block types. Probably will need to add that.. */ - if(Z_OBJCE_PP(zchar) == &action_class_entry) - block = (SWFBlock)getAction(*zchar TSRMLS_CC); - else - block = (SWFBlock)getCharacter(*zchar TSRMLS_CC); - - item = SWFMovie_add(movie, block); - - if(item != NULL) - { - /* try and create a displayitem object */ - ret = zend_list_insert(item, le_swfdisplayitemp); - object_init_ex(return_value, &displayitem_class_entry); - add_property_resource(return_value, "displayitem", ret); - } -} - -/* }}} */ -/* {{{ swfmovie_remove */ - -PHP_FUNCTION(swfmovie_remove) -{ - zval **zchar; - SWFDisplayItem item; - SWFMovie movie = getMovie(getThis() TSRMLS_CC); - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &zchar) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_object_ex(zchar); - item = getDisplayItem(*zchar TSRMLS_CC); - - SWFMovie_remove(movie, item); -} - - -/* }}} */ -/* {{{ swfmovie_output */ - -void phpByteOutputMethod(byte b, void *data) -{ - TSRMLS_FETCH(); - - php_write(&b, 1 TSRMLS_CC); -} - -PHP_FUNCTION(swfmovie_output) -{ - SWFMovie movie = getMovie(getThis() TSRMLS_CC); - - RETURN_LONG(SWFMovie_output(movie, &phpByteOutputMethod, NULL)); -} - - -/* }}} */ -/* {{{ swfmovie_saveToFile */ - -void phpFileOutputMethod(byte b, void *data) -{ - fwrite(&b, 1, 1, (FILE *)data); -} - -PHP_FUNCTION(swfmovie_saveToFile) -{ - zval **x; - SWFMovie movie = getMovie(getThis() TSRMLS_CC); - void *what; - - if((ZEND_NUM_ARGS() != 1) || zend_get_parameters_ex(1, &x) == FAILURE) - WRONG_PARAM_COUNT; - - ZEND_FETCH_RESOURCE(what, FILE *, x, -1,"File-Handle",php_file_le_fopen()); - RETURN_LONG(SWFMovie_output(movie, &phpFileOutputMethod, what)); -} - - -/* }}} */ -/* {{{ swfmovie_save */ - -PHP_FUNCTION(swfmovie_save) -{ - zval **x; - FILE *file; - long retval; - - if((ZEND_NUM_ARGS() != 1) || zend_get_parameters_ex(1, &x) == FAILURE) - WRONG_PARAM_COUNT; - - if(Z_TYPE_PP(x) == IS_RESOURCE) - { - ZEND_FETCH_RESOURCE(file, FILE *, x, -1,"File-Handle",php_file_le_fopen()); - - RETURN_LONG(SWFMovie_output(getMovie(getThis() TSRMLS_CC), - &phpFileOutputMethod, file)); - } - - convert_to_string_ex(x); - - file = VCWD_FOPEN(Z_STRVAL_PP(x), "wb"); - - if(file == NULL) - php_error(E_ERROR, "couldn't open file %s for writing", Z_STRVAL_PP(x)); - - retval = SWFMovie_output(getMovie(getThis() TSRMLS_CC), - &phpFileOutputMethod, (void *)file); - - fclose(file); - - RETURN_LONG(retval); -} - - -/* }}} */ -/* {{{ swfmovie_setbackground */ - -PHP_FUNCTION(swfmovie_setBackground) -{ - zval **r, **g, **b; - SWFMovie movie = getMovie(getThis() TSRMLS_CC); - - if((ZEND_NUM_ARGS() != 3) || zend_get_parameters_ex(3, &r, &g, &b) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_long_ex(r); - convert_to_long_ex(g); - convert_to_long_ex(b); - - SWFMovie_setBackground(movie, Z_LVAL_PP(r), Z_LVAL_PP(g), Z_LVAL_PP(b)); -} - -/* }}} */ -/* {{{ swfmovie_setrate */ - -PHP_FUNCTION(swfmovie_setRate) -{ - zval **rate; - SWFMovie movie = getMovie(getThis() TSRMLS_CC); - - if((ZEND_NUM_ARGS() != 1) || zend_get_parameters_ex(1, &rate) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(rate); - - SWFMovie_setRate(movie, Z_DVAL_PP(rate)); -} - -/* }}} */ -/* {{{ swfmovie_setDimension */ - -PHP_FUNCTION(swfmovie_setDimension) -{ - zval **x, **y; - SWFMovie movie = getMovie(getThis() TSRMLS_CC); - - if((ZEND_NUM_ARGS() != 2) || zend_get_parameters_ex(2, &x, &y) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(x); - convert_to_double_ex(y); - - SWFMovie_setDimension(movie, Z_DVAL_PP(x), Z_DVAL_PP(y)); -} - -/* }}} */ -/* {{{ swfmovie_setframes */ - -PHP_FUNCTION(swfmovie_setFrames) -{ - zval **frames; - SWFMovie movie = getMovie(getThis() TSRMLS_CC); - - if((ZEND_NUM_ARGS() != 1) || zend_get_parameters_ex(1, &frames) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_long_ex(frames); - - SWFMovie_setNumberOfFrames(movie, Z_LVAL_PP(frames)); -} - -/* }}} */ -/* {{{ swfmovie_streamMp3 */ - -PHP_FUNCTION(swfmovie_streamMp3) -{ - zval **zfile; - SWFSound sound; - SWFInput input; - SWFMovie movie = getMovie(getThis() TSRMLS_CC); - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &zfile) == FAILURE) - WRONG_PARAM_COUNT; - - if(Z_TYPE_PP(zfile) != IS_RESOURCE) - { - convert_to_string_ex(zfile); - input = newSWFInput_buffer(Z_STRVAL_PP(zfile), Z_STRLEN_PP(zfile)); - zend_list_addref(zend_list_insert(input, le_swfinputp)); - } - else - input = getInput(zfile TSRMLS_CC); - - sound = newSWFSound_fromInput(input); - SWFMovie_setSoundStream(movie, sound); -} - -/* }}} */ - -/* }}} */ -/* {{{ SWFShape */ - -static zend_function_entry swfshape_functions[] = { - PHP_FALIAS(swfshape, swfshape_init, NULL) - PHP_FALIAS(setline, swfshape_setline, NULL) - PHP_FALIAS(addfill, swfshape_addfill, NULL) - PHP_FALIAS(setleftfill, swfshape_setleftfill, NULL) - PHP_FALIAS(setrightfill, swfshape_setrightfill, NULL) - PHP_FALIAS(movepento, swfshape_movepento, NULL) - PHP_FALIAS(movepen, swfshape_movepen, NULL) - PHP_FALIAS(drawlineto, swfshape_drawlineto, NULL) - PHP_FALIAS(drawline, swfshape_drawline, NULL) - PHP_FALIAS(drawcurveto, swfshape_drawcurveto, NULL) - PHP_FALIAS(drawcurve, swfshape_drawcurve, NULL) - PHP_FALIAS(drawglyph, swfshape_drawglyph, NULL) - PHP_FALIAS(drawcircle, swfshape_drawcircle, NULL) - PHP_FALIAS(drawarc, swfshape_drawarc, NULL) - PHP_FALIAS(drawcubic, swfshape_drawcubic, NULL) - PHP_FALIAS(drawcubicto, swfshape_drawcubicto, NULL) - { NULL, NULL, NULL } -}; - -/* {{{ proto class swfshape_init(void) - Returns a new SWFShape object */ - -PHP_FUNCTION(swfshape_init) -{ - SWFShape shape = newSWFShape(); - int ret = zend_list_insert(shape, le_swfshapep); - - object_init_ex(getThis(), &shape_class_entry); - add_property_resource(getThis(), "shape", ret); - zend_list_addref(ret); -} - - -static void destroy_SWFShape_resource(zend_rsrc_list_entry *resource TSRMLS_DC) -{ - destroySWFShape((SWFShape)resource->ptr); -} - -/* }}} */ -/* {{{ internal function getShape - Returns the SWFShape object contained in zval *id */ - -static SWFShape getShape(zval *id TSRMLS_DC) -{ - void *shape = SWFgetProperty(id, "shape", 5, le_swfshapep TSRMLS_CC); - - if(!shape) - php_error(E_ERROR, "called object is not an SWFShape!"); - - return (SWFShape)shape; -} - -/* }}} */ -/* {{{ proto void swfshape_setline(int width, int r, int g, int b [, int a]) - Sets the current line style for this SWFShape */ - -PHP_FUNCTION(swfshape_setline) -{ - zval **w, **r, **g, **b, **a; - - if(ZEND_NUM_ARGS() == 4) - { - if(zend_get_parameters_ex(4, &w, &r, &g, &b) == FAILURE) - WRONG_PARAM_COUNT; - } - else if(ZEND_NUM_ARGS() == 5) - { - if(zend_get_parameters_ex(5, &w, &r, &g, &b, &a) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_long_ex(a); - } - else if(ZEND_NUM_ARGS() == 1) - { - SWFShape_setLine(getShape(getThis() TSRMLS_CC), 0, 0, 0, 0, 0); - return; - } - else - WRONG_PARAM_COUNT; - - convert_to_long_ex(w); - convert_to_long_ex(r); - convert_to_long_ex(g); - convert_to_long_ex(b); - - if(ZEND_NUM_ARGS() == 4) - { - SWFShape_setLine(getShape(getThis() TSRMLS_CC), - Z_LVAL_PP(w), Z_LVAL_PP(r), Z_LVAL_PP(g), - Z_LVAL_PP(b), 0xff); - } - else - { - SWFShape_setLine(getShape(getThis() TSRMLS_CC), - Z_LVAL_PP(w), Z_LVAL_PP(r), Z_LVAL_PP(g), - Z_LVAL_PP(b), Z_LVAL_PP(a)); - } -} - -/* }}} */ -/* {{{ proto int swfshape_addfill(int fill, int flags) - Returns a fill object, for use with swfshape_setleftfill and swfshape_setrightfill */ - -PHP_FUNCTION(swfshape_addfill) -{ - SWFFill fill; - int ret; - - if(ZEND_NUM_ARGS() == 1 || ZEND_NUM_ARGS() == 2) - { - /* it's a gradient or bitmap */ - - zval **arg1; - unsigned char flags = 0; - - if(ZEND_NUM_ARGS() == 2) - { - zval **arg2; - - if(zend_get_parameters_ex(2, &arg1, &arg2) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_long_ex(arg2); - flags = (unsigned char)Z_LVAL_PP(arg2); - } - else - { - if(zend_get_parameters_ex(1, &arg1) == FAILURE) - WRONG_PARAM_COUNT; - } - - convert_to_object_ex(arg1); - - if(Z_OBJCE_PP(arg1) == &gradient_class_entry) - { - if(flags == 0) - flags = SWFFILL_LINEAR_GRADIENT; - - fill = SWFShape_addGradientFill(getShape(getThis() TSRMLS_CC), getGradient(*arg1 TSRMLS_CC), - flags); - } - else if(Z_OBJCE_PP(arg1) == &bitmap_class_entry) - { - if(flags == 0) - flags = SWFFILL_TILED_BITMAP; - - fill = SWFShape_addBitmapFill(getShape(getThis() TSRMLS_CC), getBitmap(*arg1 TSRMLS_CC), - flags); - } - else - php_error(E_ERROR, "argument to addfill not a bitmap nor a gradient"); - } - - else if(ZEND_NUM_ARGS() == 3 || ZEND_NUM_ARGS() == 4) - { - /* it's a solid fill */ - zval **r, **g, **b, **za; - int a = 0xff; - - if(ZEND_NUM_ARGS() == 3) - { - if(zend_get_parameters_ex(3, &r, &g, &b) == FAILURE) - WRONG_PARAM_COUNT; - } - else if(ZEND_NUM_ARGS() == 4) - { - if(zend_get_parameters_ex(4, &r, &g, &b, &za) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_long_ex(za); - a = Z_LVAL_PP(za); - } - else - WRONG_PARAM_COUNT; - - convert_to_long_ex(r); - convert_to_long_ex(g); - convert_to_long_ex(b); - - fill = SWFShape_addSolidFill(getShape(getThis() TSRMLS_CC), - Z_LVAL_PP(r), Z_LVAL_PP(g), - Z_LVAL_PP(b), a); - } - - else - WRONG_PARAM_COUNT; - - if(!fill) - php_error(E_ERROR, "Error adding fill to shape!"); - - - /* return an SWFFill object */ - ret = zend_list_insert(fill, le_swffillp); - object_init_ex(return_value, &fill_class_entry); - add_property_resource(return_value, "fill", ret); -} - -/* }}} */ -/* {{{ proto void swfshape_setleftfill(int fill) - Sets the left side fill style to fill */ - -PHP_FUNCTION(swfshape_setleftfill) -{ - zval **zfill, **r, **g, **b, **a; - SWFFill fill; - - if(ZEND_NUM_ARGS() == 3) - { - if(zend_get_parameters_ex(3, &r, &g, &b) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_long_ex(r); - convert_to_long_ex(g); - convert_to_long_ex(b); - - fill = SWFShape_addSolidFill(getShape(getThis() TSRMLS_CC), Z_LVAL_PP(r), - Z_LVAL_PP(g), Z_LVAL_PP(b), 0xff); - } - - else if(ZEND_NUM_ARGS() == 4) - { - if(zend_get_parameters_ex(4, &r, &g, &b, &a) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_long_ex(r); - convert_to_long_ex(g); - convert_to_long_ex(b); - convert_to_long_ex(a); - - fill = SWFShape_addSolidFill(getShape(getThis() TSRMLS_CC), Z_LVAL_PP(r), - Z_LVAL_PP(g), Z_LVAL_PP(b), Z_LVAL_PP(a)); - } - - else if(ZEND_NUM_ARGS() == 1) - { - if(zend_get_parameters_ex(1, &zfill) == FAILURE) - WRONG_PARAM_COUNT; - - if(Z_LVAL_PP(zfill) != 0) - { - convert_to_object_ex(zfill); - fill = getFill(*zfill TSRMLS_CC); - } - else - fill = NULL; - } - - SWFShape_setLeftFill(getShape(getThis() TSRMLS_CC), fill); -} - -/* }}} */ -/* {{{ proto void swfshape_setrightfill(int fill) - Sets the right side fill style to fill */ - -PHP_FUNCTION(swfshape_setrightfill) -{ - zval **zfill, **r, **g, **b, **a; - SWFFill fill; - - if(ZEND_NUM_ARGS() == 3) - { - if(zend_get_parameters_ex(3, &r, &g, &b) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_long_ex(r); - convert_to_long_ex(g); - convert_to_long_ex(b); - - fill = SWFShape_addSolidFill(getShape(getThis() TSRMLS_CC), Z_LVAL_PP(r), - Z_LVAL_PP(g), Z_LVAL_PP(b), 0xff); - } - - else if(ZEND_NUM_ARGS() == 4) - { - if(zend_get_parameters_ex(4, &r, &g, &b, &a) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_long_ex(r); - convert_to_long_ex(g); - convert_to_long_ex(b); - convert_to_long_ex(a); - - fill = SWFShape_addSolidFill(getShape(getThis() TSRMLS_CC), Z_LVAL_PP(r), - Z_LVAL_PP(g), Z_LVAL_PP(b), Z_LVAL_PP(a)); - } - - else if(ZEND_NUM_ARGS() == 1) - { - if(zend_get_parameters_ex(1, &zfill) == FAILURE) - WRONG_PARAM_COUNT; - - if(Z_LVAL_PP(zfill) != 0) - { - convert_to_object_ex(zfill); - fill = getFill(*zfill TSRMLS_CC); - } - else - fill = NULL; - } - - SWFShape_setRightFill(getShape(getThis() TSRMLS_CC), fill); -} - -/* }}} */ -/* {{{ proto void swfshape_movepento(float x, float y) - Moves the pen to shape coordinates (x, y) */ - -PHP_FUNCTION(swfshape_movepento) -{ - zval **x, **y; - - if((ZEND_NUM_ARGS() != 2) || zend_get_parameters_ex(2, &x, &y) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(x); - convert_to_double_ex(y); - - SWFShape_movePenTo(getShape(getThis() TSRMLS_CC), - Z_DVAL_PP(x), Z_DVAL_PP(y)); -} - -/* }}} */ -/* {{{ proto void swfshape_movepen(float x, float y) - Moves the pen from its current location by vector (x, y) */ - -PHP_FUNCTION(swfshape_movepen) -{ - zval **x, **y; - - if((ZEND_NUM_ARGS() != 2) || zend_get_parameters_ex(2, &x, &y) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(x); - convert_to_double_ex(y); - - SWFShape_movePen(getShape(getThis() TSRMLS_CC), - Z_DVAL_PP(x), Z_DVAL_PP(y)); -} - -/* }}} */ -/* {{{ proto void swfshape_drawlineto(float x, float y) - Draws a line from the current pen position to shape coordinates (x, y) in the current line style */ - -PHP_FUNCTION(swfshape_drawlineto) -{ - zval **x, **y; - - if ((ZEND_NUM_ARGS() != 2) || zend_get_parameters_ex(2, &x, &y) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(x); - convert_to_double_ex(y); - - SWFShape_drawLineTo(getShape(getThis() TSRMLS_CC), Z_DVAL_PP(x), Z_DVAL_PP(y)); -} - -/* }}} */ -/* {{{ proto void swfshape_drawline(float dx, float dy) - Draws a line from the current pen position (x, y) to the point (x+dx, y+dy) in the current line style */ - -PHP_FUNCTION(swfshape_drawline) -{ - zval **x, **y; - - if ((ZEND_NUM_ARGS() != 2) || zend_get_parameters_ex(2, &x, &y) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(x); - convert_to_double_ex(y); - - SWFShape_drawLine(getShape(getThis() TSRMLS_CC), Z_DVAL_PP(x), Z_DVAL_PP(y)); -} - -/* }}} */ -/* {{{ proto void swfshape_drawcurveto(float ax, float ay, float bx, float by [, float dx, float dy]) - Draws a curve from the current pen position (x,y) to the point (bx, by) in the current line style, using point (ax, ay) as a control point. Or draws a cubic bezier to point (dx, dy) with control points (ax, ay) and (bx, by) */ - -PHP_FUNCTION(swfshape_drawcurveto) -{ - if(ZEND_NUM_ARGS() == 4) - { - zval **cx, **cy, **ax, **ay; - - if(zend_get_parameters_ex(4, &cx, &cy, &ax, &ay) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(cx); - convert_to_double_ex(cy); - convert_to_double_ex(ax); - convert_to_double_ex(ay); - - SWFShape_drawCurveTo(getShape(getThis() TSRMLS_CC), - Z_DVAL_PP(cx), Z_DVAL_PP(cy), - Z_DVAL_PP(ax), Z_DVAL_PP(ay)); - } - else if(ZEND_NUM_ARGS() == 6) - { - zval **bx, **by, **cx, **cy, **dx, **dy; - - if(zend_get_parameters_ex(6, &bx, &by, &cx, &cy, &dx, &dy) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(bx); - convert_to_double_ex(by); - convert_to_double_ex(cx); - convert_to_double_ex(cy); - convert_to_double_ex(dx); - convert_to_double_ex(dy); - - RETURN_LONG(SWFShape_drawCubicTo(getShape(getThis() TSRMLS_CC), - Z_DVAL_PP(bx), Z_DVAL_PP(by), - Z_DVAL_PP(cx), Z_DVAL_PP(cy), - Z_DVAL_PP(dx), Z_DVAL_PP(dy))); - } - else - WRONG_PARAM_COUNT; -} - -/* }}} */ -/* {{{ proto void swfshape_drawcurve(float adx, float ady, float bdx, float bdy [, float cdx, float cdy]) - Draws a curve from the current pen position (x, y) to the point (x+bdx, y+bdy) in the current line style, using point (x+adx, y+ady) as a control point or draws a cubic bezier to point (x+cdx, x+cdy) with control points (x+adx, y+ady) and (x+bdx, y+bdy) -*/ - -PHP_FUNCTION(swfshape_drawcurve) -{ - if(ZEND_NUM_ARGS() == 4) - { - zval **cx, **cy, **ax, **ay; - - if(zend_get_parameters_ex(4, &cx, &cy, &ax, &ay) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(cx); - convert_to_double_ex(cy); - convert_to_double_ex(ax); - convert_to_double_ex(ay); - - SWFShape_drawCurve(getShape(getThis() TSRMLS_CC), - Z_DVAL_PP(cx), Z_DVAL_PP(cy), - Z_DVAL_PP(ax), Z_DVAL_PP(ay)); - } - else if(ZEND_NUM_ARGS() == 6) - { - zval **bx, **by, **cx, **cy, **dx, **dy; - - if(zend_get_parameters_ex(6, &bx, &by, &cx, &cy, &dx, &dy) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(bx); - convert_to_double_ex(by); - convert_to_double_ex(cx); - convert_to_double_ex(cy); - convert_to_double_ex(dx); - convert_to_double_ex(dy); - - RETURN_LONG(SWFShape_drawCubic(getShape(getThis() TSRMLS_CC), - Z_DVAL_PP(bx), Z_DVAL_PP(by), - Z_DVAL_PP(cx), Z_DVAL_PP(cy), - Z_DVAL_PP(dx), Z_DVAL_PP(dy))); - } - else - WRONG_PARAM_COUNT; -} - -/* }}} */ -/* {{{ proto void swfshape_drawglyph(SWFFont font, string character [, int size]) - Draws the first character in the given string into the shape using the glyph definition from the given font */ - -PHP_FUNCTION(swfshape_drawglyph) -{ - zval **font, **c, **zsize; - int size; - - if(ZEND_NUM_ARGS() == 2) - { - if(zend_get_parameters_ex(2, &font, &c) == FAILURE) - WRONG_PARAM_COUNT; - - size = 1024/Ming_getScale(); - } - else if(ZEND_NUM_ARGS() == 3) - { - if(zend_get_parameters_ex(3, &font, &c, &zsize) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_long_ex(zsize); - size = Z_LVAL_PP(zsize); - } - - convert_to_string_ex(c); - - SWFShape_drawSizedGlyph(getShape(getThis() TSRMLS_CC), getFont(*font TSRMLS_CC), Z_STRVAL_PP(c)[0], size); -} - -/* }}} */ -/* {{{ proto void swfshape_drawcircle(int r) - Draws a circle of radius r centered at the current location, in a counter-clockwise fashion */ - -PHP_FUNCTION(swfshape_drawcircle) -{ - zval **r; - - if((ZEND_NUM_ARGS() != 1) || zend_get_parameters_ex(1, &r) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(r); - - SWFShape_drawCircle(getShape(getThis() TSRMLS_CC), Z_DVAL_PP(r)); -} - -/* }}} */ -/* {{{ proto void swfshape_drawarc(int r, float startAngle, float endAngle) - Draws an arc of radius r centered at the current location, from angle startAngle to angle endAngle measured counterclockwise from 12 o'clock */ - -PHP_FUNCTION(swfshape_drawarc) -{ - zval **r, **start, **end; - - if((ZEND_NUM_ARGS() != 3) || - zend_get_parameters_ex(3, &r, &start, &end) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(r); - convert_to_double_ex(start); - convert_to_double_ex(end); - - /* convert angles to radians, since that's what php uses elsewhere */ - SWFShape_drawArc(getShape(getThis() TSRMLS_CC), Z_DVAL_PP(r), Z_DVAL_PP(start)*M_PI/180, Z_DVAL_PP(end)*M_PI/180); -} - -/* }}} */ -/* {{{ proto void swfshape_drawcubic(float bx, float by, float cx, float cy, float dx, float dy) - Draws a cubic bezier curve using the current position and the three given points as control points */ - -PHP_FUNCTION(swfshape_drawcubic) -{ - zval **bx, **by, **cx, **cy, **dx, **dy; - - if((ZEND_NUM_ARGS() != 6) || - zend_get_parameters_ex(6, &bx, &by, &cx, &cy, &dx, &dy) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(bx); - convert_to_double_ex(by); - convert_to_double_ex(cx); - convert_to_double_ex(cy); - convert_to_double_ex(dx); - convert_to_double_ex(dy); - - RETURN_LONG(SWFShape_drawCubic(getShape(getThis() TSRMLS_CC), - Z_DVAL_PP(bx), Z_DVAL_PP(by), - Z_DVAL_PP(cx), Z_DVAL_PP(cy), - Z_DVAL_PP(dx), Z_DVAL_PP(dy))); -} - -/* }}} */ -/* {{{ proto void swfshape_drawcubic(float bx, float by, float cx, float cy, float dx, float dy) - Draws a cubic bezier curve using the current position and the three given points as control points */ - -PHP_FUNCTION(swfshape_drawcubicto) -{ - zval **bx, **by, **cx, **cy, **dx, **dy; - - if((ZEND_NUM_ARGS() != 6) || - zend_get_parameters_ex(6, &bx, &by, &cx, &cy, &dx, &dy) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(bx); - convert_to_double_ex(by); - convert_to_double_ex(cx); - convert_to_double_ex(cy); - convert_to_double_ex(dx); - convert_to_double_ex(dy); - - RETURN_LONG(SWFShape_drawCubicTo(getShape(getThis() TSRMLS_CC), - Z_DVAL_PP(bx), Z_DVAL_PP(by), - Z_DVAL_PP(cx), Z_DVAL_PP(cy), - Z_DVAL_PP(dx), Z_DVAL_PP(dy))); -} - -/* }}} */ - - -/* }}} */ -/* {{{ SWFSprite */ - -static zend_function_entry swfsprite_functions[] = { - PHP_FALIAS(swfsprite, swfsprite_init, NULL) - PHP_FALIAS(add, swfsprite_add, NULL) - PHP_FALIAS(remove, swfsprite_remove, NULL) - PHP_FALIAS(nextframe, swfsprite_nextFrame, NULL) - PHP_FALIAS(labelframe, swfsprite_labelFrame, NULL) - PHP_FALIAS(setframes, swfsprite_setFrames, NULL) - { NULL, NULL, NULL } -}; - -/* {{{ proto class swfsprite_init(void) - Returns a new SWFSprite object */ - -PHP_FUNCTION(swfsprite_init) -{ - SWFMovieClip sprite = newSWFMovieClip(); - int ret = zend_list_insert(sprite, le_swfspritep); - - object_init_ex(getThis(), &sprite_class_entry); - add_property_resource(getThis(), "sprite", ret); - zend_list_addref(ret); -} - - -static void destroy_SWFSprite_resource(zend_rsrc_list_entry *resource TSRMLS_DC) -{ - destroySWFMovieClip((SWFMovieClip)resource->ptr); -} - -/* }}} */ -/* {{{ internal function SWFSprite getSprite(zval *id) - Returns the SWFSprite object in zval *id */ - -SWFMovieClip getSprite(zval *id TSRMLS_DC) -{ - void *sprite = SWFgetProperty(id, "sprite", 6, le_swfspritep TSRMLS_CC); - - if(!sprite) - php_error(E_ERROR, "called object is not an SWFSprite!"); - - return (SWFMovieClip)sprite; -} - -/* }}} */ -/* {{{ proto SWFDisplayItem swfsprite_add(SWFCharacter) - Adds the character to the sprite, returns a displayitem */ - -PHP_FUNCTION(swfsprite_add) -{ - zval **zchar; - int ret; - SWFBlock block; - SWFDisplayItem item; - SWFMovieClip sprite = getSprite(getThis() TSRMLS_CC); - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &zchar) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_object_ex(zchar); - - if(Z_OBJCE_PP(zchar) == &action_class_entry) - block = (SWFBlock)getAction(*zchar TSRMLS_CC); - else - block = (SWFBlock)getCharacter(*zchar TSRMLS_CC); - - item = SWFMovieClip_add(sprite, block); - - if(item != NULL) - { - /* try and create a displayitem object */ - ret = zend_list_insert(item, le_swfdisplayitemp); - object_init_ex(return_value, &displayitem_class_entry); - add_property_resource(return_value, "displayitem", ret); - } -} - -/* }}} */ -/* {{{ proto void swfsprite_remove(SWFDisplayItem) - Remove the named character from the sprite's display list */ - -PHP_FUNCTION(swfsprite_remove) -{ - zval **zchar; - SWFDisplayItem item; - SWFMovieClip movie = getSprite(getThis() TSRMLS_CC); - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &zchar) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_object_ex(zchar); - item = getDisplayItem(*zchar TSRMLS_CC); - - SWFMovieClip_remove(movie, item); -} - -/* }}} */ -/* {{{ proto void swfsprite_nextFrame(void) - Moves the sprite to the next frame */ - -PHP_FUNCTION(swfsprite_nextFrame) -{ - SWFMovieClip_nextFrame(getSprite(getThis() TSRMLS_CC)); -} - -/* }}} */ -/* {{{ swfmovie_labelframe */ - -PHP_FUNCTION(swfsprite_labelFrame) -{ - zval **label; - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &label) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_string_ex(label); - - SWFMovieClip_labelFrame(getSprite(getThis() TSRMLS_CC), Z_STRVAL_PP(label)); -} - -/* }}} */ -/* {{{ proto void swfsprite_setFrames(int frames) - Sets the number of frames in this SWFSprite */ - -PHP_FUNCTION(swfsprite_setFrames) -{ - zval **frames; - SWFMovieClip sprite = getSprite(getThis() TSRMLS_CC); - - if((ZEND_NUM_ARGS() != 1) || zend_get_parameters_ex(1, &frames) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_long_ex(frames); - - SWFMovieClip_setNumberOfFrames(sprite, Z_LVAL_PP(frames)); -} - -/* }}} */ - -/* }}} */ -/* {{{ SWFText */ - -static zend_function_entry swftext_functions[] = { - PHP_FALIAS(swftext, swftext_init, NULL) - PHP_FALIAS(setfont, swftext_setFont, NULL) - PHP_FALIAS(setheight, swftext_setHeight, NULL) - PHP_FALIAS(setspacing, swftext_setSpacing, NULL) - PHP_FALIAS(setcolor, swftext_setColor, NULL) - PHP_FALIAS(moveto, swftext_moveTo, NULL) - PHP_FALIAS(addstring, swftext_addString, NULL) - PHP_FALIAS(getwidth, swftext_getWidth, NULL) - PHP_FALIAS(getascent, swftext_getAscent, NULL) - PHP_FALIAS(getdescent, swftext_getDescent, NULL) - PHP_FALIAS(getleading, swftext_getLeading, NULL) - { NULL, NULL, NULL } -}; - -/* {{{ proto class swftext_init(void) - Returns new SWFText object */ - -PHP_FUNCTION(swftext_init) -{ - SWFText text = newSWFText2(); - int ret = zend_list_insert(text, le_swftextp); - - object_init_ex(getThis(), &text_class_entry); - add_property_resource(getThis(), "text", ret); - zend_list_addref(ret); -} - - -static void destroy_SWFText_resource(zend_rsrc_list_entry *resource TSRMLS_DC) -{ - destroySWFText((SWFText)resource->ptr); -} - -/* }}} */ -/* {{{ internal function SWFText getText(zval *id) - Returns the SWFText contained in zval *id */ - -SWFText getText(zval *id TSRMLS_DC) -{ - void *text = SWFgetProperty(id, "text", 4, le_swftextp TSRMLS_CC); - - if(!text) - php_error(E_ERROR, "called object is not an SWFText!"); - - return (SWFText)text; -} - -/* }}} */ -/* {{{ proto void swftext_setFont(class font) - Sets this SWFText object's current font to given font */ - -PHP_FUNCTION(swftext_setFont) -{ - zval **zfont; - SWFText text = getText(getThis() TSRMLS_CC); - SWFFont font; - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &zfont) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_object_ex(zfont); - font = getFont(*zfont TSRMLS_CC); - - SWFText_setFont(text, font); -} - -/* }}} */ -/* {{{ proto void swftext_setHeight(float height) - Sets this SWFText object's current height to given height */ - -PHP_FUNCTION(swftext_setHeight) -{ - zval **height; - SWFText text = getText(getThis() TSRMLS_CC); - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &height) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(height); - - SWFText_setHeight(text, Z_DVAL_PP(height)); -} - -/* }}} */ -/* {{{ proto void swftext_setSpacing(float spacing) - Sets this SWFText object's current letterspacing to given spacing */ - -PHP_FUNCTION(swftext_setSpacing) -{ - zval **spacing; - SWFText text = getText(getThis() TSRMLS_CC); - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &spacing) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(spacing); - - SWFText_setSpacing(text, Z_DVAL_PP(spacing)); -} - -/* }}} */ -/* {{{ proto void swftext_setColor(int r, int g, int b [, int a]) - Sets this SWFText object's current color to the given color */ - -PHP_FUNCTION(swftext_setColor) -{ - zval **r, **g, **b, **a; - SWFText text = getText(getThis() TSRMLS_CC); - - if(ZEND_NUM_ARGS() == 3) - { - if(zend_get_parameters_ex(3, &r, &g, &b) == FAILURE) - WRONG_PARAM_COUNT; - } - else if(ZEND_NUM_ARGS() == 4) - { - if(zend_get_parameters_ex(4, &r, &g, &b, &a) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_long_ex(a); - } - else - WRONG_PARAM_COUNT; - - convert_to_long_ex(r); - convert_to_long_ex(g); - convert_to_long_ex(b); - - if(ZEND_NUM_ARGS() == 4) - { - SWFText_setColor(text, Z_LVAL_PP(r), Z_LVAL_PP(g), Z_LVAL_PP(b), Z_LVAL_PP(a)); - } - else - { - SWFText_setColor(text, Z_LVAL_PP(r), Z_LVAL_PP(g), Z_LVAL_PP(b), 0xff); - } -} - -/* }}} */ -/* {{{ proto void swftext_moveTo(float x, float y) - Moves this SWFText object's current pen position to (x, y) in text coordinates */ - -PHP_FUNCTION(swftext_moveTo) -{ - zval **x, **y; - SWFText text = getText(getThis() TSRMLS_CC); - - if(ZEND_NUM_ARGS() != 2 || zend_get_parameters_ex(2, &x, &y) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(x); - convert_to_double_ex(y); - - SWFText_setXY(text, Z_DVAL_PP(x), Z_DVAL_PP(y)); -} - -/* }}} */ -/* {{{ proto void swftext_addString(string text) - Writes the given text into this SWFText object at the current pen position, using the current font, height, spacing, and color */ - -PHP_FUNCTION(swftext_addString) -{ - zval **s; - SWFText text = getText(getThis() TSRMLS_CC); - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &s) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_string_ex(s); - - SWFText_addString(text, Z_STRVAL_PP(s), NULL); -} - -/* }}} */ -/* {{{ proto float swftext_getWidth(string str) - Calculates the width of the given string in this text objects current font and size */ - -PHP_FUNCTION(swftext_getWidth) -{ - zval **zstring; - int width; - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &zstring) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_string_ex(zstring); - - width = SWFText_getStringWidth(getText(getThis() TSRMLS_CC), Z_STRVAL_PP(zstring)); - - RETURN_DOUBLE(width); -} - -/* }}} */ -/* {{{ proto float swftext_getAscent(void) - Returns the ascent of the current font at its current size, or 0 if not available */ - -PHP_FUNCTION(swftext_getAscent) -{ - if(ZEND_NUM_ARGS() != 0) - WRONG_PARAM_COUNT; - - RETURN_DOUBLE(SWFText_getAscent(getText(getThis() TSRMLS_CC))); -} - -/* }}} */ -/* {{{ proto float swftext_getDescent(void) - Returns the descent of the current font at its current size, or 0 if not available */ - -PHP_FUNCTION(swftext_getDescent) -{ - if(ZEND_NUM_ARGS() != 0) - WRONG_PARAM_COUNT; - - RETURN_DOUBLE(SWFText_getDescent(getText(getThis() TSRMLS_CC))); -} - -/* }}} */ -/* {{{ proto float swftext_getLeading(void) - Returns the leading of the current font at its current size, or 0 if not available */ - -PHP_FUNCTION(swftext_getLeading) -{ - if(ZEND_NUM_ARGS() != 0) - WRONG_PARAM_COUNT; - - RETURN_DOUBLE(SWFText_getLeading(getText(getThis() TSRMLS_CC))); -} - -/* }}} */ - -/* }}} */ -/* {{{ SWFTextField */ - -static zend_function_entry swftextfield_functions[] = { - PHP_FALIAS(swftextfield, swftextfield_init, NULL) - PHP_FALIAS(setfont, swftextfield_setFont, NULL) - PHP_FALIAS(setbounds, swftextfield_setBounds, NULL) - PHP_FALIAS(align, swftextfield_align, NULL) - PHP_FALIAS(setheight, swftextfield_setHeight, NULL) - PHP_FALIAS(setleftmargin, swftextfield_setLeftMargin, NULL) - PHP_FALIAS(setrightmargin, swftextfield_setRightMargin, NULL) - PHP_FALIAS(setmargins, swftextfield_setMargins, NULL) - PHP_FALIAS(setindentation, swftextfield_setIndentation, NULL) - PHP_FALIAS(setlinespacing, swftextfield_setLineSpacing, NULL) - PHP_FALIAS(setcolor, swftextfield_setColor, NULL) - PHP_FALIAS(setname, swftextfield_setName, NULL) - PHP_FALIAS(addstring, swftextfield_addString, NULL) - { NULL, NULL, NULL } -}; - -/* {{{ proto object swftextfield_init(void) - Returns a new SWFTextField object */ - -PHP_FUNCTION(swftextfield_init) -{ - zval **flags; - SWFTextField field = newSWFTextField(); - int ret = zend_list_insert(field, le_swftextfieldp); - - object_init_ex(getThis(), &textfield_class_entry); - add_property_resource(getThis(), "textfield", ret); - zend_list_addref(ret); - - if(ZEND_NUM_ARGS() == 1) - { - if(zend_get_parameters_ex(1, &flags) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_long_ex(flags); - SWFTextField_setFlags(field, Z_LVAL_PP(flags)); - } -} - - -static void destroy_SWFTextField_resource(zend_rsrc_list_entry *resource TSRMLS_DC) -{ - destroySWFTextField((SWFTextField)resource->ptr); -} - -/* }}} */ -/* {{{ internal function getTextField - Returns the SWFTextField object contained in zval *id */ - -static SWFTextField getTextField(zval *id TSRMLS_DC) -{ - void *field = SWFgetProperty(id, "textfield", 9, le_swftextfieldp TSRMLS_CC); - - if(!field) - php_error(E_ERROR, "called object is not an SWFTextField!"); - - return (SWFTextField)field; -} - -/* }}} */ -/* {{{ proto void swftextfield_setFont(int font) - Sets the font for this textfield */ - -PHP_FUNCTION(swftextfield_setFont) -{ - zval **font; - SWFTextField field = getTextField(getThis() TSRMLS_CC); - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &font) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_object_ex(font); - - SWFTextField_setFont(field, getFont(*font TSRMLS_CC)); -} - -/* }}} */ -/* {{{ proto void swftextfield_setBounds(float width, float height) - Sets the width and height of this textfield */ - -PHP_FUNCTION(swftextfield_setBounds) -{ - zval **width, **height; - SWFTextField field = getTextField(getThis() TSRMLS_CC); - - if(ZEND_NUM_ARGS() != 2 || zend_get_parameters_ex(2, &width, &height) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(width); - convert_to_double_ex(height); - - SWFTextField_setBounds(field, Z_DVAL_PP(width), Z_DVAL_PP(height)); -} - -/* }}} */ -/* {{{ proto void swftextfield_align(int alignment) - Sets the alignment of this textfield */ - -PHP_FUNCTION(swftextfield_align) -{ - zval **align; - SWFTextField field = getTextField(getThis() TSRMLS_CC); - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &align) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_long_ex(align); - - SWFTextField_setAlignment(field, Z_LVAL_PP(align)); -} - -/* }}} */ -/* {{{ proto void swftextfield_setHeight(float height) - Sets the font height of this textfield */ - -PHP_FUNCTION(swftextfield_setHeight) -{ - zval **height; - SWFTextField field = getTextField(getThis() TSRMLS_CC); - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &height) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(height); - - SWFTextField_setHeight(field, Z_DVAL_PP(height)); -} - -/* }}} */ -/* {{{ proto void swftextfield_setLeftMargin(float) - Sets the left margin of this textfield */ - -PHP_FUNCTION(swftextfield_setLeftMargin) -{ - zval **margin; - SWFTextField field = getTextField(getThis() TSRMLS_CC); - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &margin) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(margin); - - SWFTextField_setLeftMargin(field, Z_DVAL_PP(margin)); -} - -/* }}} */ -/* {{{ proto void swftextfield_setRightMargin(float margin) - Sets the right margin of this textfield */ - -PHP_FUNCTION(swftextfield_setRightMargin) -{ - zval **margin; - SWFTextField field = getTextField(getThis() TSRMLS_CC); - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &margin) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(margin); - - SWFTextField_setRightMargin(field, Z_DVAL_PP(margin)); -} - -/* }}} */ -/* {{{ proto void swftextfield_setMargins(float left, float right) - Sets both margins of this textfield */ - -PHP_FUNCTION(swftextfield_setMargins) -{ - zval **left, **right; - SWFTextField field = getTextField(getThis() TSRMLS_CC); - - if(ZEND_NUM_ARGS() != 2 || - zend_get_parameters_ex(2, &left, &right) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(left); - convert_to_double_ex(right); - - SWFTextField_setLeftMargin(field, Z_DVAL_PP(left)); - SWFTextField_setRightMargin(field, Z_DVAL_PP(right)); -} - -/* }}} */ -/* {{{ proto void swftextfield_setIndentation(float indentation) - Sets the indentation of the first line of this textfield */ - -PHP_FUNCTION(swftextfield_setIndentation) -{ - zval **indent; - SWFTextField field = getTextField(getThis() TSRMLS_CC); - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &indent) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(indent); - - SWFTextField_setIndentation(field, Z_DVAL_PP(indent)); -} - -/* }}} */ -/* {{{ proto void swftextfield_setLineSpacing(float space) - Sets the line spacing of this textfield */ - -PHP_FUNCTION(swftextfield_setLineSpacing) -{ - zval **spacing; - SWFTextField field = getTextField(getThis() TSRMLS_CC); - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &spacing) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_double_ex(spacing); - - SWFTextField_setLineSpacing(field, Z_DVAL_PP(spacing)); -} - -/* }}} */ -/* {{{ proto void swftextfield_setColor(int r, int g, int b [, int a]) - Sets the color of this textfield */ - -PHP_FUNCTION(swftextfield_setColor) -{ - zval **r, **g, **b, **a; - SWFTextField field = getTextField(getThis() TSRMLS_CC); - int alpha = 0xff; - - if(ZEND_NUM_ARGS() == 3) - { - if(zend_get_parameters_ex(3, &r, &g, &b) == FAILURE) - WRONG_PARAM_COUNT; - } - else if(ZEND_NUM_ARGS() == 4) - { - if(zend_get_parameters_ex(4, &r, &g, &b, &a) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_long_ex(a); - alpha = Z_LVAL_PP(a); - } - else - WRONG_PARAM_COUNT; - - convert_to_long_ex(r); - convert_to_long_ex(g); - convert_to_long_ex(b); - - SWFTextField_setColor(field, Z_LVAL_PP(r), Z_LVAL_PP(g), Z_LVAL_PP(b), alpha); -} - -/* }}} */ -/* {{{ proto void swftextfield_setName(string var_name) - Sets the variable name of this textfield */ - -PHP_FUNCTION(swftextfield_setName) -{ - zval **name; - SWFTextField field = getTextField(getThis() TSRMLS_CC); - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &name) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_string_ex(name); - - SWFTextField_setVariableName(field, Z_STRVAL_PP(name)); -} - -/* }}} */ -/* {{{ proto void swftextfield_addString(string str) - Adds the given string to this textfield */ - -PHP_FUNCTION(swftextfield_addString) -{ - zval **string; - SWFTextField field = getTextField(getThis() TSRMLS_CC); - - if(ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &string) == FAILURE) - WRONG_PARAM_COUNT; - - convert_to_string_ex(string); - - SWFTextField_addString(field, Z_STRVAL_PP(string)); -} - -/* }}} */ - -/* }}} */ - -zend_module_entry ming_module_entry = - { - STANDARD_MODULE_HEADER, - "ming", - ming_functions, - PHP_MINIT(ming), /* module init function */ - NULL, /* module shutdown function */ - PHP_RINIT(ming), /* request init function */ - NULL, /* request shutdown function */ - PHP_MINFO(ming), /* module info function */ - NO_VERSION_YET, - STANDARD_MODULE_PROPERTIES - }; - -#if defined(COMPILE_DL) || defined(COMPILE_DL_MING) -ZEND_GET_MODULE(ming) -#endif - -/* {{{ todo PHP_MINFO_FUNCTION(ming) -*/ - -PHP_MINFO_FUNCTION(ming) -{ - php_info_print_table_start(); - php_info_print_table_row(2, "Ming SWF output library", "the funk in your trunk"); - php_info_print_table_row(2, "Version", MING_VERSION_TEXT); - php_info_print_table_end(); -} - -/* }}} */ -/* {{{ todo PHP_MINIT_FUNCTION(ming) -*/ - -#define ERROR_BUFSIZE 1024 - -/* custom error handler propagates ming errors up to php */ -void php_ming_error(char *msg, ...) -{ - va_list args; - char buffer[ERROR_BUFSIZE]; - - va_start(args, msg); - vsnprintf(buffer, ERROR_BUFSIZE, msg, args); - va_end(args); - - php_error(E_ERROR, buffer); -} - -PHP_RINIT_FUNCTION(ming) -{ - /* XXX - this didn't work so well last I tried.. */ - - if(Ming_init() != 0) { - php_error(E_ERROR, "Error initializing Ming module"); - return FAILURE; - } - - return SUCCESS; -} - -PHP_MINIT_FUNCTION(ming) -{ - Ming_setErrorFunction(php_ming_error); - -#define CONSTANT(s,c) REGISTER_LONG_CONSTANT((s), (c), CONST_CS | CONST_PERSISTENT) - - /* flags for SWFButton_addShape */ - CONSTANT("SWFBUTTON_HIT", SWFBUTTONRECORD_HITSTATE); - CONSTANT("SWFBUTTON_DOWN", SWFBUTTONRECORD_DOWNSTATE); - CONSTANT("SWFBUTTON_OVER", SWFBUTTONRECORD_OVERSTATE); - CONSTANT("SWFBUTTON_UP", SWFBUTTONRECORD_UPSTATE); - - /* flags for SWFButton_addAction */ - CONSTANT("SWFBUTTON_MOUSEUPOUTSIDE", SWFBUTTON_MOUSEUPOUTSIDE); - CONSTANT("SWFBUTTON_DRAGOVER", SWFBUTTON_DRAGOVER); - CONSTANT("SWFBUTTON_DRAGOUT", SWFBUTTON_DRAGOUT); - CONSTANT("SWFBUTTON_MOUSEUP", SWFBUTTON_MOUSEUP); - CONSTANT("SWFBUTTON_MOUSEDOWN", SWFBUTTON_MOUSEDOWN); - CONSTANT("SWFBUTTON_MOUSEOUT", SWFBUTTON_MOUSEOUT); - CONSTANT("SWFBUTTON_MOUSEOVER", SWFBUTTON_MOUSEOVER); - - /* flags for SWFFill */ - CONSTANT("SWFFILL_RADIAL_GRADIENT", SWFFILL_RADIAL_GRADIENT); - CONSTANT("SWFFILL_LINEAR_GRADIENT", SWFFILL_LINEAR_GRADIENT); - CONSTANT("SWFFILL_TILED_BITMAP", SWFFILL_TILED_BITMAP); - CONSTANT("SWFFILL_CLIPPED_BITMAP", SWFFILL_CLIPPED_BITMAP); - - /* flags for SWFTextField_init */ - CONSTANT("SWFTEXTFIELD_HASLENGTH", SWFTEXTFIELD_HASLENGTH); - CONSTANT("SWFTEXTFIELD_NOEDIT", SWFTEXTFIELD_NOEDIT); - CONSTANT("SWFTEXTFIELD_PASSWORD", SWFTEXTFIELD_PASSWORD); - CONSTANT("SWFTEXTFIELD_MULTILINE", SWFTEXTFIELD_MULTILINE); - CONSTANT("SWFTEXTFIELD_WORDWRAP", SWFTEXTFIELD_WORDWRAP); - CONSTANT("SWFTEXTFIELD_DRAWBOX", SWFTEXTFIELD_DRAWBOX); - CONSTANT("SWFTEXTFIELD_NOSELECT", SWFTEXTFIELD_NOSELECT); - CONSTANT("SWFTEXTFIELD_HTML", SWFTEXTFIELD_HTML); - - /* flags for SWFTextField_align */ - CONSTANT("SWFTEXTFIELD_ALIGN_LEFT", SWFTEXTFIELD_ALIGN_LEFT); - CONSTANT("SWFTEXTFIELD_ALIGN_RIGHT", SWFTEXTFIELD_ALIGN_RIGHT); - CONSTANT("SWFTEXTFIELD_ALIGN_CENTER", SWFTEXTFIELD_ALIGN_CENTER); - CONSTANT("SWFTEXTFIELD_ALIGN_JUSTIFY", SWFTEXTFIELD_ALIGN_JUSTIFY); - - /* flags for SWFDisplayItem_addAction */ - CONSTANT("SWFACTION_ONLOAD", SWFACTION_ONLOAD); - CONSTANT("SWFACTION_ENTERFRAME", SWFACTION_ENTERFRAME); - CONSTANT("SWFACTION_UNLOAD", SWFACTION_UNLOAD); - CONSTANT("SWFACTION_MOUSEMOVE", SWFACTION_MOUSEMOVE); - CONSTANT("SWFACTION_MOUSEDOWN", SWFACTION_MOUSEDOWN); - CONSTANT("SWFACTION_MOUSEUP", SWFACTION_MOUSEUP); - CONSTANT("SWFACTION_KEYDOWN", SWFACTION_KEYDOWN); - CONSTANT("SWFACTION_KEYUP", SWFACTION_KEYUP); - CONSTANT("SWFACTION_DATA", SWFACTION_DATA); - - le_swfmoviep = zend_register_list_destructors_ex(destroy_SWFMovie_resource, NULL, "SWFMovie", module_number); - le_swfshapep = zend_register_list_destructors_ex(destroy_SWFShape_resource, NULL, "SWFShape", module_number); - le_swffillp = zend_register_list_destructors_ex(destroy_SWFFill_resource, NULL, "SWFFill", module_number); - le_swfgradientp = zend_register_list_destructors_ex(destroy_SWFGradient_resource, NULL, "SWFGradient", module_number); - le_swfbitmapp = zend_register_list_destructors_ex(destroy_SWFBitmap_resource, NULL, "SWFBitmap", module_number); - le_swftextp = zend_register_list_destructors_ex(destroy_SWFText_resource, NULL, "SWFText", module_number); - le_swftextfieldp = zend_register_list_destructors_ex(destroy_SWFTextField_resource, NULL, "SWFTextField", module_number); - le_swffontp = zend_register_list_destructors_ex(destroy_SWFFont_resource, NULL, "SWFFont", module_number); - le_swfbuttonp = zend_register_list_destructors_ex(destroy_SWFButton_resource, NULL, "SWFButton", module_number); - le_swfmorphp = zend_register_list_destructors_ex(destroy_SWFMorph_resource, NULL, "SWFMorph", module_number); - le_swfspritep = zend_register_list_destructors_ex(destroy_SWFSprite_resource, NULL, "SWFSprite", module_number); - - le_swfdisplayitemp = zend_register_list_destructors_ex(NULL, NULL, "SWFDisplayItem", module_number); - le_swfactionp = zend_register_list_destructors_ex(NULL, NULL, "SWFAction", module_number); - - le_swfinputp = zend_register_list_destructors_ex(destroy_SWFInput_resource, NULL, "SWFInput", module_number); - - INIT_CLASS_ENTRY(shape_class_entry, "swfshape", swfshape_functions); - INIT_CLASS_ENTRY(fill_class_entry, "swffill", swffill_functions); - INIT_CLASS_ENTRY(gradient_class_entry, "swfgradient", swfgradient_functions); - INIT_CLASS_ENTRY(bitmap_class_entry, "swfbitmap", swfbitmap_functions); - INIT_CLASS_ENTRY(text_class_entry, "swftext", swftext_functions); - INIT_CLASS_ENTRY(textfield_class_entry, "swftextfield", - swftextfield_functions); - INIT_CLASS_ENTRY(font_class_entry, "swffont", swffont_functions); - INIT_CLASS_ENTRY(displayitem_class_entry, "swfdisplayitem", - swfdisplayitem_functions); - INIT_CLASS_ENTRY(movie_class_entry, "swfmovie", swfmovie_functions); - INIT_CLASS_ENTRY(button_class_entry, "swfbutton", swfbutton_functions); - INIT_CLASS_ENTRY(action_class_entry, "swfaction", swfaction_functions); - INIT_CLASS_ENTRY(morph_class_entry, "swfmorph", swfmorph_functions); - INIT_CLASS_ENTRY(sprite_class_entry, "swfsprite", swfsprite_functions); - - zend_register_internal_class(&shape_class_entry TSRMLS_CC); - zend_register_internal_class(&fill_class_entry TSRMLS_CC); - zend_register_internal_class(&gradient_class_entry TSRMLS_CC); - zend_register_internal_class(&bitmap_class_entry TSRMLS_CC); - zend_register_internal_class(&text_class_entry TSRMLS_CC); - zend_register_internal_class(&textfield_class_entry TSRMLS_CC); - zend_register_internal_class(&font_class_entry TSRMLS_CC); - zend_register_internal_class(&displayitem_class_entry TSRMLS_CC); - zend_register_internal_class(&movie_class_entry TSRMLS_CC); - zend_register_internal_class(&button_class_entry TSRMLS_CC); - zend_register_internal_class(&action_class_entry TSRMLS_CC); - zend_register_internal_class(&morph_class_entry TSRMLS_CC); - zend_register_internal_class(&sprite_class_entry TSRMLS_CC); - - return SUCCESS; -} - -/* }}} */ - -#endif - -/* - * Local variables: - * tab-width: 4 - * c-basic-offset: 4 - * End: - * vim600: sw=4 ts=4 fdm=marker - * vim<600: sw=4 ts=4 - */ |