/**
* Phalcon\Logger\Adapter\Syslog constructor
*
* @param string $name
* @param array $options
*/
PHP_METHOD(Phalcon_Logger_Adapter_Syslog, __construct){
zval *name, *options = NULL, *option = NULL, *facility = NULL;
PHALCON_MM_GROW();
phalcon_fetch_params(1, 1, 1, &name, &options);
if (!options) {
PHALCON_INIT_VAR(options);
}
/**
* We use 'fopen' to respect to open-basedir directive
*/
if (zend_is_true(name)) {
if (phalcon_array_isset_string(options, SS("option"))) {
PHALCON_OBS_VAR(option);
phalcon_array_fetch_string(&option, options, SL("option"), PH_NOISY);
} else {
/**
* Open the log in LOG_ODELAY mode
*/
PHALCON_INIT_NVAR(option);
ZVAL_LONG(option, 4);
}
if (phalcon_array_isset_string(options, SS("facility"))) {
PHALCON_OBS_VAR(facility);
phalcon_array_fetch_string(&facility, options, SL("facility"), PH_NOISY);
} else {
/**
* By default the facility is LOG_USER
*/
PHALCON_INIT_NVAR(facility);
ZVAL_LONG(facility, 8);
}
phalcon_call_func_p3_noret("openlog", name, option, facility);
phalcon_update_property_bool(this_ptr, SL("_opened"), 1 TSRMLS_CC);
}
PHALCON_MM_RESTORE();
}
/**
* Writes the metadata to XCache
*
* @param string $key
* @param array $data
*/
PHP_METHOD(Phalcon_Mvc_Model_MetaData_Xcache, write){
zval *key, *data, *prefix, *xc_key, *ttl;
PHALCON_MM_GROW();
phalcon_fetch_params(1, 2, 0, &key, &data);
PHALCON_OBS_VAR(prefix);
phalcon_read_property_this(&prefix, this_ptr, SL("_prefix"), PH_NOISY_CC);
PHALCON_INIT_VAR(xc_key);
PHALCON_CONCAT_SVV(xc_key, "$PMM$", prefix, key);
PHALCON_OBS_VAR(ttl);
phalcon_read_property_this(&ttl, this_ptr, SL("_ttl"), PH_NOISY_CC);
phalcon_call_func_p3_noret("xcache_set", xc_key, data, ttl);
PHALCON_MM_RESTORE();
}
/**
* Stores cached content into the XCache backend and stops the frontend
*
* @param string $keyName
* @param string $content
* @param long $lifetime
* @param boolean $stopBuffer
*/
PHP_METHOD(Phalcon_Cache_Backend_Xcache, save){
zval *key_name = NULL, *content = NULL, *lifetime = NULL, *stop_buffer = NULL;
zval *last_key = NULL, *prefix, *frontend, *cached_content = NULL;
zval *prepared_content, *ttl = NULL, *success, *is_buffering;
zval *options, *special_key, *keys = NULL, *zero;
PHALCON_MM_GROW();
phalcon_fetch_params(1, 0, 4, &key_name, &content, &lifetime, &stop_buffer);
if (!key_name) {
PHALCON_INIT_VAR(key_name);
}
if (!content) {
PHALCON_INIT_VAR(content);
}
if (!lifetime) {
PHALCON_INIT_VAR(lifetime);
} else {
PHALCON_SEPARATE_PARAM(lifetime);
}
if (!stop_buffer) {
PHALCON_INIT_VAR(stop_buffer);
ZVAL_BOOL(stop_buffer, 1);
}
if (Z_TYPE_P(key_name) == IS_NULL) {
PHALCON_OBS_VAR(last_key);
phalcon_read_property_this(&last_key, this_ptr, SL("_lastKey"), PH_NOISY_CC);
} else {
PHALCON_OBS_VAR(prefix);
phalcon_read_property_this(&prefix, this_ptr, SL("_prefix"), PH_NOISY_CC);
PHALCON_INIT_NVAR(last_key);
PHALCON_CONCAT_SVV(last_key, "_PHCX", prefix, key_name);
}
if (!zend_is_true(last_key)) {
PHALCON_THROW_EXCEPTION_STR(phalcon_cache_exception_ce, "The cache must be started first");
return;
}
PHALCON_OBS_VAR(frontend);
phalcon_read_property_this(&frontend, this_ptr, SL("_frontend"), PH_NOISY_CC);
if (Z_TYPE_P(content) == IS_NULL) {
PHALCON_INIT_VAR(cached_content);
phalcon_call_method(cached_content, frontend, "getcontent");
} else {
PHALCON_CPY_WRT(cached_content, content);
}
PHALCON_INIT_VAR(prepared_content);
phalcon_call_method_p1(prepared_content, frontend, "beforestore", cached_content);
/**
* Take the lifetime from the frontend or read it from the set in start()
*/
if (Z_TYPE_P(lifetime) == IS_NULL) {
PHALCON_OBS_NVAR(lifetime);
phalcon_read_property_this(&lifetime, this_ptr, SL("_lastLifetime"), PH_NOISY_CC);
if (Z_TYPE_P(lifetime) == IS_NULL) {
PHALCON_INIT_VAR(ttl);
phalcon_call_method(ttl, frontend, "getlifetime");
} else {
PHALCON_CPY_WRT(ttl, lifetime);
}
} else {
PHALCON_CPY_WRT(ttl, lifetime);
}
/**
* Call xcache_set in the PHP userland since most of the time it isn't available at
* compile time
*/
PHALCON_INIT_VAR(success);
phalcon_call_func_p3(success, "xcache_set", last_key, prepared_content, ttl);
PHALCON_INIT_VAR(is_buffering);
phalcon_call_method(is_buffering, frontend, "isbuffering");
if (PHALCON_IS_TRUE(stop_buffer)) {
phalcon_call_method_noret(frontend, "stop");
}
if (PHALCON_IS_TRUE(is_buffering)) {
zend_print_zval(cached_content, 0);
}
phalcon_update_property_bool(this_ptr, SL("_started"), 0 TSRMLS_CC);
/**
* xcache_set() could fail because of Out of Memory condition. I don't think it is
* appropriate to throw an exception here (like
* Phalcon\Cache\Backend\Memcache::save() does): first, to be consistent with
* Phalcon\Cache\Backend\Apc::save(), second, because xCache is usually given much
* less RAM than memcached
*/
if (zend_is_true(success)) {
PHALCON_OBS_VAR(options);
phalcon_read_property_this(&options, this_ptr, SL("_options"), PH_NOISY_CC);
PHALCON_OBS_VAR(special_key);
phalcon_array_fetch_string(&special_key, options, SL("statsKey"), PH_NOISY_CC);
/**
* xcache_list() is available only to the administrator (unless XCache was
* patched). We have to update the list of the stored keys.
*/
PHALCON_INIT_VAR(keys);
phalcon_call_func_p1(keys, "xcache_get", special_key);
if (Z_TYPE_P(keys) != IS_ARRAY) {
PHALCON_INIT_NVAR(keys);
array_init(keys);
}
if (!zend_is_true(keys)) {
phalcon_array_update_zval(&keys, last_key, &ttl, PH_COPY | PH_SEPARATE TSRMLS_CC);
PHALCON_INIT_VAR(zero);
ZVAL_LONG(zero, 0);
phalcon_call_func_p3_noret("xcache_set", special_key, keys, zero);
}
}
PHALCON_MM_RESTORE();
}
