X-Git-Url: https://git.m6w6.name/?p=m6w6%2Fext-pq;a=blobdiff_plain;f=src%2Fphp_pq.c;h=eb9bac1e5a344182a6d64acb5d18eec25413b383;hp=24230abd3fc0e3c083a97d320f9812b307824882;hb=7f802ff71998282994dbfd9af51c08bb5d6dccdc;hpb=d6a052266a143dc7a07c1addd138535c3ad4fe1d diff --git a/src/php_pq.c b/src/php_pq.c index 24230ab..eb9bac1 100644 --- a/src/php_pq.c +++ b/src/php_pq.c @@ -1,23 +1,15 @@ /* - +----------------------------------------------------------------------+ - | PHP Version 5 | - +----------------------------------------------------------------------+ - | Copyright (c) 1997-2012 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: | - +----------------------------------------------------------------------+ + +--------------------------------------------------------------------+ + | PECL :: pq | + +--------------------------------------------------------------------+ + | Redistribution and use in source and binary forms, with or without | + | modification, are permitted provided that the conditions mentioned | + | in the accompanying LICENSE file are met. | + +--------------------------------------------------------------------+ + | Copyright (c) 2013, Michael Wallner | + +--------------------------------------------------------------------+ */ -/* $Id$ */ - #ifdef HAVE_CONFIG_H # include "config.h" #endif @@ -90,11 +82,17 @@ static zend_object_handlers php_pqconn_object_handlers; static zend_object_handlers php_pqres_object_handlers; static zend_object_handlers php_pqstm_object_handlers; +typedef struct php_pqconn_listener { + zend_fcall_info fci; + zend_fcall_info_cache fcc; +} php_pqconn_listener_t; + typedef struct php_pqconn_object { zend_object zo; PGconn *conn; int (*poller)(PGconn *); - unsigned blocking:1; + HashTable listeners; + unsigned async:1; } php_pqconn_object_t; typedef enum php_pqres_fetch { @@ -116,11 +114,6 @@ typedef struct php_pqres_object { php_pqres_iterator_t *iter; } php_pqres_object_t; -typedef struct php_pqstm_intern { - char *name; - zval *conn; -} php_pqstm_intern_t; - typedef struct php_pqstm_object { zend_object zo; char *name; @@ -293,6 +286,7 @@ static void php_pqconn_object_free(void *o TSRMLS_DC) PQfinish(obj->conn); obj->conn = NULL; } + zend_hash_destroy(&obj->listeners); zend_object_std_dtor((zend_object *) o TSRMLS_CC); efree(obj); } @@ -344,9 +338,11 @@ static zend_object_value php_pqconn_create_object_ex(zend_class_entry *ce, PGcon if (conn) { o->conn = conn; - o->blocking = !PQisnonblocking(o->conn); + o->async = !PQisnonblocking(o->conn); } + zend_hash_init(&o->listeners, 0, NULL, (dtor_func_t) zend_hash_destroy, 0); + ov.handle = zend_objects_store_put((zend_object *) o, NULL, php_pqconn_object_free, NULL TSRMLS_CC); ov.handlers = &php_pqconn_object_handlers; @@ -423,49 +419,82 @@ static HashTable php_pqconn_object_prophandlers; static HashTable php_pqres_object_prophandlers; static HashTable php_pqstm_object_prophandlers; -typedef void (*php_pq_object_prophandler_func_t)(void *o, zval *return_value TSRMLS_DC); +typedef void (*php_pq_object_prophandler_func_t)(zval *object, void *o, zval *return_value TSRMLS_DC); typedef struct php_pq_object_prophandler { php_pq_object_prophandler_func_t read; php_pq_object_prophandler_func_t write; } php_pq_object_prophandler_t; -static void php_pqconn_object_read_status(void *o, zval *return_value TSRMLS_DC) +static void php_pqconn_object_read_status(zval *object, void *o, zval *return_value TSRMLS_DC) { php_pqconn_object_t *obj = o; RETVAL_LONG(PQstatus(obj->conn)); } -static void php_pqconn_object_read_transaction_status(void *o, zval *return_value TSRMLS_DC) +static void php_pqconn_object_read_transaction_status(zval *object, void *o, zval *return_value TSRMLS_DC) { php_pqconn_object_t *obj = o; RETVAL_LONG(PQtransactionStatus(obj->conn)); } -static void php_pqconn_object_read_socket(void *o, zval *return_value TSRMLS_DC) +static void php_pqconn_object_read_error_message(zval *object, void *o, zval *return_value TSRMLS_DC) { php_pqconn_object_t *obj = o; - php_stream *stream; - int socket = PQsocket(obj->conn); + char *error = PQerrorMessage(obj->conn); - if ((stream = php_stream_fopen_from_fd(socket, "r+b", NULL))) { - php_stream_to_zval(stream, return_value); + if (error) { + RETVAL_STRING(error, 1); } else { RETVAL_NULL(); } } -static void php_pqconn_object_read_error_message(void *o, zval *return_value TSRMLS_DC) +static int apply_notify_listener(void *p, void *arg TSRMLS_DC) { - php_pqconn_object_t *obj = o; - char *error = PQerrorMessage(obj->conn); + php_pqconn_listener_t *listener = p; + PGnotify *nfy = arg; + zval *zpid, *zchannel, *zmessage; - if (error) { - RETVAL_STRING(error, 1); - } else { - RETVAL_NULL(); + MAKE_STD_ZVAL(zpid); + ZVAL_LONG(zpid, nfy->be_pid); + MAKE_STD_ZVAL(zchannel); + ZVAL_STRING(zchannel, nfy->relname, 1); + MAKE_STD_ZVAL(zmessage); + ZVAL_STRING(zmessage, nfy->extra, 1); + + zend_fcall_info_argn(&listener->fci TSRMLS_CC, 3, &zchannel, &zmessage, &zpid); + zend_fcall_info_call(&listener->fci, &listener->fcc, NULL, NULL TSRMLS_CC); + + zval_ptr_dtor(&zchannel); + zval_ptr_dtor(&zmessage); + zval_ptr_dtor(&zpid); + + return ZEND_HASH_APPLY_KEEP; +} + +static int apply_notify_listeners(void *p, void *arg TSRMLS_DC) +{ + HashTable *listeners = p; + + zend_hash_apply_with_argument(listeners, apply_notify_listener, arg TSRMLS_CC); + + return ZEND_HASH_APPLY_KEEP; +} + +static void php_pqconn_notify_listeners(zval *this_ptr, php_pqconn_object_t *obj TSRMLS_DC) +{ + PGnotify *nfy; + + if (!obj) { + obj = zend_object_store_get_object(getThis() TSRMLS_CC); + } + + while ((nfy = PQnotifies(obj->conn))) { + zend_hash_apply_with_argument(&obj->listeners, apply_notify_listeners, nfy TSRMLS_CC); + PQfreemem(nfy); } } @@ -476,23 +505,36 @@ static void php_pqconn_object_read_error_message(void *o, zval *return_value TSR "where typisdefined " \ "and typrelid=0 " \ "and nspname in ('public', 'pg_catalog')" -static void php_pqconn_object_read_types(void *o, zval *return_value TSRMLS_DC) +static void php_pqconn_object_read_types(zval *object, void *o, zval *return_value TSRMLS_DC) { php_pqconn_object_t *obj = o; PGresult *res = PQexec(obj->conn, PHP_PQ_TYPES_QUERY); + php_pqconn_notify_listeners(object, obj TSRMLS_CC); + /* FIXME: cache that */ if (res) { if (PGRES_TUPLES_OK == PQresultStatus(res)) { int r, rows; + zval *byoid, *byname; + MAKE_STD_ZVAL(byoid); + MAKE_STD_ZVAL(byname); + object_init(byoid); + object_init(byname); object_init(return_value); for (r = 0, rows = PQntuples(res); r < rows; ++r) { zval *row = php_pqres_row_to_zval(res, r, PHP_PQRES_FETCH_OBJECT TSRMLS_CC); - add_property_zval(return_value, PQgetvalue(res, r, 1), row); + add_property_zval(byoid, PQgetvalue(res, r, 0), row); + add_property_zval(byname, PQgetvalue(res, r, 1), row); zval_ptr_dtor(&row); } + + add_property_zval(return_value, "byOid", byoid); + add_property_zval(return_value, "byName", byname); + zval_ptr_dtor(&byoid); + zval_ptr_dtor(&byname); } else { php_error_docref(NULL TSRMLS_CC, E_WARNING, "Could not fetch types: %s", PQresultErrorMessage(res)); } @@ -502,14 +544,14 @@ static void php_pqconn_object_read_types(void *o, zval *return_value TSRMLS_DC) } } -static void php_pqres_object_read_status(void *o, zval *return_value TSRMLS_DC) +static void php_pqres_object_read_status(zval *object, void *o, zval *return_value TSRMLS_DC) { php_pqres_object_t *obj = o; RETVAL_LONG(PQresultStatus(obj->res)); } -static void php_pqres_object_read_error_message(void *o, zval *return_value TSRMLS_DC) +static void php_pqres_object_read_error_message(zval *object, void *o, zval *return_value TSRMLS_DC) { php_pqres_object_t *obj = o; char *error = PQresultErrorMessage(obj->res); @@ -521,28 +563,28 @@ static void php_pqres_object_read_error_message(void *o, zval *return_value TSRM } } -static void php_pqres_object_read_num_rows(void *o, zval *return_value TSRMLS_DC) +static void php_pqres_object_read_num_rows(zval *object, void *o, zval *return_value TSRMLS_DC) { php_pqres_object_t *obj = o; RETVAL_LONG(PQntuples(obj->res)); } -static void php_pqres_object_read_num_cols(void *o, zval *return_value TSRMLS_DC) +static void php_pqres_object_read_num_cols(zval *object, void *o, zval *return_value TSRMLS_DC) { php_pqres_object_t *obj = o; RETVAL_LONG(PQnfields(obj->res)); } -static void php_pqres_object_read_affected_rows(void *o, zval *return_value TSRMLS_DC) +static void php_pqres_object_read_affected_rows(zval *object, void *o, zval *return_value TSRMLS_DC) { php_pqres_object_t *obj = o; RETVAL_LONG(atoi(PQcmdTuples(obj->res))); } -static void php_pqres_object_read_fetch_type(void *o, zval *return_value TSRMLS_DC) +static void php_pqres_object_read_fetch_type(zval *object, void *o, zval *return_value TSRMLS_DC) { php_pqres_object_t *obj = o; @@ -553,7 +595,7 @@ static void php_pqres_object_read_fetch_type(void *o, zval *return_value TSRMLS_ } } -static void php_pqres_object_write_fetch_type(void *o, zval *value TSRMLS_DC) +static void php_pqres_object_write_fetch_type(zval *object, void *o, zval *value TSRMLS_DC) { php_pqres_object_t *obj = o; zval *zfetch_type = value; @@ -569,14 +611,14 @@ static void php_pqres_object_write_fetch_type(void *o, zval *value TSRMLS_DC) } } -static void php_pqstm_object_read_name(void *o, zval *return_value TSRMLS_DC) +static void php_pqstm_object_read_name(zval *object, void *o, zval *return_value TSRMLS_DC) { php_pqstm_object_t *obj = o; RETVAL_STRING(obj->name, 1); } -static void php_pqstm_object_read_connection(void *o, zval *return_value TSRMLS_DC) +static void php_pqstm_object_read_connection(zval *object, void *o, zval *return_value TSRMLS_DC) { php_pqstm_object_t *obj = o; @@ -591,13 +633,13 @@ static zval *php_pqconn_object_read_prop(zval *object, zval *member, int type, c if (!obj->conn) { zend_error(E_WARNING, "Connection not initialized"); - } else if (SUCCESS == zend_hash_find(&php_pqconn_object_prophandlers, Z_STRVAL_P(member), Z_STRLEN_P(member)+1, (void *) &handler)) { + } else if ((SUCCESS == zend_hash_find(&php_pqconn_object_prophandlers, Z_STRVAL_P(member), Z_STRLEN_P(member)+1, (void *) &handler)) && handler->read) { if (type == BP_VAR_R) { ALLOC_ZVAL(return_value); Z_SET_REFCOUNT_P(return_value, 0); Z_UNSET_ISREF_P(return_value); - handler->read(obj, return_value TSRMLS_CC); + handler->read(object, obj, return_value TSRMLS_CC); } else { zend_error(E_ERROR, "Cannot access pq\\Connection properties by reference or array key/index"); return_value = NULL; @@ -616,7 +658,7 @@ static void php_pqconn_object_write_prop(zval *object, zval *member, zval *value if (SUCCESS == zend_hash_find(&php_pqconn_object_prophandlers, Z_STRVAL_P(member), Z_STRLEN_P(member)+1, (void *) &handler)) { if (handler->write) { - handler->write(obj, value TSRMLS_CC); + handler->write(object, obj, value TSRMLS_CC); } } else { zend_get_std_object_handlers()->write_property(object, member, value, key TSRMLS_CC); @@ -637,7 +679,7 @@ static zval *php_pqres_object_read_prop(zval *object, zval *member, int type, co Z_SET_REFCOUNT_P(return_value, 0); Z_UNSET_ISREF_P(return_value); - handler->read(obj, return_value TSRMLS_CC); + handler->read(object, obj, return_value TSRMLS_CC); } else { zend_error(E_ERROR, "Cannot access pq\\Result properties by reference or array key/index"); return_value = NULL; @@ -663,7 +705,7 @@ static void php_pqres_object_write_prop(zval *object, zval *member, zval *value, obj->iter = (php_pqres_iterator_t *) php_pqres_iterator_init(Z_OBJCE_P(object), object, 0 TSRMLS_CC); obj->iter->zi.funcs->rewind((zend_object_iterator *) obj->iter TSRMLS_CC); } - handler->write(obj, value TSRMLS_CC); + handler->write(object, obj, value TSRMLS_CC); } } else { zend_get_std_object_handlers()->write_property(object, member, value, key TSRMLS_CC); @@ -684,7 +726,7 @@ static zval *php_pqstm_object_read_prop(zval *object, zval *member, int type, co Z_SET_REFCOUNT_P(return_value, 0); Z_UNSET_ISREF_P(return_value); - handler->read(obj, return_value TSRMLS_CC); + handler->read(object, obj, return_value TSRMLS_CC); } else { zend_error(E_ERROR, "Cannot access pq\\Statement properties by reference or array key/index"); return_value = NULL; @@ -705,38 +747,68 @@ static void php_pqstm_object_write_prop(zval *object, zval *member, zval *value, zend_error(E_WARNING, "Result not initialized"); } else if (SUCCESS == zend_hash_find(&php_pqstm_object_prophandlers, Z_STRVAL_P(member), Z_STRLEN_P(member)+1, (void *) &handler)) { if (handler->write) { - handler->write(obj, value TSRMLS_CC); + handler->write(object, obj, value TSRMLS_CC); } } else { zend_get_std_object_handlers()->write_property(object, member, value, key TSRMLS_CC); } } +static STATUS php_pqconn_update_socket(zval *this_ptr, php_pqconn_object_t *obj TSRMLS_DC) +{ + zval *zsocket, zmember; + php_stream *stream; + STATUS retval; + int socket; + + if (!obj) { + obj = zend_object_store_get_object(getThis() TSRMLS_CC); + } + + INIT_PZVAL(&zmember); + ZVAL_STRINGL(&zmember, "socket", sizeof("socket")-1, 0); + MAKE_STD_ZVAL(zsocket); + + if ((CONNECTION_BAD != PQstatus(obj->conn)) + && (-1 < (socket = PQsocket(obj->conn))) + && (stream = php_stream_fopen_from_fd(socket, "r+b", NULL))) { + php_stream_to_zval(stream, zsocket); + retval = SUCCESS; + } else { + ZVAL_NULL(zsocket); + retval = FAILURE; + } + zend_get_std_object_handlers()->write_property(getThis(), &zmember, zsocket, NULL TSRMLS_CC); + zval_ptr_dtor(&zsocket); + + return retval; +} + ZEND_BEGIN_ARG_INFO_EX(ai_pqconn_construct, 0, 0, 1) ZEND_ARG_INFO(0, dsn) - ZEND_ARG_INFO(0, block) + ZEND_ARG_INFO(0, async) ZEND_END_ARG_INFO(); static PHP_METHOD(pqconn, __construct) { zend_error_handling zeh; char *dsn_str; int dsn_len; - zend_bool block = 1; + zend_bool async = 0; zend_replace_error_handling(EH_THROW, NULL, &zeh TSRMLS_CC); - if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s|b", &dsn_str, &dsn_len, &block)) { + if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s|b", &dsn_str, &dsn_len, &async)) { php_pqconn_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC); if (obj->conn) { PQfinish(obj->conn); } - if ((obj->blocking = block)) { - obj->conn = PQconnectdb(dsn_str); - } else { + if ((obj->async = async)) { obj->conn = PQconnectStart(dsn_str); obj->poller = (int (*)(PGconn*)) PQconnectPoll; + } else { + obj->conn = PQconnectdb(dsn_str); } - - if (CONNECTION_BAD == PQstatus(obj->conn)) { + + if (SUCCESS != php_pqconn_update_socket(getThis(), obj TSRMLS_CC)) { php_error_docref(NULL TSRMLS_CC, E_WARNING, "Connection failed: %s", PQerrorMessage(obj->conn)); } } @@ -750,12 +822,19 @@ static PHP_METHOD(pqconn, reset) { php_pqconn_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC); if (obj->conn) { - if (obj->blocking) { + if (obj->async) { + if (PQresetStart(obj->conn)) { + obj->poller = (int (*)(PGconn*)) PQresetPoll; + RETURN_TRUE; + } + } else { PQreset(obj->conn); - RETURN_TRUE; /* probably ;) */ - } if (PQresetStart(obj->conn)) { - obj->poller = (int (*)(PGconn*)) PQresetPoll; - RETURN_TRUE; + + if (CONNECTION_OK == PQstatus(obj->conn)) { + RETURN_TRUE; + } else { + php_error_docref(NULL TSRMLS_CC, E_WARNING, "Connection reset failed: %s", PQerrorMessage(obj->conn)); + } } } else { php_error_docref(NULL TSRMLS_CC, E_WARNING, "Connection not initialized"); @@ -764,6 +843,129 @@ static PHP_METHOD(pqconn, reset) { } } +static void listener_dtor(void *l) { + php_pqconn_listener_t *listener = l; + + zend_fcall_info_args_clear(&listener->fci, 1); + + zval_ptr_dtor(&listener->fci.function_name); + if (listener->fci.object_ptr) { + zval_ptr_dtor(&listener->fci.object_ptr); + } +} + +static void php_pqconn_add_listener(php_pqconn_object_t *obj, const char *channel_str, size_t channel_len, php_pqconn_listener_t *listener TSRMLS_DC) +{ + HashTable ht, *existing_listeners; + + Z_ADDREF_P(listener->fci.function_name); + if (listener->fci.object_ptr) { + Z_ADDREF_P(listener->fci.object_ptr); + } + if (SUCCESS == zend_hash_find(&obj->listeners, channel_str, channel_len + 1, (void *) &existing_listeners)) { + zend_hash_next_index_insert(existing_listeners, (void *) listener, sizeof(*listener), NULL); + } else { + zend_hash_init(&ht, 1, NULL, (dtor_func_t) listener_dtor, 0); + zend_hash_next_index_insert(&ht, (void *) listener, sizeof(*listener), NULL); + zend_hash_add(&obj->listeners, channel_str, channel_len + 1, (void *) &ht, sizeof(HashTable), NULL); + } +} + +static STATUS php_pqres_success(PGresult *res TSRMLS_DC) +{ + switch (PQresultStatus(res)) { + case PGRES_BAD_RESPONSE: + case PGRES_NONFATAL_ERROR: + case PGRES_FATAL_ERROR: + php_error_docref(NULL TSRMLS_CC, E_WARNING, "%s", PQresultErrorMessage(res)); + return FAILURE; + default: + return SUCCESS; + } +} + +ZEND_BEGIN_ARG_INFO_EX(ai_pqconn_listen, 0, 0, 0) + ZEND_ARG_INFO(0, channel) + ZEND_ARG_INFO(0, callable) +ZEND_END_ARG_INFO(); +static PHP_METHOD(pqconn, listen) { + char *channel_str = NULL; + int channel_len = 0; + php_pqconn_listener_t listener; + + if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "sf", &channel_str, &channel_len, &listener.fci, &listener.fcc)) { + php_pqconn_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC); + + obj->poller = PQconsumeInput; + + if (obj->conn) { + PGresult *res; + char cmd[1024]; + + slprintf(cmd, sizeof(cmd), "LISTEN %s", channel_str); + res = PQexec(obj->conn, cmd); + + if (res) { + if (SUCCESS == php_pqres_success(res TSRMLS_CC)) { + php_pqconn_add_listener(obj, channel_str, channel_len, &listener TSRMLS_CC); + RETVAL_TRUE; + } else { + RETVAL_FALSE; + } + PQclear(res); + } else { + php_error_docref(NULL TSRMLS_CC, E_WARNING, "Could not install listener: %s", PQerrorMessage(obj->conn)); + RETVAL_FALSE; + } + + php_pqconn_notify_listeners(getThis(), obj TSRMLS_CC); + + } else { + php_error_docref(NULL TSRMLS_CC, E_WARNING, "Connection not initialized"); + RETVAL_FALSE; + } + } + +} + +ZEND_BEGIN_ARG_INFO_EX(ai_pqconn_notify, 0, 0, 2) + ZEND_ARG_INFO(0, channel) + ZEND_ARG_INFO(0, message) +ZEND_END_ARG_INFO(); +static PHP_METHOD(pqconn, notify) { + char *channel_str, *message_str; + int channel_len, message_len; + + if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "ss", &channel_str, &channel_len, &message_str, &message_len)) { + php_pqconn_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC); + + if (obj->conn) { + PGresult *res; + char *params[2] = {channel_str, message_str}; + + res = PQexecParams(obj->conn, "select pg_notify($1, $2)", 2, NULL, (const char *const*) params, NULL, NULL, 0); + + if (res) { + if (SUCCESS == php_pqres_success(res TSRMLS_CC)) { + RETVAL_TRUE; + } else { + RETVAL_FALSE; + } + PQclear(res); + } else { + php_error_docref(NULL TSRMLS_CC, E_WARNING, "Could not notify listeners: %s", PQerrorMessage(obj->conn)); + RETVAL_FALSE; + } + + php_pqconn_notify_listeners(getThis(), obj TSRMLS_CC); + + } else { + php_error_docref(NULL TSRMLS_CC, E_WARNING, "Connection not initialized"); + RETVAL_FALSE; + } + } +} + ZEND_BEGIN_ARG_INFO_EX(ai_pqconn_poll, 0, 0, 0) ZEND_END_ARG_INFO(); static PHP_METHOD(pqconn, poll) { @@ -772,7 +974,12 @@ static PHP_METHOD(pqconn, poll) { if (obj->conn) { if (obj->poller) { - RETURN_LONG(obj->poller(obj->conn)); + if (obj->poller == PQconsumeInput) { + RETVAL_LONG(obj->poller(obj->conn) * PGRES_POLLING_OK); + php_pqconn_notify_listeners(getThis(), obj TSRMLS_CC); + } else { + RETURN_LONG(obj->poller(obj->conn)); + } } else { php_error_docref(NULL TSRMLS_CC, E_WARNING, "No asynchronous operation active"); } @@ -798,9 +1005,13 @@ static PHP_METHOD(pqconn, exec) { if (obj->conn) { PGresult *res = PQexec(obj->conn, query_str); + php_pqconn_notify_listeners(getThis(), obj TSRMLS_CC); + if (res) { - return_value->type = IS_OBJECT; - return_value->value.obj = php_pqres_create_object_ex(php_pqres_class_entry, res, NULL TSRMLS_CC); + if (SUCCESS == php_pqres_success(res TSRMLS_CC)) { + return_value->type = IS_OBJECT; + return_value->value.obj = php_pqres_create_object_ex(php_pqres_class_entry, res, NULL TSRMLS_CC); + } } else { php_error_docref(NULL TSRMLS_CC, E_WARNING, "Could not execute query: %s", PQerrorMessage(obj->conn)); } @@ -894,7 +1105,7 @@ static PHP_METHOD(pqconn, execParams) { zend_hash_apply_with_arguments(Z_ARRVAL_P(zparams) TSRMLS_CC, apply_to_param, 2, &tmp, &zdtor); } - res = PQexecParams(obj->conn, query_str, count, types, params, NULL, NULL, 0); + res = PQexecParams(obj->conn, query_str, count, types, (const char *const*) params, NULL, NULL, 0); zend_hash_destroy(&zdtor); if (types) { @@ -904,9 +1115,13 @@ static PHP_METHOD(pqconn, execParams) { efree(params); } + php_pqconn_notify_listeners(getThis(), obj TSRMLS_CC); + if (res) { - return_value->type = IS_OBJECT; - return_value->value.obj = php_pqres_create_object_ex(php_pqres_class_entry, res, NULL TSRMLS_CC); + if (SUCCESS == php_pqres_success(res TSRMLS_CC)) { + return_value->type = IS_OBJECT; + return_value->value.obj = php_pqres_create_object_ex(php_pqres_class_entry, res, NULL TSRMLS_CC); + } } else { php_error_docref(NULL TSRMLS_CC, E_WARNING, "Could not execute query: %s", PQerrorMessage(obj->conn)); } @@ -982,6 +1197,8 @@ static zend_function_entry php_pqconn_methods[] = { PHP_ME(pqconn, exec, ai_pqconn_exec, ZEND_ACC_PUBLIC) PHP_ME(pqconn, execParams, ai_pqconn_exec_params, ZEND_ACC_PUBLIC) PHP_ME(pqconn, prepare, ai_pqconn_prepare, ZEND_ACC_PUBLIC) + PHP_ME(pqconn, listen, ai_pqconn_listen, ZEND_ACC_PUBLIC) + PHP_ME(pqconn, notify, ai_pqconn_notify, ZEND_ACC_PUBLIC) {0} }; @@ -1009,7 +1226,7 @@ static zval **php_pqres_iteration(zval *this_ptr, php_pqres_object_t *obj, php_p return row ? row : NULL; } -ZEND_BEGIN_ARG_INFO_EX(ai_pqres_fetch, 0, 0, 0) +ZEND_BEGIN_ARG_INFO_EX(ai_pqres_fetch_row, 0, 0, 0) ZEND_ARG_INFO(0, fetch_type) ZEND_END_ARG_INFO(); static PHP_METHOD(pqres, fetchRow) { @@ -1030,8 +1247,55 @@ static PHP_METHOD(pqres, fetchRow) { zend_restore_error_handling(&zeh TSRMLS_CC); } +static zval **column_at(zval *row, int col TSRMLS_DC) +{ + zval **data = NULL; + HashTable *ht = HASH_OF(row); + int count = zend_hash_num_elements(ht); + + if (col < count) { + zend_hash_internal_pointer_reset(ht); + while (col-- > 0) { + zend_hash_move_forward(ht); + } + zend_hash_get_current_data(ht, (void *) &data); + } else { + php_error_docref(NULL TSRMLS_CC, E_WARNING, "Column index %d does excess column count %d", col, count); + } + return data; +} + +ZEND_BEGIN_ARG_INFO_EX(ai_pqres_fetch_col, 0, 0, 0) + ZEND_ARG_INFO(0, col_num) +ZEND_END_ARG_INFO(); +static PHP_METHOD(pqres, fetchCol) { + zend_error_handling zeh; + long fetch_col = 0; + + zend_replace_error_handling(EH_THROW, NULL, &zeh TSRMLS_CC); + if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|l", &fetch_col)) { + php_pqres_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC); + zval **row = php_pqres_iteration(getThis(), obj, obj->iter ? obj->iter->fetch_type : 0 TSRMLS_CC); + + if (row) { + zval **col = column_at(*row, fetch_col TSRMLS_CC); + + if (col) { + RETVAL_ZVAL(*col, 1, 0); + } else { + RETVAL_FALSE; + } + } else { + RETVAL_FALSE; + } + } + zend_restore_error_handling(&zeh TSRMLS_CC); + +} + static zend_function_entry php_pqres_methods[] = { - PHP_ME(pqres, fetchRow, ai_pqres_fetch, ZEND_ACC_PUBLIC) + PHP_ME(pqres, fetchRow, ai_pqres_fetch_row, ZEND_ACC_PUBLIC) + PHP_ME(pqres, fetchCol, ai_pqres_fetch_col, ZEND_ACC_PUBLIC) {0} }; @@ -1093,7 +1357,7 @@ static PHP_METHOD(pqstm, exec) { zend_hash_apply_with_arguments(Z_ARRVAL_P(zparams) TSRMLS_CC, apply_to_param, 2, &tmp, &zdtor); } - res = PQexecPrepared(conn_obj->conn, obj->name, count, params, NULL, NULL, 0); + res = PQexecPrepared(conn_obj->conn, obj->name, count, (const char *const*) params, NULL, NULL, 0); if (params) { efree(params); @@ -1101,8 +1365,10 @@ static PHP_METHOD(pqstm, exec) { zend_hash_destroy(&zdtor); if (res) { - return_value->type = IS_OBJECT; - return_value->value.obj = php_pqres_create_object_ex(php_pqres_class_entry, res, NULL TSRMLS_CC); + if (SUCCESS == php_pqres_success(res TSRMLS_CC)) { + return_value->type = IS_OBJECT; + return_value->value.obj = php_pqres_create_object_ex(php_pqres_class_entry, res, NULL TSRMLS_CC); + } } else { php_error_docref(NULL TSRMLS_CC, E_WARNING, "Could not execute statement: %s", PQerrorMessage(conn_obj->conn)); } @@ -1116,9 +1382,47 @@ static PHP_METHOD(pqstm, exec) { zend_restore_error_handling(&zeh TSRMLS_CC); } +ZEND_BEGIN_ARG_INFO_EX(ai_pqstm_desc, 0, 0, 0) +ZEND_END_ARG_INFO(); +static PHP_METHOD(pqstm, desc) { + zend_error_handling zeh; + + zend_replace_error_handling(EH_THROW, NULL, &zeh TSRMLS_CC); + if (SUCCESS == zend_parse_parameters_none()) { + php_pqstm_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC); + + if (obj->conn && obj->name) { + php_pqconn_object_t *conn_obj = zend_object_store_get_object(obj->conn TSRMLS_CC); + + if (conn_obj->conn) { + PGresult *res = PQdescribePrepared(conn_obj->conn, obj->name); + + if (res) { + if (SUCCESS == php_pqres_success(res TSRMLS_CC)) { + int p, params; + + array_init(return_value); + for (p = 0, params = PQnparams(res); p < params; ++p) { + add_next_index_long(return_value, PQparamtype(res, p)); + } + } + } else { + php_error_docref(NULL TSRMLS_CC, E_WARNING, "Could not describe statement: %s", PQerrorMessage(conn_obj->conn)); + } + } else { + php_error_docref(NULL TSRMLS_CC, E_WARNING, "Connection not initialized"); + } + } else { + php_error_docref(NULL TSRMLS_CC, E_WARNING, "Statement not initialized"); + } + } + zend_restore_error_handling(&zeh TSRMLS_CC); +} + static zend_function_entry php_pqstm_methods[] = { PHP_ME(pqstm, __construct, ai_pqstm_construct, ZEND_ACC_PUBLIC|ZEND_ACC_CTOR) PHP_ME(pqstm, exec, ai_pqstm_exec, ZEND_ACC_PUBLIC) + PHP_ME(pqstm, desc, ai_pqstm_desc, ZEND_ACC_PUBLIC) {0} }; @@ -1136,6 +1440,8 @@ PHP_MINIT_FUNCTION(pq) memcpy(&php_pqconn_object_handlers, zend_get_std_object_handlers(), sizeof(zend_object_handlers)); php_pqconn_object_handlers.read_property = php_pqconn_object_read_prop; php_pqconn_object_handlers.write_property = php_pqconn_object_write_prop; + php_pqconn_object_handlers.clone_obj = NULL; + php_pqconn_object_handlers.get_property_ptr_ptr = NULL; zend_declare_property_long(php_pqconn_class_entry, ZEND_STRL("status"), CONNECTION_BAD, ZEND_ACC_PUBLIC TSRMLS_CC); ph.read = php_pqconn_object_read_status; @@ -1146,7 +1452,7 @@ PHP_MINIT_FUNCTION(pq) zend_hash_add(&php_pqconn_object_prophandlers, "transactionStatus", sizeof("transactionStatus"), (void *) &ph, sizeof(ph), NULL); zend_declare_property_null(php_pqconn_class_entry, ZEND_STRL("socket"), ZEND_ACC_PUBLIC TSRMLS_CC); - ph.read = php_pqconn_object_read_socket; + ph.read = NULL; /* forward to std prophandler */ zend_hash_add(&php_pqconn_object_prophandlers, "socket", sizeof("socket"), (void *) &ph, sizeof(ph), NULL); zend_declare_property_null(php_pqconn_class_entry, ZEND_STRL("errorMessage"), ZEND_ACC_PUBLIC TSRMLS_CC);