????JFIF??x?x????'
Server IP : 79.136.114.73 / Your IP : 18.220.98.157 Web Server : Apache/2.4.7 (Ubuntu) PHP/5.5.9-1ubuntu4.29 OpenSSL/1.0.1f System : Linux b8009 3.13.0-170-generic #220-Ubuntu SMP Thu May 9 12:40:49 UTC 2019 x86_64 User : www-data ( 33) PHP Version : 5.5.9-1ubuntu4.29 Disable Function : pcntl_alarm,pcntl_fork,pcntl_waitpid,pcntl_wait,pcntl_wifexited,pcntl_wifstopped,pcntl_wifsignaled,pcntl_wexitstatus,pcntl_wtermsig,pcntl_wstopsig,pcntl_signal,pcntl_signal_dispatch,pcntl_get_last_error,pcntl_strerror,pcntl_sigprocmask,pcntl_sigwaitinfo,pcntl_sigtimedwait,pcntl_exec,pcntl_getpriority,pcntl_setpriority, MySQL : ON | cURL : ON | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : ON Directory : /proc/self/root/home/b8009/php-5.6.22/ext/dba/ |
Upload File : |
/* +----------------------------------------------------------------------+ | PHP Version 5 | +----------------------------------------------------------------------+ | Copyright (c) 1997-2016 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$ */ #ifdef HAVE_CONFIG_H #include "config.h" #endif #include "php.h" #if DBA_GDBM #include "php_gdbm.h" #ifdef GDBM_INCLUDE_FILE #include GDBM_INCLUDE_FILE #endif #define GDBM_DATA dba_gdbm_data *dba = info->dbf #define GDBM_GKEY datum gkey; gkey.dptr = (char *) key; gkey.dsize = keylen typedef struct { GDBM_FILE dbf; datum nextkey; } dba_gdbm_data; DBA_OPEN_FUNC(gdbm) { GDBM_FILE dbf; int gmode = 0; int filemode = 0644; gmode = info->mode == DBA_READER ? GDBM_READER : info->mode == DBA_WRITER ? GDBM_WRITER : info->mode == DBA_CREAT ? GDBM_WRCREAT : info->mode == DBA_TRUNC ? GDBM_NEWDB : -1; if(gmode == -1) return FAILURE; /* not possible */ if(info->argc > 0) { convert_to_long_ex(info->argv[0]); filemode = Z_LVAL_PP(info->argv[0]); } dbf = gdbm_open(info->path, 0, gmode, filemode, NULL); if(dbf) { info->dbf = pemalloc(sizeof(dba_gdbm_data), info->flags&DBA_PERSISTENT); memset(info->dbf, 0, sizeof(dba_gdbm_data)); ((dba_gdbm_data *) info->dbf)->dbf = dbf; return SUCCESS; } *error = gdbm_strerror(gdbm_errno); return FAILURE; } DBA_CLOSE_FUNC(gdbm) { GDBM_DATA; if(dba->nextkey.dptr) free(dba->nextkey.dptr); gdbm_close(dba->dbf); pefree(dba, info->flags&DBA_PERSISTENT); } DBA_FETCH_FUNC(gdbm) { GDBM_DATA; datum gval; char *new = NULL; GDBM_GKEY; gval = gdbm_fetch(dba->dbf, gkey); if(gval.dptr) { if(newlen) *newlen = gval.dsize; new = estrndup(gval.dptr, gval.dsize); free(gval.dptr); } return new; } DBA_UPDATE_FUNC(gdbm) { datum gval; GDBM_DATA; GDBM_GKEY; gval.dptr = (char *) val; gval.dsize = vallen; switch (gdbm_store(dba->dbf, gkey, gval, mode == 1 ? GDBM_INSERT : GDBM_REPLACE)) { case 0: return SUCCESS; case 1: return FAILURE; case -1: php_error_docref2(NULL TSRMLS_CC, key, val, E_WARNING, "%s", gdbm_strerror(gdbm_errno)); return FAILURE; default: php_error_docref2(NULL TSRMLS_CC, key, val, E_WARNING, "Unknown return value"); return FAILURE; } } DBA_EXISTS_FUNC(gdbm) { GDBM_DATA; GDBM_GKEY; return gdbm_exists(dba->dbf, gkey) ? SUCCESS : FAILURE; } DBA_DELETE_FUNC(gdbm) { GDBM_DATA; GDBM_GKEY; return gdbm_delete(dba->dbf, gkey) == -1 ? FAILURE : SUCCESS; } DBA_FIRSTKEY_FUNC(gdbm) { GDBM_DATA; datum gkey; char *key = NULL; if(dba->nextkey.dptr) { free(dba->nextkey.dptr); } gkey = gdbm_firstkey(dba->dbf); if(gkey.dptr) { key = estrndup(gkey.dptr, gkey.dsize); if(newlen) *newlen = gkey.dsize; dba->nextkey = gkey; } else { dba->nextkey.dptr = NULL; } return key; } DBA_NEXTKEY_FUNC(gdbm) { GDBM_DATA; char *nkey = NULL; datum gkey; if(!dba->nextkey.dptr) return NULL; gkey = gdbm_nextkey(dba->dbf, dba->nextkey); free(dba->nextkey.dptr); if(gkey.dptr) { nkey = estrndup(gkey.dptr, gkey.dsize); if(newlen) *newlen = gkey.dsize; dba->nextkey = gkey; } else { dba->nextkey.dptr = NULL; } return nkey; } DBA_OPTIMIZE_FUNC(gdbm) { GDBM_DATA; gdbm_reorganize(dba->dbf); return SUCCESS; } DBA_SYNC_FUNC(gdbm) { GDBM_DATA; gdbm_sync(dba->dbf); return SUCCESS; } DBA_INFO_FUNC(gdbm) { return estrdup(gdbm_version); } #endif /* * Local variables: * tab-width: 4 * c-basic-offset: 4 * End: * vim600: sw=4 ts=4 fdm=marker * vim<600: sw=4 ts=4 */