Gecko [ ifk.uw.edu.pl ]

Name	Size	Permission
book.inc	2.59 KB	-rw-r--r--
compare_users.inc	2.33 KB	-rw-r--r--
context_exists.inc	1.83 KB	-rw-r--r--
entity_bundle.inc	4.51 KB	-rw-r--r--
entity_field_value.inc	14.35 KB	-rw-r--r--
front.inc	1.04 KB	-rw-r--r--
node.inc	0 B	-rw-r--r--
node_access.inc	2.65 KB	-rw-r--r--
node_comment.inc	923 B	-rw-r--r--
node_language.inc	3.41 KB	-rw-r--r--
node_status.inc	915 B	-rw-r--r--
node_type.inc	3.71 KB	-rw-r--r--
path_visibility.inc	3.08 KB	-rw-r--r--
perm.inc	2.08 KB	-rw-r--r--
php.inc	2.1 KB	-rw-r--r--
role.inc	2.38 KB	-rw-r--r--
site_language.inc	2.46 KB	-rw-r--r--
string_equal.inc	2.78 KB	-rw-r--r--
string_length.inc	2.28 KB	-rw-r--r--
term.inc	3.8 KB	-rw-r--r--
term_has_parent.inc	5.66 KB	-rw-r--r--
term_parent.inc	2.74 KB	-rw-r--r--
term_vocabulary.inc	3.77 KB	-rw-r--r--
theme.inc	1.85 KB	-rw-r--r--

Code Editor : string_equal.inc

<?php

/**
 * @file
 * Plugin to provide access control/visibility based on specified context string matching user-specified string
 */

$plugin = array(
  'title' => t("String: comparison"),
  'description' => t('Control access by string match.'),
  'callback' => 'ctools_string_equal_ctools_access_check',
  'settings form' => 'ctools_string_equal_ctools_access_settings',
  'summary' => 'ctools_string_equal_ctools_access_summary',
  'required context' => new ctools_context_required(t('String'), 'string'),
  'defaults' => array('operator' => '=', 'value' => '', 'case' => FALSE),
);

/**
 * Settings form
 */
function ctools_string_equal_ctools_access_settings($form, &$form_state, $conf) {
  $form['settings']['operator'] = array(
    '#type' => 'radios',
    '#title' => t('Operator'),
    '#options' => array(
      '=' => t('Equal'),
      '!=' => t('Not equal'),
      'regex' => t('Regular expression'),
      '!regex' => t('Not equal to regular expression'),
    ),
    '#default_value' => $conf['operator'],
    '#description' => t('If using a regular expression, you should enclose the pattern in slashes like so: <em>/foo/</em>. If you need to compare against slashes you can use another character to enclose the pattern, such as @. See <a href="http://www.php.net/manual/en/reference.pcre.pattern.syntax.php">PHP regex documentation</a> for more.'),
  );

$form['settings']['value'] = array(
    '#type' => 'textfield',
    '#title' => t('String'),
    '#default_value' => $conf['value'],
  );

$form['settings']['case'] = array(
    '#type' => 'checkbox',
    '#title' => t('Case sensitive'),
    '#default_value' => $conf['case'],
  );
  return $form;
}

/**
 * Check for access
 */
function ctools_string_equal_ctools_access_check($conf, $context) {
  if (empty($context) || empty($context->data)) {
    $string = '';
  }
  else {
    $string = $context->data;
  }

$value = $conf['value'];
  if (empty($conf['case'])) {
    $string = drupal_strtolower($string);
    $value = drupal_strtolower($value);
  }

switch ($conf['operator']) {
    case '=':
      return $string === $value;
    case '!=':
      return $string !== $value;
    case 'regex':
      return preg_match($value, $string);
    case '!regex':
      return !preg_match($value, $string);
  }
}

/**
 * Provide a summary description based upon the specified context
 */
function ctools_string_equal_ctools_access_summary($conf, $context) {
  $values = array('@identifier' => $context->identifier, '@value' => $conf['value']);
  switch ($conf['operator']) {
    case '=':
      return t('@identifier is "@value"', $values);
    case '!=':
      return t('@identifier is not "@value"', $values);
    case 'regex':
      return t('@identifier matches "@value"', $values);
    case '!regex':
      return t('@identifier does not match "@value"', $values);
  }
}

${this.title}

Code Editor : string_equal.inc