zmt_core.module

<?php

/**
 * Implements hook_permission().
 */ 
function zmt_core_permission() {
  return array(
    'administer zmt' => array(
      'title' => t('Administer zimbra multi tenancy'), 
      'description' => t('Allows users to perform any action on zimbra multi tenancy.'),
      'restrict access' => TRUE,
    ),
  );
}

/**
 * Return permission names for a given entity type.
 */
function zmt_access_permissions($entity_type, $entity_name) {
  $permissions = array();

  $permissions['administer any ' . $entity_type] = array(
    'title' => t('Administer any @entity_name', array('@entity_name' => $entity_name)),
    'description' => t('Allows users to perform action on any @entity_name.', array('@entity_name' => $entity_name)),
    'restrict access' => TRUE,
  );

  $permissions['administer own ' . $entity_type] = array(
    'title' => t('Administer own @entity_name', array('@entity_name' => $entity_name)),
    'description' => t('Allows users to perform action on own @entity_name.', array('@entity_name' => $entity_name)),
    'restrict access' => TRUE,
  );
  return $permissions;
}

/**
 * Check request is ajax.
 */
function zmt_is_ajax_request() {
  $requested_with = isset($_SERVER['HTTP_X_REQUESTED_WITH']) ? $_SERVER['HTTP_X_REQUESTED_WITH'] : '';
  $is_ajax_request = strtolower($requested_with) === 'xmlhttprequest';
  if (!$is_ajax_request) {
    $current_path = current_path();
    $is_ajax_request = strtolower($current_path) === 'system/ajax';
  }
  return $is_ajax_request;
}

/**
 * Check subject is matches with patterns.
 */
function zmt_is_matches(array $patterns = array(), $subject = ''){
  $is_match = FALSE;
  if (!empty($patterns)) {
    $pattern = implode('|', $patterns);
    if (!empty($pattern)) {
      $is_match = preg_match('/'.$pattern.'/msS', $subject);
    }
  }
  return $is_match;
}

/**
 * Force a client-side redirect.
 */
function zmt_ajax_command_redirect($url, $delay = 0, $options = array()) {
  $path = drupal_get_path('module', 'zmt_core');
  drupal_add_js($path . '/js/zmt.js');
  return array(
    'command' => 'zmt_ajax_redirect',
    'url'     => url($url, $options),
    'delay'   => (int) $delay,
  );
}

/**
 * Force reload of the current page.
 */
function zmt_ajax_command_reload() {
  $path = drupal_get_path('module', 'zmt_core');
  drupal_add_js($path . '/js/zmt.js');
  return array(
    'command' => 'zmt_ajax_reload',
  );
}

/**
 * Encrypt a plain string.
 */
function zmt_password_encrypt($text) {
  $key = md5(drupal_get_hash_salt());
  if (function_exists('mcrypt_encrypt')) {
    $ivsize = mcrypt_get_iv_size(MCRYPT_RIJNDAEL_256, MCRYPT_MODE_ECB);
    $iv  = mcrypt_create_iv(mcrypt_get_iv_size(MCRYPT_RIJNDAEL_256, MCRYPT_MODE_ECB), MCRYPT_RAND);
    return trim(base64_encode(mcrypt_encrypt(MCRYPT_RIJNDAEL_256, $key, $text, MCRYPT_MODE_ECB, $iv)));
  }
  if (function_exists('openssl_encrypt')) {
    return _zmt_openssl_encrypt($text, $key);
  }
  else {
    module_load_include('inc', 'zmt_core', 'includes/zmt.aes');
    return AesCtr::encrypt($text, $key, 256);
  }
}

/**
 * Decrypt an encrypted string.
 */
function zmt_password_decrypt($data) {
  $key = md5(drupal_get_hash_salt());
  if (function_exists('mcrypt_decrypt')) {
    $iv = mcrypt_create_iv(mcrypt_get_iv_size(MCRYPT_RIJNDAEL_256, MCRYPT_MODE_ECB), MCRYPT_RAND);
    return trim(mcrypt_decrypt(MCRYPT_RIJNDAEL_256, $key, base64_decode($data), MCRYPT_MODE_ECB, $iv));
  }
  elseif (function_exists('openssl_decrypt')) {
    return _zmt_openssl_decrypt($data, $key);
  }
  else {
    module_load_include('inc', 'zmt_core', 'includes/zmt.aes');
    return AesCtr::decrypt($data, $key, 256);
  }
}

/**
 * Encrypt a string by openssl.
 */
function _zmt_openssl_encrypt($text, $password){
  $salt   = openssl_random_pseudo_bytes(8);
  $salted = '';
  $dx     = '';
  while (strlen($salted) < 48) {
    $dx = md5($dx . $password . $salt, TRUE);
    $salted .= $dx;
  }
  $key = substr($salted, 0, 32);
  $iv  = substr($salted, 32,16);
  $data = openssl_encrypt($text, 'aes-256-cbc', $key, TRUE, $iv);
  return trim(base64_encode('Salted__' . $salt . $data));
}

/**
 * Decrypt an encrypted string by openssl.
 */
function _zmt_openssl_decrypt($edata, $password) {
  $data = base64_decode($edata);
  $salt = substr($data, 8, 8);
  $ct   = substr($data, 16);

  $rounds = 3;
  $data00 = $password . $salt;
  $md5_hash = array();
  $md5_hash[0] = md5($data00, TRUE);
  $result = $md5_hash[0];
  for ($i = 1; $i < $rounds; $i++) {
    $md5_hash[$i] = md5($md5_hash[$i - 1].$data00, TRUE);
    $result .= $md5_hash[$i];
  }
  $key = substr($result, 0, 32);
  $iv  = substr($result, 32,16);
  return openssl_decrypt($ct, 'aes-256-cbc', $key, TRUE, $iv);
}