diff options
Diffstat (limited to 'ext/session/mod_user.c')
-rw-r--r-- | ext/session/mod_user.c | 186 |
1 files changed, 0 insertions, 186 deletions
diff --git a/ext/session/mod_user.c b/ext/session/mod_user.c deleted file mode 100644 index 62c5c7759a..0000000000 --- a/ext/session/mod_user.c +++ /dev/null @@ -1,186 +0,0 @@ -/* - +----------------------------------------------------------------------+ - | PHP version 4.0 | - +----------------------------------------------------------------------+ - | Copyright (c) 1997, 1998, 1999 The PHP Group | - +----------------------------------------------------------------------+ - | This source file is subject to version 2.0 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_0.txt. | - | If you did not receive a copy of the PHP license and are unable to | - | obtain it through the world-wide-web, please send a note to | - | license@php.net so we can mail you a copy immediately. | - +----------------------------------------------------------------------+ - | Authors: Sascha Schumann <ss@2ns.de> | - +----------------------------------------------------------------------+ - */ - -#include "php.h" -#include "php_session.h" -#include "mod_user.h" - -ps_module ps_mod_user = { - PS_MOD(user) -}; - -#define ZVAL_LONG(val, a) \ -{ \ - MAKE_STD_ZVAL(a); \ - a->type = IS_LONG; \ - a->value.lval = val; \ -} - -#define ZVAL_STRING(vl, a) \ -{ \ - int len = strlen(vl); \ - MAKE_STD_ZVAL(a); \ - a->type = IS_STRING; \ - a->value.str.len = len; \ - a->value.str.val = estrndup(vl, len); \ -} - -#define ZVAL_STRINGN(vl, ln, a) \ -{ \ - MAKE_STD_ZVAL(a); \ - a->type = IS_STRING; \ - a->value.str.len = ln; \ - a->value.str.val = estrndup(vl, ln); \ -} - - -static zval *ps_call_handler(char *name, int argc, zval **argv) -{ - int i; - zval *retval = NULL; - ELS_FETCH(); - - if(name && name[0] != '\0') { - zval *func; - - ZVAL_STRING(name, func); - MAKE_STD_ZVAL(retval); - - if(call_user_function(EG(function_table), NULL, func, retval, - argc, argv) == FAILURE) { - zval_dtor(retval); - efree(retval); - retval = NULL; - } - zval_dtor(func); - efree(func); - } - - for(i = 0; i < argc; i++) { - zval_dtor(argv[i]); - efree(argv[i]); - } - - return retval; -} - -#define STDVARS \ - zval *retval; \ - int ret = FAILURE; \ - ps_user *mdata = PS_GET_MOD_DATA(); \ - if(!mdata) return FAILURE - -#define PSF(a) mdata->name.ps_##a - -#define FINISH \ - if(retval) { \ - convert_to_long(retval); \ - ret = retval->value.lval; \ - zval_dtor(retval); \ - efree(retval); \ - } \ - return ret - -PS_OPEN_FUNC(user) -{ - zval *args[2]; - STDVARS; - - ZVAL_STRING(save_path, args[0]); - ZVAL_STRING(session_name, args[1]); - - retval = ps_call_handler(PSF(open), 2, args); - - FINISH; -} - -PS_CLOSE_FUNC(user) -{ - int i; - STDVARS; - - retval = ps_call_handler(PSF(close), 0, NULL); - - for(i = 0; i < 6; i++) { - efree(mdata->names[i]); - } - efree(mdata); - - PS_SET_MOD_DATA(NULL); - - FINISH; -} - -PS_READ_FUNC(user) -{ - zval *args[1]; - STDVARS; - - ZVAL_STRING(key, args[0]); - - retval = ps_call_handler(PSF(read), 1, args); - - if(retval) { - if(retval->type == IS_STRING) { - *val = estrndup(retval->value.str.val, retval->value.str.len); - *vallen = retval->value.str.len; - ret = SUCCESS; - } - zval_dtor(retval); - efree(retval); - } - - return ret; -} - -PS_WRITE_FUNC(user) -{ - zval *args[2]; - STDVARS; - - ZVAL_STRING(key, args[0]); - ZVAL_STRINGN(val, vallen, args[1]); - - retval = ps_call_handler(PSF(write), 2, args); - - FINISH; -} - -PS_DESTROY_FUNC(user) -{ - zval *args[1]; - STDVARS; - - ZVAL_STRING(key, args[0]); - - retval = ps_call_handler(PSF(destroy), 1, args); - - FINISH; -} - -PS_GC_FUNC(user) -{ - zval *args[1]; - STDVARS; - - ZVAL_LONG(maxlifetime, args[0]); - - retval = ps_call_handler(PSF(gc), 1, args); - - FINISH; -} |