tarantool-php-1.1/0000755000000000000000000000000012323275012012636 5ustar rootroottarantool-php-1.1/README.md0000664000000000000000000000077012323274624014133 0ustar rootroottarantool-php ============= PECL PHP driver for Tarantool/Box Build To build Tarantool PHP extenstion PHP-devel package is requred. The package should contain phpize utility. $ phpize $ ./configure $ make # make install Test To run tests Taranool/Box server and PHP/pecl package are requred. $ cd test $ ./run-tests If Tarantool/Box doesn't define in PATH variable, you may define it in TARANTOOL_BOX_BIN enviroment variable. $ TARANTOOL_BOX_BIN=/path/to/tarantool/bin/tarantool_box ./run-tests tarantool-php-1.1/.gitignore0000664000000000000000000000071612323274624014644 0ustar rootroot# Suppress phpize and autotools autogenerated files Makefile.in /autom4te.cache /aclocal.m4 /compile /configure /depcomp /install-sh /missing /.deps /.libs /Makefile /Makefile.fragments /Makefile.global /Makefile.objects /acinclude.m4 /build/ /config.guess /config.h /config.h.in /config.log /config.nice /config.status /config.sub /configure.in /libtool /ltmain.sh /mkinstalldirs /modules/ /run-tests.php /src/.libs/ /src/tarantool.lo /tarantool.la /test/var/ tarantool-php-1.1/src/0000775000000000000000000000000012323275154013436 5ustar rootroottarantool-php-1.1/src/tarantool.h0000664000000000000000000001362112323274624015616 0ustar rootroot/* +----------------------------------------------------------------------+ | PHP Version 5 | +----------------------------------------------------------------------+ | Copyright (c) 1997-2008 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: Alexandre Kalendarev akalend@mail.ru | | Copyright (c) 2011 | +----------------------------------------------------------------------+ */ #ifndef PHP_TARANTOOL_H #define PHP_TARANTOOL_H #ifdef ZTS #include "TSRM.h" #endif /*============================================================================* * Constants *============================================================================*/ #define TARANTOOL_EXTENSION_VERSION "1.0" /*----------------------------------------------------------------------------* * tbuf constants *----------------------------------------------------------------------------*/ enum { /* tbuf minimal capacity */ IO_BUF_CAPACITY_MIN = 128, /* tbuf factor */ IO_BUF_CAPACITY_FACTOR = 2, }; /*----------------------------------------------------------------------------* * Connections constants *----------------------------------------------------------------------------*/ enum { /* timeout: seconds */ TARANTOOL_TIMEOUT_SEC = 5, /* timeout: microseconds */ TARANTOOL_TIMEOUT_USEC = 0, /* tarantool default primary port */ TARANTOOL_DEFAULT_PORT = 33013, /* tarantool default readonly port */ TARANTOOL_DEFAULT_RO_PORT = 33014, /* tarantool default adnim port */ TARANTOOL_DEFAULT_ADMIN_PORT = 33015, }; #define TARANTOOL_DEFAULT_HOST "localhost" /*----------------------------------------------------------------------------* * Commands constants *----------------------------------------------------------------------------*/ /* tarantool flags */ enum { /* return resulting tuples */ TARANTOOL_FLAGS_RETURN_TUPLE = 0x01, /* insert is add operation: errro will be raised if tuple exists */ TARANTOOL_FLAGS_ADD = 0x02, /* insert is replace operation: errro will be raised if tuple doesn't exist */ TARANTOOL_FLAGS_REPLACE = 0x04, /* doesn't write command to WAL */ TARANTOOL_FLAGS_NOT_STORE = 0x10, }; /* tarantool command codes */ enum { /* insert/replace command code */ TARANTOOL_COMMAND_INSERT = 13, /* select command code */ TARANTOOL_COMMAND_SELECT = 17, /* update fields command code */ TARANTOOL_COMMAND_UPDATE = 19, /* delete command code */ TARANTOOL_COMMAND_DELETE = 21, /* call lua function command code */ TARANTOOL_COMMAND_CALL = 22, /* pid command code */ TARANTOOL_COMMAND_PING = 65280, }; /* update fields operation codes */ enum { /* update fields: assing field value operation code */ TARANTOOL_OP_ASSIGN = 0, /* update fields: add operation code */ TARANTOOL_OP_ADD = 1, /* update fields: and operation code */ TARANTOOL_OP_AND = 2, /* update fields: xor operation code */ TARANTOOL_OP_XOR = 3, /* update fields: or operation code */ TARANTOOL_OP_OR = 4, /* update fields: splice operation code */ TARANTOOL_OP_SPLICE = 5, }; /*----------------------------------------------------------------------------* * Amdin commands *----------------------------------------------------------------------------*/ /* admin protocol separator */ #define ADMIN_SEPARATOR "\n" /* admin command begin token */ #define ADMIN_TOKEN_BEGIN "---"ADMIN_SEPARATOR /* admin command end token */ #define ADMIN_TOKEN_END "..."ADMIN_SEPARATOR /* show information admin command */ #define ADMIN_COMMAND_SHOW_INFO "show info" /* show statistic admin command */ #define ADMIN_COMMAND_SHOW_STAT "show stat" /* show configuration admin command */ #define ADMIN_COMMAND_SHOW_CONF "show configuration" /*============================================================================* * Interaface decalaration *============================================================================*/ /*----------------------------------------------------------------------------* * Tarantool module interface *----------------------------------------------------------------------------*/ /* initialize module function */ PHP_MINIT_FUNCTION(tarantool); /* shutdown module function */ PHP_MSHUTDOWN_FUNCTION(tarantool); /* show information about this module */ PHP_MINFO_FUNCTION(tarantool); /*----------------------------------------------------------------------------* * Tarantool class interface *----------------------------------------------------------------------------*/ /* class constructor */ PHP_METHOD(tarantool_class, __construct); /* do select operation */ PHP_METHOD(tarantool_class, select); /* do insert operation */ PHP_METHOD(tarantool_class, insert); /* do update fields operation */ PHP_METHOD(tarantool_class, update_fields); /* do delete operation */ PHP_METHOD(tarantool_class, delete); /* call lua funtion operation */ PHP_METHOD(tarantool_class, call); /* do admin command */ PHP_METHOD(tarantool_class, admin); #ifdef ZTS #define TARANTOOL_G(v) TSRMG(tarantool_globals_id, zend_tarantool_globals *, v) #else #define TARANTOOL_G(v) (tarantool_globals.v) #endif #endif /* PHP_TARANTOOL_H */ /* * Local variables: * tab-width: 4 * c-basic-offset: 4 * End: * vim600: noet sw=4 ts=4 fdm=marker * vim<600: noet sw=4 ts=4 */ tarantool-php-1.1/src/tarantool.c0000664000000000000000000015124412323274624015615 0ustar rootroot/* +----------------------------------------------------------------------+ | PHP Version 5 | +----------------------------------------------------------------------+ | Copyright (c) 1997-2008 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: Alexandre Kalendarev akalend@mail.ru | | Copyright (c) 2011 | +----------------------------------------------------------------------+ */ #ifdef HAVE_CONFIG_H #include "config.h" #endif #include #include #include #include #include #include #include #include #include #include #include #include #include "tarantool.h" /*============================================================================* * Tarantool extension structures defintion *============================================================================*/ /* I/O buffer */ struct io_buf { /* buffer size */ size_t size; /* buffer capacity */ size_t capacity; /* read position in the I/O buffer */ size_t read_pos; /* buffer value */ uint8_t *value; }; /* tarantool object */ typedef struct tarantool_object { zend_object zo; /* host name */ char *host; /* tarantool primary port */ int port; /* tarantool admin port */ int admin_port; /* tarantool primary connection */ php_stream *stream; /* tarantool admin connecion */ php_stream *admin_stream; /* I/O buffer */ struct io_buf *io_buf; /* additional buffer for splice args */ struct io_buf *splice_field; } tarantool_object; /* iproto header */ struct iproto_header { /* command code */ uint32_t type; /* command length */ uint32_t length; /* request id */ uint32_t request_id; } __attribute__((packed)); /* tarantool select command request */ struct tnt_select_request { /* space number */ int32_t space_no; /* index number */ int32_t index_no; /* select offset from begining */ int32_t offset; /* maximail number tuples in responce */ int32_t limit; } __attribute__((packed)); /* tarantool insert command request */ struct tnt_insert_request { /* space number */ int32_t space_no; /* flags */ int32_t flags; } __attribute__((packed)); /* tarantool update fields command request */ struct tnt_update_fields_request { /* space number */ int32_t space_no; /* flags */ int32_t flags; } __attribute__((packed)); /* tarantool delete command request */ struct tnt_delete_request { /* space number */ int32_t space_no; /* flags */ int32_t flags; } __attribute__((packed)); /* tarantool call command request */ struct tnt_call_request { /* flags */ int32_t flags; } __attribute__((packed)); /* tarantool command response */ struct tnt_response { /* return code */ int32_t return_code; union { /* count */ int32_t count; /* error message */ char return_msg[0]; }; } __attribute__((packed)); /*============================================================================* * Global variables definition *============================================================================*/ /*----------------------------------------------------------------------------* * Tarantool module variables *----------------------------------------------------------------------------*/ /* module functions list */ zend_function_entry tarantool_module_functions[] = { PHP_ME(tarantool_class, __construct, NULL, ZEND_ACC_PUBLIC) {NULL, NULL, NULL} }; /* tarantool module struct */ zend_module_entry tarantool_module_entry = { #if ZEND_MODULE_API_NO >= 20010901 STANDARD_MODULE_HEADER, #endif "tarantool", tarantool_module_functions, PHP_MINIT(tarantool), PHP_MSHUTDOWN(tarantool), NULL, NULL, PHP_MINFO(tarantool), #if ZEND_MODULE_API_NO >= 20010901 "1.0", #endif STANDARD_MODULE_PROPERTIES }; #ifdef COMPILE_DL_TARANTOOL ZEND_GET_MODULE(tarantool) #endif /*----------------------------------------------------------------------------* * Tarantool class variables *----------------------------------------------------------------------------*/ /* tarantool class methods */ const zend_function_entry tarantool_class_methods[] = { PHP_ME(tarantool_class, __construct, NULL, ZEND_ACC_PUBLIC) PHP_ME(tarantool_class, select, NULL, ZEND_ACC_PUBLIC) PHP_ME(tarantool_class, insert, NULL, ZEND_ACC_PUBLIC) PHP_ME(tarantool_class, update_fields, NULL, ZEND_ACC_PUBLIC) PHP_ME(tarantool_class, delete, NULL, ZEND_ACC_PUBLIC) PHP_ME(tarantool_class, call, NULL, ZEND_ACC_PUBLIC) PHP_ME(tarantool_class, admin, NULL, ZEND_ACC_PUBLIC) {NULL, NULL, NULL} }; /* tarantool class */ zend_class_entry *tarantool_class_ptr; /*============================================================================* * local functions declaration *============================================================================*/ /*----------------------------------------------------------------------------* * I/O buffer interface *----------------------------------------------------------------------------*/ /* create I/O buffer instance */ static struct io_buf * io_buf_create(); /* destroy I/O buffer */ static void io_buf_destroy(struct io_buf *buf); /* reserv I/O buffer space */ inline static bool io_buf_reserve(struct io_buf *buf, size_t n); /* resize I/O buffer */ inline static bool io_buf_resize(struct io_buf *buf, size_t n); /* calculate next capacity for I/O buffer */ inline static size_t io_buf_next_capacity(size_t n); /* clean I/O buffer */ static void io_buf_clean(struct io_buf *buf); /* read struct from buffer */ static bool io_buf_read_struct(struct io_buf *buf, void **ptr, size_t n); /* read 32-bit integer from buffer */ static bool io_buf_read_int32(struct io_buf *buf, int32_t *val); /* read 64-bit integer from buffer */ static bool io_buf_read_int64(struct io_buf *buf, int64_t *val); /* read var integer from buffer */ static bool io_buf_read_varint(struct io_buf *buf, int32_t *val); /* read string from buffer */ static bool io_buf_read_str(struct io_buf *buf, char **str, size_t len); /* read fied from buffer */ static bool io_buf_read_field(struct io_buf *buf, zval *tuple); /* read tuple from buffer */ static bool io_buf_read_tuple(struct io_buf *buf, zval **tuple); /* * Write to I/O buffer functions */ /* write struct to I/O buffer */ static void * io_buf_write_struct(struct io_buf *buf, size_t n); /* write byte to I/O buffer */ static bool io_buf_write_byte(struct io_buf *buf, int8_t value); /* write 32-bit integer to I/O buffer */ static bool io_buf_write_int32(struct io_buf *buf, int32_t value); /* write 64-bit integer to I/O buffer */ static bool io_buf_write_int64(struct io_buf *buf, int64_t value); /* write varint to I/O buffer */ static bool io_buf_write_varint(struct io_buf *buf, int32_t value); /* write string to I/O buffer */ static bool io_buf_write_str(struct io_buf *buf, uint8_t *str, size_t len); /* write 32-bit integer as tuple's field to I/O buffer */ static bool io_buf_write_field_int32(struct io_buf *buf, uint32_t value); /* write 64-bit integer as tuple's field to I/O buffer */ static bool io_buf_write_field_int64(struct io_buf *buf, uint64_t value); /* write string tuple's field to I/O buffer */ static bool io_buf_write_field_str(struct io_buf *buf, uint8_t *val, size_t len); /* write tuple to I/O buffer */ static bool io_buf_write_tuple_int(struct io_buf *buf, zval *tuple); /* write tuple (string) to I/O buffer */ static bool io_buf_write_tuple_str(struct io_buf *buf, zval *tuple); /* write tuple (array) to I/O buffer */ static bool io_buf_write_tuple_array(struct io_buf *buf, zval *tuple); /* write tuple to I/O buffer */ static bool io_buf_write_tuple(struct io_buf *buf, zval *tuple); /* write array of tuples to I/O buffer */ static bool io_buf_write_tuples_list_array(struct io_buf *buf, zval *tuples_list); /* write tuples list to I/O buffer */ static bool io_buf_write_tuples_list(struct io_buf *buf, zval *tuples_list); /* * I/O buffer send/recv */ /* send administation command request */ static bool io_buf_send_yaml(php_stream *stream, struct io_buf *buf); /* receive administration command response */ static bool io_buf_recv_yaml(php_stream *stream, struct io_buf *buf); /* send request by iproto */ static bool io_buf_send_iproto(php_stream *stream, int32_t type, int32_t request_id, struct io_buf *buf); /* receive response by iproto */ static bool io_buf_recv_iproto(php_stream *stream, struct io_buf *buf); /*----------------------------------------------------------------------------* * support local functions *----------------------------------------------------------------------------*/ /* tarantool class instance allocator */ static zend_object_value alloc_tarantool_object(zend_class_entry *entry TSRMLS_DC); /* free tarantool class instance */ static void free_tarantool_object(tarantool_object *tnt TSRMLS_DC); /* establic connection */ static php_stream * establish_connection(char *host, int port); /* find long by key in the hash table */ static bool hash_fing_long(HashTable *hash, char *key, long *value); /* find string by key in the hash table */ static bool hash_fing_str(HashTable *hash, char *key, char **value, int *value_length); /* find scalar by key in the hash table */ static bool hash_fing_scalar(HashTable *hash, char *key, zval ***value); /*============================================================================* * Interface definition *============================================================================*/ /*----------------------------------------------------------------------------* * Tarantool main module interface *----------------------------------------------------------------------------*/ /* initialize module function */ PHP_MINIT_FUNCTION(tarantool) { /* register constants */ /* register tarantool flags */ REGISTER_LONG_CONSTANT("TARANTOOL_FLAGS_RETURN_TUPLE", TARANTOOL_FLAGS_RETURN_TUPLE, CONST_CS | CONST_PERSISTENT); REGISTER_LONG_CONSTANT("TARANTOOL_FLAGS_ADD", TARANTOOL_FLAGS_ADD, CONST_CS | CONST_PERSISTENT); REGISTER_LONG_CONSTANT("TARANTOOL_FLAGS_REPLACE", TARANTOOL_FLAGS_REPLACE, CONST_CS | CONST_PERSISTENT); REGISTER_LONG_CONSTANT("TARANTOOL_FLAGS_NOT_STORE", TARANTOOL_FLAGS_NOT_STORE, CONST_CS | CONST_PERSISTENT); /* register tarantool update fields operations */ REGISTER_LONG_CONSTANT("TARANTOOL_OP_ASSIGN", TARANTOOL_OP_ASSIGN, CONST_CS | CONST_PERSISTENT); REGISTER_LONG_CONSTANT("TARANTOOL_OP_ADD", TARANTOOL_OP_ADD, CONST_CS | CONST_PERSISTENT); REGISTER_LONG_CONSTANT("TARANTOOL_OP_AND", TARANTOOL_OP_AND, CONST_CS | CONST_PERSISTENT); REGISTER_LONG_CONSTANT("TARANTOOL_OP_XOR", TARANTOOL_OP_XOR, CONST_CS | CONST_PERSISTENT); REGISTER_LONG_CONSTANT("TARANTOOL_OP_OR", TARANTOOL_OP_OR, CONST_CS | CONST_PERSISTENT); REGISTER_LONG_CONSTANT("TARANTOOL_OP_SPLICE", TARANTOOL_OP_SPLICE, CONST_CS | CONST_PERSISTENT); /* register classes */ /* register tarantool class */ zend_class_entry tarantool_class; INIT_CLASS_ENTRY(tarantool_class, "Tarantool", tarantool_class_methods); tarantool_class.create_object = alloc_tarantool_object; tarantool_class_ptr = zend_register_internal_class(&tarantool_class TSRMLS_CC); return SUCCESS; } /* shutdown module function */ PHP_MSHUTDOWN_FUNCTION(tarantool) { return SUCCESS; } /* show information about this module */ PHP_MINFO_FUNCTION(tarantool) { php_info_print_table_start(); php_info_print_table_header(2, "Tarantool support", "enabled"); php_info_print_table_row(2, "Extension version", TARANTOOL_EXTENSION_VERSION); php_info_print_table_end(); } /*----------------------------------------------------------------------------* * Tarantool class interface *----------------------------------------------------------------------------*/ PHP_METHOD(tarantool_class, __construct) { /* * parse method's parameters */ zval *id; char *host = NULL; int host_len = 0; long port = 0; long admin_port = 0; if (zend_parse_method_parameters(ZEND_NUM_ARGS() TSRMLS_CC, getThis(), "Osl|l", &id, tarantool_class_ptr, &host, &host_len, &port, &admin_port) == FAILURE) { return; } /* * validate parameters */ /* check host name */ if (host == NULL || host_len == 0) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "invalid tarantool's hostname"); return; } /* validate port value */ if (port <= 0 || port >= 65536) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "invalid primary port value: %li", port); return; } /* check admin port */ if (admin_port) { /* validate port value */ if (admin_port < 0 || admin_port >= 65536) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "invalid admin port value: %li", admin_port); return; } } /* initialzie object structure */ tarantool_object *object = (tarantool_object *) zend_object_store_get_object( id TSRMLS_CC); object->host = estrdup(host); object->port = port; object->admin_port = admin_port; object->stream = NULL; object->admin_stream = NULL; object->io_buf = io_buf_create(); if (!object->io_buf) { return; } object->splice_field = io_buf_create(); if (!object->splice_field) { return; } return; } PHP_METHOD(tarantool_class, select) { /* * parse methods parameters */ zval *id; long space_no = 0; long index_no = 0; zval *keys_list = NULL; long limit = -1; long offset = 0; if (zend_parse_method_parameters(ZEND_NUM_ARGS() TSRMLS_CC, getThis(), "Ollz|ll", &id, tarantool_class_ptr, &space_no, &index_no, &keys_list, &limit, &offset) == FAILURE) { return; } tarantool_object *tnt = (tarantool_object *) zend_object_store_get_object( id TSRMLS_CC); /* check connection */ if (!tnt->stream) { /* establish connection */ tnt->stream = establish_connection(tnt->host, tnt->port); if (!tnt->stream) return; } /* * send request */ /* clean-up buffer */ io_buf_clean(tnt->io_buf); /* fill select command */ /* fill command header */ struct tnt_select_request *request = (struct tnt_select_request *) io_buf_write_struct( tnt->io_buf, sizeof(struct tnt_select_request)); if (request == NULL) return; request->space_no = space_no; request->index_no = index_no; request->offset = offset; request->limit = limit; /* fill keys */ if (!io_buf_write_tuples_list(tnt->io_buf, keys_list)) return; /* send iproto request */ if (!io_buf_send_iproto(tnt->stream, TARANTOOL_COMMAND_SELECT, 0, tnt->io_buf)) return; /* * receive response */ /* clean-up buffer */ io_buf_clean(tnt->io_buf); /* receive */ if (!io_buf_recv_iproto(tnt->stream, tnt->io_buf)) return; /* read response */ struct tnt_response *response; if (!io_buf_read_struct(tnt->io_buf, (void **) &response, sizeof(struct tnt_response))) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "select failed: invalid response was received"); return; } /* check return code */ if (response->return_code) { /* error happen, throw exceprion */ zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "select failed: %"PRIi32"(0x%08"PRIx32"): %s", response->return_code, response->return_code, response->return_msg); return; } if (array_init(return_value) != SUCCESS) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "select failed: create array failed"); return; } /* put count to result array */ add_assoc_long(return_value, "count", response->count); /* put tuple list to result array */ zval *tuples_list; MAKE_STD_ZVAL(tuples_list); if (array_init(tuples_list) == FAILURE) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "select failed: create array failed"); return; } /* read tuples for responce */ int i; for (i = 0; i < response->count; ++i) { zval *tuple; if (!io_buf_read_tuple(tnt->io_buf, &tuple)) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "select failed: invalid response was received"); return; } add_next_index_zval(tuples_list, tuple); } add_assoc_zval(return_value, "tuples_list", tuples_list); } PHP_METHOD(tarantool_class, insert) { /* * parse methods parameters */ zval *id; long space_no = 0; long flags = 0; zval *tuple = NULL; if (zend_parse_method_parameters(ZEND_NUM_ARGS() TSRMLS_CC, getThis(), "Ola|l", &id, tarantool_class_ptr, &space_no, &tuple, &flags) == FAILURE) { return; } tarantool_object *tnt = (tarantool_object *) zend_object_store_get_object( id TSRMLS_CC); /* check connection */ if (!tnt->stream) { /* establis connection */ tnt->stream = establish_connection(tnt->host, tnt->port); if (!tnt->stream) return; } /* * send request */ /* clean-up buffer */ io_buf_clean(tnt->io_buf); /* fill insert command */ struct tnt_insert_request *request = (struct tnt_insert_request *) io_buf_write_struct( tnt->io_buf, sizeof(struct tnt_insert_request)); if (request == NULL) return; /* space number */ request->space_no = space_no; /* flags */ request->flags = flags; /* tuple */ if (!io_buf_write_tuple(tnt->io_buf, tuple)) return; /* send iproto request */ if (!io_buf_send_iproto(tnt->stream, TARANTOOL_COMMAND_INSERT, 0, tnt->io_buf)) return; /* * receive response */ /* clean-up buffer */ io_buf_clean(tnt->io_buf); /* receive */ if (!io_buf_recv_iproto(tnt->stream, tnt->io_buf)) return; /* read response */ struct tnt_response *response; if (!io_buf_read_struct(tnt->io_buf, (void **) &response, sizeof(struct tnt_response))) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "insert failed: invalid response was received"); return; } /* check return code */ if (response->return_code) { /* error happen, throw exceprion */ zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "insert failed: %"PRIi32"(0x%08"PRIx32"): %s", response->return_code, response->return_code, response->return_msg); return; } /* * fill return value */ if (array_init(return_value) != SUCCESS) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "insert failed: create array failed"); return; } /* put count to result array */ add_assoc_long(return_value, "count", response->count); /* check "return tuple" flag */ if (flags & TARANTOOL_FLAGS_RETURN_TUPLE) { /* ok, the responce should contain inserted tuple */ if (!io_buf_read_tuple(tnt->io_buf, &tuple)) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "insert failed: invalid response was received"); return; } /* put returned tuple to result array */ add_assoc_zval(return_value, "tuple", tuple); } } PHP_METHOD(tarantool_class, update_fields) { /* * parse methods parameters */ zval *id; long space_no = 0; long flags = 0; zval *tuple = NULL; zval *op_list = NULL; if (zend_parse_method_parameters(ZEND_NUM_ARGS() TSRMLS_CC, getThis(), "Olza|l", &id, tarantool_class_ptr, &space_no, &tuple, &op_list, &flags) == FAILURE) { return; } tarantool_object *tnt = (tarantool_object *) zend_object_store_get_object( id TSRMLS_CC); /* check connection */ if (!tnt->stream) { /* establis connection */ tnt->stream = establish_connection(tnt->host, tnt->port); if (!tnt->stream) return; } /* * send request */ /* clean-up buffer */ io_buf_clean(tnt->io_buf); /* fill insert command */ struct tnt_update_fields_request *request = (struct tnt_update_fields_request *) io_buf_write_struct( tnt->io_buf, sizeof(struct tnt_update_fields_request)); if (request == NULL) return; /* space number */ request->space_no = space_no; /* flags */ request->flags = flags; /* tuple */ if (!io_buf_write_tuple(tnt->io_buf, tuple)) return; HashTable *op_list_array = Z_ARRVAL_P(op_list); int op_count = zend_hash_num_elements(op_list_array); /* write number of update fields operaion */ if (!io_buf_write_int32(tnt->io_buf, op_count)) return; HashPosition itr; zval **op; for (zend_hash_internal_pointer_reset_ex(op_list_array, &itr); zend_hash_get_current_data_ex(op_list_array, (void **) &op, &itr) == SUCCESS; zend_hash_move_forward_ex(op_list_array, &itr)) { /* check operation type */ if (Z_TYPE_PP(op) != IS_ARRAY) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "invalid operations list"); return; } HashTable *op_array = Z_ARRVAL_PP(op); long field_no; long opcode; if (!hash_fing_long(op_array, "field", &field_no)) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "can't find 'field' in the update field operation"); return; } if (!hash_fing_long(op_array, "op", &opcode)) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "can't find 'op' in the update field operation"); return; } /* write field number */ if (!io_buf_write_int32(tnt->io_buf, field_no)) return; /* write operation code */ if (!io_buf_write_byte(tnt->io_buf, opcode)) return; zval **assing_arg = NULL; long arith_arg; long splice_offset; long splice_length; char *splice_list; int splice_list_len; switch (opcode) { case TARANTOOL_OP_ASSIGN: if (!hash_fing_scalar(op_array, "arg", &assing_arg)) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "can't find 'arg' in the update field operation"); return; } if (Z_TYPE_PP(assing_arg) == IS_LONG) { /* write as interger */ if (!io_buf_write_field_str(tnt->io_buf, (uint8_t *) &Z_LVAL_PP(assing_arg), sizeof(int32_t))) return; } else { /* write as string */ if (!io_buf_write_field_str(tnt->io_buf, (uint8_t *) Z_STRVAL_PP(assing_arg), Z_STRLEN_PP(assing_arg))) return; } break; case TARANTOOL_OP_ADD: case TARANTOOL_OP_AND: case TARANTOOL_OP_XOR: case TARANTOOL_OP_OR: if (!hash_fing_long(op_array, "arg", &arith_arg)) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "can't find 'arg' in the update field operation"); return; } /* write arith arg */ if (!io_buf_write_field_str(tnt->io_buf, (uint8_t *) &arith_arg, sizeof(int32_t))) return; break; case TARANTOOL_OP_SPLICE: /* * read splice args */ /* read offset */ if (!hash_fing_long(op_array, "offset", &splice_offset)) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "can't find 'offset' in the update field operation"); return; } /* read length */ if (!hash_fing_long(op_array, "length", &splice_length)) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "can't find 'length' in the update field operation"); return; } /* read list */ if (!hash_fing_str(op_array, "list", &splice_list, &splice_list_len)) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "can't find 'list' in the update field operation"); return; } /* * write splice args */ io_buf_clean(tnt->splice_field); /* write offset to separate buffer */ if (!io_buf_write_field_str(tnt->splice_field, (uint8_t *) &splice_offset, sizeof(int32_t))) return; /* write length to separate buffer */ if (!io_buf_write_field_str(tnt->splice_field, (uint8_t *) &splice_length, sizeof(int32_t))) return; /* write list to separate buffer */ if (!io_buf_write_field_str(tnt->splice_field, (uint8_t *) splice_list, splice_list_len)) return; /* write splice args as alone field */ if (!io_buf_write_field_str(tnt->io_buf, tnt->splice_field->value, tnt->splice_field->size)) return; break; default: zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "invalid operaion code %i", opcode); return; } } /* send iproto request */ if (!io_buf_send_iproto(tnt->stream, TARANTOOL_COMMAND_UPDATE, 0, tnt->io_buf)) return; /* * receive response */ /* clean-up buffer */ io_buf_clean(tnt->io_buf); /* receive */ if (!io_buf_recv_iproto(tnt->stream, tnt->io_buf)) return; /* read response */ struct tnt_response *response; if (!io_buf_read_struct(tnt->io_buf, (void **) &response, sizeof(struct tnt_response))) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "update fields failed: invalid response was received"); return; } /* check return code */ if (response->return_code) { /* error happen, throw exceprion */ zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "update fields failed: %"PRIi32"(0x%08"PRIx32"): %s", response->return_code, response->return_code, response->return_msg); return; } /* * fill return value */ if (array_init(return_value) != SUCCESS) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "update fields failed: create array failed"); return; } /* put count to result array */ add_assoc_long(return_value, "count", response->count); /* check "return tuple" flag */ if ((response->count > 0) && (flags & TARANTOOL_FLAGS_RETURN_TUPLE)) { /* ok, the responce should contain inserted tuple */ if (!io_buf_read_tuple(tnt->io_buf, &tuple)) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "update fields failed: invalid response was received"); return; } /* put returned tuple to result array */ add_assoc_zval(return_value, "tuple", tuple); } } PHP_METHOD(tarantool_class, delete) { /* * parse methods parameters */ zval *id; long space_no = 0; long flags = 0; zval *tuple = NULL; if (zend_parse_method_parameters(ZEND_NUM_ARGS() TSRMLS_CC, getThis(), "Olz|l", &id, tarantool_class_ptr, &space_no, &tuple, &flags) == FAILURE) { return; } tarantool_object *tnt = (tarantool_object *) zend_object_store_get_object( id TSRMLS_CC); /* check connection */ if (!tnt->stream) { /* establis connection */ tnt->stream = establish_connection(tnt->host, tnt->port); if (!tnt->stream) return; } /* * send request */ /* clean-up buffer */ io_buf_clean(tnt->io_buf); /* fill delete command */ struct tnt_delete_request *request = (struct tnt_delete_request *) io_buf_write_struct( tnt->io_buf, sizeof(struct tnt_delete_request)); if (request == NULL) return; /* space number */ request->space_no = space_no; /* flags */ request->flags = flags; /* tuple */ if (!io_buf_write_tuple(tnt->io_buf, tuple)) return; /* send iproto request */ if (!io_buf_send_iproto(tnt->stream, TARANTOOL_COMMAND_DELETE, 0, tnt->io_buf)) return; /* * receive response */ /* clean-up buffer */ io_buf_clean(tnt->io_buf); /* receive */ if (!io_buf_recv_iproto(tnt->stream, tnt->io_buf)) return; /* read response */ struct tnt_response *response; if (!io_buf_read_struct(tnt->io_buf, (void **) &response, sizeof(struct tnt_response))) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "delete failed: invalid response was received"); return; } /* check return code */ if (response->return_code) { /* error happen, throw exceprion */ zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "delete failed: %"PRIi32"(0x%08"PRIx32"): %s", response->return_code, response->return_code, response->return_msg); return; } /* * fill return value */ if (array_init(return_value) != SUCCESS) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "delete failed: create array failed"); return; } /* put count to result array */ add_assoc_long(return_value, "count", response->count); /* check "return tuple" flag */ if ((response->count) > 0 && (flags & TARANTOOL_FLAGS_RETURN_TUPLE)) { /* ok, the responce should contain inserted tuple */ if (!io_buf_read_tuple(tnt->io_buf, &tuple)) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "delete failed: invalid response was received"); return; } /* put returned tuple to result array */ add_assoc_zval(return_value, "tuple", tuple); } } PHP_METHOD(tarantool_class, call) { /* * parse methods parameters */ zval *id; char *proc_name = NULL; int proc_name_len = 0; zval *tuple = NULL; long flags = 0; if (zend_parse_method_parameters(ZEND_NUM_ARGS() TSRMLS_CC, getThis(), "Osz|l", &id, tarantool_class_ptr, &proc_name, &proc_name_len, &tuple, &flags) == FAILURE) { return; } tarantool_object *tnt = (tarantool_object *) zend_object_store_get_object( id TSRMLS_CC); /* check connection */ if (!tnt->stream) { /* establis connection */ tnt->stream = establish_connection(tnt->host, tnt->port); if (!tnt->stream) return; } /* * send request */ /* clean-up buffer */ io_buf_clean(tnt->io_buf); /* fill insert command */ struct tnt_call_request *request = (struct tnt_call_request *) io_buf_write_struct( tnt->io_buf, sizeof(struct tnt_call_request)); if (request == NULL) return; /* flags */ request->flags = flags; /* proc name */ if (!io_buf_write_field_str(tnt->io_buf, proc_name, proc_name_len)) return; /* tuple */ if (!io_buf_write_tuple(tnt->io_buf, tuple)) return; /* send iproto request */ if (!io_buf_send_iproto(tnt->stream, TARANTOOL_COMMAND_CALL, 0, tnt->io_buf)) return; /* * receive response */ /* clean-up buffer */ io_buf_clean(tnt->io_buf); /* receive */ if (!io_buf_recv_iproto(tnt->stream, tnt->io_buf)) return; /* read response */ struct tnt_response *response; if (!io_buf_read_struct(tnt->io_buf, (void **) &response, sizeof(struct tnt_response))) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "call failed: invalid response was received"); return; } /* check return code */ if (response->return_code) { /* error happen, throw exceprion */ zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "call failed: %"PRIi32"(0x%08"PRIx32"): %s", response->return_code, response->return_code, response->return_msg); return; } if (array_init(return_value) != SUCCESS) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "call failed: create array failed"); return; } /* put count to result array */ add_assoc_long(return_value, "count", response->count); /* put tuple list to result array */ zval *tuples_list; MAKE_STD_ZVAL(tuples_list); if (array_init(tuples_list) == FAILURE) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "call failed: create array failed"); return; } /* read tuples for responce */ int i; for (i = 0; i < response->count; ++i) { zval *tuple; if (!io_buf_read_tuple(tnt->io_buf, &tuple)) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "call failed: invalid response was received"); return; } add_next_index_zval(tuples_list, tuple); } add_assoc_zval(return_value, "tuples_list", tuples_list); } PHP_METHOD(tarantool_class, admin) { /* parse methods parameters */ zval *id; char *cmd = NULL; int cmd_len = 0; if (zend_parse_method_parameters(ZEND_NUM_ARGS() TSRMLS_CC, getThis(), "Os", &id, tarantool_class_ptr, &cmd, &cmd_len) == FAILURE) { return; } tarantool_object *tnt = (tarantool_object *) zend_object_store_get_object( id TSRMLS_CC); /* check admin port */ if (!tnt->admin_port) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "admin command not allowed for this connection"); return; } /* check connection */ if (!tnt->admin_stream) { /* establis connection */ tnt->admin_stream = establish_connection(tnt->host, tnt->admin_port); if (!tnt->admin_stream) return; /* set string eol */ php_stream_locate_eol(tnt->admin_stream, ADMIN_SEPARATOR, strlen(ADMIN_SEPARATOR) TSRMLS_DC); } /* send request */ io_buf_clean(tnt->io_buf); if (!io_buf_write_str(tnt->io_buf, cmd, cmd_len)) return; if (!io_buf_write_str(tnt->io_buf, ADMIN_SEPARATOR, strlen(ADMIN_SEPARATOR))) return; if (!io_buf_send_yaml(tnt->admin_stream, tnt->io_buf)) return; /* recv response */ io_buf_clean(tnt->io_buf); if (!io_buf_recv_yaml(tnt->admin_stream, tnt->io_buf)) return; char *response = estrndup(tnt->io_buf->value, tnt->io_buf->size); RETURN_STRING(response, 0); } /*============================================================================* * local functions definition *============================================================================*/ /*----------------------------------------------------------------------------* * Buffer interface *----------------------------------------------------------------------------*/ static struct io_buf * io_buf_create() { struct io_buf *buf = (struct io_buf *) emalloc(sizeof(struct io_buf)); if (!buf) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "allocation memory fail: %s (%i)", strerror(errno), errno); goto failure; } buf->size = 0; buf->capacity = io_buf_next_capacity(buf->size); buf->read_pos = 0; buf->value = (uint8_t *) emalloc(buf->capacity); if (!buf->value) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "allocation memory fail: %s (%i)", strerror(errno), errno); goto failure; } return buf; failure: if (buf) { if (buf->value) efree(buf->value); efree(buf); } return NULL; } static void io_buf_destroy(struct io_buf *buf) { if (!buf) return; if (buf->value) efree(buf->value); efree(buf); } inline static bool io_buf_reserve(struct io_buf *buf, size_t n) { if (buf->capacity > n) return true; size_t new_capacity = io_buf_next_capacity(n); uint8_t *new_value = (uint8_t *) erealloc(buf->value, new_capacity); if (!new_value) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "allocation memory fail: %s (%i)", strerror(errno), errno); return false; } buf->capacity = new_capacity; buf->value = new_value; return true; } inline static bool io_buf_resize(struct io_buf *buf, size_t n) { io_buf_reserve(buf, n); buf->size = n; return true; } inline static size_t io_buf_next_capacity(size_t n) { size_t capacity = IO_BUF_CAPACITY_MIN; while (capacity < n) capacity *= IO_BUF_CAPACITY_FACTOR; return capacity; } static void io_buf_clean(struct io_buf *buf) { buf->size = 0; buf->read_pos = 0; } static bool io_buf_read_struct(struct io_buf *buf, void **ptr, size_t n) { size_t last = buf->size - buf->read_pos; if (last < n) return false; *ptr = buf->value + buf->read_pos; buf->read_pos += n; return true; } static bool io_buf_read_int32(struct io_buf *buf, int32_t *val) { size_t last = buf->size - buf->read_pos; if (last < sizeof(int32_t)) return false; *val = *(int32_t *)(buf->value + buf->read_pos); buf->read_pos += sizeof(int32_t); return true; } static bool io_buf_read_int64(struct io_buf *buf, int64_t *val) { size_t last = buf->size - buf->read_pos; if (last < sizeof(int64_t)) return false; *val = *(int64_t *)(buf->value + buf->read_pos); buf->read_pos += sizeof(int64_t); return true; } static bool io_buf_read_varint(struct io_buf *buf, int32_t *val) { uint8_t *b = buf->value + buf->read_pos; size_t size = buf->size - buf->read_pos; if (size < 1) return false; if (!(b[0] & 0x80)) { buf->read_pos += 1; *val = (b[0] & 0x7f); return true; } if (size < 2) return false; if (!(b[1] & 0x80)) { buf->read_pos += 2; *val = (b[0] & 0x7f) << 7 | (b[1] & 0x7f); return true; } if (size < 3) return false; if (!(b[2] & 0x80)) { buf->read_pos += 3; *val = (b[0] & 0x7f) << 14 | (b[1] & 0x7f) << 7 | (b[2] & 0x7f); return true; } if (size < 4) return false; if (!(b[3] & 0x80)) { buf->read_pos += 4; *val = (b[0] & 0x7f) << 21 | (b[1] & 0x7f) << 14 | (b[2] & 0x7f) << 7 | (b[3] & 0x7f); return true; } if (size < 5) return false; if (!(b[4] & 0x80)) { buf->read_pos += 5; *val = (b[0] & 0x7f) << 28 | (b[1] & 0x7f) << 21 | (b[2] & 0x7f) << 14 | (b[3] & 0x7f) << 7 | (b[4] & 0x7f); return true; } return false; } static bool io_buf_read_str(struct io_buf *buf, char **str, size_t len) { size_t last = buf->size - buf->read_pos; if (last < len) return false; *str = (char *)(buf->value + buf->read_pos); buf->read_pos += len; return true; } static bool io_buf_read_field(struct io_buf *buf, zval *tuple) { int32_t field_length; if (!io_buf_read_varint(buf, &field_length)) return false; int32_t i32_val; int64_t i64_val; char *str_val; switch (field_length) { case sizeof(int32_t): if (!io_buf_read_int32(buf, &i32_val)) return false; add_next_index_long(tuple, i32_val); break; case sizeof(int64_t): if (!io_buf_read_int64(buf, &i64_val)) return false; add_next_index_long(tuple, i64_val); break; default: if (!io_buf_read_str(buf, &str_val, field_length)) return false; add_next_index_stringl(tuple, str_val, field_length, true); } return true; } static bool io_buf_read_tuple(struct io_buf *buf, zval **tuple) { MAKE_STD_ZVAL(*tuple); if (array_init(*tuple) == FAILURE) { return false; } int32_t size; if (!io_buf_read_int32(buf, &size)) return false; int32_t cardinality; if (!io_buf_read_int32(buf, &cardinality)) return false; while (cardinality > 0) { if (!io_buf_read_field(buf, *tuple)) return false; cardinality -= 1; } return true; } static void * io_buf_write_struct(struct io_buf *buf, size_t n) { if (!io_buf_reserve(buf, buf->size + n)) return NULL; void *ptr = buf->value + buf->size; buf->size += n; return ptr; } static bool io_buf_write_byte(struct io_buf *buf, int8_t value) { if (!io_buf_reserve(buf, buf->size + sizeof(int8_t))) return false; *(int8_t *)(buf->value + buf->size) = value; buf->size += sizeof(uint8_t); return true; } static bool io_buf_write_int32(struct io_buf *buf, int32_t value) { if (!io_buf_reserve(buf, buf->size + sizeof(int32_t))) return false; *(int32_t *)(buf->value + buf->size) = value; buf->size += sizeof(int32_t); return true; } static bool io_buf_write_int64(struct io_buf *buf, int64_t value) { if (!io_buf_reserve(buf, buf->size + sizeof(int64_t))) return false; *(int64_t *)(buf->value + buf->size) = value; buf->size += sizeof(int64_t); return true; } static bool io_buf_write_varint(struct io_buf *buf, int32_t value) { if (!io_buf_reserve(buf, buf->size + 5)) /* reseve maximal varint size (5 bytes) */ return false; if (value >= (1 << 7)) { if (value >= (1 << 14)) { if (value >= (1 << 21)) { if (value >= (1 << 28)) io_buf_write_byte(buf, (int8_t)(value >> 28) | 0x80); io_buf_write_byte(buf, (int8_t)(value >> 21) | 0x80); } io_buf_write_byte(buf, (int8_t)((value >> 14) | 0x80)); } io_buf_write_byte(buf, (int8_t)((value >> 7) | 0x80)); } io_buf_write_byte(buf, (int8_t)((value) & 0x7F)); return true; } static bool io_buf_write_str(struct io_buf *buf, uint8_t *str, size_t len) { if (!io_buf_reserve(buf, buf->size + len)) return false; memcpy(buf->value + buf->size, str, len); buf->size += len; return true; } static bool io_buf_write_field_int32(struct io_buf *buf, uint32_t value) { /* write field length (4 bytes) */ if (!io_buf_write_varint(buf, sizeof(int32_t))) return false; /* write field value */ if (!io_buf_write_int32(buf, value)) return false; return true; } static bool io_buf_write_field_int64(struct io_buf *buf, uint64_t value) { /* write field length (8 bytes) */ if (!io_buf_write_varint(buf, sizeof(int64_t))) return false; /* write field value */ if (!io_buf_write_int64(buf, value)) return false; return true; } static bool io_buf_write_field_str(struct io_buf *buf, uint8_t *field_value, size_t field_length) { /* write field length (string length) */ if (!io_buf_write_varint(buf, (int32_t)field_length)) return false; /* write field value (string) */ if (!io_buf_write_str(buf, field_value, field_length)) return false; return true; } static bool io_buf_write_tuple_int(struct io_buf *buf, zval *tuple) { /* single field tuple: (int) */ long long_value = Z_LVAL_P(tuple); /* write tuple cardinality */ if (!io_buf_write_int32(buf, 1)) return false; /* write field */ if ((unsigned long)long_value <= 0xffffffffllu) { if (!io_buf_write_field_int32(buf, (uint32_t)long_value)) return false; } else { if (!io_buf_write_field_int64(buf, (uint64_t)long_value)) return false; } return true; } static bool io_buf_write_tuple_str(struct io_buf *buf, zval *tuple) { /* single field tuple: (string) */ char *str_value = Z_STRVAL_P(tuple); size_t str_length = Z_STRLEN_P(tuple); /* write tuple cardinality */ if (!io_buf_write_int32(buf, 1)) return false; /* write field */ if (!io_buf_write_field_str(buf, str_value, str_length)) return false; return true; } static bool io_buf_write_tuple_array(struct io_buf *buf, zval *tuple) { /* multyply tuple array */ HashTable *hash = Z_ARRVAL_P(tuple); HashPosition itr; zval **field; /* put tuple cardinality */ io_buf_write_int32(buf, zend_hash_num_elements(hash)); for (zend_hash_internal_pointer_reset_ex(hash, &itr); zend_hash_get_current_data_ex(hash, (void **) &field, &itr) == SUCCESS; zend_hash_move_forward_ex(hash, &itr)) { char *str_value; size_t str_length; long long_value; switch (Z_TYPE_PP(field)) { case IS_STRING: /* string field */ str_value = Z_STRVAL_PP(field); str_length = Z_STRLEN_PP(field); io_buf_write_field_str(buf, str_value, str_length); break; case IS_LONG: /* integer field */ long_value = Z_LVAL_PP(field); /* write field */ if ((unsigned long)long_value <= 0xffffffffllu) { io_buf_write_field_int32(buf, (uint32_t)long_value); } else { io_buf_write_field_int64(buf, (uint64_t)long_value); } break; default: zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "unsupported field type"); return false; } } return true; } static bool io_buf_write_tuple(struct io_buf *buf, zval *tuple) { /* write tuple by type */ switch (Z_TYPE_P(tuple)) { case IS_LONG: /* write integer as tuple */ return io_buf_write_tuple_int(buf, tuple); case IS_STRING: /* write string as tuple */ return io_buf_write_tuple_str(buf, tuple); case IS_ARRAY: /* write array as tuple */ return io_buf_write_tuple_array(buf, tuple); default: zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "unsupported tuple type"); return false; } return true; } static bool io_buf_write_tuples_list_array(struct io_buf *buf, zval *tuples_list) { HashTable *hash = Z_ARRVAL_P(tuples_list); HashPosition itr; zval **tuple; /* write number of tuples */ if (!io_buf_write_int32(buf, zend_hash_num_elements(hash))) return false; /* write tuples */ for (zend_hash_internal_pointer_reset_ex(hash, &itr); zend_hash_get_current_data_ex(hash, (void **) &tuple, &itr) == SUCCESS; zend_hash_move_forward_ex(hash, &itr)) { if (Z_TYPE_PP(tuple) != IS_ARRAY) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "invalid tuples list: expected array of array"); return false; } if (!io_buf_write_tuple_array(buf, *tuple)) return false; } return true; } static bool io_buf_write_tuples_list(struct io_buf *buf, zval *tuples_list) { HashTable *hash; HashPosition itr; zval **tuple; switch (Z_TYPE_P(tuples_list)) { case IS_LONG: /* single tuple: long */ /* write number of tuples */ if (!io_buf_write_int32(buf, 1)) return false; /* write tuple */ if (!io_buf_write_tuple_int(buf, tuples_list)) return false; break; case IS_STRING: /* single tuple: string */ /* write number of tuples */ if (!io_buf_write_int32(buf, 1)) return false; /* write tuple */ if (!io_buf_write_tuple_str(buf, tuples_list)) return false; break; case IS_ARRAY: /* array: migth be single or multi tuples array */ hash = Z_ARRVAL_P(tuples_list); zend_hash_internal_pointer_reset_ex(hash, &itr); if (zend_hash_get_current_data_ex(hash, (void **) &tuple, &itr) != SUCCESS) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "invalid tuples list: empty array"); return false; } /* check type of the first element */ switch (Z_TYPE_PP(tuple)) { case IS_STRING: case IS_LONG: /* single tuple: array */ /* write tuples count */ if (!io_buf_write_int32(buf, 1)) return false; /* write tuple */ if (!io_buf_write_tuple_array(buf, tuples_list)) return false; break; case IS_ARRAY: /* multi tuples list */ if (!io_buf_write_tuples_list_array(buf, tuples_list)) return false; break; default: /* invalid element type */ zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "unsupported tuple type"); return false; } break; default: zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "unsupported tuple type"); return false; } return true; } /* * I/O buffer send/recv */ static bool io_buf_send_yaml(php_stream *stream, struct io_buf *buf) { if (php_stream_write(stream, buf->value, buf->size) != buf->size) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "send message fail"); return false; } /* flush request */ php_stream_flush(stream); return true; } static bool io_buf_recv_yaml(php_stream *stream, struct io_buf *buf) { char *line = php_stream_get_line(stream, NULL, 0, NULL); while (strcmp(line, ADMIN_TOKEN_BEGIN) != 0) { line = php_stream_get_line(stream, NULL, 0, NULL); } line = php_stream_get_line(stream, NULL, 0, NULL); while (strcmp(line, ADMIN_TOKEN_END) != 0) { io_buf_write_str(buf, line, strlen(line)); line = php_stream_get_line(stream, NULL, 0, NULL); } return true; } /* * php_stream_read made right * See https://bugs.launchpad.net/tarantool/+bug/1182474 */ static size_t php_stream_read_real(php_stream * stream, char *buf, size_t size) { size_t total_size = 0; while (total_size < size) { size_t read_size = php_stream_read(stream, buf + total_size, size - total_size); assert (read_size <= size - total_size); if (read_size == 0) return total_size; total_size += read_size; } return total_size; } static bool io_buf_send_iproto(php_stream *stream, int32_t type, int32_t request_id, struct io_buf *buf) { /* send iproto header */ struct iproto_header header; header.type = type; header.length = buf->size; header.request_id = request_id; size_t length = sizeof(struct iproto_header); if (php_stream_write(stream, (char *) &header, length) != length) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "failed to send request: could not write " "request header"); return false; } /* send request */ if (php_stream_write(stream, buf->value, buf->size) != buf->size) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "failed to send request: could not write " "request body"); return false; } /* flush request */ if (php_stream_flush(stream)) zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "failed to flush stream"); return true; } static bool io_buf_recv_iproto(php_stream *stream, struct io_buf *buf) { /* receiving header */ struct iproto_header header; size_t length = sizeof(struct iproto_header); if (php_stream_read_real(stream, (char *) &header, length) != length) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "failed to receive response: eof when " "reading iproto header"); return false; } /* receiving body */ if (!io_buf_resize(buf, header.length)) return false; if (php_stream_read_real(stream, buf->value, buf->size) != buf->size) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "failed to receive response: eof when " "reading response body"); return false; } return true; } /*----------------------------------------------------------------------------* * support local functions *----------------------------------------------------------------------------*/ static zend_object_value alloc_tarantool_object(zend_class_entry *entry TSRMLS_DC) { zend_object_value new_value; /* allocate and clean-up instance */ tarantool_object *tnt = (tarantool_object *) emalloc(sizeof(tarantool_object)); /* TODO: emalloc result must be checked */ memset(tnt, 0, sizeof(tarantool_object)); /* initialize class instance */ zend_object_std_init(&tnt->zo, entry TSRMLS_CC); new_value.handle = zend_objects_store_put( tnt, (zend_objects_store_dtor_t) zend_objects_destroy_object, (zend_objects_free_object_storage_t) free_tarantool_object, NULL TSRMLS_CC); new_value.handlers = zend_get_std_object_handlers(); return new_value; } static void free_tarantool_object(tarantool_object *tnt TSRMLS_DC) { if (tnt == NULL) return; if (tnt->stream) php_stream_close(tnt->stream); if (tnt->admin_stream) php_stream_close(tnt->admin_stream); io_buf_destroy(tnt->io_buf); io_buf_destroy(tnt->splice_field); efree(tnt); } static php_stream * establish_connection(char *host, int port) { char *msg = NULL; /* initialize connection parameters */ char *dest_addr = NULL; size_t dest_addr_len = spprintf(&dest_addr, 0, "tcp://%s:%d", host, port); int options = ENFORCE_SAFE_MODE | REPORT_ERRORS; int flags = STREAM_XPORT_CLIENT | STREAM_XPORT_CONNECT; struct timeval timeout = { .tv_sec = TARANTOOL_TIMEOUT_SEC, .tv_usec = TARANTOOL_TIMEOUT_USEC, }; char *error_msg = NULL; int error_code = 0; /* establish connection */ php_stream *stream = php_stream_xport_create(dest_addr, dest_addr_len, options, flags, NULL, &timeout, NULL, &error_msg, &error_code); efree(dest_addr); /* check result */ if (error_code || !stream) { zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "failed to connect: %s", error_msg); goto process_error; } /* set socket flag 'TCP_NODELAY' */ int socketd = ((php_netstream_data_t*)stream->abstract)->socket; flags = 1; int result = setsockopt(socketd, IPPROTO_TCP, TCP_NODELAY, (char *) &flags, sizeof(int)); if (result != 0) { char error_buf[64]; zend_throw_exception_ex(zend_exception_get_default(TSRMLS_C), 0 TSRMLS_DC, "failed to connect: " "setsockopt error %s", strerror_r(errno, error_buf, sizeof(error_buf))); goto process_error; } return stream; process_error: if (error_msg) efree(error_msg); if (stream) php_stream_close(stream); return NULL; } static bool hash_fing_long(HashTable *hash, char *key, long *value) { zval **zvalue = NULL; if (zend_hash_find(hash, key, strlen(key) + 1, (void **)&zvalue) != SUCCESS) return false; if (Z_TYPE_PP(zvalue) != IS_LONG) return false; *value = Z_LVAL_PP(zvalue); return true; } static bool hash_fing_str(HashTable *hash, char *key, char **value, int *value_length) { zval **zvalue = NULL; if (zend_hash_find(hash, key, strlen(key) + 1, (void **)&zvalue) != SUCCESS) return false; if (Z_TYPE_PP(zvalue) != IS_STRING) return false; *value = Z_STRVAL_PP(zvalue); *value_length = Z_STRLEN_PP(zvalue); return true; } static bool hash_fing_scalar(HashTable *hash, char *key, zval ***value) { if (zend_hash_find(hash, key, strlen(key) + 1, (void **)value) != SUCCESS) return false; if (Z_TYPE_PP(*value) != IS_STRING && Z_TYPE_PP(*value) != IS_LONG) return false; return true; } /* * Local variables: * tab-width: 4 * c-basic-offset: 4 * End: * vim600: noet sw=4 ts=4 fdm=marker * vim<600: noet sw=4 ts=4 */ tarantool-php-1.1/config.m40000664000000000000000000000042512323274624014360 0ustar rootrootdnl config.m4 for extension tarantool PHP_ARG_WITH(tarantool, for tarantool support, [ --with-tarantool Enable tarantool support]) if test "$PHP_TARANTOOL" != "no"; then PHP_ADD_INCLUDE([$ext_builddir/src]) PHP_NEW_EXTENSION(tarantool, src/tarantool.c, $ext_shared) fi tarantool-php-1.1/test/0000775000000000000000000000000012323274624013627 5ustar rootroottarantool-php-1.1/test/delete.phpt0000664000000000000000000000756312323274624016001 0ustar rootroot--TEST-- Tarantool delete commands test --FILE-- ===DONE=== --EXPECT-- ---------- test begin ---------- test delete: invalid key (expected error exception) Exception: unsupported tuple type ----------- test end ----------- ---------- test begin ---------- test delete: invalid key (expected error exception) Exception: unsupported field type ----------- test end ----------- ---------- test begin ---------- test delete: invalid key (expected error exception) Exception: delete failed: 11522(0x00002d02): Invalid key part count in an exact match (expected 1, got 2) ----------- test end ----------- ---------- test begin ---------- test delete: delete key as interger result: count = 1 tuple: id = 0 series = Star Wars year = 1977 name = A New Hope crawl = A long time ago, in a galaxy far, far away... It is a period of civil war. Rebel spaceships, striking from a hidden base, have won their first victory against the evil Galactic Empire. During the battle, Rebel spies managed to steal secret plans to the Empire's ultimate weapon, the Death Star, an armored space station with enough power to destroy an entire planet. Pursued by the Empire's sinister agents, Princess Leia races home aboard her starship, custodian of the stolen plans that can save her people and restore freedom to the galaxy.... uuid = 0xf10dbeef0001 ----------- test end ----------- ---------- test begin ---------- test delete: delete key as array result: count = 1 tuple: id = 1 series = Star Wars year = 1980 name = The Empire Strikes Back crawl = It is a dark time for the Rebellion. Although the Death Star has been destroyed. Imperial troops have driven the Rebel forces from their hidden base and pursued them across the galaxy. Evading the dreaded Imperial Starfleet, a group of freedom fighters led by Luke Skywalker have established a new secret base on the remote ice world of Hoth. The evil lord Darth Vader, obsessed with finding young Skywalker, has dispatched thousands of remote probes into the far reaches of space.... uuid = 0xf10dbeef0002 ----------- test end ----------- ---------- test begin ---------- test delete: delete key (tuple doesn't return) result: count = 1 ----------- test end ----------- ---------- test begin ---------- test delete: delete not existing tuple w/ return tuple flag result: count = 0 ----------- test end ----------- ===DONE=== tarantool-php-1.1/test/select.phpt0000664000000000000000000002263312323274624016011 0ustar rootroot--TEST-- Tarantool select commands test --FILE-- ===DONE=== --EXPECT-- ---------- test begin ---------- test select: key is integer result: count = 1 tuple[0]: id = 0 series = Star Wars year = 1977 name = A New Hope crawl = A long time ago, in a galaxy far, far away... It is a period of civil war. Rebel spaceships, striking from a hidden base, have won their first victory against the evil Galactic Empire. During the battle, Rebel spies managed to steal secret plans to the Empire's ultimate weapon, the Death Star, an armored space station with enough power to destroy an entire planet. Pursued by the Empire's sinister agents, Princess Leia races home aboard her starship, custodian of the stolen plans that can save her people and restore freedom to the galaxy.... uuid = 0xf10dbeef0001 ----------- test end ----------- ---------- test begin ---------- test select: key is string result: count = 3 tuple[0]: id = 0 series = Star Wars year = 1977 name = A New Hope crawl = A long time ago, in a galaxy far, far away... It is a period of civil war. Rebel spaceships, striking from a hidden base, have won their first victory against the evil Galactic Empire. During the battle, Rebel spies managed to steal secret plans to the Empire's ultimate weapon, the Death Star, an armored space station with enough power to destroy an entire planet. Pursued by the Empire's sinister agents, Princess Leia races home aboard her starship, custodian of the stolen plans that can save her people and restore freedom to the galaxy.... uuid = 0xf10dbeef0001 tuple[1]: id = 1 series = Star Wars year = 1980 name = The Empire Strikes Back crawl = It is a dark time for the Rebellion. Although the Death Star has been destroyed. Imperial troops have driven the Rebel forces from their hidden base and pursued them across the galaxy. Evading the dreaded Imperial Starfleet, a group of freedom fighters led by Luke Skywalker have established a new secret base on the remote ice world of Hoth. The evil lord Darth Vader, obsessed with finding young Skywalker, has dispatched thousands of remote probes into the far reaches of space.... uuid = 0xf10dbeef0002 tuple[2]: id = 2 series = Star Wars year = 1983 name = Return of the Jedi crawl = Luke Skywalker has returned to his home planet of Tatooine in an attempt to rescue his friend Han Solo from the clutches of the vile gangster Jabba the Hutt. Little does Luke know that the GALACTIC EMPIRE has secretly begun construction on a new armored space station even more powerful than the first dreaded Death Star. When completed, this ultimate weapon will spell certain doom for the small band of rebels struggling to restore freedom to the galaxy... uuid = 0xf10dbeef0003 ----------- test end ----------- ---------- test begin ---------- test select: key is object (expected error exception) Exception: unsupported tuple type ----------- test end ----------- ---------- test begin ---------- test select: key is array result: count = 3 tuple[0]: id = 0 series = Star Wars year = 1977 name = A New Hope crawl = A long time ago, in a galaxy far, far away... It is a period of civil war. Rebel spaceships, striking from a hidden base, have won their first victory against the evil Galactic Empire. During the battle, Rebel spies managed to steal secret plans to the Empire's ultimate weapon, the Death Star, an armored space station with enough power to destroy an entire planet. Pursued by the Empire's sinister agents, Princess Leia races home aboard her starship, custodian of the stolen plans that can save her people and restore freedom to the galaxy.... uuid = 0xf10dbeef0001 tuple[1]: id = 1 series = Star Wars year = 1980 name = The Empire Strikes Back crawl = It is a dark time for the Rebellion. Although the Death Star has been destroyed. Imperial troops have driven the Rebel forces from their hidden base and pursued them across the galaxy. Evading the dreaded Imperial Starfleet, a group of freedom fighters led by Luke Skywalker have established a new secret base on the remote ice world of Hoth. The evil lord Darth Vader, obsessed with finding young Skywalker, has dispatched thousands of remote probes into the far reaches of space.... uuid = 0xf10dbeef0002 tuple[2]: id = 2 series = Star Wars year = 1983 name = Return of the Jedi crawl = Luke Skywalker has returned to his home planet of Tatooine in an attempt to rescue his friend Han Solo from the clutches of the vile gangster Jabba the Hutt. Little does Luke know that the GALACTIC EMPIRE has secretly begun construction on a new armored space station even more powerful than the first dreaded Death Star. When completed, this ultimate weapon will spell certain doom for the small band of rebels struggling to restore freedom to the galaxy... uuid = 0xf10dbeef0003 ----------- test end ----------- ---------- test begin ---------- test select: key is empty array (expected error exception) Exception: invalid tuples list: empty array ----------- test end ----------- ---------- test begin ---------- test select: key is array of objects (expected error exception) Exception: unsupported tuple type ----------- test end ----------- ---------- test begin ---------- test select: multi keys select result: count = 3 tuple[0]: id = 0 series = Star Wars year = 1977 name = A New Hope crawl = A long time ago, in a galaxy far, far away... It is a period of civil war. Rebel spaceships, striking from a hidden base, have won their first victory against the evil Galactic Empire. During the battle, Rebel spies managed to steal secret plans to the Empire's ultimate weapon, the Death Star, an armored space station with enough power to destroy an entire planet. Pursued by the Empire's sinister agents, Princess Leia races home aboard her starship, custodian of the stolen plans that can save her people and restore freedom to the galaxy.... uuid = 0xf10dbeef0001 tuple[1]: id = 1 series = Star Wars year = 1980 name = The Empire Strikes Back crawl = It is a dark time for the Rebellion. Although the Death Star has been destroyed. Imperial troops have driven the Rebel forces from their hidden base and pursued them across the galaxy. Evading the dreaded Imperial Starfleet, a group of freedom fighters led by Luke Skywalker have established a new secret base on the remote ice world of Hoth. The evil lord Darth Vader, obsessed with finding young Skywalker, has dispatched thousands of remote probes into the far reaches of space.... uuid = 0xf10dbeef0002 tuple[2]: id = 2 series = Star Wars year = 1983 name = Return of the Jedi crawl = Luke Skywalker has returned to his home planet of Tatooine in an attempt to rescue his friend Han Solo from the clutches of the vile gangster Jabba the Hutt. Little does Luke know that the GALACTIC EMPIRE has secretly begun construction on a new armored space station even more powerful than the first dreaded Death Star. When completed, this ultimate weapon will spell certain doom for the small band of rebels struggling to restore freedom to the galaxy... uuid = 0xf10dbeef0003 ----------- test end ----------- ---------- test begin ---------- test select: key is array of array of objects (expected error exception) Exception: unsupported field type ----------- test end ----------- ---------- test begin ---------- test select: key is array of diffirent elements (expected error exception) Exception: invalid tuples list: expected array of array ----------- test end ----------- ===DONE=== tarantool-php-1.1/test/update_fields.phpt0000664000000000000000000000747712323274624017353 0ustar rootroot--TEST-- Tarantool update fields commands test --FILE-- 2, "op" => TARANTOOL_OP_ADD, "arg" => 30, ), array( "field" => 0, "op" => TARANTOOL_OP_ASSIGN, "arg" => 5, ), array( "field" => 1, "op" => TARANTOOL_OP_ASSIGN, "arg" => "", ), array( "field" => 3, "op" => TARANTOOL_OP_ASSIGN, "arg" => "return", ), array( "field" => 4, "op" => TARANTOOL_OP_SPLICE, "offset" => 1, "length" => 64, "list" => " <> ", ), ), TARANTOOL_FLAGS_RETURN_TUPLE); echo "----------- test end -----------\n\n"; echo "---------- test begin ----------\n"; echo "test update fields: delete not existing tuple w/ return tuple flag\n"; test_update_fields($tarantool, 0, 0, array( array( "field" => 2, "op" => TARANTOOL_OP_ADD, "arg" => 30, ), ), TARANTOOL_FLAGS_RETURN_TUPLE); echo "----------- test end -----------\n\n"; test_clean($tarantool, 0); ?> ===DONE=== --EXPECT-- ---------- test begin ---------- test update fields: do update w/o operations (expected error exception) Exception: update fields failed: 514(0x00000202): Illegal parameters, no operations for update ----------- test end ----------- ---------- test begin ---------- test update fields: invalid operation list (expected error exception) Exception: invalid operations list ----------- test end ----------- ---------- test begin ---------- test update fields: do update arith operation result: count = 1 tuple: id = 5 series = year = 2007 name = return crawl = A <> ivil war. Rebel spaceships, striking from a hidden base, have won their first victory against the evil Galactic Empire. During the battle, Rebel spies managed to steal secret plans to the Empire's ultimate weapon, the Death Star, an armored space station with enough power to destroy an entire planet. Pursued by the Empire's sinister agents, Princess Leia races home aboard her starship, custodian of the stolen plans that can save her people and restore freedom to the galaxy.... uuid = 0xf10dbeef0001 ----------- test end ----------- ---------- test begin ---------- test update fields: delete not existing tuple w/ return tuple flag result: count = 0 ----------- test end ----------- ===DONE=== tarantool-php-1.1/test/run-tests0000775000000000000000000001301712323274624015523 0ustar rootroot#!/bin/bash #==============================================================================# # PHP tarantool test suite runner #==============================================================================# #------------------------------------------------------------------------------# # Constants #------------------------------------------------------------------------------# # Success constant SUCCESS=0 # Failure constant FAILURE=1 # main test directory TEST_HOME_DIR=`pwd` # resource directory RESOURCE_DIR="$TEST_HOME_DIR/share" # running directory RUNNING_DIR="$TEST_HOME_DIR/var" # php.ini file PHP_INI="$RESOURCE_DIR/php.ini" # Tarantool configuration file TARANTOOL_BOX_CFG="$RESOURCE_DIR/tarantool_box.cfg" # Tarantool pid file TARANTOOL_BOX_PID="$RUNNING_DIR/tarantool_box.pid" #------------------------------------------------------------------------------# # Suite runner functions #------------------------------------------------------------------------------# # initialize suite function init_suite() { # making running directory mkdir -p $RUNNING_DIR # # Tarantool binary # # check TARANTOOL_HOME variable if [ ! -z $TARANTOOL_BOX_BIN ]; then # Use user-defined path tarantool_box_bin="$TARANTOOL_BOX_BIN" else # try to find by standard paths tarantool_box_bin="tarantool_box" fi # checking binary if ! which $tarantool_box_bin > /dev/null 2>&1; then echo "error: can't find Tarantool binary file" exit $FAILURE fi # # PHP/Pear # # checking pear if ! which pear > /dev/null 2>&1; then echo "error: can't find pear" exit $FAILURE fi # # Module shared library # # checking tarantool module library if [ ! -f ../modules/tarantool.so ]; then echo "error: can't find tarantool module library" exit $FAILURE fi # checking old tarantool module file if [ -f tarantool.so ]; then rm -f tarantool.so fi # making symlink for tarantool.so to test directory cp -s ../modules/tarantool.so . # # tarantool_box.cfg # # checking tarantool_box.cfg file if [ ! -f $RESOURCE_DIR/tarantool_box.cfg ]; then echo "error: can't find tarantool_box.cfg" exit $FAILURE fi # checking old tarantool_box.cfg file if [ -f $RUNNING_DIR/tarantool_box.cfg ]; then rm -f $RUNNING_DIR/tarantool_box.cfg fi # making symlink for tarantool_box.cfg to running directory ln -s $RESOURCE_DIR/tarantool_box.cfg $RUNNING_DIR/tarantool_box.cfg # # init.lua # # checking init.lua file if [ ! -f $RESOURCE_DIR/init.lua ]; then echo "error: can't find init.lua" exit $FAILURE fi # checking old init lua file if [ -f $RUNNING_DIR/init.lua ]; then rm $RUNNING_DIR/init.lua fi # making symlink for init.lua to running directory ln -s $RESOURCE_DIR/init.lua $RUNNING_DIR/init.lua echo "--------------------------------------------------------------------------" echo "Tarantool information" echo "--------------------------------------------------------------------------" echo "Binary: $tarantool_box_bin" echo "Version: `$tarantool_box_bin --version`" echo "--------------------------------------------------------------------------" return $SUCCESS } # clean-up tarantool function cleanup_suite() { # deleting pid rm -f $RUNNING_DIR/*.pid # deleting xlogs rm -f $RUNNING_DIR/*.xlog # deleting snaps rm -f $RUNNING_DIR/*.snap # deleting configuration file rm -f $RUNNING_DIR/*.cfg # deleting init.lua rm -f $RUNNING_DIR/*.lua # deleting module library rm -f tarantool.so } # initialize tarantool's storage function tarantool_init_storage() { $tarantool_box_bin --init-storage -c $TARANTOOL_BOX_CFG 1> /dev/null 2>&1 return $SUCCESS } # start tarantool function tarantool_start() { if [ -f $TARANTOOL_BOX_PID ]; then tarantool_stop cleanup_suite fi # run tarantool to background $tarantool_box_bin -c $TARANTOOL_BOX_CFG & # wait pid file for i in {1..500}; do if [ -f $TARANTOOL_BOX_PID ]; then break fi sleep 0.01 done if [ ! -f $TARANTOOL_BOX_PID ]; then echo "error: can't start tarantool" cleanup_suite exit $FAILURE fi return $SUCCESS } # stop tarantool function tarantool_stop() { if [ ! -f $TARANTOOL_BOX_PID ]; then return $SUCCESS fi # get tarantool pid form pid file pid=`cat $TARANTOOL_BOX_PID` # kill process via SIGTERM kill -TERM $pid 1> /dev/null 2>&1 # Waiting 5 second for i in {1..500}; do # The server should delete the pid file. if [ ! -f $TARANTOOL_BOX_PID ]; then # tarantool successfully stopped return $SUCCESS fi sleep 0.01 done if [ -f $TARANTOOL_BOX_PID ]; then # The server haven't shutdowed. Probably it's hanged up, # sending SIGKILL to it. kill -KILL $pid 1> /dev/null 2>&1 fi return $SUCCESS } #------------------------------------------------------------------------------# # run test scrip body #------------------------------------------------------------------------------# # # initialize # echo "initialize suite ..." # initializing suite init_suite # initializing storage tarantool_init_storage echo "starting tarantool ..." # start tarantool tarantool_start # # run # printf "\n" printf "================================= PHP test ===============================\n" # running pear's regression test scrips PHPRC=$PHP_INI pear run-tests $1 printf "==========================================================================\n" printf "\n" # # stop & clean-up # echo "stopping tarantool ..." # stop tarantool tarantool_stop echo "cleaning up suite ..." # clean-up suite cleanup_suite # # Local variables: # tab-width: 4 # c-basic-offset: 4 # End: # vim600: noet sw=4 ts=4 fdm=marker # vim<600: noet sw=4 ts=4 # tarantool-php-1.1/test/share/0000775000000000000000000000000012323274624014731 5ustar rootroottarantool-php-1.1/test/share/php.ini0000664000000000000000000001107412323274624016224 0ustar rootroot[PHP] ;;;;;;;;;;;;;;;;;;;; ; Language Options ; ;;;;;;;;;;;;;;;;;;;; engine = On short_open_tag = On asp_tags = Off precision = 14 y2k_compliance = On output_buffering = 4096 zlib.output_compression = Off implicit_flush = Off unserialize_callback_func = serialize_precision = 17 allow_call_time_pass_reference = Off safe_mode = Off safe_mode_gid = Off safe_mode_include_dir = safe_mode_exec_dir = safe_mode_allowed_env_vars = PHP_ safe_mode_protected_env_vars = LD_LIBRARY_PATH disable_functions = disable_classes = ;;;;;;;;;;;;;;;;; ; Miscellaneous ; ;;;;;;;;;;;;;;;;; expose_php = On ;;;;;;;;;;;;;;;;;;; ; Resource Limits ; ;;;;;;;;;;;;;;;;;;; max_execution_time = 30 max_input_time = 60 memory_limit = -1 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; Error handling and logging ; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; error_reporting = E_ALL & ~E_DEPRECATED display_errors = Off display_startup_errors = Off log_errors = On log_errors_max_len = 1024 ignore_repeated_errors = Off ignore_repeated_source = Off report_memleaks = On track_errors = Off html_errors = Off variables_order = "GPCS" request_order = "GP" register_globals = Off register_long_arrays = Off register_argc_argv = Off auto_globals_jit = On post_max_size = 8M magic_quotes_gpc = Off magic_quotes_runtime = Off magic_quotes_sybase = Off auto_prepend_file = auto_append_file = default_mimetype = "text/html" ;;;;;;;;;;;;;;;;;;;;;;;;; ; Paths and Directories ; ;;;;;;;;;;;;;;;;;;;;;;;;; doc_root = user_dir = enable_dl = Off ;;;;;;;;;;;;;;;; ; File Uploads ; ;;;;;;;;;;;;;;;; file_uploads = On upload_max_filesize = 2M max_file_uploads = 20 ;;;;;;;;;;;;;;;;;; ; Fopen wrappers ; ;;;;;;;;;;;;;;;;;; allow_url_fopen = On allow_url_include = Off default_socket_timeout = 60 ;;;;;;;;;;;;;;;;;;;;;; ; Dynamic Extensions ; ;;;;;;;;;;;;;;;;;;;;;; extension=./tarantool.so ;;;;;;;;;;;;;;;;;;; ; Module Settings ; ;;;;;;;;;;;;;;;;;;; [Date] [filter] [iconv] [intl] [sqlite] [sqlite3] [Pcre] [Pdo] [Pdo_mysql] pdo_mysql.cache_size = 2000 pdo_mysql.default_socket= [Phar] [Syslog] define_syslog_variables = Off [mail function] SMTP = localhost smtp_port = 25 mail.add_x_header = On [SQL] sql.safe_mode = Off [ODBC] odbc.allow_persistent = On odbc.check_persistent = On odbc.max_persistent = -1 odbc.max_links = -1 odbc.defaultlrl = 4096 odbc.defaultbinmode = 1 [Interbase] ibase.allow_persistent = 1 ibase.max_persistent = -1 ibase.max_links = -1 ibase.timestampformat = "%Y-%m-%d %H:%M:%S" ibase.dateformat = "%Y-%m-%d" ibase.timeformat = "%H:%M:%S" [MySQL] mysql.allow_local_infile = On mysql.allow_persistent = On mysql.cache_size = 2000 mysql.max_persistent = -1 mysql.max_links = -1 mysql.default_port = mysql.default_socket = mysql.default_host = mysql.default_user = mysql.default_password = mysql.connect_timeout = 60 mysql.trace_mode = Off [MySQLi] mysqli.max_persistent = -1 mysqli.allow_persistent = On mysqli.max_links = -1 mysqli.cache_size = 2000 mysqli.default_port = 3306 mysqli.default_socket = mysqli.default_host = mysqli.default_user = mysqli.default_pw = mysqli.reconnect = Off [mysqlnd] mysqlnd.collect_statistics = On mysqlnd.collect_memory_statistics = Off [OCI8] [PostgresSQL] pgsql.allow_persistent = On pgsql.auto_reset_persistent = Off pgsql.max_persistent = -1 pgsql.max_links = -1 pgsql.ignore_notice = 0 pgsql.log_notice = 0 [Sybase-CT] sybct.allow_persistent = On sybct.max_persistent = -1 sybct.max_links = -1 sybct.min_server_severity = 10 sybct.min_client_severity = 10 [bcmath] bcmath.scale = 0 [browscap] [Session] session.save_handler = files session.use_cookies = 1 session.use_only_cookies = 1 session.name = PHPSESSID session.auto_start = 0 session.cookie_lifetime = 0 session.cookie_path = / session.cookie_domain = session.cookie_httponly = session.serialize_handler = php session.gc_probability = 0 session.gc_divisor = 1000 session.gc_maxlifetime = 1440 session.bug_compat_42 = Off session.bug_compat_warn = Off session.referer_check = session.entropy_length = 0 session.cache_limiter = nocache session.cache_expire = 180 session.use_trans_sid = 0 session.hash_function = 0 session.hash_bits_per_character = 5 url_rewriter.tags = "a=href,area=href,frame=src,input=src,form=fakeentry" [MSSQL] mssql.allow_persistent = On mssql.max_persistent = -1 mssql.max_links = -1 mssql.min_error_severity = 10 mssql.min_message_severity = 10 mssql.compatability_mode = Off mssql.secure_connection = Off [Assertion] [COM] [mbstring] [gd] [exif] [Tidy] tidy.clean_output = Off [soap] soap.wsdl_cache_enabled=1 soap.wsdl_cache_dir="/tmp" soap.wsdl_cache_ttl=86400 soap.wsdl_cache_limit = 5 [sysvshm] [ldap] ldap.max_links = -1 [mcrypt] [dba] tarantool-php-1.1/test/share/tarantool_box.cfg0000664000000000000000000000246512323274624020274 0ustar rootroot# # Tratool test configuration file # # Limit of memory used to store tuples to 100MB slab_alloc_arena = 0.1 # Tarantool executable directory work_dir = "var" # Store the pid in this file. Relative to startup dir. pid_file = "tarantool_box.pid" # Snapshot directory (where snapshots get saved/read) snap_dir="." # WAL directory (where WALs get saved/read) wal_dir="." # Pipe the logs into the following process. logger="cat - >> tarantool_box.log" # Read only and read-write port. primary_port = 33013 # Read-only port. secondary_port = 33014 # The port for administrative commands. admin_port = 33015 # Log level log_level = 4 # Each write ahead log contains this many rows. # When the limit is reached, Tarantool closes # the WAL and starts a new one. rows_per_wal = 5000000 # Define a simple space with 1 HASH-based # primary key. space[0].enabled = 1 space[0].index[0].type = "HASH" space[0].index[0].unique = 1 space[0].index[0].key_field[0].fieldno = 0 space[0].index[0].key_field[0].type = "NUM" space[0].index[1].type = "TREE" space[0].index[1].unique = 0 space[0].index[1].key_field[0].fieldno = 1 space[0].index[1].key_field[0].type = "STR" space[1].enabled = 1 space[1].index[0].type = "HASH" space[1].index[0].unique = 1 space[1].index[0].key_field[0].fieldno = 0 space[1].index[0].key_field[0].type = "STR" tarantool-php-1.1/test/share/init.lua0000664000000000000000000000620612323274624016403 0ustar rootrootlocal bit = require("bit") local table = require("table") local string = require("string") local floor = require("math").floor local function s_to_a(data) local a = {} local bytes = {string.byte(data, i, #data)} for i = 1, #data / 8 do a[i] = 0 for c = 0, 7 do a[i] = bit.lshift(a[i], 8) a[i] = a[i] + bytes[i * 8 - c] end end return a end local function a_to_s(a) local bytes = {} local shift = {} for i = 1, #a do val = a[i] for c = 0, 7 do table.insert(bytes, bit.band(val, 0xff)) val = bit.rshift(val, 8) end end return string.char(unpack(bytes)) end local max_limit = 500 local function amerge(a, b) local r = {} local n = max_limit while #a > 0 and #b > 0 and n > 0 do if a[1] > b[1] then table.insert(r, table.remove(a, 1)) else table.insert(r, table.remove(b, 1)) end n = n - 1 end while #a > 0 and n > 0 do table.insert(r, table.remove(a, 1)) n = n - 1 end while #b > 0 and n > 0 do table.insert(r, table.remove(b, 1)) n = n - 1 end return r end local function afind_ge(a, x) if #a == 0 then return 1 elseif a[1] < x then return 1 elseif a[#a] > x then return #a + 1 end local first, last = 1, #a + 1 local mid while first < last do mid = floor(first + (last - first) / 2) if x >= a[mid] then last = mid else first = mid + 1 end end return last end local function ains(a, key) key = tonumber(key) local i = afind_ge(a, key) if a[i] and a[i] >= key then table.insert(a, i + 1, key) -- next to equal or greater else table.insert(a, i, key) end while #a > max_limit do table.remove(a) end end local function adel(a, key) key = tonumber(key) local i = afind_ge(a, key) print("key = ", key) print("i = ", i) if a[i] == key then table.remove(a, i) end end local function get(space, key) local tuple = box.select(space, 0, key) if tuple then return s_to_a(tuple[1]) else return {} end end local function store(space, key, a) box.replace(space, key, a_to_s(a)) return key, a end function box.sa_insert(space, key, value) local a = get(space, key) ains(a, value) print(unpack(a)) return store(space, key, a) end function box.sa_delete(space, key, ...) local a = get(space, key) for i = 1, #a do print("a[", i, "] = ", a[i]) end for i, d in pairs({...}) do adel(a, d) end return store(space, key, a) end function box.sa_select(space, key, from, limit) local a = get(space, key) if from ~= nil then from = tonumber(from) index = afind_ge(a, from) if a[index] == from then index = index + 1 end else index = 1 end if limit ~= nil then limit = tonumber(limit) else limit = max_limit end local r = {} for i = index, #a do if a[i] == nil then break end table.insert(r, a[i]) limit = limit - 1 if limit == 0 then break end end return key, r end function box.sa_merge(space, key_a, key_b) local a = get(space, key_a) local b = get(space, key_b) local r = amerge(a, b) return r end tarantool-php-1.1/test/call.phpt0000664000000000000000000003552412323274624015450 0ustar rootroot--TEST-- Tarantool call commands test --FILE-- ===DONE=== --EXPECT-- ---------- test begin ---------- test call: myselect by primary index result: array(2) { ["count"]=> int(1) ["tuples_list"]=> array(1) { [0]=> array(6) { [0]=> int(2) [1]=> string(9) "Star Wars" [2]=> int(1983) [3]=> string(18) "Return of the Jedi" [4]=> string(460) "Luke Skywalker has returned to his home planet of Tatooine in an attempt to rescue his friend Han Solo from the clutches of the vile gangster Jabba the Hutt. Little does Luke know that the GALACTIC EMPIRE has secretly begun construction on a new armored space station even more powerful than the first dreaded Death Star. When completed, this ultimate weapon will spell certain doom for the small band of rebels struggling to restore freedom to the galaxy..." [5]=> int(265041340203011) } } } ----------- test end ----------- ---------- test begin ---------- test call: call undefined function (expected error exception) Exception: call failed: 12802(0x00003202): Procedure 'fafagaga' is not defined ----------- test end ----------- ---------- test begin ---------- test call: sa_insert to key_1 sa_insert('1', 'key_1', '10') result: array(2) { ["count"]=> int(2) ["tuples_list"]=> array(2) { [0]=> array(1) { [0]=> string(5) "key_1" } [1]=> array(1) { [0]=> int(10) } } } sa_insert('1', 'key_1', '11') result: array(2) { ["count"]=> int(2) ["tuples_list"]=> array(2) { [0]=> array(1) { [0]=> string(5) "key_1" } [1]=> array(2) { [0]=> int(11) [1]=> int(10) } } } sa_insert('1', 'key_1', '15') result: array(2) { ["count"]=> int(2) ["tuples_list"]=> array(2) { [0]=> array(1) { [0]=> string(5) "key_1" } [1]=> array(3) { [0]=> int(15) [1]=> int(11) [2]=> int(10) } } } sa_insert('1', 'key_1', '101') result: array(2) { ["count"]=> int(2) ["tuples_list"]=> array(2) { [0]=> array(1) { [0]=> string(5) "key_1" } [1]=> array(4) { [0]=> int(101) [1]=> int(15) [2]=> int(11) [3]=> int(10) } } } sa_insert('1', 'key_1', '511') result: array(2) { ["count"]=> int(2) ["tuples_list"]=> array(2) { [0]=> array(1) { [0]=> string(5) "key_1" } [1]=> array(5) { [0]=> int(511) [1]=> int(101) [2]=> int(15) [3]=> int(11) [4]=> int(10) } } } sa_insert('1', 'key_1', '16') result: array(2) { ["count"]=> int(2) ["tuples_list"]=> array(2) { [0]=> array(1) { [0]=> string(5) "key_1" } [1]=> array(6) { [0]=> int(511) [1]=> int(101) [2]=> int(16) [3]=> int(15) [4]=> int(11) [5]=> int(10) } } } sa_insert('1', 'key_1', '42') result: array(2) { ["count"]=> int(2) ["tuples_list"]=> array(2) { [0]=> array(1) { [0]=> string(5) "key_1" } [1]=> array(7) { [0]=> int(511) [1]=> int(101) [2]=> int(42) [3]=> int(16) [4]=> int(15) [5]=> int(11) [6]=> int(10) } } } ----------- test end ----------- ---------- test begin ---------- test call: sa_select from key_1 sa_select('1', 'key_1', '101', '3') result: array(2) { ["count"]=> int(2) ["tuples_list"]=> array(2) { [0]=> array(1) { [0]=> string(5) "key_1" } [1]=> array(3) { [0]=> int(42) [1]=> int(16) [2]=> int(15) } } } sa_select('1', 'key_1', '101', '2') result: array(2) { ["count"]=> int(2) ["tuples_list"]=> array(2) { [0]=> array(1) { [0]=> string(5) "key_1" } [1]=> array(2) { [0]=> int(42) [1]=> int(16) } } } sa_select('1', 'key_1', '511', '4') result: array(2) { ["count"]=> int(2) ["tuples_list"]=> array(2) { [0]=> array(1) { [0]=> string(5) "key_1" } [1]=> array(4) { [0]=> int(101) [1]=> int(42) [2]=> int(16) [3]=> int(15) } } } ----------- test end ----------- ---------- test begin ---------- test call: sa_delete from key_1 sa_delete('1', 'key_1', '11', '101', '511') result: array(2) { ["count"]=> int(2) ["tuples_list"]=> array(2) { [0]=> array(1) { [0]=> string(5) "key_1" } [1]=> array(4) { [0]=> int(42) [1]=> int(16) [2]=> int(15) [3]=> int(10) } } } ----------- test end ----------- ---------- test begin ---------- test call: sa_select from key_1 sa_select('1', 'key_1', '101', '3') result: array(2) { ["count"]=> int(2) ["tuples_list"]=> array(2) { [0]=> array(1) { [0]=> string(5) "key_1" } [1]=> array(3) { [0]=> int(42) [1]=> int(16) [2]=> int(15) } } } sa_select('1', 'key_1', '101', '2') result: array(2) { ["count"]=> int(2) ["tuples_list"]=> array(2) { [0]=> array(1) { [0]=> string(5) "key_1" } [1]=> array(2) { [0]=> int(42) [1]=> int(16) } } } sa_select('1', 'key_1', '511', '4') result: array(2) { ["count"]=> int(2) ["tuples_list"]=> array(2) { [0]=> array(1) { [0]=> string(5) "key_1" } [1]=> array(4) { [0]=> int(42) [1]=> int(16) [2]=> int(15) [3]=> int(10) } } } ----------- test end ----------- ---------- test begin ---------- test call: sa_insert to key_2 sa_insert('1', 'key_2', '10') result: array(2) { ["count"]=> int(2) ["tuples_list"]=> array(2) { [0]=> array(1) { [0]=> string(5) "key_2" } [1]=> array(1) { [0]=> int(10) } } } sa_insert('1', 'key_2', '8') result: array(2) { ["count"]=> int(2) ["tuples_list"]=> array(2) { [0]=> array(1) { [0]=> string(5) "key_2" } [1]=> array(2) { [0]=> int(10) [1]=> int(8) } } } sa_insert('1', 'key_2', '500') result: array(2) { ["count"]=> int(2) ["tuples_list"]=> array(2) { [0]=> array(1) { [0]=> string(5) "key_2" } [1]=> array(3) { [0]=> int(500) [1]=> int(10) [2]=> int(8) } } } sa_insert('1', 'key_2', '166') result: array(2) { ["count"]=> int(2) ["tuples_list"]=> array(2) { [0]=> array(1) { [0]=> string(5) "key_2" } [1]=> array(4) { [0]=> int(500) [1]=> int(166) [2]=> int(10) [3]=> int(8) } } } sa_insert('1', 'key_2', '233') result: array(2) { ["count"]=> int(2) ["tuples_list"]=> array(2) { [0]=> array(1) { [0]=> string(5) "key_2" } [1]=> array(5) { [0]=> int(500) [1]=> int(233) [2]=> int(166) [3]=> int(10) [4]=> int(8) } } } sa_insert('1', 'key_2', '357') result: array(2) { ["count"]=> int(2) ["tuples_list"]=> array(2) { [0]=> array(1) { [0]=> string(5) "key_2" } [1]=> array(6) { [0]=> int(500) [1]=> int(357) [2]=> int(233) [3]=> int(166) [4]=> int(10) [5]=> int(8) } } } ----------- test end ----------- ---------- test begin ---------- test call: sa_select from key_2 sa_select('1', 'key_2', '500', '100') result: array(2) { ["count"]=> int(2) ["tuples_list"]=> array(2) { [0]=> array(1) { [0]=> string(5) "key_2" } [1]=> array(5) { [0]=> int(357) [1]=> int(233) [2]=> int(166) [3]=> int(10) [4]=> int(8) } } } sa_select('1', 'key_2', '18', '15') result: array(2) { ["count"]=> int(2) ["tuples_list"]=> array(2) { [0]=> array(1) { [0]=> string(5) "key_2" } [1]=> array(2) { [0]=> int(10) [1]=> int(8) } } } sa_select('1', 'key_2', '18', '1') result: array(2) { ["count"]=> int(2) ["tuples_list"]=> array(2) { [0]=> array(1) { [0]=> string(5) "key_2" } [1]=> array(1) { [0]=> int(10) } } } ----------- test end ----------- ---------- test begin ---------- test call: sa_merge key_1 and key_2 sa_merge('1', 'key_1', 'key_2') result: array(2) { ["count"]=> int(1) ["tuples_list"]=> array(1) { [0]=> array(10) { [0]=> int(500) [1]=> int(357) [2]=> int(233) [3]=> int(166) [4]=> int(42) [5]=> int(16) [6]=> int(15) [7]=> int(10) [8]=> int(10) [9]=> int(8) } } } ----------- test end ----------- ---------- test begin ---------- test call: sa_delete from key_1 sa_delete('1', 'key_1', '42') result: array(2) { ["count"]=> int(2) ["tuples_list"]=> array(2) { [0]=> array(1) { [0]=> string(5) "key_1" } [1]=> array(3) { [0]=> int(16) [1]=> int(15) [2]=> int(10) } } } sa_delete('1', 'key_1', '16') result: array(2) { ["count"]=> int(2) ["tuples_list"]=> array(2) { [0]=> array(1) { [0]=> string(5) "key_1" } [1]=> array(2) { [0]=> int(15) [1]=> int(10) } } } sa_delete('1', 'key_1', '10') result: array(2) { ["count"]=> int(2) ["tuples_list"]=> array(2) { [0]=> array(1) { [0]=> string(5) "key_1" } [1]=> array(1) { [0]=> int(15) } } } sa_delete('1', 'key_1', '15') result: array(2) { ["count"]=> int(2) ["tuples_list"]=> array(2) { [0]=> array(1) { [0]=> string(5) "key_1" } [1]=> array(0) { } } } ----------- test end ----------- ===DONE=== tarantool-php-1.1/test/insert.phpt0000664000000000000000000001177712323274624016045 0ustar rootroot--TEST-- Tarantool insert command test --FILE-- ===DONE=== --EXPECT-- ---------- test begin ---------- test insert: invalid tuple (expected error exception) Exception: unsupported field type ----------- test end ----------- ---------- test begin ---------- test insert: invalid tuple (expected error exception) Exception: unsupported field type ----------- test end ----------- ---------- test begin ---------- test insert: assign tupleresult: count = 1 tuple: id = 0 series = Star Wars year = 1977 name = A New Hope crawl = A long time ago, in a galaxy far, far away... It is a period of civil war. Rebel spaceships, striking from a hidden base, have won their first victory against the evil Galactic Empire. During the battle, Rebel spies managed to steal secret plans to the Empire's ultimate weapon, the Death Star, an armored space station with enough power to destroy an entire planet. Pursued by the Empire's sinister agents, Princess Leia races home aboard her starship, custodian of the stolen plans that can save her people and restore freedom to the galaxy.... uuid = 0xf10dbeef0001 ----------- test end ----------- ---------- test begin ---------- test insert: assign tuple (tuple doesn't return) result: count = 1 ----------- test end ----------- ---------- test begin ---------- test insert: add existed tuple (expected error exception) Exception: insert failed: 14082(0x00003702): Duplicate key exists in unique index 0 ----------- test end ----------- ---------- test begin ---------- test insert: replace not existed tuple (expected error exception) Exception: insert failed: 12546(0x00003102): Tuple doesn't exist in index 0 ----------- test end ----------- ---------- test begin ---------- test insert: add not existed tuple result: count = 1 tuple: id = 1 series = Star Wars year = 1980 name = The Empire Strikes Back crawl = It is a dark time for the Rebellion. Although the Death Star has been destroyed. Imperial troops have driven the Rebel forces from their hidden base and pursued them across the galaxy. Evading the dreaded Imperial Starfleet, a group of freedom fighters led by Luke Skywalker have established a new secret base on the remote ice world of Hoth. The evil lord Darth Vader, obsessed with finding young Skywalker, has dispatched thousands of remote probes into the far reaches of space.... uuid = 0xf10dbeef0002 ----------- test end ----------- ---------- test begin ---------- test insert: replace existed tuple result: count = 1 tuple: id = 1 series = Star Wars year = 1980 name = The Empire Strikes Back crawl = It is a dark time for the Rebellion. Although the Death Star has been destroyed. Imperial troops have driven the Rebel forces from their hidden base and pursued them across the galaxy. Evading the dreaded Imperial Starfleet, a group of freedom fighters led by Luke Skywalker have established a new secret base on the remote ice world of Hoth. The evil lord Darth Vader, obsessed with finding young Skywalker, has dispatched thousands of remote probes into the far reaches of space.... uuid = 0xf10dbeef0002 ----------- test end ----------- ===DONE=== tarantool-php-1.1/test/admin.phpt0000664000000000000000000000427712323274624015626 0ustar rootroot--TEST-- Tarantool administation commands test --FILE-- admin("help"); echo "----------- test end -----------\n\n"; echo "---------- test begin ----------\n"; echo "insert\n"; for ($i = 0; $i < 10; ++$i) echo $tarantool->admin("lua box.insert(0, $i, 'test_uid$i', 'test field #$i')"); echo "----------- test end -----------\n\n"; echo "---------- test begin ----------\n"; echo "select\n"; echo $tarantool->admin("lua box.select(0, 1, 'test_uid$i')"); echo "----------- test end -----------\n\n"; echo "---------- test begin ----------\n"; echo "delete\n"; for ($i = 0; $i < 10; ++$i) echo $tarantool->admin("lua box.delete(0, $i)"); echo "----------- test end -----------\n\n"; ?> ===DONE=== --EXPECT-- ---------- test begin ---------- help available commands: - help - exit - show info - show fiber - show configuration - show slab - show palloc - show stat - show plugins - save coredump - save snapshot - lua command - reload configuration - show injections (debug mode only) - set injection (debug mode only) ----------- test end ----------- ---------- test begin ---------- insert - 0: {'test_uid0', 'test field #0'} - 1: {'test_uid1', 'test field #1'} - 2: {'test_uid2', 'test field #2'} - 3: {'test_uid3', 'test field #3'} - 4: {'test_uid4', 'test field #4'} - 5: {'test_uid5', 'test field #5'} - 6: {'test_uid6', 'test field #6'} - 7: {'test_uid7', 'test field #7'} - 8: {'test_uid8', 'test field #8'} - 9: {'test_uid9', 'test field #9'} ----------- test end ----------- ---------- test begin ---------- select ----------- test end ----------- ---------- test begin ---------- delete - 0: {'test_uid0', 'test field #0'} - 1: {'test_uid1', 'test field #1'} - 2: {'test_uid2', 'test field #2'} - 3: {'test_uid3', 'test field #3'} - 4: {'test_uid4', 'test field #4'} - 5: {'test_uid5', 'test field #5'} - 6: {'test_uid6', 'test field #6'} - 7: {'test_uid7', 'test field #7'} - 8: {'test_uid8', 'test field #8'} - 9: {'test_uid9', 'test field #9'} ----------- test end ----------- ===DONE=== tarantool-php-1.1/test/errors.phpt0000664000000000000000000000116212323274624016040 0ustar rootroot--TEST-- Tarantool error commands test --FILE-- getMessage(), "\n"; } try { $tarantool = new Tarantool("localhost", 33013, 65537); echo "error: the exception didn't raise\n"; } catch (Exception $e) { echo "catched exception: ", $e->getMessage(), "\n"; } ?> ===DONE=== --EXPECT-- catched exception: invalid primary port value: -33013 catched exception: invalid admin port value: 65537 ===DONE=== tarantool-php-1.1/test/lib/0000775000000000000000000000000012323274624014375 5ustar rootroottarantool-php-1.1/test/lib/TarantoolUTest.php0000664000000000000000000001535712323274624020051 0ustar rootrootinsert($space_no, $sw4); $tarantool->insert($space_no, $sw5); $tarantool->insert($space_no, $sw6); } catch (Exception $e) { echo "init failed: ", $e->getMessage(), "\n"; throw $e; } } function test_clean($tarantool, $space_no) { try { $tarantool->delete($space_no, 0); $tarantool->delete($space_no, 1); $tarantool->delete($space_no, 2); } catch (Exception $e) { echo "clean-up failed: ", $e->getMessage(), "\n"; throw $e; } } function test_select($tarantool, $space_no, $index_no, $key) { try { $result = $tarantool->select($space_no, $index_no, $key); echo "result:\n"; echo "count = ", $result["count"], "\n"; $tuples_list = $result["tuples_list"]; sort($tuples_list); for ($i = 0; $i < $result["count"]; $i++) { echo "tuple[", $i, "]:", "\n"; echo " id = ", $tuples_list[$i][0], "\n"; echo " series = ", $tuples_list[$i][1], "\n"; echo " year = ", $tuples_list[$i][2], "\n"; echo " name = ", $tuples_list[$i][3], "\n"; echo " crawl = ", $tuples_list[$i][4], "\n"; echo " uuid = 0x", dechex($tuples_list[$i][5]), "\n"; } } catch (Exception $e) { echo "Exception: ", $e->getMessage(), "\n"; } } function test_insert($tarantool, $space_no, $tuple, $flags) { try { $result = $tarantool->insert($space_no, $tuple, $flags); echo "result:\n"; echo "count = ", $result["count"], "\n"; if (array_key_exists("tuple", $result)) { echo "tuple:", "\n"; echo " id = ", $result["tuple"][0], "\n"; echo " series = ", $result["tuple"][1], "\n"; echo " year = ", $result["tuple"][2], "\n"; echo " name = ", $result["tuple"][3], "\n"; echo " crawl = ", $result["tuple"][4], "\n"; echo " uuid = 0x", dechex($result["tuple"][5]), "\n"; } } catch (Exception $e) { echo "Exception: ", $e->getMessage(), "\n"; } } function test_update_fields($tarantool, $space_no, $key, $ops, $flags) { try { $result = $tarantool->update_fields($space_no, $key, $ops, $flags); echo "result:\n"; echo "count = ", $result["count"], "\n"; if (array_key_exists("tuple", $result)) { echo "tuple:", "\n"; echo " id = ", $result["tuple"][0], "\n"; echo " series = ", $result["tuple"][1], "\n"; echo " year = ", $result["tuple"][2], "\n"; echo " name = ", $result["tuple"][3], "\n"; echo " crawl = ", $result["tuple"][4], "\n"; echo " uuid = 0x", dechex($result["tuple"][5]), "\n"; } } catch (Exception $e) { echo "Exception: ", $e->getMessage(), "\n"; } } function test_delete($tarantool, $space_no, $key, $flags) { try { $result = $tarantool->delete($space_no, $key, $flags); echo "result:\n"; echo "count = ", $result["count"], "\n"; if (array_key_exists("tuple", $result)) { echo "tuple:", "\n"; echo " id = ", $result["tuple"][0], "\n"; echo " series = ", $result["tuple"][1], "\n"; echo " year = ", $result["tuple"][2], "\n"; echo " name = ", $result["tuple"][3], "\n"; echo " crawl = ", $result["tuple"][4], "\n"; echo " uuid = 0x", dechex($result["tuple"][5]), "\n"; } } catch (Exception $e) { echo "Exception: ", $e->getMessage(), "\n"; } } function test_call($tarantool, $proc, $tuple_args, $flags) { try { $result = $tarantool->call($proc, $tuple_args, $flags); echo "result:\n"; var_dump($result); } catch (Exception $e) { echo "Exception: ", $e->getMessage(), "\n"; } } ?>