diff options
Diffstat (limited to 'ext/session/mod_user.c')
| -rw-r--r-- | ext/session/mod_user.c | 193 |
1 files changed, 193 insertions, 0 deletions
diff --git a/ext/session/mod_user.c b/ext/session/mod_user.c new file mode 100644 index 0000000..57d7bd0 --- /dev/null +++ b/ext/session/mod_user.c @@ -0,0 +1,193 @@ +/* + +----------------------------------------------------------------------+ + | PHP Version 5 | + +----------------------------------------------------------------------+ + | Copyright (c) 1997-2013 The PHP Group | + +----------------------------------------------------------------------+ + | This source file is subject to version 3.01 of the PHP license, | + | that is bundled with this package in the file LICENSE, and is | + | available through the world-wide-web at the following url: | + | http://www.php.net/license/3_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: Sascha Schumann <sascha@schumann.cx> | + +----------------------------------------------------------------------+ + */ + +/* $Id$ */ + +#include "php.h" +#include "php_session.h" +#include "mod_user.h" + +ps_module ps_mod_user = { + PS_MOD(user) +}; + +#define SESS_ZVAL_LONG(val, a) \ +{ \ + MAKE_STD_ZVAL(a); \ + ZVAL_LONG(a, val); \ +} + +#define SESS_ZVAL_STRING(vl, a) \ +{ \ + char *__vl = vl; \ + SESS_ZVAL_STRINGN(__vl, strlen(__vl), a); \ +} + +#define SESS_ZVAL_STRINGN(vl, ln, a) \ +{ \ + MAKE_STD_ZVAL(a); \ + ZVAL_STRINGL(a, vl, ln, 1); \ +} + +static zval *ps_call_handler(zval *func, int argc, zval **argv TSRMLS_DC) +{ + int i; + zval *retval = NULL; + + MAKE_STD_ZVAL(retval); + if (call_user_function(EG(function_table), NULL, func, retval, argc, argv TSRMLS_CC) == FAILURE) { + zval_ptr_dtor(&retval); + retval = NULL; + } + + for (i = 0; i < argc; i++) { + zval_ptr_dtor(&argv[i]); + } + + return retval; +} + +#define STDVARS \ + zval *retval = NULL; \ + int ret = FAILURE + +#define PSF(a) PS(mod_user_names).name.ps_##a + +#define FINISH \ + if (retval) { \ + convert_to_long(retval); \ + ret = Z_LVAL_P(retval); \ + zval_ptr_dtor(&retval); \ + } \ + return ret + +PS_OPEN_FUNC(user) +{ + zval *args[2]; + STDVARS; + + if (PSF(open) == NULL) { + php_error_docref(NULL TSRMLS_CC, E_WARNING, + "user session functions not defined"); + + return FAILURE; + } + + SESS_ZVAL_STRING((char*)save_path, args[0]); + SESS_ZVAL_STRING((char*)session_name, args[1]); + + retval = ps_call_handler(PSF(open), 2, args TSRMLS_CC); + PS(mod_user_implemented) = 1; + + FINISH; +} + +PS_CLOSE_FUNC(user) +{ + zend_bool bailout = 0; + STDVARS; + + if (!PS(mod_user_implemented)) { + /* already closed */ + return SUCCESS; + } + + zend_try { + retval = ps_call_handler(PSF(close), 0, NULL TSRMLS_CC); + } zend_catch { + bailout = 1; + } zend_end_try(); + + PS(mod_user_implemented) = 0; + + if (bailout) { + if (retval) { + zval_ptr_dtor(&retval); + } + zend_bailout(); + } + + FINISH; +} + +PS_READ_FUNC(user) +{ + zval *args[1]; + STDVARS; + + SESS_ZVAL_STRING((char*)key, args[0]); + + retval = ps_call_handler(PSF(read), 1, args TSRMLS_CC); + + if (retval) { + if (Z_TYPE_P(retval) == IS_STRING) { + *val = estrndup(Z_STRVAL_P(retval), Z_STRLEN_P(retval)); + *vallen = Z_STRLEN_P(retval); + ret = SUCCESS; + } + zval_ptr_dtor(&retval); + } + + return ret; +} + +PS_WRITE_FUNC(user) +{ + zval *args[2]; + STDVARS; + + SESS_ZVAL_STRING((char*)key, args[0]); + SESS_ZVAL_STRINGN((char*)val, vallen, args[1]); + + retval = ps_call_handler(PSF(write), 2, args TSRMLS_CC); + + FINISH; +} + +PS_DESTROY_FUNC(user) +{ + zval *args[1]; + STDVARS; + + SESS_ZVAL_STRING((char*)key, args[0]); + + retval = ps_call_handler(PSF(destroy), 1, args TSRMLS_CC); + + FINISH; +} + +PS_GC_FUNC(user) +{ + zval *args[1]; + STDVARS; + + SESS_ZVAL_LONG(maxlifetime, args[0]); + + retval = ps_call_handler(PSF(gc), 1, args TSRMLS_CC); + + FINISH; +} + +/* + * Local variables: + * tab-width: 4 + * c-basic-offset: 4 + * End: + * vim600: sw=4 ts=4 fdm=marker + * vim<600: sw=4 ts=4 + */ |