Also util now includes all the PHP headers. --- src/libvirt-php.c | 1 - src/libvirt-php.h | 157 +----------------------------------------------- src/util.h | 174 ++++++++++++++++++++++++++++++++++++++++++++++++++++++ 3 files changed, 175 insertions(+), 157 deletions(-) diff --git a/src/libvirt-php.c b/src/libvirt-php.c index 0e0c620..504a8f2 100644 --- a/src/libvirt-php.c +++ b/src/libvirt-php.c @@ -17,7 +17,6 @@ #endif #include "libvirt-php.h" -#include "util.h" #include "vncfunc.h" #include "sockets.h" diff --git a/src/libvirt-php.h b/src/libvirt-php.h index bfc1934..aa3fbf3 100644 --- a/src/libvirt-php.h +++ b/src/libvirt-php.h @@ -7,7 +7,6 @@ #ifndef PHP_LIBVIRT_H #define PHP_LIBVIRT_H 1 - /* Network constants */ #define VIR_NETWORKS_ACTIVE 1 #define VIR_NETWORKS_INACTIVE 2 @@ -28,27 +27,6 @@ #include "config.h" #endif -#ifdef COMPILE_DL_LIBVIRT -#undef PACKAGE_BUGREPORT -#undef PACKAGE_NAME -#undef PACKAGE_STRING -#undef PACKAGE_TARNAME -#undef PACKAGE_URL -#undef PACKAGE_VERSION -#include "php.h" - -#ifdef ZTS -#include "TSRM.h" -#endif - -#include "php_ini.h" -#ifdef EXTWIN -#include "ext/standard/info.h" -#else -#include "standard/info.h" -#endif -#endif - #ifndef VERSION #define VERSION "0.5.1" #define VERSION_MAJOR 0 @@ -63,6 +41,7 @@ #include <libxml/xpath.h> #include <fcntl.h> #include <sys/types.h> +#include "util.h" #ifndef EXTWIN #include <inttypes.h> @@ -109,139 +88,6 @@ typedef uint64_t arch_uint; #define UINTx PRIx64 #endif -#if PHP_MAJOR_VERSION >= 7 -typedef size_t strsize_t; -typedef zend_resource virt_resource; -typedef virt_resource *virt_resource_handle; - -#define VIRT_RETURN_RESOURCE(_resource) \ - RETVAL_RES(_resource) - -#define VIRT_REGISTER_RESOURCE(_resource, _le_resource) \ - VIRT_RETURN_RESOURCE(zend_register_resource(_resource, _le_resource)) - -#define VIRT_REGISTER_LIST_RESOURCE(_name) do { \ - zval zret; \ - ZVAL_RES(&zret, zend_register_resource(res_##_name, le_libvirt_##_name)); \ - add_next_index_zval(return_value, &zret); \ - } while(0) - -#define VIRT_RESOURCE_HANDLE(_resource) \ - Z_RES_P(_resource) - -#define VIRT_FETCH_RESOURCE(_state, _type, _zval, _name, _le) \ - if ((_state = (_type)zend_fetch_resource(Z_RES_P(*_zval), _name, _le)) == NULL) { \ - RETURN_FALSE; \ - } - -#define VIRT_RETVAL_STRING(_str) \ - RETVAL_STRING(_str) -#define VIRT_RETVAL_STRINGL(_str, _len) \ - RETVAL_STRINGL(_str, _len) -#define VIRT_RETURN_STRING(_str) \ - RETURN_STRING(_str) -#define VIRT_RETURN_STRINGL(_str, _len) \ - RETURN_STRINGL(_str, _len) -#define VIRT_ZVAL_STRINGL(_zv, _str, _len) \ - ZVAL_STRINGL(_zv, _str, _len) -#define VIRT_ADD_INDEX_STRING(_arg, _idx, _str) \ - add_index_string(_arg, _idx, _str) -#define VIRT_ADD_NEXT_INDEX_STRING(_arg, _str) \ - add_next_index_string(_arg, _str) -#define VIRT_ADD_ASSOC_STRING(_arg, _key, _str) \ - add_assoc_string(_arg, _key, _str) -#define VIRT_ADD_ASSOC_STRING_EX(_arg, _key, _key_len, _value) \ - add_assoc_string_ex(_arg, _key, _key_len, _value) - -#define VIRT_FOREACH(_ht, _pos, _zv) \ - for (zend_hash_internal_pointer_reset_ex(_ht, &_pos); \ - (_zv = zend_hash_get_current_data_ex(_ht, &_pos)) != NULL; \ - zend_hash_move_forward_ex(_ht, &_pos)) \ - -#define VIRT_FOREACH_END(_dummy) - -#define VIRT_HASH_CURRENT_KEY_INFO(_ht, _pos, _idx, _info) \ - do { \ - zend_string *tmp_key_info; \ - _info.type = zend_hash_get_current_key_ex(_ht, &tmp_key_info, &_idx, &_pos); \ - _info.name = ZSTR_VAL(tmp_key_info); \ - _info.length = ZSTR_LEN(tmp_key_info); \ - } while(0) - -#define VIRT_ARRAY_INIT(_name) do { \ - zval z##_name; \ - _name = &z##_name; \ - array_init(_name); \ - } while(0) - -#else /* PHP_MAJOR_VERSION < 7 */ -typedef int strsize_t; -typedef long zend_long; -typedef unsigned long zend_ulong; -typedef zend_rsrc_list_entry virt_resource; -typedef long virt_resource_handle; - -#define VIRT_RETURN_RESOURCE(_resource) \ - RETVAL_RESOURCE((long) _resource) - -#define VIRT_REGISTER_RESOURCE(_resource, _le_resource) \ - ZEND_REGISTER_RESOURCE(return_value, _resource, _le_resource) - -#define VIRT_REGISTER_LIST_RESOURCE(_name) do { \ - zval *zret; \ - ALLOC_INIT_ZVAL(zret); \ - ZEND_REGISTER_RESOURCE(zret, res_##_name, le_libvirt_##_name); \ - add_next_index_zval(return_value, zret); \ - } while(0) - -#define VIRT_RESOURCE_HANDLE(_resource) \ - Z_LVAL_P(_resource) - -#define VIRT_FETCH_RESOURCE(_state, _type, _zval, _name, _le) \ - ZEND_FETCH_RESOURCE(_state, _type, _zval, -1, _name, _le); - -#define VIRT_RETVAL_STRING(_str) \ - RETVAL_STRING(_str, 1) -#define VIRT_RETVAL_STRINGL(_str, _len) \ - RETVAL_STRINGL(_str, _len, 1) -#define VIRT_RETURN_STRING(_str) \ - RETURN_STRING(_str, 1) -#define VIRT_RETURN_STRINGL(_str, _len) \ - RETURN_STRINGL(_str, _len, 1) -#define VIRT_ZVAL_STRINGL(_zv, _str, _len) \ - ZVAL_STRINGL(_zv, _str, _len, 1) -#define VIRT_ADD_INDEX_STRING(_arg, _idx, _str) \ - add_index_string(_arg, _idx, _str, 1) -#define VIRT_ADD_NEXT_INDEX_STRING(_arg, _str) \ - add_next_index_string(_arg, _str, 1) -#define VIRT_ADD_ASSOC_STRING(_arg, _key, _str) \ - add_assoc_string(_arg, _key, _str, 1) -#define VIRT_ADD_ASSOC_STRING_EX(_arg, _key, _key_len, _value) \ - add_assoc_string_ex(_arg, _key, _key_len, _value, 1) - -#define VIRT_FOREACH(_ht, _pos, _zv) \ - { \ - zval **pzv = &_zv; \ - for (zend_hash_internal_pointer_reset_ex(_ht, &_pos); \ - zend_hash_get_current_data_ex(_ht, (void **) &pzv, &_pos) == SUCCESS; \ - zend_hash_move_forward_ex(_ht, &_pos)) { \ - _zv = *pzv; - -#define VIRT_FOREACH_END(_dummy) \ - }} - -#define VIRT_HASH_CURRENT_KEY_INFO(_ht, _pos, _idx, _info) \ - do { \ - _info.type = zend_hash_get_current_key_ex(_ht, &_info.name, &_info.length, &_idx, 0, &_pos); \ - } while(0) - -#define VIRT_ARRAY_INIT(_name) do {\ - ALLOC_INIT_ZVAL(_name); \ - array_init(_name); \ - } while(0) - -#endif /* PHP_MAJOR_VERSION < 7 */ - typedef struct tTokenizer { char **tokens; int numTokens; @@ -366,7 +212,6 @@ typedef struct _php_libvirt_hash_key_info { /* Private definitions */ int set_logfile(char *filename, long maxsize TSRMLS_DC); -char *get_datetime(void); char *get_string_from_xpath(char *xml, char *xpath, zval **val, int *retVal); char **get_array_from_xpath(char *xml, char *xpath, int *num); diff --git a/src/util.h b/src/util.h index 836b13f..949dea3 100644 --- a/src/util.h +++ b/src/util.h @@ -9,6 +9,27 @@ # include <stdint.h> +# ifdef COMPILE_DL_LIBVIRT +# undef PACKAGE_BUGREPORT +# undef PACKAGE_NAME +# undef PACKAGE_STRING +# undef PACKAGE_TARNAME +# undef PACKAGE_URL +# undef PACKAGE_VERSION +# include <php.h> + +# ifdef ZTS +# include <TSRM.h> +# endif + +# include <php_ini.h> +# ifdef EXTWIN +# include <ext/standard/info.h> +# else +# include <standard/info.h> +# endif +#endif + # define DEBUG_SUPPORT # ifdef DEBUG_SUPPORT @@ -62,6 +83,159 @@ ((uint32_t)var[2] << 8) + \ ((uint32_t)var[3])) +# if PHP_MAJOR_VERSION >= 7 + typedef size_t strsize_t; + typedef zend_resource virt_resource; + typedef virt_resource *virt_resource_handle; + +# define VIRT_RETURN_RESOURCE(_resource) \ + RETVAL_RES(_resource) + +# define VIRT_REGISTER_RESOURCE(_resource, _le_resource) \ + VIRT_RETURN_RESOURCE(zend_register_resource(_resource, _le_resource)) + +# define VIRT_REGISTER_LIST_RESOURCE(_name) do { \ + zval zret; \ + ZVAL_RES(&zret, zend_register_resource(res_##_name, le_libvirt_##_name)); \ + add_next_index_zval(return_value, &zret); \ + } while(0) + +# define VIRT_RESOURCE_HANDLE(_resource) \ + Z_RES_P(_resource) + +# define VIRT_FETCH_RESOURCE(_state, _type, _zval, _name, _le) \ + if ((_state = (_type)zend_fetch_resource(Z_RES_P(*_zval), _name, _le)) == NULL) { \ + RETURN_FALSE; \ + } + +# define VIRT_RETVAL_STRING(_str) \ + RETVAL_STRING(_str) + +# define VIRT_RETVAL_STRINGL(_str, _len) \ + RETVAL_STRINGL(_str, _len) + +# define VIRT_RETURN_STRING(_str) \ + RETURN_STRING(_str) + +# define VIRT_RETURN_STRINGL(_str, _len) \ + RETURN_STRINGL(_str, _len) + +# define VIRT_ZVAL_STRINGL(_zv, _str, _len) \ + ZVAL_STRINGL(_zv, _str, _len) + +# define VIRT_ADD_INDEX_STRING(_arg, _idx, _str) \ + add_index_string(_arg, _idx, _str) + +# define VIRT_ADD_NEXT_INDEX_STRING(_arg, _str) \ + add_next_index_string(_arg, _str) + +# define VIRT_ADD_ASSOC_STRING(_arg, _key, _str) \ + add_assoc_string(_arg, _key, _str) + +# define VIRT_ADD_ASSOC_STRING_EX(_arg, _key, _key_len, _value) \ + add_assoc_string_ex(_arg, _key, _key_len, _value) + +# define VIRT_FOREACH(_ht, _pos, _zv) \ + for (zend_hash_internal_pointer_reset_ex(_ht, &_pos); \ + (_zv = zend_hash_get_current_data_ex(_ht, &_pos)) != NULL; \ + zend_hash_move_forward_ex(_ht, &_pos)) \ + +# define VIRT_FOREACH_END(_dummy) + +# define VIRT_HASH_CURRENT_KEY_INFO(_ht, _pos, _idx, _info) \ + do { \ + zend_string *tmp_key_info; \ + _info.type = zend_hash_get_current_key_ex(_ht, &tmp_key_info, &_idx, &_pos); \ + _info.name = ZSTR_VAL(tmp_key_info); \ + _info.length = ZSTR_LEN(tmp_key_info); \ + } while(0) + +# define VIRT_ARRAY_INIT(_name) do { \ + zval z##_name; \ + _name = &z##_name; \ + array_init(_name); \ + } while(0) + +# else /* PHP_MAJOR_VERSION < 7 */ + typedef int strsize_t; + typedef long zend_long; + typedef unsigned long zend_ulong; + typedef zend_rsrc_list_entry virt_resource; + typedef long virt_resource_handle; + +# define VIRT_RETURN_RESOURCE(_resource) \ + RETVAL_RESOURCE((long) _resource) + +# define VIRT_REGISTER_RESOURCE(_resource, _le_resource) \ + ZEND_REGISTER_RESOURCE(return_value, _resource, _le_resource) + +# define VIRT_REGISTER_LIST_RESOURCE(_name) do { \ + zval *zret; \ + ALLOC_INIT_ZVAL(zret); \ + ZEND_REGISTER_RESOURCE(zret, res_##_name, le_libvirt_##_name); \ + add_next_index_zval(return_value, zret); \ + } while(0) + +# define VIRT_RESOURCE_HANDLE(_resource) \ + Z_LVAL_P(_resource) + +# define VIRT_FETCH_RESOURCE(_state, _type, _zval, _name, _le) \ + ZEND_FETCH_RESOURCE(_state, _type, _zval, -1, _name, _le); + +# define VIRT_RETVAL_STRING(_str) \ + RETVAL_STRING(_str, 1) + +# define VIRT_RETVAL_STRINGL(_str, _len) \ + RETVAL_STRINGL(_str, _len, 1) + +# define VIRT_RETURN_STRING(_str) \ + RETURN_STRING(_str, 1) + +# define VIRT_RETURN_STRINGL(_str, _len) \ + RETURN_STRINGL(_str, _len, 1) + +# define VIRT_ZVAL_STRINGL(_zv, _str, _len) \ + ZVAL_STRINGL(_zv, _str, _len, 1) + +# define VIRT_ADD_INDEX_STRING(_arg, _idx, _str) \ + add_index_string(_arg, _idx, _str, 1) + +# define VIRT_ADD_NEXT_INDEX_STRING(_arg, _str) \ + add_next_index_string(_arg, _str, 1) + +# define VIRT_ADD_ASSOC_STRING(_arg, _key, _str) \ + add_assoc_string(_arg, _key, _str, 1) + +# define VIRT_ADD_ASSOC_STRING_EX(_arg, _key, _key_len, _value) \ + add_assoc_string_ex(_arg, _key, _key_len, _value, 1) + +# define VIRT_FOREACH(_ht, _pos, _zv) \ + { \ + zval **pzv = &_zv; \ + for (zend_hash_internal_pointer_reset_ex(_ht, &_pos); \ + zend_hash_get_current_data_ex(_ht, (void **) &pzv, &_pos) == SUCCESS; \ + zend_hash_move_forward_ex(_ht, &_pos)) { \ + _zv = *pzv; + +# define VIRT_FOREACH_END(_dummy) \ + }} + +# define VIRT_HASH_CURRENT_KEY_INFO(_ht, _pos, _idx, _info) \ + do { \ + _info.type = zend_hash_get_current_key_ex(_ht, &_info.name, &_info.length, &_idx, 0, &_pos); \ + } while(0) + +# define VIRT_ARRAY_INIT(_name) do {\ + ALLOC_INIT_ZVAL(_name); \ + array_init(_name); \ + } while(0) + +# endif /* PHP_MAJOR_VERSION < 7 */ + +# ifndef PHP_FE_END +# define PHP_FE_END {NULL, NULL, NULL} +# endif + void debugPrint(const char *source, const char *fmt, ...); -- 2.13.3

* add libvirt-connection.h and libvirt-connection.c * move all libvirt_connect_* function declarations and definitions to above files * other minor adjusments to libvirt-php.h and util.h to keep the code compilable while the code is being moved around. --- src/Makefile.am | 3 +- src/libvirt-connection.c | 885 +++++++++++++++++++++++++++++++++++++++++++++ src/libvirt-connection.h | 83 +++++ src/libvirt-php.c | 919 +---------------------------------------------- src/libvirt-php.h | 95 ++--- src/util.h | 7 - 6 files changed, 1025 insertions(+), 967 deletions(-) create mode 100644 src/libvirt-connection.c create mode 100644 src/libvirt-connection.h diff --git a/src/Makefile.am b/src/Makefile.am index bbee667..0819dc6 100644 --- a/src/Makefile.am +++ b/src/Makefile.am @@ -21,7 +21,8 @@ libvirt_php_la_SOURCES = \ util.c util.h \ vncfunc.c vncfunc.h \ sockets.c sockets.h \ - libvirt-php.c libvirt-php.h + libvirt-php.c libvirt-php.h \ + libvirt-connection.c libvirt-connection.h libvirt_php_la_CFLAGS = \ $(AM_CFLAGS) \ -DCOMPILE_DL_LIBVIRT=1 diff --git a/src/libvirt-connection.c b/src/libvirt-connection.c new file mode 100644 index 0000000..bcebd44 --- /dev/null +++ b/src/libvirt-connection.c @@ -0,0 +1,885 @@ +/* + * libvirt-connection.c: The PHP bindings to libvirt connection API + * + * See COPYING for the license of this software + */ + +#include <libvirt/libvirt.h> + +#include "libvirt-connection.h" + +DEBUG_INIT("connection"); + +/* + * Private function name: free_resources_on_connection + * Since version: 0.4.2 + * Description: Function is used to free all the resources assigned to the connection identified by conn + * Arguments: @conn [virConnectPtr]: libvirt connection pointer + * Returns: None + */ +static void +free_resources_on_connection(virConnectPtr conn TSRMLS_DC) +{ + int binding_resources_count = 0; + resource_info *binding_resources; + int i; + + binding_resources_count = LIBVIRT_G(binding_resources_count); + binding_resources = LIBVIRT_G(binding_resources); + + for (i = 0; i < binding_resources_count; i++) { + if ((binding_resources[i].overwrite == 0) && (binding_resources[i].conn == conn)) + free_resource(binding_resources[i].type, binding_resources[i].mem TSRMLS_CC); + } +} + +/* Destructor for connection resource */ +void +php_libvirt_connection_dtor(virt_resource *rsrc TSRMLS_DC) +{ + php_libvirt_connection *conn = (php_libvirt_connection *) rsrc->ptr; + int rv = 0; + + if (conn != NULL) { + if (conn->conn != NULL) { + free_resources_on_connection(conn->conn TSRMLS_CC); + + rv = virConnectClose(conn->conn); + if (rv == -1) { + DPRINTF("%s: virConnectClose(%p) returned %d (%s)\n", __FUNCTION__, conn->conn, rv, LIBVIRT_G(last_error)); + php_error_docref(NULL TSRMLS_CC, E_WARNING, "virConnectClose failed with %i on destructor: %s", rv, LIBVIRT_G(last_error)); + } else { + DPRINTF("%s: virConnectClose(%p) completed successfully\n", __FUNCTION__, conn->conn); + resource_change_counter(INT_RESOURCE_CONNECTION, NULL, conn->conn, 0 TSRMLS_CC); + } + conn->conn = NULL; + } + efree(conn); + } +} + +/* Authentication callback function. + * + * Should receive list of credentials via cbdata and pass the requested one to + * libvirt + */ +static int libvirt_virConnectAuthCallback(virConnectCredentialPtr cred, + unsigned int ncred, void *cbdata) +{ + TSRMLS_FETCH(); + + unsigned int i, j; + php_libvirt_cred_value *creds = (php_libvirt_cred_value *) cbdata; + for (i = 0; i < (unsigned int)ncred; i++) { + DPRINTF("%s: cred %d, type %d, prompt %s challenge %s\n ", __FUNCTION__, i, cred[i].type, cred[i].prompt, cred[i].challenge); + if (creds != NULL) + for (j = 0; j < (unsigned int)creds[0].count; j++) { + if (creds[j].type == cred[i].type) { + cred[i].resultlen = creds[j].resultlen; + cred[i].result = (char *)malloc(creds[j].resultlen + 1); + memset(cred[i].result, 0, creds[j].resultlen + 1); + strncpy(cred[i].result, creds[j].result, creds[j].resultlen); + } + } + DPRINTF("%s: result %s (%d)\n", __FUNCTION__, cred[i].result, cred[i].resultlen); + } + + return 0; +} + +static int libvirt_virConnectCredType[] = { + VIR_CRED_AUTHNAME, + VIR_CRED_ECHOPROMPT, + VIR_CRED_REALM, + VIR_CRED_PASSPHRASE, + VIR_CRED_NOECHOPROMPT, + //VIR_CRED_EXTERNAL, +}; + +/* + * Function name: libvirt_connect + * Since version: 0.4.1(-1) + * Description: libvirt_connect() is used to connect to the specified libvirt daemon using the specified URL, user can also set the readonly flag and/or set credentials for connection + * Arguments: @url [string]: URI for connection + * @readonly [bool]: flag whether to use read-only connection or not + * @credentials [array]: array of connection credentials + * Returns: libvirt connection resource + */ +PHP_FUNCTION(libvirt_connect) +{ + php_libvirt_connection *conn; + php_libvirt_cred_value *creds = NULL; + zval *zcreds = NULL; + zval *data; + int i; + int j; + int credscount = 0; + + virConnectAuth libvirt_virConnectAuth = { + libvirt_virConnectCredType, + sizeof(libvirt_virConnectCredType) / sizeof(int), + libvirt_virConnectAuthCallback, + NULL + }; + + char *url = NULL; + strsize_t url_len = 0; + zend_bool readonly = 1; + + HashTable *arr_hash; + HashPosition pointer; + int array_count; + + zend_ulong index; + + unsigned long libVer; + + if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|sba", &url, &url_len, &readonly, &zcreds) == FAILURE) { + RETURN_FALSE; + } + + if (virGetVersion(&libVer, NULL, NULL)!= 0) + RETURN_FALSE; + + if (libVer < 6002) { + set_error("Only libvirt 0.6.2 and higher supported. Please upgrade your libvirt" TSRMLS_CC); + RETURN_FALSE; + } + + if ((count_resources(INT_RESOURCE_CONNECTION TSRMLS_CC) + 1) > LIBVIRT_G(max_connections_ini)) { + DPRINTF("%s: maximum number of connections allowed exceeded (max %lu)\n", PHPFUNC, (unsigned long)LIBVIRT_G(max_connections_ini)); + set_error("Maximum number of connections allowed exceeded" TSRMLS_CC); + RETURN_FALSE; + } + + /* If 'null' value has been passed as URL override url to NULL value to autodetect the hypervisor */ + if ((url == NULL) || (strcasecmp(url, "NULL") == 0)) + url = NULL; + + conn = (php_libvirt_connection *)emalloc(sizeof(php_libvirt_connection)); + if (zcreds == NULL) { + /* connecting without providing authentication */ + if (readonly) + conn->conn = virConnectOpenReadOnly(url); + else + conn->conn = virConnectOpen(url); + } else { + /* connecting with authentication (using callback) */ + arr_hash = Z_ARRVAL_P(zcreds); + array_count = zend_hash_num_elements(arr_hash); + + credscount = array_count; + creds = (php_libvirt_cred_value *)emalloc(credscount * sizeof(php_libvirt_cred_value)); + j = 0; + /* parse the input Array and create list of credentials. The list (array) is passed to callback function. */ + VIRT_FOREACH(arr_hash, pointer, data) { + if (Z_TYPE_P(data) == IS_STRING) { + php_libvirt_hash_key_info info; + VIRT_HASH_CURRENT_KEY_INFO(arr_hash, pointer, index, info); + + if (info.type == HASH_KEY_IS_STRING) { + PHPWRITE(info.name, info.length); + } else { + DPRINTF("%s: credentials index %d\n", PHPFUNC, (int)index); + creds[j].type = index; + creds[j].result = (char *)emalloc(Z_STRLEN_P(data) + 1); + memset(creds[j].result, 0, Z_STRLEN_P(data) + 1); + creds[j].resultlen = Z_STRLEN_P(data); + strncpy(creds[j].result, Z_STRVAL_P(data), Z_STRLEN_P(data)); + j++; + } + } + } VIRT_FOREACH_END(); + DPRINTF("%s: Found %d elements for credentials\n", PHPFUNC, j); + creds[0].count = j; + libvirt_virConnectAuth.cbdata = (void *)creds; + conn->conn = virConnectOpenAuth(url, &libvirt_virConnectAuth, readonly ? VIR_CONNECT_RO : 0); + for (i = 0; i < creds[0].count; i++) + efree(creds[i].result); + efree(creds); + } + + if (conn->conn == NULL) { + DPRINTF("%s: Cannot establish connection to %s\n", PHPFUNC, url); + efree(conn); + RETURN_FALSE; + } + + resource_change_counter(INT_RESOURCE_CONNECTION, NULL, conn->conn, 1 TSRMLS_CC); + DPRINTF("%s: Connection to %s established, returning %p\n", PHPFUNC, url, conn->conn); + + VIRT_REGISTER_RESOURCE(conn, le_libvirt_connection); + conn->resource = VIRT_RESOURCE_HANDLE(return_value); +} + +/* + * Function name: libvirt_connect_get_uri + * Since version: 0.4.1(-1) + * Description: Function is used to get the connection URI. This is useful to check the hypervisor type of host machine when using "null" uri to libvirt_connect() + * Arguments: @conn [resource]: resource for connection + * Returns: connection URI string or FALSE for error + */ +PHP_FUNCTION(libvirt_connect_get_uri) +{ + zval *zconn; + char *uri; + php_libvirt_connection *conn = NULL; + + GET_CONNECTION_FROM_ARGS("r", &zconn); + uri = virConnectGetURI(conn->conn); + DPRINTF("%s: virConnectGetURI returned %s\n", PHPFUNC, uri); + if (uri == NULL) + RETURN_FALSE; + + VIRT_RETVAL_STRING(uri); + free(uri); +} + +/* + * Function name: libvirt_connect_get_hostname + * Since version: 0.4.1(-1) + * Description: Function is used to get the hostname of the guest associated with the connection + * Arguments: @conn [resource]: resource for connection + * Returns: hostname of the host node or FALSE for error + */ +PHP_FUNCTION(libvirt_connect_get_hostname) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + char *hostname; + + GET_CONNECTION_FROM_ARGS("r", &zconn); + + hostname = virConnectGetHostname(conn->conn); + DPRINTF("%s: virConnectGetHostname returned %s\n", PHPFUNC, hostname); + if (hostname == NULL) + RETURN_FALSE; + + VIRT_RETVAL_STRING(hostname); + free(hostname); +} + +/* + * Function name: libvirt_connect_get_hypervisor + * Since version: 0.4.1(-2) + * Description: Function is used to get the information about the hypervisor on the connection identified by the connection pointer + * Arguments: @conn [resource]: resource for connection + * Returns: array of hypervisor information if available + */ +PHP_FUNCTION(libvirt_connect_get_hypervisor) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + unsigned long hvVer = 0; + const char *type = NULL; + char hvStr[64] = { 0 }; + + GET_CONNECTION_FROM_ARGS("r", &zconn); + + if (virConnectGetVersion(conn->conn, &hvVer) != 0) + RETURN_FALSE; + + type = virConnectGetType(conn->conn); + if (type == NULL) + RETURN_FALSE; + + DPRINTF("%s: virConnectGetType returned %s\n", PHPFUNC, type); + + array_init(return_value); + VIRT_ADD_ASSOC_STRING(return_value, "hypervisor", (char *)type); + add_assoc_long(return_value, "major", (long)((hvVer/1000000) % 1000)); + add_assoc_long(return_value, "minor", (long)((hvVer/1000) % 1000)); + add_assoc_long(return_value, "release", (long)(hvVer % 1000)); + + snprintf(hvStr, sizeof(hvStr), "%s %d.%d.%d", type, + (long)((hvVer/1000000) % 1000), (long)((hvVer/1000) % 1000), (long)(hvVer % 1000)); + VIRT_ADD_ASSOC_STRING(return_value, "hypervisor_string", hvStr); +} + +/* + * Function name: libvirt_connect_get_capabilities + * Since version: 0.4.1(-2) + * Description: Function is used to get the capabilities information from the connection + * Arguments: @conn [resource]: resource for connection + * @xpath [string]: optional xPath query to be applied on the result + * Returns: capabilities XML from the connection or FALSE for error + */ +PHP_FUNCTION(libvirt_connect_get_capabilities) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + char *caps; + char *xpath = NULL; + strsize_t xpath_len; + char *tmp = NULL; + int retval = -1; + + GET_CONNECTION_FROM_ARGS("r|s", &zconn, &xpath, &xpath_len); + + caps = virConnectGetCapabilities(conn->conn); + if (caps == NULL) + RETURN_FALSE; + + tmp = get_string_from_xpath(caps, xpath, NULL, &retval); + if ((tmp == NULL) || (retval < 0)) { + VIRT_RETVAL_STRING(caps); + } else { + VIRT_RETVAL_STRING(tmp); + } + + free(caps); + free(tmp); +} + +/* + * Function name: libvirt_connect_get_emulator + * Since version: 0.4.5 + * Description: Function is used to get the emulator for requested connection/architecture + * Arguments: @conn [resource]: libvirt connection resource + * @arch [string]: optional architecture string, can be NULL to get default + * Returns: path to the emulator + */ +PHP_FUNCTION(libvirt_connect_get_emulator) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + char *arch = NULL; + strsize_t arch_len; + char *tmp; + + GET_CONNECTION_FROM_ARGS("r|s", &zconn, &arch, &arch_len); + + if ((arch == NULL) || (arch_len == 0)) + arch = NULL; + + tmp = connection_get_emulator(conn->conn, arch TSRMLS_CC); + if (tmp == NULL) { + set_error("Cannot get emulator" TSRMLS_CC); + RETURN_FALSE; + } + + VIRT_RETVAL_STRING(tmp); + free(tmp); +} + +/* + * Function name: libvirt_connect_get_nic_models + * Since version: 0.4.9 + * Description: Function is used to get NIC models for requested connection/architecture + * Arguments: @conn [resource]: libvirt connection resource + * @arch [string]: optional architecture string, can be NULL to get default + * Returns: array of models + */ +PHP_FUNCTION(libvirt_connect_get_nic_models) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + char *arch = NULL; + strsize_t arch_len; + char *tmp; + + GET_CONNECTION_FROM_ARGS("r|s", &zconn, &arch, &arch_len); + + /* Disable getting it on remote connections */ + if (!is_local_connection(conn->conn)) { + set_error("This function works only on local connections" TSRMLS_CC); + RETURN_FALSE; + } + + /* This approach is working only for QEMU driver so bails if not currently using it */ + if (strcmp(virConnectGetType(conn->conn), "QEMU") != 0) { + set_error("This function can be used only for QEMU driver" TSRMLS_CC); + RETURN_FALSE; + } + +#ifndef EXTWIN + if ((arch == NULL) || (arch_len == 0)) + arch = NULL; + + tmp = connection_get_emulator(conn->conn, arch TSRMLS_CC); + if (tmp == NULL) { + set_error("Cannot get emulator" TSRMLS_CC); + RETURN_FALSE; + } + + char cmd[4096] = { 0 }; + char tmp2[16] = { 0 }; + snprintf(cmd, sizeof(cmd), "%s -net nic,model=? 2>&1", tmp); + + FILE *fp = popen(cmd, "r"); + if (fp == NULL) + RETURN_FALSE; + + array_init(return_value); + while (!feof(fp)) { + memset(cmd, 0, sizeof(cmd)); + if (!fgets(cmd, sizeof(cmd), fp)) + break; + + if ((tmp = strstr(cmd, "Supported NIC models:")) != NULL) { + tmp = strstr(tmp, ":") + 2; + + int i; + tTokenizer t = tokenize(tmp, ","); + for (i = 0; i < t.numTokens; i++) { + snprintf(tmp2, sizeof(tmp2), "%d", i); + VIRT_ADD_ASSOC_STRING(return_value, tmp2, t.tokens[i]); + } + free_tokens(t); + } + } + fclose(fp); +#endif +} + +/* + * Function name: libvirt_connect_get_soundhw_models + * Since version: 0.4.9 + * Description: Function is used to get sound hardware models for requested connection/architecture + * Arguments: @conn [resource]: libvirt connection resource + * @arch [string]: optional architecture string, can be NULL to get default + * @flags [int]: flags for getting sound hardware. Can be either 0 or VIR_CONNECT_SOUNDHW_GET_NAMES + * Returns: array of models + */ +PHP_FUNCTION(libvirt_connect_get_soundhw_models) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + char *arch = NULL; + strsize_t arch_len; + char *tmp; + zend_long flags = 0; + + GET_CONNECTION_FROM_ARGS("r|sl", &zconn, &arch, &arch_len, &flags); + + if ((arch == NULL) || (arch_len == 0)) + arch = NULL; + + /* Disable getting it on remote connections */ + if (!is_local_connection(conn->conn)) { + set_error("This function works only on local connections" TSRMLS_CC); + RETURN_FALSE; + } + +#ifndef EXTWIN + /* This approach is working only for QEMU driver so bails if not currently using it */ + if (strcmp(virConnectGetType(conn->conn), "QEMU") != 0) { + set_error("This function can be used only for QEMU driver" TSRMLS_CC); + RETURN_FALSE; + } + + tmp = connection_get_emulator(conn->conn, arch TSRMLS_CC); + if (tmp == NULL) { + set_error("Cannot get emulator" TSRMLS_CC); + RETURN_FALSE; + } + + char cmd[4096] = { 0 }; + snprintf(cmd, sizeof(cmd), "%s -soundhw help 2>&1", tmp); + + FILE *fp = popen(cmd, "r"); + if (fp == NULL) + RETURN_FALSE; + + short inFunc = 0; + + int n = 0; + array_init(return_value); + while (!feof(fp)) { + memset(cmd, 0, sizeof(cmd)); + if (!fgets(cmd, sizeof(cmd), fp)) + break; + + if (strncmp(cmd, "Valid ", 6) == 0) { + inFunc = 1; + continue; + } else + if (strlen(cmd) < 2) + inFunc = 0; + + if (inFunc) { + int i = 0; + char desc[1024] = { 0 }; + tTokenizer t = tokenize(cmd, " "); + if (t.numTokens == 0) + continue; + + if ((i > 0) && (flags & CONNECT_FLAG_SOUNDHW_GET_NAMES)) { + zval *arr; + memset(desc, 0, sizeof(desc)); + for (i = 1; i < t.numTokens; i++) { + strcat(desc, t.tokens[i]); + if (i < t.numTokens - 1) + strcat(desc, " "); + } + + VIRT_ARRAY_INIT(arr); + VIRT_ADD_ASSOC_STRING(arr, "name", t.tokens[0]); + VIRT_ADD_ASSOC_STRING(arr, "description", desc); + add_next_index_zval(return_value, arr); + } else { + char tmp2[16] = { 0 }; + snprintf(tmp2, sizeof(tmp2), "%d", n++); + VIRT_ADD_ASSOC_STRING(return_value, tmp2, t.tokens[0]); + } + + free_tokens(t); + } + } + fclose(fp); +#endif +} + +/* + * Function name: libvirt_connect_get_maxvcpus + * Since version: 0.4.1(-2) + * Description: Function is used to get maximum number of VCPUs per VM on the hypervisor connection + * Arguments: @conn [resource]: resource for connection + * Returns: number of VCPUs available per VM on the connection or FALSE for error + */ +PHP_FUNCTION(libvirt_connect_get_maxvcpus) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + const char *type = NULL; + + GET_CONNECTION_FROM_ARGS("r", &zconn); + + type = virConnectGetType(conn->conn); + if (type == NULL) + RETURN_FALSE; + + RETURN_LONG(virConnectGetMaxVcpus(conn->conn, type)); +} + +/* + * Function name: libvirt_connect_get_sysinfo + * Since version: 0.4.1(-2) + * Description: Function is used to get the system information from connection if available + * Arguments: @conn [resource]: resource for connection + * Returns: XML description of system information from the connection or FALSE for error + */ +PHP_FUNCTION(libvirt_connect_get_sysinfo) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + char *sysinfo; + + GET_CONNECTION_FROM_ARGS("r", &zconn); + + sysinfo = virConnectGetSysinfo(conn->conn, 0); + if (sysinfo == NULL) + RETURN_FALSE; + + VIRT_RETVAL_STRING(sysinfo); + free(sysinfo); +} + +/* + * Function name: libvirt_connect_is_encrypted + * Since version: 0.4.1(-2) + * Description: Function is used to get the information whether the connection is encrypted or not + * Arguments: @conn [resource]: resource for connection + * Returns: 1 if encrypted, 0 if not encrypted, -1 on error + */ +PHP_FUNCTION(libvirt_connect_get_encrypted) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + + GET_CONNECTION_FROM_ARGS("r", &zconn); + + RETURN_LONG(virConnectIsEncrypted(conn->conn)); +} + +/* + * Function name: libvirt_connect_is_secure + * Since version: 0.4.1(-2) + * Description: Function is used to get the information whether the connection is secure or not + * Arguments: @conn [resource]: resource for connection + * Returns: 1 if secure, 0 if not secure, -1 on error + */ +PHP_FUNCTION(libvirt_connect_get_secure) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + + GET_CONNECTION_FROM_ARGS("r", &zconn); + + RETURN_LONG(virConnectIsSecure(conn->conn)); +} + +/* + * Function name: libvirt_connect_get_information + * Since version: 0.4.1(-2) + * Description: Function is used to get the information about the connection + * Arguments: @conn [resource]: resource for connection + * Returns: array of information about the connection + */ +PHP_FUNCTION(libvirt_connect_get_information) +{ + zval *zconn; + char *tmp; + unsigned long hvVer = 0; + const char *type = NULL; + char hvStr[64] = { 0 }; + int iTmp = -1, maxvcpus = -1; + php_libvirt_connection *conn = NULL; + + GET_CONNECTION_FROM_ARGS("r", &zconn); + + tmp = virConnectGetURI(conn->conn); + DPRINTF("%s: Got connection URI of %s...\n", PHPFUNC, tmp); + array_init(return_value); + VIRT_ADD_ASSOC_STRING(return_value, "uri", tmp ? tmp : "unknown"); + free(tmp); + tmp = virConnectGetHostname(conn->conn); + VIRT_ADD_ASSOC_STRING(return_value, "hostname", tmp ? tmp : "unknown"); + free(tmp); + + if ((virConnectGetVersion(conn->conn, &hvVer) == 0) && (type = virConnectGetType(conn->conn))) { + VIRT_ADD_ASSOC_STRING(return_value, "hypervisor", (char *)type); + add_assoc_long(return_value, "hypervisor_major", (long)((hvVer/1000000) % 1000)); + add_assoc_long(return_value, "hypervisor_minor", (long)((hvVer/1000) % 1000)); + add_assoc_long(return_value, "hypervisor_release", (long)(hvVer % 1000)); + snprintf(hvStr, sizeof(hvStr), "%s %d.%d.%d", type, + (long)((hvVer/1000000) % 1000), (long)((hvVer/1000) % 1000), (long)(hvVer % 1000)); + VIRT_ADD_ASSOC_STRING(return_value, "hypervisor_string", hvStr); + } + + if (strcmp(type, "QEMU") == 0) { + /* For QEMU the value is not reliable so we return -1 instead */ + maxvcpus = -1; + } else { + maxvcpus = virConnectGetMaxVcpus(conn->conn, type); + } + + add_assoc_long(return_value, "hypervisor_maxvcpus", maxvcpus); + iTmp = virConnectIsEncrypted(conn->conn); + if (iTmp == 1) + VIRT_ADD_ASSOC_STRING(return_value, "encrypted", "Yes"); + else + if (iTmp == 0) + VIRT_ADD_ASSOC_STRING(return_value, "encrypted", "No"); + else + VIRT_ADD_ASSOC_STRING(return_value, "encrypted", "unknown"); + + iTmp = virConnectIsSecure(conn->conn); + if (iTmp == 1) + VIRT_ADD_ASSOC_STRING(return_value, "secure", "Yes"); + else + if (iTmp == 0) + VIRT_ADD_ASSOC_STRING(return_value, "secure", "No"); + else + VIRT_ADD_ASSOC_STRING(return_value, "secure", "unknown"); + + add_assoc_long(return_value, "num_inactive_domains", virConnectNumOfDefinedDomains(conn->conn)); + add_assoc_long(return_value, "num_inactive_interfaces", virConnectNumOfDefinedInterfaces(conn->conn)); + add_assoc_long(return_value, "num_inactive_networks", virConnectNumOfDefinedNetworks(conn->conn)); + add_assoc_long(return_value, "num_inactive_storagepools", virConnectNumOfDefinedStoragePools(conn->conn)); + + add_assoc_long(return_value, "num_active_domains", virConnectNumOfDomains(conn->conn)); + add_assoc_long(return_value, "num_active_interfaces", virConnectNumOfInterfaces(conn->conn)); + add_assoc_long(return_value, "num_active_networks", virConnectNumOfNetworks(conn->conn)); + add_assoc_long(return_value, "num_active_storagepools", virConnectNumOfStoragePools(conn->conn)); + + add_assoc_long(return_value, "num_total_domains", virConnectNumOfDomains(conn->conn) + virConnectNumOfDefinedDomains(conn->conn)); + add_assoc_long(return_value, "num_total_interfaces", virConnectNumOfInterfaces(conn->conn) + virConnectNumOfDefinedInterfaces(conn->conn)); + add_assoc_long(return_value, "num_total_networks", virConnectNumOfNetworks(conn->conn) + virConnectNumOfDefinedNetworks(conn->conn)); + add_assoc_long(return_value, "num_total_storagepools", virConnectNumOfStoragePools(conn->conn) + virConnectNumOfDefinedStoragePools(conn->conn)); + + add_assoc_long(return_value, "num_secrets", virConnectNumOfSecrets(conn->conn)); + add_assoc_long(return_value, "num_nwfilters", virConnectNumOfNWFilters(conn->conn)); +} + +/* + * Function name: libvirt_connect_get_machine_types + * Since version: 0.4.9 + * Description: Function is used to get machine types supported by hypervisor on the conneciton + * Arguments: @conn [resource]: resource for connection + * Returns: array of machine types for the connection incl. maxCpus if appropriate + */ +PHP_FUNCTION(libvirt_connect_get_machine_types) +{ + zval *zconn; + php_libvirt_connection *conn = NULL; + char *caps = NULL; + char **ret = NULL; + int i, num = -1; + + GET_CONNECTION_FROM_ARGS("r", &zconn); + + caps = virConnectGetCapabilities(conn->conn); + if (caps == NULL) + RETURN_FALSE; + + array_init(return_value); + + ret = get_array_from_xpath(caps, "//capabilities/guest/arch/@name", &num); + if (ret != NULL) { + for (i = 0; i < num; i++) { + int num2, j; + char tmp[1024] = { 0 }; + + snprintf(tmp, sizeof(tmp), "//capabilities/guest/arch[@name=\"%s\"]/domain/@type", ret[i]); + char **ret2 = get_array_from_xpath(caps, tmp, &num2); + if (ret2 != NULL) { + zval *arr2; + VIRT_ARRAY_INIT(arr2); + + for (j = 0; j < num2; j++) { + int num3, k; + char tmp2[1024] = { 0 }; + zval *arr3; + + VIRT_ARRAY_INIT(arr3); + + snprintf(tmp2, sizeof(tmp2), "//capabilities/guest/arch[@name=\"%s\"]/machine", + ret[i]); + + char **ret3 = get_array_from_xpath(caps, tmp2, &num3); + if (ret3 != NULL) { + for (k = 0; k < num3; k++) { + char *numTmp = NULL; + char key[8] = { 0 }; + char tmp3[2048] = { 0 }; + + snprintf(key, sizeof(key), "%d", k); + //VIRT_ADD_ASSOC_STRING(arr2, key, ret3[k]); + + snprintf(tmp3, sizeof(tmp3), "//capabilities/guest/arch[@name=\"%s\"]/machine[text()=\"%s\"]/@maxCpus", + ret[i], ret3[k]); + + numTmp = get_string_from_xpath(caps, tmp3, NULL, NULL); + if (numTmp == NULL) { + VIRT_ADD_ASSOC_STRING(arr2, key, ret3[k]); + } else { + zval *arr4; + VIRT_ARRAY_INIT(arr4); + VIRT_ADD_ASSOC_STRING(arr4, "name", ret3[k]); + VIRT_ADD_ASSOC_STRING(arr4, "maxCpus", numTmp); + + add_assoc_zval_ex(arr2, key, strlen(key) + 1, arr4); + free(numTmp); + } + + free(ret3[k]); + } + } + + /* Domain type specific */ + snprintf(tmp2, sizeof(tmp2), "//capabilities/guest/arch[@name=\"%s\"]/domain[@type=\"%s\"]/machine", + ret[i], ret2[j]); + + ret3 = get_array_from_xpath(caps, tmp2, &num3); + if (ret3 != NULL) { + for (k = 0; k < num3; k++) { + char key[8] = { 0 }; + char tmp3[2048] = { 0 }; + char *numTmp = NULL; + + snprintf(key, sizeof(key), "%d", k); + snprintf(tmp3, sizeof(tmp3), + "//capabilities/guest/arch[@name=\"%s\"]/domain[@type=\"%s\"]/machine[text()=\"%s\"]/@maxCpus", + ret[i], ret2[j], ret3[k]); + + numTmp = get_string_from_xpath(caps, tmp3, NULL, NULL); + if (numTmp == NULL) { + VIRT_ADD_ASSOC_STRING(arr3, key, ret3[k]); + } else { + zval *arr4; + VIRT_ARRAY_INIT(arr4); + + VIRT_ADD_ASSOC_STRING(arr4, "name", ret3[k]); + VIRT_ADD_ASSOC_STRING(arr4, "maxCpus", numTmp); + + add_assoc_zval_ex(arr3, key, strlen(key) + 1, arr4); + free(numTmp); + } + + free(ret3[k]); + } + + add_assoc_zval_ex(arr2, ret2[j], strlen(ret2[j]) + 1, arr3); + } + } + //free(ret2[j]); + + add_assoc_zval_ex(return_value, ret[i], strlen(ret[i]) + 1, arr2); + } + free(ret[i]); + } + } +} + +/* + * Function name: libvirt_connect_get_all_domain_stats + * Since version: 0.5.1(-1) + * Description: Query statistics for all domains on a given connection + * Arguments: @conn [resource]: resource for connection + * @stats [int]: the statistic groups from VIR_DOMAIN_STATS_* + * @flags [int]: the filter flags from VIR_CONNECT_GET_ALL_DOMAINS_STATS_* + * Returns: assoc array with statistics or false on error + */ +PHP_FUNCTION(libvirt_connect_get_all_domain_stats) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + int retval = -1; + zend_long flags = 0; + zend_long stats = 0; + const char *name = NULL; + int i; + int j; + virTypedParameter params; + virDomainStatsRecordPtr *retstats = NULL; + + GET_CONNECTION_FROM_ARGS("r|l|l", &zconn, &stats, &flags); + + retval = virConnectGetAllDomainStats(conn->conn, stats, &retstats, flags); + + array_init(return_value); + if (retval < 0) + RETURN_FALSE; + + for (i = 0; i < retval; i++) { + zval *arr2; + VIRT_ARRAY_INIT(arr2); + + for (j = 0; j < retstats[i]->nparams; j++) { + params = retstats[i]->params[j]; + switch (params.type) { + case VIR_TYPED_PARAM_INT: + add_assoc_long(arr2, params.field, params.value.i); + break; + case VIR_TYPED_PARAM_UINT: + add_assoc_long(arr2, params.field, params.value.ui); + break; + case VIR_TYPED_PARAM_LLONG: + add_assoc_long(arr2, params.field, params.value.l); + break; + case VIR_TYPED_PARAM_ULLONG: + add_assoc_long(arr2, params.field, params.value.ul); + break; + case VIR_TYPED_PARAM_DOUBLE: + add_assoc_double(arr2, params.field, params.value.d); + break; + case VIR_TYPED_PARAM_BOOLEAN: + add_assoc_bool(arr2, params.field, params.value.b); + break; + case VIR_TYPED_PARAM_STRING: + VIRT_ADD_ASSOC_STRING(arr2, params.field, params.value.s); + break; + } + } + name = virDomainGetName(retstats[i]->dom); +#if PHP_MAJOR_VERSION >= 7 + zend_hash_update(Z_ARRVAL_P(return_value), zend_string_init(name, strlen(name), 0), arr2); +#else + zend_hash_update(Z_ARRVAL_P(return_value), name, strlen(name)+1, &arr2, sizeof(arr2), NULL); +#endif + } + + virDomainStatsRecordListFree(retstats); +} + diff --git a/src/libvirt-connection.h b/src/libvirt-connection.h new file mode 100644 index 0000000..2c50ec9 --- /dev/null +++ b/src/libvirt-connection.h @@ -0,0 +1,83 @@ +/* + * libvirt-connection.h: The PHP bindings to libvirt connection API + * + * See COPYING for the license of this software + */ + +#ifndef __LIBVIRT_CONNECTION_H__ +# define __LIBVIRT_CONNECTION_H__ + +# include "util.h" + +# define PHP_LIBVIRT_CONNECTION_RES_NAME "Libvirt connection" +# define INT_RESOURCE_CONNECTION 0x01 +# define CONNECT_FLAG_SOUNDHW_GET_NAMES 0x01 + +# define PHP_FE_LIBVIRT_CONNECTION \ + PHP_FE(libvirt_connect, arginfo_libvirt_connect) \ + PHP_FE(libvirt_connect_get_uri, arginfo_libvirt_conn) \ + PHP_FE(libvirt_connect_get_hostname, arginfo_libvirt_conn) \ + PHP_FE(libvirt_connect_get_hypervisor, arginfo_libvirt_conn) \ + PHP_FE(libvirt_connect_get_capabilities, arginfo_libvirt_conn_xpath) \ + PHP_FE(libvirt_connect_get_emulator, arginfo_libvirt_connect_get_emulator) \ + PHP_FE(libvirt_connect_get_nic_models, arginfo_libvirt_connect_get_emulator) \ + PHP_FE(libvirt_connect_get_soundhw_models, arginfo_libvirt_connect_get_soundhw_models) \ + PHP_FE(libvirt_connect_get_maxvcpus, arginfo_libvirt_conn) \ + PHP_FE(libvirt_connect_get_sysinfo, arginfo_libvirt_conn) \ + PHP_FE(libvirt_connect_get_encrypted, arginfo_libvirt_conn) \ + PHP_FE(libvirt_connect_get_secure, arginfo_libvirt_conn) \ + PHP_FE(libvirt_connect_get_information, arginfo_libvirt_conn) \ + PHP_FE(libvirt_connect_get_machine_types, arginfo_libvirt_conn) \ + PHP_FE(libvirt_connect_get_all_domain_stats, arginfo_libvirt_connect_get_all_domain_stats) + +# define GET_CONNECTION_FROM_ARGS(args, ...) \ + do { \ + reset_error(TSRMLS_C); \ + if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, \ + args, \ + __VA_ARGS__) == FAILURE) { \ + set_error("Invalid arguments" TSRMLS_CC); \ + RETURN_FALSE; \ + } \ + \ + VIRT_FETCH_RESOURCE(conn, php_libvirt_connection*, &zconn, \ + PHP_LIBVIRT_CONNECTION_RES_NAME, \ + le_libvirt_connection); \ + \ + if (conn == NULL || conn->conn == NULL) \ + RETURN_FALSE; \ + } while (0) + +int le_libvirt_connection; + +typedef struct _php_libvirt_connection { + virConnectPtr conn; + virt_resource_handle resource; +} php_libvirt_connection; + +typedef struct _php_libvirt_cred_value { + int count; + int type; + char *result; + unsigned int resultlen; +} php_libvirt_cred_value; + +void php_libvirt_connection_dtor(virt_resource *rsrc TSRMLS_DC); + +PHP_FUNCTION(libvirt_connect); +PHP_FUNCTION(libvirt_connect_get_uri); +PHP_FUNCTION(libvirt_connect_get_hostname); +PHP_FUNCTION(libvirt_connect_get_hypervisor); +PHP_FUNCTION(libvirt_connect_get_capabilities); +PHP_FUNCTION(libvirt_connect_get_emulator); +PHP_FUNCTION(libvirt_connect_get_nic_models); +PHP_FUNCTION(libvirt_connect_get_soundhw_models); +PHP_FUNCTION(libvirt_connect_get_maxvcpus); +PHP_FUNCTION(libvirt_connect_get_sysinfo); +PHP_FUNCTION(libvirt_connect_get_encrypted); +PHP_FUNCTION(libvirt_connect_get_secure); +PHP_FUNCTION(libvirt_connect_get_information); +PHP_FUNCTION(libvirt_connect_get_machine_types); +PHP_FUNCTION(libvirt_connect_get_all_domain_stats); + +#endif diff --git a/src/libvirt-php.c b/src/libvirt-php.c index 504a8f2..c439e24 100644 --- a/src/libvirt-php.c +++ b/src/libvirt-php.c @@ -19,11 +19,11 @@ #include "libvirt-php.h" #include "vncfunc.h" #include "sockets.h" +#include "libvirt-connection.h" DEBUG_INIT("core"); -/* PHP functions are prefixed with `zif_` so strip it */ -#define PHPFUNC (__FUNCTION__ + 4) + #ifndef EXTWIN /* Additional binaries */ @@ -35,7 +35,6 @@ const char *features_binaries[] = { NULL }; #endif /* ZEND thread safe per request globals definition */ -int le_libvirt_connection; int le_libvirt_domain; int le_libvirt_storagepool; int le_libvirt_volume; @@ -477,21 +476,7 @@ static zend_function_entry libvirt_functions[] = { /* Common functions */ PHP_FE(libvirt_get_last_error, arginfo_libvirt_void) /* Connect functions */ - PHP_FE(libvirt_connect, arginfo_libvirt_connect) - PHP_FE(libvirt_connect_get_uri, arginfo_libvirt_conn) - PHP_FE(libvirt_connect_get_hostname, arginfo_libvirt_conn) - PHP_FE(libvirt_connect_get_capabilities, arginfo_libvirt_conn_xpath) - PHP_FE(libvirt_connect_get_emulator, arginfo_libvirt_connect_get_emulator) - PHP_FE(libvirt_connect_get_nic_models, arginfo_libvirt_connect_get_emulator) - PHP_FE(libvirt_connect_get_soundhw_models, arginfo_libvirt_connect_get_soundhw_models) - PHP_FE(libvirt_connect_get_information, arginfo_libvirt_conn) - PHP_FE(libvirt_connect_get_machine_types, arginfo_libvirt_conn) - PHP_FE(libvirt_connect_get_hypervisor, arginfo_libvirt_conn) - PHP_FE(libvirt_connect_get_sysinfo, arginfo_libvirt_conn) - PHP_FE(libvirt_connect_get_maxvcpus, arginfo_libvirt_conn) - PHP_FE(libvirt_connect_get_encrypted, arginfo_libvirt_conn) - PHP_FE(libvirt_connect_get_secure, arginfo_libvirt_conn) - PHP_FE(libvirt_connect_get_all_domain_stats, arginfo_libvirt_connect_get_all_domain_stats) + PHP_FE_LIBVIRT_CONNECTION /* Stream functions */ PHP_FE(libvirt_stream_create, arginfo_libvirt_conn) PHP_FE(libvirt_stream_close, arginfo_libvirt_conn) @@ -702,21 +687,6 @@ zend_module_entry libvirt_module_entry = { ZEND_GET_MODULE(libvirt) #endif -ZEND_BEGIN_MODULE_GLOBALS(libvirt) - char *last_error; - char *vnc_location; - zend_bool longlong_to_string_ini; - char *iso_path_ini; - char *image_path_ini; - zend_long max_connections_ini; -#ifdef DEBUG_SUPPORT - int debug; -#endif - resource_info *binding_resources; - int binding_resources_count; -ZEND_END_MODULE_GLOBALS(libvirt) - -ZEND_DECLARE_MODULE_GLOBALS(libvirt) /* PHP init options */ PHP_INI_BEGIN() @@ -728,7 +698,9 @@ PHP_INI_END() void change_debug(int val TSRMLS_DC) { +#ifdef DEBUG_SUPPORT LIBVIRT_G(debug) = val; +#endif setDebug(val); } @@ -1244,28 +1216,6 @@ void free_resource(int type, void *mem TSRMLS_DC) } /* - * Private function name: free_resources_on_connection - * Since version: 0.4.2 - * Description: Function is used to free all the resources assigned to the connection identified by conn - * Arguments: @conn [virConnectPtr]: libvirt connection pointer - * Returns: None - */ -void free_resources_on_connection(virConnectPtr conn TSRMLS_DC) -{ - int binding_resources_count = 0; - resource_info *binding_resources; - int i; - - binding_resources_count = LIBVIRT_G(binding_resources_count); - binding_resources = LIBVIRT_G(binding_resources); - - for (i = 0; i < binding_resources_count; i++) { - if ((binding_resources[i].overwrite == 0) && (binding_resources[i].conn == conn)) - free_resource(binding_resources[i].type, binding_resources[i].mem TSRMLS_CC); - } -} - -/* * Private function name: check_resource_allocation * Since version: 0.4.2 * Description: Function is used to check whether the resource identified by type and memory is allocated for connection conn or not @@ -1382,30 +1332,6 @@ int is_local_connection(virConnectPtr conn) #endif } -/* Destructor for connection resource */ -static void php_libvirt_connection_dtor(virt_resource *rsrc TSRMLS_DC) -{ - php_libvirt_connection *conn = (php_libvirt_connection *)rsrc->ptr; - int rv = 0; - - if (conn != NULL) { - if (conn->conn != NULL) { - free_resources_on_connection(conn->conn TSRMLS_CC); - - rv = virConnectClose(conn->conn); - if (rv == -1) { - DPRINTF("%s: virConnectClose(%p) returned %d (%s)\n", __FUNCTION__, conn->conn, rv, LIBVIRT_G(last_error)); - php_error_docref(NULL TSRMLS_CC, E_WARNING, "virConnectClose failed with %i on destructor: %s", rv, LIBVIRT_G(last_error)); - } else { - DPRINTF("%s: virConnectClose(%p) completed successfully\n", __FUNCTION__, conn->conn); - resource_change_counter(INT_RESOURCE_CONNECTION, NULL, conn->conn, 0 TSRMLS_CC); - } - conn->conn = NULL; - } - efree(conn); - } -} - /* Destructor for domain resource */ static void php_libvirt_domain_dtor(virt_resource *rsrc TSRMLS_DC) { @@ -1949,19 +1875,6 @@ PHP_MSHUTDOWN_FUNCTION(libvirt) } /* Macros for obtaining resources from arguments */ -#define GET_CONNECTION_FROM_ARGS(args, ...) \ - do { \ - reset_error(TSRMLS_C); \ - if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, args, __VA_ARGS__) == FAILURE) { \ - set_error("Invalid arguments" TSRMLS_CC); \ - RETURN_FALSE; \ - } \ - \ - VIRT_FETCH_RESOURCE(conn, php_libvirt_connection*, &zconn, PHP_LIBVIRT_CONNECTION_RES_NAME, le_libvirt_connection);\ - if ((conn == NULL) || (conn->conn == NULL)) \ - RETURN_FALSE; \ - } while (0) \ - #define GET_DOMAIN_FROM_ARGS(args, ...) \ do { \ reset_error(TSRMLS_C); \ @@ -2079,40 +1992,6 @@ PHP_MSHUTDOWN_FUNCTION(libvirt) VIRT_RETURN_STRING(tmpnumber); \ } while (0) - -/* Authentication callback function. Should receive list of credentials via cbdata and pass the requested one to libvirt */ -static int libvirt_virConnectAuthCallback(virConnectCredentialPtr cred, unsigned int ncred, void *cbdata) -{ - TSRMLS_FETCH(); - - unsigned int i, j; - php_libvirt_cred_value *creds = (php_libvirt_cred_value *) cbdata; - for (i = 0; i < (unsigned int)ncred; i++) { - DPRINTF("%s: cred %d, type %d, prompt %s challenge %s\n ", __FUNCTION__, i, cred[i].type, cred[i].prompt, cred[i].challenge); - if (creds != NULL) - for (j = 0; j < (unsigned int)creds[0].count; j++) { - if (creds[j].type == cred[i].type) { - cred[i].resultlen = creds[j].resultlen; - cred[i].result = (char *)malloc(creds[j].resultlen + 1); - memset(cred[i].result, 0, creds[j].resultlen + 1); - strncpy(cred[i].result, creds[j].result, creds[j].resultlen); - } - } - DPRINTF("%s: result %s (%d)\n", __FUNCTION__, cred[i].result, cred[i].resultlen); - } - - return 0; -} - -static int libvirt_virConnectCredType[] = { - VIR_CRED_AUTHNAME, - VIR_CRED_ECHOPROMPT, - VIR_CRED_REALM, - VIR_CRED_PASSPHRASE, - VIR_CRED_NOECHOPROMPT, - //VIR_CRED_EXTERNAL, -}; - /* Common functions */ /* @@ -2129,117 +2008,6 @@ PHP_FUNCTION(libvirt_get_last_error) } /* - * Function name: libvirt_connect - * Since version: 0.4.1(-1) - * Description: libvirt_connect() is used to connect to the specified libvirt daemon using the specified URL, user can also set the readonly flag and/or set credentials for connection - * Arguments: @url [string]: URI for connection - * @readonly [bool]: flag whether to use read-only connection or not - * @credentials [array]: array of connection credentials - * Returns: libvirt connection resource - */ -PHP_FUNCTION(libvirt_connect) -{ - php_libvirt_connection *conn; - php_libvirt_cred_value *creds = NULL; - zval *zcreds = NULL; - zval *data; - int i; - int j; - int credscount = 0; - - virConnectAuth libvirt_virConnectAuth = { libvirt_virConnectCredType, sizeof(libvirt_virConnectCredType)/sizeof(int), libvirt_virConnectAuthCallback, NULL}; - - char *url = NULL; - strsize_t url_len = 0; - zend_bool readonly = 1; - - HashTable *arr_hash; - HashPosition pointer; - int array_count; - - zend_ulong index; - - unsigned long libVer; - - if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|sba", &url, &url_len, &readonly, &zcreds) == FAILURE) { - RETURN_FALSE; - } - - if (virGetVersion(&libVer, NULL, NULL)!= 0) - RETURN_FALSE; - - if (libVer < 6002) { - set_error("Only libvirt 0.6.2 and higher supported. Please upgrade your libvirt" TSRMLS_CC); - RETURN_FALSE; - } - - if ((count_resources(INT_RESOURCE_CONNECTION TSRMLS_CC) + 1) > LIBVIRT_G(max_connections_ini)) { - DPRINTF("%s: maximum number of connections allowed exceeded (max %lu)\n", PHPFUNC, (unsigned long)LIBVIRT_G(max_connections_ini)); - set_error("Maximum number of connections allowed exceeded" TSRMLS_CC); - RETURN_FALSE; - } - - /* If 'null' value has been passed as URL override url to NULL value to autodetect the hypervisor */ - if ((url == NULL) || (strcasecmp(url, "NULL") == 0)) - url = NULL; - - conn = (php_libvirt_connection *)emalloc(sizeof(php_libvirt_connection)); - if (zcreds == NULL) { - /* connecting without providing authentication */ - if (readonly) - conn->conn = virConnectOpenReadOnly(url); - else - conn->conn = virConnectOpen(url); - } else { - /* connecting with authentication (using callback) */ - arr_hash = Z_ARRVAL_P(zcreds); - array_count = zend_hash_num_elements(arr_hash); - - credscount = array_count; - creds = (php_libvirt_cred_value *)emalloc(credscount * sizeof(php_libvirt_cred_value)); - j = 0; - /* parse the input Array and create list of credentials. The list (array) is passed to callback function. */ - VIRT_FOREACH(arr_hash, pointer, data) { - if (Z_TYPE_P(data) == IS_STRING) { - php_libvirt_hash_key_info info; - VIRT_HASH_CURRENT_KEY_INFO(arr_hash, pointer, index, info); - - if (info.type == HASH_KEY_IS_STRING) { - PHPWRITE(info.name, info.length); - } else { - DPRINTF("%s: credentials index %d\n", PHPFUNC, (int)index); - creds[j].type = index; - creds[j].result = (char *)emalloc(Z_STRLEN_P(data) + 1); - memset(creds[j].result, 0, Z_STRLEN_P(data) + 1); - creds[j].resultlen = Z_STRLEN_P(data); - strncpy(creds[j].result, Z_STRVAL_P(data), Z_STRLEN_P(data)); - j++; - } - } - } VIRT_FOREACH_END(); - DPRINTF("%s: Found %d elements for credentials\n", PHPFUNC, j); - creds[0].count = j; - libvirt_virConnectAuth.cbdata = (void *)creds; - conn->conn = virConnectOpenAuth(url, &libvirt_virConnectAuth, readonly ? VIR_CONNECT_RO : 0); - for (i = 0; i < creds[0].count; i++) - efree(creds[i].result); - efree(creds); - } - - if (conn->conn == NULL) { - DPRINTF("%s: Cannot establish connection to %s\n", PHPFUNC, url); - efree(conn); - RETURN_FALSE; - } - - resource_change_counter(INT_RESOURCE_CONNECTION, NULL, conn->conn, 1 TSRMLS_CC); - DPRINTF("%s: Connection to %s established, returning %p\n", PHPFUNC, url, conn->conn); - - VIRT_REGISTER_RESOURCE(conn, le_libvirt_connection); - conn->resource = VIRT_RESOURCE_HANDLE(return_value); -} - -/* * Function name: libvirt_node_get_info * Since version: 0.4.1(-1) * Description: Function is used to get the information about host node, mainly total memory installed, total CPUs installed and model information are useful @@ -2530,258 +2298,6 @@ PHP_FUNCTION(libvirt_node_get_free_memory) } } -//virsh capabilities | xpath '//capabilities/guest/arch[@name="x86_64"]/machine[@maxCpus=1]' - -/* - * Function name: libvirt_connect_get_machine_types - * Since version: 0.4.9 - * Description: Function is used to get machine types supported by hypervisor on the conneciton - * Arguments: @conn [resource]: resource for connection - * Returns: array of machine types for the connection incl. maxCpus if appropriate - */ -PHP_FUNCTION(libvirt_connect_get_machine_types) -{ - zval *zconn; - php_libvirt_connection *conn = NULL; - char *caps = NULL; - char **ret = NULL; - int i, num = -1; - - GET_CONNECTION_FROM_ARGS("r", &zconn); - - caps = virConnectGetCapabilities(conn->conn); - if (caps == NULL) - RETURN_FALSE; - - array_init(return_value); - - ret = get_array_from_xpath(caps, "//capabilities/guest/arch/@name", &num); - if (ret != NULL) { - for (i = 0; i < num; i++) { - int num2, j; - char tmp[1024] = { 0 }; - - snprintf(tmp, sizeof(tmp), "//capabilities/guest/arch[@name=\"%s\"]/domain/@type", ret[i]); - char **ret2 = get_array_from_xpath(caps, tmp, &num2); - if (ret2 != NULL) { - zval *arr2; - VIRT_ARRAY_INIT(arr2); - - for (j = 0; j < num2; j++) { - int num3, k; - char tmp2[1024] = { 0 }; - zval *arr3; - - VIRT_ARRAY_INIT(arr3); - - snprintf(tmp2, sizeof(tmp2), "//capabilities/guest/arch[@name=\"%s\"]/machine", - ret[i]); - - char **ret3 = get_array_from_xpath(caps, tmp2, &num3); - if (ret3 != NULL) { - for (k = 0; k < num3; k++) { - char *numTmp = NULL; - char key[8] = { 0 }; - char tmp3[2048] = { 0 }; - - snprintf(key, sizeof(key), "%d", k); - //VIRT_ADD_ASSOC_STRING(arr2, key, ret3[k]); - - snprintf(tmp3, sizeof(tmp3), "//capabilities/guest/arch[@name=\"%s\"]/machine[text()=\"%s\"]/@maxCpus", - ret[i], ret3[k]); - - numTmp = get_string_from_xpath(caps, tmp3, NULL, NULL); - if (numTmp == NULL) { - VIRT_ADD_ASSOC_STRING(arr2, key, ret3[k]); - } else { - zval *arr4; - VIRT_ARRAY_INIT(arr4); - VIRT_ADD_ASSOC_STRING(arr4, "name", ret3[k]); - VIRT_ADD_ASSOC_STRING(arr4, "maxCpus", numTmp); - - add_assoc_zval_ex(arr2, key, strlen(key) + 1, arr4); - free(numTmp); - } - - free(ret3[k]); - } - } - - /* Domain type specific */ - snprintf(tmp2, sizeof(tmp2), "//capabilities/guest/arch[@name=\"%s\"]/domain[@type=\"%s\"]/machine", - ret[i], ret2[j]); - - ret3 = get_array_from_xpath(caps, tmp2, &num3); - if (ret3 != NULL) { - for (k = 0; k < num3; k++) { - char key[8] = { 0 }; - char tmp3[2048] = { 0 }; - char *numTmp = NULL; - - snprintf(key, sizeof(key), "%d", k); - snprintf(tmp3, sizeof(tmp3), - "//capabilities/guest/arch[@name=\"%s\"]/domain[@type=\"%s\"]/machine[text()=\"%s\"]/@maxCpus", - ret[i], ret2[j], ret3[k]); - - numTmp = get_string_from_xpath(caps, tmp3, NULL, NULL); - if (numTmp == NULL) { - VIRT_ADD_ASSOC_STRING(arr3, key, ret3[k]); - } else { - zval *arr4; - VIRT_ARRAY_INIT(arr4); - - VIRT_ADD_ASSOC_STRING(arr4, "name", ret3[k]); - VIRT_ADD_ASSOC_STRING(arr4, "maxCpus", numTmp); - - add_assoc_zval_ex(arr3, key, strlen(key) + 1, arr4); - free(numTmp); - } - - free(ret3[k]); - } - - add_assoc_zval_ex(arr2, ret2[j], strlen(ret2[j]) + 1, arr3); - } - } - //free(ret2[j]); - - add_assoc_zval_ex(return_value, ret[i], strlen(ret[i]) + 1, arr2); - } - free(ret[i]); - } - } -} - -/* - * Function name: libvirt_connect_get_information - * Since version: 0.4.1(-2) - * Description: Function is used to get the information about the connection - * Arguments: @conn [resource]: resource for connection - * Returns: array of information about the connection - */ -PHP_FUNCTION(libvirt_connect_get_information) -{ - zval *zconn; - char *tmp; - unsigned long hvVer = 0; - const char *type = NULL; - char hvStr[64] = { 0 }; - int iTmp = -1, maxvcpus = -1; - php_libvirt_connection *conn = NULL; - - GET_CONNECTION_FROM_ARGS("r", &zconn); - - tmp = virConnectGetURI(conn->conn); - DPRINTF("%s: Got connection URI of %s...\n", PHPFUNC, tmp); - array_init(return_value); - VIRT_ADD_ASSOC_STRING(return_value, "uri", tmp ? tmp : "unknown"); - free(tmp); - tmp = virConnectGetHostname(conn->conn); - VIRT_ADD_ASSOC_STRING(return_value, "hostname", tmp ? tmp : "unknown"); - free(tmp); - - if ((virConnectGetVersion(conn->conn, &hvVer) == 0) && (type = virConnectGetType(conn->conn))) { - VIRT_ADD_ASSOC_STRING(return_value, "hypervisor", (char *)type); - add_assoc_long(return_value, "hypervisor_major", (long)((hvVer/1000000) % 1000)); - add_assoc_long(return_value, "hypervisor_minor", (long)((hvVer/1000) % 1000)); - add_assoc_long(return_value, "hypervisor_release", (long)(hvVer % 1000)); - snprintf(hvStr, sizeof(hvStr), "%s %d.%d.%d", type, - (long)((hvVer/1000000) % 1000), (long)((hvVer/1000) % 1000), (long)(hvVer % 1000)); - VIRT_ADD_ASSOC_STRING(return_value, "hypervisor_string", hvStr); - } - - if (strcmp(type, "QEMU") == 0) { - /* For QEMU the value is not reliable so we return -1 instead */ - maxvcpus = -1; - } else { - maxvcpus = virConnectGetMaxVcpus(conn->conn, type); - } - - add_assoc_long(return_value, "hypervisor_maxvcpus", maxvcpus); - iTmp = virConnectIsEncrypted(conn->conn); - if (iTmp == 1) - VIRT_ADD_ASSOC_STRING(return_value, "encrypted", "Yes"); - else - if (iTmp == 0) - VIRT_ADD_ASSOC_STRING(return_value, "encrypted", "No"); - else - VIRT_ADD_ASSOC_STRING(return_value, "encrypted", "unknown"); - - iTmp = virConnectIsSecure(conn->conn); - if (iTmp == 1) - VIRT_ADD_ASSOC_STRING(return_value, "secure", "Yes"); - else - if (iTmp == 0) - VIRT_ADD_ASSOC_STRING(return_value, "secure", "No"); - else - VIRT_ADD_ASSOC_STRING(return_value, "secure", "unknown"); - - add_assoc_long(return_value, "num_inactive_domains", virConnectNumOfDefinedDomains(conn->conn)); - add_assoc_long(return_value, "num_inactive_interfaces", virConnectNumOfDefinedInterfaces(conn->conn)); - add_assoc_long(return_value, "num_inactive_networks", virConnectNumOfDefinedNetworks(conn->conn)); - add_assoc_long(return_value, "num_inactive_storagepools", virConnectNumOfDefinedStoragePools(conn->conn)); - - add_assoc_long(return_value, "num_active_domains", virConnectNumOfDomains(conn->conn)); - add_assoc_long(return_value, "num_active_interfaces", virConnectNumOfInterfaces(conn->conn)); - add_assoc_long(return_value, "num_active_networks", virConnectNumOfNetworks(conn->conn)); - add_assoc_long(return_value, "num_active_storagepools", virConnectNumOfStoragePools(conn->conn)); - - add_assoc_long(return_value, "num_total_domains", virConnectNumOfDomains(conn->conn) + virConnectNumOfDefinedDomains(conn->conn)); - add_assoc_long(return_value, "num_total_interfaces", virConnectNumOfInterfaces(conn->conn) + virConnectNumOfDefinedInterfaces(conn->conn)); - add_assoc_long(return_value, "num_total_networks", virConnectNumOfNetworks(conn->conn) + virConnectNumOfDefinedNetworks(conn->conn)); - add_assoc_long(return_value, "num_total_storagepools", virConnectNumOfStoragePools(conn->conn) + virConnectNumOfDefinedStoragePools(conn->conn)); - - add_assoc_long(return_value, "num_secrets", virConnectNumOfSecrets(conn->conn)); - add_assoc_long(return_value, "num_nwfilters", virConnectNumOfNWFilters(conn->conn)); -} - -/* - * Function name: libvirt_connect_get_uri - * Since version: 0.4.1(-1) - * Description: Function is used to get the connection URI. This is useful to check the hypervisor type of host machine when using "null" uri to libvirt_connect() - * Arguments: @conn [resource]: resource for connection - * Returns: connection URI string or FALSE for error - */ -PHP_FUNCTION(libvirt_connect_get_uri) -{ - zval *zconn; - char *uri; - php_libvirt_connection *conn = NULL; - - GET_CONNECTION_FROM_ARGS("r", &zconn); - uri = virConnectGetURI(conn->conn); - DPRINTF("%s: virConnectGetURI returned %s\n", PHPFUNC, uri); - if (uri == NULL) - RETURN_FALSE; - - VIRT_RETVAL_STRING(uri); - free(uri); -} - -/* - * Function name: libvirt_connect_get_hostname - * Since version: 0.4.1(-1) - * Description: Function is used to get the hostname of the guest associated with the connection - * Arguments: @conn [resource]: resource for connection - * Returns: hostname of the host node or FALSE for error - */ -PHP_FUNCTION(libvirt_connect_get_hostname) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - char *hostname; - - GET_CONNECTION_FROM_ARGS("r", &zconn); - - hostname = virConnectGetHostname(conn->conn); - DPRINTF("%s: virConnectGetHostname returned %s\n", PHPFUNC, hostname); - if (hostname == NULL) - RETURN_FALSE; - - VIRT_RETVAL_STRING(hostname); - free(hostname); -} - /* * Function name: libvirt_image_create * Since version: 0.4.2 @@ -2903,197 +2419,6 @@ PHP_FUNCTION(libvirt_image_remove) } /* - * Function name: libvirt_connect_get_hypervisor - * Since version: 0.4.1(-2) - * Description: Function is used to get the information about the hypervisor on the connection identified by the connection pointer - * Arguments: @conn [resource]: resource for connection - * Returns: array of hypervisor information if available - */ -PHP_FUNCTION(libvirt_connect_get_hypervisor) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - unsigned long hvVer = 0; - const char *type = NULL; - char hvStr[64] = { 0 }; - - GET_CONNECTION_FROM_ARGS("r", &zconn); - - if (virConnectGetVersion(conn->conn, &hvVer) != 0) - RETURN_FALSE; - - type = virConnectGetType(conn->conn); - if (type == NULL) - RETURN_FALSE; - - DPRINTF("%s: virConnectGetType returned %s\n", PHPFUNC, type); - - array_init(return_value); - VIRT_ADD_ASSOC_STRING(return_value, "hypervisor", (char *)type); - add_assoc_long(return_value, "major", (long)((hvVer/1000000) % 1000)); - add_assoc_long(return_value, "minor", (long)((hvVer/1000) % 1000)); - add_assoc_long(return_value, "release", (long)(hvVer % 1000)); - - snprintf(hvStr, sizeof(hvStr), "%s %d.%d.%d", type, - (long)((hvVer/1000000) % 1000), (long)((hvVer/1000) % 1000), (long)(hvVer % 1000)); - VIRT_ADD_ASSOC_STRING(return_value, "hypervisor_string", hvStr); -} - -/* - * Function name: libvirt_connect_is_encrypted - * Since version: 0.4.1(-2) - * Description: Function is used to get the information whether the connection is encrypted or not - * Arguments: @conn [resource]: resource for connection - * Returns: 1 if encrypted, 0 if not encrypted, -1 on error - */ -PHP_FUNCTION(libvirt_connect_get_encrypted) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - - GET_CONNECTION_FROM_ARGS("r", &zconn); - - RETURN_LONG(virConnectIsEncrypted(conn->conn)); -} - - -/* - * Function name: libvirt_connect_is_secure - * Since version: 0.4.1(-2) - * Description: Function is used to get the information whether the connection is secure or not - * Arguments: @conn [resource]: resource for connection - * Returns: 1 if secure, 0 if not secure, -1 on error - */ -PHP_FUNCTION(libvirt_connect_get_secure) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - - GET_CONNECTION_FROM_ARGS("r", &zconn); - - RETURN_LONG(virConnectIsSecure(conn->conn)); -} - - -/* - * Function name: libvirt_connect_get_all_domain_stats - * Since version: 0.5.1(-1) - * Description: Query statistics for all domains on a given connection - * Arguments: @conn [resource]: resource for connection - * @stats [int]: the statistic groups from VIR_DOMAIN_STATS_* - * @flags [int]: the filter flags from VIR_CONNECT_GET_ALL_DOMAINS_STATS_* - * Returns: assoc array with statistics or false on error - */ -PHP_FUNCTION(libvirt_connect_get_all_domain_stats) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - int retval = -1; - zend_long flags = 0; - zend_long stats = 0; - const char *name = NULL; - int i; - int j; - virTypedParameter params; - virDomainStatsRecordPtr *retstats = NULL; - - GET_CONNECTION_FROM_ARGS("r|l|l", &zconn, &stats, &flags); - - retval = virConnectGetAllDomainStats(conn->conn, stats, &retstats, flags); - - array_init(return_value); - if (retval < 0) - RETURN_FALSE; - - for (i = 0; i < retval; i++) { - zval *arr2; - VIRT_ARRAY_INIT(arr2); - - for (j = 0; j < retstats[i]->nparams; j++) { - params = retstats[i]->params[j]; - switch (params.type) { - case VIR_TYPED_PARAM_INT: - add_assoc_long(arr2, params.field, params.value.i); - break; - case VIR_TYPED_PARAM_UINT: - add_assoc_long(arr2, params.field, params.value.ui); - break; - case VIR_TYPED_PARAM_LLONG: - add_assoc_long(arr2, params.field, params.value.l); - break; - case VIR_TYPED_PARAM_ULLONG: - add_assoc_long(arr2, params.field, params.value.ul); - break; - case VIR_TYPED_PARAM_DOUBLE: - add_assoc_double(arr2, params.field, params.value.d); - break; - case VIR_TYPED_PARAM_BOOLEAN: - add_assoc_bool(arr2, params.field, params.value.b); - break; - case VIR_TYPED_PARAM_STRING: - VIRT_ADD_ASSOC_STRING(arr2, params.field, params.value.s); - break; - } - } - name = virDomainGetName(retstats[i]->dom); -#if PHP_MAJOR_VERSION >= 7 - zend_hash_update(Z_ARRVAL_P(return_value), zend_string_init(name, strlen(name), 0), arr2); -#else - zend_hash_update(Z_ARRVAL_P(return_value), name, strlen(name)+1, &arr2, sizeof(arr2), NULL); -#endif - } - - virDomainStatsRecordListFree(retstats); -} - - - -/* - * Function name: libvirt_connect_get_maxvcpus - * Since version: 0.4.1(-2) - * Description: Function is used to get maximum number of VCPUs per VM on the hypervisor connection - * Arguments: @conn [resource]: resource for connection - * Returns: number of VCPUs available per VM on the connection or FALSE for error - */ -PHP_FUNCTION(libvirt_connect_get_maxvcpus) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - const char *type = NULL; - - GET_CONNECTION_FROM_ARGS("r", &zconn); - - type = virConnectGetType(conn->conn); - if (type == NULL) - RETURN_FALSE; - - RETURN_LONG(virConnectGetMaxVcpus(conn->conn, type)); -} - -/* - * Function name: libvirt_connect_get_sysinfo - * Since version: 0.4.1(-2) - * Description: Function is used to get the system information from connection if available - * Arguments: @conn [resource]: resource for connection - * Returns: XML description of system information from the connection or FALSE for error - */ -PHP_FUNCTION(libvirt_connect_get_sysinfo) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - char *sysinfo; - - GET_CONNECTION_FROM_ARGS("r", &zconn); - - sysinfo = virConnectGetSysinfo(conn->conn, 0); - if (sysinfo == NULL) - RETURN_FALSE; - - VIRT_RETVAL_STRING(sysinfo); - free(sysinfo); -} - -/* * Private function name: get_string_from_xpath * Since version: 0.4.1(-1) * Description: Function is used to get the XML xPath expression from the XML document. This can be added to val array if not NULL. @@ -5101,240 +4426,6 @@ PHP_FUNCTION(libvirt_domain_get_next_dev_ids) add_assoc_long(return_value, "next_func", func); } -/* - * Function name: libvirt_connect_get_capabilities - * Since version: 0.4.1(-2) - * Description: Function is used to get the capabilities information from the connection - * Arguments: @conn [resource]: resource for connection - * @xpath [string]: optional xPath query to be applied on the result - * Returns: capabilities XML from the connection or FALSE for error - */ -PHP_FUNCTION(libvirt_connect_get_capabilities) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - char *caps; - char *xpath = NULL; - strsize_t xpath_len; - char *tmp = NULL; - int retval = -1; - - GET_CONNECTION_FROM_ARGS("r|s", &zconn, &xpath, &xpath_len); - - caps = virConnectGetCapabilities(conn->conn); - if (caps == NULL) - RETURN_FALSE; - - tmp = get_string_from_xpath(caps, xpath, NULL, &retval); - if ((tmp == NULL) || (retval < 0)) { - VIRT_RETVAL_STRING(caps); - } else { - VIRT_RETVAL_STRING(tmp); - } - - free(caps); - free(tmp); -} - -/* - * Function name: libvirt_connect_get_emulator - * Since version: 0.4.5 - * Description: Function is used to get the emulator for requested connection/architecture - * Arguments: @conn [resource]: libvirt connection resource - * @arch [string]: optional architecture string, can be NULL to get default - * Returns: path to the emulator - */ -PHP_FUNCTION(libvirt_connect_get_emulator) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - char *arch = NULL; - strsize_t arch_len; - char *tmp; - - GET_CONNECTION_FROM_ARGS("r|s", &zconn, &arch, &arch_len); - - if ((arch == NULL) || (arch_len == 0)) - arch = NULL; - - tmp = connection_get_emulator(conn->conn, arch TSRMLS_CC); - if (tmp == NULL) { - set_error("Cannot get emulator" TSRMLS_CC); - RETURN_FALSE; - } - - VIRT_RETVAL_STRING(tmp); - free(tmp); -} - -/* - * Function name: libvirt_connect_get_nic_models - * Since version: 0.4.9 - * Description: Function is used to get NIC models for requested connection/architecture - * Arguments: @conn [resource]: libvirt connection resource - * @arch [string]: optional architecture string, can be NULL to get default - * Returns: array of models - */ -PHP_FUNCTION(libvirt_connect_get_nic_models) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - char *arch = NULL; - strsize_t arch_len; - char *tmp; - - GET_CONNECTION_FROM_ARGS("r|s", &zconn, &arch, &arch_len); - - /* Disable getting it on remote connections */ - if (!is_local_connection(conn->conn)) { - set_error("This function works only on local connections" TSRMLS_CC); - RETURN_FALSE; - } - - /* This approach is working only for QEMU driver so bails if not currently using it */ - if (strcmp(virConnectGetType(conn->conn), "QEMU") != 0) { - set_error("This function can be used only for QEMU driver" TSRMLS_CC); - RETURN_FALSE; - } - -#ifndef EXTWIN - if ((arch == NULL) || (arch_len == 0)) - arch = NULL; - - tmp = connection_get_emulator(conn->conn, arch TSRMLS_CC); - if (tmp == NULL) { - set_error("Cannot get emulator" TSRMLS_CC); - RETURN_FALSE; - } - - char cmd[4096] = { 0 }; - char tmp2[16] = { 0 }; - snprintf(cmd, sizeof(cmd), "%s -net nic,model=? 2>&1", tmp); - - FILE *fp = popen(cmd, "r"); - if (fp == NULL) - RETURN_FALSE; - - array_init(return_value); - while (!feof(fp)) { - memset(cmd, 0, sizeof(cmd)); - if (!fgets(cmd, sizeof(cmd), fp)) - break; - - if ((tmp = strstr(cmd, "Supported NIC models:")) != NULL) { - tmp = strstr(tmp, ":") + 2; - - int i; - tTokenizer t = tokenize(tmp, ","); - for (i = 0; i < t.numTokens; i++) { - snprintf(tmp2, sizeof(tmp2), "%d", i); - VIRT_ADD_ASSOC_STRING(return_value, tmp2, t.tokens[i]); - } - free_tokens(t); - } - } - fclose(fp); -#endif -} - -/* - * Function name: libvirt_connect_get_soundhw_models - * Since version: 0.4.9 - * Description: Function is used to get sound hardware models for requested connection/architecture - * Arguments: @conn [resource]: libvirt connection resource - * @arch [string]: optional architecture string, can be NULL to get default - * @flags [int]: flags for getting sound hardware. Can be either 0 or VIR_CONNECT_SOUNDHW_GET_NAMES - * Returns: array of models - */ -PHP_FUNCTION(libvirt_connect_get_soundhw_models) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - char *arch = NULL; - strsize_t arch_len; - char *tmp; - zend_long flags = 0; - - GET_CONNECTION_FROM_ARGS("r|sl", &zconn, &arch, &arch_len, &flags); - - if ((arch == NULL) || (arch_len == 0)) - arch = NULL; - - /* Disable getting it on remote connections */ - if (!is_local_connection(conn->conn)) { - set_error("This function works only on local connections" TSRMLS_CC); - RETURN_FALSE; - } - -#ifndef EXTWIN - /* This approach is working only for QEMU driver so bails if not currently using it */ - if (strcmp(virConnectGetType(conn->conn), "QEMU") != 0) { - set_error("This function can be used only for QEMU driver" TSRMLS_CC); - RETURN_FALSE; - } - - tmp = connection_get_emulator(conn->conn, arch TSRMLS_CC); - if (tmp == NULL) { - set_error("Cannot get emulator" TSRMLS_CC); - RETURN_FALSE; - } - - char cmd[4096] = { 0 }; - snprintf(cmd, sizeof(cmd), "%s -soundhw help 2>&1", tmp); - - FILE *fp = popen(cmd, "r"); - if (fp == NULL) - RETURN_FALSE; - - short inFunc = 0; - - int n = 0; - array_init(return_value); - while (!feof(fp)) { - memset(cmd, 0, sizeof(cmd)); - if (!fgets(cmd, sizeof(cmd), fp)) - break; - - if (strncmp(cmd, "Valid ", 6) == 0) { - inFunc = 1; - continue; - } else - if (strlen(cmd) < 2) - inFunc = 0; - - if (inFunc) { - int i = 0; - char desc[1024] = { 0 }; - tTokenizer t = tokenize(cmd, " "); - if (t.numTokens == 0) - continue; - - if ((i > 0) && (flags & CONNECT_FLAG_SOUNDHW_GET_NAMES)) { - zval *arr; - memset(desc, 0, sizeof(desc)); - for (i = 1; i < t.numTokens; i++) { - strcat(desc, t.tokens[i]); - if (i < t.numTokens - 1) - strcat(desc, " "); - } - - VIRT_ARRAY_INIT(arr); - VIRT_ADD_ASSOC_STRING(arr, "name", t.tokens[0]); - VIRT_ADD_ASSOC_STRING(arr, "description", desc); - add_next_index_zval(return_value, arr); - } else { - char tmp2[16] = { 0 }; - snprintf(tmp2, sizeof(tmp2), "%d", n++); - VIRT_ADD_ASSOC_STRING(return_value, tmp2, t.tokens[0]); - } - - free_tokens(t); - } - } - fclose(fp); -#endif -} - void parse_array(zval *arr, tVMDisk *disk, tVMNetwork *network) { HashTable *arr_hash; diff --git a/src/libvirt-php.h b/src/libvirt-php.h index aa3fbf3..85fdae2 100644 --- a/src/libvirt-php.h +++ b/src/libvirt-php.h @@ -28,10 +28,10 @@ #endif #ifndef VERSION -#define VERSION "0.5.1" +#define VERSION "0.5.5" #define VERSION_MAJOR 0 #define VERSION_MINOR 5 -#define VERSION_MICRO 1 +#define VERSION_MICRO 5 #endif #include <libvirt/libvirt.h> @@ -88,17 +88,15 @@ typedef uint64_t arch_uint; #define UINTx PRIx64 #endif -typedef struct tTokenizer { - char **tokens; - int numTokens; -} tTokenizer; +# define DEBUG_SUPPORT -typedef struct _resource_info { - int type; - virConnectPtr conn; - void *mem; - int overwrite; -} resource_info; +# ifdef DEBUG_SUPPORT +# define DEBUG_CORE +# define DEBUG_VNC +# endif + +/* PHP functions are prefixed with `zif_` so strip it */ +# define PHPFUNC (__FUNCTION__ + 4) #ifdef ZTS #define LIBVIRT_G(v) TSRMG(libvirt_globals_id, zend_libvirt_globals *, v) @@ -109,9 +107,6 @@ typedef struct _resource_info { #define PHP_LIBVIRT_WORLD_VERSION VERSION #define PHP_LIBVIRT_WORLD_EXTNAME "libvirt" -/* Connect flags */ -#define CONNECT_FLAG_SOUNDHW_GET_NAMES 0x01 - /* Domain flags */ #define DOMAIN_FLAG_FEATURE_ACPI 0x01 #define DOMAIN_FLAG_FEATURE_APIC 0x02 @@ -126,7 +121,6 @@ typedef struct _resource_info { #define DOMAIN_DISK_ACCESS_ALL 0x04 /* Internal resource identifier objects */ -#define INT_RESOURCE_CONNECTION 0x01 #define INT_RESOURCE_DOMAIN 0x02 #define INT_RESOURCE_NETWORK 0x04 #define INT_RESOURCE_NODEDEV 0x08 @@ -136,6 +130,18 @@ typedef struct _resource_info { #define INT_RESOURCE_STREAM 0x50 #define INT_RESOURCE_NWFILTER 0x60 +typedef struct tTokenizer { + char **tokens; + int numTokens; +} tTokenizer; + +typedef struct _resource_info { + int type; + virConnectPtr conn; + void *mem; + int overwrite; +} resource_info; + typedef struct tVMDisk { char *path; char *driver; @@ -151,12 +157,10 @@ typedef struct tVMNetwork { char *model; } tVMNetwork; -/* Libvirt-php types */ -typedef struct _php_libvirt_connection { - virConnectPtr conn; - virt_resource_handle resource; -} php_libvirt_connection; +/* TODO: temporary forward declaration until other parts are "modularized" */ +typedef struct _php_libvirt_connection php_libvirt_connection; +/* Libvirt-php types */ typedef struct _php_libvirt_stream { virStreamPtr stream; php_libvirt_connection* conn; @@ -197,25 +201,42 @@ typedef struct _php_libvirt_nwfilter { php_libvirt_connection* conn; } php_libvirt_nwfilter; -typedef struct _php_libvirt_cred_value { - int count; - int type; - char *result; - unsigned int resultlen; -} php_libvirt_cred_value; - typedef struct _php_libvirt_hash_key_info { char *name; unsigned int length; unsigned int type; } php_libvirt_hash_key_info; +ZEND_BEGIN_MODULE_GLOBALS(libvirt) + char *last_error; + char *vnc_location; + zend_bool longlong_to_string_ini; + char *iso_path_ini; + char *image_path_ini; + zend_long max_connections_ini; +# ifdef DEBUG_SUPPORT + int debug; +# endif + resource_info *binding_resources; + int binding_resources_count; +ZEND_END_MODULE_GLOBALS(libvirt) + +ZEND_DECLARE_MODULE_GLOBALS(libvirt) + /* Private definitions */ +void set_error(char *msg TSRMLS_DC); +void reset_error(TSRMLS_D); +int count_resources(int type TSRMLS_DC); +int resource_change_counter(int type, virConnectPtr conn, void *mem, int inc TSRMLS_DC); +void free_resource(int type, void *mem TSRMLS_DC); +char *connection_get_emulator(virConnectPtr conn, char *arch TSRMLS_DC); +int is_local_connection(virConnectPtr conn); +tTokenizer tokenize(char *string, char *by); +void free_tokens(tTokenizer t); int set_logfile(char *filename, long maxsize TSRMLS_DC); char *get_string_from_xpath(char *xml, char *xpath, zval **val, int *retVal); char **get_array_from_xpath(char *xml, char *xpath, int *num); -#define PHP_LIBVIRT_CONNECTION_RES_NAME "Libvirt connection" #define PHP_LIBVIRT_DOMAIN_RES_NAME "Libvirt domain" #define PHP_LIBVIRT_STREAM_RES_NAME "Libvirt stream" #define PHP_LIBVIRT_STORAGEPOOL_RES_NAME "Libvirt storagepool" @@ -233,22 +254,6 @@ PHP_MINFO_FUNCTION(libvirt); /* Common functions */ PHP_FUNCTION(libvirt_get_last_error); -/* Connect functions */ -PHP_FUNCTION(libvirt_connect); -PHP_FUNCTION(libvirt_connect_get_uri); -PHP_FUNCTION(libvirt_connect_get_hostname); -PHP_FUNCTION(libvirt_connect_get_hypervisor); -PHP_FUNCTION(libvirt_connect_get_capabilities); -PHP_FUNCTION(libvirt_connect_get_emulator); -PHP_FUNCTION(libvirt_connect_get_nic_models); -PHP_FUNCTION(libvirt_connect_get_soundhw_models); -PHP_FUNCTION(libvirt_connect_get_maxvcpus); -PHP_FUNCTION(libvirt_connect_get_sysinfo); -PHP_FUNCTION(libvirt_connect_get_encrypted); -PHP_FUNCTION(libvirt_connect_get_secure); -PHP_FUNCTION(libvirt_connect_get_information); -PHP_FUNCTION(libvirt_connect_get_machine_types); -PHP_FUNCTION(libvirt_connect_get_all_domain_stats); /* Node functions */ PHP_FUNCTION(libvirt_node_get_info); PHP_FUNCTION(libvirt_node_get_cpu_stats); diff --git a/src/util.h b/src/util.h index 949dea3..17846a1 100644 --- a/src/util.h +++ b/src/util.h @@ -30,13 +30,6 @@ # endif #endif -# define DEBUG_SUPPORT - -# ifdef DEBUG_SUPPORT -# define DEBUG_CORE -# define DEBUG_VNC -# endif - # define DEBUG_INIT(source) \ static const char *debugSource = "" source "" -- 2.13.3

--- src/Makefile.am | 3 +- src/libvirt-connection.c | 1 + src/libvirt-connection.h | 2 - src/libvirt-node.c | 305 ++++++++++++++++++++++++++++++++++++++++++++ src/libvirt-node.h | 23 ++++ src/libvirt-php.c | 322 +---------------------------------------------- src/libvirt-php.h | 6 - src/util.h | 25 ++++ 8 files changed, 358 insertions(+), 329 deletions(-) create mode 100644 src/libvirt-node.c create mode 100644 src/libvirt-node.h diff --git a/src/Makefile.am b/src/Makefile.am index 0819dc6..ba2be62 100644 --- a/src/Makefile.am +++ b/src/Makefile.am @@ -22,7 +22,8 @@ libvirt_php_la_SOURCES = \ vncfunc.c vncfunc.h \ sockets.c sockets.h \ libvirt-php.c libvirt-php.h \ - libvirt-connection.c libvirt-connection.h + libvirt-connection.c libvirt-connection.h \ + libvirt-node.c libvirt-node.h libvirt_php_la_CFLAGS = \ $(AM_CFLAGS) \ -DCOMPILE_DL_LIBVIRT=1 diff --git a/src/libvirt-connection.c b/src/libvirt-connection.c index bcebd44..7e72333 100644 --- a/src/libvirt-connection.c +++ b/src/libvirt-connection.c @@ -6,6 +6,7 @@ #include <libvirt/libvirt.h> +#include "libvirt-php.h" #include "libvirt-connection.h" DEBUG_INIT("connection"); diff --git a/src/libvirt-connection.h b/src/libvirt-connection.h index 2c50ec9..0cae5ec 100644 --- a/src/libvirt-connection.h +++ b/src/libvirt-connection.h @@ -7,8 +7,6 @@ #ifndef __LIBVIRT_CONNECTION_H__ # define __LIBVIRT_CONNECTION_H__ -# include "util.h" - # define PHP_LIBVIRT_CONNECTION_RES_NAME "Libvirt connection" # define INT_RESOURCE_CONNECTION 0x01 # define CONNECT_FLAG_SOUNDHW_GET_NAMES 0x01 diff --git a/src/libvirt-node.c b/src/libvirt-node.c new file mode 100644 index 0000000..e578802 --- /dev/null +++ b/src/libvirt-node.c @@ -0,0 +1,305 @@ +/* + * libvirt-node.c: The PHP bindings to libvirt connection API + * + * See COPYING for the license of this software + */ + +#include <libvirt/libvirt.h> + +#include "libvirt-php.h" +#include "libvirt-connection.h" +#include "libvirt-node.h" + +DEBUG_INIT("node"); + +/* + * Function name: libvirt_node_get_info + * Since version: 0.4.1(-1) + * Description: Function is used to get the information about host node, mainly total memory installed, total CPUs installed and model information are useful + * Arguments: @conn [resource]: resource for connection + * Returns: array of node information or FALSE for error + */ +PHP_FUNCTION(libvirt_node_get_info) +{ + virNodeInfo info; + php_libvirt_connection *conn = NULL; + zval *zconn; + int retval; + + GET_CONNECTION_FROM_ARGS("r", &zconn); + + retval = virNodeGetInfo (conn->conn, &info); + DPRINTF("%s: virNodeGetInfo returned %d\n", PHPFUNC, retval); + if (retval == -1) + RETURN_FALSE; + + array_init(return_value); + VIRT_ADD_ASSOC_STRING(return_value, "model", info.model); + add_assoc_long(return_value, "memory", (long)info.memory); + add_assoc_long(return_value, "cpus", (long)info.cpus); + add_assoc_long(return_value, "nodes", (long)info.nodes); + add_assoc_long(return_value, "sockets", (long)info.sockets); + add_assoc_long(return_value, "cores", (long)info.cores); + add_assoc_long(return_value, "threads", (long)info.threads); + add_assoc_long(return_value, "mhz", (long)info.mhz); +} + +/* + * Function name: libvirt_node_get_cpu_stats + * Since version: 0.4.6 + * Description: Function is used to get the CPU stats per nodes + * Arguments: @conn [resource]: resource for connection + * @cpunr [int]: CPU number to get information about, defaults to VIR_NODE_CPU_STATS_ALL_CPUS to get information about all CPUs + * Returns: array of node CPU statistics including time (in seconds since UNIX epoch), cpu number and total number of CPUs on node or FALSE for error + */ +PHP_FUNCTION(libvirt_node_get_cpu_stats) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + int cpuNum = VIR_NODE_CPU_STATS_ALL_CPUS; + virNodeCPUStatsPtr params; + virNodeInfo info; + zend_long cpunr = -1; + int nparams = 0; + int i, j, numCpus; + + GET_CONNECTION_FROM_ARGS("r|l", &zconn, &cpunr); + + if (virNodeGetInfo(conn->conn, &info) != 0) { + set_error("Cannot get number of CPUs" TSRMLS_CC); + RETURN_FALSE; + } + + numCpus = info.cpus; + if (cpunr > numCpus - 1) { + char tmp[256] = { 0 }; + snprintf(tmp, sizeof(tmp), "Invalid CPU number, valid numbers in range 0 to %d or VIR_NODE_CPU_STATS_ALL_CPUS", + numCpus - 1); + set_error(tmp TSRMLS_CC); + + RETURN_FALSE; + } + + cpuNum = (int)cpunr; + + if (virNodeGetCPUStats(conn->conn, cpuNum, NULL, &nparams, 0) != 0) { + set_error("Cannot get number of CPU stats" TSRMLS_CC); + RETURN_FALSE; + } + + if (nparams == 0) + RETURN_TRUE; + + DPRINTF("%s: Number of parameters got from virNodeGetCPUStats is %d\n", __FUNCTION__, nparams); + + params = (virNodeCPUStatsPtr)calloc(nparams, nparams * sizeof(*params)); + + array_init(return_value); + for (i = 0; i < 2; i++) { + zval *arr; + + if (i > 0) +#ifdef EXTWIN + Sleep(1000); +#else + sleep(1); +#endif + + if (virNodeGetCPUStats(conn->conn, cpuNum, params, &nparams, 0) != 0) { + set_error("Unable to get node cpu stats" TSRMLS_CC); + RETURN_FALSE; + } + + VIRT_ARRAY_INIT(arr); + + for (j = 0; j < nparams; j++) { + DPRINTF("%s: Field %s has value of %llu\n", __FUNCTION__, params[j].field, params[j].value); + + add_assoc_long(arr, params[j].field, params[j].value); + } + + add_assoc_long(arr, "time", time(NULL)); + + add_index_zval(return_value, i, arr); + } + + add_assoc_long(return_value, "cpus", numCpus); + if (cpuNum >= 0) { + add_assoc_long(return_value, "cpu", cpunr); + } else { + if (cpuNum == VIR_NODE_CPU_STATS_ALL_CPUS) + VIRT_ADD_ASSOC_STRING(return_value, "cpu", "all"); + else + VIRT_ADD_ASSOC_STRING(return_value, "cpu", "unknown"); + } + + free(params); + params = NULL; +} + +/* + * Function name: libvirt_node_get_cpu_stats_for_each_cpu + * Since version: 0.4.6 + * Description: Function is used to get the CPU stats for each CPU on the host node + * Arguments: @conn [resource]: resource for connection + * @time [int]: time in seconds to get the information about, without aggregation for further processing + * Returns: array of node CPU statistics for each CPU including time (in seconds since UNIX epoch), cpu number and total number of CPUs on node or FALSE for error + */ +PHP_FUNCTION(libvirt_node_get_cpu_stats_for_each_cpu) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + virNodeCPUStatsPtr params; + virNodeInfo info; + int nparams = 0; + zend_long avg = 0, iter = 0; + int done = 0; + int i, j, numCpus; + time_t startTime = 0; + zval *time_array; + + GET_CONNECTION_FROM_ARGS("r|l", &zconn, &avg); + + if (virNodeGetInfo(conn->conn, &info) != 0) { + set_error("Cannot get number of CPUs" TSRMLS_CC); + RETURN_FALSE; + } + + if (virNodeGetCPUStats(conn->conn, VIR_NODE_CPU_STATS_ALL_CPUS, NULL, &nparams, 0) != 0) { + set_error("Cannot get number of CPU stats" TSRMLS_CC); + RETURN_FALSE; + } + + if (nparams == 0) + RETURN_TRUE; + + DPRINTF("%s: Number of parameters got from virNodeGetCPUStats is %d\n", __FUNCTION__, nparams); + + params = (virNodeCPUStatsPtr)calloc(nparams, nparams * sizeof(*params)); + + numCpus = info.cpus; + array_init(return_value); + + startTime = time(NULL); + + iter = 0; + done = 0; + while (!done) { + zval *arr; + VIRT_ARRAY_INIT(arr); + + for (i = 0; i < numCpus; i++) { + zval *arr2; + + if (virNodeGetCPUStats(conn->conn, i, params, &nparams, 0) != 0) { + set_error("Unable to get node cpu stats" TSRMLS_CC); + RETURN_FALSE; + } + + VIRT_ARRAY_INIT(arr2); + + for (j = 0; j < nparams; j++) + add_assoc_long(arr2, params[j].field, params[j].value); + + add_assoc_long(arr, "time", time(NULL)); + add_index_zval(arr, i, arr2); + } + + add_index_zval(return_value, iter, arr); + + if ((avg <= 0) || (iter == avg - 1)) { + done = 1; + break; + } + +#ifndef EXTWIN + sleep(1); +#else + Sleep(1000); +#endif + iter++; + } + + VIRT_ARRAY_INIT(time_array); + add_assoc_long(time_array, "start", startTime); + add_assoc_long(time_array, "finish", time(NULL)); + add_assoc_long(time_array, "duration", time(NULL) - startTime); + + add_assoc_zval(return_value, "times", time_array); + + free(params); + params = NULL; +} + +/* + * Function name: libvirt_node_get_mem_stats + * Since version: 0.4.6 + * Description: Function is used to get the memory stats per node + * Arguments: @conn [resource]: resource for connection + * Returns: array of node memory statistics including time (in seconds since UNIX epoch) or FALSE for error + */ +PHP_FUNCTION(libvirt_node_get_mem_stats) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + int memNum = VIR_NODE_MEMORY_STATS_ALL_CELLS; + virNodeMemoryStatsPtr params; + int nparams = 0; + int j; + + GET_CONNECTION_FROM_ARGS("r", &zconn); + + if (virNodeGetMemoryStats(conn->conn, memNum, NULL, &nparams, 0) != 0) { + set_error("Cannot get number of memory stats" TSRMLS_CC); + RETURN_FALSE; + } + + if (nparams == 0) + RETURN_TRUE; + + DPRINTF("%s: Number of parameters got from virNodeGetMemoryStats is %d\n", __FUNCTION__, nparams); + + params = (virNodeMemoryStatsPtr)calloc(nparams, nparams * sizeof(*params)); + + array_init(return_value); + if (virNodeGetMemoryStats(conn->conn, memNum, params, &nparams, 0) != 0) { + set_error("Unable to get node memory stats" TSRMLS_CC); + RETURN_FALSE; + } + + for (j = 0; j < nparams; j++) { + DPRINTF("%s: Field %s has value of %llu\n", __FUNCTION__, params[j].field, params[j].value); + + add_assoc_long(return_value, params[j].field, params[j].value); + } + + add_assoc_long(return_value, "time", time(NULL)); + + free(params); + params = NULL; +} + +/* + * Function name: libvirt_node_get_free_memory + * Since version: 0.5.3 + * Description: Function is used to get free memory available on the node. + * Arguments: @conn [resource]: resource for connection. + * Returns: The available free memery in bytes as string or FALSE for error. + */ +PHP_FUNCTION(libvirt_node_get_free_memory) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + unsigned long long ret; + LONGLONG_INIT; + + GET_CONNECTION_FROM_ARGS("r", &zconn); + + if ((ret = virNodeGetFreeMemory(conn->conn)) != 0) { + LONGLONG_RETURN_AS_STRING(ret); + } else { + set_error("Cannot get the free memory for the node" TSRMLS_CC); + RETURN_FALSE; + } +} + diff --git a/src/libvirt-node.h b/src/libvirt-node.h new file mode 100644 index 0000000..650283e --- /dev/null +++ b/src/libvirt-node.h @@ -0,0 +1,23 @@ +/* + * libvirt-node.h: The PHP bindings to libvirt node API + * + * See COPYING for the license of this software + */ + +#ifndef __LIBVIRT_NODE_H__ +# define __LIBVIRT_NODE_H__ + +# define PHP_FE_LIBVIRT_NODE \ + PHP_FE(libvirt_node_get_info, arginfo_libvirt_conn) \ + PHP_FE(libvirt_node_get_cpu_stats, arginfo_libvirt_conn_optcpunr) \ + PHP_FE(libvirt_node_get_cpu_stats_for_each_cpu, arginfo_libvirt_conn_opttime) \ + PHP_FE(libvirt_node_get_mem_stats, arginfo_libvirt_conn) \ + PHP_FE(libvirt_node_get_free_memory, arginfo_libvirt_conn) + +PHP_FUNCTION(libvirt_node_get_info); +PHP_FUNCTION(libvirt_node_get_cpu_stats); +PHP_FUNCTION(libvirt_node_get_cpu_stats_for_each_cpu); +PHP_FUNCTION(libvirt_node_get_mem_stats); +PHP_FUNCTION(libvirt_node_get_free_memory); + +#endif diff --git a/src/libvirt-php.c b/src/libvirt-php.c index c439e24..6315ec4 100644 --- a/src/libvirt-php.c +++ b/src/libvirt-php.c @@ -20,6 +20,7 @@ #include "vncfunc.h" #include "sockets.h" #include "libvirt-connection.h" +#include "libvirt-node.h" DEBUG_INIT("core"); @@ -609,11 +610,7 @@ static zend_function_entry libvirt_functions[] = { PHP_FE(libvirt_network_get_autostart, arginfo_libvirt_conn) PHP_FE(libvirt_network_set_autostart, arginfo_libvirt_conn_flags) /* Node functions */ - PHP_FE(libvirt_node_get_info, arginfo_libvirt_conn) - PHP_FE(libvirt_node_get_cpu_stats, arginfo_libvirt_conn_optcpunr) - PHP_FE(libvirt_node_get_cpu_stats_for_each_cpu, arginfo_libvirt_conn_opttime) - PHP_FE(libvirt_node_get_mem_stats, arginfo_libvirt_conn) - PHP_FE(libvirt_node_get_free_memory, arginfo_libvirt_conn) + PHP_FE_LIBVIRT_NODE /* Nodedev functions */ PHP_FE(libvirt_nodedev_get, arginfo_libvirt_conn) PHP_FE(libvirt_nodedev_capabilities, arginfo_libvirt_conn) @@ -1967,30 +1964,6 @@ PHP_MSHUTDOWN_FUNCTION(libvirt) RETURN_FALSE; \ } while (0) \ -#define LONGLONG_INIT \ - char tmpnumber[64] - -#define LONGLONG_ASSOC(out, key, in) \ - if (LIBVIRT_G(longlong_to_string_ini)) { \ - snprintf(tmpnumber, 63, "%llu", in); \ - VIRT_ADD_ASSOC_STRING(out, key, tmpnumber); \ - } else { \ - add_assoc_long(out, key, in); \ - } - -#define LONGLONG_INDEX(out, key, in) \ - if (LIBVIRT_G(longlong_to_string_ini)) { \ - snprintf(tmpnumber, 63, "%llu", in); \ - VIRT_ADD_INDEX_STRING(out, key, tmpnumber); \ - } else { \ - add_index_long(out, key, in); \ - } - -#define LONGLONG_RETURN_AS_STRING(in) \ - do { \ - snprintf(tmpnumber, 63, "%llu", in); \ - VIRT_RETURN_STRING(tmpnumber); \ - } while (0) /* Common functions */ @@ -2008,297 +1981,6 @@ PHP_FUNCTION(libvirt_get_last_error) } /* - * Function name: libvirt_node_get_info - * Since version: 0.4.1(-1) - * Description: Function is used to get the information about host node, mainly total memory installed, total CPUs installed and model information are useful - * Arguments: @conn [resource]: resource for connection - * Returns: array of node information or FALSE for error - */ -PHP_FUNCTION(libvirt_node_get_info) -{ - virNodeInfo info; - php_libvirt_connection *conn = NULL; - zval *zconn; - int retval; - - GET_CONNECTION_FROM_ARGS("r", &zconn); - - retval = virNodeGetInfo (conn->conn, &info); - DPRINTF("%s: virNodeGetInfo returned %d\n", PHPFUNC, retval); - if (retval == -1) - RETURN_FALSE; - - array_init(return_value); - VIRT_ADD_ASSOC_STRING(return_value, "model", info.model); - add_assoc_long(return_value, "memory", (long)info.memory); - add_assoc_long(return_value, "cpus", (long)info.cpus); - add_assoc_long(return_value, "nodes", (long)info.nodes); - add_assoc_long(return_value, "sockets", (long)info.sockets); - add_assoc_long(return_value, "cores", (long)info.cores); - add_assoc_long(return_value, "threads", (long)info.threads); - add_assoc_long(return_value, "mhz", (long)info.mhz); -} - -/* - * Function name: libvirt_node_get_cpu_stats - * Since version: 0.4.6 - * Description: Function is used to get the CPU stats per nodes - * Arguments: @conn [resource]: resource for connection - * @cpunr [int]: CPU number to get information about, defaults to VIR_NODE_CPU_STATS_ALL_CPUS to get information about all CPUs - * Returns: array of node CPU statistics including time (in seconds since UNIX epoch), cpu number and total number of CPUs on node or FALSE for error - */ -PHP_FUNCTION(libvirt_node_get_cpu_stats) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - int cpuNum = VIR_NODE_CPU_STATS_ALL_CPUS; - virNodeCPUStatsPtr params; - virNodeInfo info; - zend_long cpunr = -1; - int nparams = 0; - int i, j, numCpus; - - GET_CONNECTION_FROM_ARGS("r|l", &zconn, &cpunr); - - if (virNodeGetInfo(conn->conn, &info) != 0) { - set_error("Cannot get number of CPUs" TSRMLS_CC); - RETURN_FALSE; - } - - numCpus = info.cpus; - if (cpunr > numCpus - 1) { - char tmp[256] = { 0 }; - snprintf(tmp, sizeof(tmp), "Invalid CPU number, valid numbers in range 0 to %d or VIR_NODE_CPU_STATS_ALL_CPUS", - numCpus - 1); - set_error(tmp TSRMLS_CC); - - RETURN_FALSE; - } - - cpuNum = (int)cpunr; - - if (virNodeGetCPUStats(conn->conn, cpuNum, NULL, &nparams, 0) != 0) { - set_error("Cannot get number of CPU stats" TSRMLS_CC); - RETURN_FALSE; - } - - if (nparams == 0) - RETURN_TRUE; - - DPRINTF("%s: Number of parameters got from virNodeGetCPUStats is %d\n", __FUNCTION__, nparams); - - params = (virNodeCPUStatsPtr)calloc(nparams, nparams * sizeof(*params)); - - array_init(return_value); - for (i = 0; i < 2; i++) { - zval *arr; - - if (i > 0) -#ifdef EXTWIN - Sleep(1000); -#else - sleep(1); -#endif - - if (virNodeGetCPUStats(conn->conn, cpuNum, params, &nparams, 0) != 0) { - set_error("Unable to get node cpu stats" TSRMLS_CC); - RETURN_FALSE; - } - - VIRT_ARRAY_INIT(arr); - - for (j = 0; j < nparams; j++) { - DPRINTF("%s: Field %s has value of %llu\n", __FUNCTION__, params[j].field, params[j].value); - - add_assoc_long(arr, params[j].field, params[j].value); - } - - add_assoc_long(arr, "time", time(NULL)); - - add_index_zval(return_value, i, arr); - } - - add_assoc_long(return_value, "cpus", numCpus); - if (cpuNum >= 0) { - add_assoc_long(return_value, "cpu", cpunr); - } else { - if (cpuNum == VIR_NODE_CPU_STATS_ALL_CPUS) - VIRT_ADD_ASSOC_STRING(return_value, "cpu", "all"); - else - VIRT_ADD_ASSOC_STRING(return_value, "cpu", "unknown"); - } - - free(params); - params = NULL; -} - -/* - * Function name: libvirt_node_get_cpu_stats_for_each_cpu - * Since version: 0.4.6 - * Description: Function is used to get the CPU stats for each CPU on the host node - * Arguments: @conn [resource]: resource for connection - * @time [int]: time in seconds to get the information about, without aggregation for further processing - * Returns: array of node CPU statistics for each CPU including time (in seconds since UNIX epoch), cpu number and total number of CPUs on node or FALSE for error - */ -PHP_FUNCTION(libvirt_node_get_cpu_stats_for_each_cpu) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - virNodeCPUStatsPtr params; - virNodeInfo info; - int nparams = 0; - zend_long avg = 0, iter = 0; - int done = 0; - int i, j, numCpus; - time_t startTime = 0; - zval *time_array; - - GET_CONNECTION_FROM_ARGS("r|l", &zconn, &avg); - - if (virNodeGetInfo(conn->conn, &info) != 0) { - set_error("Cannot get number of CPUs" TSRMLS_CC); - RETURN_FALSE; - } - - if (virNodeGetCPUStats(conn->conn, VIR_NODE_CPU_STATS_ALL_CPUS, NULL, &nparams, 0) != 0) { - set_error("Cannot get number of CPU stats" TSRMLS_CC); - RETURN_FALSE; - } - - if (nparams == 0) - RETURN_TRUE; - - DPRINTF("%s: Number of parameters got from virNodeGetCPUStats is %d\n", __FUNCTION__, nparams); - - params = (virNodeCPUStatsPtr)calloc(nparams, nparams * sizeof(*params)); - - numCpus = info.cpus; - array_init(return_value); - - startTime = time(NULL); - - iter = 0; - done = 0; - while (!done) { - zval *arr; - VIRT_ARRAY_INIT(arr); - - for (i = 0; i < numCpus; i++) { - zval *arr2; - - if (virNodeGetCPUStats(conn->conn, i, params, &nparams, 0) != 0) { - set_error("Unable to get node cpu stats" TSRMLS_CC); - RETURN_FALSE; - } - - VIRT_ARRAY_INIT(arr2); - - for (j = 0; j < nparams; j++) - add_assoc_long(arr2, params[j].field, params[j].value); - - add_assoc_long(arr, "time", time(NULL)); - add_index_zval(arr, i, arr2); - } - - add_index_zval(return_value, iter, arr); - - if ((avg <= 0) || (iter == avg - 1)) { - done = 1; - break; - } - -#ifndef EXTWIN - sleep(1); -#else - Sleep(1000); -#endif - iter++; - } - - VIRT_ARRAY_INIT(time_array); - add_assoc_long(time_array, "start", startTime); - add_assoc_long(time_array, "finish", time(NULL)); - add_assoc_long(time_array, "duration", time(NULL) - startTime); - - add_assoc_zval(return_value, "times", time_array); - - free(params); - params = NULL; -} - -/* - * Function name: libvirt_node_get_mem_stats - * Since version: 0.4.6 - * Description: Function is used to get the memory stats per node - * Arguments: @conn [resource]: resource for connection - * Returns: array of node memory statistics including time (in seconds since UNIX epoch) or FALSE for error - */ -PHP_FUNCTION(libvirt_node_get_mem_stats) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - int memNum = VIR_NODE_MEMORY_STATS_ALL_CELLS; - virNodeMemoryStatsPtr params; - int nparams = 0; - int j; - - GET_CONNECTION_FROM_ARGS("r", &zconn); - - if (virNodeGetMemoryStats(conn->conn, memNum, NULL, &nparams, 0) != 0) { - set_error("Cannot get number of memory stats" TSRMLS_CC); - RETURN_FALSE; - } - - if (nparams == 0) - RETURN_TRUE; - - DPRINTF("%s: Number of parameters got from virNodeGetMemoryStats is %d\n", __FUNCTION__, nparams); - - params = (virNodeMemoryStatsPtr)calloc(nparams, nparams * sizeof(*params)); - - array_init(return_value); - if (virNodeGetMemoryStats(conn->conn, memNum, params, &nparams, 0) != 0) { - set_error("Unable to get node memory stats" TSRMLS_CC); - RETURN_FALSE; - } - - for (j = 0; j < nparams; j++) { - DPRINTF("%s: Field %s has value of %llu\n", __FUNCTION__, params[j].field, params[j].value); - - add_assoc_long(return_value, params[j].field, params[j].value); - } - - add_assoc_long(return_value, "time", time(NULL)); - - free(params); - params = NULL; -} - -/* - * Function name: libvirt_node_get_free_memory - * Since version: 0.5.3 - * Description: Function is used to get free memory available on the node. - * Arguments: @conn [resource]: resource for connection. - * Returns: The available free memery in bytes as string or FALSE for error. - */ -PHP_FUNCTION(libvirt_node_get_free_memory) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - unsigned long long ret; - LONGLONG_INIT; - - GET_CONNECTION_FROM_ARGS("r", &zconn); - - if ((ret = virNodeGetFreeMemory(conn->conn)) != 0) { - LONGLONG_RETURN_AS_STRING(ret); - } else { - set_error("Cannot get the free memory for the node" TSRMLS_CC); - RETURN_FALSE; - } -} - -/* * Function name: libvirt_image_create * Since version: 0.4.2 * Description: Function is used to create the image of desired name, size and format. The image will be created in the image path (libvirt.image_path INI variable). Works only o diff --git a/src/libvirt-php.h b/src/libvirt-php.h index 85fdae2..a701235 100644 --- a/src/libvirt-php.h +++ b/src/libvirt-php.h @@ -254,12 +254,6 @@ PHP_MINFO_FUNCTION(libvirt); /* Common functions */ PHP_FUNCTION(libvirt_get_last_error); -/* Node functions */ -PHP_FUNCTION(libvirt_node_get_info); -PHP_FUNCTION(libvirt_node_get_cpu_stats); -PHP_FUNCTION(libvirt_node_get_cpu_stats_for_each_cpu); -PHP_FUNCTION(libvirt_node_get_mem_stats); -PHP_FUNCTION(libvirt_node_get_free_memory); /* Stream functions */ PHP_FUNCTION(libvirt_stream_create); PHP_FUNCTION(libvirt_stream_close); diff --git a/src/util.h b/src/util.h index 17846a1..e664e26 100644 --- a/src/util.h +++ b/src/util.h @@ -225,6 +225,31 @@ # endif /* PHP_MAJOR_VERSION < 7 */ +# define LONGLONG_INIT \ + char tmpnumber[64] + +# define LONGLONG_ASSOC(out, key, in) \ + if (LIBVIRT_G(longlong_to_string_ini)) { \ + snprintf(tmpnumber, 63, "%llu", in); \ + VIRT_ADD_ASSOC_STRING(out, key, tmpnumber); \ + } else { \ + add_assoc_long(out, key, in); \ + } + +# define LONGLONG_INDEX(out, key, in) \ + if (LIBVIRT_G(longlong_to_string_ini)) { \ + snprintf(tmpnumber, 63, "%llu", in); \ + VIRT_ADD_INDEX_STRING(out, key, tmpnumber); \ + } else { \ + add_index_long(out, key, in); \ + } + +# define LONGLONG_RETURN_AS_STRING(in) \ + do { \ + snprintf(tmpnumber, 63, "%llu", in); \ + VIRT_RETURN_STRING(tmpnumber); \ + } while (0) + # ifndef PHP_FE_END # define PHP_FE_END {NULL, NULL, NULL} # endif -- 2.13.3

--- src/Makefile.am | 3 +- src/libvirt-domain.c | 3344 ++++++++++++++++++++++++++++++++++++++++++++ src/libvirt-domain.h | 208 +++ src/libvirt-php.c | 3793 +++----------------------------------------------- src/libvirt-php.h | 119 +- 5 files changed, 3754 insertions(+), 3713 deletions(-) create mode 100644 src/libvirt-domain.c create mode 100644 src/libvirt-domain.h diff --git a/src/Makefile.am b/src/Makefile.am index ddfad41..b8eae3a 100644 --- a/src/Makefile.am +++ b/src/Makefile.am @@ -24,7 +24,8 @@ libvirt_php_la_SOURCES = \ libvirt-php.c libvirt-php.h \ libvirt-connection.c libvirt-connection.h \ libvirt-node.c libvirt-node.h \ - libvirt-stream.c libvirt-stream.h + libvirt-stream.c libvirt-stream.h \ + libvirt-domain.c libvirt-domain.h libvirt_php_la_CFLAGS = \ $(AM_CFLAGS) \ -DCOMPILE_DL_LIBVIRT=1 diff --git a/src/libvirt-domain.c b/src/libvirt-domain.c new file mode 100644 index 0000000..8b8a80f --- /dev/null +++ b/src/libvirt-domain.c @@ -0,0 +1,3344 @@ +/* + * libvirt-domain.c: The PHP bindings to libvirt domain API + * + * See COPYING for the license of this software + */ + +#include <config.h> +#include <stdio.h> +#include <libvirt/libvirt.h> + +#include "libvirt-php.h" +#include "libvirt-domain.h" +#include "sockets.h" +#include "vncfunc.h" + +DEBUG_INIT("domain"); + +void +php_libvirt_domain_dtor(virt_resource *rsrc TSRMLS_DC) +{ + php_libvirt_domain *domain = (php_libvirt_domain *)rsrc->ptr; + int rv = 0; + + if (domain != NULL) { + if (domain->domain != NULL) { + if (!check_resource_allocation(domain->conn->conn, INT_RESOURCE_DOMAIN, domain->domain TSRMLS_CC)) { + domain->domain = NULL; + efree(domain); + return; + } + + rv = virDomainFree(domain->domain); + if (rv != 0) { + DPRINTF("%s: virDomainFree(%p) returned %d (%s)\n", __FUNCTION__, domain->domain, rv, LIBVIRT_G(last_error)); + php_error_docref(NULL TSRMLS_CC, E_WARNING, "virDomainFree failed with %i on destructor: %s", rv, LIBVIRT_G(last_error)); + } else { + DPRINTF("%s: virDomainFree(%p) completed successfully\n", __FUNCTION__, domain->domain); + resource_change_counter(INT_RESOURCE_DOMAIN, domain->conn->conn, domain->domain, 0 TSRMLS_CC); + } + domain->domain = NULL; + } + efree(domain); + } +} + +/* + * Function name: libvirt_domain_new + * Since version: 0.4.5 + * Description: Function is used to install a new virtual machine to the machine + * Arguments: @conn [resource]: libvirt connection resource + * @name [string]: name of the new domain + * @arch [string]: optional architecture string, can be NULL to get default (or false) + * @memMB [int]: number of megabytes of RAM to be allocated for domain + * @maxmemMB [int]: maximum number of megabytes of RAM to be allocated for domain + * @vcpus [int]: number of VCPUs to be allocated to domain + * @iso_image [string]: installation ISO image for domain + * @disks [array]: array of disk devices for domain, consist of keys as 'path' (storage location), 'driver' (image type, e.g. 'raw' or 'qcow2'), 'bus' (e.g. 'ide', 'scsi'), 'dev' (device to be presented to the guest - e.g. 'hda'), 'size' (with 'M' or 'G' suffixes, like '10G' for 10 gigabytes image etc.) and 'flags' (VIR_DOMAIN_DISK_FILE or VIR_DOMAIN_DISK_BLOCK, optionally VIR_DOMAIN_DISK_ACCESS_ALL to allow access to the disk for all users on the host system) + * @networks [array]: array of network devices for domain, consists of keys as 'mac' (for MAC address), 'network' (for network name) and optional 'model' for model of NIC device + * @flags [int]: bit array of flags + * Returns: a new domain resource + */ +PHP_FUNCTION(libvirt_domain_new) +{ + php_libvirt_connection *conn = NULL; + php_libvirt_domain *res_domain = NULL; + virDomainPtr domain2 = NULL; + virDomainPtr domain = NULL; + zval *zconn; + char *arch = NULL; + strsize_t arch_len; + char *tmp; + char *name; + strsize_t name_len = 0; + // char *emulator; + char *iso_image = NULL; + strsize_t iso_image_len; + zend_long vcpus = -1; + zend_long memMB = -1; + zval *disks, *networks; + tVMDisk *vmDisks = NULL; + tVMNetwork *vmNetworks = NULL; + zend_long maxmemMB = -1; + HashTable *arr_hash; + int numDisks, numNets, i; + zval *data; + HashPosition pointer; + char vncl[2048] = { 0 }; + char tmpname[1024] = { 0 }; + char *xml = NULL; + int retval = 0; + char *uuid = NULL; + zend_long flags = 0; + int fd = -1; + + GET_CONNECTION_FROM_ARGS("rsslllsaa|l", &zconn, &name, &name_len, &arch, &arch_len, &memMB, &maxmemMB, &vcpus, &iso_image, &iso_image_len, &disks, &networks, &flags); + + if (iso_image == NULL) { + DPRINTF("%s: Iso image is not defined\n", PHPFUNC); + RETURN_FALSE; + } + + if ((arch == NULL) || (arch_len == 0)) + arch = NULL; + + //DPRINTF("%s: name: %s, arch: %s, memMB: %d, maxmemMB: %d, vcpus: %d, iso_image: %s\n", PHPFUNC, name, arch, memMB, maxmemMB, vcpus, iso_image); + if (memMB == 0) + memMB = maxmemMB; + + /* Parse all disks from array */ + arr_hash = Z_ARRVAL_P(disks); + numDisks = zend_hash_num_elements(arr_hash); + vmDisks = (tVMDisk *)malloc(numDisks * sizeof(tVMDisk)); + memset(vmDisks, 0, numDisks * sizeof(tVMDisk)); + i = 0; + VIRT_FOREACH(arr_hash, pointer, data) { + if (Z_TYPE_P(data) == IS_ARRAY) { + tVMDisk disk; + parse_array(data, &disk, NULL); + if (disk.path != NULL) { + //DPRINTF("Disk => path = '%s', driver = '%s', bus = '%s', dev = '%s', size = %ld MB, flags = %d\n", + // disk.path, disk.driver, disk.bus, disk.dev, disk.size, disk.flags); + vmDisks[i++] = disk; + } + } + } VIRT_FOREACH_END(); + numDisks = i; + + /* Parse all networks from array */ + arr_hash = Z_ARRVAL_P(networks); + numNets = zend_hash_num_elements(arr_hash); + vmNetworks = (tVMNetwork *)malloc(numNets * sizeof(tVMNetwork)); + memset(vmNetworks, 0, numNets * sizeof(tVMNetwork)); + i = 0; + VIRT_FOREACH(arr_hash, pointer, data) { + if (Z_TYPE_P(data) == IS_ARRAY) { + tVMNetwork network; + parse_array(data, NULL, &network); + if (network.mac != NULL) { + //DPRINTF("Network => mac = '%s', network = '%s', model = '%s'\n", network.mac, network.network, network.model); + vmNetworks[i++] = network; + } + } + } VIRT_FOREACH_END(); + numNets = i; + + snprintf(tmpname, sizeof(tmpname), "%s-install", name); + DPRINTF("%s: Name is '%s', memMB is %d, maxmemMB is %d\n", PHPFUNC, tmpname, (int) memMB, (int) maxmemMB); + tmp = installation_get_xml(1, + conn->conn, tmpname, memMB, maxmemMB, NULL /* arch */, NULL, vcpus, iso_image, + vmDisks, numDisks, vmNetworks, numNets, + flags TSRMLS_CC); + if (tmp == NULL) { + DPRINTF("%s: Cannot get installation XML\n", PHPFUNC); + set_error("Cannot get installation XML" TSRMLS_CC); + RETURN_FALSE; + } + + domain = virDomainCreateXML(conn->conn, tmp, 0); + if (domain == NULL) { + set_error_if_unset("Cannot create installation domain from the XML description" TSRMLS_CC); + DPRINTF("%s: Cannot create installation domain from the XML description (%s): %s\n", PHPFUNC, LIBVIRT_G(last_error), tmp); + RETURN_FALSE; + } + + xml = virDomainGetXMLDesc(domain, 0); + if (!xml) { + DPRINTF("%s: Cannot get the XML description\n", PHPFUNC); + set_error_if_unset("Cannot get the XML description" TSRMLS_CC); + RETURN_FALSE; + } + + tmp = get_string_from_xpath(xml, "//domain/devices/graphics[@type='vnc']/@port", NULL, &retval); + if (retval < 0) { + DPRINTF("%s: Cannot get port from XML description\n", PHPFUNC); + set_error_if_unset("Cannot get port from XML description" TSRMLS_CC); + RETURN_FALSE; + } + + snprintf(vncl, sizeof(vncl), "%s:%s", virConnectGetHostname(conn->conn), tmp); + DPRINTF("%s: Trying to connect to '%s'\n", PHPFUNC, vncl); + +#ifndef EXTWIN + if ((fd = connect_socket(virConnectGetHostname(conn->conn), tmp, 0, 0, flags & DOMAIN_FLAG_TEST_LOCAL_VNC)) < 0) { + DPRINTF("%s: Cannot connect to '%s'\n", PHPFUNC, vncl); + snprintf(vncl, sizeof(vncl), "Connection failed, port %s is most likely forbidden on firewall (iptables) on the host (%s)" + " or the emulator VNC server is bound to localhost address only.", + tmp, virConnectGetHostname(conn->conn)); + } else { + close(fd); + DPRINTF("%s: Connection to '%s' successfull (%s local connection)\n", PHPFUNC, vncl, + (flags & DOMAIN_FLAG_TEST_LOCAL_VNC) ? "using" : "not using"); + } +#endif + + set_vnc_location(vncl TSRMLS_CC); + + tmp = installation_get_xml(2, + conn->conn, name, memMB, maxmemMB, NULL /* arch */, NULL, vcpus, iso_image, + vmDisks, numDisks, vmNetworks, numNets, + flags TSRMLS_CC); + if (tmp == NULL) { + DPRINTF("%s: Cannot get installation XML, step 2\n", PHPFUNC); + set_error("Cannot get installation XML, step 2" TSRMLS_CC); + virDomainFree(domain); + RETURN_FALSE; + } + + domain2 = virDomainDefineXML(conn->conn, tmp); + if (domain2 == NULL) { + set_error_if_unset("Cannot define domain from the XML description" TSRMLS_CC); + DPRINTF("%s: Cannot define domain from the XML description (name = '%s', uuid = '%s', error = '%s')\n", PHPFUNC, name, uuid, LIBVIRT_G(last_error)); + RETURN_FALSE; + } + virDomainFree(domain2); + + res_domain = (php_libvirt_domain *)emalloc(sizeof(php_libvirt_domain)); + res_domain->domain = domain; + res_domain->conn = conn; + + DPRINTF("%s: returning %p\n", PHPFUNC, res_domain->domain); + resource_change_counter(INT_RESOURCE_DOMAIN, conn->conn, res_domain->domain, 1 TSRMLS_CC); + + VIRT_REGISTER_RESOURCE(res_domain, le_libvirt_domain); +} + +/* + * Function name: libvirt_domain_new_get_vnc + * Since version: 0.4.5 + * Description: Function is used to get the VNC server location for the newly created domain (newly started installation) + * Arguments: None + * Returns: a VNC server for a newly created domain resource (if any) + */ +PHP_FUNCTION(libvirt_domain_new_get_vnc) +{ + if (LIBVIRT_G(vnc_location)) + VIRT_RETURN_STRING(LIBVIRT_G(vnc_location)); + + RETURN_NULL(); +} + +/* + * Function name: libvirt_domain_get_counts + * Since version: 0.4.1(-1) + * Description: Function is getting domain counts for all, active and inactive domains + * Arguments: @conn [resource]: libvirt connection resource from libvirt_connect() + * Returns: array of total, active and inactive (but defined) domain counts + */ +PHP_FUNCTION(libvirt_domain_get_counts) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + int count_defined; + int count_active; + + GET_CONNECTION_FROM_ARGS("r", &zconn); + + count_defined = virConnectNumOfDefinedDomains(conn->conn); + count_active = virConnectNumOfDomains(conn->conn); + + array_init(return_value); + add_assoc_long(return_value, "total", (long)(count_defined + count_active)); + add_assoc_long(return_value, "active", (long)count_active); + add_assoc_long(return_value, "inactive", (long)count_defined); +} + +/* + * Function name: libvirt_domain_is_persistent + * Since version: 0.4.9 + * Description: Function to get information whether domain is persistent or not + * Arguments: @res [resource]: libvirt domain resource + * Returns: TRUE for persistent, FALSE for not persistent, -1 on error + */ +PHP_FUNCTION(libvirt_domain_is_persistent) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + int p; + + GET_DOMAIN_FROM_ARGS("r", &zdomain); + + if ((p = virDomainIsPersistent(domain->domain)) < 0) + RETURN_LONG(-1); + + if (p == 1) + RETURN_TRUE; + + RETURN_FALSE; +} + +/* + * Function name: libvirt_domain_lookup_by_name + * Since version: 0.4.1(-1) + * Description: Function is used to lookup for domain by it's name + * Arguments: @res [resource]: libvirt connection resource from libvirt_connect() + * @name [string]: domain name to look for + * Returns: libvirt domain resource + */ +PHP_FUNCTION(libvirt_domain_lookup_by_name) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + strsize_t name_len; + char *name = NULL; + virDomainPtr domain = NULL; + php_libvirt_domain *res_domain; + + GET_CONNECTION_FROM_ARGS("rs", &zconn, &name, &name_len); + if ((name == NULL) || (name_len < 1)) + RETURN_FALSE; + domain = virDomainLookupByName(conn->conn, name); + if (domain == NULL) + RETURN_FALSE; + + res_domain = (php_libvirt_domain *)emalloc(sizeof(php_libvirt_domain)); + res_domain->domain = domain; + res_domain->conn = conn; + + DPRINTF("%s: domain name = '%s', returning %p\n", PHPFUNC, name, res_domain->domain); + resource_change_counter(INT_RESOURCE_DOMAIN, conn->conn, res_domain->domain, 1 TSRMLS_CC); + + VIRT_REGISTER_RESOURCE(res_domain, le_libvirt_domain); +} + +/* + * Function name: libvirt_domain_get_xml_desc + * Since version: 0.4.1(-1), changed 0.4.2 + * Description: Function is used to get the domain's XML description + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * @xpath [string]: optional xPath expression string to get just this entry, can be NULL + * Returns: domain XML description string or result of xPath expression + */ +PHP_FUNCTION(libvirt_domain_get_xml_desc) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + char *tmp = NULL; + char *xml; + char *xpath = NULL; + strsize_t xpath_len; + zend_long flags = 0; + int retval = -1; + + GET_DOMAIN_FROM_ARGS("rs|l", &zdomain, &xpath, &xpath_len, &flags); + if (xpath_len < 1) + xpath = NULL; + + DPRINTF("%s: Getting the XML for domain %p (xPath = %s)\n", PHPFUNC, domain->domain, xpath); + + xml = virDomainGetXMLDesc(domain->domain, flags); + if (!xml) { + set_error_if_unset("Cannot get the XML description" TSRMLS_CC); + RETURN_FALSE; + } + + tmp = get_string_from_xpath(xml, xpath, NULL, &retval); + if ((tmp == NULL) || (retval < 0)) { + VIRT_RETVAL_STRING(xml); + } else { + VIRT_RETVAL_STRING(tmp); + } + + free(tmp); + free(xml); +} + +/* + * Function name: libvirt_domain_get_disk_devices + * Since version: 0.4.4 + * Description: Function is used to get disk devices for the domain + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * Returns: list of domain disk devices + */ +PHP_FUNCTION(libvirt_domain_get_disk_devices) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + char *xml; + int retval = -1; + + GET_DOMAIN_FROM_ARGS("r", &zdomain); + + DPRINTF("%s: Getting disk device list for domain %p\n", PHPFUNC, domain->domain); + + xml = virDomainGetXMLDesc(domain->domain, 0); + if (!xml) { + set_error_if_unset("Cannot get the XML description" TSRMLS_CC); + RETURN_FALSE; + } + + array_init(return_value); + + free(get_string_from_xpath(xml, "//domain/devices/disk/target/@dev", &return_value, &retval)); + free(xml); + + if (retval < 0) + add_assoc_long(return_value, "error_code", (long)retval); + else + add_assoc_long(return_value, "num", (long)retval); +} + +/* + * Function name: libvirt_domain_get_interface_devices + * Since version: 0.4.4 + * Description: Function is used to get network interface devices for the domain + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * Returns: list of domain interface devices + */ +PHP_FUNCTION(libvirt_domain_get_interface_devices) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + char *xml; + int retval = -1; + + GET_DOMAIN_FROM_ARGS("r", &zdomain); + + DPRINTF("%s: Getting interface device list for domain %p\n", PHPFUNC, domain->domain); + + xml = virDomainGetXMLDesc(domain->domain, 0); + if (!xml) { + set_error_if_unset("Cannot get the XML description" TSRMLS_CC); + RETURN_FALSE; + } + + array_init(return_value); + + free(get_string_from_xpath(xml, "//domain/devices/interface/target/@dev", &return_value, &retval)); + free(xml); + + if (retval < 0) + add_assoc_long(return_value, "error_code", (long)retval); + else + add_assoc_long(return_value, "num", (long)retval); +} + +/* + * Function name: libvirt_domain_change_vcpus + * Since version: 0.4.2 + * Description: Function is used to change the VCPU count for the domain + * Arguments: @res [resource]: libvirt domain resource + * @numCpus [int]: number of VCPUs to be set for the guest + * @flags [int]: flags for virDomainSetVcpusFlags (available at http://libvirt.org/html/libvirt-libvirt.html#virDomainVcpuFlags) + * Returns: true on success, false on error + */ +PHP_FUNCTION(libvirt_domain_change_vcpus) +{ + zend_long numCpus, flags = 0; + php_libvirt_domain *domain = NULL; + zval *zdomain; + + GET_DOMAIN_FROM_ARGS("rl|l", &zdomain, &numCpus, &flags); + + if (virDomainSetVcpusFlags(domain->domain, numCpus, flags) == 0) { + RETURN_TRUE; + } else { + RETURN_FALSE; + } +} + +/* + * Function name: libvirt_domain_change_memory + * Since version: 0.4.2 + * Description: Function is used to change the domain memory allocation + * Arguments: @res [resource]: libvirt domain resource + * @allocMem [int]: number of MiBs to be set as immediate memory value + * @allocMax [int]: number of MiBs to be set as the maximum allocation + * @flags [int]: flags + * Returns: new domain resource + */ +PHP_FUNCTION(libvirt_domain_change_memory) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + char *tmpA = NULL; + char *tmp1 = NULL; + char *tmp2 = NULL; + char *xml; + char *new_xml = NULL; + int new_len; + char newXml[512] = { 0 }; + zend_long xflags = 0; + zend_long allocMem = 0; + zend_long allocMax = 0; + // int pos = -1; + int len = 0; + php_libvirt_domain *res_domain = NULL; + php_libvirt_connection *conn = NULL; + virDomainPtr dom = NULL; + + GET_DOMAIN_FROM_ARGS("rll|l", &zdomain, &allocMem, &allocMax, &xflags); + + DPRINTF("%s: Changing domain memory count to %d MiB current/%d MiB max, domain = %p\n", + PHPFUNC, (int)allocMem, (int)allocMax, domain->domain); + + allocMem *= 1024; + allocMax *= 1024; + + if (allocMem > allocMax) + allocMem = allocMax; + + xml = virDomainGetXMLDesc(domain->domain, xflags); + if (!xml) { + set_error_if_unset("Cannot get the XML description" TSRMLS_CC); + RETURN_FALSE; + } + + snprintf(newXml, sizeof(newXml), " <memory>%d</memory>\n <currentMemory>%d</currentMemory>\n", allocMax, allocMem); + tmpA = strstr(xml, "<memory>"); + tmp1 = strstr(xml, "</currentMemory>") + strlen("</currentMemory>"); + // pos = strlen(xml) - strlen(tmp1); + if (!tmpA || !tmp1) { + set_error_if_unset("Cannot parse domain XML" TSRMLS_CC); + RETURN_FALSE; + } + len = strlen(xml) - strlen(tmpA); + + tmp2 = (char *)emalloc((len + 1) * sizeof(char)); + memset(tmp2, 0, len + 1); + memcpy(tmp2, xml, len); + + new_len = strlen(tmp1) + strlen(tmp2) + strlen(newXml) + 2; + new_xml = (char *)emalloc(new_len * sizeof(char)); + snprintf(new_xml, new_len, "%s\n%s%s", tmp2, newXml, tmp1); + + conn = domain->conn; + + dom = virDomainDefineXML(conn->conn, new_xml); + if (dom == NULL) { + free(xml); + efree(new_xml); + RETURN_FALSE; + } + free(xml); + efree(new_xml); + + res_domain = (php_libvirt_domain *)emalloc(sizeof(php_libvirt_domain)); + res_domain->domain = dom; + res_domain->conn = conn; + + DPRINTF("%s: returning %p\n", PHPFUNC, res_domain->domain); + resource_change_counter(INT_RESOURCE_DOMAIN, conn->conn, res_domain->domain, 1 TSRMLS_CC); + + VIRT_REGISTER_RESOURCE(res_domain, le_libvirt_domain); +} + +/* + * Function name: libvirt_domain_change_boot_devices + * Since version: 0.4.2 + * Description: Function is used to change the domain boot devices + * Arguments: @res [resource]: libvirt domain resource + * @first [string]: first boot device to be set + * @second [string]: second boot device to be set + * @flags [int]: flags + * Returns: new domain resource + */ +PHP_FUNCTION(libvirt_domain_change_boot_devices) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + char *tmpA = NULL; + char *tmp1 = NULL; + char *tmp2 = NULL; + char *xml; + char *new_xml = NULL; + int new_len; + char newXml[4096] = { 0 }; + zend_long xflags = 0; + char *first = NULL; + strsize_t first_len; + char *second = NULL; + strsize_t second_len; + // int pos = -1; + int len = 0; + php_libvirt_domain *res_domain = NULL; + php_libvirt_connection *conn = NULL; + virDomainPtr dom = NULL; + + GET_DOMAIN_FROM_ARGS("rss|l", &zdomain, &first, &first_len, &second, &second_len, &xflags); + + xml = virDomainGetXMLDesc(domain->domain, xflags); + if (!xml) { + set_error_if_unset("Cannot get the XML description" TSRMLS_CC); + RETURN_FALSE; + } + + DPRINTF("%s: Changing domain boot order, domain = %p\n", PHPFUNC, domain->domain); + + if (!second || (strcmp(second, "-") == 0)) + snprintf(newXml, sizeof(newXml), " <boot dev='%s'/>\n", first); + else + snprintf(newXml, sizeof(newXml), " <boot dev='%s'/>\n <boot dev='%s'/>\n", first, second); + + tmpA = strstr(xml, "</type>") + strlen("</type>"); + tmp1 = strstr(xml, "</os>"); + // pos = strlen(xml) - strlen(tmp1); + len = strlen(xml) - strlen(tmpA); + + tmp2 = (char *)emalloc((len + 1) * sizeof(char)); + memset(tmp2, 0, len + 1); + memcpy(tmp2, xml, len); + + new_len = strlen(tmp1) + strlen(tmp2) + strlen(newXml) + 2; + new_xml = (char *)emalloc(new_len * sizeof(char)); + snprintf(new_xml, new_len, "%s\n%s%s", tmp2, newXml, tmp1); + + conn = domain->conn; + + dom = virDomainDefineXML(conn->conn, new_xml); + if (dom == NULL) { + DPRINTF("%s: Function failed, restoring original XML\n", PHPFUNC); + free(xml); + efree(newXml); + RETURN_FALSE; + } + free(xml); + efree(newXml); + + res_domain = (php_libvirt_domain *)emalloc(sizeof(php_libvirt_domain)); + res_domain->domain = dom; + res_domain->conn = conn; + + DPRINTF("%s: returning %p\n", PHPFUNC, res_domain->domain); + resource_change_counter(INT_RESOURCE_DOMAIN, conn->conn, res_domain->domain, 1 TSRMLS_CC); + + VIRT_REGISTER_RESOURCE(res_domain, le_libvirt_domain); +} + +/* + * Function name: libvirt_domain_disk_add + * Since version: 0.4.2 + * Description: Function is used to add the disk to the virtual machine using set of API functions to make it as simple as possible for the user + * Arguments: @res [resource]: libvirt domain resource + * @img [string]: string for the image file on the host system + * @dev [string]: string for the device to be presented to the guest (e.g. hda) + * @typ [string]: bus type for the device in the guest, usually 'ide' or 'scsi' + * @driver [string]: driver type to be specified, like 'raw' or 'qcow2' + * @flags [int]: flags for getting the XML description + * Returns: new domain resource + */ +PHP_FUNCTION(libvirt_domain_disk_add) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + char *xml; + char *img = NULL; + strsize_t img_len; + char *dev = NULL; + strsize_t dev_len; + char *driver = NULL; + strsize_t driver_len; + char *typ = NULL; + strsize_t typ_len; + char *newXml = NULL; + zend_long xflags = 0; + int retval = -1; + char *xpath = NULL; + char *tmp = NULL; + + GET_DOMAIN_FROM_ARGS("rssss|l", &zdomain, &img, &img_len, &dev, &dev_len, &typ, &typ_len, &driver, &driver_len, &xflags); + + DPRINTF("%s: Domain %p, device = %s, image = %s, type = %s, driver = %s\n", PHPFUNC, + domain->domain, dev, img, typ, driver); + + xml = virDomainGetXMLDesc(domain->domain, xflags); + if (!xml) { + set_error_if_unset("Cannot get the XML description" TSRMLS_CC); + goto error; + } + + if (asprintf(&xpath, &quot;//domain/devices/disk/source[@file=\&quot;%s\&quot;]/./(a)file&quot;, img) < 0) { + set_error("Out of memory" TSRMLS_CC); + goto error; + } + tmp = get_string_from_xpath(xml, xpath, NULL, &retval); + if (tmp != NULL) { + free(tmp); + if (asprintf(&tmp, "Domain already has image <i>%s</i> connected", img) < 0) + set_error("Out of memory" TSRMLS_CC); + else + set_error(tmp TSRMLS_CC); + goto error; + } + + free(xpath); + if (asprintf(&xpath, &quot;//domain/devices/disk/target[@dev=&#39;%s&#39;]/./(a)dev&quot;, dev) < 0) { + set_error("Out of memory" TSRMLS_CC); + goto error; + } + tmp = get_string_from_xpath(xml, newXml, NULL, &retval); + if (tmp != NULL) { + free(tmp); + if (asprintf(&tmp, "Domain already has device <i>%s</i> connected", dev) < 0) + set_error("Out of memory" TSRMLS_CC); + else + set_error(tmp TSRMLS_CC); + goto error; + } + + if (asprintf(&newXml, + " <disk type='file' device='disk'>\n" + " <driver name='qemu' type='%s'/>\n" + " <source file='%s'/>\n" + " <target dev='%s' bus='%s'/>\n" + " </disk>", driver, img, dev, typ) < 0) { + set_error("Out of memory" TSRMLS_CC); + goto error; + } + + if (virDomainAttachDeviceFlags(domain->domain, + newXml, VIR_DOMAIN_AFFECT_CONFIG) < 0) { + set_error("Unable to attach disk" TSRMLS_CC); + goto error; + } + + free(tmp); + free(xpath); + free(xml); + RETURN_TRUE; + + error: + free(tmp); + free(xpath); + free(xml); + RETURN_FALSE; +} + +/* + * Function name: libvirt_domain_disk_remove + * Since version: 0.4.2 + * Description: Function is used to remove the disk from the virtual machine using set of API functions to make it as simple as possible + * Arguments: @res [resource]: libvirt domain resource + * @dev [string]: string for the device to be removed from the guest (e.g. 'hdb') + * @flags [int]: flags for getting the XML description + * Returns: new domain resource + */ +PHP_FUNCTION(libvirt_domain_disk_remove) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + char *xml; + char *dev = NULL; + strsize_t dev_len; + char *newXml = NULL; + zend_long xflags = 0; + int retval = -1; + char *xpath = NULL; + char *tmp = NULL; + + GET_DOMAIN_FROM_ARGS("rs|l", &zdomain, &dev, &dev_len, &xflags); + + DPRINTF("%s: Trying to remove %s from domain %p\n", PHPFUNC, dev, domain->domain); + + xml = virDomainGetXMLDesc(domain->domain, xflags); + if (!xml) { + set_error_if_unset("Cannot get the XML description" TSRMLS_CC); + RETURN_FALSE; + } + + if (asprintf(&xpath, &quot;//domain/devices/disk/target[@dev=&#39;%s&#39;]/./(a)dev&quot;, dev) < 0) { + set_error("Out of memory" TSRMLS_CC); + goto error; + } + tmp = get_string_from_xpath(xml, xpath, NULL, &retval); + if (!tmp) { + if (asprintf(&tmp, "Device <i>%s</i> is not connected to the guest", dev) < 0) + set_error("Out of memory" TSRMLS_CC); + else + set_error(tmp TSRMLS_CC); + goto error; + } + + if (asprintf(&newXml, + " <disk type='file' device='disk'>\n" + " <target dev='%s'/>\n" + " </disk>", dev) < 0) { + set_error("Out of memory" TSRMLS_CC); + goto error; + } + + if (virDomainDetachDeviceFlags(domain->domain, + newXml, VIR_DOMAIN_AFFECT_CONFIG) < 0) { + set_error("Unable to attach disk" TSRMLS_CC); + goto error; + } + + free(tmp); + free(xpath); + free(xml); + RETURN_TRUE; + + error: + free(tmp); + free(xpath); + free(xml); + RETURN_FALSE; +} + +/* + * Function name: libvirt_domain_nic_add + * Since version: 0.4.2 + * Description: Function is used to add the NIC card to the virtual machine using set of API functions to make it as simple as possible for the user + * Arguments: @res [resource]: libvirt domain resource + * @mac [string]: MAC string interpretation to be used for the NIC device + * @network [string]: network name where to connect this NIC + * @model [string]: string of the NIC model + * @flags [int]: flags for getting the XML description + * Returns: new domain resource + */ +PHP_FUNCTION(libvirt_domain_nic_add) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + char *xml; + char *mac = NULL; + strsize_t mac_len; + char *net = NULL; + strsize_t net_len; + char *model = NULL; + strsize_t model_len; + char *newXml = NULL; + zend_long xflags = 0; + int retval = -1; + char *xpath = NULL; + char *tmp = NULL; + + DPRINTF("%s: Entering\n", PHPFUNC); + + GET_DOMAIN_FROM_ARGS("rsss|l", &zdomain, &mac, &mac_len, &net, &net_len, &model, &model_len, &xflags); + if (model_len < 1) + model = NULL; + + DPRINTF("%s: domain = %p, mac = %s, net = %s, model = %s\n", PHPFUNC, domain->domain, mac, net, model); + + xml = virDomainGetXMLDesc(domain->domain, xflags); + if (!xml) { + set_error_if_unset("Cannot get the XML description" TSRMLS_CC); + RETURN_FALSE; + } + + if (asprintf(&xpath, &quot;//domain/devices/interface[@type=&#39;network&#39;]/mac[@address=&#39;%s&#39;]/./(a)mac&quot;, mac) < 0) { + set_error("Out of memory" TSRMLS_CC); + goto error; + } + tmp = get_string_from_xpath(xml, xpath, NULL, &retval); + if (tmp) { + free(tmp); + if (asprintf(&tmp, "Domain already has NIC device with MAC address <i>%s</i> connected", mac) < 0) + set_error("Out of memory" TSRMLS_CC); + else + set_error(tmp TSRMLS_CC); + goto error; + } + + if (model) { + if (asprintf(&newXml, + " <interface type='network'>\n" + " <mac address='%s' />\n" + " <source network='%s' />\n" + " <model type='%s' />\n" + " </interface>", mac, net, model) < 0) { + set_error("Out of memory" TSRMLS_CC); + goto error; + } + } else { + if (asprintf(&newXml, + " <interface type='network'>\n" + " <mac address='%s' />\n" + " <source network='%s' />\n" + " </interface>", mac, net) < 0) { + set_error("Out of memory" TSRMLS_CC); + goto error; + } + } + + if (virDomainAttachDeviceFlags(domain->domain, + newXml, VIR_DOMAIN_AFFECT_CONFIG) < 0) { + set_error("Unable to attach interface" TSRMLS_CC); + goto error; + } + + free(tmp); + free(xpath); + free(xml); + RETURN_TRUE; + + error: + free(tmp); + free(xpath); + free(xml); + RETURN_FALSE; +} + +/* + * Function name: libvirt_domain_nic_remove + * Since version: 0.4.2 + * Description: Function is used to remove the NIC from the virtual machine using set of API functions to make it as simple as possible + * Arguments: @res [resource]: libvirt domain resource + * @dev [string]: string representation of the IP address to be removed (e.g. 54:52:00:xx:yy:zz) + * @flags [int]: optional flags for getting the XML description + * Returns: new domain resource + */ +PHP_FUNCTION(libvirt_domain_nic_remove) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + char *xml; + char *mac = NULL; + strsize_t mac_len; + char *newXml = NULL; + zend_long xflags = 0; + int retval = -1; + char *xpath = NULL; + char *tmp = NULL; + + GET_DOMAIN_FROM_ARGS("rs|l", &zdomain, &mac, &mac_len, &xflags); + + DPRINTF("%s: Trying to remove NIC device with MAC address %s from domain %p\n", PHPFUNC, mac, domain->domain); + + xml = virDomainGetXMLDesc(domain->domain, xflags); + if (!xml) { + set_error_if_unset("Cannot get the XML description" TSRMLS_CC); + RETURN_FALSE; + } + if (asprintf(&xpath, &quot;//domain/devices/interface[@type=&#39;network&#39;]/mac[@address=&#39;%s&#39;]/./(a)mac&quot;, mac) < 0) { + set_error("Out of memory" TSRMLS_CC); + goto error; + } + tmp = get_string_from_xpath(xml, xpath, NULL, &retval); + if (!tmp) { + free(tmp); + if (asprintf(&tmp, "Domain has no such interface with mac %s", mac) < 0) + set_error("Out of memory" TSRMLS_CC); + else + set_error(tmp TSRMLS_CC); + goto error; + } + + if (asprintf(&newXml, + " <interface type='network'>\n" + " <mac address='%s' />\n" + " </interface>", mac) < 0) { + set_error("Out of memory" TSRMLS_CC); + goto error; + } + + if (virDomainDetachDeviceFlags(domain->domain, + newXml, VIR_DOMAIN_AFFECT_CONFIG) < 0) { + set_error("Unable to detach interface" TSRMLS_CC); + goto error; + } + + free(tmp); + free(xpath); + free(xml); + RETURN_TRUE; + + error: + free(tmp); + free(xpath); + free(xml); + RETURN_FALSE; +} + +/* + * Function name: libvirt_domain_attach_device + * Since version: 0.5.3 + * Description: Function is used to attach a virtual device to a domain. + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * @xml [string]: XML description of one device. + * @flags [int]: optional flags to control how the device is attached. Defaults to VIR_DOMAIN_AFFECT_LIVE + * Returns: TRUE for success, FALSE on error. + */ +PHP_FUNCTION(libvirt_domain_attach_device) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain = NULL; + char *xml = NULL; + strsize_t xml_len = 0; + zend_long flags = VIR_DOMAIN_AFFECT_LIVE; + + GET_DOMAIN_FROM_ARGS("rs|l", &zdomain, &xml, &xml_len, &flags); + + if (virDomainAttachDeviceFlags(domain->domain, xml, flags) < 0) + RETURN_FALSE; + + RETURN_TRUE; +} + +/* + * Function name: libvirt_domain_detach_device + * Since version: 0.5.3 + * Description: Function is used to detach a virtual device from a domain. + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * @xml [string]: XML description of one device. + * @flags [int]: optional flags to control how the device is attached. Defaults to VIR_DOMAIN_AFFECT_LIVE + * Returns: TRUE for success, FALSE on error. + */ +PHP_FUNCTION(libvirt_domain_detach_device) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain = NULL; + char *xml = NULL; + strsize_t xml_len = 0; + zend_long flags = VIR_DOMAIN_AFFECT_LIVE; + + GET_DOMAIN_FROM_ARGS("rs|l", &zdomain, &xml, &xml_len, &flags); + + if (virDomainDetachDeviceFlags(domain->domain, xml, flags) < 0) + RETURN_FALSE; + + RETURN_TRUE; +} + +/* + * Function name: libvirt_domain_get_info + * Since version: 0.4.1(-1) + * Description: Function is used to get the domain's information + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * Returns: domain information array + */ +PHP_FUNCTION(libvirt_domain_get_info) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + virDomainInfo domainInfo; + int retval; + + GET_DOMAIN_FROM_ARGS("r", &zdomain); + + retval = virDomainGetInfo(domain->domain, &domainInfo); + DPRINTF("%s: virDomainGetInfo(%p) returned %d\n", PHPFUNC, domain->domain, retval); + if (retval != 0) + RETURN_FALSE; + + array_init(return_value); + add_assoc_long(return_value, "maxMem", domainInfo.maxMem); + add_assoc_long(return_value, "memory", domainInfo.memory); + add_assoc_long(return_value, "state", (long)domainInfo.state); + add_assoc_long(return_value, "nrVirtCpu", domainInfo.nrVirtCpu); + add_assoc_double(return_value, "cpuUsed", (double)((double)domainInfo.cpuTime/1000000000.0)); +} + +/* + * Function name: libvirt_domain_get_name + * Since version: 0.4.1(-1) + * Description: Function is used to get domain name from it's resource + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * Returns: domain name string + */ +PHP_FUNCTION(libvirt_domain_get_name) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + const char *name = NULL; + + GET_DOMAIN_FROM_ARGS("r", &zdomain); + + if (domain->domain == NULL) + RETURN_FALSE; + + name = virDomainGetName(domain->domain); + DPRINTF("%s: virDomainGetName(%p) returned %s\n", PHPFUNC, domain->domain, name); + if (name == NULL) + RETURN_FALSE; + + VIRT_RETURN_STRING(name); //we can use the copy mechanism as we need not to free name (we even can not!) +} + +/* + * Function name: libvirt_domain_get_uuid + * Since version: 0.4.1(-1) + * Description: Function is used to get the domain's UUID in binary format + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * Returns: domain UUID in binary format + */ +PHP_FUNCTION(libvirt_domain_get_uuid) +{ + + php_libvirt_domain *domain = NULL; + zval *zdomain; + char *uuid; + int retval; + + GET_DOMAIN_FROM_ARGS("r", &zdomain); + + uuid = (char *)emalloc(VIR_UUID_BUFLEN); + retval = virDomainGetUUID(domain->domain, (unsigned char *)uuid); + DPRINTF("%s: virDomainGetUUID(%p, %p) returned %d\n", PHPFUNC, domain->domain, uuid, retval); + if (retval != 0) + RETURN_FALSE; + + VIRT_RETVAL_STRING(uuid); + efree(uuid); +} + +/* + * Function name: libvirt_domain_get_uuid_string + * Since version: 0.4.1(-1) + * Description: Function is used to get the domain's UUID in string format + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * Returns: domain UUID string + */ +PHP_FUNCTION(libvirt_domain_get_uuid_string) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + char *uuid; + int retval; + + GET_DOMAIN_FROM_ARGS("r", &zdomain); + + uuid = (char *)emalloc(VIR_UUID_STRING_BUFLEN); + retval = virDomainGetUUIDString(domain->domain, uuid); + DPRINTF("%s: virDomainGetUUIDString(%p) returned %d (%s)\n", PHPFUNC, domain->domain, retval, uuid); + if (retval != 0) + RETURN_FALSE; + + VIRT_RETVAL_STRING(uuid); + efree(uuid); +} + +/* + * Function name: libvirt_domain_get_id + * Since version: 0.4.1(-1) + * Description: Function is used to get the domain's ID, applicable to running guests only + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * Returns: running domain ID or -1 if not running + */ +PHP_FUNCTION(libvirt_domain_get_id) +{ + + php_libvirt_domain *domain = NULL; + zval *zdomain; + int retval; + + GET_DOMAIN_FROM_ARGS("r", &zdomain); + + retval = virDomainGetID(domain->domain); + DPRINTF("%s: virDomainGetID(%p) returned %d\n", PHPFUNC, domain->domain, retval); + + RETURN_LONG(retval); +} + +/* + * Function name: libvirt_domain_lookup_by_uuid + * Since version: 0.4.1(-1) + * Description: Function is used to lookup for domain by it's UUID in the binary format + * Arguments: @res [resource]: libvirt connection resource from libvirt_connect() + * @uuid [string]: binary defined UUID to look for + * Returns: libvirt domain resource + */ +PHP_FUNCTION(libvirt_domain_lookup_by_uuid) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + strsize_t uuid_len; + unsigned char *uuid = NULL; + virDomainPtr domain = NULL; + php_libvirt_domain *res_domain; + + GET_CONNECTION_FROM_ARGS("rs", &zconn, &uuid, &uuid_len); + + if ((uuid == NULL) || (uuid_len < 1)) + RETURN_FALSE; + domain = virDomainLookupByUUID(conn->conn, uuid); + if (domain == NULL) + RETURN_FALSE; + + res_domain = (php_libvirt_domain *)emalloc(sizeof(php_libvirt_domain)); + res_domain->domain = domain; + res_domain->conn = conn; + + DPRINTF("%s: domain UUID = '%s', returning %p\n", PHPFUNC, uuid, res_domain->domain); + resource_change_counter(INT_RESOURCE_DOMAIN, conn->conn, res_domain->domain, 1 TSRMLS_CC); + + VIRT_REGISTER_RESOURCE(res_domain, le_libvirt_domain); +} + +/* + * Function name: libvirt_domain_lookup_by_uuid_string + * Since version: 0.4.1(-1) + * Description: Function is used to get the domain by it's UUID that's accepted in string format + * Arguments: @res [resource]: libvirt connection resource from libvirt_connect() + * @uuid [string]: domain UUID [in string format] to look for + * Returns: libvirt domain resource + */ +PHP_FUNCTION(libvirt_domain_lookup_by_uuid_string) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + strsize_t uuid_len; + char *uuid = NULL; + virDomainPtr domain = NULL; + php_libvirt_domain *res_domain; + + GET_CONNECTION_FROM_ARGS("rs", &zconn, &uuid, &uuid_len); + + if ((uuid == NULL) || (uuid_len < 1)) + RETURN_FALSE; + domain = virDomainLookupByUUIDString(conn->conn, uuid); + if (domain == NULL) + RETURN_FALSE; + + res_domain = (php_libvirt_domain *)emalloc(sizeof(php_libvirt_domain)); + res_domain->domain = domain; + res_domain->conn = conn; + + DPRINTF("%s: domain UUID string = '%s', returning %p\n", PHPFUNC, uuid, res_domain->domain); + resource_change_counter(INT_RESOURCE_DOMAIN, conn->conn, res_domain->domain, 1 TSRMLS_CC); + + VIRT_REGISTER_RESOURCE(res_domain, le_libvirt_domain); +} + +/* + * Function name: libvirt_domain_lookup_by_id + * Since version: 0.4.1(-1) + * Description: Function is used to get domain by it's ID, applicable only to running guests + * Arguments: @conn [resource]: libvirt connection resource from libvirt_connect() + * @id [string]: domain id to look for + * Returns: libvirt domain resource + */ +PHP_FUNCTION(libvirt_domain_lookup_by_id) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + zend_long id; + virDomainPtr domain = NULL; + php_libvirt_domain *res_domain; + + GET_CONNECTION_FROM_ARGS("rl", &zconn, &id); + + domain = virDomainLookupByID(conn->conn, (int)id); + if (domain == NULL) + RETURN_FALSE; + + res_domain = (php_libvirt_domain *)emalloc(sizeof(php_libvirt_domain)); + res_domain->domain = domain; + res_domain->conn = conn; + + DPRINTF("%s: domain id = '%d', returning %p\n", PHPFUNC, (int)id, res_domain->domain); + resource_change_counter(INT_RESOURCE_DOMAIN, conn->conn, res_domain->domain, 1 TSRMLS_CC); + + VIRT_REGISTER_RESOURCE(res_domain, le_libvirt_domain); +} + +/* + * Function name: libvirt_domain_create + * Since version: 0.4.1(-1) + * Description: Function is used to create the domain identified by it's resource + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * Returns: result of domain creation (startup) + */ +PHP_FUNCTION(libvirt_domain_create) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + int retval; + + GET_DOMAIN_FROM_ARGS("r", &zdomain); + + retval = virDomainCreate(domain->domain); + DPRINTF("%s: virDomainCreate(%p) returned %d\n", PHPFUNC, domain->domain, retval); + if (retval != 0) + RETURN_FALSE; + RETURN_TRUE; +} + +/* + * Function name: libvirt_domain_destroy + * Since version: 0.4.1(-1) + * Description: Function is used to destroy the domain identified by it's resource + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * Returns: result of domain destroy + */ +PHP_FUNCTION(libvirt_domain_destroy) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + int retval; + + GET_DOMAIN_FROM_ARGS("r", &zdomain); + + retval = virDomainDestroy(domain->domain); + DPRINTF("%s: virDomainDestroy(%p) returned %d\n", PHPFUNC, domain->domain, retval); + if (retval != 0) + RETURN_FALSE; + RETURN_TRUE; +} + +/* + * Function name: libvirt_domain_resume + * Since version: 0.4.1(-1) + * Description: Function is used to resume the domain identified by it's resource + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * Returns: result of domain resume + */ +PHP_FUNCTION(libvirt_domain_resume) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + int retval; + + GET_DOMAIN_FROM_ARGS("r", &zdomain); + + retval = virDomainResume(domain->domain); + DPRINTF("%s: virDomainResume(%p) returned %d\n", PHPFUNC, domain->domain, retval); + if (retval != 0) + RETURN_FALSE; + RETURN_TRUE; +} + +/* + * Function name: libvirt_domain_core_dump + * Since version: 0.4.1(-2) + * Description: Function is used to dump core of the domain identified by it's resource + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * @to [string]: to + * Returns: TRUE for success, FALSE on error + */ +PHP_FUNCTION(libvirt_domain_core_dump) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + int retval; + strsize_t to_len; + char *to; + + GET_DOMAIN_FROM_ARGS("rs", &zdomain, &to, &to_len); + + retval = virDomainCoreDump(domain->domain, to, 0); + DPRINTF("%s: virDomainCoreDump(%p, %s, 0) returned %d\n", PHPFUNC, domain->domain, to, retval); + if (retval != 0) + RETURN_FALSE; + RETURN_TRUE; +} + +/* + * Function name: libvirt_domain_shutdown + * Since version: 0.4.1(-1) + * Description: Function is used to shutdown the domain identified by it's resource + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * Returns: TRUE for success, FALSE on error + */ +PHP_FUNCTION(libvirt_domain_shutdown) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + int retval; + + GET_DOMAIN_FROM_ARGS("r", &zdomain); + + retval = virDomainShutdown(domain->domain); + DPRINTF("%s: virDomainShutdown(%p) returned %d\n", PHPFUNC, domain->domain, retval); + if (retval != 0) + RETURN_FALSE; + RETURN_TRUE; +} + +/* + * Function name: libvirt_domain_suspend + * Since version: 0.4.1(-1) + * Description: Function is used to suspend the domain identified by it's resource + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * Returns: TRUE for success, FALSE on error + */ +PHP_FUNCTION(libvirt_domain_suspend) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + int retval; + + GET_DOMAIN_FROM_ARGS("r", &zdomain); + + retval = virDomainSuspend(domain->domain); + DPRINTF("%s: virDomainSuspend(%p) returned %d\n", PHPFUNC, domain->domain, retval); + if (retval != 0) + RETURN_FALSE; + RETURN_TRUE; +} + +/* + * Function name: libvirt_domain_managedsave + * Since version: 0.4.1(-1) + * Description: Function is used to managed save the domain (domain was unloaded from memory and it state saved to disk) identified by it's resource + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * Returns: TRUE for success, FALSE on error + */ +PHP_FUNCTION(libvirt_domain_managedsave) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + int retval; + + GET_DOMAIN_FROM_ARGS("r", &zdomain); + retval = virDomainManagedSave(domain->domain, 0); + DPRINTF("%s: virDomainManagedSave(%p) returned %d\n", PHPFUNC, domain->domain, retval); + if (retval != 0) + RETURN_FALSE; + RETURN_TRUE; +} + +/* + * Function name: libvirt_domain_undefine + * Since version: 0.4.1(-1) + * Description: Function is used to undefine the domain identified by it's resource + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * Returns: TRUE for success, FALSE on error + */ +PHP_FUNCTION(libvirt_domain_undefine) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + int retval; + + GET_DOMAIN_FROM_ARGS("r", &zdomain); + + retval = virDomainUndefine(domain->domain); + DPRINTF("%s: virDomainUndefine(%p) returned %d\n", PHPFUNC, domain->domain, retval); + if (retval != 0) + RETURN_FALSE; + RETURN_TRUE; +} + +/* + * Function name: libvirt_domain_reboot + * Since version: 0.4.1(-1) + * Description: Function is used to reboot the domain identified by it's resource + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * @flags [int]: optional flags + * Returns: TRUE for success, FALSE on error + */ +PHP_FUNCTION(libvirt_domain_reboot) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + int retval; + zend_long flags = 0; + + GET_DOMAIN_FROM_ARGS("r|l", &zdomain, &flags); + + retval = virDomainReboot(domain->domain, flags); + DPRINTF("%s: virDomainReboot(%p) returned %d\n", PHPFUNC, domain->domain, retval); + if (retval != 0) + RETURN_FALSE; + RETURN_TRUE; +} + +/* + * Function name: libvirt_domain_define_xml + * Since version: 0.4.1(-1) + * Description: Function is used to define the domain from XML string + * Arguments: @conn [resource]: libvirt connection resource + * @xml [string]: XML string to define guest from + * Returns: newly defined domain resource + */ +PHP_FUNCTION(libvirt_domain_define_xml) +{ + php_libvirt_domain *res_domain = NULL; + php_libvirt_connection *conn = NULL; + zval *zconn; + virDomainPtr domain = NULL; + char *xml; + strsize_t xml_len; + + GET_CONNECTION_FROM_ARGS("rs", &zconn, &xml, &xml_len); + + domain = virDomainDefineXML(conn->conn, xml); + if (domain == NULL) + RETURN_FALSE; + + res_domain = (php_libvirt_domain *)emalloc(sizeof(php_libvirt_domain)); + res_domain->domain = domain; + res_domain->conn = conn; + + DPRINTF("%s: returning %p\n", PHPFUNC, res_domain->domain); + resource_change_counter(INT_RESOURCE_DOMAIN, conn->conn, res_domain->domain, 1 TSRMLS_CC); + + VIRT_REGISTER_RESOURCE(res_domain, le_libvirt_domain); +} + +/* + * Function name: libvirt_domain_create_xml + * Since version: 0.4.1(-1) + * Description: Function is used to create the domain identified by it's resource + * Arguments: @conn [resource]: libvirt connection resource + * @xml [string]: XML string to create guest from + * Returns: newly started/created domain resource + */ +PHP_FUNCTION(libvirt_domain_create_xml) +{ + php_libvirt_domain *res_domain = NULL; + php_libvirt_connection *conn = NULL; + zval *zconn; + virDomainPtr domain = NULL; + char *xml; + strsize_t xml_len; + zend_long flags = 0; + + GET_CONNECTION_FROM_ARGS("rs|l", &zconn, &xml, &xml_len, &flags); + + domain = virDomainCreateXML(conn->conn, xml, flags); + DPRINTF("%s: virDomainCreateXML(%p, <xml>, 0) returned %p\n", PHPFUNC, conn->conn, domain); + if (domain == NULL) + RETURN_FALSE; + + res_domain = (php_libvirt_domain *)emalloc(sizeof(php_libvirt_domain)); + res_domain->domain = domain; + res_domain->conn = conn; + + DPRINTF("%s: returning %p\n", PHPFUNC, res_domain->domain); + resource_change_counter(INT_RESOURCE_DOMAIN, conn->conn, res_domain->domain, 1 TSRMLS_CC); + + VIRT_REGISTER_RESOURCE(res_domain, le_libvirt_domain); +} + +/* + * Function name: libvirt_domain_xml_from_native + * Since version: 0.5.3 + * Description: Function is used to convert native configuration data to libvirt domain XML + * Arguments: @conn [resource]: libvirt connection resource + * @format [string]: configuration format converting from + * @config_data [string]: content of the native config file + * Returns: libvirt domain XML, FALSE on error + */ +PHP_FUNCTION(libvirt_domain_xml_from_native) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + char *config_data = NULL; + char *format = NULL; + char *xml = NULL; + strsize_t config_data_len; + strsize_t format_len; + unsigned int flags = 0; + + GET_CONNECTION_FROM_ARGS("rss", &zconn, &format, &format_len, &config_data, &config_data_len); + + xml = virConnectDomainXMLFromNative(conn->conn, format, config_data, flags); + + if (xml == NULL) { + set_error_if_unset("Cannot convert native format to XML" TSRMLS_CC); + RETURN_FALSE; + } + + VIRT_RETVAL_STRING(xml); + free(xml); +} + +/* + * Function name: libvirt_domain_xml_to_native + * Since version: 0.5.3 + * Description: Function is used to convert libvirt domain XML to native configuration + * Arguments: @conn [resource]: libvirt connection resource + * @format [string]: configuration format converting to + * @xml_data [string]: content of the libvirt domain xml file + * Returns: contents of the native data file, FALSE on error +*/ +PHP_FUNCTION(libvirt_domain_xml_to_native) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + char *xml_data = NULL; + char *format = NULL; + char *config_data = NULL; + strsize_t xml_data_len; + strsize_t format_len; + unsigned int flags = 0; + + GET_CONNECTION_FROM_ARGS("rss", &zconn, &format, &format_len, &xml_data, &xml_data_len); + + config_data = virConnectDomainXMLToNative(conn->conn, format, xml_data, flags); + + if (config_data == NULL) { + set_error_if_unset("Cannot convert to native format from XML" TSRMLS_CC); + RETURN_FALSE; + } + + VIRT_RETVAL_STRING(config_data); + free(config_data); +} + +/* + * Function name: libvirt_domain_set_max_memory + * Since version: 0.5.1 + * Description: Function to set max memory for domain + * Arguments: @res [resource]: libvirt domain resource + * @memory [int]: memory size in 1024 bytes (Kb) + * Returns: TRUE for success, FALSE for failure + */ +PHP_FUNCTION(libvirt_domain_set_max_memory) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + zend_long memory = 0; + + GET_DOMAIN_FROM_ARGS("rl", &zdomain, &memory); + + if (virDomainSetMaxMemory(domain->domain, memory) != 0) + RETURN_FALSE; + + RETURN_TRUE; +} + +/* + * Function name: libvirt_domain_set_memory + * Since version: 0.5.1 + * Description: Function to set memory for domain + * Arguments: @res [resource]: libvirt domain resource + * @memory [int]: memory size in 1024 bytes (Kb) + * Returns: TRUE for success, FALSE for failure + */ +PHP_FUNCTION(libvirt_domain_set_memory) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + zend_long memory = 0; + + GET_DOMAIN_FROM_ARGS("rl", &zdomain, &memory); + + if (virDomainSetMemory(domain->domain, memory) != 0) + RETURN_FALSE; + + RETURN_TRUE; +} + +/* + * Function name: libvirt_domain_set_memory_flags + * Since version: 0.5.1 + * Description: Function to set max memory for domain + * Arguments: @res [resource]: libvirt domain resource + * @memory [int]: memory size in 1024 bytes (Kb) + * @flags [int]: bitwise-OR VIR_DOMAIN_MEM_* flags + * Returns: TRUE for success, FALSE for failure + */ +PHP_FUNCTION(libvirt_domain_set_memory_flags) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + zend_long memory = 0; + zend_long flags = 0; + + GET_DOMAIN_FROM_ARGS("rl|l", &zdomain, &memory, &flags); + + if (virDomainSetMemoryFlags(domain->domain, memory, flags) != 0) + RETURN_FALSE; + + RETURN_TRUE; +} + +/* + * Function name: libvirt_domain_memory_peek + * Since version: 0.4.1(-1) + * Description: Function is used to get the domain's memory peek value + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * @start [int]: start + * @size [int]: size + * @flags [int]: optional flags + * Returns: domain memory peek + */ +PHP_FUNCTION(libvirt_domain_memory_peek) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + int retval; + zend_long flags = 0; + zend_long start; + zend_long size; + char *buff; + + GET_DOMAIN_FROM_ARGS("rlll", &zdomain, &start, &size, &flags); + if (start < 0) { + set_error("Negative argument start" TSRMLS_CC); + RETURN_FALSE; + } + buff = (char *)emalloc(size); + retval = virDomainMemoryPeek(domain->domain, start, size, buff, flags); + if (retval != 0) + RETURN_FALSE; + VIRT_RETVAL_STRINGL(buff, size); + efree(buff); +} + +/* + * Function name: libvirt_domain_memory_stats + * Since version: 0.4.1(-1) + * Description: Function is used to get the domain's memory stats + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * @flags [int]: optional flags + * Returns: domain memory stats array (same fields as virDomainMemoryStats, please see libvirt documentation) + */ +PHP_FUNCTION(libvirt_domain_memory_stats) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + int retval; + zend_long flags = 0; + int i; + struct _virDomainMemoryStat stats[VIR_DOMAIN_MEMORY_STAT_NR]; + + GET_DOMAIN_FROM_ARGS("r|l", &zdomain, &flags); + + retval = virDomainMemoryStats(domain->domain, stats, VIR_DOMAIN_MEMORY_STAT_NR, flags); + DPRINTF("%s: virDomainMemoryStats(%p...) returned %d\n", PHPFUNC, domain->domain, retval); + + if (retval == -1) + RETURN_FALSE; + LONGLONG_INIT; + array_init(return_value); + for (i = 0; i < retval; i++) + LONGLONG_INDEX(return_value, stats[i].tag, stats[i].val) +} + +/* + * Function name: libvirt_domain_block_commit + * Since version: 0.5.2(-1) + * Description: Function is used to commit block job + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * @disk [string]: path to the block device, or device shorthand + * @base [string]: path to backing file to merge into, or device shorthand, or NULL for default + * @top [string]: path to file within backing chain that contains data to be merged, or device shorthand, or NULL to merge all possible data + * @bandwidth [int]: (optional) specify bandwidth limit; flags determine the unit + * @flags [int]: bitwise-OR of VIR_DOMAIN_BLOCK_COMMIT_* + * Returns: true on success fail on error + */ +PHP_FUNCTION(libvirt_domain_block_commit) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + int retval; + char *disk = NULL; + strsize_t disk_len; + char *base = NULL; + strsize_t base_len; + char *top = NULL; + strsize_t top_len; + zend_long bandwidth = 0; + zend_long flags = 0; + + GET_DOMAIN_FROM_ARGS("rs|ssll", &zdomain, &disk, &disk_len, &base, &base_len, &top, &top_len, &bandwidth, &flags); + if (strcmp(disk, "") == 0) + RETURN_FALSE; + if (strcmp(base, "") == 0) + base = NULL; + if (strcmp(top, "") == 0) + top = NULL; + + retval = virDomainBlockCommit(domain->domain, disk, base, top, bandwidth, flags); + if (retval == -1) + RETURN_FALSE; + + RETURN_TRUE; +} + +/* + * Function name: libvirt_domain_block_stats + * Since version: 0.4.1(-1) + * Description: Function is used to get the domain's block stats + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * @path [string]: device path to get statistics about + * Returns: domain block stats array, fields are rd_req, rd_bytes, wr_req, wr_bytes and errs + */ +PHP_FUNCTION(libvirt_domain_block_stats) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + int retval; + char *path; + strsize_t path_len; + + struct _virDomainBlockStats stats; + + GET_DOMAIN_FROM_ARGS("rs", &zdomain, &path, &path_len); + + retval = virDomainBlockStats(domain->domain, path, &stats, sizeof stats); + DPRINTF("%s: virDomainBlockStats(%p, %s, <stats>, <size>) returned %d\n", PHPFUNC, domain->domain, path, retval); + if (retval == -1) + RETURN_FALSE; + + array_init(return_value); + LONGLONG_INIT; + LONGLONG_ASSOC(return_value, "rd_req", stats.rd_req); + LONGLONG_ASSOC(return_value, "rd_bytes", stats.rd_bytes); + LONGLONG_ASSOC(return_value, "wr_req", stats.wr_req); + LONGLONG_ASSOC(return_value, "wr_bytes", stats.wr_bytes); + LONGLONG_ASSOC(return_value, "errs", stats.errs); +} + +/* + * Function name: libvirt_domain_block_resize + * Since version: 0.5.1(-1) + * Description: Function is used to resize the domain's block device + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * @path [string]: device path to resize + * @size [int]: size of device + * @flags [int]: bitwise-OR of VIR_DOMAIN_BLOCK_RESIZE_* + * Returns: true on success fail on error + */ +PHP_FUNCTION(libvirt_domain_block_resize) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + int retval; + char *path; + strsize_t path_len; + zend_long size = 0; + zend_long flags = 0; + + GET_DOMAIN_FROM_ARGS("rsl|l", &zdomain, &path, &path_len, &size, &flags); + + retval = virDomainBlockResize(domain->domain, path, size, flags); + if (retval == -1) + RETURN_FALSE; + + RETURN_TRUE; +} + +/* + * Function name: libvirt_domain_block_job_info + * Since version: 0.5.2(-1) + * Description: Function is used to request block job information for the given disk + * Arguments: @dom [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * @disk [string]: path to the block device, or device shorthand + * @flags [int]: bitwise-OR of VIR_DOMAIN_BLOCK_COMMIT_* + * Returns: Array with status virDomainGetBlockJobInfo and blockjob information. + */ +PHP_FUNCTION(libvirt_domain_block_job_info) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + int retval; + char *disk; + int disk_len; + long flags = 0; + virDomainBlockJobInfo info; + + GET_DOMAIN_FROM_ARGS("rs|l", &zdomain, &disk, &disk_len, &flags); + + retval = virDomainGetBlockJobInfo(domain->domain, disk, &info, flags); + + array_init(return_value); + add_assoc_long(return_value, "status", (int)retval); + add_assoc_long(return_value, "type", (int)info.type); + add_assoc_long(return_value, "bandwidth", (unsigned long)info.bandwidth); + add_assoc_long(return_value, "cur", (unsigned long long)info.cur); + add_assoc_long(return_value, "end", (unsigned long long)info.end); +} + + +/* + * Function name: libvirt_domain_block_job_abort + * Since version: 0.5.1(-1) + * Description: Function is used to abort block job + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * @path [string]: device path to resize + * @flags [int]: bitwise-OR of VIR_DOMAIN_BLOCK_JOB_ABORT_* + * Returns: true on success fail on error + */ +PHP_FUNCTION(libvirt_domain_block_job_abort) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + int retval; + char *path; + strsize_t path_len; + zend_long flags = 0; + + GET_DOMAIN_FROM_ARGS("rs|l", &zdomain, &path, &path_len, &flags); + + retval = virDomainBlockJobAbort(domain->domain, path, flags); + if (retval == -1) + RETURN_FALSE; + + RETURN_TRUE; +} + +/* + * Function name: libvirt_domain_block_job_set_speed + * Since version: 0.5.1(-1) + * Description: Function is used to set speed of block job + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * @path [string]: device path to resize + * @bandwidth [int]: bandwidth + * @flags [int]: bitwise-OR of VIR_DOMAIN_BLOCK_JOB_SPEED_BANDWIDTH_* + * Returns: true on success fail on error + */ +PHP_FUNCTION(libvirt_domain_block_job_set_speed) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + int retval; + char *path; + strsize_t path_len; + zend_long bandwidth = 0; + zend_long flags = 0; + + GET_DOMAIN_FROM_ARGS("rsl|l", &zdomain, &path, &path_len, &bandwidth, &flags); + + retval = virDomainBlockJobSetSpeed(domain->domain, path, bandwidth, flags); + if (retval == -1) + RETURN_FALSE; + + RETURN_TRUE; +} + +/* + * Function name: libvirt_domain_interface_stats + * Since version: 0.4.1(-1) + * Description: Function is used to get the domain's interface stats + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * @path [string]: path to interface device + * Returns: interface stats array of {tx|rx}_{bytes|packets|errs|drop} fields + */ +PHP_FUNCTION(libvirt_domain_interface_stats) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + int retval; + char *path; + strsize_t path_len; + + struct _virDomainInterfaceStats stats; + + GET_DOMAIN_FROM_ARGS("rs", &zdomain, &path, &path_len); + + retval = virDomainInterfaceStats(domain->domain, path, &stats, sizeof stats); + DPRINTF("%s: virDomainInterfaceStats(%p, %s, <stats>, <size>) returned %d\n", PHPFUNC, domain->domain, path, retval); + if (retval == -1) + RETURN_FALSE; + + array_init(return_value); + LONGLONG_INIT; + LONGLONG_ASSOC(return_value, "rx_bytes", stats.rx_bytes); + LONGLONG_ASSOC(return_value, "rx_packets", stats.rx_packets); + LONGLONG_ASSOC(return_value, "rx_errs", stats.rx_errs); + LONGLONG_ASSOC(return_value, "rx_drop", stats.rx_drop); + LONGLONG_ASSOC(return_value, "tx_bytes", stats.tx_bytes); + LONGLONG_ASSOC(return_value, "tx_packets", stats.tx_packets); + LONGLONG_ASSOC(return_value, "tx_errs", stats.tx_errs); + LONGLONG_ASSOC(return_value, "tx_drop", stats.tx_drop); +} + +/* + * Function name: libvirt_domain_get_connect + * Since version: 0.4.1(-1) + * Description: Function is used to get the domain's connection resource. This function should *not* be used! + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * Returns: libvirt connection resource + */ +PHP_FUNCTION(libvirt_domain_get_connect) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + php_libvirt_connection *conn; + + GET_DOMAIN_FROM_ARGS("r", &zdomain); + + conn = domain->conn; + if (conn->conn == NULL) + RETURN_FALSE; + + VIRT_RETURN_RESOURCE(conn->resource); + /* since we're returning already registered resource, bump refcount */ + Z_ADDREF_P(return_value); +} + +/* + * Function name: libvirt_domain_migrate + * Since version: 0.4.1(-1) + * Description: Function is used migrate domain to another domain + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * @dest_conn [string]: destination host connection object + * @flags [int]: migration flags + * @dname [string]: domain name to rename domain to on destination side + * @bandwidth [int]: migration bandwidth in Mbps + * Returns: libvirt domain resource for migrated domain + */ +PHP_FUNCTION(libvirt_domain_migrate) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + php_libvirt_connection *dconn = NULL; + zval *zdconn; + virDomainPtr destdomain = NULL; + php_libvirt_domain *res_domain; + + zend_long flags = 0; + char *dname; + strsize_t dname_len; + zend_long bandwidth; + + dname = NULL; + dname_len = 0; + bandwidth = 0; + + GET_DOMAIN_FROM_ARGS("rrl|sl", &zdomain, &zdconn, &flags, &dname, &dname_len, &bandwidth); + + if ((domain->domain == NULL) || (domain->conn->conn == NULL)) { + set_error("Domain object is not valid" TSRMLS_CC); + RETURN_FALSE; + } + + VIRT_FETCH_RESOURCE(dconn, php_libvirt_connection*, &zdconn, PHP_LIBVIRT_CONNECTION_RES_NAME, le_libvirt_connection); + if ((dconn == NULL) || (dconn->conn == NULL)) { + set_error("Destination connection object is not valid" TSRMLS_CC); + RETURN_FALSE; + } + + destdomain = virDomainMigrate(domain->domain, dconn->conn, flags, dname, NULL, bandwidth); + if (destdomain == NULL) + RETURN_FALSE; + + res_domain = (php_libvirt_domain *)emalloc(sizeof(php_libvirt_domain)); + res_domain->domain = destdomain; + res_domain->conn = dconn; + + DPRINTF("%s: returning %p\n", PHPFUNC, res_domain->domain); + resource_change_counter(INT_RESOURCE_DOMAIN, dconn->conn, res_domain->domain, 1 TSRMLS_CC); + + VIRT_REGISTER_RESOURCE(res_domain, le_libvirt_domain); +} + +/* + * Function name: libvirt_domain_migrate_to_uri + * Since version: 0.4.1(-1) + * Description: Function is used migrate domain to another libvirt daemon specified by it's URI + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * @dest_uri [string]: destination URI to migrate to + * @flags [int]: migration flags + * @dname [string]: domain name to rename domain to on destination side + * @bandwidth [int]: migration bandwidth in Mbps + * Returns: TRUE for success, FALSE on error + */ +PHP_FUNCTION(libvirt_domain_migrate_to_uri) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + int retval; + long flags = 0; + char *duri; + strsize_t duri_len; + char *dname; + strsize_t dname_len; + zend_long bandwidth; + + dname = NULL; + dname_len = 0; + bandwidth = 0; + GET_DOMAIN_FROM_ARGS("rsl|sl", &zdomain, &duri, &duri_len, &flags, &dname, &dname_len, &bandwidth); + + retval = virDomainMigrateToURI(domain->domain, duri, flags, dname, bandwidth); + DPRINTF("%s: virDomainMigrateToURI() returned %d\n", PHPFUNC, retval); + + if (retval == 0) + RETURN_TRUE; + RETURN_FALSE; +} + +/* + * Function name: libvirt_domain_migrate_to_uri2 + * Since version: 0.4.6(-1) + * Description: Function is used migrate domain to another libvirt daemon specified by it's URI + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * @dconnuri [string]: URI for target libvirtd + * @miguri [string]: URI for invoking the migration + * @dxml [string]: XML config for launching guest on target + * @flags [int]: migration flags + * @dname [string]: domain name to rename domain to on destination side + * @bandwidth [int]: migration bandwidth in Mbps + * Returns: TRUE for success, FALSE on error + */ +PHP_FUNCTION(libvirt_domain_migrate_to_uri2) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + int retval; + char *dconnuri; + strsize_t dconnuri_len; + char *miguri; + strsize_t miguri_len; + char *dxml; + strsize_t dxml_len; + zend_long flags = 0; + char *dname; + strsize_t dname_len; + zend_long bandwidth; + + dconnuri = NULL; + dconnuri_len = 0; + miguri = NULL; + miguri_len = 0; + dxml = NULL; + dxml_len = 0; + dname = NULL; + dname_len = 0; + bandwidth = 0; + GET_DOMAIN_FROM_ARGS("r|ssslsl", &zdomain, &dconnuri, &dconnuri_len, &miguri, &miguri_len, &dxml, &dxml_len, &flags, &dname, &dname_len, &bandwidth); + + // set to NULL if empty string + if (dconnuri_len == 0) + dconnuri=NULL; + if (miguri_len == 0) + miguri=NULL; + if (dxml_len == 0) + dxml=NULL; + if (dname_len == 0) + dname=NULL; + + retval = virDomainMigrateToURI2(domain->domain, dconnuri, miguri, dxml, flags, dname, bandwidth); + DPRINTF("%s: virDomainMigrateToURI2() returned %d\n", PHPFUNC, retval); + + if (retval == 0) + RETURN_TRUE; + RETURN_FALSE; +} + +/* + * Function name: libvirt_domain_get_job_info + * Since version: 0.4.1(-1) + * Description: Function is used get job information for the domain + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * Returns: job information array of type, time, data, mem and file fields + */ +PHP_FUNCTION(libvirt_domain_get_job_info) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + int retval; + + struct _virDomainJobInfo jobinfo; + + GET_DOMAIN_FROM_ARGS("r", &zdomain); + + retval = virDomainGetJobInfo(domain->domain, &jobinfo); + if (retval == -1) + RETURN_FALSE; + + array_init(return_value); + LONGLONG_INIT; + add_assoc_long(return_value, "type", jobinfo.type); + LONGLONG_ASSOC(return_value, "time_elapsed", jobinfo.timeElapsed); + LONGLONG_ASSOC(return_value, "time_remaining", jobinfo.timeRemaining); + LONGLONG_ASSOC(return_value, "data_total", jobinfo.dataTotal); + LONGLONG_ASSOC(return_value, "data_processed", jobinfo.dataProcessed); + LONGLONG_ASSOC(return_value, "data_remaining", jobinfo.dataRemaining); + LONGLONG_ASSOC(return_value, "mem_total", jobinfo.memTotal); + LONGLONG_ASSOC(return_value, "mem_processed", jobinfo.memProcessed); + LONGLONG_ASSOC(return_value, "mem_remaining", jobinfo.memRemaining); + LONGLONG_ASSOC(return_value, "file_total", jobinfo.fileTotal); + LONGLONG_ASSOC(return_value, "file_processed", jobinfo.fileProcessed); + LONGLONG_ASSOC(return_value, "file_remaining", jobinfo.fileRemaining); +} + +/* + * Function name: libvirt_domain_xml_xpath + * Since version: 0.4.1(-1) + * Description: Function is used to get the result of xPath expression that's run against the domain + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * @xpath [string]: xPath expression to parse against the domain + * @flags [int]: optional flags + * Returns: result of the expression in an array + */ +PHP_FUNCTION(libvirt_domain_xml_xpath) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + zval *zpath; + char *xml; + char *tmp = NULL; + strsize_t path_len = -1; + zend_long flags = 0; + int rc = 0; + + GET_DOMAIN_FROM_ARGS("rs|l", &zdomain, &zpath, &path_len, &flags); + + xml = virDomainGetXMLDesc(domain->domain, flags); + if (!xml) + RETURN_FALSE; + + array_init(return_value); + + free(get_string_from_xpath(xml, (char *)zpath, &return_value, &rc)); + if (return_value < 0) { + free(xml); + RETURN_FALSE; + } + + free(tmp); + free(xml); + + if (rc == 0) + RETURN_FALSE; + + VIRT_ADD_ASSOC_STRING(return_value, "xpath", (char *)zpath); + if (rc < 0) + add_assoc_long(return_value, "error_code", (long)rc); +} + +/* + * Function name: libvirt_domain_get_block_info + * Since version: 0.4.1(-1) + * Description: Function is used to get the domain's block device information + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * @dev [string]: device to get block information about + * Returns: domain block device information array of device, file or partition, capacity, allocation and physical size + */ +PHP_FUNCTION(libvirt_domain_get_block_info) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + int retval; + char *dev; + char *xml; + char *tmp = NULL; + strsize_t dev_len; + int isFile; + char *xpath = NULL; + + struct _virDomainBlockInfo info; + + GET_DOMAIN_FROM_ARGS("rs", &zdomain, &dev, &dev_len); + + /* Get XML for the domain */ + xml = virDomainGetXMLDesc(domain->domain, VIR_DOMAIN_XML_INACTIVE); + if (!xml) { + set_error("Cannot get domain XML" TSRMLS_CC); + RETURN_FALSE; + } + + isFile = 0; + + if (asprintf(&xpath, &quot;//domain/devices/disk/target[@dev=&#39;%s&#39;]/../source/(a)dev&quot;, dev) < 0) { + set_error("Out of memory" TSRMLS_CC); + goto error; + } + tmp = get_string_from_xpath(xml, xpath, NULL, &retval); + if (retval < 0) { + set_error("Cannot get XPath expression result for device storage" TSRMLS_CC); + goto error; + } + + if (retval == 0) { + free(xpath); + if (asprintf(&xpath, &quot;//domain/devices/disk/target[@dev=&#39;%s&#39;]/../source/(a)file&quot;, dev) < 0) { + set_error("Out of memory" TSRMLS_CC); + goto error; + } + free(tmp); + tmp = get_string_from_xpath(xml, xpath, NULL, &retval); + if (retval < 0) { + set_error("Cannot get XPath expression result for file storage" TSRMLS_CC); + goto error; + } + isFile = 1; + } + + if (retval == 0) { + set_error("No relevant node found" TSRMLS_CC); + goto error; + } + + retval = virDomainGetBlockInfo(domain->domain, tmp, &info, 0); + if (retval == -1) { + set_error("Cannot get domain block information" TSRMLS_CC); + goto error; + } + + array_init(return_value); + LONGLONG_INIT; + VIRT_ADD_ASSOC_STRING(return_value, "device", dev); + + if (isFile) + VIRT_ADD_ASSOC_STRING(return_value, "file", tmp); + else + VIRT_ADD_ASSOC_STRING(return_value, "partition", tmp); + + free(xpath); + if (asprintf(&xpath, &quot;//domain/devices/disk/target[@dev=&#39;%s&#39;]/../driver/(a)type&quot;, dev) < 0) { + set_error("Out of memory" TSRMLS_CC); + goto error; + } + free(tmp); + tmp = get_string_from_xpath(xml, xpath, NULL, &retval); + if (tmp != NULL) + VIRT_ADD_ASSOC_STRING(return_value, "type", tmp); + + LONGLONG_ASSOC(return_value, "capacity", info.capacity); + LONGLONG_ASSOC(return_value, "allocation", info.allocation); + LONGLONG_ASSOC(return_value, "physical", info.physical); + + free(xpath); + free(tmp); + free(xml); + return; + + error: + free(xpath); + free(tmp); + free(xml); + RETURN_FALSE; +} + +/* + * Function name: libvirt_domain_get_network_info + * Since version: 0.4.1(-1) + * Description: Function is used to get the domain's network information + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * @mac [string]: mac address of the network device + * Returns: domain network info array of MAC address, network name and type of NIC card + */ +PHP_FUNCTION(libvirt_domain_get_network_info) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + int retval; + char *mac; + char *xml; + char *tmp = NULL; + strsize_t mac_len; + char *xpath = NULL; + + GET_DOMAIN_FROM_ARGS("rs", &zdomain, &mac, &mac_len); + + /* Get XML for the domain */ + xml = virDomainGetXMLDesc(domain->domain, VIR_DOMAIN_XML_INACTIVE); + if (!xml) { + set_error("Cannot get domain XML" TSRMLS_CC); + RETURN_FALSE; + } + + DPRINTF("%s: Getting network information for NIC with MAC address '%s'\n", PHPFUNC, mac); + if (asprintf(&xpath, &quot;//domain/devices/interface[@type=&#39;network&#39;]/mac[@address=&#39;%s&#39;]/../source/(a)network&quot;, mac) < 0) { + set_error("Out of memory" TSRMLS_CC); + goto error; + } + tmp = get_string_from_xpath(xml, xpath, NULL, &retval); + if (tmp == NULL) { + set_error("Invalid XPath node for source network" TSRMLS_CC); + goto error; + } + + if (retval < 0) { + set_error("Cannot get XPath expression result for network source" TSRMLS_CC); + goto error; + } + + array_init(return_value); + VIRT_ADD_ASSOC_STRING(return_value, "mac", mac); + VIRT_ADD_ASSOC_STRING(return_value, "network", tmp); + + free(tmp); + free(xpath); + + if (asprintf(&xpath, &quot;//domain/devices/interface[@type=&#39;network&#39;]/mac[@address=&#39;%s&#39;]/../model/(a)type&quot;, mac) < 0) { + set_error("Out of memory" TSRMLS_CC); + goto error; + } + tmp = get_string_from_xpath(xml, xpath, NULL, &retval); + if ((tmp != NULL) && (retval > 0)) + VIRT_ADD_ASSOC_STRING(return_value, "nic_type", tmp); + else + VIRT_ADD_ASSOC_STRING(return_value, "nic_type", "default"); + + free(xml); + free(xpath); + free(tmp); + return; + + error: + free(xml); + free(xpath); + free(tmp); + RETURN_FALSE; +} + +/* + * Function name: libvirt_domain_get_autostart + * Since version: 0.4.1(-1) + * Description: Function is getting the autostart value for the domain + * Arguments: @res [resource]: libvirt domain resource + * Returns: autostart value or -1 + */ +PHP_FUNCTION(libvirt_domain_get_autostart) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + int flags = 0; + + GET_DOMAIN_FROM_ARGS("r", &zdomain); + + if (virDomainGetAutostart (domain->domain, &flags) != 0) { + RETURN_LONG(-1); + } + RETURN_LONG((long)flags); +} + +/* + * Function name: libvirt_domain_set_autostart + * Since version: 0.4.1(-1) + * Description: Function is setting the autostart value for the domain + * Arguments: @res [resource]: libvirt domain resource + * @flags [int]: flag to enable/disable autostart + * Returns: TRUE on success, FALSE on error + */ +PHP_FUNCTION(libvirt_domain_set_autostart) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + zend_bool flags = 0; + + GET_DOMAIN_FROM_ARGS("rb", &zdomain, &flags); + + if (virDomainSetAutostart (domain->domain, flags) != 0) { + RETURN_FALSE; + } + RETURN_TRUE; +} + +/* + * Function name: libvirt_domain_get_metadata + * Since version: 0.4.9 + * Description: Function retrieve appropriate domain element given by @type. + * Arguments: @res [resource]: libvirt domain resource + * @type [int]: virDomainMetadataType type of description + * @uri [string]: XML namespace identifier + * @flags [int]: bitwise-OR of virDomainModificationImpact + * Returns: metadata string, NULL on error or FALSE on API not supported + */ +PHP_FUNCTION(libvirt_domain_get_metadata) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + zend_long type = 0; + zend_long flags = 0; + char *uri = NULL; + strsize_t uri_len; + char *ret = NULL; + + GET_DOMAIN_FROM_ARGS("rlsl", &zdomain, &type, &uri, &uri_len, &flags); + + if ((uri != NULL) && (strlen(uri) == 0)) + uri = NULL; + + ret = virDomainGetMetadata(domain->domain, type, uri, flags); + if (ret == NULL) { + if (strstr(LIBVIRT_G(last_error), "not supported") != NULL) + RETURN_FALSE; + RETURN_NULL(); + } else { + VIRT_RETVAL_STRING(ret); + free(ret); + } +} + +/* + * Function name: libvirt_domain_set_metadata + * Since version: 0.4.9 + * Description: Function sets the appropriate domain element given by @type to the value of @description. No new lines are permitted. + * Arguments: @res [resource]: libvirt domain resource + * @type [int]: virDomainMetadataType type of description + * @metadata [string]: new metadata text + * @key [string]: XML namespace key or empty string (alias of NULL) + * @uri [string]: XML namespace identifier or empty string (alias of NULL) + * @flags [int]: bitwise-OR of virDomainModificationImpact + * Returns: -1 on error, 0 on success + */ +PHP_FUNCTION(libvirt_domain_set_metadata) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + strsize_t metadata_len, key_len, uri_len; + char *metadata = NULL; + char *key = NULL; + char *uri = NULL; + zend_long type = 0; + zend_long flags = 0; + int rc; + + GET_DOMAIN_FROM_ARGS("rlsssl", &zdomain, &type, &metadata, &metadata_len, &key, &key_len, &uri, &uri_len, &flags); + + if ((key != NULL) && (strlen(key) == 0)) + key = NULL; + if ((uri != NULL) && (strlen(uri) == 0)) + uri = NULL; + + rc = virDomainSetMetadata(domain->domain, type, metadata, key, uri, flags); + RETURN_LONG(rc); +} + +/* + * Function name: libvirt_domain_is_active + * Since version: 0.4.1(-1) + * Description: Function is getting information whether domain identified by resource is active or not + * Arguments: @res [resource]: libvirt domain resource + * Returns: virDomainIsActive() result on the domain + */ +PHP_FUNCTION(libvirt_domain_is_active) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + + GET_DOMAIN_FROM_ARGS("r", &zdomain); + + RETURN_LONG(virDomainIsActive(domain->domain)); +} + +/* + * Function name: libvirt_domain_get_next_dev_ids + * Since version: 0.4.2 + * Description: This functions can be used to get the next free slot if you intend to add a new device identified by slot to the domain, e.g. NIC device + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * Returns: next free slot number for the domain + */ +PHP_FUNCTION(libvirt_domain_get_next_dev_ids) +{ + long dom, bus, slot, func; + php_libvirt_domain *domain = NULL; + zval *zdomain; + + GET_DOMAIN_FROM_ARGS("r", &zdomain); + + DPRINTF("%s: Getting the next dev ids for domain %p\n", PHPFUNC, domain->domain); + + dom = get_next_free_numeric_value(domain->domain, "//@domain"); + bus = get_next_free_numeric_value(domain->domain, "//@bus"); + slot = get_next_free_numeric_value(domain->domain, "//@slot"); + func = get_next_free_numeric_value(domain->domain, "//@func"); + + array_init(return_value); + add_assoc_long(return_value, "next_domain", dom); + add_assoc_long(return_value, "next_bus", bus); + add_assoc_long(return_value, "next_slot", slot); + add_assoc_long(return_value, "next_func", func); +} + +/* + * Function name: libvirt_domain_get_screenshot + * Since version: 0.4.2 + * Description: Function uses gvnccapture (if available) to get the screenshot of the running domain + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * @server [string]: server string for the host machine + * @scancode [int]: integer value of the scancode to be send to refresh screen + * Returns: PNG image binary data + */ +PHP_FUNCTION(libvirt_domain_get_screenshot) +{ +#ifndef EXTWIN + php_libvirt_domain *domain = NULL; + zval *zdomain; + pid_t childpid = -1; + pid_t w = -1; + int retval = -1; + int fd = -1, fsize = -1; + char file[] = "/tmp/libvirt-php-tmp-XXXXXX"; + char *buf = NULL; + char *tmp = NULL; + char *xml = NULL; + int port = -1; + char *hostname = NULL; + strsize_t hostname_len; + zend_long scancode = 10; + const char *path; + char *pathDup = NULL; + char name[1024] = { 0 }; + int use_builtin = 0; + + path = get_feature_binary("screenshot"); + DPRINTF("%s: get_feature_binary('screenshot') returned %s\n", PHPFUNC, path); + + if ((path == NULL) || (access(path, X_OK) != 0)) { + use_builtin = 1; + } else { + if (!(pathDup = strdup(path))) { + set_error("Out of memory" TSRMLS_CC); + goto error; + } + } + + GET_DOMAIN_FROM_ARGS("rs|l", &zdomain, &hostname, &hostname_len, &scancode); + + xml = virDomainGetXMLDesc(domain->domain, 0); + if (!xml) { + set_error_if_unset("Cannot get the XML description" TSRMLS_CC); + goto error; + } + + tmp = get_string_from_xpath(xml, "//domain/devices/graphics/@port", NULL, &retval); + if ((tmp == NULL) || (retval < 0)) { + set_error("Cannot get the VNC port" TSRMLS_CC); + goto error; + } + + if (mkstemp(file) == 0) + goto error; + + /* Get the current hostname and override to localhost if local machine */ + gethostname(name, 1024); + if (strcmp(name, hostname) == 0) + hostname = strdup("localhost"); + + vnc_refresh_screen(hostname, tmp, scancode); + + if (use_builtin == 1) { + DPRINTF("%s: Binary not found, using builtin approach to %s:%s, tmp file = %s\n", PHPFUNC, hostname, tmp, file); + + if (vnc_get_bitmap(hostname, tmp, file) != 0) { + set_error("Cannot use builtin approach to get VNC window contents" TSRMLS_CC); + goto error; + } + } else { + port = atoi(tmp)-5900; + + DPRINTF("%s: Getting screenshot of %s:%d to temporary file %s\n", PHPFUNC, hostname, port, file); + + childpid = fork(); + if (childpid == -1) + goto error; + + if (childpid == 0) { + char tmpp[64] = { 0 }; + + snprintf(tmpp, sizeof(tmpp), "%s:%d", hostname, port); + retval = execlp(path, basename(pathDup), tmpp, file, NULL); + _exit(retval); + } else { + do { + w = waitpid(childpid, &retval, 0); + if (w == -1) + goto error; + } while (!WIFEXITED(retval) && !WIFSIGNALED(retval)); + } + + if (WEXITSTATUS(retval) != 0) { + set_error("Cannot spawn utility to get screenshot" TSRMLS_CC); + goto error; + } + } + + fd = open(file, O_RDONLY); + fsize = lseek(fd, 0, SEEK_END); + lseek(fd, 0, SEEK_SET); + buf = emalloc((fsize + 1) * sizeof(char)); + memset(buf, 0, fsize + 1); + if (read(fd, buf, fsize) < 0) { + close(fd); + unlink(file); + goto error; + } + close(fd); + + if (access(file, F_OK) == 0) { + DPRINTF("%s: Temporary file %s deleted\n", PHPFUNC, file); + unlink(file); + } + + /* This is necessary to make the output binary safe */ + VIRT_ZVAL_STRINGL(return_value, buf, fsize); + + efree(buf); + free(tmp); + free(xml); + free(pathDup); + return; + + error: + efree(buf); + free(tmp); + free(xml); + free(pathDup); + RETURN_FALSE; +#else + set_error("Function is not supported on Windows systems" TSRMLS_CC); + RETURN_FALSE; +#endif +} + +/* + * Function name: libvirt_domain_get_screenshot_api + * Since version: 0.4.5 + * Description: Function is trying to get domain screenshot using libvirt virGetDomainScreenshot() API if available. + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_get_by_*() + * @screenID [int]: monitor ID from where to take screenshot + * Returns: array of filename and mime type as type is hypervisor specific, caller is responsible for temporary file deletion + */ +PHP_FUNCTION(libvirt_domain_get_screenshot_api) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + zend_long screen = 0; + int fd = -1; + char file[] = "/tmp/libvirt-php-tmp-XXXXXX"; + virStreamPtr st = NULL; + char *mime = NULL; + const char *bin = get_feature_binary("screenshot-convert"); + +#ifdef EXTWIN + set_error_if_unset("Cannot get domain screenshot on Windows systems" TSRMLS_CC); + RETURN_FALSE; +#endif + + GET_DOMAIN_FROM_ARGS("r|l", &zdomain, &screen); + + if (!(st = virStreamNew(domain->conn->conn, 0))) { + set_error("Cannot create new stream" TSRMLS_CC); + goto error; + } + + mime = virDomainScreenshot(domain->domain, st, screen, 0); + if (!mime) { + set_error_if_unset("Cannot get domain screenshot" TSRMLS_CC); + goto error; + } + + if (!(fd = mkstemp(file))) { + virStreamAbort(st); + set_error_if_unset("Cannot get create file to save domain screenshot" TSRMLS_CC); + goto error; + } + + if (virStreamRecvAll(st, streamSink, &fd) < 0) { + set_error_if_unset("Cannot receive screenshot data" TSRMLS_CC); + virStreamAbort(st); + goto error; + } + + if (virStreamFinish(st) < 0) { + set_error_if_unset("Cannot close stream for domain" TSRMLS_CC); + goto error; + } + + virStreamFree(st); + st = NULL; + + array_init(return_value); + if (bin) { + char tmp[4096] = { 0 }; + char fileNew[1024] = { 0 }; + int exitStatus; + + snprintf(fileNew, sizeof(fileNew), "%s.png", file); + snprintf(tmp, sizeof(tmp), "%s %s %s > /dev/null 2> /dev/null", bin, file, fileNew); + exitStatus = system(tmp); + if (WEXITSTATUS(exitStatus) != 0) + goto error; + + unlink(file); + close(fd); + fd = -1; + VIRT_ADD_ASSOC_STRING(return_value, "file", fileNew); + VIRT_ADD_ASSOC_STRING(return_value, "mime", "image/png"); + } else { + close(fd); + fd = -1; + VIRT_ADD_ASSOC_STRING(return_value, "file", file); + VIRT_ADD_ASSOC_STRING(return_value, "mime", mime); + } + + free(mime); + return; + + error: + free(mime); + if (fd != -1) { + unlink(file); + close(fd); + } + if (st) + virStreamFree(st); + RETURN_FALSE; +} + +/* + * Function name: libvirt_domain_get_screen_dimensions + * Since version: 0.4.3 + * Description: Function get screen dimensions of the VNC window + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * @server [string]: server string of the host machine + * Returns: array of height and width on success, FALSE otherwise + */ +PHP_FUNCTION(libvirt_domain_get_screen_dimensions) +{ +#ifndef EXTWIN + php_libvirt_domain *domain = NULL; + zval *zdomain; + int retval = -1; + char *tmp = NULL; + char *xml = NULL; + char *hostname = NULL; + strsize_t hostname_len; + int ret; + int width; + int height; + + GET_DOMAIN_FROM_ARGS("rs", &zdomain, &hostname, &hostname_len); + + xml = virDomainGetXMLDesc(domain->domain, 0); + if (!xml) { + set_error_if_unset("Cannot get the XML description" TSRMLS_CC); + goto error; + } + + tmp = get_string_from_xpath(xml, "//domain/devices/graphics/@port", NULL, &retval); + if ((tmp == NULL) || (retval < 0)) { + set_error("Cannot get the VNC port" TSRMLS_CC); + goto error; + } + + DPRINTF("%s: hostname = %s, port = %s\n", PHPFUNC, hostname, tmp); + ret = vnc_get_dimensions(hostname, tmp, &width, &height); + free(tmp); + if (ret != 0) { + char error[1024] = { 0 }; + if (ret == -9) + snprintf(error, sizeof(error), "Cannot connect to VNC server. Please make sure domain is running and VNC graphics are set"); + else + snprintf(error, sizeof(error), "Cannot get screen dimensions, error code = %d (%s)", ret, strerror(-ret)); + + set_error(error TSRMLS_CC); + goto error; + } + + array_init(return_value); + add_assoc_long(return_value, "width", (long)width); + add_assoc_long(return_value, "height", (long)height); + + free(tmp); + free(xml); + return; + + error: + free(tmp); + free(xml); + RETURN_FALSE; +#else + set_error("Function is not supported on Windows systems" TSRMLS_CC); + RETURN_FALSE; +#endif +} + +/* + * Function name: libvirt_domain_send_keys + * Since version: 0.4.2 + * Description: Function sends keys to the domain's VNC window + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * @server [string]: server string of the host machine + * @scancode [int]: integer scancode to be sent to VNC window + * Returns: TRUE on success, FALSE otherwise + */ +PHP_FUNCTION(libvirt_domain_send_keys) +{ +#ifndef EXTWIN + php_libvirt_domain *domain = NULL; + zval *zdomain; + int retval = -1; + char *tmp = NULL; + char *xml = NULL; + char *hostname = NULL; + strsize_t hostname_len; + char *keys = NULL; + strsize_t keys_len; + int ret = 0; + + GET_DOMAIN_FROM_ARGS("rss", &zdomain, &hostname, &hostname_len, &keys, &keys_len); + + DPRINTF("%s: Sending %d VNC keys to %s...\n", PHPFUNC, (int)strlen((const char *)keys), hostname); + + xml = virDomainGetXMLDesc(domain->domain, 0); + if (!xml) { + set_error_if_unset("Cannot get the XML description" TSRMLS_CC); + goto error; + } + + tmp = get_string_from_xpath(xml, "//domain/devices/graphics/@port", NULL, &retval); + if ((tmp == NULL) || (retval < 0)) { + set_error("Cannot get the VNC port" TSRMLS_CC); + goto error; + } + + DPRINTF("%s: About to send string '%s' (%d keys) to %s:%s\n", PHPFUNC, keys, (int)strlen((const char *)keys), hostname, tmp); + + ret = vnc_send_keys(hostname, tmp, keys); + DPRINTF("%s: Sequence sending result is %d\n", PHPFUNC, ret); + + if (!ret) { + char tmpp[64] = { 0 }; + snprintf(tmpp, sizeof(tmpp), "Cannot send keys, error code %d", ret); + set_error(tmpp TSRMLS_CC); + goto error; + } + + free(tmp); + free(xml); + RETURN_TRUE; + + error: + free(tmp); + free(xml); + RETURN_FALSE; +#else + set_error("Function is not supported on Windows systems" TSRMLS_CC); + RETURN_FALSE; +#endif +} + +/* + * Function name: libvirt_domain_send_key_api + * Since version: 0.5.3 + * Description: Function sends keys to domain via libvirt API + * Arguments: @res[resource]: libvirt domain resource, e.g. from libvirt_domaing_lookup_by_*() + * @codeset [int]: the codeset of keycodes, from virKeycodeSet + * @holdtime [int]: the duration (in miliseconds) that the keys will be held + * @keycodes [array]: array of keycodes + * @flags [int]: extra flags; not used yet so callers should alway pass 0 + * Returns: TRUE for success, FALSE for failure + */ +PHP_FUNCTION(libvirt_domain_send_key_api) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + zend_long codeset; + zend_long holdtime = 0; + zend_long flags = 0; + zval *zkeycodes, *data = NULL; + HashTable *arr_hash = NULL; + HashPosition pointer; + int count, i; + uint *keycodes = NULL; + + GET_DOMAIN_FROM_ARGS("rlla|l", &zdomain, &codeset, &holdtime, &zkeycodes, + &flags); + + arr_hash = Z_ARRVAL_P(zkeycodes); + count = zend_hash_num_elements(arr_hash); + + keycodes = (uint *) emalloc(count * sizeof(uint)); + + i = 0; + VIRT_FOREACH(arr_hash, pointer, data) { + if (Z_TYPE_P(data) == IS_LONG) { + keycodes[i++] = (uint) Z_LVAL_P(data); + } + } VIRT_FOREACH_END(); + + if (virDomainSendKey(domain->domain, codeset, holdtime, keycodes, count, + flags) != 0) { + efree(keycodes); + RETURN_FALSE; + } + + efree(keycodes); + RETURN_TRUE; +} + +/* + * Function name: libvirt_domain_send_pointer_event + * Since version: 0.4.2 + * Description: Function sends keys to the domain's VNC window + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * @server [string]: server string of the host machine + * @pos_x [int]: position on x-axis + * @pos_y [int]: position on y-axis + * @clicked [int]: mask of clicked buttons (0 for none, bit 1 for button #1, bit 8 for button #8) + * @release [int]: boolean value (0 or 1) whether to release the buttons automatically once pressed + * Returns: TRUE on success, FALSE otherwise + */ +PHP_FUNCTION(libvirt_domain_send_pointer_event) +{ +#ifndef EXTWIN + php_libvirt_domain *domain = NULL; + zval *zdomain; + int retval = -1; + char *tmp = NULL; + char *xml = NULL; + char *hostname = NULL; + strsize_t hostname_len; + zend_long pos_x = 0; + zend_long pos_y = 0; + zend_long clicked = 0; + zend_bool release = 1; + int ret; + + GET_DOMAIN_FROM_ARGS("rslll|b", &zdomain, &hostname, &hostname_len, &pos_x, &pos_y, &clicked, &release); + + xml = virDomainGetXMLDesc(domain->domain, 0); + if (!xml) { + set_error_if_unset("Cannot get the XML description" TSRMLS_CC); + goto error; + } + + tmp = get_string_from_xpath(xml, "//domain/devices/graphics/@port", NULL, &retval); + if ((tmp == NULL) || (retval < 0)) { + set_error("Cannot get the VNC port" TSRMLS_CC); + goto error; + } + + DPRINTF("%s: x = %d, y = %d, clicked = %d, release = %d, hostname = %s...\n", PHPFUNC, (int) pos_x, (int) pos_y, (int) clicked, release, hostname); + ret = vnc_send_pointer_event(hostname, tmp, pos_x, pos_y, clicked, release); + if (!ret) { + char error[1024] = { 0 }; + if (ret == -9) + snprintf(error, sizeof(error), "Cannot connect to VNC server. Please make sure domain is running and VNC graphics are set"); + else + snprintf(error, sizeof(error), "Cannot send pointer event, error code = %d (%s)", ret, strerror(-ret)); + + set_error(error TSRMLS_CC); + goto error; + } + + free(tmp); + free(xml); + RETURN_TRUE; + + error: + free(tmp); + free(xml); + RETURN_FALSE; +#else + set_error("Function is not supported on Windows systems" TSRMLS_CC); + RETURN_FALSE; +#endif +} + +/* + * Function name: libvirt_domain_update_device + * Since version: 0.4.1(-1) + * Description: Function is used to update the domain's devices from the XML string + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * @xml [string]: XML string for the update + * @flags [int]: Flags to update the device (VIR_DOMAIN_DEVICE_MODIFY_CURRENT, VIR_DOMAIN_DEVICE_MODIFY_LIVE, VIR_DOMAIN_DEVICE_MODIFY_CONFIG, VIR_DOMAIN_DEVICE_MODIFY_FORCE) + * Returns: TRUE for success, FALSE on error + */ +PHP_FUNCTION(libvirt_domain_update_device) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + char *xml; + strsize_t xml_len; + zend_long flags; + int res; + + GET_DOMAIN_FROM_ARGS("rsl", &zdomain, &xml, &xml_len, &flags); + + res = virDomainUpdateDeviceFlags(domain->domain, xml, flags); + DPRINTF("%s: virDomainUpdateDeviceFlags(%p) returned %d\n", PHPFUNC, domain->domain, res); + if (res != 0) + RETURN_FALSE; + + RETURN_TRUE; +} + +/* + * Function name: libvirt_domain_qemu_agent_command + * Since version: 0.5.2(-1) + * Description: Function is used to send qemu-ga command + * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() + * @cmd [string]: command + * @timeout [int] timeout for waiting (-2 block, -1 default, 0 no wait, >0 wait specific time + * @flags [int]: unknown + * Returns: String on success and FALSE on error + */ +PHP_FUNCTION(libvirt_domain_qemu_agent_command) +{ + php_libvirt_domain *domain = NULL; + zval *zdomain; + const char *cmd; + strsize_t cmd_len; + char *ret; + zend_long timeout = -1; + zend_long flags = 0; + + GET_DOMAIN_FROM_ARGS("rs|ll", &zdomain, &cmd, &cmd_len, &timeout, &flags); + + ret = virDomainQemuAgentCommand(domain->domain, cmd, timeout, flags); + if (ret == NULL) + RETURN_FALSE; + + VIRT_RETVAL_STRING(ret); + free(ret); +} + +/* + * Function name: libvirt_list_domains + * Since version: 0.4.1(-1) + * Description: Function is used to list domains on the connection + * Arguments: @res [resource]: libvirt connection resource + * Returns: libvirt domain names array for the connection + */ +PHP_FUNCTION(libvirt_list_domains) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + int count = -1; + int expectedcount = -1; + int *ids; + char **names; + const char *name; + int i, rv; + virDomainPtr domain = NULL; + + GET_CONNECTION_FROM_ARGS("r", &zconn); + + if ((expectedcount = virConnectNumOfDomains(conn->conn)) < 0) + RETURN_FALSE; + + DPRINTF("%s: Found %d domains\n", PHPFUNC, expectedcount); + + ids = (int *)emalloc(sizeof(int) * expectedcount); + count = virConnectListDomains(conn->conn, ids, expectedcount); + DPRINTF("%s: virConnectListDomains returned %d domains\n", PHPFUNC, count); + + array_init(return_value); + for (i = 0; i < count; i++) { + domain = virDomainLookupByID(conn->conn, ids[i]); + resource_change_counter(INT_RESOURCE_DOMAIN, conn->conn, domain, 1 TSRMLS_CC); + if (domain != NULL) { + name = virDomainGetName(domain); + if (name != NULL) { + DPRINTF("%s: Found running domain %s with ID = %d\n", PHPFUNC, name, ids[i]); + VIRT_ADD_NEXT_INDEX_STRING(return_value, name); + } else { + DPRINTF("%s: Cannot get ID for running domain %d\n", PHPFUNC, ids[i]); + } + } + rv = virDomainFree(domain); + if (rv != 0) { + php_error_docref(NULL TSRMLS_CC, E_WARNING, "virDomainFree failed with %i on list_domain: %s", + rv, LIBVIRT_G(last_error)); + } else { + resource_change_counter(INT_RESOURCE_DOMAIN, conn->conn, domain, 0 TSRMLS_CC); + } + domain = NULL; + } + efree(ids); + + expectedcount = virConnectNumOfDefinedDomains(conn->conn); + DPRINTF("%s: virConnectNumOfDefinedDomains returned %d domains\n", PHPFUNC, expectedcount); + if (expectedcount < 0) { + DPRINTF("%s: virConnectNumOfDefinedDomains failed with error code %d\n", PHPFUNC, expectedcount); + RETURN_FALSE; + } + + names = (char **)emalloc(expectedcount*sizeof(char *)); + count = virConnectListDefinedDomains(conn->conn, names, expectedcount); + DPRINTF("%s: virConnectListDefinedDomains returned %d domains\n", PHPFUNC, count); + if (count < 0) { + DPRINTF("%s: virConnectListDefinedDomains failed with error code %d\n", PHPFUNC, count); + RETURN_FALSE; + } + + for (i = 0; i < count; i++) { + VIRT_ADD_NEXT_INDEX_STRING(return_value, names[i]); + DPRINTF("%s: Found inactive domain %s\n", PHPFUNC, names[i]); + free(names[i]); + } + efree(names); +} + +/* + * Function name: libvirt_list_domain_resources + * Since version: 0.4.1(-1) + * Description: Function is used to list domain resources on the connection + * Arguments: @res [resource]: libvirt connection resource + * Returns: libvirt domain resources array for the connection + */ +PHP_FUNCTION(libvirt_list_domain_resources) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + int count = -1; + int expectedcount = -1; + int *ids; + char **names; + int i; + + virDomainPtr domain = NULL; + php_libvirt_domain *res_domain; + + GET_CONNECTION_FROM_ARGS("r", &zconn); + + if ((expectedcount = virConnectNumOfDomains(conn->conn)) < 0) + RETURN_FALSE; + + ids = (int *)emalloc(sizeof(int) * expectedcount); + count = virConnectListDomains(conn->conn, ids, expectedcount); + if ((count != expectedcount) || (count < 0)) { + efree(ids); + RETURN_FALSE; + } + array_init(return_value); + for (i = 0; i < count; i++) { + domain = virDomainLookupByID(conn->conn, ids[i]); + if (domain != NULL) { + res_domain = (php_libvirt_domain *)emalloc(sizeof(php_libvirt_domain)); + res_domain->domain = domain; + + res_domain->conn = conn; + + VIRT_REGISTER_LIST_RESOURCE(domain); + resource_change_counter(INT_RESOURCE_DOMAIN, conn->conn, res_domain->domain, 1 TSRMLS_CC); + } + } + efree(ids); + + if ((expectedcount = virConnectNumOfDefinedDomains(conn->conn)) < 0) + RETURN_FALSE; + + names = (char **)emalloc(expectedcount*sizeof(char *)); + count = virConnectListDefinedDomains(conn->conn, names, expectedcount); + if ((count != expectedcount) || (count < 0)) { + efree(names); + RETURN_FALSE; + } + for (i = 0; i < count; i++) { + domain = virDomainLookupByName(conn->conn, names[i]); + if (domain != NULL) { + res_domain = (php_libvirt_domain *)emalloc(sizeof(php_libvirt_domain)); + res_domain->domain = domain; + + res_domain->conn = conn; + + VIRT_REGISTER_LIST_RESOURCE(domain); + resource_change_counter(INT_RESOURCE_DOMAIN, conn->conn, res_domain->domain, 1 TSRMLS_CC); + } + free(names[i]); + } + efree(names); +} + +/* + * Function name: libvirt_list_active_domain_ids + * Since version: 0.4.1(-1) + * Description: Function is used to list active domain IDs on the connection + * Arguments: @res [resource]: libvirt connection resource + * Returns: libvirt active domain ids array for the connection + */ +PHP_FUNCTION(libvirt_list_active_domain_ids) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + int count = -1; + int expectedcount = -1; + int *ids; + int i; + + GET_CONNECTION_FROM_ARGS("r", &zconn); + + if ((expectedcount = virConnectNumOfDomains(conn->conn)) < 0) + RETURN_FALSE; + + ids = (int *)emalloc(sizeof(int) * expectedcount); + count = virConnectListDomains(conn->conn, ids, expectedcount); + if ((count != expectedcount) || (count < 0)) { + efree(ids); + RETURN_FALSE; + } + array_init(return_value); + for (i = 0; i < count; i++) + add_next_index_long(return_value, ids[i]); + efree(ids); +} + +/* + * Function name: libvirt_list_active_domains + * Since version: 0.4.1(-1) + * Description: Function is used to list active domain names on the connection + * Arguments: @res [resource]: libvirt connection resource + * Returns: libvirt active domain names array for the connection + */ +PHP_FUNCTION(libvirt_list_active_domains) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + int count = -1; + int expectedcount = -1; + int *ids; + int i; + virDomainPtr domain = NULL; + const char *name; + + GET_CONNECTION_FROM_ARGS("r", &zconn); + + if ((expectedcount = virConnectNumOfDomains(conn->conn)) < 0) + RETURN_FALSE; + + ids = (int *)emalloc(sizeof(int) * expectedcount); + count = virConnectListDomains(conn->conn, ids, expectedcount); + if ((count != expectedcount) || (count < 0)) { + efree(ids); + RETURN_FALSE; + } + + array_init(return_value); + for (i = 0; i < count; i++) { + domain = virDomainLookupByID(conn->conn, ids[i]); + if (domain != NULL) { + if (!(name = virDomainGetName(domain))) { + efree(ids); + RETURN_FALSE; + } + + VIRT_ADD_NEXT_INDEX_STRING(return_value, name); + + if (virDomainFree(domain)) + resource_change_counter(INT_RESOURCE_DOMAIN, conn->conn, domain, 0 TSRMLS_CC); + } + } + efree(ids); +} + +/* + * Function name: libvirt_list_inactive_domains + * Since version: 0.4.1(-1) + * Description: Function is used to list inactive domain names on the connection + * Arguments: @res [resource]: libvirt connection resource + * Returns: libvirt inactive domain names array for the connection + */ +PHP_FUNCTION(libvirt_list_inactive_domains) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + int count = -1; + int expectedcount = -1; + char **names; + int i; + + GET_CONNECTION_FROM_ARGS("r", &zconn); + + if ((expectedcount = virConnectNumOfDefinedDomains(conn->conn)) < 0) + RETURN_FALSE; + + names = (char **)emalloc(expectedcount*sizeof(char *)); + count = virConnectListDefinedDomains(conn->conn, names, expectedcount); + if ((count != expectedcount) || (count < 0)) { + efree(names); + RETURN_FALSE; + } + + array_init(return_value); + for (i = 0; i < count; i++) { + VIRT_ADD_NEXT_INDEX_STRING(return_value, names[i]); + free(names[i]); + } + efree(names); +} + diff --git a/src/libvirt-domain.h b/src/libvirt-domain.h new file mode 100644 index 0000000..dc0ab46 --- /dev/null +++ b/src/libvirt-domain.h @@ -0,0 +1,208 @@ +/* + * libvirt-domain.h: The PHP bindings to libvirt domain API + * + * See COPYING for the license of this software + */ + +#ifndef __LIBVIRT_DOMAIN_H__ +# define __LIBVIRT_DOMAIN_H__ + +# include "libvirt-connection.h" + +# define PHP_LIBVIRT_DOMAIN_RES_NAME "Libvirt domain" +# define INT_RESOURCE_DOMAIN 0x02 + +# define DOMAIN_DISK_FILE 0x01 +# define DOMAIN_DISK_BLOCK 0x02 +# define DOMAIN_DISK_ACCESS_ALL 0x04 + +# define DOMAIN_FLAG_FEATURE_ACPI 0x01 +# define DOMAIN_FLAG_FEATURE_APIC 0x02 +# define DOMAIN_FLAG_FEATURE_PAE 0x04 +# define DOMAIN_FLAG_CLOCK_LOCALTIME 0x08 +# define DOMAIN_FLAG_TEST_LOCAL_VNC 0x10 +# define DOMAIN_FLAG_SOUND_AC97 0x20 + +# define GET_DOMAIN_FROM_ARGS(args, ...) \ + do { \ + reset_error(TSRMLS_C); \ + if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, \ + args, \ + __VA_ARGS__) == FAILURE) { \ + set_error("Invalid arguments" TSRMLS_CC); \ + RETURN_FALSE; \ + } \ + \ + VIRT_FETCH_RESOURCE(domain, php_libvirt_domain*, &zdomain, \ + PHP_LIBVIRT_DOMAIN_RES_NAME, le_libvirt_domain); \ + if (domain == NULL || domain->domain == NULL) \ + RETURN_FALSE; \ + } while (0) \ + +# define PHP_FE_LIBVIRT_DOMAIN \ + PHP_FE(libvirt_domain_new, arginfo_libvirt_domain_new) \ + PHP_FE(libvirt_domain_new_get_vnc, arginfo_libvirt_void) \ + PHP_FE(libvirt_domain_get_counts, arginfo_libvirt_conn) \ + PHP_FE(libvirt_domain_is_persistent, arginfo_libvirt_conn) \ + PHP_FE(libvirt_domain_lookup_by_name, arginfo_libvirt_conn_name) \ + PHP_FE(libvirt_domain_get_xml_desc, arginfo_libvirt_conn_xpath) \ + PHP_FE(libvirt_domain_get_disk_devices, arginfo_libvirt_conn) \ + PHP_FE(libvirt_domain_get_interface_devices, arginfo_libvirt_conn) \ + PHP_FE(libvirt_domain_change_vcpus, arginfo_libvirt_domain_change_vcpus) \ + PHP_FE(libvirt_domain_change_memory, arginfo_libvirt_domain_change_memory) \ + PHP_FE(libvirt_domain_change_boot_devices, arginfo_libvirt_domain_change_boot_devices) \ + PHP_FE(libvirt_domain_disk_add, arginfo_libvirt_domain_disk_add) \ + PHP_FE(libvirt_domain_disk_remove, arginfo_libvirt_domain_disk_remove) \ + PHP_FE(libvirt_domain_nic_add, arginfo_libvirt_domain_nic_add) \ + PHP_FE(libvirt_domain_nic_remove, arginfo_libvirt_domain_nic_remove) \ + PHP_FE(libvirt_domain_attach_device, arginfo_libvirt_domain_attach_device) \ + PHP_FE(libvirt_domain_detach_device, arginfo_libvirt_domain_detach_device) \ + PHP_FE(libvirt_domain_get_info, arginfo_libvirt_conn) \ + PHP_FE(libvirt_domain_get_name, arginfo_libvirt_conn) \ + PHP_FE(libvirt_domain_get_uuid, arginfo_libvirt_conn) \ + PHP_FE(libvirt_domain_get_uuid_string, arginfo_libvirt_conn) \ + PHP_FE(libvirt_domain_get_id, arginfo_libvirt_conn) \ + PHP_FE(libvirt_domain_lookup_by_uuid, arginfo_libvirt_conn_uuid) \ + PHP_FE(libvirt_domain_lookup_by_uuid_string, arginfo_libvirt_conn_uuid) \ + PHP_FE(libvirt_domain_lookup_by_id, arginfo_libvirt_domain_lookup_by_id) \ + PHP_FE(libvirt_domain_create, arginfo_libvirt_conn) \ + PHP_FE(libvirt_domain_destroy, arginfo_libvirt_conn) \ + PHP_FE(libvirt_domain_resume, arginfo_libvirt_conn) \ + PHP_FE(libvirt_domain_core_dump, arginfo_libvirt_domain_core_dump) \ + PHP_FE(libvirt_domain_shutdown, arginfo_libvirt_conn) \ + PHP_FE(libvirt_domain_suspend, arginfo_libvirt_conn) \ + PHP_FE(libvirt_domain_managedsave, arginfo_libvirt_conn) \ + PHP_FE(libvirt_domain_undefine, arginfo_libvirt_conn) \ + PHP_FE(libvirt_domain_reboot, arginfo_libvirt_conn_flags) \ + PHP_FE(libvirt_domain_define_xml, arginfo_libvirt_conn_xml) \ + PHP_FE(libvirt_domain_create_xml, arginfo_libvirt_conn_xml) \ + PHP_FE(libvirt_domain_xml_from_native, arginfo_libvirt_domain_xml_from_native) \ + PHP_FE(libvirt_domain_xml_to_native, arginfo_libvirt_domain_xml_to_native) \ + PHP_FE(libvirt_domain_memory_peek, arginfo_libvirt_domain_memory_peek) \ + PHP_FE(libvirt_domain_memory_stats, arginfo_libvirt_conn_flags) \ + PHP_FE(libvirt_domain_set_memory, arginfo_libvirt_domain_set_memory) \ + PHP_FE(libvirt_domain_set_max_memory, arginfo_libvirt_domain_set_memory) \ + PHP_FE(libvirt_domain_set_memory_flags, arginfo_libvirt_domain_set_memory_flags) \ + PHP_FE(libvirt_domain_block_commit, arginfo_libvirt_domain_block_commit) \ + PHP_FE(libvirt_domain_block_stats, arginfo_libvirt_conn_path) \ + PHP_FE(libvirt_domain_block_resize, arginfo_libvirt_domain_block_resize) \ + PHP_FE(libvirt_domain_block_job_info, arginfo_libvirt_domain_block_job_info) \ + PHP_FE(libvirt_domain_block_job_abort, arginfo_libvirt_domain_block_job_abort) \ + PHP_FE(libvirt_domain_block_job_set_speed, arginfo_libvirt_domain_block_job_set_speed) \ + PHP_FE(libvirt_domain_interface_stats, arginfo_libvirt_conn_path) \ + PHP_FE(libvirt_domain_get_connect, arginfo_libvirt_conn) \ + PHP_FE(libvirt_domain_migrate, arginfo_libvirt_domain_migrate) \ + PHP_FE(libvirt_domain_migrate_to_uri, arginfo_libvirt_domain_migrate_to_uri) \ + PHP_FE(libvirt_domain_migrate_to_uri2, arginfo_libvirt_domain_migrate_to_uri2) \ + PHP_FE(libvirt_domain_get_job_info, arginfo_libvirt_conn) \ + PHP_FE(libvirt_domain_xml_xpath, arginfo_libvirt_domain_xml_xpath) \ + PHP_FE(libvirt_domain_get_block_info, arginfo_libvirt_domain_get_block_info) \ + PHP_FE(libvirt_domain_get_network_info, arginfo_libvirt_domain_get_network_info) \ + PHP_FE(libvirt_domain_get_autostart, arginfo_libvirt_conn) \ + PHP_FE(libvirt_domain_set_autostart, arginfo_libvirt_conn_flags) \ + PHP_FE(libvirt_domain_get_metadata, arginfo_libvirt_domain_get_metadata) \ + PHP_FE(libvirt_domain_set_metadata, arginfo_libvirt_domain_set_metadata) \ + PHP_FE(libvirt_domain_is_active, arginfo_libvirt_conn) \ + PHP_FE(libvirt_domain_get_next_dev_ids, arginfo_libvirt_conn) \ + PHP_FE(libvirt_domain_get_screenshot, arginfo_libvirt_domain_get_screenshot) \ + PHP_FE(libvirt_domain_get_screenshot_api, arginfo_libvirt_domain_get_screenshot_api) \ + PHP_FE(libvirt_domain_get_screen_dimensions, arginfo_libvirt_domain_get_screen_dimensions) \ + PHP_FE(libvirt_domain_send_keys, arginfo_libvirt_domain_send_keys) \ + PHP_FE(libvirt_domain_send_key_api, arginfo_libvirt_domain_send_key_api) \ + PHP_FE(libvirt_domain_send_pointer_event, arginfo_libvirt_domain_send_pointer_event) \ + PHP_FE(libvirt_domain_update_device, arginfo_libvirt_domain_update_device) \ + PHP_FE(libvirt_domain_qemu_agent_command, arginfo_libvirt_domain_qemu_agent_command) \ + PHP_FE(libvirt_list_domains, arginfo_libvirt_conn) \ + PHP_FE(libvirt_list_domain_resources, arginfo_libvirt_conn) \ + PHP_FE(libvirt_list_active_domain_ids, arginfo_libvirt_conn) \ + PHP_FE(libvirt_list_active_domains, arginfo_libvirt_conn) \ + PHP_FE(libvirt_list_inactive_domains, arginfo_libvirt_conn) + +int le_libvirt_domain; + +typedef struct _php_libvirt_domain { + virDomainPtr domain; + php_libvirt_connection* conn; +} php_libvirt_domain; + +void php_libvirt_domain_dtor(virt_resource *rsrc TSRMLS_DC); + +PHP_FUNCTION(libvirt_domain_new); +PHP_FUNCTION(libvirt_domain_new_get_vnc); +PHP_FUNCTION(libvirt_domain_get_counts); +PHP_FUNCTION(libvirt_domain_is_persistent); +PHP_FUNCTION(libvirt_domain_lookup_by_name); +PHP_FUNCTION(libvirt_domain_get_xml_desc); +PHP_FUNCTION(libvirt_domain_get_disk_devices); +PHP_FUNCTION(libvirt_domain_get_interface_devices); +PHP_FUNCTION(libvirt_domain_get_screenshot); +PHP_FUNCTION(libvirt_domain_get_screenshot_api); +PHP_FUNCTION(libvirt_domain_get_screen_dimensions); +PHP_FUNCTION(libvirt_domain_change_vcpus); +PHP_FUNCTION(libvirt_domain_change_memory); +PHP_FUNCTION(libvirt_domain_change_boot_devices); +PHP_FUNCTION(libvirt_domain_disk_add); +PHP_FUNCTION(libvirt_domain_disk_remove); +PHP_FUNCTION(libvirt_domain_nic_add); +PHP_FUNCTION(libvirt_domain_nic_remove); +PHP_FUNCTION(libvirt_domain_attach_device); +PHP_FUNCTION(libvirt_domain_detach_device); +PHP_FUNCTION(libvirt_domain_get_info); +PHP_FUNCTION(libvirt_domain_get_uuid); +PHP_FUNCTION(libvirt_domain_get_uuid_string); +PHP_FUNCTION(libvirt_domain_get_name); +PHP_FUNCTION(libvirt_domain_get_id); +PHP_FUNCTION(libvirt_domain_lookup_by_uuid); +PHP_FUNCTION(libvirt_domain_lookup_by_uuid_string); +PHP_FUNCTION(libvirt_domain_lookup_by_id); +PHP_FUNCTION(libvirt_domain_create); +PHP_FUNCTION(libvirt_domain_destroy); +PHP_FUNCTION(libvirt_domain_resume); +PHP_FUNCTION(libvirt_domain_core_dump); +PHP_FUNCTION(libvirt_domain_shutdown); +PHP_FUNCTION(libvirt_domain_suspend); +PHP_FUNCTION(libvirt_domain_managedsave); +PHP_FUNCTION(libvirt_domain_undefine); +PHP_FUNCTION(libvirt_domain_reboot); +PHP_FUNCTION(libvirt_domain_define_xml); +PHP_FUNCTION(libvirt_domain_create_xml); +PHP_FUNCTION(libvirt_domain_xml_from_native); +PHP_FUNCTION(libvirt_domain_xml_to_native); +PHP_FUNCTION(libvirt_domain_set_max_memory); +PHP_FUNCTION(libvirt_domain_set_memory); +PHP_FUNCTION(libvirt_domain_set_memory_flags); +PHP_FUNCTION(libvirt_domain_memory_peek); +PHP_FUNCTION(libvirt_domain_memory_stats); +PHP_FUNCTION(libvirt_domain_block_commit); +PHP_FUNCTION(libvirt_domain_block_stats); +PHP_FUNCTION(libvirt_domain_block_resize); +PHP_FUNCTION(libvirt_domain_block_job_info); +PHP_FUNCTION(libvirt_domain_block_job_abort); +PHP_FUNCTION(libvirt_domain_block_job_set_speed); +PHP_FUNCTION(libvirt_domain_interface_stats); +PHP_FUNCTION(libvirt_domain_get_connect); +PHP_FUNCTION(libvirt_domain_migrate); +PHP_FUNCTION(libvirt_domain_migrate_to_uri); +PHP_FUNCTION(libvirt_domain_migrate_to_uri2); +PHP_FUNCTION(libvirt_domain_get_job_info); +PHP_FUNCTION(libvirt_domain_xml_xpath); +PHP_FUNCTION(libvirt_domain_get_block_info); +PHP_FUNCTION(libvirt_domain_get_network_info); +PHP_FUNCTION(libvirt_domain_get_autostart); +PHP_FUNCTION(libvirt_domain_set_autostart); +PHP_FUNCTION(libvirt_domain_get_metadata); +PHP_FUNCTION(libvirt_domain_set_metadata); +PHP_FUNCTION(libvirt_domain_is_active); +PHP_FUNCTION(libvirt_domain_get_next_dev_ids); +PHP_FUNCTION(libvirt_domain_send_keys); +PHP_FUNCTION(libvirt_domain_send_key_api); +PHP_FUNCTION(libvirt_domain_send_pointer_event); +PHP_FUNCTION(libvirt_domain_update_device); +PHP_FUNCTION(libvirt_domain_qemu_agent_command); +PHP_FUNCTION(libvirt_list_domains); +PHP_FUNCTION(libvirt_list_domain_resources); +PHP_FUNCTION(libvirt_list_active_domain_ids); +PHP_FUNCTION(libvirt_list_active_domains); +PHP_FUNCTION(libvirt_list_inactive_domains); + +#endif diff --git a/src/libvirt-php.c b/src/libvirt-php.c index c84aaef..6faf915 100644 --- a/src/libvirt-php.c +++ b/src/libvirt-php.c @@ -22,6 +22,7 @@ #include "libvirt-connection.h" #include "libvirt-node.h" #include "libvirt-stream.h" +#include "libvirt-domain.h" DEBUG_INIT("core"); @@ -35,7 +36,6 @@ const char *features_binaries[] = { NULL }; #endif /* ZEND thread safe per request globals definition */ -int le_libvirt_domain; int le_libvirt_storagepool; int le_libvirt_volume; int le_libvirt_network; @@ -476,78 +476,7 @@ static zend_function_entry libvirt_functions[] = { PHP_FE(libvirt_get_last_error, arginfo_libvirt_void) PHP_FE_LIBVIRT_CONNECTION PHP_FE_LIBVIRT_STREAM - /* Domain functions */ - PHP_FE(libvirt_domain_new, arginfo_libvirt_domain_new) - PHP_FE(libvirt_domain_new_get_vnc, arginfo_libvirt_void) - PHP_FE(libvirt_domain_get_counts, arginfo_libvirt_conn) - PHP_FE(libvirt_domain_is_persistent, arginfo_libvirt_conn) - PHP_FE(libvirt_domain_lookup_by_name, arginfo_libvirt_conn_name) - PHP_FE(libvirt_domain_get_xml_desc, arginfo_libvirt_conn_xpath) - PHP_FE(libvirt_domain_get_disk_devices, arginfo_libvirt_conn) - PHP_FE(libvirt_domain_get_interface_devices, arginfo_libvirt_conn) - PHP_FE(libvirt_domain_change_vcpus, arginfo_libvirt_domain_change_vcpus) - PHP_FE(libvirt_domain_change_memory, arginfo_libvirt_domain_change_memory) - PHP_FE(libvirt_domain_change_boot_devices, arginfo_libvirt_domain_change_boot_devices) - PHP_FE(libvirt_domain_disk_add, arginfo_libvirt_domain_disk_add) - PHP_FE(libvirt_domain_disk_remove, arginfo_libvirt_domain_disk_remove) - PHP_FE(libvirt_domain_nic_add, arginfo_libvirt_domain_nic_add) - PHP_FE(libvirt_domain_nic_remove, arginfo_libvirt_domain_nic_remove) - PHP_FE(libvirt_domain_attach_device, arginfo_libvirt_domain_attach_device) - PHP_FE(libvirt_domain_detach_device, arginfo_libvirt_domain_detach_device) - PHP_FE(libvirt_domain_get_info, arginfo_libvirt_conn) - PHP_FE(libvirt_domain_get_name, arginfo_libvirt_conn) - PHP_FE(libvirt_domain_get_uuid, arginfo_libvirt_conn) - PHP_FE(libvirt_domain_get_uuid_string, arginfo_libvirt_conn) - PHP_FE(libvirt_domain_get_id, arginfo_libvirt_conn) - PHP_FE(libvirt_domain_lookup_by_id, arginfo_libvirt_domain_lookup_by_id) - PHP_FE(libvirt_domain_lookup_by_uuid, arginfo_libvirt_conn_uuid) - PHP_FE(libvirt_domain_lookup_by_uuid_string, arginfo_libvirt_conn_uuid) - PHP_FE(libvirt_domain_destroy, arginfo_libvirt_conn) - PHP_FE(libvirt_domain_create, arginfo_libvirt_conn) - PHP_FE(libvirt_domain_resume, arginfo_libvirt_conn) - PHP_FE(libvirt_domain_core_dump, arginfo_libvirt_domain_core_dump) - PHP_FE(libvirt_domain_shutdown, arginfo_libvirt_conn) - PHP_FE(libvirt_domain_suspend, arginfo_libvirt_conn) - PHP_FE(libvirt_domain_managedsave, arginfo_libvirt_conn) - PHP_FE(libvirt_domain_undefine, arginfo_libvirt_conn) - PHP_FE(libvirt_domain_reboot, arginfo_libvirt_conn_flags) - PHP_FE(libvirt_domain_define_xml, arginfo_libvirt_conn_xml) - PHP_FE(libvirt_domain_create_xml, arginfo_libvirt_conn_xml) - PHP_FE(libvirt_domain_xml_from_native, arginfo_libvirt_domain_xml_from_native) - PHP_FE(libvirt_domain_xml_to_native, arginfo_libvirt_domain_xml_to_native) - PHP_FE(libvirt_domain_memory_peek, arginfo_libvirt_domain_memory_peek) - PHP_FE(libvirt_domain_memory_stats, arginfo_libvirt_conn_flags) - PHP_FE(libvirt_domain_set_memory, arginfo_libvirt_domain_set_memory) - PHP_FE(libvirt_domain_set_max_memory, arginfo_libvirt_domain_set_memory) - PHP_FE(libvirt_domain_set_memory_flags, arginfo_libvirt_domain_set_memory_flags) - PHP_FE(libvirt_domain_block_commit, arginfo_libvirt_domain_block_commit) - PHP_FE(libvirt_domain_block_stats, arginfo_libvirt_conn_path) - PHP_FE(libvirt_domain_block_resize, arginfo_libvirt_domain_block_resize) - PHP_FE(libvirt_domain_block_job_abort, arginfo_libvirt_domain_block_job_abort) - PHP_FE(libvirt_domain_block_job_set_speed, arginfo_libvirt_domain_block_job_set_speed) - PHP_FE(libvirt_domain_block_job_info, arginfo_libvirt_domain_block_job_info) - PHP_FE(libvirt_domain_interface_stats, arginfo_libvirt_conn_path) - PHP_FE(libvirt_domain_get_connect, arginfo_libvirt_conn) - PHP_FE(libvirt_domain_migrate, arginfo_libvirt_domain_migrate) - PHP_FE(libvirt_domain_migrate_to_uri, arginfo_libvirt_domain_migrate_to_uri) - PHP_FE(libvirt_domain_migrate_to_uri2, arginfo_libvirt_domain_migrate_to_uri2) - PHP_FE(libvirt_domain_get_job_info, arginfo_libvirt_conn) - PHP_FE(libvirt_domain_xml_xpath, arginfo_libvirt_domain_xml_xpath) - PHP_FE(libvirt_domain_get_block_info, arginfo_libvirt_domain_get_block_info) - PHP_FE(libvirt_domain_get_network_info, arginfo_libvirt_domain_get_network_info) - PHP_FE(libvirt_domain_get_autostart, arginfo_libvirt_conn) - PHP_FE(libvirt_domain_set_autostart, arginfo_libvirt_conn_flags) - PHP_FE(libvirt_domain_get_metadata, arginfo_libvirt_domain_get_metadata) - PHP_FE(libvirt_domain_set_metadata, arginfo_libvirt_domain_set_metadata) - PHP_FE(libvirt_domain_is_active, arginfo_libvirt_conn) - PHP_FE(libvirt_domain_get_next_dev_ids, arginfo_libvirt_conn) - PHP_FE(libvirt_domain_get_screenshot, arginfo_libvirt_domain_get_screenshot) - PHP_FE(libvirt_domain_get_screenshot_api, arginfo_libvirt_domain_get_screenshot_api) - PHP_FE(libvirt_domain_get_screen_dimensions, arginfo_libvirt_domain_get_screen_dimensions) - PHP_FE(libvirt_domain_send_keys, arginfo_libvirt_domain_send_keys) - PHP_FE(libvirt_domain_send_key_api, arginfo_libvirt_domain_send_key_api) - PHP_FE(libvirt_domain_send_pointer_event, arginfo_libvirt_domain_send_pointer_event) - PHP_FE(libvirt_domain_update_device, arginfo_libvirt_domain_update_device) + PHP_FE_LIBVIRT_DOMAIN /* Domain snapshot functions */ PHP_FE(libvirt_domain_has_current_snapshot, arginfo_libvirt_conn_optflags) PHP_FE(libvirt_domain_snapshot_create, arginfo_libvirt_conn_optflags) @@ -618,9 +547,7 @@ static zend_function_entry libvirt_functions[] = { PHP_FE(libvirt_nwfilter_lookup_by_uuid_string, arginfo_libvirt_conn_uuid) PHP_FE(libvirt_nwfilter_lookup_by_uuid, arginfo_libvirt_conn_uuid) /* List functions */ - PHP_FE(libvirt_list_domains, arginfo_libvirt_conn) PHP_FE(libvirt_list_domain_snapshots, arginfo_libvirt_conn_optflags) - PHP_FE(libvirt_list_domain_resources, arginfo_libvirt_conn) PHP_FE(libvirt_list_nodedevs, arginfo_libvirt_conn_optcap) PHP_FE(libvirt_list_all_networks, arginfo_libvirt_conn_optflags) PHP_FE(libvirt_list_networks, arginfo_libvirt_conn_optflags) @@ -628,9 +555,6 @@ static zend_function_entry libvirt_functions[] = { PHP_FE(libvirt_list_active_storagepools, arginfo_libvirt_conn) PHP_FE(libvirt_list_inactive_storagepools, arginfo_libvirt_conn) PHP_FE(libvirt_storagepool_list_volumes, arginfo_libvirt_conn) - PHP_FE(libvirt_list_active_domains, arginfo_libvirt_conn) - PHP_FE(libvirt_list_active_domain_ids, arginfo_libvirt_conn) - PHP_FE(libvirt_list_inactive_domains, arginfo_libvirt_conn) PHP_FE(libvirt_list_all_nwfilters, arginfo_libvirt_conn) PHP_FE(libvirt_list_nwfilters, arginfo_libvirt_conn) /* Version information and common function */ @@ -643,13 +567,7 @@ static zend_function_entry libvirt_functions[] = { /* Debugging functions */ PHP_FE(libvirt_logfile_set, arginfo_libvirt_logfile_set) PHP_FE(libvirt_print_binding_resources, arginfo_libvirt_void) - /* Agent functions */ - PHP_FE(libvirt_domain_qemu_agent_command, arginfo_libvirt_domain_qemu_agent_command) -#ifdef PHP_FE_END PHP_FE_END -#else - {NULL, NULL, NULL} -#endif }; @@ -1320,34 +1238,6 @@ int is_local_connection(virConnectPtr conn) #endif } -/* Destructor for domain resource */ -static void php_libvirt_domain_dtor(virt_resource *rsrc TSRMLS_DC) -{ - php_libvirt_domain *domain = (php_libvirt_domain *)rsrc->ptr; - int rv = 0; - - if (domain != NULL) { - if (domain->domain != NULL) { - if (!check_resource_allocation(domain->conn->conn, INT_RESOURCE_DOMAIN, domain->domain TSRMLS_CC)) { - domain->domain = NULL; - efree(domain); - return; - } - - rv = virDomainFree(domain->domain); - if (rv != 0) { - DPRINTF("%s: virDomainFree(%p) returned %d (%s)\n", __FUNCTION__, domain->domain, rv, LIBVIRT_G(last_error)); - php_error_docref(NULL TSRMLS_CC, E_WARNING, "virDomainFree failed with %i on destructor: %s", rv, LIBVIRT_G(last_error)); - } else { - DPRINTF("%s: virDomainFree(%p) completed successfully\n", __FUNCTION__, domain->domain); - resource_change_counter(INT_RESOURCE_DOMAIN, domain->conn->conn, domain->domain, 0 TSRMLS_CC); - } - domain->domain = NULL; - } - efree(domain); - } -} - /* Destructor for storagepool resource */ static void php_libvirt_storagepool_dtor(virt_resource *rsrc TSRMLS_DC) { @@ -1836,19 +1726,6 @@ PHP_MSHUTDOWN_FUNCTION(libvirt) } /* Macros for obtaining resources from arguments */ -#define GET_DOMAIN_FROM_ARGS(args, ...) \ - do { \ - reset_error(TSRMLS_C); \ - if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, args, __VA_ARGS__) == FAILURE) { \ - set_error("Invalid arguments" TSRMLS_CC); \ - RETURN_FALSE; \ - } \ - \ - VIRT_FETCH_RESOURCE(domain, php_libvirt_domain*, &zdomain, PHP_LIBVIRT_DOMAIN_RES_NAME, le_libvirt_domain);\ - if ((domain == NULL) || (domain->domain == NULL)) \ - RETURN_FALSE; \ - } while (0) \ - #define GET_NETWORK_FROM_ARGS(args, ...) \ do { \ reset_error(TSRMLS_C); \ @@ -2830,3311 +2707,270 @@ char *installation_get_xml(int step, virConnectPtr conn, char *name, int memMB, return (strlen(xml) > 0) ? strdup(xml) : NULL; } -/* Domain functions */ - /* - * Function name: libvirt_domain_get_counts - * Since version: 0.4.1(-1) - * Description: Function is getting domain counts for all, active and inactive domains - * Arguments: @conn [resource]: libvirt connection resource from libvirt_connect() - * Returns: array of total, active and inactive (but defined) domain counts + * Private function name: streamSink + * Since version: 0.4.5 + * Description: Function to write stream to file, borrowed from libvirt + * Arguments: @st [virStreamPtr]: stream pointer + * @bytes [void *]: buffer array + * @nbytes [int]: size of buffer + * @opaque [void *]: used for file descriptor + * Returns: write() error code as it's calling write */ -PHP_FUNCTION(libvirt_domain_get_counts) +int streamSink(virStreamPtr st ATTRIBUTE_UNUSED, + const char *bytes, size_t nbytes, void *opaque) { - php_libvirt_connection *conn = NULL; - zval *zconn; - int count_defined; - int count_active; - - GET_CONNECTION_FROM_ARGS("r", &zconn); - - count_defined = virConnectNumOfDefinedDomains(conn->conn); - count_active = virConnectNumOfDomains(conn->conn); + int *fd = (int *)opaque; - array_init(return_value); - add_assoc_long(return_value, "total", (long)(count_defined + count_active)); - add_assoc_long(return_value, "active", (long)count_active); - add_assoc_long(return_value, "inactive", (long)count_defined); + return write(*fd, bytes, nbytes); } -/* - * Function name: libvirt_domain_is_persistent - * Since version: 0.4.9 - * Description: Function to get information whether domain is persistent or not - * Arguments: @res [resource]: libvirt domain resource - * Returns: TRUE for persistent, FALSE for not persistent, -1 on error - */ -PHP_FUNCTION(libvirt_domain_is_persistent) +void parse_array(zval *arr, tVMDisk *disk, tVMNetwork *network) { - php_libvirt_domain *domain = NULL; - zval *zdomain; - int p; - - GET_DOMAIN_FROM_ARGS("r", &zdomain); + HashTable *arr_hash; + // int array_count; + zval *data; + php_libvirt_hash_key_info key; + HashPosition pointer; + unsigned long index; - if ((p = virDomainIsPersistent(domain->domain)) < 0) - RETURN_LONG(-1); + arr_hash = Z_ARRVAL_P(arr); + //array_count = zend_hash_num_elements(arr_hash); - if (p == 1) - RETURN_TRUE; + if (disk != NULL) + memset(disk, 0, sizeof(tVMDisk)); + if (network != NULL) + memset(network, 0, sizeof(tVMNetwork)); - RETURN_FALSE; + VIRT_FOREACH(arr_hash, pointer, data) { + if ((Z_TYPE_P(data) == IS_STRING) || (Z_TYPE_P(data) == IS_LONG)) { + VIRT_HASH_CURRENT_KEY_INFO(arr_hash, pointer, index, key); + if (key.type == HASH_KEY_IS_STRING) { + if (disk != NULL) { + if ((Z_TYPE_P(data) == IS_STRING) && strcmp(key.name, "path") == 0) + disk->path = strdup(Z_STRVAL_P(data)); + else if ((Z_TYPE_P(data) == IS_STRING) && strcmp(key.name, "driver") == 0) + disk->driver = strdup(Z_STRVAL_P(data)); + else if ((Z_TYPE_P(data) == IS_STRING) && strcmp(key.name, "bus") == 0) + disk->bus = strdup(Z_STRVAL_P(data)); + else if ((Z_TYPE_P(data) == IS_STRING) && strcmp(key.name, "dev") == 0) + disk->dev = strdup(Z_STRVAL_P(data)); + else if (strcmp(key.name, "size") == 0) { + if (Z_TYPE_P(data) == IS_LONG) { + disk->size = Z_LVAL_P(data); + } else { + disk->size = size_def_to_mbytes(Z_STRVAL_P(data)); + } + } else if ((Z_TYPE_P(data) == IS_LONG) && strcmp(key.name, "flags") == 0) + disk->flags = Z_LVAL_P(data); + } else { + if (network != NULL) { + if ((Z_TYPE_P(data) == IS_STRING) && strcmp(key.name, "mac") == 0) + network->mac = strdup(Z_STRVAL_P(data)); + else if ((Z_TYPE_P(data) == IS_STRING) && strcmp(key.name, "network") == 0) + network->network = strdup(Z_STRVAL_P(data)); + else if ((Z_TYPE_P(data) == IS_STRING) && strcmp(key.name, "model") == 0) + network->model = strdup(Z_STRVAL_P(data)); + } + } + } + } + } VIRT_FOREACH_END(); } /* - * Function name: libvirt_domain_set_max_memory - * Since version: 0.5.1 - * Description: Function to set max memory for domain + * Function name: libvirt_domain_has_current_snapshot + * Since version: 0.4.1(-2) + * Description: Function is used to get the information whether domain has the current snapshot * Arguments: @res [resource]: libvirt domain resource - * @memory [int]: memory size in 1024 bytes (Kb) - * Returns: TRUE for success, FALSE for failure + * @flags [int]: libvirt snapshot flags + * Returns: TRUE is domain has the current snapshot, otherwise FALSE (you may need to check for error using libvirt_get_last_error()) */ -PHP_FUNCTION(libvirt_domain_set_max_memory) +PHP_FUNCTION(libvirt_domain_has_current_snapshot) { php_libvirt_domain *domain = NULL; zval *zdomain; - zend_long memory = 0; + int retval; + zend_long flags = 0; - GET_DOMAIN_FROM_ARGS("rl", &zdomain, &memory); + GET_DOMAIN_FROM_ARGS("r|l", &zdomain, &flags); - if (virDomainSetMaxMemory(domain->domain, memory) != 0) + retval = virDomainHasCurrentSnapshot(domain->domain, flags); + if (retval <= 0) RETURN_FALSE; - RETURN_TRUE; } /* - * Function name: libvirt_domain_set_memory - * Since version: 0.5.1 - * Description: Function to set memory for domain + * Function name: libvirt_domain_snapshot_lookup_by_name + * Since version: 0.4.1(-2) + * Description: This functions is used to lookup for the snapshot by it's name * Arguments: @res [resource]: libvirt domain resource - * @memory [int]: memory size in 1024 bytes (Kb) - * Returns: TRUE for success, FALSE for failure + * @name [string]: name of the snapshot to get the resource + * @flags [int]: libvirt snapshot flags + * Returns: domain snapshot resource */ -PHP_FUNCTION(libvirt_domain_set_memory) +PHP_FUNCTION(libvirt_domain_snapshot_lookup_by_name) { php_libvirt_domain *domain = NULL; zval *zdomain; - zend_long memory = 0; + strsize_t name_len; + char *name = NULL; + zend_long flags = 0; + php_libvirt_snapshot *res_snapshot; + virDomainSnapshotPtr snapshot = NULL; - GET_DOMAIN_FROM_ARGS("rl", &zdomain, &memory); + GET_DOMAIN_FROM_ARGS("rs|l", &zdomain, &name, &name_len, &flags); - if (virDomainSetMemory(domain->domain, memory) != 0) + if ((name == NULL) || (name_len < 1)) + RETURN_FALSE; + snapshot=virDomainSnapshotLookupByName(domain->domain, name, flags); + if (snapshot == NULL) RETURN_FALSE; - RETURN_TRUE; + res_snapshot = (php_libvirt_snapshot *)emalloc(sizeof(php_libvirt_snapshot)); + res_snapshot->domain = domain; + res_snapshot->snapshot = snapshot; + + DPRINTF("%s: returning %p\n", PHPFUNC, res_snapshot->snapshot); + resource_change_counter(INT_RESOURCE_SNAPSHOT, domain->conn->conn, res_snapshot->snapshot, 1 TSRMLS_CC); + + VIRT_REGISTER_RESOURCE(res_snapshot, le_libvirt_snapshot); } /* - * Function name: libvirt_domain_set_memory_flags - * Since version: 0.5.1 - * Description: Function to set max memory for domain + * Function name: libvirt_domain_snapshot_create + * Since version: 0.4.1(-2) + * Description: This function creates the domain snapshot for the domain identified by it's resource * Arguments: @res [resource]: libvirt domain resource - * @memory [int]: memory size in 1024 bytes (Kb) - * @flags [int]: bitwise-OR VIR_DOMAIN_MEM_* flags - * Returns: TRUE for success, FALSE for failure + * @flags [int]: libvirt snapshot flags + * Returns: domain snapshot resource */ -PHP_FUNCTION(libvirt_domain_set_memory_flags) +PHP_FUNCTION(libvirt_domain_snapshot_create) { php_libvirt_domain *domain = NULL; + php_libvirt_snapshot *res_snapshot; zval *zdomain; - zend_long memory = 0; + virDomainSnapshotPtr snapshot = NULL; zend_long flags = 0; - GET_DOMAIN_FROM_ARGS("rl|l", &zdomain, &memory, &flags); + GET_DOMAIN_FROM_ARGS("r|l", &zdomain, &flags); - if (virDomainSetMemoryFlags(domain->domain, memory, flags) != 0) + snapshot = virDomainSnapshotCreateXML(domain->domain, "<domainsnapshot/>", flags); + DPRINTF("%s: virDomainSnapshotCreateXML(%p, <xml>) returned %p\n", PHPFUNC, domain->domain, snapshot); + if (snapshot == NULL) RETURN_FALSE; - RETURN_TRUE; + res_snapshot = (php_libvirt_snapshot *)emalloc(sizeof(php_libvirt_snapshot)); + res_snapshot->domain = domain; + res_snapshot->snapshot = snapshot; + + DPRINTF("%s: returning %p\n", PHPFUNC, res_snapshot->snapshot); + resource_change_counter(INT_RESOURCE_SNAPSHOT, domain->conn->conn, res_snapshot->snapshot, 1 TSRMLS_CC); + + VIRT_REGISTER_RESOURCE(res_snapshot, le_libvirt_snapshot); } /* - * Function name: libvirt_domain_get_autostart - * Since version: 0.4.1(-1) - * Description: Function is getting the autostart value for the domain - * Arguments: @res [resource]: libvirt domain resource - * Returns: autostart value or -1 + * Function name: libvirt_domain_snapshot_get_xml + * Since version: 0.4.1(-2) + * Description: Function is used to get the XML description of the snapshot identified by it's resource + * Arguments: @res [resource]: libvirt snapshot resource + * @flags [int]: libvirt snapshot flags + * Returns: XML description string for the snapshot */ -PHP_FUNCTION(libvirt_domain_get_autostart) +PHP_FUNCTION(libvirt_domain_snapshot_get_xml) { - php_libvirt_domain *domain = NULL; - zval *zdomain; - int flags = 0; + char *xml; + zval *zsnapshot; + php_libvirt_snapshot *snapshot; + zend_long flags = 0; - GET_DOMAIN_FROM_ARGS("r", &zdomain); + GET_SNAPSHOT_FROM_ARGS("r|l", &zsnapshot, &flags); - if (virDomainGetAutostart (domain->domain, &flags) != 0) { - RETURN_LONG(-1); - } - RETURN_LONG((long)flags); + xml = virDomainSnapshotGetXMLDesc(snapshot->snapshot, flags); + if (xml == NULL) + RETURN_FALSE; + + VIRT_RETVAL_STRING(xml); + free(xml); } /* - * Function name: libvirt_domain_set_autostart - * Since version: 0.4.1(-1) - * Description: Function is setting the autostart value for the domain - * Arguments: @res [resource]: libvirt domain resource - * @flags [int]: flag to enable/disable autostart + * Function name: libvirt_domain_snapshot_revert + * Since version: 0.4.1(-2) + * Description: Function is used to revert the domain state to the state identified by the snapshot + * Arguments: @res [resource]: libvirt snapshot resource + * @flags [int]: libvirt snapshot flags * Returns: TRUE on success, FALSE on error */ -PHP_FUNCTION(libvirt_domain_set_autostart) +PHP_FUNCTION(libvirt_domain_snapshot_revert) { - php_libvirt_domain *domain = NULL; - zval *zdomain; - zend_bool flags = 0; + zval *zsnapshot; + php_libvirt_snapshot *snapshot; + int ret; + zend_long flags = 0; - GET_DOMAIN_FROM_ARGS("rb", &zdomain, &flags); + GET_SNAPSHOT_FROM_ARGS("r|l", &zsnapshot, &flags); - if (virDomainSetAutostart (domain->domain, flags) != 0) { + ret = virDomainRevertToSnapshot(snapshot->snapshot, flags); + DPRINTF("%s: virDomainRevertToSnapshot(%p, 0) returned %d\n", PHPFUNC, snapshot->snapshot, ret); + if (ret == -1) RETURN_FALSE; - } RETURN_TRUE; } /* - * Function name: libvirt_domain_get_metadata - * Since version: 0.4.9 - * Description: Function retrieve appropriate domain element given by @type. - * Arguments: @res [resource]: libvirt domain resource - * @type [int]: virDomainMetadataType type of description - * @uri [string]: XML namespace identifier - * @flags [int]: bitwise-OR of virDomainModificationImpact - * Returns: metadata string, NULL on error or FALSE on API not supported + * Function name: libvirt_domain_snapshot_delete + * Since version: 0.4.1(-2) + * Description: Function is used to revert the domain state to the state identified by the snapshot + * Arguments: @res [resource]: libvirt snapshot resource + * @flags [int]: 0 to delete just snapshot, VIR_SNAPSHOT_DELETE_CHILDREN to delete snapshot children as well + * Returns: TRUE on success, FALSE on error */ -PHP_FUNCTION(libvirt_domain_get_metadata) +PHP_FUNCTION(libvirt_domain_snapshot_delete) { - php_libvirt_domain *domain = NULL; - zval *zdomain; - zend_long type = 0; + zval *zsnapshot; + php_libvirt_snapshot *snapshot; zend_long flags = 0; - char *uri = NULL; - strsize_t uri_len; - char *ret = NULL; - - GET_DOMAIN_FROM_ARGS("rlsl", &zdomain, &type, &uri, &uri_len, &flags); + int retval; - if ((uri != NULL) && (strlen(uri) == 0)) - uri = NULL; + GET_SNAPSHOT_FROM_ARGS("r|l", &zsnapshot, &flags); - ret = virDomainGetMetadata(domain->domain, type, uri, flags); - if (ret == NULL) { - if (strstr(LIBVIRT_G(last_error), "not supported") != NULL) - RETURN_FALSE; - RETURN_NULL(); - } else { - VIRT_RETVAL_STRING(ret); - free(ret); - } + retval = virDomainSnapshotDelete(snapshot->snapshot, flags); + DPRINTF("%s: virDomainSnapshotDelete(%p, %d) returned %d\n", PHPFUNC, snapshot->snapshot, (int) flags, retval); + if (retval == -1) + RETURN_FALSE; + RETURN_TRUE; } /* - * Function name: libvirt_domain_set_metadata - * Since version: 0.4.9 - * Description: Function sets the appropriate domain element given by @type to the value of @description. No new lines are permitted. + * Function name: libvirt_list_domain_snapshots + * Since version: 0.4.1(-2) + * Description: Function is used to list domain snapshots for the domain specified by it's resource * Arguments: @res [resource]: libvirt domain resource - * @type [int]: virDomainMetadataType type of description - * @metadata [string]: new metadata text - * @key [string]: XML namespace key or empty string (alias of NULL) - * @uri [string]: XML namespace identifier or empty string (alias of NULL) - * @flags [int]: bitwise-OR of virDomainModificationImpact - * Returns: -1 on error, 0 on success + * @flags [int]: libvirt snapshot flags + * Returns: libvirt domain snapshot names array */ -PHP_FUNCTION(libvirt_domain_set_metadata) +PHP_FUNCTION(libvirt_list_domain_snapshots) { php_libvirt_domain *domain = NULL; zval *zdomain; - strsize_t metadata_len, key_len, uri_len; - char *metadata = NULL; - char *key = NULL; - char *uri = NULL; - zend_long type = 0; + int count = -1; + int expectedcount = -1; + char **names; zend_long flags = 0; - int rc; - - GET_DOMAIN_FROM_ARGS("rlsssl", &zdomain, &type, &metadata, &metadata_len, &key, &key_len, &uri, &uri_len, &flags); - - if ((key != NULL) && (strlen(key) == 0)) - key = NULL; - if ((uri != NULL) && (strlen(uri) == 0)) - uri = NULL; + int i; - rc = virDomainSetMetadata(domain->domain, type, metadata, key, uri, flags); - RETURN_LONG(rc); -} + GET_DOMAIN_FROM_ARGS("r|l", &zdomain, &flags); -/* - * Function name: libvirt_domain_is_active - * Since version: 0.4.1(-1) - * Description: Function is getting information whether domain identified by resource is active or not - * Arguments: @res [resource]: libvirt domain resource - * Returns: virDomainIsActive() result on the domain - */ -PHP_FUNCTION(libvirt_domain_is_active) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; + expectedcount = virDomainSnapshotNum(domain->domain, flags); + DPRINTF("%s: virDomainSnapshotNum(%p, 0) returned %d\n", PHPFUNC, domain->domain, expectedcount); - GET_DOMAIN_FROM_ARGS("r", &zdomain); - - RETURN_LONG(virDomainIsActive(domain->domain)); -} - -/* - * Function name: libvirt_domain_lookup_by_name - * Since version: 0.4.1(-1) - * Description: Function is used to lookup for domain by it's name - * Arguments: @res [resource]: libvirt connection resource from libvirt_connect() - * @name [string]: domain name to look for - * Returns: libvirt domain resource - */ -PHP_FUNCTION(libvirt_domain_lookup_by_name) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - strsize_t name_len; - char *name = NULL; - virDomainPtr domain = NULL; - php_libvirt_domain *res_domain; - - GET_CONNECTION_FROM_ARGS("rs", &zconn, &name, &name_len); - if ((name == NULL) || (name_len < 1)) - RETURN_FALSE; - domain = virDomainLookupByName(conn->conn, name); - if (domain == NULL) - RETURN_FALSE; - - res_domain = (php_libvirt_domain *)emalloc(sizeof(php_libvirt_domain)); - res_domain->domain = domain; - res_domain->conn = conn; - - DPRINTF("%s: domain name = '%s', returning %p\n", PHPFUNC, name, res_domain->domain); - resource_change_counter(INT_RESOURCE_DOMAIN, conn->conn, res_domain->domain, 1 TSRMLS_CC); - - VIRT_REGISTER_RESOURCE(res_domain, le_libvirt_domain); -} - -/* - * Function name: libvirt_domain_lookup_by_uuid - * Since version: 0.4.1(-1) - * Description: Function is used to lookup for domain by it's UUID in the binary format - * Arguments: @res [resource]: libvirt connection resource from libvirt_connect() - * @uuid [string]: binary defined UUID to look for - * Returns: libvirt domain resource - */ -PHP_FUNCTION(libvirt_domain_lookup_by_uuid) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - strsize_t uuid_len; - unsigned char *uuid = NULL; - virDomainPtr domain = NULL; - php_libvirt_domain *res_domain; - - GET_CONNECTION_FROM_ARGS("rs", &zconn, &uuid, &uuid_len); - - if ((uuid == NULL) || (uuid_len < 1)) - RETURN_FALSE; - domain = virDomainLookupByUUID(conn->conn, uuid); - if (domain == NULL) - RETURN_FALSE; - - res_domain = (php_libvirt_domain *)emalloc(sizeof(php_libvirt_domain)); - res_domain->domain = domain; - res_domain->conn = conn; - - DPRINTF("%s: domain UUID = '%s', returning %p\n", PHPFUNC, uuid, res_domain->domain); - resource_change_counter(INT_RESOURCE_DOMAIN, conn->conn, res_domain->domain, 1 TSRMLS_CC); - - VIRT_REGISTER_RESOURCE(res_domain, le_libvirt_domain); -} - -/* - * Function name: libvirt_domain_qemu_agent_command - * Since version: 0.5.2(-1) - * Description: Function is used to send qemu-ga command - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * @cmd [string]: command - * @timeout [int] timeout for waiting (-2 block, -1 default, 0 no wait, >0 wait specific time - * @flags [int]: unknown - * Returns: String on success and FALSE on error - */ -PHP_FUNCTION(libvirt_domain_qemu_agent_command) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - const char *cmd; - strsize_t cmd_len; - char *ret; - zend_long timeout = -1; - zend_long flags = 0; - - GET_DOMAIN_FROM_ARGS("rs|ll", &zdomain, &cmd, &cmd_len, &timeout, &flags); - - ret = virDomainQemuAgentCommand(domain->domain, cmd, timeout, flags); - if (ret == NULL) - RETURN_FALSE; - - VIRT_RETVAL_STRING(ret); - free(ret); -} - -/* - * Function name: libvirt_domain_lookup_by_uuid_string - * Since version: 0.4.1(-1) - * Description: Function is used to get the domain by it's UUID that's accepted in string format - * Arguments: @res [resource]: libvirt connection resource from libvirt_connect() - * @uuid [string]: domain UUID [in string format] to look for - * Returns: libvirt domain resource - */ -PHP_FUNCTION(libvirt_domain_lookup_by_uuid_string) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - strsize_t uuid_len; - char *uuid = NULL; - virDomainPtr domain = NULL; - php_libvirt_domain *res_domain; - - GET_CONNECTION_FROM_ARGS("rs", &zconn, &uuid, &uuid_len); - - if ((uuid == NULL) || (uuid_len < 1)) - RETURN_FALSE; - domain = virDomainLookupByUUIDString(conn->conn, uuid); - if (domain == NULL) - RETURN_FALSE; - - res_domain = (php_libvirt_domain *)emalloc(sizeof(php_libvirt_domain)); - res_domain->domain = domain; - res_domain->conn = conn; - - DPRINTF("%s: domain UUID string = '%s', returning %p\n", PHPFUNC, uuid, res_domain->domain); - resource_change_counter(INT_RESOURCE_DOMAIN, conn->conn, res_domain->domain, 1 TSRMLS_CC); - - VIRT_REGISTER_RESOURCE(res_domain, le_libvirt_domain); -} - -/* - * Function name: libvirt_domain_lookup_by_id - * Since version: 0.4.1(-1) - * Description: Function is used to get domain by it's ID, applicable only to running guests - * Arguments: @conn [resource]: libvirt connection resource from libvirt_connect() - * @id [string]: domain id to look for - * Returns: libvirt domain resource - */ -PHP_FUNCTION(libvirt_domain_lookup_by_id) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - zend_long id; - virDomainPtr domain = NULL; - php_libvirt_domain *res_domain; - - GET_CONNECTION_FROM_ARGS("rl", &zconn, &id); - - domain = virDomainLookupByID(conn->conn, (int)id); - if (domain == NULL) - RETURN_FALSE; - - res_domain = (php_libvirt_domain *)emalloc(sizeof(php_libvirt_domain)); - res_domain->domain = domain; - res_domain->conn = conn; - - DPRINTF("%s: domain id = '%d', returning %p\n", PHPFUNC, (int)id, res_domain->domain); - resource_change_counter(INT_RESOURCE_DOMAIN, conn->conn, res_domain->domain, 1 TSRMLS_CC); - - VIRT_REGISTER_RESOURCE(res_domain, le_libvirt_domain); -} - -/* - * Function name: libvirt_domain_get_name - * Since version: 0.4.1(-1) - * Description: Function is used to get domain name from it's resource - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * Returns: domain name string - */ -PHP_FUNCTION(libvirt_domain_get_name) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - const char *name = NULL; - - GET_DOMAIN_FROM_ARGS("r", &zdomain); - - if (domain->domain == NULL) - RETURN_FALSE; - - name = virDomainGetName(domain->domain); - DPRINTF("%s: virDomainGetName(%p) returned %s\n", PHPFUNC, domain->domain, name); - if (name == NULL) - RETURN_FALSE; - - VIRT_RETURN_STRING(name); //we can use the copy mechanism as we need not to free name (we even can not!) -} - -/* - * Function name: libvirt_domain_get_uuid_string - * Since version: 0.4.1(-1) - * Description: Function is used to get the domain's UUID in string format - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * Returns: domain UUID string - */ -PHP_FUNCTION(libvirt_domain_get_uuid_string) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - char *uuid; - int retval; - - GET_DOMAIN_FROM_ARGS("r", &zdomain); - - uuid = (char *)emalloc(VIR_UUID_STRING_BUFLEN); - retval = virDomainGetUUIDString(domain->domain, uuid); - DPRINTF("%s: virDomainGetUUIDString(%p) returned %d (%s)\n", PHPFUNC, domain->domain, retval, uuid); - if (retval != 0) - RETURN_FALSE; - - VIRT_RETVAL_STRING(uuid); - efree(uuid); -} - -/* - * Private function name: streamSink - * Since version: 0.4.5 - * Description: Function to write stream to file, borrowed from libvirt - * Arguments: @st [virStreamPtr]: stream pointer - * @bytes [void *]: buffer array - * @nbytes [int]: size of buffer - * @opaque [void *]: used for file descriptor - * Returns: write() error code as it's calling write - */ -static int streamSink(virStreamPtr st ATTRIBUTE_UNUSED, - const char *bytes, size_t nbytes, void *opaque) -{ - int *fd = (int *)opaque; - - return write(*fd, bytes, nbytes); -} - -/* - * Function name: libvirt_domain_get_screenshot_api - * Since version: 0.4.5 - * Description: Function is trying to get domain screenshot using libvirt virGetDomainScreenshot() API if available. - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_get_by_*() - * @screenID [int]: monitor ID from where to take screenshot - * Returns: array of filename and mime type as type is hypervisor specific, caller is responsible for temporary file deletion - */ -PHP_FUNCTION(libvirt_domain_get_screenshot_api) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - zend_long screen = 0; - int fd = -1; - char file[] = "/tmp/libvirt-php-tmp-XXXXXX"; - virStreamPtr st = NULL; - char *mime = NULL; - const char *bin = get_feature_binary("screenshot-convert"); - -#ifdef EXTWIN - set_error_if_unset("Cannot get domain screenshot on Windows systems" TSRMLS_CC); - RETURN_FALSE; -#endif - - GET_DOMAIN_FROM_ARGS("r|l", &zdomain, &screen); - - if (!(st = virStreamNew(domain->conn->conn, 0))) { - set_error("Cannot create new stream" TSRMLS_CC); - goto error; - } - - mime = virDomainScreenshot(domain->domain, st, screen, 0); - if (!mime) { - set_error_if_unset("Cannot get domain screenshot" TSRMLS_CC); - goto error; - } - - if (!(fd = mkstemp(file))) { - virStreamAbort(st); - set_error_if_unset("Cannot get create file to save domain screenshot" TSRMLS_CC); - goto error; - } - - if (virStreamRecvAll(st, streamSink, &fd) < 0) { - set_error_if_unset("Cannot receive screenshot data" TSRMLS_CC); - virStreamAbort(st); - goto error; - } - - if (virStreamFinish(st) < 0) { - set_error_if_unset("Cannot close stream for domain" TSRMLS_CC); - goto error; - } - - virStreamFree(st); - st = NULL; - - array_init(return_value); - if (bin) { - char tmp[4096] = { 0 }; - char fileNew[1024] = { 0 }; - int exitStatus; - - snprintf(fileNew, sizeof(fileNew), "%s.png", file); - snprintf(tmp, sizeof(tmp), "%s %s %s > /dev/null 2> /dev/null", bin, file, fileNew); - exitStatus = system(tmp); - if (WEXITSTATUS(exitStatus) != 0) - goto error; - - unlink(file); - close(fd); - fd = -1; - VIRT_ADD_ASSOC_STRING(return_value, "file", fileNew); - VIRT_ADD_ASSOC_STRING(return_value, "mime", "image/png"); - } else { - close(fd); - fd = -1; - VIRT_ADD_ASSOC_STRING(return_value, "file", file); - VIRT_ADD_ASSOC_STRING(return_value, "mime", mime); - } - - free(mime); - return; - - error: - free(mime); - if (fd != -1) { - unlink(file); - close(fd); - } - if (st) - virStreamFree(st); - RETURN_FALSE; -} - -/* - * Function name: libvirt_domain_get_screenshot - * Since version: 0.4.2 - * Description: Function uses gvnccapture (if available) to get the screenshot of the running domain - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * @server [string]: server string for the host machine - * @scancode [int]: integer value of the scancode to be send to refresh screen - * Returns: PNG image binary data - */ -PHP_FUNCTION(libvirt_domain_get_screenshot) -{ -#ifndef EXTWIN - php_libvirt_domain *domain = NULL; - zval *zdomain; - pid_t childpid = -1; - pid_t w = -1; - int retval = -1; - int fd = -1, fsize = -1; - char file[] = "/tmp/libvirt-php-tmp-XXXXXX"; - char *buf = NULL; - char *tmp = NULL; - char *xml = NULL; - int port = -1; - char *hostname = NULL; - strsize_t hostname_len; - zend_long scancode = 10; - const char *path; - char *pathDup = NULL; - char name[1024] = { 0 }; - int use_builtin = 0; - - path = get_feature_binary("screenshot"); - DPRINTF("%s: get_feature_binary('screenshot') returned %s\n", PHPFUNC, path); - - if ((path == NULL) || (access(path, X_OK) != 0)) { - use_builtin = 1; - } else { - if (!(pathDup = strdup(path))) { - set_error("Out of memory" TSRMLS_CC); - goto error; - } - } - - GET_DOMAIN_FROM_ARGS("rs|l", &zdomain, &hostname, &hostname_len, &scancode); - - xml = virDomainGetXMLDesc(domain->domain, 0); - if (!xml) { - set_error_if_unset("Cannot get the XML description" TSRMLS_CC); - goto error; - } - - tmp = get_string_from_xpath(xml, "//domain/devices/graphics/@port", NULL, &retval); - if ((tmp == NULL) || (retval < 0)) { - set_error("Cannot get the VNC port" TSRMLS_CC); - goto error; - } - - if (mkstemp(file) == 0) - goto error; - - /* Get the current hostname and override to localhost if local machine */ - gethostname(name, 1024); - if (strcmp(name, hostname) == 0) - hostname = strdup("localhost"); - - vnc_refresh_screen(hostname, tmp, scancode); - - if (use_builtin == 1) { - DPRINTF("%s: Binary not found, using builtin approach to %s:%s, tmp file = %s\n", PHPFUNC, hostname, tmp, file); - - if (vnc_get_bitmap(hostname, tmp, file) != 0) { - set_error("Cannot use builtin approach to get VNC window contents" TSRMLS_CC); - goto error; - } - } else { - port = atoi(tmp)-5900; - - DPRINTF("%s: Getting screenshot of %s:%d to temporary file %s\n", PHPFUNC, hostname, port, file); - - childpid = fork(); - if (childpid == -1) - goto error; - - if (childpid == 0) { - char tmpp[64] = { 0 }; - - snprintf(tmpp, sizeof(tmpp), "%s:%d", hostname, port); - retval = execlp(path, basename(pathDup), tmpp, file, NULL); - _exit(retval); - } else { - do { - w = waitpid(childpid, &retval, 0); - if (w == -1) - goto error; - } while (!WIFEXITED(retval) && !WIFSIGNALED(retval)); - } - - if (WEXITSTATUS(retval) != 0) { - set_error("Cannot spawn utility to get screenshot" TSRMLS_CC); - goto error; - } - } - - fd = open(file, O_RDONLY); - fsize = lseek(fd, 0, SEEK_END); - lseek(fd, 0, SEEK_SET); - buf = emalloc((fsize + 1) * sizeof(char)); - memset(buf, 0, fsize + 1); - if (read(fd, buf, fsize) < 0) { - close(fd); - unlink(file); - goto error; - } - close(fd); - - if (access(file, F_OK) == 0) { - DPRINTF("%s: Temporary file %s deleted\n", PHPFUNC, file); - unlink(file); - } - - /* This is necessary to make the output binary safe */ - VIRT_ZVAL_STRINGL(return_value, buf, fsize); - - efree(buf); - free(tmp); - free(xml); - free(pathDup); - return; - - error: - efree(buf); - free(tmp); - free(xml); - free(pathDup); - RETURN_FALSE; -#else - set_error("Function is not supported on Windows systems" TSRMLS_CC); - RETURN_FALSE; -#endif -} - -/* - * Function name: libvirt_domain_get_screen_dimensions - * Since version: 0.4.3 - * Description: Function get screen dimensions of the VNC window - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * @server [string]: server string of the host machine - * Returns: array of height and width on success, FALSE otherwise - */ -PHP_FUNCTION(libvirt_domain_get_screen_dimensions) -{ -#ifndef EXTWIN - php_libvirt_domain *domain = NULL; - zval *zdomain; - int retval = -1; - char *tmp = NULL; - char *xml = NULL; - char *hostname = NULL; - strsize_t hostname_len; - int ret; - int width; - int height; - - GET_DOMAIN_FROM_ARGS("rs", &zdomain, &hostname, &hostname_len); - - xml = virDomainGetXMLDesc(domain->domain, 0); - if (!xml) { - set_error_if_unset("Cannot get the XML description" TSRMLS_CC); - goto error; - } - - tmp = get_string_from_xpath(xml, "//domain/devices/graphics/@port", NULL, &retval); - if ((tmp == NULL) || (retval < 0)) { - set_error("Cannot get the VNC port" TSRMLS_CC); - goto error; - } - - DPRINTF("%s: hostname = %s, port = %s\n", PHPFUNC, hostname, tmp); - ret = vnc_get_dimensions(hostname, tmp, &width, &height); - free(tmp); - if (ret != 0) { - char error[1024] = { 0 }; - if (ret == -9) - snprintf(error, sizeof(error), "Cannot connect to VNC server. Please make sure domain is running and VNC graphics are set"); - else - snprintf(error, sizeof(error), "Cannot get screen dimensions, error code = %d (%s)", ret, strerror(-ret)); - - set_error(error TSRMLS_CC); - goto error; - } - - array_init(return_value); - add_assoc_long(return_value, "width", (long)width); - add_assoc_long(return_value, "height", (long)height); - - free(tmp); - free(xml); - return; - - error: - free(tmp); - free(xml); - RETURN_FALSE; -#else - set_error("Function is not supported on Windows systems" TSRMLS_CC); - RETURN_FALSE; -#endif -} - -/* - * Function name: libvirt_domain_send_keys - * Since version: 0.4.2 - * Description: Function sends keys to the domain's VNC window - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * @server [string]: server string of the host machine - * @scancode [int]: integer scancode to be sent to VNC window - * Returns: TRUE on success, FALSE otherwise - */ -PHP_FUNCTION(libvirt_domain_send_keys) -{ -#ifndef EXTWIN - php_libvirt_domain *domain = NULL; - zval *zdomain; - int retval = -1; - char *tmp = NULL; - char *xml = NULL; - char *hostname = NULL; - strsize_t hostname_len; - char *keys = NULL; - strsize_t keys_len; - int ret = 0; - - GET_DOMAIN_FROM_ARGS("rss", &zdomain, &hostname, &hostname_len, &keys, &keys_len); - - DPRINTF("%s: Sending %d VNC keys to %s...\n", PHPFUNC, (int)strlen((const char *)keys), hostname); - - xml = virDomainGetXMLDesc(domain->domain, 0); - if (!xml) { - set_error_if_unset("Cannot get the XML description" TSRMLS_CC); - goto error; - } - - tmp = get_string_from_xpath(xml, "//domain/devices/graphics/@port", NULL, &retval); - if ((tmp == NULL) || (retval < 0)) { - set_error("Cannot get the VNC port" TSRMLS_CC); - goto error; - } - - DPRINTF("%s: About to send string '%s' (%d keys) to %s:%s\n", PHPFUNC, keys, (int)strlen((const char *)keys), hostname, tmp); - - ret = vnc_send_keys(hostname, tmp, keys); - DPRINTF("%s: Sequence sending result is %d\n", PHPFUNC, ret); - - if (!ret) { - char tmpp[64] = { 0 }; - snprintf(tmpp, sizeof(tmpp), "Cannot send keys, error code %d", ret); - set_error(tmpp TSRMLS_CC); - goto error; - } - - free(tmp); - free(xml); - RETURN_TRUE; - - error: - free(tmp); - free(xml); - RETURN_FALSE; -#else - set_error("Function is not supported on Windows systems" TSRMLS_CC); - RETURN_FALSE; -#endif -} - -/* - * Function name: libvirt_domain_send_key_api - * Since version: 0.5.3 - * Description: Function sends keys to domain via libvirt API - * Arguments: @res[resource]: libvirt domain resource, e.g. from libvirt_domaing_lookup_by_*() - * @codeset [int]: the codeset of keycodes, from virKeycodeSet - * @holdtime [int]: the duration (in miliseconds) that the keys will be held - * @keycodes [array]: array of keycodes - * @flags [int]: extra flags; not used yet so callers should alway pass 0 - * Returns: TRUE for success, FALSE for failure - */ -PHP_FUNCTION(libvirt_domain_send_key_api) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - zend_long codeset; - zend_long holdtime = 0; - zend_long flags = 0; - zval *zkeycodes, *data = NULL; - HashTable *arr_hash = NULL; - HashPosition pointer; - int count, i; - uint *keycodes = NULL; - - GET_DOMAIN_FROM_ARGS("rlla|l", &zdomain, &codeset, &holdtime, &zkeycodes, - &flags); - - arr_hash = Z_ARRVAL_P(zkeycodes); - count = zend_hash_num_elements(arr_hash); - - keycodes = (uint *) emalloc(count * sizeof(uint)); - - i = 0; - VIRT_FOREACH(arr_hash, pointer, data) { - if (Z_TYPE_P(data) == IS_LONG) { - keycodes[i++] = (uint) Z_LVAL_P(data); - } - } VIRT_FOREACH_END(); - - if (virDomainSendKey(domain->domain, codeset, holdtime, keycodes, count, - flags) != 0) { - efree(keycodes); - RETURN_FALSE; - } - - efree(keycodes); - RETURN_TRUE; -} - -/* - * Function name: libvirt_domain_send_pointer_event - * Since version: 0.4.2 - * Description: Function sends keys to the domain's VNC window - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * @server [string]: server string of the host machine - * @pos_x [int]: position on x-axis - * @pos_y [int]: position on y-axis - * @clicked [int]: mask of clicked buttons (0 for none, bit 1 for button #1, bit 8 for button #8) - * @release [int]: boolean value (0 or 1) whether to release the buttons automatically once pressed - * Returns: TRUE on success, FALSE otherwise - */ -PHP_FUNCTION(libvirt_domain_send_pointer_event) -{ -#ifndef EXTWIN - php_libvirt_domain *domain = NULL; - zval *zdomain; - int retval = -1; - char *tmp = NULL; - char *xml = NULL; - char *hostname = NULL; - strsize_t hostname_len; - zend_long pos_x = 0; - zend_long pos_y = 0; - zend_long clicked = 0; - zend_bool release = 1; - int ret; - - GET_DOMAIN_FROM_ARGS("rslll|b", &zdomain, &hostname, &hostname_len, &pos_x, &pos_y, &clicked, &release); - - xml = virDomainGetXMLDesc(domain->domain, 0); - if (!xml) { - set_error_if_unset("Cannot get the XML description" TSRMLS_CC); - goto error; - } - - tmp = get_string_from_xpath(xml, "//domain/devices/graphics/@port", NULL, &retval); - if ((tmp == NULL) || (retval < 0)) { - set_error("Cannot get the VNC port" TSRMLS_CC); - goto error; - } - - DPRINTF("%s: x = %d, y = %d, clicked = %d, release = %d, hostname = %s...\n", PHPFUNC, (int) pos_x, (int) pos_y, (int) clicked, release, hostname); - ret = vnc_send_pointer_event(hostname, tmp, pos_x, pos_y, clicked, release); - if (!ret) { - char error[1024] = { 0 }; - if (ret == -9) - snprintf(error, sizeof(error), "Cannot connect to VNC server. Please make sure domain is running and VNC graphics are set"); - else - snprintf(error, sizeof(error), "Cannot send pointer event, error code = %d (%s)", ret, strerror(-ret)); - - set_error(error TSRMLS_CC); - goto error; - } - - free(tmp); - free(xml); - RETURN_TRUE; - - error: - free(tmp); - free(xml); - RETURN_FALSE; -#else - set_error("Function is not supported on Windows systems" TSRMLS_CC); - RETURN_FALSE; -#endif -} - -/* - * Function name: libvirt_domain_get_uuid - * Since version: 0.4.1(-1) - * Description: Function is used to get the domain's UUID in binary format - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * Returns: domain UUID in binary format - */ -PHP_FUNCTION(libvirt_domain_get_uuid) -{ - - php_libvirt_domain *domain = NULL; - zval *zdomain; - char *uuid; - int retval; - - GET_DOMAIN_FROM_ARGS("r", &zdomain); - - uuid = (char *)emalloc(VIR_UUID_BUFLEN); - retval = virDomainGetUUID(domain->domain, (unsigned char *)uuid); - DPRINTF("%s: virDomainGetUUID(%p, %p) returned %d\n", PHPFUNC, domain->domain, uuid, retval); - if (retval != 0) - RETURN_FALSE; - - VIRT_RETVAL_STRING(uuid); - efree(uuid); -} - -/* - * Function name: libvirt_domain_get_id - * Since version: 0.4.1(-1) - * Description: Function is used to get the domain's ID, applicable to running guests only - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * Returns: running domain ID or -1 if not running - */ -PHP_FUNCTION(libvirt_domain_get_id) -{ - - php_libvirt_domain *domain = NULL; - zval *zdomain; - int retval; - - GET_DOMAIN_FROM_ARGS("r", &zdomain); - - retval = virDomainGetID(domain->domain); - DPRINTF("%s: virDomainGetID(%p) returned %d\n", PHPFUNC, domain->domain, retval); - - RETURN_LONG(retval); -} - -/* - * Function name: libvirt_domain_get_next_dev_ids - * Since version: 0.4.2 - * Description: This functions can be used to get the next free slot if you intend to add a new device identified by slot to the domain, e.g. NIC device - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * Returns: next free slot number for the domain - */ -PHP_FUNCTION(libvirt_domain_get_next_dev_ids) -{ - long dom, bus, slot, func; - php_libvirt_domain *domain = NULL; - zval *zdomain; - - GET_DOMAIN_FROM_ARGS("r", &zdomain); - - DPRINTF("%s: Getting the next dev ids for domain %p\n", PHPFUNC, domain->domain); - - dom = get_next_free_numeric_value(domain->domain, "//@domain"); - bus = get_next_free_numeric_value(domain->domain, "//@bus"); - slot = get_next_free_numeric_value(domain->domain, "//@slot"); - func = get_next_free_numeric_value(domain->domain, "//@func"); - - array_init(return_value); - add_assoc_long(return_value, "next_domain", dom); - add_assoc_long(return_value, "next_bus", bus); - add_assoc_long(return_value, "next_slot", slot); - add_assoc_long(return_value, "next_func", func); -} - -void parse_array(zval *arr, tVMDisk *disk, tVMNetwork *network) -{ - HashTable *arr_hash; - // int array_count; - zval *data; - php_libvirt_hash_key_info key; - HashPosition pointer; - unsigned long index; - - arr_hash = Z_ARRVAL_P(arr); - //array_count = zend_hash_num_elements(arr_hash); - - if (disk != NULL) - memset(disk, 0, sizeof(tVMDisk)); - if (network != NULL) - memset(network, 0, sizeof(tVMNetwork)); - - VIRT_FOREACH(arr_hash, pointer, data) { - if ((Z_TYPE_P(data) == IS_STRING) || (Z_TYPE_P(data) == IS_LONG)) { - VIRT_HASH_CURRENT_KEY_INFO(arr_hash, pointer, index, key); - if (key.type == HASH_KEY_IS_STRING) { - if (disk != NULL) { - if ((Z_TYPE_P(data) == IS_STRING) && strcmp(key.name, "path") == 0) - disk->path = strdup(Z_STRVAL_P(data)); - else if ((Z_TYPE_P(data) == IS_STRING) && strcmp(key.name, "driver") == 0) - disk->driver = strdup(Z_STRVAL_P(data)); - else if ((Z_TYPE_P(data) == IS_STRING) && strcmp(key.name, "bus") == 0) - disk->bus = strdup(Z_STRVAL_P(data)); - else if ((Z_TYPE_P(data) == IS_STRING) && strcmp(key.name, "dev") == 0) - disk->dev = strdup(Z_STRVAL_P(data)); - else if (strcmp(key.name, "size") == 0) { - if (Z_TYPE_P(data) == IS_LONG) { - disk->size = Z_LVAL_P(data); - } else { - disk->size = size_def_to_mbytes(Z_STRVAL_P(data)); - } - } else if ((Z_TYPE_P(data) == IS_LONG) && strcmp(key.name, "flags") == 0) - disk->flags = Z_LVAL_P(data); - } else { - if (network != NULL) { - if ((Z_TYPE_P(data) == IS_STRING) && strcmp(key.name, "mac") == 0) - network->mac = strdup(Z_STRVAL_P(data)); - else if ((Z_TYPE_P(data) == IS_STRING) && strcmp(key.name, "network") == 0) - network->network = strdup(Z_STRVAL_P(data)); - else if ((Z_TYPE_P(data) == IS_STRING) && strcmp(key.name, "model") == 0) - network->model = strdup(Z_STRVAL_P(data)); - } - } - } - } - } VIRT_FOREACH_END(); -} - -/* - * Function name: libvirt_domain_new - * Since version: 0.4.5 - * Description: Function is used to install a new virtual machine to the machine - * Arguments: @conn [resource]: libvirt connection resource - * @name [string]: name of the new domain - * @arch [string]: optional architecture string, can be NULL to get default (or false) - * @memMB [int]: number of megabytes of RAM to be allocated for domain - * @maxmemMB [int]: maximum number of megabytes of RAM to be allocated for domain - * @vcpus [int]: number of VCPUs to be allocated to domain - * @iso_image [string]: installation ISO image for domain - * @disks [array]: array of disk devices for domain, consist of keys as 'path' (storage location), 'driver' (image type, e.g. 'raw' or 'qcow2'), 'bus' (e.g. 'ide', 'scsi'), 'dev' (device to be presented to the guest - e.g. 'hda'), 'size' (with 'M' or 'G' suffixes, like '10G' for 10 gigabytes image etc.) and 'flags' (VIR_DOMAIN_DISK_FILE or VIR_DOMAIN_DISK_BLOCK, optionally VIR_DOMAIN_DISK_ACCESS_ALL to allow access to the disk for all users on the host system) - * @networks [array]: array of network devices for domain, consists of keys as 'mac' (for MAC address), 'network' (for network name) and optional 'model' for model of NIC device - * @flags [int]: bit array of flags - * Returns: a new domain resource - */ -PHP_FUNCTION(libvirt_domain_new) -{ - php_libvirt_connection *conn = NULL; - php_libvirt_domain *res_domain = NULL; - virDomainPtr domain2 = NULL; - virDomainPtr domain = NULL; - zval *zconn; - char *arch = NULL; - strsize_t arch_len; - char *tmp; - char *name; - strsize_t name_len = 0; - // char *emulator; - char *iso_image = NULL; - strsize_t iso_image_len; - zend_long vcpus = -1; - zend_long memMB = -1; - zval *disks, *networks; - tVMDisk *vmDisks = NULL; - tVMNetwork *vmNetworks = NULL; - zend_long maxmemMB = -1; - HashTable *arr_hash; - int numDisks, numNets, i; - zval *data; - HashPosition pointer; - char vncl[2048] = { 0 }; - char tmpname[1024] = { 0 }; - char *xml = NULL; - int retval = 0; - char *uuid = NULL; - zend_long flags = 0; - int fd = -1; - - GET_CONNECTION_FROM_ARGS("rsslllsaa|l", &zconn, &name, &name_len, &arch, &arch_len, &memMB, &maxmemMB, &vcpus, &iso_image, &iso_image_len, &disks, &networks, &flags); - - if (iso_image == NULL) { - DPRINTF("%s: Iso image is not defined\n", PHPFUNC); - RETURN_FALSE; - } - - if ((arch == NULL) || (arch_len == 0)) - arch = NULL; - - //DPRINTF("%s: name: %s, arch: %s, memMB: %d, maxmemMB: %d, vcpus: %d, iso_image: %s\n", PHPFUNC, name, arch, memMB, maxmemMB, vcpus, iso_image); - if (memMB == 0) - memMB = maxmemMB; - - /* Parse all disks from array */ - arr_hash = Z_ARRVAL_P(disks); - numDisks = zend_hash_num_elements(arr_hash); - vmDisks = (tVMDisk *)malloc(numDisks * sizeof(tVMDisk)); - memset(vmDisks, 0, numDisks * sizeof(tVMDisk)); - i = 0; - VIRT_FOREACH(arr_hash, pointer, data) { - if (Z_TYPE_P(data) == IS_ARRAY) { - tVMDisk disk; - parse_array(data, &disk, NULL); - if (disk.path != NULL) { - //DPRINTF("Disk => path = '%s', driver = '%s', bus = '%s', dev = '%s', size = %ld MB, flags = %d\n", - // disk.path, disk.driver, disk.bus, disk.dev, disk.size, disk.flags); - vmDisks[i++] = disk; - } - } - } VIRT_FOREACH_END(); - numDisks = i; - - /* Parse all networks from array */ - arr_hash = Z_ARRVAL_P(networks); - numNets = zend_hash_num_elements(arr_hash); - vmNetworks = (tVMNetwork *)malloc(numNets * sizeof(tVMNetwork)); - memset(vmNetworks, 0, numNets * sizeof(tVMNetwork)); - i = 0; - VIRT_FOREACH(arr_hash, pointer, data) { - if (Z_TYPE_P(data) == IS_ARRAY) { - tVMNetwork network; - parse_array(data, NULL, &network); - if (network.mac != NULL) { - //DPRINTF("Network => mac = '%s', network = '%s', model = '%s'\n", network.mac, network.network, network.model); - vmNetworks[i++] = network; - } - } - } VIRT_FOREACH_END(); - numNets = i; - - snprintf(tmpname, sizeof(tmpname), "%s-install", name); - DPRINTF("%s: Name is '%s', memMB is %d, maxmemMB is %d\n", PHPFUNC, tmpname, (int) memMB, (int) maxmemMB); - tmp = installation_get_xml(1, - conn->conn, tmpname, memMB, maxmemMB, NULL /* arch */, NULL, vcpus, iso_image, - vmDisks, numDisks, vmNetworks, numNets, - flags TSRMLS_CC); - if (tmp == NULL) { - DPRINTF("%s: Cannot get installation XML\n", PHPFUNC); - set_error("Cannot get installation XML" TSRMLS_CC); - RETURN_FALSE; - } - - domain = virDomainCreateXML(conn->conn, tmp, 0); - if (domain == NULL) { - set_error_if_unset("Cannot create installation domain from the XML description" TSRMLS_CC); - DPRINTF("%s: Cannot create installation domain from the XML description (%s): %s\n", PHPFUNC, LIBVIRT_G(last_error), tmp); - RETURN_FALSE; - } - - xml = virDomainGetXMLDesc(domain, 0); - if (!xml) { - DPRINTF("%s: Cannot get the XML description\n", PHPFUNC); - set_error_if_unset("Cannot get the XML description" TSRMLS_CC); - RETURN_FALSE; - } - - tmp = get_string_from_xpath(xml, "//domain/devices/graphics[@type='vnc']/@port", NULL, &retval); - if (retval < 0) { - DPRINTF("%s: Cannot get port from XML description\n", PHPFUNC); - set_error_if_unset("Cannot get port from XML description" TSRMLS_CC); - RETURN_FALSE; - } - - snprintf(vncl, sizeof(vncl), "%s:%s", virConnectGetHostname(conn->conn), tmp); - DPRINTF("%s: Trying to connect to '%s'\n", PHPFUNC, vncl); - -#ifndef EXTWIN - if ((fd = connect_socket(virConnectGetHostname(conn->conn), tmp, 0, 0, flags & DOMAIN_FLAG_TEST_LOCAL_VNC)) < 0) { - DPRINTF("%s: Cannot connect to '%s'\n", PHPFUNC, vncl); - snprintf(vncl, sizeof(vncl), "Connection failed, port %s is most likely forbidden on firewall (iptables) on the host (%s)" - " or the emulator VNC server is bound to localhost address only.", - tmp, virConnectGetHostname(conn->conn)); - } else { - close(fd); - DPRINTF("%s: Connection to '%s' successfull (%s local connection)\n", PHPFUNC, vncl, - (flags & DOMAIN_FLAG_TEST_LOCAL_VNC) ? "using" : "not using"); - } -#endif - - set_vnc_location(vncl TSRMLS_CC); - - tmp = installation_get_xml(2, - conn->conn, name, memMB, maxmemMB, NULL /* arch */, NULL, vcpus, iso_image, - vmDisks, numDisks, vmNetworks, numNets, - flags TSRMLS_CC); - if (tmp == NULL) { - DPRINTF("%s: Cannot get installation XML, step 2\n", PHPFUNC); - set_error("Cannot get installation XML, step 2" TSRMLS_CC); - virDomainFree(domain); - RETURN_FALSE; - } - - domain2 = virDomainDefineXML(conn->conn, tmp); - if (domain2 == NULL) { - set_error_if_unset("Cannot define domain from the XML description" TSRMLS_CC); - DPRINTF("%s: Cannot define domain from the XML description (name = '%s', uuid = '%s', error = '%s')\n", PHPFUNC, name, uuid, LIBVIRT_G(last_error)); - RETURN_FALSE; - } - virDomainFree(domain2); - - res_domain = (php_libvirt_domain *)emalloc(sizeof(php_libvirt_domain)); - res_domain->domain = domain; - res_domain->conn = conn; - - DPRINTF("%s: returning %p\n", PHPFUNC, res_domain->domain); - resource_change_counter(INT_RESOURCE_DOMAIN, conn->conn, res_domain->domain, 1 TSRMLS_CC); - - VIRT_REGISTER_RESOURCE(res_domain, le_libvirt_domain); -} - -/* - * Function name: libvirt_domain_new_get_vnc - * Since version: 0.4.5 - * Description: Function is used to get the VNC server location for the newly created domain (newly started installation) - * Arguments: None - * Returns: a VNC server for a newly created domain resource (if any) - */ -PHP_FUNCTION(libvirt_domain_new_get_vnc) -{ - if (LIBVIRT_G(vnc_location)) - VIRT_RETURN_STRING(LIBVIRT_G(vnc_location)); - - RETURN_NULL(); -} - -/* - * Function name: libvirt_domain_get_xml_desc - * Since version: 0.4.1(-1), changed 0.4.2 - * Description: Function is used to get the domain's XML description - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * @xpath [string]: optional xPath expression string to get just this entry, can be NULL - * Returns: domain XML description string or result of xPath expression - */ -PHP_FUNCTION(libvirt_domain_get_xml_desc) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - char *tmp = NULL; - char *xml; - char *xpath = NULL; - strsize_t xpath_len; - zend_long flags = 0; - int retval = -1; - - GET_DOMAIN_FROM_ARGS("rs|l", &zdomain, &xpath, &xpath_len, &flags); - if (xpath_len < 1) - xpath = NULL; - - DPRINTF("%s: Getting the XML for domain %p (xPath = %s)\n", PHPFUNC, domain->domain, xpath); - - xml = virDomainGetXMLDesc(domain->domain, flags); - if (!xml) { - set_error_if_unset("Cannot get the XML description" TSRMLS_CC); - RETURN_FALSE; - } - - tmp = get_string_from_xpath(xml, xpath, NULL, &retval); - if ((tmp == NULL) || (retval < 0)) { - VIRT_RETVAL_STRING(xml); - } else { - VIRT_RETVAL_STRING(tmp); - } - - free(tmp); - free(xml); -} - -/* - * Function name: libvirt_domain_get_disk_devices - * Since version: 0.4.4 - * Description: Function is used to get disk devices for the domain - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * Returns: list of domain disk devices - */ -PHP_FUNCTION(libvirt_domain_get_disk_devices) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - char *xml; - int retval = -1; - - GET_DOMAIN_FROM_ARGS("r", &zdomain); - - DPRINTF("%s: Getting disk device list for domain %p\n", PHPFUNC, domain->domain); - - xml = virDomainGetXMLDesc(domain->domain, 0); - if (!xml) { - set_error_if_unset("Cannot get the XML description" TSRMLS_CC); - RETURN_FALSE; - } - - array_init(return_value); - - free(get_string_from_xpath(xml, "//domain/devices/disk/target/@dev", &return_value, &retval)); - free(xml); - - if (retval < 0) - add_assoc_long(return_value, "error_code", (long)retval); - else - add_assoc_long(return_value, "num", (long)retval); -} - -/* - * Function name: libvirt_domain_get_interface_devices - * Since version: 0.4.4 - * Description: Function is used to get network interface devices for the domain - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * Returns: list of domain interface devices - */ -PHP_FUNCTION(libvirt_domain_get_interface_devices) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - char *xml; - int retval = -1; - - GET_DOMAIN_FROM_ARGS("r", &zdomain); - - DPRINTF("%s: Getting interface device list for domain %p\n", PHPFUNC, domain->domain); - - xml = virDomainGetXMLDesc(domain->domain, 0); - if (!xml) { - set_error_if_unset("Cannot get the XML description" TSRMLS_CC); - RETURN_FALSE; - } - - array_init(return_value); - - free(get_string_from_xpath(xml, "//domain/devices/interface/target/@dev", &return_value, &retval)); - free(xml); - - if (retval < 0) - add_assoc_long(return_value, "error_code", (long)retval); - else - add_assoc_long(return_value, "num", (long)retval); -} - -/* - * Function name: libvirt_domain_change_vcpus - * Since version: 0.4.2 - * Description: Function is used to change the VCPU count for the domain - * Arguments: @res [resource]: libvirt domain resource - * @numCpus [int]: number of VCPUs to be set for the guest - * @flags [int]: flags for virDomainSetVcpusFlags (available at http://libvirt.org/html/libvirt-libvirt.html#virDomainVcpuFlags) - * Returns: true on success, false on error - */ -PHP_FUNCTION(libvirt_domain_change_vcpus) -{ - zend_long numCpus, flags = 0; - php_libvirt_domain *domain = NULL; - zval *zdomain; - - GET_DOMAIN_FROM_ARGS("rl|l", &zdomain, &numCpus, &flags); - - if (virDomainSetVcpusFlags(domain->domain, numCpus, flags) == 0) { - RETURN_TRUE; - } else { - RETURN_FALSE; - } -} - -/* - * Function name: libvirt_domain_change_memory - * Since version: 0.4.2 - * Description: Function is used to change the domain memory allocation - * Arguments: @res [resource]: libvirt domain resource - * @allocMem [int]: number of MiBs to be set as immediate memory value - * @allocMax [int]: number of MiBs to be set as the maximum allocation - * @flags [int]: flags - * Returns: new domain resource - */ -PHP_FUNCTION(libvirt_domain_change_memory) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - char *tmpA = NULL; - char *tmp1 = NULL; - char *tmp2 = NULL; - char *xml; - char *new_xml = NULL; - int new_len; - char newXml[512] = { 0 }; - zend_long xflags = 0; - zend_long allocMem = 0; - zend_long allocMax = 0; - // int pos = -1; - int len = 0; - php_libvirt_domain *res_domain = NULL; - php_libvirt_connection *conn = NULL; - virDomainPtr dom = NULL; - - GET_DOMAIN_FROM_ARGS("rll|l", &zdomain, &allocMem, &allocMax, &xflags); - - DPRINTF("%s: Changing domain memory count to %d MiB current/%d MiB max, domain = %p\n", - PHPFUNC, (int)allocMem, (int)allocMax, domain->domain); - - allocMem *= 1024; - allocMax *= 1024; - - if (allocMem > allocMax) - allocMem = allocMax; - - xml = virDomainGetXMLDesc(domain->domain, xflags); - if (!xml) { - set_error_if_unset("Cannot get the XML description" TSRMLS_CC); - RETURN_FALSE; - } - - snprintf(newXml, sizeof(newXml), " <memory>%d</memory>\n <currentMemory>%d</currentMemory>\n", allocMax, allocMem); - tmpA = strstr(xml, "<memory>"); - tmp1 = strstr(xml, "</currentMemory>") + strlen("</currentMemory>"); - // pos = strlen(xml) - strlen(tmp1); - if (!tmpA || !tmp1) { - set_error_if_unset("Cannot parse domain XML" TSRMLS_CC); - RETURN_FALSE; - } - len = strlen(xml) - strlen(tmpA); - - tmp2 = (char *)emalloc((len + 1) * sizeof(char)); - memset(tmp2, 0, len + 1); - memcpy(tmp2, xml, len); - - new_len = strlen(tmp1) + strlen(tmp2) + strlen(newXml) + 2; - new_xml = (char *)emalloc(new_len * sizeof(char)); - snprintf(new_xml, new_len, "%s\n%s%s", tmp2, newXml, tmp1); - - conn = domain->conn; - - dom = virDomainDefineXML(conn->conn, new_xml); - if (dom == NULL) { - free(xml); - efree(new_xml); - RETURN_FALSE; - } - free(xml); - efree(new_xml); - - res_domain = (php_libvirt_domain *)emalloc(sizeof(php_libvirt_domain)); - res_domain->domain = dom; - res_domain->conn = conn; - - DPRINTF("%s: returning %p\n", PHPFUNC, res_domain->domain); - resource_change_counter(INT_RESOURCE_DOMAIN, conn->conn, res_domain->domain, 1 TSRMLS_CC); - - VIRT_REGISTER_RESOURCE(res_domain, le_libvirt_domain); -} - -/* - * Function name: libvirt_domain_change_boot_devices - * Since version: 0.4.2 - * Description: Function is used to change the domain boot devices - * Arguments: @res [resource]: libvirt domain resource - * @first [string]: first boot device to be set - * @second [string]: second boot device to be set - * @flags [int]: flags - * Returns: new domain resource - */ -PHP_FUNCTION(libvirt_domain_change_boot_devices) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - char *tmpA = NULL; - char *tmp1 = NULL; - char *tmp2 = NULL; - char *xml; - char *new_xml = NULL; - int new_len; - char newXml[4096] = { 0 }; - zend_long xflags = 0; - char *first = NULL; - strsize_t first_len; - char *second = NULL; - strsize_t second_len; - // int pos = -1; - int len = 0; - php_libvirt_domain *res_domain = NULL; - php_libvirt_connection *conn = NULL; - virDomainPtr dom = NULL; - - GET_DOMAIN_FROM_ARGS("rss|l", &zdomain, &first, &first_len, &second, &second_len, &xflags); - - xml = virDomainGetXMLDesc(domain->domain, xflags); - if (!xml) { - set_error_if_unset("Cannot get the XML description" TSRMLS_CC); - RETURN_FALSE; - } - - DPRINTF("%s: Changing domain boot order, domain = %p\n", PHPFUNC, domain->domain); - - if (!second || (strcmp(second, "-") == 0)) - snprintf(newXml, sizeof(newXml), " <boot dev='%s'/>\n", first); - else - snprintf(newXml, sizeof(newXml), " <boot dev='%s'/>\n <boot dev='%s'/>\n", first, second); - - tmpA = strstr(xml, "</type>") + strlen("</type>"); - tmp1 = strstr(xml, "</os>"); - // pos = strlen(xml) - strlen(tmp1); - len = strlen(xml) - strlen(tmpA); - - tmp2 = (char *)emalloc((len + 1) * sizeof(char)); - memset(tmp2, 0, len + 1); - memcpy(tmp2, xml, len); - - new_len = strlen(tmp1) + strlen(tmp2) + strlen(newXml) + 2; - new_xml = (char *)emalloc(new_len * sizeof(char)); - snprintf(new_xml, new_len, "%s\n%s%s", tmp2, newXml, tmp1); - - conn = domain->conn; - - dom = virDomainDefineXML(conn->conn, new_xml); - if (dom == NULL) { - DPRINTF("%s: Function failed, restoring original XML\n", PHPFUNC); - free(xml); - efree(newXml); - RETURN_FALSE; - } - free(xml); - efree(newXml); - - res_domain = (php_libvirt_domain *)emalloc(sizeof(php_libvirt_domain)); - res_domain->domain = dom; - res_domain->conn = conn; - - DPRINTF("%s: returning %p\n", PHPFUNC, res_domain->domain); - resource_change_counter(INT_RESOURCE_DOMAIN, conn->conn, res_domain->domain, 1 TSRMLS_CC); - - VIRT_REGISTER_RESOURCE(res_domain, le_libvirt_domain); -} - -/* - * Function name: libvirt_domain_disk_add - * Since version: 0.4.2 - * Description: Function is used to add the disk to the virtual machine using set of API functions to make it as simple as possible for the user - * Arguments: @res [resource]: libvirt domain resource - * @img [string]: string for the image file on the host system - * @dev [string]: string for the device to be presented to the guest (e.g. hda) - * @typ [string]: bus type for the device in the guest, usually 'ide' or 'scsi' - * @driver [string]: driver type to be specified, like 'raw' or 'qcow2' - * @flags [int]: flags for getting the XML description - * Returns: new domain resource - */ -PHP_FUNCTION(libvirt_domain_disk_add) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - char *xml; - char *img = NULL; - strsize_t img_len; - char *dev = NULL; - strsize_t dev_len; - char *driver = NULL; - strsize_t driver_len; - char *typ = NULL; - strsize_t typ_len; - char *newXml = NULL; - zend_long xflags = 0; - int retval = -1; - char *xpath = NULL; - char *tmp = NULL; - - GET_DOMAIN_FROM_ARGS("rssss|l", &zdomain, &img, &img_len, &dev, &dev_len, &typ, &typ_len, &driver, &driver_len, &xflags); - - DPRINTF("%s: Domain %p, device = %s, image = %s, type = %s, driver = %s\n", PHPFUNC, - domain->domain, dev, img, typ, driver); - - xml = virDomainGetXMLDesc(domain->domain, xflags); - if (!xml) { - set_error_if_unset("Cannot get the XML description" TSRMLS_CC); - goto error; - } - - if (asprintf(&xpath, &quot;//domain/devices/disk/source[@file=\&quot;%s\&quot;]/./(a)file&quot;, img) < 0) { - set_error("Out of memory" TSRMLS_CC); - goto error; - } - tmp = get_string_from_xpath(xml, xpath, NULL, &retval); - if (tmp != NULL) { - free(tmp); - if (asprintf(&tmp, "Domain already has image <i>%s</i> connected", img) < 0) - set_error("Out of memory" TSRMLS_CC); - else - set_error(tmp TSRMLS_CC); - goto error; - } - - free(xpath); - if (asprintf(&xpath, &quot;//domain/devices/disk/target[@dev=&#39;%s&#39;]/./(a)dev&quot;, dev) < 0) { - set_error("Out of memory" TSRMLS_CC); - goto error; - } - tmp = get_string_from_xpath(xml, newXml, NULL, &retval); - if (tmp != NULL) { - free(tmp); - if (asprintf(&tmp, "Domain already has device <i>%s</i> connected", dev) < 0) - set_error("Out of memory" TSRMLS_CC); - else - set_error(tmp TSRMLS_CC); - goto error; - } - - if (asprintf(&newXml, - " <disk type='file' device='disk'>\n" - " <driver name='qemu' type='%s'/>\n" - " <source file='%s'/>\n" - " <target dev='%s' bus='%s'/>\n" - " </disk>", driver, img, dev, typ) < 0) { - set_error("Out of memory" TSRMLS_CC); - goto error; - } - - if (virDomainAttachDeviceFlags(domain->domain, - newXml, VIR_DOMAIN_AFFECT_CONFIG) < 0) { - set_error("Unable to attach disk" TSRMLS_CC); - goto error; - } - - free(tmp); - free(xpath); - free(xml); - RETURN_TRUE; - - error: - free(tmp); - free(xpath); - free(xml); - RETURN_FALSE; -} - -/* - * Function name: libvirt_domain_disk_remove - * Since version: 0.4.2 - * Description: Function is used to remove the disk from the virtual machine using set of API functions to make it as simple as possible - * Arguments: @res [resource]: libvirt domain resource - * @dev [string]: string for the device to be removed from the guest (e.g. 'hdb') - * @flags [int]: flags for getting the XML description - * Returns: new domain resource - */ -PHP_FUNCTION(libvirt_domain_disk_remove) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - char *xml; - char *dev = NULL; - strsize_t dev_len; - char *newXml = NULL; - zend_long xflags = 0; - int retval = -1; - char *xpath = NULL; - char *tmp = NULL; - - GET_DOMAIN_FROM_ARGS("rs|l", &zdomain, &dev, &dev_len, &xflags); - - DPRINTF("%s: Trying to remove %s from domain %p\n", PHPFUNC, dev, domain->domain); - - xml = virDomainGetXMLDesc(domain->domain, xflags); - if (!xml) { - set_error_if_unset("Cannot get the XML description" TSRMLS_CC); - RETURN_FALSE; - } - - if (asprintf(&xpath, &quot;//domain/devices/disk/target[@dev=&#39;%s&#39;]/./(a)dev&quot;, dev) < 0) { - set_error("Out of memory" TSRMLS_CC); - goto error; - } - tmp = get_string_from_xpath(xml, xpath, NULL, &retval); - if (!tmp) { - if (asprintf(&tmp, "Device <i>%s</i> is not connected to the guest", dev) < 0) - set_error("Out of memory" TSRMLS_CC); - else - set_error(tmp TSRMLS_CC); - goto error; - } - - if (asprintf(&newXml, - " <disk type='file' device='disk'>\n" - " <target dev='%s'/>\n" - " </disk>", dev) < 0) { - set_error("Out of memory" TSRMLS_CC); - goto error; - } - - if (virDomainDetachDeviceFlags(domain->domain, - newXml, VIR_DOMAIN_AFFECT_CONFIG) < 0) { - set_error("Unable to attach disk" TSRMLS_CC); - goto error; - } - - free(tmp); - free(xpath); - free(xml); - RETURN_TRUE; - - error: - free(tmp); - free(xpath); - free(xml); - RETURN_FALSE; -} - -/* - * Function name: libvirt_domain_nic_add - * Since version: 0.4.2 - * Description: Function is used to add the NIC card to the virtual machine using set of API functions to make it as simple as possible for the user - * Arguments: @res [resource]: libvirt domain resource - * @mac [string]: MAC string interpretation to be used for the NIC device - * @network [string]: network name where to connect this NIC - * @model [string]: string of the NIC model - * @flags [int]: flags for getting the XML description - * Returns: new domain resource - */ -PHP_FUNCTION(libvirt_domain_nic_add) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - char *xml; - char *mac = NULL; - strsize_t mac_len; - char *net = NULL; - strsize_t net_len; - char *model = NULL; - strsize_t model_len; - char *newXml = NULL; - zend_long xflags = 0; - int retval = -1; - char *xpath = NULL; - char *tmp = NULL; - - DPRINTF("%s: Entering\n", PHPFUNC); - - GET_DOMAIN_FROM_ARGS("rsss|l", &zdomain, &mac, &mac_len, &net, &net_len, &model, &model_len, &xflags); - if (model_len < 1) - model = NULL; - - DPRINTF("%s: domain = %p, mac = %s, net = %s, model = %s\n", PHPFUNC, domain->domain, mac, net, model); - - xml = virDomainGetXMLDesc(domain->domain, xflags); - if (!xml) { - set_error_if_unset("Cannot get the XML description" TSRMLS_CC); - RETURN_FALSE; - } - - if (asprintf(&xpath, &quot;//domain/devices/interface[@type=&#39;network&#39;]/mac[@address=&#39;%s&#39;]/./(a)mac&quot;, mac) < 0) { - set_error("Out of memory" TSRMLS_CC); - goto error; - } - tmp = get_string_from_xpath(xml, xpath, NULL, &retval); - if (tmp) { - free(tmp); - if (asprintf(&tmp, "Domain already has NIC device with MAC address <i>%s</i> connected", mac) < 0) - set_error("Out of memory" TSRMLS_CC); - else - set_error(tmp TSRMLS_CC); - goto error; - } - - if (model) { - if (asprintf(&newXml, - " <interface type='network'>\n" - " <mac address='%s' />\n" - " <source network='%s' />\n" - " <model type='%s' />\n" - " </interface>", mac, net, model) < 0) { - set_error("Out of memory" TSRMLS_CC); - goto error; - } - } else { - if (asprintf(&newXml, - " <interface type='network'>\n" - " <mac address='%s' />\n" - " <source network='%s' />\n" - " </interface>", mac, net) < 0) { - set_error("Out of memory" TSRMLS_CC); - goto error; - } - } - - if (virDomainAttachDeviceFlags(domain->domain, - newXml, VIR_DOMAIN_AFFECT_CONFIG) < 0) { - set_error("Unable to attach interface" TSRMLS_CC); - goto error; - } - - free(tmp); - free(xpath); - free(xml); - RETURN_TRUE; - - error: - free(tmp); - free(xpath); - free(xml); - RETURN_FALSE; -} - -/* - * Function name: libvirt_domain_nic_remove - * Since version: 0.4.2 - * Description: Function is used to remove the NIC from the virtual machine using set of API functions to make it as simple as possible - * Arguments: @res [resource]: libvirt domain resource - * @dev [string]: string representation of the IP address to be removed (e.g. 54:52:00:xx:yy:zz) - * @flags [int]: optional flags for getting the XML description - * Returns: new domain resource - */ -PHP_FUNCTION(libvirt_domain_nic_remove) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - char *xml; - char *mac = NULL; - strsize_t mac_len; - char *newXml = NULL; - zend_long xflags = 0; - int retval = -1; - char *xpath = NULL; - char *tmp = NULL; - - GET_DOMAIN_FROM_ARGS("rs|l", &zdomain, &mac, &mac_len, &xflags); - - DPRINTF("%s: Trying to remove NIC device with MAC address %s from domain %p\n", PHPFUNC, mac, domain->domain); - - xml = virDomainGetXMLDesc(domain->domain, xflags); - if (!xml) { - set_error_if_unset("Cannot get the XML description" TSRMLS_CC); - RETURN_FALSE; - } - if (asprintf(&xpath, &quot;//domain/devices/interface[@type=&#39;network&#39;]/mac[@address=&#39;%s&#39;]/./(a)mac&quot;, mac) < 0) { - set_error("Out of memory" TSRMLS_CC); - goto error; - } - tmp = get_string_from_xpath(xml, xpath, NULL, &retval); - if (!tmp) { - free(tmp); - if (asprintf(&tmp, "Domain has no such interface with mac %s", mac) < 0) - set_error("Out of memory" TSRMLS_CC); - else - set_error(tmp TSRMLS_CC); - goto error; - } - - if (asprintf(&newXml, - " <interface type='network'>\n" - " <mac address='%s' />\n" - " </interface>", mac) < 0) { - set_error("Out of memory" TSRMLS_CC); - goto error; - } - - if (virDomainDetachDeviceFlags(domain->domain, - newXml, VIR_DOMAIN_AFFECT_CONFIG) < 0) { - set_error("Unable to detach interface" TSRMLS_CC); - goto error; - } - - free(tmp); - free(xpath); - free(xml); - RETURN_TRUE; - - error: - free(tmp); - free(xpath); - free(xml); - RETURN_FALSE; -} - -/* - * Function name: libvirt_domain_attach_device - * Since version: 0.5.3 - * Description: Function is used to attach a virtual device to a domain. - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * @xml [string]: XML description of one device. - * @flags [int]: optional flags to control how the device is attached. Defaults to VIR_DOMAIN_AFFECT_LIVE - * Returns: TRUE for success, FALSE on error. - */ -PHP_FUNCTION(libvirt_domain_attach_device) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain = NULL; - char *xml = NULL; - strsize_t xml_len = 0; - zend_long flags = VIR_DOMAIN_AFFECT_LIVE; - - GET_DOMAIN_FROM_ARGS("rs|l", &zdomain, &xml, &xml_len, &flags); - - if (virDomainAttachDeviceFlags(domain->domain, xml, flags) < 0) - RETURN_FALSE; - - RETURN_TRUE; -} - -/* - * Function name: libvirt_domain_detach_device - * Since version: 0.5.3 - * Description: Function is used to detach a virtual device from a domain. - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * @xml [string]: XML description of one device. - * @flags [int]: optional flags to control how the device is attached. Defaults to VIR_DOMAIN_AFFECT_LIVE - * Returns: TRUE for success, FALSE on error. - */ -PHP_FUNCTION(libvirt_domain_detach_device) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain = NULL; - char *xml = NULL; - strsize_t xml_len = 0; - zend_long flags = VIR_DOMAIN_AFFECT_LIVE; - - GET_DOMAIN_FROM_ARGS("rs|l", &zdomain, &xml, &xml_len, &flags); - - if (virDomainDetachDeviceFlags(domain->domain, xml, flags) < 0) - RETURN_FALSE; - - RETURN_TRUE; -} - -/* - * Function name: libvirt_domain_get_info - * Since version: 0.4.1(-1) - * Description: Function is used to get the domain's information - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * Returns: domain information array - */ -PHP_FUNCTION(libvirt_domain_get_info) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - virDomainInfo domainInfo; - int retval; - - GET_DOMAIN_FROM_ARGS("r", &zdomain); - - retval = virDomainGetInfo(domain->domain, &domainInfo); - DPRINTF("%s: virDomainGetInfo(%p) returned %d\n", PHPFUNC, domain->domain, retval); - if (retval != 0) - RETURN_FALSE; - - array_init(return_value); - add_assoc_long(return_value, "maxMem", domainInfo.maxMem); - add_assoc_long(return_value, "memory", domainInfo.memory); - add_assoc_long(return_value, "state", (long)domainInfo.state); - add_assoc_long(return_value, "nrVirtCpu", domainInfo.nrVirtCpu); - add_assoc_double(return_value, "cpuUsed", (double)((double)domainInfo.cpuTime/1000000000.0)); -} - -/* - * Function name: libvirt_domain_create - * Since version: 0.4.1(-1) - * Description: Function is used to create the domain identified by it's resource - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * Returns: result of domain creation (startup) - */ -PHP_FUNCTION(libvirt_domain_create) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - int retval; - - GET_DOMAIN_FROM_ARGS("r", &zdomain); - - retval = virDomainCreate(domain->domain); - DPRINTF("%s: virDomainCreate(%p) returned %d\n", PHPFUNC, domain->domain, retval); - if (retval != 0) - RETURN_FALSE; - RETURN_TRUE; -} - -/* - * Function name: libvirt_domain_destroy - * Since version: 0.4.1(-1) - * Description: Function is used to destroy the domain identified by it's resource - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * Returns: result of domain destroy - */ -PHP_FUNCTION(libvirt_domain_destroy) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - int retval; - - GET_DOMAIN_FROM_ARGS("r", &zdomain); - - retval = virDomainDestroy(domain->domain); - DPRINTF("%s: virDomainDestroy(%p) returned %d\n", PHPFUNC, domain->domain, retval); - if (retval != 0) - RETURN_FALSE; - RETURN_TRUE; -} - -/* - * Function name: libvirt_domain_resume - * Since version: 0.4.1(-1) - * Description: Function is used to resume the domain identified by it's resource - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * Returns: result of domain resume - */ -PHP_FUNCTION(libvirt_domain_resume) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - int retval; - - GET_DOMAIN_FROM_ARGS("r", &zdomain); - - retval = virDomainResume(domain->domain); - DPRINTF("%s: virDomainResume(%p) returned %d\n", PHPFUNC, domain->domain, retval); - if (retval != 0) - RETURN_FALSE; - RETURN_TRUE; -} - -/* - * Function name: libvirt_domain_core_dump - * Since version: 0.4.1(-2) - * Description: Function is used to dump core of the domain identified by it's resource - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * @to [string]: to - * Returns: TRUE for success, FALSE on error - */ -PHP_FUNCTION(libvirt_domain_core_dump) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - int retval; - strsize_t to_len; - char *to; - - GET_DOMAIN_FROM_ARGS("rs", &zdomain, &to, &to_len); - - retval = virDomainCoreDump(domain->domain, to, 0); - DPRINTF("%s: virDomainCoreDump(%p, %s, 0) returned %d\n", PHPFUNC, domain->domain, to, retval); - if (retval != 0) - RETURN_FALSE; - RETURN_TRUE; -} - -/* - * Function name: libvirt_domain_shutdown - * Since version: 0.4.1(-1) - * Description: Function is used to shutdown the domain identified by it's resource - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * Returns: TRUE for success, FALSE on error - */ -PHP_FUNCTION(libvirt_domain_shutdown) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - int retval; - - GET_DOMAIN_FROM_ARGS("r", &zdomain); - - retval = virDomainShutdown(domain->domain); - DPRINTF("%s: virDomainShutdown(%p) returned %d\n", PHPFUNC, domain->domain, retval); - if (retval != 0) - RETURN_FALSE; - RETURN_TRUE; -} - -/* - * Function name: libvirt_domain_managedsave - * Since version: 0.4.1(-1) - * Description: Function is used to managed save the domain (domain was unloaded from memory and it state saved to disk) identified by it's resource - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * Returns: TRUE for success, FALSE on error - */ -PHP_FUNCTION(libvirt_domain_managedsave) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - int retval; - - GET_DOMAIN_FROM_ARGS("r", &zdomain); - retval = virDomainManagedSave(domain->domain, 0); - DPRINTF("%s: virDomainManagedSave(%p) returned %d\n", PHPFUNC, domain->domain, retval); - if (retval != 0) - RETURN_FALSE; - RETURN_TRUE; -} - -/* - * Function name: libvirt_domain_suspend - * Since version: 0.4.1(-1) - * Description: Function is used to suspend the domain identified by it's resource - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * Returns: TRUE for success, FALSE on error - */ -PHP_FUNCTION(libvirt_domain_suspend) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - int retval; - - GET_DOMAIN_FROM_ARGS("r", &zdomain); - - retval = virDomainSuspend(domain->domain); - DPRINTF("%s: virDomainSuspend(%p) returned %d\n", PHPFUNC, domain->domain, retval); - if (retval != 0) - RETURN_FALSE; - RETURN_TRUE; -} - -/* - * Function name: libvirt_domain_undefine - * Since version: 0.4.1(-1) - * Description: Function is used to undefine the domain identified by it's resource - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * Returns: TRUE for success, FALSE on error - */ -PHP_FUNCTION(libvirt_domain_undefine) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - int retval; - - GET_DOMAIN_FROM_ARGS("r", &zdomain); - - retval = virDomainUndefine(domain->domain); - DPRINTF("%s: virDomainUndefine(%p) returned %d\n", PHPFUNC, domain->domain, retval); - if (retval != 0) - RETURN_FALSE; - RETURN_TRUE; -} - -/* - * Function name: libvirt_domain_reboot - * Since version: 0.4.1(-1) - * Description: Function is used to reboot the domain identified by it's resource - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * @flags [int]: optional flags - * Returns: TRUE for success, FALSE on error - */ -PHP_FUNCTION(libvirt_domain_reboot) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - int retval; - zend_long flags = 0; - - GET_DOMAIN_FROM_ARGS("r|l", &zdomain, &flags); - - retval = virDomainReboot(domain->domain, flags); - DPRINTF("%s: virDomainReboot(%p) returned %d\n", PHPFUNC, domain->domain, retval); - if (retval != 0) - RETURN_FALSE; - RETURN_TRUE; -} - -/* - * Function name: libvirt_domain_define_xml - * Since version: 0.4.1(-1) - * Description: Function is used to define the domain from XML string - * Arguments: @conn [resource]: libvirt connection resource - * @xml [string]: XML string to define guest from - * Returns: newly defined domain resource - */ -PHP_FUNCTION(libvirt_domain_define_xml) -{ - php_libvirt_domain *res_domain = NULL; - php_libvirt_connection *conn = NULL; - zval *zconn; - virDomainPtr domain = NULL; - char *xml; - strsize_t xml_len; - - GET_CONNECTION_FROM_ARGS("rs", &zconn, &xml, &xml_len); - - domain = virDomainDefineXML(conn->conn, xml); - if (domain == NULL) - RETURN_FALSE; - - res_domain = (php_libvirt_domain *)emalloc(sizeof(php_libvirt_domain)); - res_domain->domain = domain; - res_domain->conn = conn; - - DPRINTF("%s: returning %p\n", PHPFUNC, res_domain->domain); - resource_change_counter(INT_RESOURCE_DOMAIN, conn->conn, res_domain->domain, 1 TSRMLS_CC); - - VIRT_REGISTER_RESOURCE(res_domain, le_libvirt_domain); -} - -/* - * Function name: libvirt_domain_create_xml - * Since version: 0.4.1(-1) - * Description: Function is used to create the domain identified by it's resource - * Arguments: @conn [resource]: libvirt connection resource - * @xml [string]: XML string to create guest from - * Returns: newly started/created domain resource - */ -PHP_FUNCTION(libvirt_domain_create_xml) -{ - php_libvirt_domain *res_domain = NULL; - php_libvirt_connection *conn = NULL; - zval *zconn; - virDomainPtr domain = NULL; - char *xml; - strsize_t xml_len; - zend_long flags = 0; - - GET_CONNECTION_FROM_ARGS("rs|l", &zconn, &xml, &xml_len, &flags); - - domain = virDomainCreateXML(conn->conn, xml, flags); - DPRINTF("%s: virDomainCreateXML(%p, <xml>, 0) returned %p\n", PHPFUNC, conn->conn, domain); - if (domain == NULL) - RETURN_FALSE; - - res_domain = (php_libvirt_domain *)emalloc(sizeof(php_libvirt_domain)); - res_domain->domain = domain; - res_domain->conn = conn; - - DPRINTF("%s: returning %p\n", PHPFUNC, res_domain->domain); - resource_change_counter(INT_RESOURCE_DOMAIN, conn->conn, res_domain->domain, 1 TSRMLS_CC); - - VIRT_REGISTER_RESOURCE(res_domain, le_libvirt_domain); -} - -/* - * Function name: libvirt_domain_xml_from_native - * Since version: 0.5.3 - * Description: Function is used to convert native configuration data to libvirt domain XML - * Arguments: @conn [resource]: libvirt connection resource - * @format [string]: configuration format converting from - * @config_data [string]: content of the native config file - * Returns: libvirt domain XML, FALSE on error - */ -PHP_FUNCTION(libvirt_domain_xml_from_native) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - char *config_data = NULL; - char *format = NULL; - char *xml = NULL; - strsize_t config_data_len; - strsize_t format_len; - unsigned int flags = 0; - - GET_CONNECTION_FROM_ARGS("rss", &zconn, &format, &format_len, &config_data, &config_data_len); - - xml = virConnectDomainXMLFromNative(conn->conn, format, config_data, flags); - - if (xml == NULL) { - set_error_if_unset("Cannot convert native format to XML" TSRMLS_CC); - RETURN_FALSE; - } - - VIRT_RETVAL_STRING(xml); - free(xml); -} - -/* - * Function name: libvirt_domain_xml_to_native - * Since version: 0.5.3 - * Description: Function is used to convert libvirt domain XML to native configuration - * Arguments: @conn [resource]: libvirt connection resource - * @format [string]: configuration format converting to - * @xml_data [string]: content of the libvirt domain xml file - * Returns: contents of the native data file, FALSE on error -*/ -PHP_FUNCTION(libvirt_domain_xml_to_native) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - char *xml_data = NULL; - char *format = NULL; - char *config_data = NULL; - strsize_t xml_data_len; - strsize_t format_len; - unsigned int flags = 0; - - GET_CONNECTION_FROM_ARGS("rss", &zconn, &format, &format_len, &xml_data, &xml_data_len); - - config_data = virConnectDomainXMLToNative(conn->conn, format, xml_data, flags); - - if (config_data == NULL) { - set_error_if_unset("Cannot convert to native format from XML" TSRMLS_CC); - RETURN_FALSE; - } - - VIRT_RETVAL_STRING(config_data); - free(config_data); -} - -/* - * Function name: libvirt_domain_memory_peek - * Since version: 0.4.1(-1) - * Description: Function is used to get the domain's memory peek value - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * @start [int]: start - * @size [int]: size - * @flags [int]: optional flags - * Returns: domain memory peek - */ -PHP_FUNCTION(libvirt_domain_memory_peek) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - int retval; - zend_long flags = 0; - zend_long start; - zend_long size; - char *buff; - - GET_DOMAIN_FROM_ARGS("rlll", &zdomain, &start, &size, &flags); - if (start < 0) { - set_error("Negative argument start" TSRMLS_CC); - RETURN_FALSE; - } - buff = (char *)emalloc(size); - retval = virDomainMemoryPeek(domain->domain, start, size, buff, flags); - if (retval != 0) - RETURN_FALSE; - VIRT_RETVAL_STRINGL(buff, size); - efree(buff); -} - -/* - * Function name: libvirt_domain_memory_stats - * Since version: 0.4.1(-1) - * Description: Function is used to get the domain's memory stats - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * @flags [int]: optional flags - * Returns: domain memory stats array (same fields as virDomainMemoryStats, please see libvirt documentation) - */ -PHP_FUNCTION(libvirt_domain_memory_stats) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - int retval; - zend_long flags = 0; - int i; - struct _virDomainMemoryStat stats[VIR_DOMAIN_MEMORY_STAT_NR]; - - GET_DOMAIN_FROM_ARGS("r|l", &zdomain, &flags); - - retval = virDomainMemoryStats(domain->domain, stats, VIR_DOMAIN_MEMORY_STAT_NR, flags); - DPRINTF("%s: virDomainMemoryStats(%p...) returned %d\n", PHPFUNC, domain->domain, retval); - - if (retval == -1) - RETURN_FALSE; - LONGLONG_INIT; - array_init(return_value); - for (i = 0; i < retval; i++) - LONGLONG_INDEX(return_value, stats[i].tag, stats[i].val) -} - -/* - * Function name: libvirt_domain_update_device - * Since version: 0.4.1(-1) - * Description: Function is used to update the domain's devices from the XML string - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * @xml [string]: XML string for the update - * @flags [int]: Flags to update the device (VIR_DOMAIN_DEVICE_MODIFY_CURRENT, VIR_DOMAIN_DEVICE_MODIFY_LIVE, VIR_DOMAIN_DEVICE_MODIFY_CONFIG, VIR_DOMAIN_DEVICE_MODIFY_FORCE) - * Returns: TRUE for success, FALSE on error - */ -PHP_FUNCTION(libvirt_domain_update_device) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - char *xml; - strsize_t xml_len; - zend_long flags; - int res; - - GET_DOMAIN_FROM_ARGS("rsl", &zdomain, &xml, &xml_len, &flags); - - res = virDomainUpdateDeviceFlags(domain->domain, xml, flags); - DPRINTF("%s: virDomainUpdateDeviceFlags(%p) returned %d\n", PHPFUNC, domain->domain, res); - if (res != 0) - RETURN_FALSE; - - RETURN_TRUE; -} - -/* - * Function name: libvirt_domain_block_stats - * Since version: 0.4.1(-1) - * Description: Function is used to get the domain's block stats - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * @path [string]: device path to get statistics about - * Returns: domain block stats array, fields are rd_req, rd_bytes, wr_req, wr_bytes and errs - */ -PHP_FUNCTION(libvirt_domain_block_stats) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - int retval; - char *path; - strsize_t path_len; - - struct _virDomainBlockStats stats; - - GET_DOMAIN_FROM_ARGS("rs", &zdomain, &path, &path_len); - - retval = virDomainBlockStats(domain->domain, path, &stats, sizeof stats); - DPRINTF("%s: virDomainBlockStats(%p, %s, <stats>, <size>) returned %d\n", PHPFUNC, domain->domain, path, retval); - if (retval == -1) - RETURN_FALSE; - - array_init(return_value); - LONGLONG_INIT; - LONGLONG_ASSOC(return_value, "rd_req", stats.rd_req); - LONGLONG_ASSOC(return_value, "rd_bytes", stats.rd_bytes); - LONGLONG_ASSOC(return_value, "wr_req", stats.wr_req); - LONGLONG_ASSOC(return_value, "wr_bytes", stats.wr_bytes); - LONGLONG_ASSOC(return_value, "errs", stats.errs); -} - -/* - * Function name: libvirt_domain_block_resize - * Since version: 0.5.1(-1) - * Description: Function is used to resize the domain's block device - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * @path [string]: device path to resize - * @size [int]: size of device - * @flags [int]: bitwise-OR of VIR_DOMAIN_BLOCK_RESIZE_* - * Returns: true on success fail on error - */ -PHP_FUNCTION(libvirt_domain_block_resize) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - int retval; - char *path; - strsize_t path_len; - zend_long size = 0; - zend_long flags = 0; - - GET_DOMAIN_FROM_ARGS("rsl|l", &zdomain, &path, &path_len, &size, &flags); - - retval = virDomainBlockResize(domain->domain, path, size, flags); - if (retval == -1) - RETURN_FALSE; - - RETURN_TRUE; -} - -/* - * Function name: libvirt_domain_block_commit - * Since version: 0.5.2(-1) - * Description: Function is used to commit block job - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * @disk [string]: path to the block device, or device shorthand - * @base [string]: path to backing file to merge into, or device shorthand, or NULL for default - * @top [string]: path to file within backing chain that contains data to be merged, or device shorthand, or NULL to merge all possible data - * @bandwidth [int]: (optional) specify bandwidth limit; flags determine the unit - * @flags [int]: bitwise-OR of VIR_DOMAIN_BLOCK_COMMIT_* - * Returns: true on success fail on error - */ -PHP_FUNCTION(libvirt_domain_block_commit) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - int retval; - char *disk = NULL; - strsize_t disk_len; - char *base = NULL; - strsize_t base_len; - char *top = NULL; - strsize_t top_len; - zend_long bandwidth = 0; - zend_long flags = 0; - - GET_DOMAIN_FROM_ARGS("rs|ssll", &zdomain, &disk, &disk_len, &base, &base_len, &top, &top_len, &bandwidth, &flags); - if (strcmp(disk, "") == 0) - RETURN_FALSE; - if (strcmp(base, "") == 0) - base = NULL; - if (strcmp(top, "") == 0) - top = NULL; - - retval = virDomainBlockCommit(domain->domain, disk, base, top, bandwidth, flags); - if (retval == -1) - RETURN_FALSE; - - RETURN_TRUE; -} - - -/* - * Function name: libvirt_domain_block_job_info - * Since version: 0.5.2(-1) - * Description: Function is used to request block job information for the given disk - * Arguments: @dom [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * @disk [string]: path to the block device, or device shorthand - * @flags [int]: bitwise-OR of VIR_DOMAIN_BLOCK_COMMIT_* - * Returns: Array with status virDomainGetBlockJobInfo and blockjob information. -*/ -PHP_FUNCTION(libvirt_domain_block_job_info) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - int retval; - char *disk; - int disk_len; - long flags = 0; - virDomainBlockJobInfo info; - - GET_DOMAIN_FROM_ARGS("rs|l", &zdomain, &disk, &disk_len, &flags); - - retval = virDomainGetBlockJobInfo(domain->domain, disk, &info, flags); - - array_init(return_value); - add_assoc_long(return_value, "status", (int)retval); - add_assoc_long(return_value, "type", (int)info.type); - add_assoc_long(return_value, "bandwidth", (unsigned long)info.bandwidth); - add_assoc_long(return_value, "cur", (unsigned long long)info.cur); - add_assoc_long(return_value, "end", (unsigned long long)info.end); -} - - -/* - * Function name: libvirt_domain_block_job_abort - * Since version: 0.5.1(-1) - * Description: Function is used to abort block job - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * @path [string]: device path to resize - * @flags [int]: bitwise-OR of VIR_DOMAIN_BLOCK_JOB_ABORT_* - * Returns: true on success fail on error - */ -PHP_FUNCTION(libvirt_domain_block_job_abort) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - int retval; - char *path; - strsize_t path_len; - zend_long flags = 0; - - GET_DOMAIN_FROM_ARGS("rs|l", &zdomain, &path, &path_len, &flags); - - retval = virDomainBlockJobAbort(domain->domain, path, flags); - if (retval == -1) - RETURN_FALSE; - - RETURN_TRUE; -} - -/* - * Function name: libvirt_domain_block_job_set_speed - * Since version: 0.5.1(-1) - * Description: Function is used to set speed of block job - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * @path [string]: device path to resize - * @bandwidth [int]: bandwidth - * @flags [int]: bitwise-OR of VIR_DOMAIN_BLOCK_JOB_SPEED_BANDWIDTH_* - * Returns: true on success fail on error - */ -PHP_FUNCTION(libvirt_domain_block_job_set_speed) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - int retval; - char *path; - strsize_t path_len; - zend_long bandwidth = 0; - zend_long flags = 0; - - GET_DOMAIN_FROM_ARGS("rsl|l", &zdomain, &path, &path_len, &bandwidth, &flags); - - retval = virDomainBlockJobSetSpeed(domain->domain, path, bandwidth, flags); - if (retval == -1) - RETURN_FALSE; - - RETURN_TRUE; -} - - - -/* - * Function name: libvirt_domain_get_network_info - * Since version: 0.4.1(-1) - * Description: Function is used to get the domain's network information - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * @mac [string]: mac address of the network device - * Returns: domain network info array of MAC address, network name and type of NIC card - */ -PHP_FUNCTION(libvirt_domain_get_network_info) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - int retval; - char *mac; - char *xml; - char *tmp = NULL; - strsize_t mac_len; - char *xpath = NULL; - - GET_DOMAIN_FROM_ARGS("rs", &zdomain, &mac, &mac_len); - - /* Get XML for the domain */ - xml = virDomainGetXMLDesc(domain->domain, VIR_DOMAIN_XML_INACTIVE); - if (!xml) { - set_error("Cannot get domain XML" TSRMLS_CC); - RETURN_FALSE; - } - - DPRINTF("%s: Getting network information for NIC with MAC address '%s'\n", PHPFUNC, mac); - if (asprintf(&xpath, &quot;//domain/devices/interface[@type=&#39;network&#39;]/mac[@address=&#39;%s&#39;]/../source/(a)network&quot;, mac) < 0) { - set_error("Out of memory" TSRMLS_CC); - goto error; - } - tmp = get_string_from_xpath(xml, xpath, NULL, &retval); - if (tmp == NULL) { - set_error("Invalid XPath node for source network" TSRMLS_CC); - goto error; - } - - if (retval < 0) { - set_error("Cannot get XPath expression result for network source" TSRMLS_CC); - goto error; - } - - array_init(return_value); - VIRT_ADD_ASSOC_STRING(return_value, "mac", mac); - VIRT_ADD_ASSOC_STRING(return_value, "network", tmp); - - free(tmp); - free(xpath); - - if (asprintf(&xpath, &quot;//domain/devices/interface[@type=&#39;network&#39;]/mac[@address=&#39;%s&#39;]/../model/(a)type&quot;, mac) < 0) { - set_error("Out of memory" TSRMLS_CC); - goto error; - } - tmp = get_string_from_xpath(xml, xpath, NULL, &retval); - if ((tmp != NULL) && (retval > 0)) - VIRT_ADD_ASSOC_STRING(return_value, "nic_type", tmp); - else - VIRT_ADD_ASSOC_STRING(return_value, "nic_type", "default"); - - free(xml); - free(xpath); - free(tmp); - return; - - error: - free(xml); - free(xpath); - free(tmp); - RETURN_FALSE; -} - -/* - * Function name: libvirt_domain_get_block_info - * Since version: 0.4.1(-1) - * Description: Function is used to get the domain's block device information - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * @dev [string]: device to get block information about - * Returns: domain block device information array of device, file or partition, capacity, allocation and physical size - */ -PHP_FUNCTION(libvirt_domain_get_block_info) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - int retval; - char *dev; - char *xml; - char *tmp = NULL; - strsize_t dev_len; - int isFile; - char *xpath = NULL; - - struct _virDomainBlockInfo info; - - GET_DOMAIN_FROM_ARGS("rs", &zdomain, &dev, &dev_len); - - /* Get XML for the domain */ - xml = virDomainGetXMLDesc(domain->domain, VIR_DOMAIN_XML_INACTIVE); - if (!xml) { - set_error("Cannot get domain XML" TSRMLS_CC); - RETURN_FALSE; - } - - isFile = 0; - - if (asprintf(&xpath, &quot;//domain/devices/disk/target[@dev=&#39;%s&#39;]/../source/(a)dev&quot;, dev) < 0) { - set_error("Out of memory" TSRMLS_CC); - goto error; - } - tmp = get_string_from_xpath(xml, xpath, NULL, &retval); - if (retval < 0) { - set_error("Cannot get XPath expression result for device storage" TSRMLS_CC); - goto error; - } - - if (retval == 0) { - free(xpath); - if (asprintf(&xpath, &quot;//domain/devices/disk/target[@dev=&#39;%s&#39;]/../source/(a)file&quot;, dev) < 0) { - set_error("Out of memory" TSRMLS_CC); - goto error; - } - free(tmp); - tmp = get_string_from_xpath(xml, xpath, NULL, &retval); - if (retval < 0) { - set_error("Cannot get XPath expression result for file storage" TSRMLS_CC); - goto error; - } - isFile = 1; - } - - if (retval == 0) { - set_error("No relevant node found" TSRMLS_CC); - goto error; - } - - retval = virDomainGetBlockInfo(domain->domain, tmp, &info, 0); - if (retval == -1) { - set_error("Cannot get domain block information" TSRMLS_CC); - goto error; - } - - array_init(return_value); - LONGLONG_INIT; - VIRT_ADD_ASSOC_STRING(return_value, "device", dev); - - if (isFile) - VIRT_ADD_ASSOC_STRING(return_value, "file", tmp); - else - VIRT_ADD_ASSOC_STRING(return_value, "partition", tmp); - - free(xpath); - if (asprintf(&xpath, &quot;//domain/devices/disk/target[@dev=&#39;%s&#39;]/../driver/(a)type&quot;, dev) < 0) { - set_error("Out of memory" TSRMLS_CC); - goto error; - } - free(tmp); - tmp = get_string_from_xpath(xml, xpath, NULL, &retval); - if (tmp != NULL) - VIRT_ADD_ASSOC_STRING(return_value, "type", tmp); - - LONGLONG_ASSOC(return_value, "capacity", info.capacity); - LONGLONG_ASSOC(return_value, "allocation", info.allocation); - LONGLONG_ASSOC(return_value, "physical", info.physical); - - free(xpath); - free(tmp); - free(xml); - return; - - error: - free(xpath); - free(tmp); - free(xml); - RETURN_FALSE; -} - -/* - * Function name: libvirt_domain_xml_xpath - * Since version: 0.4.1(-1) - * Description: Function is used to get the result of xPath expression that's run against the domain - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * @xpath [string]: xPath expression to parse against the domain - * @flags [int]: optional flags - * Returns: result of the expression in an array - */ -PHP_FUNCTION(libvirt_domain_xml_xpath) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - zval *zpath; - char *xml; - char *tmp = NULL; - strsize_t path_len = -1; - zend_long flags = 0; - int rc = 0; - - GET_DOMAIN_FROM_ARGS("rs|l", &zdomain, &zpath, &path_len, &flags); - - xml = virDomainGetXMLDesc(domain->domain, flags); - if (!xml) - RETURN_FALSE; - - array_init(return_value); - - free(get_string_from_xpath(xml, (char *)zpath, &return_value, &rc)); - if (return_value < 0) { - free(xml); - RETURN_FALSE; - } - - free(tmp); - free(xml); - - if (rc == 0) - RETURN_FALSE; - - VIRT_ADD_ASSOC_STRING(return_value, "xpath", (char *)zpath); - if (rc < 0) - add_assoc_long(return_value, "error_code", (long)rc); -} - -/* - * Function name: libvirt_domain_interface_stats - * Since version: 0.4.1(-1) - * Description: Function is used to get the domain's interface stats - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * @path [string]: path to interface device - * Returns: interface stats array of {tx|rx}_{bytes|packets|errs|drop} fields - */ -PHP_FUNCTION(libvirt_domain_interface_stats) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - int retval; - char *path; - strsize_t path_len; - - struct _virDomainInterfaceStats stats; - - GET_DOMAIN_FROM_ARGS("rs", &zdomain, &path, &path_len); - - retval = virDomainInterfaceStats(domain->domain, path, &stats, sizeof stats); - DPRINTF("%s: virDomainInterfaceStats(%p, %s, <stats>, <size>) returned %d\n", PHPFUNC, domain->domain, path, retval); - if (retval == -1) - RETURN_FALSE; - - array_init(return_value); - LONGLONG_INIT; - LONGLONG_ASSOC(return_value, "rx_bytes", stats.rx_bytes); - LONGLONG_ASSOC(return_value, "rx_packets", stats.rx_packets); - LONGLONG_ASSOC(return_value, "rx_errs", stats.rx_errs); - LONGLONG_ASSOC(return_value, "rx_drop", stats.rx_drop); - LONGLONG_ASSOC(return_value, "tx_bytes", stats.tx_bytes); - LONGLONG_ASSOC(return_value, "tx_packets", stats.tx_packets); - LONGLONG_ASSOC(return_value, "tx_errs", stats.tx_errs); - LONGLONG_ASSOC(return_value, "tx_drop", stats.tx_drop); -} - -/* - * Function name: libvirt_domain_get_connect - * Since version: 0.4.1(-1) - * Description: Function is used to get the domain's connection resource. This function should *not* be used! - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * Returns: libvirt connection resource - */ -PHP_FUNCTION(libvirt_domain_get_connect) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - php_libvirt_connection *conn; - - DPRINTF("%s: Warning: libvirt_domain_get_connect() used. This function should not be used!\n", PHPFUNC); - - GET_DOMAIN_FROM_ARGS("r", &zdomain); - - conn = domain->conn; - if (conn->conn == NULL) - RETURN_FALSE; - - VIRT_RETURN_RESOURCE(conn->resource); - /* since we're returning already registered resource, bump refcount */ - Z_ADDREF_P(return_value); -} - -/* - * Function name: libvirt_domain_migrate_to_uri - * Since version: 0.4.1(-1) - * Description: Function is used migrate domain to another libvirt daemon specified by it's URI - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * @dest_uri [string]: destination URI to migrate to - * @flags [int]: migration flags - * @dname [string]: domain name to rename domain to on destination side - * @bandwidth [int]: migration bandwidth in Mbps - * Returns: TRUE for success, FALSE on error - */ -PHP_FUNCTION(libvirt_domain_migrate_to_uri) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - int retval; - long flags = 0; - char *duri; - strsize_t duri_len; - char *dname; - strsize_t dname_len; - zend_long bandwidth; - - dname = NULL; - dname_len = 0; - bandwidth = 0; - GET_DOMAIN_FROM_ARGS("rsl|sl", &zdomain, &duri, &duri_len, &flags, &dname, &dname_len, &bandwidth); - - retval = virDomainMigrateToURI(domain->domain, duri, flags, dname, bandwidth); - DPRINTF("%s: virDomainMigrateToURI() returned %d\n", PHPFUNC, retval); - - if (retval == 0) - RETURN_TRUE; - RETURN_FALSE; -} - -/* - * Function name: libvirt_domain_migrate_to_uri2 - * Since version: 0.4.6(-1) - * Description: Function is used migrate domain to another libvirt daemon specified by it's URI - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * @dconnuri [string]: URI for target libvirtd - * @miguri [string]: URI for invoking the migration - * @dxml [string]: XML config for launching guest on target - * @flags [int]: migration flags - * @dname [string]: domain name to rename domain to on destination side - * @bandwidth [int]: migration bandwidth in Mbps - * Returns: TRUE for success, FALSE on error - */ -PHP_FUNCTION(libvirt_domain_migrate_to_uri2) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - int retval; - char *dconnuri; - strsize_t dconnuri_len; - char *miguri; - strsize_t miguri_len; - char *dxml; - strsize_t dxml_len; - zend_long flags = 0; - char *dname; - strsize_t dname_len; - zend_long bandwidth; - - dconnuri = NULL; - dconnuri_len = 0; - miguri = NULL; - miguri_len = 0; - dxml = NULL; - dxml_len = 0; - dname = NULL; - dname_len = 0; - bandwidth = 0; - GET_DOMAIN_FROM_ARGS("r|ssslsl", &zdomain, &dconnuri, &dconnuri_len, &miguri, &miguri_len, &dxml, &dxml_len, &flags, &dname, &dname_len, &bandwidth); - - // set to NULL if empty string - if (dconnuri_len == 0) - dconnuri=NULL; - if (miguri_len == 0) - miguri=NULL; - if (dxml_len == 0) - dxml=NULL; - if (dname_len == 0) - dname=NULL; - - retval = virDomainMigrateToURI2(domain->domain, dconnuri, miguri, dxml, flags, dname, bandwidth); - DPRINTF("%s: virDomainMigrateToURI2() returned %d\n", PHPFUNC, retval); - - if (retval == 0) - RETURN_TRUE; - RETURN_FALSE; -} - -/* - * Function name: libvirt_domain_migrate - * Since version: 0.4.1(-1) - * Description: Function is used migrate domain to another domain - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * @dest_conn [string]: destination host connection object - * @flags [int]: migration flags - * @dname [string]: domain name to rename domain to on destination side - * @bandwidth [int]: migration bandwidth in Mbps - * Returns: libvirt domain resource for migrated domain - */ -PHP_FUNCTION(libvirt_domain_migrate) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - php_libvirt_connection *dconn = NULL; - zval *zdconn; - virDomainPtr destdomain = NULL; - php_libvirt_domain *res_domain; - - zend_long flags = 0; - char *dname; - strsize_t dname_len; - zend_long bandwidth; - - dname = NULL; - dname_len = 0; - bandwidth = 0; - - GET_DOMAIN_FROM_ARGS("rrl|sl", &zdomain, &zdconn, &flags, &dname, &dname_len, &bandwidth); - - if ((domain->domain == NULL) || (domain->conn->conn == NULL)) { - set_error("Domain object is not valid" TSRMLS_CC); - RETURN_FALSE; - } - - VIRT_FETCH_RESOURCE(dconn, php_libvirt_connection*, &zdconn, PHP_LIBVIRT_CONNECTION_RES_NAME, le_libvirt_connection); - if ((dconn == NULL) || (dconn->conn == NULL)) { - set_error("Destination connection object is not valid" TSRMLS_CC); - RETURN_FALSE; - } - - destdomain = virDomainMigrate(domain->domain, dconn->conn, flags, dname, NULL, bandwidth); - if (destdomain == NULL) - RETURN_FALSE; - - res_domain = (php_libvirt_domain *)emalloc(sizeof(php_libvirt_domain)); - res_domain->domain = destdomain; - res_domain->conn = dconn; - - DPRINTF("%s: returning %p\n", PHPFUNC, res_domain->domain); - resource_change_counter(INT_RESOURCE_DOMAIN, dconn->conn, res_domain->domain, 1 TSRMLS_CC); - - VIRT_REGISTER_RESOURCE(res_domain, le_libvirt_domain); -} - -/* - * Function name: libvirt_domain_get_job_info - * Since version: 0.4.1(-1) - * Description: Function is used get job information for the domain - * Arguments: @res [resource]: libvirt domain resource, e.g. from libvirt_domain_lookup_by_*() - * Returns: job information array of type, time, data, mem and file fields - */ -PHP_FUNCTION(libvirt_domain_get_job_info) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - int retval; - - struct _virDomainJobInfo jobinfo; - - GET_DOMAIN_FROM_ARGS("r", &zdomain); - - retval = virDomainGetJobInfo(domain->domain, &jobinfo); - if (retval == -1) - RETURN_FALSE; - - array_init(return_value); - LONGLONG_INIT; - add_assoc_long(return_value, "type", jobinfo.type); - LONGLONG_ASSOC(return_value, "time_elapsed", jobinfo.timeElapsed); - LONGLONG_ASSOC(return_value, "time_remaining", jobinfo.timeRemaining); - LONGLONG_ASSOC(return_value, "data_total", jobinfo.dataTotal); - LONGLONG_ASSOC(return_value, "data_processed", jobinfo.dataProcessed); - LONGLONG_ASSOC(return_value, "data_remaining", jobinfo.dataRemaining); - LONGLONG_ASSOC(return_value, "mem_total", jobinfo.memTotal); - LONGLONG_ASSOC(return_value, "mem_processed", jobinfo.memProcessed); - LONGLONG_ASSOC(return_value, "mem_remaining", jobinfo.memRemaining); - LONGLONG_ASSOC(return_value, "file_total", jobinfo.fileTotal); - LONGLONG_ASSOC(return_value, "file_processed", jobinfo.fileProcessed); - LONGLONG_ASSOC(return_value, "file_remaining", jobinfo.fileRemaining); -} - -/* - * Function name: libvirt_domain_has_current_snapshot - * Since version: 0.4.1(-2) - * Description: Function is used to get the information whether domain has the current snapshot - * Arguments: @res [resource]: libvirt domain resource - * @flags [int]: libvirt snapshot flags - * Returns: TRUE is domain has the current snapshot, otherwise FALSE (you may need to check for error using libvirt_get_last_error()) - */ -PHP_FUNCTION(libvirt_domain_has_current_snapshot) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - int retval; - zend_long flags = 0; - - GET_DOMAIN_FROM_ARGS("r|l", &zdomain, &flags); - - retval = virDomainHasCurrentSnapshot(domain->domain, flags); - if (retval <= 0) - RETURN_FALSE; - RETURN_TRUE; -} - -/* - * Function name: libvirt_domain_snapshot_lookup_by_name - * Since version: 0.4.1(-2) - * Description: This functions is used to lookup for the snapshot by it's name - * Arguments: @res [resource]: libvirt domain resource - * @name [string]: name of the snapshot to get the resource - * @flags [int]: libvirt snapshot flags - * Returns: domain snapshot resource - */ -PHP_FUNCTION(libvirt_domain_snapshot_lookup_by_name) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - strsize_t name_len; - char *name = NULL; - zend_long flags = 0; - php_libvirt_snapshot *res_snapshot; - virDomainSnapshotPtr snapshot = NULL; - - GET_DOMAIN_FROM_ARGS("rs|l", &zdomain, &name, &name_len, &flags); - - if ((name == NULL) || (name_len < 1)) - RETURN_FALSE; - snapshot=virDomainSnapshotLookupByName(domain->domain, name, flags); - if (snapshot == NULL) - RETURN_FALSE; - - res_snapshot = (php_libvirt_snapshot *)emalloc(sizeof(php_libvirt_snapshot)); - res_snapshot->domain = domain; - res_snapshot->snapshot = snapshot; - - DPRINTF("%s: returning %p\n", PHPFUNC, res_snapshot->snapshot); - resource_change_counter(INT_RESOURCE_SNAPSHOT, domain->conn->conn, res_snapshot->snapshot, 1 TSRMLS_CC); - - VIRT_REGISTER_RESOURCE(res_snapshot, le_libvirt_snapshot); -} - -/* - * Function name: libvirt_domain_snapshot_create - * Since version: 0.4.1(-2) - * Description: This function creates the domain snapshot for the domain identified by it's resource - * Arguments: @res [resource]: libvirt domain resource - * @flags [int]: libvirt snapshot flags - * Returns: domain snapshot resource - */ -PHP_FUNCTION(libvirt_domain_snapshot_create) -{ - php_libvirt_domain *domain = NULL; - php_libvirt_snapshot *res_snapshot; - zval *zdomain; - virDomainSnapshotPtr snapshot = NULL; - zend_long flags = 0; - - GET_DOMAIN_FROM_ARGS("r|l", &zdomain, &flags); - - snapshot = virDomainSnapshotCreateXML(domain->domain, "<domainsnapshot/>", flags); - DPRINTF("%s: virDomainSnapshotCreateXML(%p, <xml>) returned %p\n", PHPFUNC, domain->domain, snapshot); - if (snapshot == NULL) - RETURN_FALSE; - - res_snapshot = (php_libvirt_snapshot *)emalloc(sizeof(php_libvirt_snapshot)); - res_snapshot->domain = domain; - res_snapshot->snapshot = snapshot; - - DPRINTF("%s: returning %p\n", PHPFUNC, res_snapshot->snapshot); - resource_change_counter(INT_RESOURCE_SNAPSHOT, domain->conn->conn, res_snapshot->snapshot, 1 TSRMLS_CC); - - VIRT_REGISTER_RESOURCE(res_snapshot, le_libvirt_snapshot); -} - -/* - * Function name: libvirt_domain_snapshot_get_xml - * Since version: 0.4.1(-2) - * Description: Function is used to get the XML description of the snapshot identified by it's resource - * Arguments: @res [resource]: libvirt snapshot resource - * @flags [int]: libvirt snapshot flags - * Returns: XML description string for the snapshot - */ -PHP_FUNCTION(libvirt_domain_snapshot_get_xml) -{ - char *xml; - zval *zsnapshot; - php_libvirt_snapshot *snapshot; - zend_long flags = 0; - - GET_SNAPSHOT_FROM_ARGS("r|l", &zsnapshot, &flags); - - xml = virDomainSnapshotGetXMLDesc(snapshot->snapshot, flags); - if (xml == NULL) - RETURN_FALSE; - - VIRT_RETVAL_STRING(xml); - free(xml); -} - -/* - * Function name: libvirt_domain_snapshot_revert - * Since version: 0.4.1(-2) - * Description: Function is used to revert the domain state to the state identified by the snapshot - * Arguments: @res [resource]: libvirt snapshot resource - * @flags [int]: libvirt snapshot flags - * Returns: TRUE on success, FALSE on error - */ -PHP_FUNCTION(libvirt_domain_snapshot_revert) -{ - zval *zsnapshot; - php_libvirt_snapshot *snapshot; - int ret; - zend_long flags = 0; - - GET_SNAPSHOT_FROM_ARGS("r|l", &zsnapshot, &flags); - - ret = virDomainRevertToSnapshot(snapshot->snapshot, flags); - DPRINTF("%s: virDomainRevertToSnapshot(%p, 0) returned %d\n", PHPFUNC, snapshot->snapshot, ret); - if (ret == -1) - RETURN_FALSE; - RETURN_TRUE; -} - -/* - * Function name: libvirt_domain_snapshot_delete - * Since version: 0.4.1(-2) - * Description: Function is used to revert the domain state to the state identified by the snapshot - * Arguments: @res [resource]: libvirt snapshot resource - * @flags [int]: 0 to delete just snapshot, VIR_SNAPSHOT_DELETE_CHILDREN to delete snapshot children as well - * Returns: TRUE on success, FALSE on error - */ -PHP_FUNCTION(libvirt_domain_snapshot_delete) -{ - zval *zsnapshot; - php_libvirt_snapshot *snapshot; - zend_long flags = 0; - int retval; - - GET_SNAPSHOT_FROM_ARGS("r|l", &zsnapshot, &flags); - - retval = virDomainSnapshotDelete(snapshot->snapshot, flags); - DPRINTF("%s: virDomainSnapshotDelete(%p, %d) returned %d\n", PHPFUNC, snapshot->snapshot, (int) flags, retval); - if (retval == -1) - RETURN_FALSE; - RETURN_TRUE; -} - -/* - * Function name: libvirt_list_domain_snapshots - * Since version: 0.4.1(-2) - * Description: Function is used to list domain snapshots for the domain specified by it's resource - * Arguments: @res [resource]: libvirt domain resource - * @flags [int]: libvirt snapshot flags - * Returns: libvirt domain snapshot names array - */ -PHP_FUNCTION(libvirt_list_domain_snapshots) -{ - php_libvirt_domain *domain = NULL; - zval *zdomain; - int count = -1; - int expectedcount = -1; - char **names; - zend_long flags = 0; - int i; - - GET_DOMAIN_FROM_ARGS("r|l", &zdomain, &flags); - - expectedcount = virDomainSnapshotNum(domain->domain, flags); - DPRINTF("%s: virDomainSnapshotNum(%p, 0) returned %d\n", PHPFUNC, domain->domain, expectedcount); - - if (expectedcount != -1) { - names = (char **)emalloc(expectedcount * sizeof(char *)); - count = virDomainSnapshotListNames(domain->domain, names, expectedcount, 0); - } + if (expectedcount != -1) { + names = (char **)emalloc(expectedcount * sizeof(char *)); + count = virDomainSnapshotListNames(domain->domain, names, expectedcount, 0); + } if ((count != expectedcount) || (count < 0)) { RETURN_FALSE; @@ -7217,271 +4053,6 @@ PHP_FUNCTION(libvirt_list_inactive_storagepools) } /* - * Function name: libvirt_list_domains - * Since version: 0.4.1(-1) - * Description: Function is used to list domains on the connection - * Arguments: @res [resource]: libvirt connection resource - * Returns: libvirt domain names array for the connection - */ -PHP_FUNCTION(libvirt_list_domains) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - int count = -1; - int expectedcount = -1; - int *ids; - char **names; - const char *name; - int i, rv; - virDomainPtr domain = NULL; - - GET_CONNECTION_FROM_ARGS("r", &zconn); - - if ((expectedcount = virConnectNumOfDomains(conn->conn)) < 0) - RETURN_FALSE; - - DPRINTF("%s: Found %d domains\n", PHPFUNC, expectedcount); - - ids = (int *)emalloc(sizeof(int) * expectedcount); - count = virConnectListDomains(conn->conn, ids, expectedcount); - DPRINTF("%s: virConnectListDomains returned %d domains\n", PHPFUNC, count); - - array_init(return_value); - for (i = 0; i < count; i++) { - domain = virDomainLookupByID(conn->conn, ids[i]); - resource_change_counter(INT_RESOURCE_DOMAIN, conn->conn, domain, 1 TSRMLS_CC); - if (domain != NULL) { - name = virDomainGetName(domain); - if (name != NULL) { - DPRINTF("%s: Found running domain %s with ID = %d\n", PHPFUNC, name, ids[i]); - VIRT_ADD_NEXT_INDEX_STRING(return_value, name); - } else { - DPRINTF("%s: Cannot get ID for running domain %d\n", PHPFUNC, ids[i]); - } - } - rv = virDomainFree(domain); - if (rv != 0) { - php_error_docref(NULL TSRMLS_CC, E_WARNING, "virDomainFree failed with %i on list_domain: %s", - rv, LIBVIRT_G(last_error)); - } else { - resource_change_counter(INT_RESOURCE_DOMAIN, conn->conn, domain, 0 TSRMLS_CC); - } - domain = NULL; - } - efree(ids); - - expectedcount = virConnectNumOfDefinedDomains(conn->conn); - DPRINTF("%s: virConnectNumOfDefinedDomains returned %d domains\n", PHPFUNC, expectedcount); - if (expectedcount < 0) { - DPRINTF("%s: virConnectNumOfDefinedDomains failed with error code %d\n", PHPFUNC, expectedcount); - RETURN_FALSE; - } - - names = (char **)emalloc(expectedcount*sizeof(char *)); - count = virConnectListDefinedDomains(conn->conn, names, expectedcount); - DPRINTF("%s: virConnectListDefinedDomains returned %d domains\n", PHPFUNC, count); - if (count < 0) { - DPRINTF("%s: virConnectListDefinedDomains failed with error code %d\n", PHPFUNC, count); - RETURN_FALSE; - } - - for (i = 0; i < count; i++) { - VIRT_ADD_NEXT_INDEX_STRING(return_value, names[i]); - DPRINTF("%s: Found inactive domain %s\n", PHPFUNC, names[i]); - free(names[i]); - } - efree(names); -} - -/* - * Function name: libvirt_list_domain_resources - * Since version: 0.4.1(-1) - * Description: Function is used to list domain resources on the connection - * Arguments: @res [resource]: libvirt connection resource - * Returns: libvirt domain resources array for the connection - */ -PHP_FUNCTION(libvirt_list_domain_resources) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - int count = -1; - int expectedcount = -1; - int *ids; - char **names; - int i; - - virDomainPtr domain = NULL; - php_libvirt_domain *res_domain; - - GET_CONNECTION_FROM_ARGS("r", &zconn); - - if ((expectedcount = virConnectNumOfDomains(conn->conn)) < 0) - RETURN_FALSE; - - ids = (int *)emalloc(sizeof(int) * expectedcount); - count = virConnectListDomains(conn->conn, ids, expectedcount); - if ((count != expectedcount) || (count < 0)) { - efree(ids); - RETURN_FALSE; - } - array_init(return_value); - for (i = 0; i < count; i++) { - domain = virDomainLookupByID(conn->conn, ids[i]); - if (domain != NULL) { - res_domain = (php_libvirt_domain *)emalloc(sizeof(php_libvirt_domain)); - res_domain->domain = domain; - - res_domain->conn = conn; - - VIRT_REGISTER_LIST_RESOURCE(domain); - resource_change_counter(INT_RESOURCE_DOMAIN, conn->conn, res_domain->domain, 1 TSRMLS_CC); - } - } - efree(ids); - - if ((expectedcount = virConnectNumOfDefinedDomains(conn->conn)) < 0) - RETURN_FALSE; - - names = (char **)emalloc(expectedcount*sizeof(char *)); - count = virConnectListDefinedDomains(conn->conn, names, expectedcount); - if ((count != expectedcount) || (count < 0)) { - efree(names); - RETURN_FALSE; - } - for (i = 0; i < count; i++) { - domain = virDomainLookupByName(conn->conn, names[i]); - if (domain != NULL) { - res_domain = (php_libvirt_domain *)emalloc(sizeof(php_libvirt_domain)); - res_domain->domain = domain; - - res_domain->conn = conn; - - VIRT_REGISTER_LIST_RESOURCE(domain); - resource_change_counter(INT_RESOURCE_DOMAIN, conn->conn, res_domain->domain, 1 TSRMLS_CC); - } - free(names[i]); - } - efree(names); -} - -/* - * Function name: libvirt_list_active_domain_ids - * Since version: 0.4.1(-1) - * Description: Function is used to list active domain IDs on the connection - * Arguments: @res [resource]: libvirt connection resource - * Returns: libvirt active domain ids array for the connection - */ -PHP_FUNCTION(libvirt_list_active_domain_ids) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - int count = -1; - int expectedcount = -1; - int *ids; - int i; - - GET_CONNECTION_FROM_ARGS("r", &zconn); - - if ((expectedcount = virConnectNumOfDomains(conn->conn)) < 0) - RETURN_FALSE; - - ids = (int *)emalloc(sizeof(int) * expectedcount); - count = virConnectListDomains(conn->conn, ids, expectedcount); - if ((count != expectedcount) || (count < 0)) { - efree(ids); - RETURN_FALSE; - } - array_init(return_value); - for (i = 0; i < count; i++) - add_next_index_long(return_value, ids[i]); - efree(ids); -} - -/* - * Function name: libvirt_list_active_domains - * Since version: 0.4.1(-1) - * Description: Function is used to list active domain names on the connection - * Arguments: @res [resource]: libvirt connection resource - * Returns: libvirt active domain names array for the connection - */ -PHP_FUNCTION(libvirt_list_active_domains) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - int count = -1; - int expectedcount = -1; - int *ids; - int i; - virDomainPtr domain = NULL; - const char *name; - - GET_CONNECTION_FROM_ARGS("r", &zconn); - - if ((expectedcount = virConnectNumOfDomains(conn->conn)) < 0) - RETURN_FALSE; - - ids = (int *)emalloc(sizeof(int) * expectedcount); - count = virConnectListDomains(conn->conn, ids, expectedcount); - if ((count != expectedcount) || (count < 0)) { - efree(ids); - RETURN_FALSE; - } - - array_init(return_value); - for (i = 0; i < count; i++) { - domain = virDomainLookupByID(conn->conn, ids[i]); - if (domain != NULL) { - if (!(name = virDomainGetName(domain))) { - efree(ids); - RETURN_FALSE; - } - - VIRT_ADD_NEXT_INDEX_STRING(return_value, name); - - if (virDomainFree(domain)) - resource_change_counter(INT_RESOURCE_DOMAIN, conn->conn, domain, 0 TSRMLS_CC); - } - } - efree(ids); -} - -/* - * Function name: libvirt_list_inactive_domains - * Since version: 0.4.1(-1) - * Description: Function is used to list inactive domain names on the connection - * Arguments: @res [resource]: libvirt connection resource - * Returns: libvirt inactive domain names array for the connection - */ -PHP_FUNCTION(libvirt_list_inactive_domains) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - int count = -1; - int expectedcount = -1; - char **names; - int i; - - GET_CONNECTION_FROM_ARGS("r", &zconn); - - if ((expectedcount = virConnectNumOfDefinedDomains(conn->conn)) < 0) - RETURN_FALSE; - - names = (char **)emalloc(expectedcount*sizeof(char *)); - count = virConnectListDefinedDomains(conn->conn, names, expectedcount); - if ((count != expectedcount) || (count < 0)) { - efree(names); - RETURN_FALSE; - } - - array_init(return_value); - for (i = 0; i < count; i++) { - VIRT_ADD_NEXT_INDEX_STRING(return_value, names[i]); - free(names[i]); - } - efree(names); -} - -/* * Function name: libvirt_list_all_networks * Since version: 0.5.3 * Description: Function is used to list networks on the connection diff --git a/src/libvirt-php.h b/src/libvirt-php.h index 49bcdc9..0752c6e 100644 --- a/src/libvirt-php.h +++ b/src/libvirt-php.h @@ -107,21 +107,7 @@ typedef uint64_t arch_uint; #define PHP_LIBVIRT_WORLD_VERSION VERSION #define PHP_LIBVIRT_WORLD_EXTNAME "libvirt" -/* Domain flags */ -#define DOMAIN_FLAG_FEATURE_ACPI 0x01 -#define DOMAIN_FLAG_FEATURE_APIC 0x02 -#define DOMAIN_FLAG_FEATURE_PAE 0x04 -#define DOMAIN_FLAG_CLOCK_LOCALTIME 0x08 -#define DOMAIN_FLAG_TEST_LOCAL_VNC 0x10 -#define DOMAIN_FLAG_SOUND_AC97 0x20 - -/* Domain disk flags */ -#define DOMAIN_DISK_FILE 0x01 -#define DOMAIN_DISK_BLOCK 0x02 -#define DOMAIN_DISK_ACCESS_ALL 0x04 - /* Internal resource identifier objects */ -#define INT_RESOURCE_DOMAIN 0x02 #define INT_RESOURCE_NETWORK 0x04 #define INT_RESOURCE_NODEDEV 0x08 #define INT_RESOURCE_STORAGEPOOL 0x10 @@ -156,15 +142,11 @@ typedef struct tVMNetwork { char *model; } tVMNetwork; -/* TODO: temporary forward declaration until other parts are "modularized" */ +/* TODO: temporary forward declarations until other parts are "modularized" */ typedef struct _php_libvirt_connection php_libvirt_connection; +typedef struct _php_libvirt_domain php_libvirt_domain; /* Libvirt-php types */ -typedef struct _php_libvirt_domain { - virDomainPtr domain; - php_libvirt_connection* conn; -} php_libvirt_domain; - typedef struct _php_libvirt_snapshot { virDomainSnapshotPtr snapshot; php_libvirt_domain* domain; @@ -219,10 +201,13 @@ ZEND_DECLARE_MODULE_GLOBALS(libvirt) /* Private definitions */ void set_error(char *msg TSRMLS_DC); +void set_error_if_unset(char *msg TSRMLS_DC); void reset_error(TSRMLS_D); int count_resources(int type TSRMLS_DC); -int resource_change_counter(int type, virConnectPtr conn, void *mem, int inc TSRMLS_DC); -int check_resource_allocation(virConnectPtr conn, int type, void *mem TSRMLS_DC); +int resource_change_counter(int type, virConnectPtr conn, void *mem, + int inc TSRMLS_DC); +int check_resource_allocation(virConnectPtr conn, int type, + void *mem TSRMLS_DC); void free_resource(int type, void *mem TSRMLS_DC); char *connection_get_emulator(virConnectPtr conn, char *arch TSRMLS_DC); int is_local_connection(virConnectPtr conn); @@ -231,8 +216,18 @@ void free_tokens(tTokenizer t); int set_logfile(char *filename, long maxsize TSRMLS_DC); char *get_string_from_xpath(char *xml, char *xpath, zval **val, int *retVal); char **get_array_from_xpath(char *xml, char *xpath, int *num); +void parse_array(zval *arr, tVMDisk *disk, tVMNetwork *network); +char *installation_get_xml(int step, virConnectPtr conn, char *name, int memMB, + int maxmemMB, char *arch, char *uuid, int vCpus, + char *iso_image, tVMDisk *disks, int numDisks, + tVMNetwork *networks, int numNetworks, + int domain_flags TSRMLS_DC); +void set_vnc_location(char *msg TSRMLS_DC); +int streamSink(virStreamPtr st ATTRIBUTE_UNUSED, + const char *bytes, size_t nbytes, void *opaque); +const char *get_feature_binary(const char *name); +long get_next_free_numeric_value(virDomainPtr domain, char *xpath); -#define PHP_LIBVIRT_DOMAIN_RES_NAME "Libvirt domain" #define PHP_LIBVIRT_STORAGEPOOL_RES_NAME "Libvirt storagepool" #define PHP_LIBVIRT_VOLUME_RES_NAME "Libvirt volume" #define PHP_LIBVIRT_NETWORK_RES_NAME "Libvirt virtual network" @@ -248,79 +243,6 @@ PHP_MINFO_FUNCTION(libvirt); /* Common functions */ PHP_FUNCTION(libvirt_get_last_error); -/* Domain functions */ -PHP_FUNCTION(libvirt_domain_new); -PHP_FUNCTION(libvirt_domain_new_get_vnc); -PHP_FUNCTION(libvirt_domain_get_counts); -PHP_FUNCTION(libvirt_domain_is_persistent); -PHP_FUNCTION(libvirt_domain_lookup_by_name); -PHP_FUNCTION(libvirt_domain_get_xml_desc); -PHP_FUNCTION(libvirt_domain_get_disk_devices); -PHP_FUNCTION(libvirt_domain_get_interface_devices); -PHP_FUNCTION(libvirt_domain_get_screenshot); -PHP_FUNCTION(libvirt_domain_get_screenshot_api); -PHP_FUNCTION(libvirt_domain_get_screen_dimensions); -PHP_FUNCTION(libvirt_domain_change_vcpus); -PHP_FUNCTION(libvirt_domain_change_memory); -PHP_FUNCTION(libvirt_domain_change_boot_devices); -PHP_FUNCTION(libvirt_domain_disk_add); -PHP_FUNCTION(libvirt_domain_disk_remove); -PHP_FUNCTION(libvirt_domain_nic_add); -PHP_FUNCTION(libvirt_domain_nic_remove); -PHP_FUNCTION(libvirt_domain_attach_device); -PHP_FUNCTION(libvirt_domain_detach_device); -PHP_FUNCTION(libvirt_domain_get_info); -PHP_FUNCTION(libvirt_domain_get_uuid); -PHP_FUNCTION(libvirt_domain_get_uuid_string); -PHP_FUNCTION(libvirt_domain_get_name); -PHP_FUNCTION(libvirt_domain_get_id); -PHP_FUNCTION(libvirt_domain_lookup_by_id); -PHP_FUNCTION(libvirt_domain_lookup_by_uuid); -PHP_FUNCTION(libvirt_domain_lookup_by_uuid_string); -PHP_FUNCTION(libvirt_domain_destroy); -PHP_FUNCTION(libvirt_domain_create); -PHP_FUNCTION(libvirt_domain_resume); -PHP_FUNCTION(libvirt_domain_core_dump); -PHP_FUNCTION(libvirt_domain_shutdown); -PHP_FUNCTION(libvirt_domain_suspend); -PHP_FUNCTION(libvirt_domain_managedsave); -PHP_FUNCTION(libvirt_domain_undefine); -PHP_FUNCTION(libvirt_domain_reboot); -PHP_FUNCTION(libvirt_domain_define_xml); -PHP_FUNCTION(libvirt_domain_create_xml); -PHP_FUNCTION(libvirt_domain_xml_from_native); -PHP_FUNCTION(libvirt_domain_xml_to_native); -PHP_FUNCTION(libvirt_domain_set_max_memory); -PHP_FUNCTION(libvirt_domain_set_memory); -PHP_FUNCTION(libvirt_domain_set_memory_flags); -PHP_FUNCTION(libvirt_domain_memory_peek); -PHP_FUNCTION(libvirt_domain_memory_stats); -PHP_FUNCTION(libvirt_domain_update_device); -PHP_FUNCTION(libvirt_domain_block_commit); -PHP_FUNCTION(libvirt_domain_block_stats); -PHP_FUNCTION(libvirt_domain_block_resize); -PHP_FUNCTION(libvirt_domain_block_job_abort); -PHP_FUNCTION(libvirt_domain_block_job_set_speed); -PHP_FUNCTION(libvirt_domain_block_job_info); -PHP_FUNCTION(libvirt_domain_interface_stats); -PHP_FUNCTION(libvirt_domain_get_connect); -PHP_FUNCTION(libvirt_domain_migrate); -PHP_FUNCTION(libvirt_domain_get_job_info); -PHP_FUNCTION(libvirt_domain_xml_xpath); -PHP_FUNCTION(libvirt_domain_get_block_info); -PHP_FUNCTION(libvirt_domain_get_network_info); -PHP_FUNCTION(libvirt_domain_migrate_to_uri); -PHP_FUNCTION(libvirt_domain_migrate_to_uri2); -PHP_FUNCTION(libvirt_domain_get_autostart); -PHP_FUNCTION(libvirt_domain_set_autostart); -PHP_FUNCTION(libvirt_domain_is_active); -PHP_FUNCTION(libvirt_domain_get_next_dev_ids); -PHP_FUNCTION(libvirt_domain_send_keys); -PHP_FUNCTION(libvirt_domain_send_key_api); -PHP_FUNCTION(libvirt_domain_send_pointer_event); -PHP_FUNCTION(libvirt_domain_get_metadata); -PHP_FUNCTION(libvirt_domain_set_metadata); -PHP_FUNCTION(libvirt_domain_qemu_agent_command); /* Domain snapshot functions */ PHP_FUNCTION(libvirt_domain_has_current_snapshot); PHP_FUNCTION(libvirt_domain_snapshot_create); @@ -395,12 +317,7 @@ PHP_FUNCTION(libvirt_list_all_networks); PHP_FUNCTION(libvirt_list_networks); PHP_FUNCTION(libvirt_list_all_nwfilters); PHP_FUNCTION(libvirt_list_nwfilters); -PHP_FUNCTION(libvirt_list_domains); PHP_FUNCTION(libvirt_list_domain_snapshots); -PHP_FUNCTION(libvirt_list_domain_resources); -PHP_FUNCTION(libvirt_list_active_domains); -PHP_FUNCTION(libvirt_list_active_domain_ids); -PHP_FUNCTION(libvirt_list_inactive_domains); PHP_FUNCTION(libvirt_list_storagepools); PHP_FUNCTION(libvirt_list_active_storagepools); PHP_FUNCTION(libvirt_list_inactive_storagepools); -- 2.13.3

--- src/Makefile.am | 3 +- src/libvirt-php.c | 1188 +------------------------------------------------ src/libvirt-php.h | 49 -- src/libvirt-storage.c | 1130 ++++++++++++++++++++++++++++++++++++++++++++++ src/libvirt-storage.h | 137 ++++++ 5 files changed, 1271 insertions(+), 1236 deletions(-) create mode 100644 src/libvirt-storage.c create mode 100644 src/libvirt-storage.h diff --git a/src/Makefile.am b/src/Makefile.am index 4ae01db..32b23cf 100644 --- a/src/Makefile.am +++ b/src/Makefile.am @@ -26,7 +26,8 @@ libvirt_php_la_SOURCES = \ libvirt-node.c libvirt-node.h \ libvirt-stream.c libvirt-stream.h \ libvirt-domain.c libvirt-domain.h \ - libvirt-network.c libvirt-network.h + libvirt-network.c libvirt-network.h \ + libvirt-storage.c libvirt-storage.h libvirt_php_la_CFLAGS = \ $(AM_CFLAGS) \ -DCOMPILE_DL_LIBVIRT=1 diff --git a/src/libvirt-php.c b/src/libvirt-php.c index e3e5554..a4108a6 100644 --- a/src/libvirt-php.c +++ b/src/libvirt-php.c @@ -24,6 +24,7 @@ #include "libvirt-stream.h" #include "libvirt-domain.h" #include "libvirt-network.h" +#include "libvirt-storage.h" DEBUG_INIT("core"); @@ -37,8 +38,6 @@ const char *features_binaries[] = { NULL }; #endif /* ZEND thread safe per request globals definition */ -int le_libvirt_storagepool; -int le_libvirt_volume; int le_libvirt_nodedev; int le_libvirt_snapshot; int le_libvirt_nwfilter; @@ -484,38 +483,7 @@ static zend_function_entry libvirt_functions[] = { PHP_FE(libvirt_domain_snapshot_revert, arginfo_libvirt_conn_optflags) PHP_FE(libvirt_domain_snapshot_delete, arginfo_libvirt_conn_optflags) PHP_FE(libvirt_domain_snapshot_lookup_by_name, arginfo_libvirt_domain_snapshot_lookup_by_name) - /* Storagepool functions */ - PHP_FE(libvirt_storagepool_lookup_by_name, arginfo_libvirt_conn_name) - PHP_FE(libvirt_storagepool_lookup_by_volume, arginfo_libvirt_conn) - PHP_FE(libvirt_storagepool_get_info, arginfo_libvirt_conn) - PHP_FE(libvirt_storagevolume_lookup_by_name, arginfo_libvirt_conn_name) - PHP_FE(libvirt_storagevolume_lookup_by_path, arginfo_libvirt_storagevolume_lookup_by_path) - PHP_FE(libvirt_storagevolume_get_name, arginfo_libvirt_conn) - PHP_FE(libvirt_storagevolume_get_path, arginfo_libvirt_conn) - PHP_FE(libvirt_storagevolume_get_info, arginfo_libvirt_conn) - PHP_FE(libvirt_storagevolume_get_xml_desc, arginfo_libvirt_storagevolume_get_xml_desc) - PHP_FE(libvirt_storagevolume_create_xml, arginfo_libvirt_conn_xml) - PHP_FE(libvirt_storagevolume_create_xml_from,arginfo_libvirt_storagevolume_create_xml_from) - PHP_FE(libvirt_storagevolume_delete, arginfo_libvirt_conn_optflags) - PHP_FE(libvirt_storagevolume_download, arginfo_libvirt_storagevolume_download) - PHP_FE(libvirt_storagevolume_upload, arginfo_libvirt_storagevolume_download) - PHP_FE(libvirt_storagevolume_resize, arginfo_libvirt_storagevolume_resize) - PHP_FE(libvirt_storagepool_get_uuid_string, arginfo_libvirt_conn) - PHP_FE(libvirt_storagepool_get_name, arginfo_libvirt_conn) - PHP_FE(libvirt_storagepool_lookup_by_uuid_string, arginfo_libvirt_conn_uuid) - PHP_FE(libvirt_storagepool_get_xml_desc, arginfo_libvirt_conn_xpath) - PHP_FE(libvirt_storagepool_define_xml, arginfo_libvirt_storagepool_define_xml) - PHP_FE(libvirt_storagepool_undefine, arginfo_libvirt_conn) - PHP_FE(libvirt_storagepool_create, arginfo_libvirt_conn) - PHP_FE(libvirt_storagepool_destroy, arginfo_libvirt_conn) - PHP_FE(libvirt_storagepool_is_active, arginfo_libvirt_conn) - PHP_FE(libvirt_storagepool_get_volume_count, arginfo_libvirt_conn) - PHP_FE(libvirt_storagepool_refresh, arginfo_libvirt_conn_optflags) - PHP_FE(libvirt_storagepool_set_autostart, arginfo_libvirt_conn_flags) - PHP_FE(libvirt_storagepool_get_autostart, arginfo_libvirt_conn) - PHP_FE(libvirt_storagepool_build, arginfo_libvirt_conn) - PHP_FE(libvirt_storagepool_delete, arginfo_libvirt_conn) - /* Network functions */ + PHP_FE_LIBVIRT_STORAGE PHP_FE_LIBVIRT_NETWORK PHP_FE_LIBVIRT_NODE /* Nodedev functions */ @@ -536,10 +504,6 @@ static zend_function_entry libvirt_functions[] = { /* List functions */ PHP_FE(libvirt_list_domain_snapshots, arginfo_libvirt_conn_optflags) PHP_FE(libvirt_list_nodedevs, arginfo_libvirt_conn_optcap) - PHP_FE(libvirt_list_storagepools, arginfo_libvirt_conn) - PHP_FE(libvirt_list_active_storagepools, arginfo_libvirt_conn) - PHP_FE(libvirt_list_inactive_storagepools, arginfo_libvirt_conn) - PHP_FE(libvirt_storagepool_list_volumes, arginfo_libvirt_conn) PHP_FE(libvirt_list_all_nwfilters, arginfo_libvirt_conn) PHP_FE(libvirt_list_nwfilters, arginfo_libvirt_conn) /* Version information and common function */ @@ -577,7 +541,6 @@ zend_module_entry libvirt_module_entry = { ZEND_GET_MODULE(libvirt) #endif - /* PHP init options */ PHP_INI_BEGIN() STD_PHP_INI_ENTRY("libvirt.longlong_to_string", "1", PHP_INI_ALL, OnUpdateBool, longlong_to_string_ini, zend_libvirt_globals, libvirt_globals) @@ -1222,60 +1185,6 @@ int is_local_connection(virConnectPtr conn) #endif } -/* Destructor for storagepool resource */ -static void php_libvirt_storagepool_dtor(virt_resource *rsrc TSRMLS_DC) -{ - php_libvirt_storagepool *pool = (php_libvirt_storagepool *)rsrc->ptr; - int rv = 0; - - if (pool != NULL) { - if (pool->pool != NULL) { - if (!check_resource_allocation(NULL, INT_RESOURCE_STORAGEPOOL, pool->pool TSRMLS_CC)) { - pool->pool = NULL; - efree(pool); - return; - } - rv = virStoragePoolFree(pool->pool); - if (rv != 0) { - DPRINTF("%s: virStoragePoolFree(%p) returned %d (%s)\n", __FUNCTION__, pool->pool, rv, LIBVIRT_G(last_error)); - php_error_docref(NULL TSRMLS_CC, E_WARNING, "virStoragePoolFree failed with %i on destructor: %s", rv, LIBVIRT_G(last_error)); - } else { - DPRINTF("%s: virStoragePoolFree(%p) completed successfully\n", __FUNCTION__, pool->pool); - resource_change_counter(INT_RESOURCE_STORAGEPOOL, NULL, pool->pool, 0 TSRMLS_CC); - } - pool->pool = NULL; - } - efree(pool); - } -} - -/* Destructor for volume resource */ -static void php_libvirt_volume_dtor(virt_resource *rsrc TSRMLS_DC) -{ - php_libvirt_volume *volume = (php_libvirt_volume *)rsrc->ptr; - int rv = 0; - - if (volume != NULL) { - if (volume->volume != NULL) { - if (!check_resource_allocation(NULL, INT_RESOURCE_VOLUME, volume->volume TSRMLS_CC)) { - volume->volume = NULL; - efree(volume); - return; - } - rv = virStorageVolFree(volume->volume); - if (rv != 0) { - DPRINTF("%s: virStorageVolFree(%p) returned %d (%s)\n", __FUNCTION__, volume->volume, rv, LIBVIRT_G(last_error)); - php_error_docref(NULL TSRMLS_CC, E_WARNING, "virStorageVolFree failed with %i on destructor: %s", rv, LIBVIRT_G(last_error)); - } else { - DPRINTF("%s: virStorageVolFree(%p) completed successfully\n", __FUNCTION__, volume->volume); - resource_change_counter(INT_RESOURCE_VOLUME, NULL, volume->volume, 0 TSRMLS_CC); - } - volume->volume = NULL; - } - efree(volume); - } -} - /* Destructor for nodedev resource */ static void php_libvirt_nodedev_dtor(virt_resource *rsrc TSRMLS_DC) { @@ -1696,32 +1605,6 @@ PHP_MSHUTDOWN_FUNCTION(libvirt) RETURN_FALSE; \ } while (0) -#define GET_STORAGEPOOL_FROM_ARGS(args, ...) \ - do { \ - reset_error(TSRMLS_C); \ - if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, args, __VA_ARGS__) == FAILURE) { \ - set_error("Invalid arguments" TSRMLS_CC); \ - RETURN_FALSE; \ - } \ - \ - VIRT_FETCH_RESOURCE(pool, php_libvirt_storagepool*, &zpool, PHP_LIBVIRT_STORAGEPOOL_RES_NAME, le_libvirt_storagepool);\ - if ((pool == NULL) || (pool->pool == NULL)) \ - RETURN_FALSE; \ - } while (0) \ - -#define GET_VOLUME_FROM_ARGS(args, ...) \ - do { \ - reset_error(TSRMLS_C); \ - if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, args, __VA_ARGS__) == FAILURE) { \ - set_error("Invalid arguments" TSRMLS_CC); \ - RETURN_FALSE; \ - } \ - \ - VIRT_FETCH_RESOURCE(volume, php_libvirt_volume*, &zvolume, PHP_LIBVIRT_VOLUME_RES_NAME, le_libvirt_volume);\ - if ((volume == NULL) || (volume->volume == NULL)) \ - RETURN_FALSE; \ - } while (0) \ - #define GET_SNAPSHOT_FROM_ARGS(args, ...) \ do { \ reset_error(TSRMLS_C); \ @@ -2928,1075 +2811,8 @@ PHP_FUNCTION(libvirt_list_domain_snapshots) efree(names); } -/* Storagepool functions */ - -/* - * Function name: libvirt_storagepool_lookup_by_name - * Since version: 0.4.1(-1) - * Description: Function is used to lookup for storage pool by it's name - * Arguments: @res [resource]: libvirt connection resource - * @name [string]: storage pool name - * Returns: libvirt storagepool resource - */ -PHP_FUNCTION(libvirt_storagepool_lookup_by_name) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - strsize_t name_len; - char *name = NULL; - virStoragePoolPtr pool = NULL; - php_libvirt_storagepool *res_pool; - - GET_CONNECTION_FROM_ARGS("rs", &zconn, &name, &name_len); - - if ((name == NULL) || (name_len < 1)) - RETURN_FALSE; - pool = virStoragePoolLookupByName(conn->conn, name); - DPRINTF("%s: virStoragePoolLookupByName(%p, %s) returned %p\n", PHPFUNC, conn->conn, name, pool); - if (pool == NULL) - RETURN_FALSE; - - res_pool = (php_libvirt_storagepool *)emalloc(sizeof(php_libvirt_storagepool)); - res_pool->pool = pool; - res_pool->conn = conn; - - DPRINTF("%s: returning %p\n", PHPFUNC, res_pool->pool); - resource_change_counter(INT_RESOURCE_STORAGEPOOL, conn->conn, res_pool->pool, 1 TSRMLS_CC); - - VIRT_REGISTER_RESOURCE(res_pool, le_libvirt_storagepool); -} - -/* Storagepool functions */ - -/* - * Function name: libvirt_storagepool_lookup_by_volume - * Since version: 0.4.1(-1) - * Description: Function is used to lookup for storage pool by a volume - * Arguments: @res [volume]: volume resource of storage pool - * Returns: libvirt storagepool resource - */ -PHP_FUNCTION(libvirt_storagepool_lookup_by_volume) -{ - php_libvirt_volume *volume; - zval *zvolume; - virStoragePoolPtr pool = NULL; - php_libvirt_storagepool *res_pool; - - GET_VOLUME_FROM_ARGS("r", &zvolume); - - pool = virStoragePoolLookupByVolume(volume->volume); - DPRINTF("%s: virStoragePoolLookupByVolume(%p) returned %p\n", PHPFUNC, volume->volume, pool); - if (pool == NULL) - RETURN_FALSE; - - res_pool = (php_libvirt_storagepool *)emalloc(sizeof(php_libvirt_storagepool)); - res_pool->pool = pool; - res_pool->conn = volume->conn; - - DPRINTF("%s: returning %p\n", PHPFUNC, res_pool->pool); - resource_change_counter(INT_RESOURCE_STORAGEPOOL, res_pool->conn->conn, res_pool->pool, 1 TSRMLS_CC); - - VIRT_REGISTER_RESOURCE(res_pool, le_libvirt_storagepool); -} - -/* - * Function name: libvirt_storagepool_list_volumes - * Since version: 0.4.1(-1) - * Description: Function is used to list volumes in the specified storage pool - * Arguments: @res [resource]: libvirt storagepool resource - * Returns: list of storage volume names in the storage pool in an array using default keys (indexes) - */ -PHP_FUNCTION(libvirt_storagepool_list_volumes) -{ - php_libvirt_storagepool *pool = NULL; - zval *zpool; - char **names = NULL; - int expectedcount = -1; - int i; - int count = -1; - - GET_STORAGEPOOL_FROM_ARGS("r", &zpool); - - if ((expectedcount = virStoragePoolNumOfVolumes(pool->pool)) < 0) - RETURN_FALSE; - - DPRINTF("%s: virStoragePoolNumOfVolumes(%p) returned %d\n", PHPFUNC, pool->pool, expectedcount); - names = (char **)emalloc(expectedcount*sizeof(char *)); - - count = virStoragePoolListVolumes(pool->pool, names, expectedcount); - DPRINTF("%s: virStoragePoolListVolumes(%p, %p, %d) returned %d\n", PHPFUNC, pool->pool, names, expectedcount, count); - array_init(return_value); - - if ((count != expectedcount) || (count < 0)) - RETURN_FALSE; - for (i = 0; i < count; i++) { - VIRT_ADD_NEXT_INDEX_STRING(return_value, names[i]); - free(names[i]); - } - - efree(names); -} - -/* - * Function name: libvirt_storagepool_get_info - * Since version: 0.4.1(-1) - * Description: Function is used to get information about the storage pool - * Arguments: @res [resource]: libvirt storagepool resource - * Returns: storage pool information array of state, capacity, allocation and available space - */ -PHP_FUNCTION(libvirt_storagepool_get_info) -{ - php_libvirt_storagepool *pool = NULL; - zval *zpool; - virStoragePoolInfo poolInfo; - int retval; - - GET_STORAGEPOOL_FROM_ARGS("r", &zpool); - - retval = virStoragePoolGetInfo(pool->pool, &poolInfo); - DPRINTF("%s: virStoragePoolGetInfo(%p, <info>) returned %d\n", PHPFUNC, pool->pool, retval); - if (retval != 0) - RETURN_FALSE; - - array_init(return_value); - - // @todo: fix the long long returns - LONGLONG_INIT; - add_assoc_long(return_value, "state", (long)poolInfo.state); - LONGLONG_ASSOC(return_value, "capacity", poolInfo.capacity); - LONGLONG_ASSOC(return_value, "allocation", poolInfo.allocation); - LONGLONG_ASSOC(return_value, "available", poolInfo.available); -} - -/* - * Function name: libvirt_storagevolume_lookup_by_name - * Since version: 0.4.1(-1) - * Description: Function is used to lookup for storage volume by it's name - * Arguments: @res [resource]: libvirt storagepool resource - * @name [string]: name of the storage volume to look for - * Returns: libvirt storagevolume resource - */ -PHP_FUNCTION(libvirt_storagevolume_lookup_by_name) -{ - php_libvirt_storagepool *pool = NULL; - php_libvirt_volume *res_volume; - zval *zpool; - strsize_t name_len; - char *name = NULL; - virStorageVolPtr volume = NULL; - - GET_STORAGEPOOL_FROM_ARGS("rs", &zpool, &name, &name_len); - if ((name == NULL) || (name_len < 1)) - RETURN_FALSE; - - volume = virStorageVolLookupByName(pool->pool, name); - DPRINTF("%s: virStorageVolLookupByName(%p, %s) returned %p\n", PHPFUNC, pool->pool, name, volume); - if (volume == NULL) - RETURN_FALSE; - - res_volume = (php_libvirt_volume *)emalloc(sizeof(php_libvirt_volume)); - res_volume->volume = volume; - res_volume->conn = pool->conn; - - DPRINTF("%s: returning %p\n", PHPFUNC, res_volume->volume); - resource_change_counter(INT_RESOURCE_VOLUME, pool->conn->conn, res_volume->volume, 1 TSRMLS_CC); - - VIRT_REGISTER_RESOURCE(res_volume, le_libvirt_volume); -} - -/* - * Function name: libvirt_storagevolume_lookup_by_path - * Since version: 0.4.1(-2) - * Description: Function is used to lookup for storage volume by it's path - * Arguments: @res [resource]: libvirt connection resource - * @path [string]: path of the storage volume to look for - * Returns: libvirt storagevolume resource - */ -PHP_FUNCTION(libvirt_storagevolume_lookup_by_path) -{ - php_libvirt_connection *conn = NULL; - php_libvirt_volume *res_volume; - zval *zconn; - strsize_t name_len; - char *name = NULL; - virStorageVolPtr volume = NULL; - - GET_CONNECTION_FROM_ARGS("rs", &zconn, &name, &name_len); - if ((name == NULL) || (name_len < 1)) - RETURN_FALSE; - - volume = virStorageVolLookupByPath(conn->conn, name); - DPRINTF("%s: virStorageVolLookupByPath(%p, %s) returned %p\n", PHPFUNC, conn->conn, name, volume); - if (volume == NULL) { - set_error_if_unset("Cannot find storage volume on requested path" TSRMLS_CC); - RETURN_FALSE; - } - - res_volume = (php_libvirt_volume *)emalloc(sizeof(php_libvirt_volume)); - res_volume->volume = volume; - res_volume->conn = conn; - - DPRINTF("%s: returning %p\n", PHPFUNC, res_volume->volume); - resource_change_counter(INT_RESOURCE_VOLUME, conn->conn, res_volume->volume, 1 TSRMLS_CC); - - VIRT_REGISTER_RESOURCE(res_volume, le_libvirt_volume); -} - -/* - * Function name: libvirt_storagevolume_get_name - * Since version: 0.4.1(-2) - * Description: Function is used to get the storage volume name - * Arguments: @res [resource]: libvirt storagevolume resource - * Returns: storagevolume name - */ -PHP_FUNCTION(libvirt_storagevolume_get_name) -{ - php_libvirt_volume *volume = NULL; - zval *zvolume; - const char *retval; - - GET_VOLUME_FROM_ARGS("r", &zvolume); - - retval = virStorageVolGetName(volume->volume); - DPRINTF("%s: virStorageVolGetName(%p) returned %s\n", PHPFUNC, volume->volume, retval); - if (retval == NULL) - RETURN_FALSE; - - VIRT_RETURN_STRING(retval); -} - -/* - * Function name: libvirt_storagevolume_get_path - * Since version: 0.4.1(-2) - * Description: Function is used to get the storage volume path - * Arguments: @res [resource]: libvirt storagevolume resource - * Returns: storagevolume path - */ -PHP_FUNCTION(libvirt_storagevolume_get_path) -{ - php_libvirt_volume *volume = NULL; - zval *zvolume; - char *retval; - - GET_VOLUME_FROM_ARGS("r", &zvolume); - - retval = virStorageVolGetPath(volume->volume); - DPRINTF("%s: virStorageVolGetPath(%p) returned %s\n", PHPFUNC, volume->volume, retval); - if (retval == NULL) - RETURN_FALSE; - - VIRT_RETVAL_STRING(retval); - free(retval); -} - -/* - * Function name: libvirt_storagevolume_get_info - * Since version: 0.4.1(-1) - * Description: Function is used to get the storage volume information - * Arguments: @res [resource]: libvirt storagevolume resource - * Returns: storage volume information array of type, allocation and capacity - */ -PHP_FUNCTION(libvirt_storagevolume_get_info) -{ - php_libvirt_volume *volume = NULL; - zval *zvolume; - virStorageVolInfo volumeInfo; - int retval; - - GET_VOLUME_FROM_ARGS("r", &zvolume); - - retval = virStorageVolGetInfo(volume->volume, &volumeInfo); - DPRINTF("%s: virStorageVolGetInfo(%p, <info>) returned %d\n", PHPFUNC, volume->volume, retval); - if (retval != 0) - RETURN_FALSE; - - array_init(return_value); - LONGLONG_INIT; - add_assoc_long(return_value, "type", (long)volumeInfo.type); - LONGLONG_ASSOC(return_value, "capacity", volumeInfo.capacity); - LONGLONG_ASSOC(return_value, "allocation", volumeInfo.allocation); -} - -/* - * Function name: libvirt_storagevolume_get_xml_desc - * Since version: 0.4.1(-1), changed 0.4.2 - * Description: Function is used to get the storage volume XML description - * Arguments: @res [resource]: libvirt storagevolume resource - * @xpath [string]: optional xPath expression string to get just this entry, can be NULL - * @flags [int]: optional flags - * Returns: storagevolume XML description or result of xPath expression - */ -PHP_FUNCTION(libvirt_storagevolume_get_xml_desc) -{ - php_libvirt_volume *volume = NULL; - zval *zvolume; - char *tmp = NULL; - char *xml; - char *xpath = NULL; - strsize_t xpath_len; - zend_long flags = 0; - int retval = -1; - - GET_VOLUME_FROM_ARGS("rs|l", &zvolume, &xpath, &xpath_len, &flags); - if (xpath_len < 1) - xpath = NULL; - - DPRINTF("%s: volume = %p, xpath = %s, flags = %ld\n", PHPFUNC, volume->volume, xpath, flags); - - xml = virStorageVolGetXMLDesc(volume->volume, flags); - if (xml == NULL) { - set_error_if_unset("Cannot get the XML description" TSRMLS_CC); - RETURN_FALSE; - } - - tmp = get_string_from_xpath(xml, xpath, NULL, &retval); - if ((tmp == NULL) || (retval < 0)) { - VIRT_RETVAL_STRING(xml); - } else { - VIRT_RETVAL_STRING(tmp); - } - - free(xml); - free(tmp); -} - -/* - * Function name: libvirt_storagevolume_create_xml - * Since version: 0.4.1(-1) - * Description: Function is used to create the new storage pool and return the handle to new storage pool - * Arguments: @res [resource]: libvirt storagepool resource - * @xml [string]: XML string to create the storage volume in the storage pool - * @flags [int]: virStorageVolCreateXML flags - * Returns: libvirt storagevolume resource - */ -PHP_FUNCTION(libvirt_storagevolume_create_xml) -{ - php_libvirt_volume *res_volume = NULL; - php_libvirt_storagepool *pool = NULL; - zval *zpool; - virStorageVolPtr volume = NULL; - char *xml; - zend_long flags = 0; - strsize_t xml_len; - - GET_STORAGEPOOL_FROM_ARGS("rs|l", &zpool, &xml, &xml_len, &flags); - - volume = virStorageVolCreateXML(pool->pool, xml, flags); - DPRINTF("%s: virStorageVolCreateXML(%p, <xml>, 0) returned %p\n", PHPFUNC, pool->pool, volume); - if (volume == NULL) - RETURN_FALSE; - - res_volume = (php_libvirt_volume *)emalloc(sizeof(php_libvirt_volume)); - res_volume->volume = volume; - res_volume->conn = pool->conn; - - DPRINTF("%s: returning %p\n", PHPFUNC, res_volume->volume); - resource_change_counter(INT_RESOURCE_VOLUME, pool->conn->conn, res_volume->volume, 1 TSRMLS_CC); - - VIRT_REGISTER_RESOURCE(res_volume, le_libvirt_volume); -} - -/* - * Function name: libvirt_storagevolume_create_xml_from - * Since version: 0.4.1(-2) - * Description: Function is used to clone the new storage volume into pool from the orignial volume - * Arguments: @pool [resource]: libvirt storagepool resource - * @xml [string]: XML string to create the storage volume in the storage pool - * @original_volume [resource]: libvirt storagevolume resource - * Returns: libvirt storagevolume resource - */ -PHP_FUNCTION(libvirt_storagevolume_create_xml_from) -{ - php_libvirt_volume *res_volume = NULL; - php_libvirt_storagepool *pool = NULL; - zval *zpool; - - php_libvirt_volume *pl_volume = NULL; - zval *zvolume; - - virStorageVolPtr volume = NULL; - char *xml; - strsize_t xml_len; - - if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rsr", &zpool, &xml, &xml_len, &zvolume) == FAILURE) { - set_error("Invalid pool resource, XML or volume resouce" TSRMLS_CC); - RETURN_FALSE; - } - - VIRT_FETCH_RESOURCE(pool, php_libvirt_storagepool*, &zpool, PHP_LIBVIRT_STORAGEPOOL_RES_NAME, le_libvirt_storagepool); - if ((pool == NULL) || (pool->pool == NULL)) - RETURN_FALSE; - VIRT_FETCH_RESOURCE(pl_volume, php_libvirt_volume*, &zvolume, PHP_LIBVIRT_VOLUME_RES_NAME, le_libvirt_volume); - if ((pl_volume == NULL) || (pl_volume->volume == NULL)) - RETURN_FALSE; - resource_change_counter(INT_RESOURCE_VOLUME, NULL, pl_volume->volume, 1 TSRMLS_CC); - - volume = virStorageVolCreateXMLFrom(pool->pool, xml, pl_volume->volume, 0); - DPRINTF("%s: virStorageVolCreateXMLFrom(%p, <xml>, %p, 0) returned %p\n", PHPFUNC, pool->pool, pl_volume->volume, volume); - if (volume == NULL) - RETURN_FALSE; - - res_volume = (php_libvirt_volume *)emalloc(sizeof(php_libvirt_volume)); - res_volume->volume = volume; - res_volume->conn = pool->conn; - - DPRINTF("%s: returning %p\n", PHPFUNC, res_volume->volume); - resource_change_counter(INT_RESOURCE_VOLUME, pool->conn->conn, res_volume->volume, 1 TSRMLS_CC); - - VIRT_REGISTER_RESOURCE(res_volume, le_libvirt_volume); -} - -/* - * Function name: libvirt_storagevolume_delete - * Since version: 0.4.2 - * Description: Function is used to delete to volume identified by it's resource - * Arguments: @res [resource]: libvirt storagevolume resource - * @flags [int]: optional flags for the storage volume deletion for virStorageVolDelete() - * Returns: TRUE for success, FALSE on error - */ -PHP_FUNCTION(libvirt_storagevolume_delete) -{ - php_libvirt_volume *volume = NULL; - zval *zvolume; - zend_long flags = 0; - int retval = 0; - - GET_VOLUME_FROM_ARGS("r|l", &zvolume, &flags); - - retval = virStorageVolDelete(volume->volume, flags); - DPRINTF("%s: virStorageVolDelete(%p, %d) returned %d\n", PHPFUNC, volume->volume, (int) flags, retval); - if (retval != 0) { - set_error_if_unset("Cannot delete storage volume" TSRMLS_CC); - RETURN_FALSE; - } - - RETURN_TRUE; -} - -/* - * Function name: libvirt_storagevolume_resize - * Since version: 0.5.0 - * Description: Function is used to resize volume identified by it's resource - * Arguments: @res [resource]: libvirt storagevolume resource - * @capacity [int]: capacity for the storage volume - * @flags [int]: optional flags for the storage volume resize for virStorageVolResize() - * Returns: int - */ -PHP_FUNCTION(libvirt_storagevolume_resize) -{ - php_libvirt_volume *volume = NULL; - zval *zvolume; - zend_long flags = 0; - zend_long capacity = 0; - int retval = -1; - - GET_VOLUME_FROM_ARGS("rl|l", &zvolume, &capacity, &flags); - - retval = virStorageVolResize(volume->volume, capacity, flags); - DPRINTF("%s: virStorageVolResize(%p, %d, %d) returned %d\n", PHPFUNC, volume->volume, (int) capacity, (int) flags, retval); - if (retval != 0) { - set_error_if_unset("Cannot resize storage volume" TSRMLS_CC); - RETURN_LONG(retval); - } - - RETURN_LONG(retval); -} - -/* - * Function name: libvirt_storagevolume_download - * Since version: 0.5.0 - * Description: Function is used to download volume identified by it's resource - * Arguments: @res [resource]: libvirt storagevolume resource - * @stream [resource]: stream to use as output - * @offset [int]: position to start reading from - * @length [int] : limit on amount of data to download - * @flags [int]: optional flags for the storage volume download for virStorageVolDownload() - * Returns: int - */ -PHP_FUNCTION(libvirt_storagevolume_download) -{ - php_libvirt_volume *volume = NULL; - php_libvirt_stream *stream = NULL; - zval *zvolume; - zval *zstream; - zend_long flags = 0; - zend_long offset = 0; - zend_long length = 0; - int retval = -1; - - if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rr|l|l|l", &zvolume, &zstream, &offset, &length, &flags) == FAILURE) - RETURN_LONG(retval); - VIRT_FETCH_RESOURCE(volume, php_libvirt_volume*, &zvolume, PHP_LIBVIRT_VOLUME_RES_NAME, le_libvirt_volume); - if ((volume == NULL) || (volume->volume == NULL)) - RETURN_LONG(retval); - VIRT_FETCH_RESOURCE(stream, php_libvirt_stream*, &zstream, PHP_LIBVIRT_STREAM_RES_NAME, le_libvirt_stream); - if ((stream == NULL) || (stream->stream == NULL)) - RETURN_LONG(retval); - - retval = virStorageVolDownload(volume->volume, stream->stream, offset, length, flags); - DPRINTF("%s: virStorageVolDownload(%p, %p, %d, %d, %d) returned %d\n", PHPFUNC, volume->volume, stream->stream, (int) offset, (int) length, (int) flags, retval); - - if (retval == -1) { - set_error("Cannot download from stream" TSRMLS_CC); - RETURN_LONG(retval); - } - - RETURN_LONG(retval); -} - -/* - * Function name: libvirt_storagevolume_upload - * Since version: 0.5.0 - * Description: Function is used to upload volume identified by it's resource - * Arguments: @res [resource]: libvirt storagevolume resource - * @stream [resource]: stream to use as input - * @offset [int]: position to start writing to - * @length [int] : limit on amount of data to upload - * @flags [int]: optional flags for the storage volume upload for virStorageVolUpload() - * Returns: int - */ -PHP_FUNCTION(libvirt_storagevolume_upload) -{ - php_libvirt_volume *volume = NULL; - php_libvirt_stream *stream = NULL; - zval *zvolume; - zval *zstream; - zend_long flags = 0; - zend_long offset = 0; - zend_long length = 0; - int retval = -1; - - if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rr|l|l|l", &zvolume, &zstream, &offset, &length, &flags) == FAILURE) - RETURN_LONG(retval); - VIRT_FETCH_RESOURCE(volume, php_libvirt_volume*, &zvolume, PHP_LIBVIRT_VOLUME_RES_NAME, le_libvirt_volume); - if ((volume == NULL) || (volume->volume == NULL)) - RETURN_LONG(retval); - VIRT_FETCH_RESOURCE(stream, php_libvirt_stream*, &zstream, PHP_LIBVIRT_STREAM_RES_NAME, le_libvirt_stream); - if ((stream == NULL) || (stream->stream == NULL)) - RETURN_LONG(retval); - - retval = virStorageVolUpload(volume->volume, stream->stream, offset, length, flags); - DPRINTF("%s: virStorageVolUpload(%p, %p, %d, %d, %d) returned %d\n", PHPFUNC, volume->volume, stream->stream, (int) offset, (int) length, (int) flags, retval); - - if (retval == -1) { - set_error_if_unset("Cannot upload storage volume" TSRMLS_CC); - RETURN_LONG(retval); - } - - RETURN_LONG(retval); -} - -/* - * Function name: libvirt_storagepool_get_uuid_string - * Since version: 0.4.1(-1) - * Description: Function is used to get storage pool by UUID string - * Arguments: @res [resource]: libvirt storagepool resource - * Returns: storagepool UUID string - */ -PHP_FUNCTION(libvirt_storagepool_get_uuid_string) -{ - php_libvirt_storagepool *pool = NULL; - zval *zpool; - char *uuid; - int retval; - - GET_STORAGEPOOL_FROM_ARGS("r", &zpool); - - uuid = (char *)emalloc(VIR_UUID_STRING_BUFLEN); - retval = virStoragePoolGetUUIDString(pool->pool, uuid); - DPRINTF("%s: virStoragePoolGetUUIDString(%p, %p) returned %d (%s)\n", PHPFUNC, pool->pool, uuid, retval, uuid); - if (retval != 0) - RETURN_FALSE; - - VIRT_RETVAL_STRING(uuid); - efree(uuid); -} - -/* - * Function name: libvirt_storagepool_get_name - * Since version: 0.4.1(-1) - * Description: Function is used to get storage pool name from the storage pool resource - * Arguments: @res [resource]: libvirt storagepool resource - * Returns: storagepool name string - */ -PHP_FUNCTION(libvirt_storagepool_get_name) -{ - php_libvirt_storagepool *pool = NULL; - zval *zpool; - const char *name = NULL; - - GET_STORAGEPOOL_FROM_ARGS("r", &zpool); - - name = virStoragePoolGetName(pool->pool); - DPRINTF("%s: virStoragePoolGetName(%p) returned %s\n", PHPFUNC, pool->pool, name); - if (name == NULL) - RETURN_FALSE; - - VIRT_RETURN_STRING(name); -} - -/* - * Function name: libvirt_storagepool_lookup_by_uuid_string - * Since version: 0.4.1(-1) - * Description: Function is used to lookup for storage pool identified by UUID string - * Arguments: @res [resource]: libvirt connection resource - * @uuid [string]: UUID string to look for storagepool - * Returns: libvirt storagepool resource - */ -PHP_FUNCTION(libvirt_storagepool_lookup_by_uuid_string) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - char *uuid = NULL; - strsize_t uuid_len; - virStoragePoolPtr storage = NULL; - php_libvirt_storagepool *res_pool; - - GET_CONNECTION_FROM_ARGS("rs", &zconn, &uuid, &uuid_len); - - if ((uuid == NULL) || (uuid_len < 1)) - RETURN_FALSE; - - storage = virStoragePoolLookupByUUIDString(conn->conn, uuid); - DPRINTF("%s: virStoragePoolLookupByUUIDString(%p, %s) returned %p\n", PHPFUNC, conn->conn, uuid, storage); - if (storage == NULL) - RETURN_FALSE; - - res_pool = (php_libvirt_storagepool *)emalloc(sizeof(php_libvirt_storagepool)); - res_pool->pool = storage; - res_pool->conn = conn; - - DPRINTF("%s: returning %p\n", PHPFUNC, res_pool->pool); - resource_change_counter(INT_RESOURCE_STORAGEPOOL, conn->conn, res_pool->pool, 1 TSRMLS_CC); - - VIRT_REGISTER_RESOURCE(res_pool, le_libvirt_storagepool); -} - -/* - * Function name: libvirt_storagepool_get_xml_desc - * Since version: 0.4.1(-1), changed 0.4.2 - * Description: Function is used to get the XML description for the storage pool identified by res - * Arguments: @res [resource]: libvirt storagepool resource - * @xpath [string]: optional xPath expression string to get just this entry, can be NULL - * Returns: storagepool XML description string or result of xPath expression - */ -PHP_FUNCTION(libvirt_storagepool_get_xml_desc) -{ - php_libvirt_storagepool *pool = NULL; - zval *zpool; - char *xml; - char *xpath = NULL; - char *tmp = NULL; - zend_long flags = 0; - strsize_t xpath_len; - int retval = -1; - - GET_STORAGEPOOL_FROM_ARGS("r|s", &zpool, &xpath, &xpath_len, &flags); - if (xpath_len < 1) - xpath = NULL; - - DPRINTF("%s: pool = %p, flags = %ld, xpath = %s\n", PHPFUNC, pool->pool, flags, xpath); - - xml = virStoragePoolGetXMLDesc(pool->pool, flags); - if (xml == NULL) { - set_error_if_unset("Cannot get the XML description" TSRMLS_CC); - RETURN_FALSE; - } - - tmp = get_string_from_xpath(xml, xpath, NULL, &retval); - if ((tmp == NULL) || (retval < 0)) { - VIRT_RETVAL_STRING(xml); - } else { - VIRT_RETVAL_STRING(tmp); - } - - free(xml); - free(tmp); -} - -/* - * Function name: libvirt_storagepool_define_xml - * Since version: 0.4.1(-1) - * Description: Function is used to define the storage pool from XML string and return it's resource - * Arguments: @res [resource]: libvirt connection resource - * @xml [string]: XML string definition of storagepool - * @flags [int]: flags to define XML - * Returns: libvirt storagepool resource - */ -PHP_FUNCTION(libvirt_storagepool_define_xml) -{ - php_libvirt_storagepool *res_pool = NULL; - php_libvirt_connection *conn = NULL; - zval *zconn; - virStoragePoolPtr pool = NULL; - char *xml; - strsize_t xml_len; - zend_long flags = 0; - - - GET_CONNECTION_FROM_ARGS("rs|l", &zconn, &xml, &xml_len, &flags); - - pool = virStoragePoolDefineXML(conn->conn, xml, (unsigned int)flags); - DPRINTF("%s: virStoragePoolDefineXML(%p, <xml>) returned %p\n", PHPFUNC, conn->conn, pool); - if (pool == NULL) - RETURN_FALSE; - - res_pool = (php_libvirt_storagepool *)emalloc(sizeof(php_libvirt_storagepool)); - res_pool->pool = pool; - res_pool->conn = conn; - - DPRINTF("%s: returning %p\n", PHPFUNC, res_pool->pool); - resource_change_counter(INT_RESOURCE_STORAGEPOOL, conn->conn, res_pool->pool, 1 TSRMLS_CC); - - VIRT_REGISTER_RESOURCE(res_pool, le_libvirt_storagepool); -} - -/* - * Function name: libvirt_storagepool_undefine - * Since version: 0.4.1(-1) - * Description: Function is used to undefine the storage pool identified by it's resource - * Arguments: @res [resource]: libvirt storagepool resource - * Returns: TRUE if success, FALSE on error - */ -PHP_FUNCTION(libvirt_storagepool_undefine) -{ - php_libvirt_storagepool *pool = NULL; - zval *zpool; - int retval = 0; - - GET_STORAGEPOOL_FROM_ARGS("r", &zpool); - - retval = virStoragePoolUndefine(pool->pool); - DPRINTF("%s: virStoragePoolUndefine(%p) returned %d\n", PHPFUNC, pool->pool, retval); - if (retval != 0) - RETURN_FALSE; - - RETURN_TRUE; -} - -/* - * Function name: libvirt_storagepool_create - * Since version: 0.4.1(-1) - * Description: Function is used to create/start the storage pool - * Arguments: @res [resource]: libvirt storagepool resource - * Returns: TRUE if success, FALSE on error - */ -PHP_FUNCTION(libvirt_storagepool_create) -{ - php_libvirt_storagepool *pool = NULL; - zval *zpool; - int retval; - - GET_STORAGEPOOL_FROM_ARGS("r", &zpool); - - retval = virStoragePoolCreate(pool->pool, 0); - DPRINTF("%s: virStoragePoolCreate(%p, 0) returned %d\n", PHPFUNC, pool->pool, retval); - if (retval != 0) - RETURN_FALSE; - RETURN_TRUE; -} - -/* - * Function name: libvirt_storagepool_destroy - * Since version: 0.4.1(-1) - * Description: Function is used to destory the storage pool - * Arguments: @res [resource]: libvirt storagepool resource - * Returns: TRUE if success, FALSE on error - */ -PHP_FUNCTION(libvirt_storagepool_destroy) -{ - php_libvirt_storagepool *pool = NULL; - zval *zpool; - int retval; - - GET_STORAGEPOOL_FROM_ARGS("r", &zpool); - - retval = virStoragePoolDestroy(pool->pool); - DPRINTF("%s: virStoragePoolDestroy(%p) returned %d\n", PHPFUNC, pool->pool, retval); - if (retval != 0) - RETURN_FALSE; - RETURN_TRUE; -} - -/* - * Function name: libvirt_storagepool_is_active - * Since version: 0.4.1(-1) - * Description: Function is used to get information whether storage pool is active or not - * Arguments: @res [resource]: libvirt storagepool resource - * Returns: result of virStoragePoolIsActive - */ -PHP_FUNCTION(libvirt_storagepool_is_active) -{ - php_libvirt_storagepool *pool = NULL; - zval *zpool; - - GET_STORAGEPOOL_FROM_ARGS("r", &zpool); - - RETURN_LONG(virStoragePoolIsActive(pool->pool)); -} - -/* - * Function name: libvirt_storagepool_get_volume_count - * Since version: 0.4.1(-1) - * Description: Function is used to get storage volume count in the storage pool - * Arguments: @res [resource]: libvirt storagepool resource - * Returns: number of volumes in the pool - */ -PHP_FUNCTION(libvirt_storagepool_get_volume_count) -{ - php_libvirt_storagepool *pool = NULL; - zval *zpool; - - GET_STORAGEPOOL_FROM_ARGS("r", &zpool); - - RETURN_LONG(virStoragePoolNumOfVolumes(pool->pool)); -} - -/* - * Function name: libvirt_storagepool_refresh - * Since version: 0.4.1(-1) - * Description: Function is used to refresh the storage pool information - * Arguments: @res [resource]: libvirt storagepool resource - * @flags [int]: refresh flags - * Returns: TRUE if success, FALSE on error - */ -PHP_FUNCTION(libvirt_storagepool_refresh) -{ - php_libvirt_storagepool *pool = NULL; - zval *zpool; - zend_long flags = 0; - int retval; - - GET_STORAGEPOOL_FROM_ARGS("r|l", &zpool, &flags); - - retval = virStoragePoolRefresh(pool->pool, flags); - DPRINTF("%s: virStoragePoolRefresh(%p, %ld) returned %d\n", PHPFUNC, pool->pool, flags, retval); - if (retval < 0) - RETURN_FALSE; - RETURN_TRUE; -} - -/* - * Function name: libvirt_storagepool_set_autostart - * Since version: 0.4.1(-1) - * Description: Function is used to set autostart of the storage pool - * Arguments: @res [resource]: libvirt storagepool resource - * @flags [int]: flags to set autostart - * Returns: result on setting storagepool autostart value - */ -PHP_FUNCTION(libvirt_storagepool_set_autostart) -{ - php_libvirt_storagepool *pool = NULL; - zval *zpool; - zend_bool flags = 0; - int retval; - - GET_STORAGEPOOL_FROM_ARGS("rb", &zpool, &flags); - - retval = virStoragePoolSetAutostart(pool->pool, flags); - DPRINTF("%s: virStoragePoolSetAutostart(%p, %d) returned %d\n", PHPFUNC, pool->pool, flags, retval); - if (retval != 0) - RETURN_FALSE; - RETURN_TRUE; -} - -/* - * Function name: libvirt_storagepool_get_autostart - * Since version: 0.4.1(-1) - * Description: Function is used to get autostart of the storage pool - * Arguments: @res [resource]: libvirt storagepool resource - * Returns: TRUE for autostart enabled, FALSE for autostart disabled, FALSE with last_error set for error - */ -PHP_FUNCTION(libvirt_storagepool_get_autostart) -{ - php_libvirt_storagepool *pool = NULL; - zval *zpool; - int autostart; - - GET_STORAGEPOOL_FROM_ARGS("r", &zpool); - - if (virStoragePoolGetAutostart(pool->pool, &autostart) == 0 && - autostart != 0) - RETURN_TRUE; - - RETURN_FALSE; -} - -/* - * Function name: libvirt_storagepool_build - * Since version: 0.4.2 - * Description: Function is used to Build the underlying storage pool, e.g. create the destination directory for NFS - * Arguments: @res [resource]: libvirt storagepool resource - * Returns: TRUE if success, FALSE on error - */ -PHP_FUNCTION(libvirt_storagepool_build) -{ - php_libvirt_storagepool *pool = NULL; - zval *zpool; - int flags = 0; - int retval; - - GET_STORAGEPOOL_FROM_ARGS("r", &zpool); - - retval = virStoragePoolBuild(pool->pool, flags); - DPRINTF("%s: virStoragePoolBuild(%p, %d) returned %d\n", PHPFUNC, pool->pool, flags, retval); - if (retval == 0) - RETURN_TRUE; - - RETURN_FALSE; -} - -/* - * Function name: libvirt_storagepool_delete - * Since version: 0.4.6 - * Description: Function is used to Delete the underlying storage pool, e.g. remove the destination directory for NFS - * Arguments: @res [resource]: libvirt storagepool resource - * Returns: TRUE if success, FALSE on error - */ -PHP_FUNCTION(libvirt_storagepool_delete) -{ - php_libvirt_storagepool *pool = NULL; - zval *zpool; - int flags = 0; - int retval; - - GET_STORAGEPOOL_FROM_ARGS("r", &zpool); - - retval = virStoragePoolDelete(pool->pool, flags); - DPRINTF("%s: virStoragePoolDelete(%p, %d) returned %d\n", PHPFUNC, pool->pool, flags, retval); - if (retval == 0) - RETURN_TRUE; - - RETURN_FALSE; -} - /* Listing functions */ /* - * Function name: libvirt_list_storagepools - * Since version: 0.4.1(-1) - * Description: Function is used to list storage pools on the connection - * Arguments: @res [resource]: libvirt connection resource - * Returns: libvirt storagepool names array for the connection - */ -PHP_FUNCTION(libvirt_list_storagepools) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - int count = -1; - int expectedcount = -1; - char **names; - int i; - - GET_CONNECTION_FROM_ARGS("r", &zconn); - - if ((expectedcount = virConnectNumOfStoragePools(conn->conn)) < 0) - RETURN_FALSE; - - names = (char **)emalloc(expectedcount*sizeof(char *)); - count = virConnectListStoragePools(conn->conn, names, expectedcount); - - if ((count != expectedcount) || (count < 0)) { - efree(names); - RETURN_FALSE; - } - - array_init(return_value); - for (i = 0; i < count; i++) { - VIRT_ADD_NEXT_INDEX_STRING(return_value, names[i]); - free(names[i]); - } - efree(names); - - - if ((expectedcount = virConnectNumOfDefinedStoragePools(conn->conn)) < 0) - RETURN_FALSE; - names = (char **)emalloc(expectedcount * sizeof(char *)); - count = virConnectListDefinedStoragePools(conn->conn, names, expectedcount); - if ((count != expectedcount) || (count < 0)) { - efree(names); - RETURN_FALSE; - } - - for (i = 0; i < count; i++) { - VIRT_ADD_NEXT_INDEX_STRING(return_value, names[i]); - free(names[i]); - } - efree(names); -} - -/* - * Function name: libvirt_list_active_storagepools - * Since version: 0.4.1(-1) - * Description: Function is used to list active storage pools on the connection - * Arguments: @res [resource]: libvirt connection resource - * Returns: libvirt storagepool names array for the connection - */ -PHP_FUNCTION(libvirt_list_active_storagepools) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - int count = -1; - int expectedcount = -1; - char **names; - int i; - - GET_CONNECTION_FROM_ARGS("r", &zconn); - - if ((expectedcount = virConnectNumOfStoragePools(conn->conn)) < 0) - RETURN_FALSE; - - names = (char **)emalloc(expectedcount*sizeof(char *)); - count = virConnectListStoragePools(conn->conn, names, expectedcount); - - if ((count != expectedcount) || (count < 0)) { - efree(names); - RETURN_FALSE; - } - array_init(return_value); - for (i = 0; i < count; i++) { - VIRT_ADD_NEXT_INDEX_STRING(return_value, names[i]); - free(names[i]); - } - efree(names); -} - -/* - * Function name: libvirt_list_inactive_storagepools - * Since version: 0.4.1(-1) - * Description: Function is used to list inactive storage pools on the connection - * Arguments: @res [resource]: libvirt connection resource - * Returns: libvirt storagepool names array for the connection - */ -PHP_FUNCTION(libvirt_list_inactive_storagepools) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - int count = -1; - int expectedcount = -1; - char **names; - int i; - - GET_CONNECTION_FROM_ARGS("r", &zconn); - - if ((expectedcount = virConnectNumOfDefinedStoragePools(conn->conn)) < 0) - RETURN_FALSE; - - names = (char **)emalloc(expectedcount * sizeof(char *)); - count = virConnectListDefinedStoragePools(conn->conn, names, expectedcount); - if ((count != expectedcount) || (count < 0)) { - efree(names); - RETURN_FALSE; - } - - array_init(return_value); - for (i = 0; i < count; i++) { - VIRT_ADD_NEXT_INDEX_STRING(return_value, names[i]); - free(names[i]); - } - efree(names); -} - -/* * Function name: libvirt_list_nodedevs * Since version: 0.4.1(-1) * Description: Function is used to list node devices on the connection diff --git a/src/libvirt-php.h b/src/libvirt-php.h index 8b6e9e4..6e1fd0c 100644 --- a/src/libvirt-php.h +++ b/src/libvirt-php.h @@ -109,8 +109,6 @@ typedef uint64_t arch_uint; /* Internal resource identifier objects */ #define INT_RESOURCE_NODEDEV 0x08 -#define INT_RESOURCE_STORAGEPOOL 0x10 -#define INT_RESOURCE_VOLUME 0x20 #define INT_RESOURCE_SNAPSHOT 0x40 #define INT_RESOURCE_NWFILTER 0x60 @@ -156,16 +154,6 @@ typedef struct _php_libvirt_nodedev { php_libvirt_connection* conn; } php_libvirt_nodedev; -typedef struct _php_libvirt_storagepool { - virStoragePoolPtr pool; - php_libvirt_connection* conn; -} php_libvirt_storagepool; - -typedef struct _php_libvirt_volume { - virStorageVolPtr volume; - php_libvirt_connection* conn; -} php_libvirt_volume; - typedef struct _php_libvirt_nwfilter { virNWFilterPtr nwfilter; php_libvirt_connection* conn; @@ -223,8 +211,6 @@ const char *get_feature_binary(const char *name); long get_next_free_numeric_value(virDomainPtr domain, char *xpath); int get_subnet_bits(char *ip); -#define PHP_LIBVIRT_STORAGEPOOL_RES_NAME "Libvirt storagepool" -#define PHP_LIBVIRT_VOLUME_RES_NAME "Libvirt volume" #define PHP_LIBVIRT_NODEDEV_RES_NAME "Libvirt node device" #define PHP_LIBVIRT_SNAPSHOT_RES_NAME "Libvirt domain snapshot" #define PHP_LIBVIRT_NWFILTER_RES_NAME "Libvirt nwfilter" @@ -244,38 +230,6 @@ PHP_FUNCTION(libvirt_domain_snapshot_lookup_by_name); PHP_FUNCTION(libvirt_domain_snapshot_get_xml); PHP_FUNCTION(libvirt_domain_snapshot_revert); PHP_FUNCTION(libvirt_domain_snapshot_delete); -/* Storage pool and storage volume functions */ -PHP_FUNCTION(libvirt_storagepool_lookup_by_name); -PHP_FUNCTION(libvirt_storagepool_lookup_by_volume); -PHP_FUNCTION(libvirt_storagepool_list_volumes); -PHP_FUNCTION(libvirt_storagepool_get_info); -PHP_FUNCTION(libvirt_storagevolume_lookup_by_name); -PHP_FUNCTION(libvirt_storagevolume_lookup_by_path); -PHP_FUNCTION(libvirt_storagevolume_get_name); -PHP_FUNCTION(libvirt_storagevolume_get_path); -PHP_FUNCTION(libvirt_storagevolume_get_info); -PHP_FUNCTION(libvirt_storagevolume_get_xml_desc); -PHP_FUNCTION(libvirt_storagevolume_create_xml); -PHP_FUNCTION(libvirt_storagevolume_create_xml_from); -PHP_FUNCTION(libvirt_storagevolume_delete); -PHP_FUNCTION(libvirt_storagevolume_download); -PHP_FUNCTION(libvirt_storagevolume_upload); -PHP_FUNCTION(libvirt_storagevolume_resize); -PHP_FUNCTION(libvirt_storagepool_get_uuid_string); -PHP_FUNCTION(libvirt_storagepool_get_name); -PHP_FUNCTION(libvirt_storagepool_lookup_by_uuid_string); -PHP_FUNCTION(libvirt_storagepool_get_xml_desc); -PHP_FUNCTION(libvirt_storagepool_define_xml); -PHP_FUNCTION(libvirt_storagepool_undefine); -PHP_FUNCTION(libvirt_storagepool_create); -PHP_FUNCTION(libvirt_storagepool_destroy); -PHP_FUNCTION(libvirt_storagepool_is_active); -PHP_FUNCTION(libvirt_storagepool_get_volume_count); -PHP_FUNCTION(libvirt_storagepool_refresh); -PHP_FUNCTION(libvirt_storagepool_set_autostart); -PHP_FUNCTION(libvirt_storagepool_get_autostart); -PHP_FUNCTION(libvirt_storagepool_build); -PHP_FUNCTION(libvirt_storagepool_delete); /* Nodedev functions */ PHP_FUNCTION(libvirt_nodedev_get); PHP_FUNCTION(libvirt_nodedev_capabilities); @@ -296,9 +250,6 @@ PHP_FUNCTION(libvirt_list_nodedevs); PHP_FUNCTION(libvirt_list_all_nwfilters); PHP_FUNCTION(libvirt_list_nwfilters); PHP_FUNCTION(libvirt_list_domain_snapshots); -PHP_FUNCTION(libvirt_list_storagepools); -PHP_FUNCTION(libvirt_list_active_storagepools); -PHP_FUNCTION(libvirt_list_inactive_storagepools); /* Common functions */ PHP_FUNCTION(libvirt_version); PHP_FUNCTION(libvirt_check_version); diff --git a/src/libvirt-storage.c b/src/libvirt-storage.c new file mode 100644 index 0000000..191f60a --- /dev/null +++ b/src/libvirt-storage.c @@ -0,0 +1,1130 @@ +/* + * libvirt-storage.c: The PHP bindings to libvirt storage API + * + * See COPYING for the license of this software + */ + +#include <libvirt/libvirt.h> + +#include "libvirt-php.h" +#include "libvirt-stream.h" +#include "libvirt-storage.h" + +DEBUG_INIT("storage"); + +void +php_libvirt_storagepool_dtor(virt_resource *rsrc TSRMLS_DC) +{ + php_libvirt_storagepool *pool = (php_libvirt_storagepool *)rsrc->ptr; + int rv = 0; + + if (pool != NULL) { + if (pool->pool != NULL) { + if (!check_resource_allocation(NULL, INT_RESOURCE_STORAGEPOOL, pool->pool TSRMLS_CC)) { + pool->pool = NULL; + efree(pool); + return; + } + rv = virStoragePoolFree(pool->pool); + if (rv != 0) { + DPRINTF("%s: virStoragePoolFree(%p) returned %d (%s)\n", __FUNCTION__, pool->pool, rv, LIBVIRT_G(last_error)); + php_error_docref(NULL TSRMLS_CC, E_WARNING, "virStoragePoolFree failed with %i on destructor: %s", rv, LIBVIRT_G(last_error)); + } else { + DPRINTF("%s: virStoragePoolFree(%p) completed successfully\n", __FUNCTION__, pool->pool); + resource_change_counter(INT_RESOURCE_STORAGEPOOL, NULL, pool->pool, 0 TSRMLS_CC); + } + pool->pool = NULL; + } + efree(pool); + } +} + +void +php_libvirt_volume_dtor(virt_resource *rsrc TSRMLS_DC) +{ + php_libvirt_volume *volume = (php_libvirt_volume *)rsrc->ptr; + int rv = 0; + + if (volume != NULL) { + if (volume->volume != NULL) { + if (!check_resource_allocation(NULL, INT_RESOURCE_VOLUME, volume->volume TSRMLS_CC)) { + volume->volume = NULL; + efree(volume); + return; + } + rv = virStorageVolFree(volume->volume); + if (rv != 0) { + DPRINTF("%s: virStorageVolFree(%p) returned %d (%s)\n", __FUNCTION__, volume->volume, rv, LIBVIRT_G(last_error)); + php_error_docref(NULL TSRMLS_CC, E_WARNING, "virStorageVolFree failed with %i on destructor: %s", rv, LIBVIRT_G(last_error)); + } else { + DPRINTF("%s: virStorageVolFree(%p) completed successfully\n", __FUNCTION__, volume->volume); + resource_change_counter(INT_RESOURCE_VOLUME, NULL, volume->volume, 0 TSRMLS_CC); + } + volume->volume = NULL; + } + efree(volume); + } +} + +/* + * Function name: libvirt_storagepool_lookup_by_name + * Since version: 0.4.1(-1) + * Description: Function is used to lookup for storage pool by it's name + * Arguments: @res [resource]: libvirt connection resource + * @name [string]: storage pool name + * Returns: libvirt storagepool resource + */ +PHP_FUNCTION(libvirt_storagepool_lookup_by_name) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + strsize_t name_len; + char *name = NULL; + virStoragePoolPtr pool = NULL; + php_libvirt_storagepool *res_pool; + + GET_CONNECTION_FROM_ARGS("rs", &zconn, &name, &name_len); + + if ((name == NULL) || (name_len < 1)) + RETURN_FALSE; + pool = virStoragePoolLookupByName(conn->conn, name); + DPRINTF("%s: virStoragePoolLookupByName(%p, %s) returned %p\n", PHPFUNC, conn->conn, name, pool); + if (pool == NULL) + RETURN_FALSE; + + res_pool = (php_libvirt_storagepool *)emalloc(sizeof(php_libvirt_storagepool)); + res_pool->pool = pool; + res_pool->conn = conn; + + DPRINTF("%s: returning %p\n", PHPFUNC, res_pool->pool); + resource_change_counter(INT_RESOURCE_STORAGEPOOL, conn->conn, res_pool->pool, 1 TSRMLS_CC); + + VIRT_REGISTER_RESOURCE(res_pool, le_libvirt_storagepool); +} + +/* + * Function name: libvirt_storagepool_lookup_by_volume + * Since version: 0.4.1(-1) + * Description: Function is used to lookup for storage pool by a volume + * Arguments: @res [volume]: volume resource of storage pool + * Returns: libvirt storagepool resource + */ +PHP_FUNCTION(libvirt_storagepool_lookup_by_volume) +{ + php_libvirt_volume *volume; + zval *zvolume; + virStoragePoolPtr pool = NULL; + php_libvirt_storagepool *res_pool; + + GET_VOLUME_FROM_ARGS("r", &zvolume); + + pool = virStoragePoolLookupByVolume(volume->volume); + DPRINTF("%s: virStoragePoolLookupByVolume(%p) returned %p\n", PHPFUNC, volume->volume, pool); + if (pool == NULL) + RETURN_FALSE; + + res_pool = (php_libvirt_storagepool *)emalloc(sizeof(php_libvirt_storagepool)); + res_pool->pool = pool; + res_pool->conn = volume->conn; + + DPRINTF("%s: returning %p\n", PHPFUNC, res_pool->pool); + resource_change_counter(INT_RESOURCE_STORAGEPOOL, res_pool->conn->conn, res_pool->pool, 1 TSRMLS_CC); + + VIRT_REGISTER_RESOURCE(res_pool, le_libvirt_storagepool); +} + +/* + * Function name: libvirt_storagepool_list_volumes + * Since version: 0.4.1(-1) + * Description: Function is used to list volumes in the specified storage pool + * Arguments: @res [resource]: libvirt storagepool resource + * Returns: list of storage volume names in the storage pool in an array using default keys (indexes) + */ +PHP_FUNCTION(libvirt_storagepool_list_volumes) +{ + php_libvirt_storagepool *pool = NULL; + zval *zpool; + char **names = NULL; + int expectedcount = -1; + int i; + int count = -1; + + GET_STORAGEPOOL_FROM_ARGS("r", &zpool); + + if ((expectedcount = virStoragePoolNumOfVolumes(pool->pool)) < 0) + RETURN_FALSE; + + DPRINTF("%s: virStoragePoolNumOfVolumes(%p) returned %d\n", PHPFUNC, pool->pool, expectedcount); + names = (char **)emalloc(expectedcount*sizeof(char *)); + + count = virStoragePoolListVolumes(pool->pool, names, expectedcount); + DPRINTF("%s: virStoragePoolListVolumes(%p, %p, %d) returned %d\n", PHPFUNC, pool->pool, names, expectedcount, count); + array_init(return_value); + + if ((count != expectedcount) || (count < 0)) + RETURN_FALSE; + for (i = 0; i < count; i++) { + VIRT_ADD_NEXT_INDEX_STRING(return_value, names[i]); + free(names[i]); + } + + efree(names); +} + +/* + * Function name: libvirt_storagepool_get_info + * Since version: 0.4.1(-1) + * Description: Function is used to get information about the storage pool + * Arguments: @res [resource]: libvirt storagepool resource + * Returns: storage pool information array of state, capacity, allocation and available space + */ +PHP_FUNCTION(libvirt_storagepool_get_info) +{ + php_libvirt_storagepool *pool = NULL; + zval *zpool; + virStoragePoolInfo poolInfo; + int retval; + + GET_STORAGEPOOL_FROM_ARGS("r", &zpool); + + retval = virStoragePoolGetInfo(pool->pool, &poolInfo); + DPRINTF("%s: virStoragePoolGetInfo(%p, <info>) returned %d\n", PHPFUNC, pool->pool, retval); + if (retval != 0) + RETURN_FALSE; + + array_init(return_value); + + // @todo: fix the long long returns + LONGLONG_INIT; + add_assoc_long(return_value, "state", (long)poolInfo.state); + LONGLONG_ASSOC(return_value, "capacity", poolInfo.capacity); + LONGLONG_ASSOC(return_value, "allocation", poolInfo.allocation); + LONGLONG_ASSOC(return_value, "available", poolInfo.available); +} + +/* + * Function name: libvirt_storagepool_get_uuid_string + * Since version: 0.4.1(-1) + * Description: Function is used to get storage pool by UUID string + * Arguments: @res [resource]: libvirt storagepool resource + * Returns: storagepool UUID string + */ +PHP_FUNCTION(libvirt_storagepool_get_uuid_string) +{ + php_libvirt_storagepool *pool = NULL; + zval *zpool; + char *uuid; + int retval; + + GET_STORAGEPOOL_FROM_ARGS("r", &zpool); + + uuid = (char *)emalloc(VIR_UUID_STRING_BUFLEN); + retval = virStoragePoolGetUUIDString(pool->pool, uuid); + DPRINTF("%s: virStoragePoolGetUUIDString(%p, %p) returned %d (%s)\n", PHPFUNC, pool->pool, uuid, retval, uuid); + if (retval != 0) + RETURN_FALSE; + + VIRT_RETVAL_STRING(uuid); + efree(uuid); +} + +/* + * Function name: libvirt_storagepool_get_name + * Since version: 0.4.1(-1) + * Description: Function is used to get storage pool name from the storage pool resource + * Arguments: @res [resource]: libvirt storagepool resource + * Returns: storagepool name string + */ +PHP_FUNCTION(libvirt_storagepool_get_name) +{ + php_libvirt_storagepool *pool = NULL; + zval *zpool; + const char *name = NULL; + + GET_STORAGEPOOL_FROM_ARGS("r", &zpool); + + name = virStoragePoolGetName(pool->pool); + DPRINTF("%s: virStoragePoolGetName(%p) returned %s\n", PHPFUNC, pool->pool, name); + if (name == NULL) + RETURN_FALSE; + + VIRT_RETURN_STRING(name); +} + +/* + * Function name: libvirt_storagepool_lookup_by_uuid_string + * Since version: 0.4.1(-1) + * Description: Function is used to lookup for storage pool identified by UUID string + * Arguments: @res [resource]: libvirt connection resource + * @uuid [string]: UUID string to look for storagepool + * Returns: libvirt storagepool resource + */ +PHP_FUNCTION(libvirt_storagepool_lookup_by_uuid_string) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + char *uuid = NULL; + strsize_t uuid_len; + virStoragePoolPtr storage = NULL; + php_libvirt_storagepool *res_pool; + + GET_CONNECTION_FROM_ARGS("rs", &zconn, &uuid, &uuid_len); + + if ((uuid == NULL) || (uuid_len < 1)) + RETURN_FALSE; + + storage = virStoragePoolLookupByUUIDString(conn->conn, uuid); + DPRINTF("%s: virStoragePoolLookupByUUIDString(%p, %s) returned %p\n", PHPFUNC, conn->conn, uuid, storage); + if (storage == NULL) + RETURN_FALSE; + + res_pool = (php_libvirt_storagepool *)emalloc(sizeof(php_libvirt_storagepool)); + res_pool->pool = storage; + res_pool->conn = conn; + + DPRINTF("%s: returning %p\n", PHPFUNC, res_pool->pool); + resource_change_counter(INT_RESOURCE_STORAGEPOOL, conn->conn, res_pool->pool, 1 TSRMLS_CC); + + VIRT_REGISTER_RESOURCE(res_pool, le_libvirt_storagepool); +} + +/* + * Function name: libvirt_storagepool_get_xml_desc + * Since version: 0.4.1(-1), changed 0.4.2 + * Description: Function is used to get the XML description for the storage pool identified by res + * Arguments: @res [resource]: libvirt storagepool resource + * @xpath [string]: optional xPath expression string to get just this entry, can be NULL + * Returns: storagepool XML description string or result of xPath expression + */ +PHP_FUNCTION(libvirt_storagepool_get_xml_desc) +{ + php_libvirt_storagepool *pool = NULL; + zval *zpool; + char *xml; + char *xpath = NULL; + char *tmp = NULL; + zend_long flags = 0; + strsize_t xpath_len; + int retval = -1; + + GET_STORAGEPOOL_FROM_ARGS("r|s", &zpool, &xpath, &xpath_len, &flags); + if (xpath_len < 1) + xpath = NULL; + + DPRINTF("%s: pool = %p, flags = %ld, xpath = %s\n", PHPFUNC, pool->pool, flags, xpath); + + xml = virStoragePoolGetXMLDesc(pool->pool, flags); + if (xml == NULL) { + set_error_if_unset("Cannot get the XML description" TSRMLS_CC); + RETURN_FALSE; + } + + tmp = get_string_from_xpath(xml, xpath, NULL, &retval); + if ((tmp == NULL) || (retval < 0)) { + VIRT_RETVAL_STRING(xml); + } else { + VIRT_RETVAL_STRING(tmp); + } + + free(xml); + free(tmp); +} + +/* + * Function name: libvirt_storagepool_define_xml + * Since version: 0.4.1(-1) + * Description: Function is used to define the storage pool from XML string and return it's resource + * Arguments: @res [resource]: libvirt connection resource + * @xml [string]: XML string definition of storagepool + * @flags [int]: flags to define XML + * Returns: libvirt storagepool resource + */ +PHP_FUNCTION(libvirt_storagepool_define_xml) +{ + php_libvirt_storagepool *res_pool = NULL; + php_libvirt_connection *conn = NULL; + zval *zconn; + virStoragePoolPtr pool = NULL; + char *xml; + strsize_t xml_len; + zend_long flags = 0; + + + GET_CONNECTION_FROM_ARGS("rs|l", &zconn, &xml, &xml_len, &flags); + + pool = virStoragePoolDefineXML(conn->conn, xml, (unsigned int)flags); + DPRINTF("%s: virStoragePoolDefineXML(%p, <xml>) returned %p\n", PHPFUNC, conn->conn, pool); + if (pool == NULL) + RETURN_FALSE; + + res_pool = (php_libvirt_storagepool *)emalloc(sizeof(php_libvirt_storagepool)); + res_pool->pool = pool; + res_pool->conn = conn; + + DPRINTF("%s: returning %p\n", PHPFUNC, res_pool->pool); + resource_change_counter(INT_RESOURCE_STORAGEPOOL, conn->conn, res_pool->pool, 1 TSRMLS_CC); + + VIRT_REGISTER_RESOURCE(res_pool, le_libvirt_storagepool); +} + +/* + * Function name: libvirt_storagepool_undefine + * Since version: 0.4.1(-1) + * Description: Function is used to undefine the storage pool identified by it's resource + * Arguments: @res [resource]: libvirt storagepool resource + * Returns: TRUE if success, FALSE on error + */ +PHP_FUNCTION(libvirt_storagepool_undefine) +{ + php_libvirt_storagepool *pool = NULL; + zval *zpool; + int retval = 0; + + GET_STORAGEPOOL_FROM_ARGS("r", &zpool); + + retval = virStoragePoolUndefine(pool->pool); + DPRINTF("%s: virStoragePoolUndefine(%p) returned %d\n", PHPFUNC, pool->pool, retval); + if (retval != 0) + RETURN_FALSE; + + RETURN_TRUE; +} + +/* + * Function name: libvirt_storagepool_create + * Since version: 0.4.1(-1) + * Description: Function is used to create/start the storage pool + * Arguments: @res [resource]: libvirt storagepool resource + * Returns: TRUE if success, FALSE on error + */ +PHP_FUNCTION(libvirt_storagepool_create) +{ + php_libvirt_storagepool *pool = NULL; + zval *zpool; + int retval; + + GET_STORAGEPOOL_FROM_ARGS("r", &zpool); + + retval = virStoragePoolCreate(pool->pool, 0); + DPRINTF("%s: virStoragePoolCreate(%p, 0) returned %d\n", PHPFUNC, pool->pool, retval); + if (retval != 0) + RETURN_FALSE; + RETURN_TRUE; +} + +/* + * Function name: libvirt_storagepool_destroy + * Since version: 0.4.1(-1) + * Description: Function is used to destory the storage pool + * Arguments: @res [resource]: libvirt storagepool resource + * Returns: TRUE if success, FALSE on error + */ +PHP_FUNCTION(libvirt_storagepool_destroy) +{ + php_libvirt_storagepool *pool = NULL; + zval *zpool; + int retval; + + GET_STORAGEPOOL_FROM_ARGS("r", &zpool); + + retval = virStoragePoolDestroy(pool->pool); + DPRINTF("%s: virStoragePoolDestroy(%p) returned %d\n", PHPFUNC, pool->pool, retval); + if (retval != 0) + RETURN_FALSE; + RETURN_TRUE; +} + +/* + * Function name: libvirt_storagepool_is_active + * Since version: 0.4.1(-1) + * Description: Function is used to get information whether storage pool is active or not + * Arguments: @res [resource]: libvirt storagepool resource + * Returns: result of virStoragePoolIsActive + */ +PHP_FUNCTION(libvirt_storagepool_is_active) +{ + php_libvirt_storagepool *pool = NULL; + zval *zpool; + + GET_STORAGEPOOL_FROM_ARGS("r", &zpool); + + RETURN_LONG(virStoragePoolIsActive(pool->pool)); +} + +/* + * Function name: libvirt_storagepool_get_volume_count + * Since version: 0.4.1(-1) + * Description: Function is used to get storage volume count in the storage pool + * Arguments: @res [resource]: libvirt storagepool resource + * Returns: number of volumes in the pool + */ +PHP_FUNCTION(libvirt_storagepool_get_volume_count) +{ + php_libvirt_storagepool *pool = NULL; + zval *zpool; + + GET_STORAGEPOOL_FROM_ARGS("r", &zpool); + + RETURN_LONG(virStoragePoolNumOfVolumes(pool->pool)); +} + +/* + * Function name: libvirt_storagepool_refresh + * Since version: 0.4.1(-1) + * Description: Function is used to refresh the storage pool information + * Arguments: @res [resource]: libvirt storagepool resource + * @flags [int]: refresh flags + * Returns: TRUE if success, FALSE on error + */ +PHP_FUNCTION(libvirt_storagepool_refresh) +{ + php_libvirt_storagepool *pool = NULL; + zval *zpool; + zend_long flags = 0; + int retval; + + GET_STORAGEPOOL_FROM_ARGS("r|l", &zpool, &flags); + + retval = virStoragePoolRefresh(pool->pool, flags); + DPRINTF("%s: virStoragePoolRefresh(%p, %ld) returned %d\n", PHPFUNC, pool->pool, flags, retval); + if (retval < 0) + RETURN_FALSE; + RETURN_TRUE; +} + +/* + * Function name: libvirt_storagepool_set_autostart + * Since version: 0.4.1(-1) + * Description: Function is used to set autostart of the storage pool + * Arguments: @res [resource]: libvirt storagepool resource + * @flags [int]: flags to set autostart + * Returns: result on setting storagepool autostart value + */ +PHP_FUNCTION(libvirt_storagepool_set_autostart) +{ + php_libvirt_storagepool *pool = NULL; + zval *zpool; + zend_bool flags = 0; + int retval; + + GET_STORAGEPOOL_FROM_ARGS("rb", &zpool, &flags); + + retval = virStoragePoolSetAutostart(pool->pool, flags); + DPRINTF("%s: virStoragePoolSetAutostart(%p, %d) returned %d\n", PHPFUNC, pool->pool, flags, retval); + if (retval != 0) + RETURN_FALSE; + RETURN_TRUE; +} + +/* + * Function name: libvirt_storagepool_get_autostart + * Since version: 0.4.1(-1) + * Description: Function is used to get autostart of the storage pool + * Arguments: @res [resource]: libvirt storagepool resource + * Returns: TRUE for autostart enabled, FALSE for autostart disabled, FALSE with last_error set for error + */ +PHP_FUNCTION(libvirt_storagepool_get_autostart) +{ + php_libvirt_storagepool *pool = NULL; + zval *zpool; + int autostart; + + GET_STORAGEPOOL_FROM_ARGS("r", &zpool); + + if (virStoragePoolGetAutostart(pool->pool, &autostart) == 0 && + autostart != 0) + RETURN_TRUE; + + RETURN_FALSE; +} + +/* + * Function name: libvirt_storagepool_build + * Since version: 0.4.2 + * Description: Function is used to Build the underlying storage pool, e.g. create the destination directory for NFS + * Arguments: @res [resource]: libvirt storagepool resource + * Returns: TRUE if success, FALSE on error + */ +PHP_FUNCTION(libvirt_storagepool_build) +{ + php_libvirt_storagepool *pool = NULL; + zval *zpool; + int flags = 0; + int retval; + + GET_STORAGEPOOL_FROM_ARGS("r", &zpool); + + retval = virStoragePoolBuild(pool->pool, flags); + DPRINTF("%s: virStoragePoolBuild(%p, %d) returned %d\n", PHPFUNC, pool->pool, flags, retval); + if (retval == 0) + RETURN_TRUE; + + RETURN_FALSE; +} + +/* + * Function name: libvirt_storagepool_delete + * Since version: 0.4.6 + * Description: Function is used to Delete the underlying storage pool, e.g. remove the destination directory for NFS + * Arguments: @res [resource]: libvirt storagepool resource + * Returns: TRUE if success, FALSE on error + */ +PHP_FUNCTION(libvirt_storagepool_delete) +{ + php_libvirt_storagepool *pool = NULL; + zval *zpool; + int flags = 0; + int retval; + + GET_STORAGEPOOL_FROM_ARGS("r", &zpool); + + retval = virStoragePoolDelete(pool->pool, flags); + DPRINTF("%s: virStoragePoolDelete(%p, %d) returned %d\n", PHPFUNC, pool->pool, flags, retval); + if (retval == 0) + RETURN_TRUE; + + RETURN_FALSE; +} + +/* + * Function name: libvirt_storagevolume_lookup_by_name + * Since version: 0.4.1(-1) + * Description: Function is used to lookup for storage volume by it's name + * Arguments: @res [resource]: libvirt storagepool resource + * @name [string]: name of the storage volume to look for + * Returns: libvirt storagevolume resource + */ +PHP_FUNCTION(libvirt_storagevolume_lookup_by_name) +{ + php_libvirt_storagepool *pool = NULL; + php_libvirt_volume *res_volume; + zval *zpool; + strsize_t name_len; + char *name = NULL; + virStorageVolPtr volume = NULL; + + GET_STORAGEPOOL_FROM_ARGS("rs", &zpool, &name, &name_len); + if ((name == NULL) || (name_len < 1)) + RETURN_FALSE; + + volume = virStorageVolLookupByName(pool->pool, name); + DPRINTF("%s: virStorageVolLookupByName(%p, %s) returned %p\n", PHPFUNC, pool->pool, name, volume); + if (volume == NULL) + RETURN_FALSE; + + res_volume = (php_libvirt_volume *)emalloc(sizeof(php_libvirt_volume)); + res_volume->volume = volume; + res_volume->conn = pool->conn; + + DPRINTF("%s: returning %p\n", PHPFUNC, res_volume->volume); + resource_change_counter(INT_RESOURCE_VOLUME, pool->conn->conn, res_volume->volume, 1 TSRMLS_CC); + + VIRT_REGISTER_RESOURCE(res_volume, le_libvirt_volume); +} + +/* + * Function name: libvirt_storagevolume_lookup_by_path + * Since version: 0.4.1(-2) + * Description: Function is used to lookup for storage volume by it's path + * Arguments: @res [resource]: libvirt connection resource + * @path [string]: path of the storage volume to look for + * Returns: libvirt storagevolume resource + */ +PHP_FUNCTION(libvirt_storagevolume_lookup_by_path) +{ + php_libvirt_connection *conn = NULL; + php_libvirt_volume *res_volume; + zval *zconn; + strsize_t name_len; + char *name = NULL; + virStorageVolPtr volume = NULL; + + GET_CONNECTION_FROM_ARGS("rs", &zconn, &name, &name_len); + if ((name == NULL) || (name_len < 1)) + RETURN_FALSE; + + volume = virStorageVolLookupByPath(conn->conn, name); + DPRINTF("%s: virStorageVolLookupByPath(%p, %s) returned %p\n", PHPFUNC, conn->conn, name, volume); + if (volume == NULL) { + set_error_if_unset("Cannot find storage volume on requested path" TSRMLS_CC); + RETURN_FALSE; + } + + res_volume = (php_libvirt_volume *)emalloc(sizeof(php_libvirt_volume)); + res_volume->volume = volume; + res_volume->conn = conn; + + DPRINTF("%s: returning %p\n", PHPFUNC, res_volume->volume); + resource_change_counter(INT_RESOURCE_VOLUME, conn->conn, res_volume->volume, 1 TSRMLS_CC); + + VIRT_REGISTER_RESOURCE(res_volume, le_libvirt_volume); +} + +/* + * Function name: libvirt_storagevolume_get_name + * Since version: 0.4.1(-2) + * Description: Function is used to get the storage volume name + * Arguments: @res [resource]: libvirt storagevolume resource + * Returns: storagevolume name + */ +PHP_FUNCTION(libvirt_storagevolume_get_name) +{ + php_libvirt_volume *volume = NULL; + zval *zvolume; + const char *retval; + + GET_VOLUME_FROM_ARGS("r", &zvolume); + + retval = virStorageVolGetName(volume->volume); + DPRINTF("%s: virStorageVolGetName(%p) returned %s\n", PHPFUNC, volume->volume, retval); + if (retval == NULL) + RETURN_FALSE; + + VIRT_RETURN_STRING(retval); +} + +/* + * Function name: libvirt_storagevolume_get_path + * Since version: 0.4.1(-2) + * Description: Function is used to get the storage volume path + * Arguments: @res [resource]: libvirt storagevolume resource + * Returns: storagevolume path + */ +PHP_FUNCTION(libvirt_storagevolume_get_path) +{ + php_libvirt_volume *volume = NULL; + zval *zvolume; + char *retval; + + GET_VOLUME_FROM_ARGS("r", &zvolume); + + retval = virStorageVolGetPath(volume->volume); + DPRINTF("%s: virStorageVolGetPath(%p) returned %s\n", PHPFUNC, volume->volume, retval); + if (retval == NULL) + RETURN_FALSE; + + VIRT_RETVAL_STRING(retval); + free(retval); +} + +/* + * Function name: libvirt_storagevolume_get_info + * Since version: 0.4.1(-1) + * Description: Function is used to get the storage volume information + * Arguments: @res [resource]: libvirt storagevolume resource + * Returns: storage volume information array of type, allocation and capacity + */ +PHP_FUNCTION(libvirt_storagevolume_get_info) +{ + php_libvirt_volume *volume = NULL; + zval *zvolume; + virStorageVolInfo volumeInfo; + int retval; + + GET_VOLUME_FROM_ARGS("r", &zvolume); + + retval = virStorageVolGetInfo(volume->volume, &volumeInfo); + DPRINTF("%s: virStorageVolGetInfo(%p, <info>) returned %d\n", PHPFUNC, volume->volume, retval); + if (retval != 0) + RETURN_FALSE; + + array_init(return_value); + LONGLONG_INIT; + add_assoc_long(return_value, "type", (long)volumeInfo.type); + LONGLONG_ASSOC(return_value, "capacity", volumeInfo.capacity); + LONGLONG_ASSOC(return_value, "allocation", volumeInfo.allocation); +} + +/* + * Function name: libvirt_storagevolume_get_xml_desc + * Since version: 0.4.1(-1), changed 0.4.2 + * Description: Function is used to get the storage volume XML description + * Arguments: @res [resource]: libvirt storagevolume resource + * @xpath [string]: optional xPath expression string to get just this entry, can be NULL + * @flags [int]: optional flags + * Returns: storagevolume XML description or result of xPath expression + */ +PHP_FUNCTION(libvirt_storagevolume_get_xml_desc) +{ + php_libvirt_volume *volume = NULL; + zval *zvolume; + char *tmp = NULL; + char *xml; + char *xpath = NULL; + strsize_t xpath_len; + zend_long flags = 0; + int retval = -1; + + GET_VOLUME_FROM_ARGS("rs|l", &zvolume, &xpath, &xpath_len, &flags); + if (xpath_len < 1) + xpath = NULL; + + DPRINTF("%s: volume = %p, xpath = %s, flags = %ld\n", PHPFUNC, volume->volume, xpath, flags); + + xml = virStorageVolGetXMLDesc(volume->volume, flags); + if (xml == NULL) { + set_error_if_unset("Cannot get the XML description" TSRMLS_CC); + RETURN_FALSE; + } + + tmp = get_string_from_xpath(xml, xpath, NULL, &retval); + if ((tmp == NULL) || (retval < 0)) { + VIRT_RETVAL_STRING(xml); + } else { + VIRT_RETVAL_STRING(tmp); + } + + free(xml); + free(tmp); +} + +/* + * Function name: libvirt_storagevolume_create_xml + * Since version: 0.4.1(-1) + * Description: Function is used to create the new storage pool and return the handle to new storage pool + * Arguments: @res [resource]: libvirt storagepool resource + * @xml [string]: XML string to create the storage volume in the storage pool + * @flags [int]: virStorageVolCreateXML flags + * Returns: libvirt storagevolume resource + */ +PHP_FUNCTION(libvirt_storagevolume_create_xml) +{ + php_libvirt_volume *res_volume = NULL; + php_libvirt_storagepool *pool = NULL; + zval *zpool; + virStorageVolPtr volume = NULL; + char *xml; + zend_long flags = 0; + strsize_t xml_len; + + GET_STORAGEPOOL_FROM_ARGS("rs|l", &zpool, &xml, &xml_len, &flags); + + volume = virStorageVolCreateXML(pool->pool, xml, flags); + DPRINTF("%s: virStorageVolCreateXML(%p, <xml>, 0) returned %p\n", PHPFUNC, pool->pool, volume); + if (volume == NULL) + RETURN_FALSE; + + res_volume = (php_libvirt_volume *)emalloc(sizeof(php_libvirt_volume)); + res_volume->volume = volume; + res_volume->conn = pool->conn; + + DPRINTF("%s: returning %p\n", PHPFUNC, res_volume->volume); + resource_change_counter(INT_RESOURCE_VOLUME, pool->conn->conn, res_volume->volume, 1 TSRMLS_CC); + + VIRT_REGISTER_RESOURCE(res_volume, le_libvirt_volume); +} + +/* + * Function name: libvirt_storagevolume_create_xml_from + * Since version: 0.4.1(-2) + * Description: Function is used to clone the new storage volume into pool from the orignial volume + * Arguments: @pool [resource]: libvirt storagepool resource + * @xml [string]: XML string to create the storage volume in the storage pool + * @original_volume [resource]: libvirt storagevolume resource + * Returns: libvirt storagevolume resource + */ +PHP_FUNCTION(libvirt_storagevolume_create_xml_from) +{ + php_libvirt_volume *res_volume = NULL; + php_libvirt_storagepool *pool = NULL; + zval *zpool; + + php_libvirt_volume *pl_volume = NULL; + zval *zvolume; + + virStorageVolPtr volume = NULL; + char *xml; + strsize_t xml_len; + + if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rsr", &zpool, &xml, &xml_len, &zvolume) == FAILURE) { + set_error("Invalid pool resource, XML or volume resouce" TSRMLS_CC); + RETURN_FALSE; + } + + VIRT_FETCH_RESOURCE(pool, php_libvirt_storagepool*, &zpool, PHP_LIBVIRT_STORAGEPOOL_RES_NAME, le_libvirt_storagepool); + if ((pool == NULL) || (pool->pool == NULL)) + RETURN_FALSE; + VIRT_FETCH_RESOURCE(pl_volume, php_libvirt_volume*, &zvolume, PHP_LIBVIRT_VOLUME_RES_NAME, le_libvirt_volume); + if ((pl_volume == NULL) || (pl_volume->volume == NULL)) + RETURN_FALSE; + resource_change_counter(INT_RESOURCE_VOLUME, NULL, pl_volume->volume, 1 TSRMLS_CC); + + volume = virStorageVolCreateXMLFrom(pool->pool, xml, pl_volume->volume, 0); + DPRINTF("%s: virStorageVolCreateXMLFrom(%p, <xml>, %p, 0) returned %p\n", PHPFUNC, pool->pool, pl_volume->volume, volume); + if (volume == NULL) + RETURN_FALSE; + + res_volume = (php_libvirt_volume *)emalloc(sizeof(php_libvirt_volume)); + res_volume->volume = volume; + res_volume->conn = pool->conn; + + DPRINTF("%s: returning %p\n", PHPFUNC, res_volume->volume); + resource_change_counter(INT_RESOURCE_VOLUME, pool->conn->conn, res_volume->volume, 1 TSRMLS_CC); + + VIRT_REGISTER_RESOURCE(res_volume, le_libvirt_volume); +} + +/* + * Function name: libvirt_storagevolume_delete + * Since version: 0.4.2 + * Description: Function is used to delete to volume identified by it's resource + * Arguments: @res [resource]: libvirt storagevolume resource + * @flags [int]: optional flags for the storage volume deletion for virStorageVolDelete() + * Returns: TRUE for success, FALSE on error + */ +PHP_FUNCTION(libvirt_storagevolume_delete) +{ + php_libvirt_volume *volume = NULL; + zval *zvolume; + zend_long flags = 0; + int retval = 0; + + GET_VOLUME_FROM_ARGS("r|l", &zvolume, &flags); + + retval = virStorageVolDelete(volume->volume, flags); + DPRINTF("%s: virStorageVolDelete(%p, %d) returned %d\n", PHPFUNC, volume->volume, (int) flags, retval); + if (retval != 0) { + set_error_if_unset("Cannot delete storage volume" TSRMLS_CC); + RETURN_FALSE; + } + + RETURN_TRUE; +} + +/* + * Function name: libvirt_storagevolume_download + * Since version: 0.5.0 + * Description: Function is used to download volume identified by it's resource + * Arguments: @res [resource]: libvirt storagevolume resource + * @stream [resource]: stream to use as output + * @offset [int]: position to start reading from + * @length [int] : limit on amount of data to download + * @flags [int]: optional flags for the storage volume download for virStorageVolDownload() + * Returns: int + */ +PHP_FUNCTION(libvirt_storagevolume_download) +{ + php_libvirt_volume *volume = NULL; + php_libvirt_stream *stream = NULL; + zval *zvolume; + zval *zstream; + zend_long flags = 0; + zend_long offset = 0; + zend_long length = 0; + int retval = -1; + + if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rr|l|l|l", &zvolume, &zstream, &offset, &length, &flags) == FAILURE) + RETURN_LONG(retval); + VIRT_FETCH_RESOURCE(volume, php_libvirt_volume*, &zvolume, PHP_LIBVIRT_VOLUME_RES_NAME, le_libvirt_volume); + if ((volume == NULL) || (volume->volume == NULL)) + RETURN_LONG(retval); + VIRT_FETCH_RESOURCE(stream, php_libvirt_stream*, &zstream, PHP_LIBVIRT_STREAM_RES_NAME, le_libvirt_stream); + if ((stream == NULL) || (stream->stream == NULL)) + RETURN_LONG(retval); + + retval = virStorageVolDownload(volume->volume, stream->stream, offset, length, flags); + DPRINTF("%s: virStorageVolDownload(%p, %p, %d, %d, %d) returned %d\n", PHPFUNC, volume->volume, stream->stream, (int) offset, (int) length, (int) flags, retval); + + if (retval == -1) { + set_error("Cannot download from stream" TSRMLS_CC); + RETURN_LONG(retval); + } + + RETURN_LONG(retval); +} + +/* + * Function name: libvirt_storagevolume_upload + * Since version: 0.5.0 + * Description: Function is used to upload volume identified by it's resource + * Arguments: @res [resource]: libvirt storagevolume resource + * @stream [resource]: stream to use as input + * @offset [int]: position to start writing to + * @length [int] : limit on amount of data to upload + * @flags [int]: optional flags for the storage volume upload for virStorageVolUpload() + * Returns: int + */ +PHP_FUNCTION(libvirt_storagevolume_upload) +{ + php_libvirt_volume *volume = NULL; + php_libvirt_stream *stream = NULL; + zval *zvolume; + zval *zstream; + zend_long flags = 0; + zend_long offset = 0; + zend_long length = 0; + int retval = -1; + + if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rr|l|l|l", &zvolume, &zstream, &offset, &length, &flags) == FAILURE) + RETURN_LONG(retval); + VIRT_FETCH_RESOURCE(volume, php_libvirt_volume*, &zvolume, PHP_LIBVIRT_VOLUME_RES_NAME, le_libvirt_volume); + if ((volume == NULL) || (volume->volume == NULL)) + RETURN_LONG(retval); + VIRT_FETCH_RESOURCE(stream, php_libvirt_stream*, &zstream, PHP_LIBVIRT_STREAM_RES_NAME, le_libvirt_stream); + if ((stream == NULL) || (stream->stream == NULL)) + RETURN_LONG(retval); + + retval = virStorageVolUpload(volume->volume, stream->stream, offset, length, flags); + DPRINTF("%s: virStorageVolUpload(%p, %p, %d, %d, %d) returned %d\n", PHPFUNC, volume->volume, stream->stream, (int) offset, (int) length, (int) flags, retval); + + if (retval == -1) { + set_error_if_unset("Cannot upload storage volume" TSRMLS_CC); + RETURN_LONG(retval); + } + + RETURN_LONG(retval); +} + +/* + * Function name: libvirt_storagevolume_resize + * Since version: 0.5.0 + * Description: Function is used to resize volume identified by it's resource + * Arguments: @res [resource]: libvirt storagevolume resource + * @capacity [int]: capacity for the storage volume + * @flags [int]: optional flags for the storage volume resize for virStorageVolResize() + * Returns: int + */ +PHP_FUNCTION(libvirt_storagevolume_resize) +{ + php_libvirt_volume *volume = NULL; + zval *zvolume; + zend_long flags = 0; + zend_long capacity = 0; + int retval = -1; + + GET_VOLUME_FROM_ARGS("rl|l", &zvolume, &capacity, &flags); + + retval = virStorageVolResize(volume->volume, capacity, flags); + DPRINTF("%s: virStorageVolResize(%p, %d, %d) returned %d\n", PHPFUNC, volume->volume, (int) capacity, (int) flags, retval); + if (retval != 0) { + set_error_if_unset("Cannot resize storage volume" TSRMLS_CC); + RETURN_LONG(retval); + } + + RETURN_LONG(retval); +} + +/* + * Function name: libvirt_list_storagepools + * Since version: 0.4.1(-1) + * Description: Function is used to list storage pools on the connection + * Arguments: @res [resource]: libvirt connection resource + * Returns: libvirt storagepool names array for the connection + */ +PHP_FUNCTION(libvirt_list_storagepools) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + int count = -1; + int expectedcount = -1; + char **names; + int i; + + GET_CONNECTION_FROM_ARGS("r", &zconn); + + if ((expectedcount = virConnectNumOfStoragePools(conn->conn)) < 0) + RETURN_FALSE; + + names = (char **)emalloc(expectedcount*sizeof(char *)); + count = virConnectListStoragePools(conn->conn, names, expectedcount); + + if ((count != expectedcount) || (count < 0)) { + efree(names); + RETURN_FALSE; + } + + array_init(return_value); + for (i = 0; i < count; i++) { + VIRT_ADD_NEXT_INDEX_STRING(return_value, names[i]); + free(names[i]); + } + efree(names); + + + if ((expectedcount = virConnectNumOfDefinedStoragePools(conn->conn)) < 0) + RETURN_FALSE; + names = (char **)emalloc(expectedcount * sizeof(char *)); + count = virConnectListDefinedStoragePools(conn->conn, names, expectedcount); + if ((count != expectedcount) || (count < 0)) { + efree(names); + RETURN_FALSE; + } + + for (i = 0; i < count; i++) { + VIRT_ADD_NEXT_INDEX_STRING(return_value, names[i]); + free(names[i]); + } + efree(names); +} + +/* + * Function name: libvirt_list_active_storagepools + * Since version: 0.4.1(-1) + * Description: Function is used to list active storage pools on the connection + * Arguments: @res [resource]: libvirt connection resource + * Returns: libvirt storagepool names array for the connection + */ +PHP_FUNCTION(libvirt_list_active_storagepools) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + int count = -1; + int expectedcount = -1; + char **names; + int i; + + GET_CONNECTION_FROM_ARGS("r", &zconn); + + if ((expectedcount = virConnectNumOfStoragePools(conn->conn)) < 0) + RETURN_FALSE; + + names = (char **)emalloc(expectedcount*sizeof(char *)); + count = virConnectListStoragePools(conn->conn, names, expectedcount); + + if ((count != expectedcount) || (count < 0)) { + efree(names); + RETURN_FALSE; + } + array_init(return_value); + for (i = 0; i < count; i++) { + VIRT_ADD_NEXT_INDEX_STRING(return_value, names[i]); + free(names[i]); + } + efree(names); +} + +/* + * Function name: libvirt_list_inactive_storagepools + * Since version: 0.4.1(-1) + * Description: Function is used to list inactive storage pools on the connection + * Arguments: @res [resource]: libvirt connection resource + * Returns: libvirt storagepool names array for the connection + */ +PHP_FUNCTION(libvirt_list_inactive_storagepools) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + int count = -1; + int expectedcount = -1; + char **names; + int i; + + GET_CONNECTION_FROM_ARGS("r", &zconn); + + if ((expectedcount = virConnectNumOfDefinedStoragePools(conn->conn)) < 0) + RETURN_FALSE; + + names = (char **)emalloc(expectedcount * sizeof(char *)); + count = virConnectListDefinedStoragePools(conn->conn, names, expectedcount); + if ((count != expectedcount) || (count < 0)) { + efree(names); + RETURN_FALSE; + } + + array_init(return_value); + for (i = 0; i < count; i++) { + VIRT_ADD_NEXT_INDEX_STRING(return_value, names[i]); + free(names[i]); + } + efree(names); +} diff --git a/src/libvirt-storage.h b/src/libvirt-storage.h new file mode 100644 index 0000000..de972f7 --- /dev/null +++ b/src/libvirt-storage.h @@ -0,0 +1,137 @@ +/* + * libvirt-storage.h: The PHP bindings to libvirt storage API + * + * See COPYING for the license of this software + */ + +#ifndef __LIBVIRT_STORAGE_H__ +# define __LIBVIRT_STORAGE_H__ + +# include "libvirt-connection.h" + +# define PHP_LIBVIRT_STORAGEPOOL_RES_NAME "Libvirt storagepool" +# define PHP_LIBVIRT_VOLUME_RES_NAME "Libvirt volume" +# define INT_RESOURCE_STORAGEPOOL 0x10 +# define INT_RESOURCE_VOLUME 0x20 + +# define PHP_FE_LIBVIRT_STORAGE \ + PHP_FE(libvirt_storagepool_lookup_by_name, arginfo_libvirt_conn_name) \ + PHP_FE(libvirt_storagepool_lookup_by_volume, arginfo_libvirt_conn) \ + PHP_FE(libvirt_storagepool_list_volumes, arginfo_libvirt_conn) \ + PHP_FE(libvirt_storagepool_get_info, arginfo_libvirt_conn) \ + PHP_FE(libvirt_storagepool_get_uuid_string, arginfo_libvirt_conn) \ + PHP_FE(libvirt_storagepool_get_name, arginfo_libvirt_conn) \ + PHP_FE(libvirt_storagepool_lookup_by_uuid_string, arginfo_libvirt_conn_uuid) \ + PHP_FE(libvirt_storagepool_get_xml_desc, arginfo_libvirt_conn_xpath) \ + PHP_FE(libvirt_storagepool_define_xml, arginfo_libvirt_storagepool_define_xml) \ + PHP_FE(libvirt_storagepool_undefine, arginfo_libvirt_conn) \ + PHP_FE(libvirt_storagepool_create, arginfo_libvirt_conn) \ + PHP_FE(libvirt_storagepool_destroy, arginfo_libvirt_conn) \ + PHP_FE(libvirt_storagepool_is_active, arginfo_libvirt_conn) \ + PHP_FE(libvirt_storagepool_get_volume_count, arginfo_libvirt_conn) \ + PHP_FE(libvirt_storagepool_refresh, arginfo_libvirt_conn_optflags) \ + PHP_FE(libvirt_storagepool_set_autostart, arginfo_libvirt_conn_flags) \ + PHP_FE(libvirt_storagepool_get_autostart, arginfo_libvirt_conn) \ + PHP_FE(libvirt_storagepool_build, arginfo_libvirt_conn) \ + PHP_FE(libvirt_storagepool_delete, arginfo_libvirt_conn) \ + PHP_FE(libvirt_storagevolume_lookup_by_name, arginfo_libvirt_conn_name) \ + PHP_FE(libvirt_storagevolume_lookup_by_path, arginfo_libvirt_storagevolume_lookup_by_path) \ + PHP_FE(libvirt_storagevolume_get_name, arginfo_libvirt_conn) \ + PHP_FE(libvirt_storagevolume_get_path, arginfo_libvirt_conn) \ + PHP_FE(libvirt_storagevolume_get_info, arginfo_libvirt_conn) \ + PHP_FE(libvirt_storagevolume_get_xml_desc, arginfo_libvirt_storagevolume_get_xml_desc) \ + PHP_FE(libvirt_storagevolume_create_xml, arginfo_libvirt_conn_xml) \ + PHP_FE(libvirt_storagevolume_create_xml_from, arginfo_libvirt_storagevolume_create_xml_from) \ + PHP_FE(libvirt_storagevolume_delete, arginfo_libvirt_conn_optflags) \ + PHP_FE(libvirt_storagevolume_download, arginfo_libvirt_storagevolume_download) \ + PHP_FE(libvirt_storagevolume_upload, arginfo_libvirt_storagevolume_download) \ + PHP_FE(libvirt_storagevolume_resize, arginfo_libvirt_storagevolume_resize) \ + PHP_FE(libvirt_list_storagepools, arginfo_libvirt_conn) \ + PHP_FE(libvirt_list_active_storagepools, arginfo_libvirt_conn) \ + PHP_FE(libvirt_list_inactive_storagepools, arginfo_libvirt_conn) + +# define GET_STORAGEPOOL_FROM_ARGS(args, ...) \ + do { \ + reset_error(TSRMLS_C); \ + if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, \ + args, \ + __VA_ARGS__) == FAILURE) { \ + set_error("Invalid arguments" TSRMLS_CC); \ + RETURN_FALSE; \ + } \ + \ + VIRT_FETCH_RESOURCE(pool, php_libvirt_storagepool*, &zpool, \ + PHP_LIBVIRT_STORAGEPOOL_RES_NAME, \ + le_libvirt_storagepool); \ + if ((pool == NULL) || (pool->pool == NULL)) \ + RETURN_FALSE; \ + } while (0) \ + +# define GET_VOLUME_FROM_ARGS(args, ...) \ + do { \ + reset_error(TSRMLS_C); \ + if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, \ + args, \ + __VA_ARGS__) == FAILURE) { \ + set_error("Invalid arguments" TSRMLS_CC); \ + RETURN_FALSE; \ + } \ + \ + VIRT_FETCH_RESOURCE(volume, php_libvirt_volume*, &zvolume, \ + PHP_LIBVIRT_VOLUME_RES_NAME, le_libvirt_volume); \ + if ((volume == NULL) || (volume->volume == NULL)) \ + RETURN_FALSE; \ + } while (0) \ + +int le_libvirt_storagepool; +int le_libvirt_volume; + +typedef struct _php_libvirt_storagepool { + virStoragePoolPtr pool; + php_libvirt_connection* conn; +} php_libvirt_storagepool; + +typedef struct _php_libvirt_volume { + virStorageVolPtr volume; + php_libvirt_connection* conn; +} php_libvirt_volume; + +void php_libvirt_storagepool_dtor(virt_resource *rsrc TSRMLS_DC); +void php_libvirt_volume_dtor(virt_resource *rsrc TSRMLS_DC); + +PHP_FUNCTION(libvirt_storagepool_lookup_by_name); +PHP_FUNCTION(libvirt_storagepool_lookup_by_volume); +PHP_FUNCTION(libvirt_storagepool_list_volumes); +PHP_FUNCTION(libvirt_storagepool_get_info); +PHP_FUNCTION(libvirt_storagepool_get_uuid_string); +PHP_FUNCTION(libvirt_storagepool_get_name); +PHP_FUNCTION(libvirt_storagepool_lookup_by_uuid_string); +PHP_FUNCTION(libvirt_storagepool_get_xml_desc); +PHP_FUNCTION(libvirt_storagepool_define_xml); +PHP_FUNCTION(libvirt_storagepool_undefine); +PHP_FUNCTION(libvirt_storagepool_create); +PHP_FUNCTION(libvirt_storagepool_destroy); +PHP_FUNCTION(libvirt_storagepool_is_active); +PHP_FUNCTION(libvirt_storagepool_get_volume_count); +PHP_FUNCTION(libvirt_storagepool_refresh); +PHP_FUNCTION(libvirt_storagepool_set_autostart); +PHP_FUNCTION(libvirt_storagepool_get_autostart); +PHP_FUNCTION(libvirt_storagepool_build); +PHP_FUNCTION(libvirt_storagepool_delete); +PHP_FUNCTION(libvirt_storagevolume_lookup_by_name); +PHP_FUNCTION(libvirt_storagevolume_lookup_by_path); +PHP_FUNCTION(libvirt_storagevolume_get_name); +PHP_FUNCTION(libvirt_storagevolume_get_path); +PHP_FUNCTION(libvirt_storagevolume_get_info); +PHP_FUNCTION(libvirt_storagevolume_get_xml_desc); +PHP_FUNCTION(libvirt_storagevolume_create_xml); +PHP_FUNCTION(libvirt_storagevolume_create_xml_from); +PHP_FUNCTION(libvirt_storagevolume_delete); +PHP_FUNCTION(libvirt_storagevolume_download); +PHP_FUNCTION(libvirt_storagevolume_upload); +PHP_FUNCTION(libvirt_storagevolume_resize); +PHP_FUNCTION(libvirt_list_storagepools); +PHP_FUNCTION(libvirt_list_active_storagepools); +PHP_FUNCTION(libvirt_list_inactive_storagepools); + +#endif -- 2.13.3

--- src/Makefile.am | 3 +- src/libvirt-nodedev.c | 340 ++++++++++++++++++++++++++++++++++++++++++++++++ src/libvirt-nodedev.h | 54 ++++++++ src/libvirt-php.c | 353 +------------------------------------------------- src/libvirt-php.h | 13 -- 5 files changed, 399 insertions(+), 364 deletions(-) create mode 100644 src/libvirt-nodedev.c create mode 100644 src/libvirt-nodedev.h diff --git a/src/Makefile.am b/src/Makefile.am index 1b78011..30bebad 100644 --- a/src/Makefile.am +++ b/src/Makefile.am @@ -27,8 +27,9 @@ libvirt_php_la_SOURCES = \ libvirt-stream.c libvirt-stream.h \ libvirt-domain.c libvirt-domain.h \ libvirt-snapshot.c libvirt-snapshot.h \ + libvirt-storage.c libvirt-storage.h \ libvirt-network.c libvirt-network.h \ - libvirt-storage.c libvirt-storage.h + libvirt-nodedev.c libvirt-nodedev.h libvirt_php_la_CFLAGS = \ $(AM_CFLAGS) \ -DCOMPILE_DL_LIBVIRT=1 diff --git a/src/libvirt-nodedev.c b/src/libvirt-nodedev.c new file mode 100644 index 0000000..03f7257 --- /dev/null +++ b/src/libvirt-nodedev.c @@ -0,0 +1,340 @@ +/* + * libvirt-nodedev.c: The PHP bindings to libvirt nodedev API + * + * See COPYING for the license of this software + */ + +#include <libvirt/libvirt.h> + +#include "libvirt-php.h" +#include "libvirt-nodedev.h" + +DEBUG_INIT("nodedev"); + +void +php_libvirt_nodedev_dtor(virt_resource *rsrc TSRMLS_DC) +{ + php_libvirt_nodedev *nodedev = (php_libvirt_nodedev *)rsrc->ptr; + int rv = 0; + + if (nodedev != NULL) { + if (nodedev->device != NULL) { + if (!check_resource_allocation(nodedev->conn->conn, INT_RESOURCE_NODEDEV, nodedev->device TSRMLS_CC)) { + nodedev->device = NULL; + efree(nodedev); + return; + } + rv = virNodeDeviceFree(nodedev->device); + if (rv != 0) { + DPRINTF("%s: virNodeDeviceFree(%p) returned %d (%s)\n", __FUNCTION__, nodedev->device, rv, LIBVIRT_G(last_error)); + php_error_docref(NULL TSRMLS_CC, E_WARNING, "virStorageVolFree failed with %i on destructor: %s", rv, LIBVIRT_G(last_error)); + } else { + DPRINTF("%s: virNodeDeviceFree(%p) completed successfully\n", __FUNCTION__, nodedev->device); + resource_change_counter(INT_RESOURCE_NODEDEV, nodedev->conn->conn, nodedev->device, 0 TSRMLS_CC); + } + nodedev->device = NULL; + } + efree(nodedev); + } +} + +/* + * Function name: libvirt_nodedev_get + * Since version: 0.4.1(-1) + * Description: Function is used to get the node device by it's name + * Arguments: @res [resource]: libvirt connection resource + * @name [string]: name of the nodedev to get resource + * Returns: libvirt nodedev resource + */ +PHP_FUNCTION(libvirt_nodedev_get) +{ + php_libvirt_connection *conn = NULL; + php_libvirt_nodedev *res_dev = NULL; + virNodeDevice *dev; + zval *zconn; + char *name; + strsize_t name_len; + + GET_CONNECTION_FROM_ARGS("rs", &zconn, &name, &name_len); + + if ((dev = virNodeDeviceLookupByName(conn->conn, name)) == NULL) { + set_error("Cannot get find requested node device" TSRMLS_CC); + RETURN_FALSE; + } + + res_dev = (php_libvirt_nodedev *)emalloc(sizeof(php_libvirt_nodedev)); + res_dev->device = dev; + res_dev->conn = conn; + + DPRINTF("%s: returning %p\n", PHPFUNC, res_dev->device); + resource_change_counter(INT_RESOURCE_NODEDEV, conn->conn, res_dev->device, 1 TSRMLS_CC); + + VIRT_REGISTER_RESOURCE(res_dev, le_libvirt_nodedev); +} + +/* + * Function name: libvirt_nodedev_capabilities + * Since version: 0.4.1(-1) + * Description: Function is used to list node devices by capabilities + * Arguments: @res [resource]: libvirt nodedev resource + * Returns: nodedev capabilities array + */ +PHP_FUNCTION(libvirt_nodedev_capabilities) +{ + php_libvirt_nodedev *nodedev = NULL; + zval *znodedev; + int count = -1; + int expectedcount = -1; + char **names; + int i; + + GET_NODEDEV_FROM_ARGS("r", &znodedev); + + if ((expectedcount = virNodeDeviceNumOfCaps(nodedev->device)) < 0) + RETURN_FALSE; + names = (char **)emalloc(expectedcount*sizeof(char *)); + count = virNodeDeviceListCaps(nodedev->device, names, expectedcount); + if ((count != expectedcount) || (count < 0)) + RETURN_FALSE; + + array_init(return_value); + for (i = 0; i < count; i++) { + VIRT_ADD_NEXT_INDEX_STRING(return_value, names[i]); + free(names[i]); + } + + efree(names); +} + +/* + * Function name: libvirt_nodedev_get_xml_desc + * Since version: 0.4.1(-1), changed 0.4.2 + * Description: Function is used to get the node device's XML description + * Arguments: @res [resource]: libvirt nodedev resource + * @xpath [string]: optional xPath expression string to get just this entry, can be NULL + * Returns: nodedev XML description string or result of xPath expression + */ +PHP_FUNCTION(libvirt_nodedev_get_xml_desc) +{ + php_libvirt_nodedev *nodedev = NULL; + zval *znodedev; + char *tmp = NULL; + char *xml = NULL; + char *xpath = NULL; + strsize_t xpath_len; + int retval = -1; + + GET_NODEDEV_FROM_ARGS("r|s", &znodedev, &xpath, &xpath_len); + if (xpath_len < 1) + xpath = NULL; + + xml = virNodeDeviceGetXMLDesc(nodedev->device, 0); + if (!xml) { + set_error("Cannot get the device XML information" TSRMLS_CC); + RETURN_FALSE; + } + + tmp = get_string_from_xpath(xml, xpath, NULL, &retval); + if ((tmp == NULL) || (retval < 0)) + VIRT_RETVAL_STRING(xml); + else + VIRT_RETVAL_STRING(tmp); + + free(xml); + free(tmp); +} + +/* + * Function name: libvirt_nodedev_get_information + * Since version: 0.4.1(-1) + * Description: Function is used to get the node device's information + * Arguments: @res [resource]: libvirt nodedev resource + * Returns: nodedev information array + */ +PHP_FUNCTION(libvirt_nodedev_get_information) +{ + php_libvirt_nodedev *nodedev = NULL; + zval *znodedev; + int retval = -1; + char *xml = NULL; + char *tmp = NULL; + char *cap = NULL; + + GET_NODEDEV_FROM_ARGS("r", &znodedev); + + xml = virNodeDeviceGetXMLDesc(nodedev->device, 0); + if (!xml) { + set_error("Cannot get the device XML information" TSRMLS_CC); + RETURN_FALSE; + } + + array_init(return_value); + + /* Get name */ + tmp = get_string_from_xpath(xml, "//device/name", NULL, &retval); + if (tmp == NULL) { + set_error("Invalid XPath node for device name" TSRMLS_CC); + goto error; + } + + if (retval < 0) { + set_error("Cannot get XPath expression result for device name" TSRMLS_CC); + goto error; + } + + VIRT_ADD_ASSOC_STRING(return_value, "name", tmp); + + /* Get parent name */ + free(tmp); + tmp = get_string_from_xpath(xml, "//device/parent", NULL, &retval); + if ((tmp != NULL) && (retval > 0)) + VIRT_ADD_ASSOC_STRING(return_value, "parent", tmp); + + /* Get capability */ + cap = get_string_from_xpath(xml, "//device/capability/@type", NULL, &retval); + if ((cap != NULL) && (retval > 0)) + VIRT_ADD_ASSOC_STRING(return_value, "capability", cap); + + /* System capability is having hardware and firmware sub-blocks */ + if (strcmp(cap, "system") == 0) { + /* Get hardware vendor */ + free(tmp); + tmp = get_string_from_xpath(xml, "//device/capability/hardware/vendor", NULL, &retval); + if ((tmp != NULL) && (retval > 0)) + VIRT_ADD_ASSOC_STRING(return_value, "hardware_vendor", tmp); + + /* Get hardware version */ + free(tmp); + tmp = get_string_from_xpath(xml, "//device/capability/hardware/version", NULL, &retval); + if ((tmp != NULL) && (retval > 0)) + VIRT_ADD_ASSOC_STRING(return_value, "hardware_version", tmp); + + /* Get hardware serial */ + free(tmp); + tmp = get_string_from_xpath(xml, "//device/capability/hardware/serial", NULL, &retval); + if ((tmp != NULL) && (retval > 0)) + VIRT_ADD_ASSOC_STRING(return_value, "hardware_serial", tmp); + + /* Get hardware UUID */ + free(tmp); + tmp = get_string_from_xpath(xml, "//device/capability/hardware/uuid", NULL, &retval); + if (tmp != NULL) + VIRT_ADD_ASSOC_STRING(return_value, "hardware_uuid", tmp); + + /* Get firmware vendor */ + free(tmp); + tmp = get_string_from_xpath(xml, "//device/capability/firmware/vendor", NULL, &retval); + if ((tmp != NULL) && (retval > 0)) + VIRT_ADD_ASSOC_STRING(return_value, "firmware_vendor", tmp); + + /* Get firmware version */ + free(tmp); + tmp = get_string_from_xpath(xml, "//device/capability/firmware/version", NULL, &retval); + if ((tmp != NULL) && (retval > 0)) + VIRT_ADD_ASSOC_STRING(return_value, "firmware_version", tmp); + + /* Get firmware release date */ + free(tmp); + tmp = get_string_from_xpath(xml, "//device/capability/firmware/release_date", NULL, &retval); + if ((tmp != NULL) && (retval > 0)) + VIRT_ADD_ASSOC_STRING(return_value, "firmware_release_date", tmp); + } + + /* Get product_id */ + free(tmp); + tmp = get_string_from_xpath(xml, "//device/capability/product/@id", NULL, &retval); + if ((tmp != NULL) && (retval > 0)) + VIRT_ADD_ASSOC_STRING(return_value, "product_id", tmp); + + /* Get product_name */ + free(tmp); + tmp = get_string_from_xpath(xml, "//device/capability/product", NULL, &retval); + if ((tmp != NULL) && (retval > 0)) + VIRT_ADD_ASSOC_STRING(return_value, "product_name", tmp); + + /* Get vendor_id */ + free(tmp); + tmp = get_string_from_xpath(xml, "//device/capability/vendor/@id", NULL, &retval); + if ((tmp != NULL) && (retval > 0)) + VIRT_ADD_ASSOC_STRING(return_value, "vendor_id", tmp); + + /* Get vendor_name */ + free(tmp); + tmp = get_string_from_xpath(xml, "//device/capability/vendor", NULL, &retval); + if ((tmp != NULL) && (retval > 0)) + VIRT_ADD_ASSOC_STRING(return_value, "vendor_name", tmp); + + /* Get driver name */ + free(tmp); + tmp = get_string_from_xpath(xml, "//device/driver/name", NULL, &retval); + if ((tmp != NULL) && (retval > 0)) + VIRT_ADD_ASSOC_STRING(return_value, "driver_name", tmp); + + /* Get driver name */ + free(tmp); + tmp = get_string_from_xpath(xml, "//device/capability/interface", NULL, &retval); + if ((tmp != NULL) && (retval > 0)) + VIRT_ADD_ASSOC_STRING(return_value, "interface_name", tmp); + + /* Get driver name */ + free(tmp); + tmp = get_string_from_xpath(xml, "//device/capability/address", NULL, &retval); + if ((tmp != NULL) && (retval > 0)) + VIRT_ADD_ASSOC_STRING(return_value, "address", tmp); + + /* Get driver name */ + free(tmp); + tmp = get_string_from_xpath(xml, "//device/capability/capability/@type", NULL, &retval); + if ((tmp != NULL) && (retval > 0)) + VIRT_ADD_ASSOC_STRING(return_value, "capabilities", tmp); + + free(cap); + free(tmp); + free(xml); + return; + + error: + free(cap); + free(tmp); + free(xml); + RETURN_FALSE; +} + +/* + * Function name: libvirt_list_nodedevs + * Since version: 0.4.1(-1) + * Description: Function is used to list node devices on the connection + * Arguments: @res [resource]: libvirt connection resource + * @cap [string]: optional capability string + * Returns: libvirt nodedev names array for the connection + */ +PHP_FUNCTION(libvirt_list_nodedevs) +{ + php_libvirt_connection *conn = NULL; + zval *zconn; + int count = -1; + int expectedcount = -1; + char *cap = NULL; + char **names; + int i; + strsize_t cap_len; + + GET_CONNECTION_FROM_ARGS("r|s", &zconn, &cap, &cap_len); + + if ((expectedcount = virNodeNumOfDevices(conn->conn, cap, 0)) < 0) + RETURN_FALSE; + names = (char **)emalloc(expectedcount*sizeof(char *)); + count = virNodeListDevices(conn->conn, cap, names, expectedcount, 0); + if ((count != expectedcount) || (count < 0)) { + efree(names); + RETURN_FALSE; + } + + array_init(return_value); + for (i = 0; i < count; i++) { + VIRT_ADD_NEXT_INDEX_STRING(return_value, names[i]); + free(names[i]); + } + + efree(names); +} diff --git a/src/libvirt-nodedev.h b/src/libvirt-nodedev.h new file mode 100644 index 0000000..350b213 --- /dev/null +++ b/src/libvirt-nodedev.h @@ -0,0 +1,54 @@ +/* + * libvirt-nodedev.h: The PHP bindings to libvirt nodedev API + * + * See COPYING for the license of this software + */ + +#ifndef __LIBVIRT_NODEDEV_H__ +# define __LIBVIRT_NODEDEV_H__ + +# include "libvirt-connection.h" + +# define PHP_LIBVIRT_NODEDEV_RES_NAME "Libvirt node device" +# define INT_RESOURCE_NODEDEV 0x08 + +# define PHP_FE_LIBVIRT_NODEDEV \ + PHP_FE(libvirt_nodedev_get, arginfo_libvirt_conn) \ + PHP_FE(libvirt_nodedev_capabilities, arginfo_libvirt_conn) \ + PHP_FE(libvirt_nodedev_get_xml_desc, arginfo_libvirt_conn_xpath) \ + PHP_FE(libvirt_nodedev_get_information, arginfo_libvirt_conn) \ + PHP_FE(libvirt_list_nodedevs, arginfo_libvirt_conn_optcap) + +# define GET_NODEDEV_FROM_ARGS(args, ...) \ + do { \ + reset_error(TSRMLS_C); \ + if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, \ + args, \ + __VA_ARGS__) == FAILURE) { \ + set_error("Invalid arguments" TSRMLS_CC); \ + RETURN_FALSE; \ + } \ + \ + VIRT_FETCH_RESOURCE(nodedev, php_libvirt_nodedev*, &znodedev, \ + PHP_LIBVIRT_NODEDEV_RES_NAME, le_libvirt_nodedev); \ + if (nodedev == NULL || nodedev->device == NULL) \ + RETURN_FALSE; \ + } while (0) + +int le_libvirt_nodedev; + +typedef struct _php_libvirt_nodedev { + virNodeDevicePtr device; + php_libvirt_connection* conn; +} php_libvirt_nodedev; + + +void php_libvirt_nodedev_dtor(virt_resource *rsrc TSRMLS_DC); + +PHP_FUNCTION(libvirt_nodedev_get); +PHP_FUNCTION(libvirt_nodedev_capabilities); +PHP_FUNCTION(libvirt_nodedev_get_xml_desc); +PHP_FUNCTION(libvirt_nodedev_get_information); +PHP_FUNCTION(libvirt_list_nodedevs); + +#endif diff --git a/src/libvirt-php.c b/src/libvirt-php.c index 6481a4a..6fa1436 100644 --- a/src/libvirt-php.c +++ b/src/libvirt-php.c @@ -24,8 +24,9 @@ #include "libvirt-stream.h" #include "libvirt-domain.h" #include "libvirt-snapshot.h" -#include "libvirt-network.h" #include "libvirt-storage.h" +#include "libvirt-network.h" +#include "libvirt-nodedev.h" DEBUG_INIT("core"); @@ -39,7 +40,6 @@ const char *features_binaries[] = { NULL }; #endif /* ZEND thread safe per request globals definition */ -int le_libvirt_nodedev; int le_libvirt_nwfilter; ZEND_BEGIN_ARG_INFO_EX(arginfo_libvirt_connect, 0, 0, 0) @@ -480,11 +480,7 @@ static zend_function_entry libvirt_functions[] = { PHP_FE_LIBVIRT_STORAGE PHP_FE_LIBVIRT_NETWORK PHP_FE_LIBVIRT_NODE - /* Nodedev functions */ - PHP_FE(libvirt_nodedev_get, arginfo_libvirt_conn) - PHP_FE(libvirt_nodedev_capabilities, arginfo_libvirt_conn) - PHP_FE(libvirt_nodedev_get_xml_desc, arginfo_libvirt_conn_xpath) - PHP_FE(libvirt_nodedev_get_information, arginfo_libvirt_conn) + PHP_FE_LIBVIRT_NODEDEV /* NWFilter functions */ PHP_FE(libvirt_nwfilter_define_xml, arginfo_libvirt_conn_xml) PHP_FE(libvirt_nwfilter_undefine, arginfo_libvirt_conn) @@ -496,7 +492,6 @@ static zend_function_entry libvirt_functions[] = { PHP_FE(libvirt_nwfilter_lookup_by_uuid_string, arginfo_libvirt_conn_uuid) PHP_FE(libvirt_nwfilter_lookup_by_uuid, arginfo_libvirt_conn_uuid) /* List functions */ - PHP_FE(libvirt_list_nodedevs, arginfo_libvirt_conn_optcap) PHP_FE(libvirt_list_all_nwfilters, arginfo_libvirt_conn) PHP_FE(libvirt_list_nwfilters, arginfo_libvirt_conn) /* Version information and common function */ @@ -1178,33 +1173,6 @@ int is_local_connection(virConnectPtr conn) #endif } -/* Destructor for nodedev resource */ -static void php_libvirt_nodedev_dtor(virt_resource *rsrc TSRMLS_DC) -{ - php_libvirt_nodedev *nodedev = (php_libvirt_nodedev *)rsrc->ptr; - int rv = 0; - - if (nodedev != NULL) { - if (nodedev->device != NULL) { - if (!check_resource_allocation(nodedev->conn->conn, INT_RESOURCE_NODEDEV, nodedev->device TSRMLS_CC)) { - nodedev->device = NULL; - efree(nodedev); - return; - } - rv = virNodeDeviceFree(nodedev->device); - if (rv != 0) { - DPRINTF("%s: virNodeDeviceFree(%p) returned %d (%s)\n", __FUNCTION__, nodedev->device, rv, LIBVIRT_G(last_error)); - php_error_docref(NULL TSRMLS_CC, E_WARNING, "virStorageVolFree failed with %i on destructor: %s", rv, LIBVIRT_G(last_error)); - } else { - DPRINTF("%s: virNodeDeviceFree(%p) completed successfully\n", __FUNCTION__, nodedev->device); - resource_change_counter(INT_RESOURCE_NODEDEV, nodedev->conn->conn, nodedev->device, 0 TSRMLS_CC); - } - nodedev->device = NULL; - } - efree(nodedev); - } -} - /* Destructor for nwfilter resource */ static void php_libvirt_nwfilter_dtor(virt_resource *rsrc TSRMLS_DC) { @@ -1558,19 +1526,6 @@ PHP_MSHUTDOWN_FUNCTION(libvirt) } /* Macros for obtaining resources from arguments */ -#define GET_NODEDEV_FROM_ARGS(args, ...) \ - do { \ - reset_error(TSRMLS_C); \ - if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, args, __VA_ARGS__) == FAILURE) { \ - set_error("Invalid arguments" TSRMLS_CC); \ - RETURN_FALSE; \ - } \ - \ - VIRT_FETCH_RESOURCE(nodedev, php_libvirt_nodedev*, &znodedev, PHP_LIBVIRT_NODEDEV_RES_NAME, le_libvirt_nodedev);\ - if ((nodedev == NULL) || (nodedev->device == NULL)) \ - RETURN_FALSE; \ - } while (0) - #define GET_NWFILTER_FROM_ARGS(args, ...) \ do { \ reset_error(TSRMLS_C); \ @@ -2559,45 +2514,6 @@ void parse_array(zval *arr, tVMDisk *disk, tVMNetwork *network) } /* Listing functions */ -/* - * Function name: libvirt_list_nodedevs - * Since version: 0.4.1(-1) - * Description: Function is used to list node devices on the connection - * Arguments: @res [resource]: libvirt connection resource - * @cap [string]: optional capability string - * Returns: libvirt nodedev names array for the connection - */ -PHP_FUNCTION(libvirt_list_nodedevs) -{ - php_libvirt_connection *conn = NULL; - zval *zconn; - int count = -1; - int expectedcount = -1; - char *cap = NULL; - char **names; - int i; - strsize_t cap_len; - - GET_CONNECTION_FROM_ARGS("r|s", &zconn, &cap, &cap_len); - - if ((expectedcount = virNodeNumOfDevices(conn->conn, cap, 0)) < 0) - RETURN_FALSE; - names = (char **)emalloc(expectedcount*sizeof(char *)); - count = virNodeListDevices(conn->conn, cap, names, expectedcount, 0); - if ((count != expectedcount) || (count < 0)) { - efree(names); - RETURN_FALSE; - } - - array_init(return_value); - for (i = 0; i < count; i++) { - VIRT_ADD_NEXT_INDEX_STRING(return_value, names[i]); - free(names[i]); - } - - efree(names); -} - /* * Function name: libvirt_list_all_nwfilters @@ -2683,269 +2599,6 @@ PHP_FUNCTION(libvirt_list_nwfilters) if (!done) RETURN_FALSE; } -/* Nodedev functions */ - -/* - * Function name: libvirt_nodedev_get - * Since version: 0.4.1(-1) - * Description: Function is used to get the node device by it's name - * Arguments: @res [resource]: libvirt connection resource - * @name [string]: name of the nodedev to get resource - * Returns: libvirt nodedev resource - */ -PHP_FUNCTION(libvirt_nodedev_get) -{ - php_libvirt_connection *conn = NULL; - php_libvirt_nodedev *res_dev = NULL; - virNodeDevice *dev; - zval *zconn; - char *name; - strsize_t name_len; - - GET_CONNECTION_FROM_ARGS("rs", &zconn, &name, &name_len); - - if ((dev = virNodeDeviceLookupByName(conn->conn, name)) == NULL) { - set_error("Cannot get find requested node device" TSRMLS_CC); - RETURN_FALSE; - } - - res_dev = (php_libvirt_nodedev *)emalloc(sizeof(php_libvirt_nodedev)); - res_dev->device = dev; - res_dev->conn = conn; - - DPRINTF("%s: returning %p\n", PHPFUNC, res_dev->device); - resource_change_counter(INT_RESOURCE_NODEDEV, conn->conn, res_dev->device, 1 TSRMLS_CC); - - VIRT_REGISTER_RESOURCE(res_dev, le_libvirt_nodedev); -} - -/* - * Function name: libvirt_nodedev_capabilities - * Since version: 0.4.1(-1) - * Description: Function is used to list node devices by capabilities - * Arguments: @res [resource]: libvirt nodedev resource - * Returns: nodedev capabilities array - */ -PHP_FUNCTION(libvirt_nodedev_capabilities) -{ - php_libvirt_nodedev *nodedev = NULL; - zval *znodedev; - int count = -1; - int expectedcount = -1; - char **names; - int i; - - GET_NODEDEV_FROM_ARGS("r", &znodedev); - - if ((expectedcount = virNodeDeviceNumOfCaps(nodedev->device)) < 0) - RETURN_FALSE; - names = (char **)emalloc(expectedcount*sizeof(char *)); - count = virNodeDeviceListCaps(nodedev->device, names, expectedcount); - if ((count != expectedcount) || (count < 0)) - RETURN_FALSE; - - array_init(return_value); - for (i = 0; i < count; i++) { - VIRT_ADD_NEXT_INDEX_STRING(return_value, names[i]); - free(names[i]); - } - - efree(names); -} - -/* - * Function name: libvirt_nodedev_get_xml_desc - * Since version: 0.4.1(-1), changed 0.4.2 - * Description: Function is used to get the node device's XML description - * Arguments: @res [resource]: libvirt nodedev resource - * @xpath [string]: optional xPath expression string to get just this entry, can be NULL - * Returns: nodedev XML description string or result of xPath expression - */ -PHP_FUNCTION(libvirt_nodedev_get_xml_desc) -{ - php_libvirt_nodedev *nodedev = NULL; - zval *znodedev; - char *tmp = NULL; - char *xml = NULL; - char *xpath = NULL; - strsize_t xpath_len; - int retval = -1; - - GET_NODEDEV_FROM_ARGS("r|s", &znodedev, &xpath, &xpath_len); - if (xpath_len < 1) - xpath = NULL; - - xml = virNodeDeviceGetXMLDesc(nodedev->device, 0); - if (!xml) { - set_error("Cannot get the device XML information" TSRMLS_CC); - RETURN_FALSE; - } - - tmp = get_string_from_xpath(xml, xpath, NULL, &retval); - if ((tmp == NULL) || (retval < 0)) - VIRT_RETVAL_STRING(xml); - else - VIRT_RETVAL_STRING(tmp); - - free(xml); - free(tmp); -} - -/* - * Function name: libvirt_nodedev_get_information - * Since version: 0.4.1(-1) - * Description: Function is used to get the node device's information - * Arguments: @res [resource]: libvirt nodedev resource - * Returns: nodedev information array - */ -PHP_FUNCTION(libvirt_nodedev_get_information) -{ - php_libvirt_nodedev *nodedev = NULL; - zval *znodedev; - int retval = -1; - char *xml = NULL; - char *tmp = NULL; - char *cap = NULL; - - GET_NODEDEV_FROM_ARGS("r", &znodedev); - - xml = virNodeDeviceGetXMLDesc(nodedev->device, 0); - if (!xml) { - set_error("Cannot get the device XML information" TSRMLS_CC); - RETURN_FALSE; - } - - array_init(return_value); - - /* Get name */ - tmp = get_string_from_xpath(xml, "//device/name", NULL, &retval); - if (tmp == NULL) { - set_error("Invalid XPath node for device name" TSRMLS_CC); - goto error; - } - - if (retval < 0) { - set_error("Cannot get XPath expression result for device name" TSRMLS_CC); - goto error; - } - - VIRT_ADD_ASSOC_STRING(return_value, "name", tmp); - - /* Get parent name */ - free(tmp); - tmp = get_string_from_xpath(xml, "//device/parent", NULL, &retval); - if ((tmp != NULL) && (retval > 0)) - VIRT_ADD_ASSOC_STRING(return_value, "parent", tmp); - - /* Get capability */ - cap = get_string_from_xpath(xml, "//device/capability/@type", NULL, &retval); - if ((cap != NULL) && (retval > 0)) - VIRT_ADD_ASSOC_STRING(return_value, "capability", cap); - - /* System capability is having hardware and firmware sub-blocks */ - if (strcmp(cap, "system") == 0) { - /* Get hardware vendor */ - free(tmp); - tmp = get_string_from_xpath(xml, "//device/capability/hardware/vendor", NULL, &retval); - if ((tmp != NULL) && (retval > 0)) - VIRT_ADD_ASSOC_STRING(return_value, "hardware_vendor", tmp); - - /* Get hardware version */ - free(tmp); - tmp = get_string_from_xpath(xml, "//device/capability/hardware/version", NULL, &retval); - if ((tmp != NULL) && (retval > 0)) - VIRT_ADD_ASSOC_STRING(return_value, "hardware_version", tmp); - - /* Get hardware serial */ - free(tmp); - tmp = get_string_from_xpath(xml, "//device/capability/hardware/serial", NULL, &retval); - if ((tmp != NULL) && (retval > 0)) - VIRT_ADD_ASSOC_STRING(return_value, "hardware_serial", tmp); - - /* Get hardware UUID */ - free(tmp); - tmp = get_string_from_xpath(xml, "//device/capability/hardware/uuid", NULL, &retval); - if (tmp != NULL) - VIRT_ADD_ASSOC_STRING(return_value, "hardware_uuid", tmp); - - /* Get firmware vendor */ - free(tmp); - tmp = get_string_from_xpath(xml, "//device/capability/firmware/vendor", NULL, &retval); - if ((tmp != NULL) && (retval > 0)) - VIRT_ADD_ASSOC_STRING(return_value, "firmware_vendor", tmp); - - /* Get firmware version */ - free(tmp); - tmp = get_string_from_xpath(xml, "//device/capability/firmware/version", NULL, &retval); - if ((tmp != NULL) && (retval > 0)) - VIRT_ADD_ASSOC_STRING(return_value, "firmware_version", tmp); - - /* Get firmware release date */ - free(tmp); - tmp = get_string_from_xpath(xml, "//device/capability/firmware/release_date", NULL, &retval); - if ((tmp != NULL) && (retval > 0)) - VIRT_ADD_ASSOC_STRING(return_value, "firmware_release_date", tmp); - } - - /* Get product_id */ - free(tmp); - tmp = get_string_from_xpath(xml, "//device/capability/product/@id", NULL, &retval); - if ((tmp != NULL) && (retval > 0)) - VIRT_ADD_ASSOC_STRING(return_value, "product_id", tmp); - - /* Get product_name */ - free(tmp); - tmp = get_string_from_xpath(xml, "//device/capability/product", NULL, &retval); - if ((tmp != NULL) && (retval > 0)) - VIRT_ADD_ASSOC_STRING(return_value, "product_name", tmp); - - /* Get vendor_id */ - free(tmp); - tmp = get_string_from_xpath(xml, "//device/capability/vendor/@id", NULL, &retval); - if ((tmp != NULL) && (retval > 0)) - VIRT_ADD_ASSOC_STRING(return_value, "vendor_id", tmp); - - /* Get vendor_name */ - free(tmp); - tmp = get_string_from_xpath(xml, "//device/capability/vendor", NULL, &retval); - if ((tmp != NULL) && (retval > 0)) - VIRT_ADD_ASSOC_STRING(return_value, "vendor_name", tmp); - - /* Get driver name */ - free(tmp); - tmp = get_string_from_xpath(xml, "//device/driver/name", NULL, &retval); - if ((tmp != NULL) && (retval > 0)) - VIRT_ADD_ASSOC_STRING(return_value, "driver_name", tmp); - - /* Get driver name */ - free(tmp); - tmp = get_string_from_xpath(xml, "//device/capability/interface", NULL, &retval); - if ((tmp != NULL) && (retval > 0)) - VIRT_ADD_ASSOC_STRING(return_value, "interface_name", tmp); - - /* Get driver name */ - free(tmp); - tmp = get_string_from_xpath(xml, "//device/capability/address", NULL, &retval); - if ((tmp != NULL) && (retval > 0)) - VIRT_ADD_ASSOC_STRING(return_value, "address", tmp); - - /* Get driver name */ - free(tmp); - tmp = get_string_from_xpath(xml, "//device/capability/capability/@type", NULL, &retval); - if ((tmp != NULL) && (retval > 0)) - VIRT_ADD_ASSOC_STRING(return_value, "capabilities", tmp); - - free(cap); - free(tmp); - free(xml); - return; - - error: - free(cap); - free(tmp); - free(xml); - RETURN_FALSE; -} /* NWFilter functions */ diff --git a/src/libvirt-php.h b/src/libvirt-php.h index e7a2bcf..c35bd69 100644 --- a/src/libvirt-php.h +++ b/src/libvirt-php.h @@ -108,7 +108,6 @@ typedef uint64_t arch_uint; #define PHP_LIBVIRT_WORLD_EXTNAME "libvirt" /* Internal resource identifier objects */ -#define INT_RESOURCE_NODEDEV 0x08 #define INT_RESOURCE_NWFILTER 0x60 typedef struct tTokenizer { @@ -142,11 +141,6 @@ typedef struct tVMNetwork { typedef struct _php_libvirt_connection php_libvirt_connection; /* Libvirt-php types */ -typedef struct _php_libvirt_nodedev { - virNodeDevicePtr device; - php_libvirt_connection* conn; -} php_libvirt_nodedev; - typedef struct _php_libvirt_nwfilter { virNWFilterPtr nwfilter; php_libvirt_connection* conn; @@ -204,7 +198,6 @@ const char *get_feature_binary(const char *name); long get_next_free_numeric_value(virDomainPtr domain, char *xpath); int get_subnet_bits(char *ip); -#define PHP_LIBVIRT_NODEDEV_RES_NAME "Libvirt node device" #define PHP_LIBVIRT_NWFILTER_RES_NAME "Libvirt nwfilter" PHP_MINIT_FUNCTION(libvirt); @@ -215,11 +208,6 @@ PHP_MINFO_FUNCTION(libvirt); /* Common functions */ PHP_FUNCTION(libvirt_get_last_error); -/* Nodedev functions */ -PHP_FUNCTION(libvirt_nodedev_get); -PHP_FUNCTION(libvirt_nodedev_capabilities); -PHP_FUNCTION(libvirt_nodedev_get_xml_desc); -PHP_FUNCTION(libvirt_nodedev_get_information); /* NWFilter functions */ PHP_FUNCTION(libvirt_nwfilter_define_xml); PHP_FUNCTION(libvirt_nwfilter_undefine); @@ -231,7 +219,6 @@ PHP_FUNCTION(libvirt_nwfilter_lookup_by_name); PHP_FUNCTION(libvirt_nwfilter_lookup_by_uuid_string); PHP_FUNCTION(libvirt_nwfilter_lookup_by_uuid); /* Listing functions */ -PHP_FUNCTION(libvirt_list_nodedevs); PHP_FUNCTION(libvirt_list_all_nwfilters); PHP_FUNCTION(libvirt_list_nwfilters); /* Common functions */ -- 2.13.3

As it was failing when local host is using FQDN for hostnames. The logic to do so follows libvirt's implementation for the same thing. This fixes an issue where unit tests would falsely fail on workstations that have FQDN hostnames. --- src/libvirt-php.c | 38 ++++++++++++++++++++++++++++++++++---- 1 file changed, 34 insertions(+), 4 deletions(-) diff --git a/src/libvirt-php.c b/src/libvirt-php.c index b20d839..ec73034 100644 --- a/src/libvirt-php.c +++ b/src/libvirt-php.c @@ -1145,13 +1145,43 @@ int is_local_connection(virConnectPtr conn) { #ifndef EXTWIN int ret; - char *hostname; + char *lv_hostname = NULL, *result = NULL; char name[1024]; + struct addrinfo hints, *info = NULL; - hostname = virConnectGetHostname(conn); + name[1023] = '\0'; gethostname(name, 1024); - ret = strcmp(name, hostname) == 0; - free(hostname); + + if (strcmp(name, "localhost") == 0) + return 1; + + lv_hostname = virConnectGetHostname(conn); + + /* gethostname gave us FQDN, compare */ + if (strchr(name, '.') && strcmp(name, lv_hostname) == 0) + return 1; + + /* need to get FQDN of the local name */ + memset(&hints, 0, sizeof(hints)); + hints.ai_flags = AI_CANONNAME|AI_CANONIDN; + hints.ai_family = AF_UNSPEC; + + /* could not get FQDN or got localhost, use whatever gethostname gave us */ + if (getaddrinfo(name, NULL, &hints, &info) != 0 || + info->ai_canonname == NULL || + strcmp(info->ai_canonname, "localhost") == 0) + result = strdup(name); + else + result = strdup(info->ai_canonname); + + ret = strcmp(result, lv_hostname) == 0; + + freeaddrinfo(info); + if (lv_hostname) + free(lv_hostname); + if (result) + free(result); + return ret; #else // Libvirt daemon doesn't work on Windows systems so always return 0 (FALSE) -- 2.13.3