16 define(
'MEMCACHE_DEFAULT_TTL' ,
$cf[
'memcache'][
'ttl'] );
19 $cf[
'memcache'][
'profile'] = &
$cf[
'memcache'][
'profiles'][
$cf[
'site'][
'status'] ];
22 if( function_exists(
'memcache_connect' ) ) {
25 if( isset(
$cf[
'memcache'][
'profile'][
'servers'] ) && is_array(
$cf[
'memcache'][
'profile'][
'servers'] ) ) {
27 foreach(
$cf[
'memcache'][
'profile'][
'servers'] as $server ) {
30 $cn = @memcache_connect(
31 $cf[
'memcache'][
'servers'][ $server ][
'address'],
32 $cf[
'memcache'][
'servers'][ $server ][
'port']
36 if( ! empty( $cn ) ) {
37 $cf[
'memcache'][
'connections'][ $server ] = $cn;
38 $cf[
'memcache'][
'stats'][ $server ] = memcache_get_stats( $cn );
39 logWrite(
'connessione effettuata al server ' . $server,
'memcache', LOG_DEBUG );
41 logWrite(
'impossibile connettersi al server ' . $server,
'memcache', LOG_ERR );
47 if( count(
$cf[
'memcache'][
'connections'] ) ) {
48 $keys = array_keys(
$cf[
'memcache'][
'connections'] );
49 $key = array_shift( $keys );
50 $cf[
'memcache'][
'connection'] = &
$cf[
'memcache'][
'connections'][ $key ];
51 $cf[
'memcache'][
'server'] = &
$cf[
'memcache'][
'servers'][ $key ];
52 $cf[
'memcache'][
'stat'] = &
$cf[
'memcache'][
'stats'][ $key ];
53 $cf[
'memcache'][
'stat'][
'usage'] =
writeByte(
$cf[
'memcache'][
'stat'][
'bytes'] ) .
' su ' .
writeByte(
$cf[
'memcache'][
'stat'][
'limit_maxbytes'] );
54 $cf[
'memcache'][
'stat'][
'percent'] = sprintf(
'%01.2f',
$cf[
'memcache'][
'stat'][
'bytes'] * 100 /
$cf[
'memcache'][
'stat'][
'limit_maxbytes'] ) .
'%';
55 $cf[
'memcache'][
'stat'][
'hits'] =
'trovati ' .
$cf[
'memcache'][
'stat'][
'get_hits'] .
' oggetti contro ' .
$cf[
'memcache'][
'stat'][
'get_misses'] .
' non trovati';
56 if( isset(
$cf[
'memcache'][
'stat'][
'get_hits'] ) && ! empty(
$cf[
'memcache'][
'stat'][
'get_hits'] ) && isset(
$cf[
'memcache'][
'stat'][
'get_misses'] ) ) {
57 $cf[
'memcache'][
'stat'][
'hitrate'] = sprintf(
'%01.2f',
$cf[
'memcache'][
'stat'][
'get_hits'] * 100 / (
$cf[
'memcache'][
'stat'][
'get_hits'] +
$cf[
'memcache'][
'stat'][
'get_misses'] ) ) .
'%';
59 $ct[
'memcache'][
'stat'] = &
$cf[
'memcache'][
'stat'];
65 logWrite(
'nessun profilo memcache impostato per il livello di funzionamento corrente',
'memcache', LOG_DEBUG );
72 logWrite(
'memcache non installato',
'memcache', LOG_DEBUG );
77 $cf[
'redis'][
'profile'] = &
$cf[
'redis'][
'profiles'][
$cf[
'site'][
'status'] ];
83 if( isset( $cf[
'redis'][
'profile'][
'servers'] ) && is_array( $cf[
'redis'][
'profile'][
'servers'] ) ) {
85 foreach( $cf[
'redis'][
'profile'][
'servers'] as $server ) {
88 $cn =
new Predis\Client([
90 'host' => $cf[
'redis'][
'servers'][ $server ][
'address'],
91 'port' => $cf[
'redis'][
'servers'][ $server ][
'port']
95 if( ! empty( $cn ) ) {
96 $cf[
'redis'][
'connections'][ $server ] = $cn;
97 logWrite(
'connessione effettuata al server ' . $server,
'redis', LOG_DEBUG );
99 logWrite(
'impossibile connettersi al server ' . $server,
'redis', LOG_ERR );
105 if( count( $cf[
'redis'][
'connections'] ) ) {
106 $keys = array_keys( $cf[
'redis'][
'connections'] );
107 $key = array_shift( $keys );
108 $cf[
'redis'][
'connection'] = &$cf[
'redis'][
'connections'][ $key ];
109 $cf[
'redis'][
'server'] = &$cf[
'redis'][
'servers'][ $key ];
115 logWrite(
'nessun profilo redis impostato per il livello di funzionamento corrente',
'redis', LOG_DEBUG );
122 logWrite(
'redis non installato',
'redis', LOG_DEBUG );
if(isset( $cx['contatti'])) if(isset( $cf['site']['contatti'])) $ct['contatti']
logWrite( $m, $f='site', $l=LOG_NOTICE, $d=DIRECTORY_LOG, $t=CURRENT_LOG_LEVEL, $s=SITE_STATUS)
scrive un messaggio nei log del sito
$cf['memcache']['profile']