123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193 |
- #ifdef HAVE_CONFIG_H
- #include "config.h"
- #endif
- #include "php.h"
- #if DBA_INIFILE
- #include "php_inifile.h"
- #include "libinifile/inifile.h"
- #ifdef HAVE_UNISTD_H
- #include <unistd.h>
- #endif
- #include <sys/types.h>
- #include <sys/stat.h>
- #include <fcntl.h>
- #define INIFILE_DATA \
- inifile *dba = info->dbf
- #define INIFILE_GKEY \
- key_type ini_key; \
- if (!key) { \
- php_error_docref(NULL TSRMLS_CC, E_WARNING, "No key specified"); \
- return 0; \
- } \
- ini_key = inifile_key_split((char*)key)
- #define INIFILE_DONE \
- inifile_key_free(&ini_key)
- DBA_OPEN_FUNC(inifile)
- {
- info->dbf = inifile_alloc(info->fp, info->mode == DBA_READER, info->flags&DBA_PERSISTENT TSRMLS_CC);
- return info->dbf ? SUCCESS : FAILURE;
- }
- DBA_CLOSE_FUNC(inifile)
- {
- INIFILE_DATA;
- inifile_free(dba, info->flags&DBA_PERSISTENT);
- }
- DBA_FETCH_FUNC(inifile)
- {
- val_type ini_val;
- INIFILE_DATA;
- INIFILE_GKEY;
- ini_val = inifile_fetch(dba, &ini_key, skip TSRMLS_CC);
- *newlen = ini_val.value ? strlen(ini_val.value) : 0;
- INIFILE_DONE;
- return ini_val.value;
- }
- DBA_UPDATE_FUNC(inifile)
- {
- val_type ini_val;
- int res;
- INIFILE_DATA;
- INIFILE_GKEY;
-
- ini_val.value = val;
-
- if (mode == 1) {
- res = inifile_append(dba, &ini_key, &ini_val TSRMLS_CC);
- } else {
- res = inifile_replace(dba, &ini_key, &ini_val TSRMLS_CC);
- }
- INIFILE_DONE;
- switch(res) {
- case -1:
- php_error_docref1(NULL TSRMLS_CC, key, E_WARNING, "Operation not possible");
- return FAILURE;
- default:
- case 0:
- return SUCCESS;
- case 1:
- return FAILURE;
- }
- }
- DBA_EXISTS_FUNC(inifile)
- {
- val_type ini_val;
- INIFILE_DATA;
- INIFILE_GKEY;
-
- ini_val = inifile_fetch(dba, &ini_key, 0 TSRMLS_CC);
- INIFILE_DONE;
- if (ini_val.value) {
- inifile_val_free(&ini_val);
- return SUCCESS;
- }
- return FAILURE;
- }
- DBA_DELETE_FUNC(inifile)
- {
- int res;
- INIFILE_DATA;
- INIFILE_GKEY;
- res = inifile_delete(dba, &ini_key TSRMLS_CC);
- INIFILE_DONE;
- return (res == -1 ? FAILURE : SUCCESS);
- }
- DBA_FIRSTKEY_FUNC(inifile)
- {
- INIFILE_DATA;
- if (inifile_firstkey(dba TSRMLS_CC)) {
- char *result = inifile_key_string(&dba->curr.key);
- *newlen = strlen(result);
- return result;
- } else {
- return NULL;
- }
- }
- DBA_NEXTKEY_FUNC(inifile)
- {
- INIFILE_DATA;
-
- if (!dba->curr.key.group && !dba->curr.key.name) {
- return NULL;
- }
- if (inifile_nextkey(dba TSRMLS_CC)) {
- char *result = inifile_key_string(&dba->curr.key);
- *newlen = strlen(result);
- return result;
- } else {
- return NULL;
- }
- }
- DBA_OPTIMIZE_FUNC(inifile)
- {
-
- return SUCCESS;
- }
- DBA_SYNC_FUNC(inifile)
- {
-
- return SUCCESS;
- }
- DBA_INFO_FUNC(inifile)
- {
- return estrdup(inifile_version());
- }
- #endif
|