dcache.module

Go to the documentation of this file.

<?php
// $Id$

// Cache masks.
define ('DCACHE_SESSION', 0);

define ('DCACHE_STATIC', 1);

define ('DCACHE_DRUPAL', 2);

define ('DCACHE_ALL', -1);

function dcache_set($cache_namespace, $cache_args, $mode = DCACHE_SESSION, $infinite = FALSE) {
  switch ($mode) {
    case DCACHE_SESSION:
    case DCACHE_STATIC: {
      $svar =& _dcache_by_ref($cache_namespace, $mode);
    } break;
    case DCACHE_DRUPAL: {
      $svar = array();
    } break;
  }

  foreach ($cache_args as $arg => $val) {
    $svar[$arg] = $val;
  }
  $svar['cache_timestamp'] = $infinite ? 0 : time();

  if ($mode == DCACHE_DRUPAL) {
    $ns = _dcache_ns($cache_namespace);
    cache_set($ns, $svar);
  }
}

function dcache_get($cache_namespace, $mode = DCACHE_SESSION) {
  switch ($mode) {
    case DCACHE_SESSION:
    case DCACHE_STATIC: {
      $svar =& _dcache_by_ref($cache_namespace, $mode);
    } break;
    case DCACHE_DRUPAL: {
      $ns = _dcache_ns($cache_namespace);
      $svar = cache_get($ns);
      $svar = $svar->data;
    } break;
  }
  return $svar;
}

function dcache_del($cache_namespace, $mode = DCACHE_SESSION) {
  $ns = _dcache_ns($cache_namespace);
  switch ($mode) {
    case DCACHE_SESSION:
    case DCACHE_STATIC: {
      $svar =& _dcache_by_ref($cache_namespace, $mode);
      $svar = NULL;
    } break;
    case DCACHE_DRUPAL: {
      cache_clear_all($ns, 'cache');
    } break;
    case DCACHE_ALL: {
      dcache_del($cache_namespace, DCACHE_SESSION);
      dcache_del($cache_namespace, DCACHE_STATIC);
      cache_clear_all($ns, 'cache', TRUE);
    }
  }
}

function dcache_expired($cache) {
  return TRUE;
  $life = variable_get('dcache_life_seconds', 600);
  if (function_exists('duvar_get')) {
    $life = duvar_get('dcache_life_seconds', $life);
  }
  return (isset($cache['cache_timestamp']) && (time() - $cache['cache_timestamp'] < $life)) ? FALSE : TRUE;
}

function &_dcache_by_ref($cns, $mode) {
  global $dcache_static;
  switch ($mode) {
    case DCACHE_SESSION: {
      $cache =& $_SESSION['dcache'];
    } break;
    case DCACHE_STATIC: {
      $cache =& $dcache_static;
    } break;
    case DCACHE_DRUPAL: {
    } break;
  }
  if ($mode != DCACHE_DRUPAL) {
    if (is_array($cns)) {
      switch (count($cns)) {
        case 0: {
          $ns =& $cache;
        } break;
        case 1: {
          $ns =& $cache[$cns[0]];
        } break;
        case 2: {
          $ns =& $cache[$cns[0]][$cns[1]];
        } break;
        case 3: {
          $ns =& $cache[$cns[0]][$cns[1]][$cns[2]];
        } break;
        case 4: {
          $ns =& $cache[$cns[0]][$cns[1]][$cns[2]][$cns[3]];
        } break;
        case 5: {
          $ns =& $cache[$cns[0]][$cns[1]][$cns[2]][$cns[3]][$cns[4]];
        } break;
        default: {
          throw new Exception(t('Cache namespace elements exceed a count of 5.'));
        } break;
      }
    }
    else {
      $ns =& $cache[$cns];
    }
    return $ns;
  }
  else {
  }
}

function _dcache_ns($namespace) {
  $bt = debug_backtrace();
  $bt = explode(DIRECTORY_SEPARATOR, $bt[1]['file']);
  for ($idx = 0; $idx < count($bt) - 1 && $bt[$idx] != 'modules'; $idx++) {
    $module = $bt[$idx + 1];
  }
  $ns = "{$module}_";
  if (is_array($namespace)) {
    $ns .= implode('_', $namespace);
  }
  else {
    $ns .= $namespace;
  }
  return $ns;
}