2002-11-06 01:47:06 +00:00
|
|
|
/*
|
|
|
|
+----------------------------------------------------------------------+
|
2004-01-08 08:18:22 +00:00
|
|
|
| PHP Version 5 |
|
2002-11-06 01:47:06 +00:00
|
|
|
+----------------------------------------------------------------------+
|
2004-01-08 08:18:22 +00:00
|
|
|
| Copyright (c) 1997-2004 The PHP Group |
|
2002-11-06 01:47:06 +00:00
|
|
|
+----------------------------------------------------------------------+
|
2003-06-10 20:04:29 +00:00
|
|
|
| This source file is subject to version 3.0 of the PHP license, |
|
2002-11-06 01:47:06 +00:00
|
|
|
| that is bundled with this package in the file LICENSE, and is |
|
2003-06-10 20:04:29 +00:00
|
|
|
| available through the world-wide-web at the following url: |
|
|
|
|
| http://www.php.net/license/3_0.txt. |
|
2002-11-06 01:47:06 +00:00
|
|
|
| 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: Marcus Boerger <helly@php.net> |
|
|
|
|
| based on ext/db/db.c by: |
|
|
|
|
| Rasmus Lerdorf <rasmus@php.net> |
|
|
|
|
| Jim Winstead <jimw@php.net> |
|
|
|
|
+----------------------------------------------------------------------+
|
|
|
|
*/
|
|
|
|
|
|
|
|
/* $Id$ */
|
|
|
|
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
|
|
#include "config.h"
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#include "php.h"
|
|
|
|
#include "php_globals.h"
|
|
|
|
#include "safe_mode.h"
|
|
|
|
|
|
|
|
#include <stdlib.h>
|
|
|
|
#include <string.h>
|
|
|
|
#include <errno.h>
|
|
|
|
#if HAVE_UNISTD_H
|
|
|
|
#include <unistd.h>
|
|
|
|
#endif
|
|
|
|
|
2002-11-06 09:17:51 +00:00
|
|
|
#include "flatfile.h"
|
2002-11-06 01:47:06 +00:00
|
|
|
|
2003-02-18 22:19:18 +00:00
|
|
|
#define FLATFILE_BLOCK_SIZE 1024
|
|
|
|
|
2002-11-06 01:47:06 +00:00
|
|
|
/*
|
|
|
|
* ret = -1 means that database was opened for read-only
|
|
|
|
* ret = 0 success
|
|
|
|
* ret = 1 key already exists - nothing done
|
|
|
|
*/
|
|
|
|
|
2002-11-07 23:03:16 +00:00
|
|
|
/* {{{ flatfile_store
|
2002-11-06 01:47:06 +00:00
|
|
|
*/
|
2002-11-19 01:06:42 +00:00
|
|
|
int flatfile_store(flatfile *dba, datum key_datum, datum value_datum, int mode TSRMLS_DC) {
|
2002-11-07 23:03:16 +00:00
|
|
|
if (mode == FLATFILE_INSERT) {
|
|
|
|
if (flatfile_findkey(dba, key_datum TSRMLS_CC)) {
|
2002-11-06 01:47:06 +00:00
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
php_stream_seek(dba->fp, 0L, SEEK_END);
|
|
|
|
php_stream_printf(dba->fp TSRMLS_CC, "%d\n", key_datum.dsize);
|
|
|
|
php_stream_flush(dba->fp);
|
2003-02-18 20:49:52 +00:00
|
|
|
if (php_stream_write(dba->fp, key_datum.dptr, key_datum.dsize) < key_datum.dsize) {
|
2002-11-06 01:47:06 +00:00
|
|
|
return -1;
|
2003-02-18 20:49:52 +00:00
|
|
|
}
|
2002-11-06 01:47:06 +00:00
|
|
|
php_stream_printf(dba->fp TSRMLS_CC, "%d\n", value_datum.dsize);
|
|
|
|
php_stream_flush(dba->fp);
|
2003-02-18 20:49:52 +00:00
|
|
|
if (php_stream_write(dba->fp, value_datum.dptr, value_datum.dsize) < value_datum.dsize) {
|
2002-11-06 01:47:06 +00:00
|
|
|
return -1;
|
2003-02-18 20:49:52 +00:00
|
|
|
}
|
|
|
|
} else { /* FLATFILE_REPLACE */
|
2002-11-07 23:03:16 +00:00
|
|
|
flatfile_delete(dba, key_datum TSRMLS_CC);
|
2002-11-06 01:47:06 +00:00
|
|
|
php_stream_printf(dba->fp TSRMLS_CC, "%d\n", key_datum.dsize);
|
|
|
|
php_stream_flush(dba->fp);
|
2003-02-18 20:49:52 +00:00
|
|
|
if (php_stream_write(dba->fp, key_datum.dptr, key_datum.dsize) < key_datum.dsize) {
|
2002-11-06 01:47:06 +00:00
|
|
|
return -1;
|
2003-02-18 20:49:52 +00:00
|
|
|
}
|
2002-11-06 01:47:06 +00:00
|
|
|
php_stream_printf(dba->fp TSRMLS_CC, "%d\n", value_datum.dsize);
|
2003-02-18 20:49:52 +00:00
|
|
|
if (php_stream_write(dba->fp, value_datum.dptr, value_datum.dsize) < value_datum.dsize) {
|
2002-11-06 01:47:06 +00:00
|
|
|
return -1;
|
2003-02-18 20:49:52 +00:00
|
|
|
}
|
2002-11-06 01:47:06 +00:00
|
|
|
}
|
|
|
|
|
2002-11-11 11:57:25 +00:00
|
|
|
php_stream_flush(dba->fp);
|
2002-11-06 01:47:06 +00:00
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
/* }}} */
|
|
|
|
|
2002-11-07 23:03:16 +00:00
|
|
|
/* {{{ flatfile_fetch
|
2002-11-06 01:47:06 +00:00
|
|
|
*/
|
2002-11-19 01:06:42 +00:00
|
|
|
datum flatfile_fetch(flatfile *dba, datum key_datum TSRMLS_DC) {
|
2002-11-06 01:47:06 +00:00
|
|
|
datum value_datum = {NULL, 0};
|
2003-02-18 22:19:18 +00:00
|
|
|
char buf[16];
|
2002-11-06 01:47:06 +00:00
|
|
|
|
2002-11-07 23:03:16 +00:00
|
|
|
if (flatfile_findkey(dba, key_datum TSRMLS_CC)) {
|
2003-02-18 22:19:18 +00:00
|
|
|
if (php_stream_gets(dba->fp, buf, sizeof(buf))) {
|
|
|
|
value_datum.dsize = atoi(buf);
|
2003-04-24 20:54:43 +00:00
|
|
|
value_datum.dptr = safe_emalloc(value_datum.dsize, 1, 1);
|
2003-02-18 22:19:18 +00:00
|
|
|
value_datum.dsize = php_stream_read(dba->fp, value_datum.dptr, value_datum.dsize);
|
2002-11-06 01:47:06 +00:00
|
|
|
} else {
|
|
|
|
value_datum.dptr = NULL;
|
|
|
|
value_datum.dsize = 0;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
return value_datum;
|
|
|
|
}
|
|
|
|
/* }}} */
|
|
|
|
|
2002-11-07 23:03:16 +00:00
|
|
|
/* {{{ flatfile_delete
|
2002-11-06 01:47:06 +00:00
|
|
|
*/
|
2002-11-19 01:06:42 +00:00
|
|
|
int flatfile_delete(flatfile *dba, datum key_datum TSRMLS_DC) {
|
2002-11-06 01:47:06 +00:00
|
|
|
char *key = key_datum.dptr;
|
2002-11-13 16:28:44 +00:00
|
|
|
size_t size = key_datum.dsize;
|
2003-02-18 22:19:18 +00:00
|
|
|
size_t buf_size = FLATFILE_BLOCK_SIZE;
|
|
|
|
char *buf = emalloc(buf_size);
|
2002-11-13 16:28:44 +00:00
|
|
|
size_t num;
|
|
|
|
size_t pos;
|
2002-11-06 01:47:06 +00:00
|
|
|
|
|
|
|
php_stream_rewind(dba->fp);
|
|
|
|
while(!php_stream_eof(dba->fp)) {
|
|
|
|
/* read in the length of the key name */
|
2003-02-18 20:49:52 +00:00
|
|
|
if (!php_stream_gets(dba->fp, buf, 15)) {
|
2002-11-06 01:47:06 +00:00
|
|
|
break;
|
2003-02-18 20:49:52 +00:00
|
|
|
}
|
2002-11-06 01:47:06 +00:00
|
|
|
num = atoi(buf);
|
2003-02-18 22:19:18 +00:00
|
|
|
if (num >= buf_size) {
|
|
|
|
buf_size = num + FLATFILE_BLOCK_SIZE;
|
|
|
|
buf = erealloc(buf, buf_size);
|
2002-11-06 01:47:06 +00:00
|
|
|
}
|
|
|
|
pos = php_stream_tell(dba->fp);
|
|
|
|
|
|
|
|
/* read in the key name */
|
2003-02-18 22:19:18 +00:00
|
|
|
num = php_stream_read(dba->fp, buf, num);
|
2003-02-18 20:49:52 +00:00
|
|
|
if (num < 0) {
|
2002-11-06 01:47:06 +00:00
|
|
|
break;
|
2003-02-18 20:49:52 +00:00
|
|
|
}
|
2002-11-06 01:47:06 +00:00
|
|
|
|
|
|
|
if (size == num && !memcmp(buf, key, size)) {
|
|
|
|
php_stream_seek(dba->fp, pos, SEEK_SET);
|
|
|
|
php_stream_putc(dba->fp, 0);
|
|
|
|
php_stream_flush(dba->fp);
|
|
|
|
php_stream_seek(dba->fp, 0L, SEEK_END);
|
2003-02-18 22:19:18 +00:00
|
|
|
efree(buf);
|
2002-11-06 01:47:06 +00:00
|
|
|
return SUCCESS;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* read in the length of the value */
|
2003-02-18 22:19:18 +00:00
|
|
|
if (!php_stream_gets(dba->fp, buf, 15)) {
|
2002-11-06 01:47:06 +00:00
|
|
|
break;
|
2003-02-18 22:19:18 +00:00
|
|
|
}
|
2002-11-06 01:47:06 +00:00
|
|
|
num = atoi(buf);
|
2003-02-18 22:19:18 +00:00
|
|
|
if (num >= buf_size) {
|
|
|
|
buf_size = num + FLATFILE_BLOCK_SIZE;
|
|
|
|
buf = erealloc(buf, buf_size);
|
2002-11-06 01:47:06 +00:00
|
|
|
}
|
|
|
|
/* read in the value */
|
2003-02-18 22:19:18 +00:00
|
|
|
num = php_stream_read(dba->fp, buf, num);
|
2003-02-18 20:49:52 +00:00
|
|
|
if (num < 0) {
|
2002-11-06 01:47:06 +00:00
|
|
|
break;
|
2003-02-18 20:49:52 +00:00
|
|
|
}
|
2002-11-06 01:47:06 +00:00
|
|
|
}
|
2003-02-18 22:19:18 +00:00
|
|
|
efree(buf);
|
2002-11-06 01:47:06 +00:00
|
|
|
return FAILURE;
|
|
|
|
}
|
|
|
|
/* }}} */
|
|
|
|
|
2002-11-07 23:03:16 +00:00
|
|
|
/* {{{ flatfile_findkey
|
2002-11-06 01:47:06 +00:00
|
|
|
*/
|
2002-11-19 01:06:42 +00:00
|
|
|
int flatfile_findkey(flatfile *dba, datum key_datum TSRMLS_DC) {
|
2003-02-18 22:19:18 +00:00
|
|
|
size_t buf_size = FLATFILE_BLOCK_SIZE;
|
|
|
|
char *buf = emalloc(buf_size);
|
2002-11-13 16:28:44 +00:00
|
|
|
size_t num;
|
2002-11-06 01:47:06 +00:00
|
|
|
int ret=0;
|
|
|
|
void *key = key_datum.dptr;
|
2002-11-13 16:28:44 +00:00
|
|
|
size_t size = key_datum.dsize;
|
2002-11-06 01:47:06 +00:00
|
|
|
|
|
|
|
php_stream_rewind(dba->fp);
|
|
|
|
while (!php_stream_eof(dba->fp)) {
|
2003-02-18 22:19:18 +00:00
|
|
|
if (!php_stream_gets(dba->fp, buf, 15)) {
|
2002-11-06 01:47:06 +00:00
|
|
|
break;
|
2003-02-18 20:49:52 +00:00
|
|
|
}
|
2002-11-06 01:47:06 +00:00
|
|
|
num = atoi(buf);
|
2003-02-18 22:19:18 +00:00
|
|
|
if (num >= buf_size) {
|
|
|
|
buf_size = num + FLATFILE_BLOCK_SIZE;
|
|
|
|
buf = erealloc(buf, buf_size);
|
|
|
|
}
|
|
|
|
num = php_stream_read(dba->fp, buf, num);
|
|
|
|
if (num < 0) {
|
|
|
|
break;
|
2002-11-06 01:47:06 +00:00
|
|
|
}
|
|
|
|
if (size == num) {
|
|
|
|
if (!memcmp(buf, key, size)) {
|
|
|
|
ret = 1;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
2003-02-18 20:49:52 +00:00
|
|
|
if (!php_stream_gets(dba->fp, buf, 15)) {
|
2002-11-06 01:47:06 +00:00
|
|
|
break;
|
2003-02-18 20:49:52 +00:00
|
|
|
}
|
2002-11-06 01:47:06 +00:00
|
|
|
num = atoi(buf);
|
2003-02-18 22:19:18 +00:00
|
|
|
if (num >= buf_size) {
|
|
|
|
buf_size = num + FLATFILE_BLOCK_SIZE;
|
|
|
|
buf = erealloc(buf, buf_size);
|
2002-11-06 01:47:06 +00:00
|
|
|
}
|
2003-02-18 22:19:18 +00:00
|
|
|
num = php_stream_read(dba->fp, buf, num);
|
2003-02-18 20:49:52 +00:00
|
|
|
if (num < 0) {
|
2002-11-06 01:47:06 +00:00
|
|
|
break;
|
2003-02-18 20:49:52 +00:00
|
|
|
}
|
2002-11-06 01:47:06 +00:00
|
|
|
}
|
2003-02-18 22:19:18 +00:00
|
|
|
efree(buf);
|
|
|
|
return ret;
|
2002-11-06 01:47:06 +00:00
|
|
|
}
|
|
|
|
/* }}} */
|
|
|
|
|
2002-11-07 23:03:16 +00:00
|
|
|
/* {{{ flatfile_firstkey
|
2002-11-06 01:47:06 +00:00
|
|
|
*/
|
2002-11-19 01:06:42 +00:00
|
|
|
datum flatfile_firstkey(flatfile *dba TSRMLS_DC) {
|
2003-02-18 22:19:18 +00:00
|
|
|
datum res;
|
2002-11-13 16:28:44 +00:00
|
|
|
size_t num;
|
2003-02-18 22:19:18 +00:00
|
|
|
size_t buf_size = FLATFILE_BLOCK_SIZE;
|
|
|
|
char *buf = emalloc(buf_size);
|
2002-11-06 01:47:06 +00:00
|
|
|
|
|
|
|
php_stream_rewind(dba->fp);
|
|
|
|
while(!php_stream_eof(dba->fp)) {
|
2003-02-18 22:19:18 +00:00
|
|
|
if (!php_stream_gets(dba->fp, buf, 15)) {
|
2003-02-18 20:49:52 +00:00
|
|
|
break;
|
|
|
|
}
|
2003-02-18 22:19:18 +00:00
|
|
|
num = atoi(buf);
|
|
|
|
if (num >= buf_size) {
|
|
|
|
buf_size = num + FLATFILE_BLOCK_SIZE;
|
|
|
|
buf = erealloc(buf, buf_size);
|
2002-11-06 01:47:06 +00:00
|
|
|
}
|
2003-02-18 22:19:18 +00:00
|
|
|
num = php_stream_read(dba->fp, buf, num);
|
2003-02-18 20:49:52 +00:00
|
|
|
if (num < 0) {
|
2002-11-06 01:47:06 +00:00
|
|
|
break;
|
2003-02-18 20:49:52 +00:00
|
|
|
}
|
2003-02-18 22:19:18 +00:00
|
|
|
if (*(buf) != 0) {
|
2002-11-06 01:47:06 +00:00
|
|
|
dba->CurrentFlatFilePos = php_stream_tell(dba->fp);
|
2003-02-18 22:19:18 +00:00
|
|
|
res.dptr = buf;
|
|
|
|
res.dsize = num;
|
|
|
|
return res;
|
2002-11-06 01:47:06 +00:00
|
|
|
}
|
2003-02-18 22:19:18 +00:00
|
|
|
if (!php_stream_gets(dba->fp, buf, 15)) {
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
num = atoi(buf);
|
|
|
|
if (num >= buf_size) {
|
|
|
|
buf_size = num + FLATFILE_BLOCK_SIZE;
|
|
|
|
buf = erealloc(buf, buf_size);
|
2002-11-06 01:47:06 +00:00
|
|
|
}
|
2003-02-18 22:19:18 +00:00
|
|
|
num = php_stream_read(dba->fp, buf, num);
|
2003-02-18 20:49:52 +00:00
|
|
|
if (num < 0) {
|
2002-11-06 01:47:06 +00:00
|
|
|
break;
|
2003-02-18 20:49:52 +00:00
|
|
|
}
|
2002-11-06 01:47:06 +00:00
|
|
|
}
|
2003-02-18 22:19:18 +00:00
|
|
|
efree(buf);
|
|
|
|
res.dptr = NULL;
|
|
|
|
res.dsize = 0;
|
|
|
|
return res;
|
2002-11-06 01:47:06 +00:00
|
|
|
}
|
|
|
|
/* }}} */
|
|
|
|
|
2002-11-07 23:03:16 +00:00
|
|
|
/* {{{ flatfile_nextkey
|
2002-11-06 01:47:06 +00:00
|
|
|
*/
|
2002-11-19 01:06:42 +00:00
|
|
|
datum flatfile_nextkey(flatfile *dba TSRMLS_DC) {
|
2003-02-18 22:19:18 +00:00
|
|
|
datum res;
|
2002-11-13 16:28:44 +00:00
|
|
|
size_t num;
|
2003-02-18 22:19:18 +00:00
|
|
|
size_t buf_size = FLATFILE_BLOCK_SIZE;
|
|
|
|
char *buf = emalloc(buf_size);
|
2002-11-06 01:47:06 +00:00
|
|
|
|
|
|
|
php_stream_seek(dba->fp, dba->CurrentFlatFilePos, SEEK_SET);
|
|
|
|
while(!php_stream_eof(dba->fp)) {
|
2003-02-18 22:19:18 +00:00
|
|
|
if (!php_stream_gets(dba->fp, buf, 15)) {
|
2003-02-18 20:49:52 +00:00
|
|
|
break;
|
|
|
|
}
|
2003-02-18 22:19:18 +00:00
|
|
|
num = atoi(buf);
|
|
|
|
if (num >= buf_size) {
|
|
|
|
buf_size = num + FLATFILE_BLOCK_SIZE;
|
|
|
|
buf = erealloc(buf, buf_size);
|
2002-11-06 01:47:06 +00:00
|
|
|
}
|
2003-02-18 22:19:18 +00:00
|
|
|
num = php_stream_read(dba->fp, buf, num);
|
2003-02-18 20:49:52 +00:00
|
|
|
if (num < 0) {
|
2002-11-06 01:47:06 +00:00
|
|
|
break;
|
2003-02-18 20:49:52 +00:00
|
|
|
}
|
2003-02-18 22:19:18 +00:00
|
|
|
if (!php_stream_gets(dba->fp, buf, 15)) {
|
2002-11-06 01:47:06 +00:00
|
|
|
break;
|
2003-02-18 20:49:52 +00:00
|
|
|
}
|
2003-02-18 22:19:18 +00:00
|
|
|
num = atoi(buf);
|
|
|
|
if (num >= buf_size) {
|
|
|
|
buf_size = num + FLATFILE_BLOCK_SIZE;
|
|
|
|
buf = erealloc(buf, buf_size);
|
2002-11-06 01:47:06 +00:00
|
|
|
}
|
2003-02-18 22:19:18 +00:00
|
|
|
num = php_stream_read(dba->fp, buf, num);
|
2003-02-18 20:49:52 +00:00
|
|
|
if (num < 0) {
|
2002-11-06 01:47:06 +00:00
|
|
|
break;
|
2003-02-18 20:49:52 +00:00
|
|
|
}
|
2003-02-18 22:19:18 +00:00
|
|
|
if (*(buf)!=0) {
|
2002-11-06 01:47:06 +00:00
|
|
|
dba->CurrentFlatFilePos = php_stream_tell(dba->fp);
|
2003-02-18 22:19:18 +00:00
|
|
|
res.dptr = buf;
|
|
|
|
res.dsize = num;
|
|
|
|
return res;
|
2002-11-06 01:47:06 +00:00
|
|
|
}
|
|
|
|
}
|
2003-02-18 22:19:18 +00:00
|
|
|
efree(buf);
|
|
|
|
res.dptr = NULL;
|
|
|
|
res.dsize = 0;
|
|
|
|
return res;
|
2002-11-06 01:47:06 +00:00
|
|
|
}
|
|
|
|
/* }}} */
|
|
|
|
|
2002-12-30 13:07:30 +00:00
|
|
|
/* {{{ flatfile_version */
|
|
|
|
char *flatfile_version()
|
|
|
|
{
|
|
|
|
return "1.0, $Revision$";
|
|
|
|
}
|
|
|
|
/* }}} */
|
|
|
|
|
2002-11-06 01:47:06 +00:00
|
|
|
/*
|
|
|
|
* Local variables:
|
|
|
|
* tab-width: 4
|
|
|
|
* c-basic-offset: 4
|
|
|
|
* End:
|
|
|
|
* vim600: sw=4 ts=4 fdm=marker
|
|
|
|
* vim<600: sw=4 ts=4
|
|
|
|
*/
|