123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128 |
- <?php
- if (!defined('STATUSNET')) {
-
-
- exit(1);
- }
- class CacheLogPlugin extends Plugin
- {
- function onStartCacheGet(&$key, &$value)
- {
- $this->log(LOG_INFO, "Fetching key '$key'");
- return true;
- }
- function onEndCacheGet($key, &$value)
- {
- if ($value === false) {
- $this->log(LOG_INFO, sprintf('Cache MISS for key "%s"', $key));
- } else {
- $this->log(LOG_INFO, sprintf('Cache HIT for key "%s": %s', $key, self::showValue($value)));
- }
- return true;
- }
- function onStartCacheSet(&$key, &$value, &$flag, &$expiry, &$success)
- {
- $this->log(LOG_INFO, "Begin setting cache value for key '$key'");
- return true;
- }
- function onEndCacheSet($key, $value, $flag, $expiry)
- {
- $this->log(LOG_INFO, sprintf('Set cache value %s for key "%s" (flags: %d, expiry %d)',
- self::showValue($value),
- $key,
- $flag,
- $expiry));
- return true;
- }
- function onStartCacheDelete(&$key, &$success)
- {
- $this->log(LOG_INFO, "Deleting cache value for key '$key'");
- return true;
- }
- function onEndCacheDelete($key)
- {
- $this->log(LOG_INFO, "Done deleting cache value for key '$key'");
- return true;
- }
- function onPluginVersion(array &$versions)
- {
- $versions[] = array('name' => 'CacheLog',
- 'version' => GNUSOCIAL_VERSION,
- 'author' => 'Evan Prodromou',
- 'homepage' => 'http://status.net/wiki/Plugin:CacheLog',
- 'description' =>
-
- _m('Log reads and writes to the cache.'));
- return true;
- }
- static function showValue($value)
- {
- if (is_object($value)) {
- return sprintf('object of class %s', get_class($value));
- } else if (is_array($value)) {
- return sprintf('array of length %d', count($value));
- } else if (is_string($value)) {
- return sprintf('string "%s"', $value);
- } else if (is_integer($value)) {
- return sprintf('integer %d', $value);
- } else if (is_null($value)) {
- return 'null';
- } else {
- return 'unknown';
- }
- }
- }
|