function strongarm_admin_form in Strongarm 6

Same name and namespace in other branches

1. 6.2 strongarm.admin.inc \strongarm_admin_form()
2. 7.2 strongarm.admin.inc \strongarm_admin_form()

Variable management strongarm form.

2 string references to 'strongarm_admin_form'

strongarm_admin_page in ./strongarm.admin.inc

Main admin page menu callback.

strongarm_form_alter in ./strongarm.module

Implementation of hook_form_alter().

File

./strongarm.admin.inc, line 56

Code

function strongarm_admin_form() {
  $form = array();
  $var_conf = strongarm_get_conf();
  $culprits = strongarm_get_culprits();
  $overridden = array();
  $result = db_query("SELECT * FROM {variable} ORDER BY name ASC");
  while ($row = db_fetch_object($result)) {
    $value = unserialize($row->value);
    if (isset($var_conf[$row->name]) && $var_conf[$row->name] != $value) {
      $overridden[$row->name] = $value;
    }
  }
  if (!empty($overridden)) {
    $form = array(
      '#theme' => 'strongarm_admin_form',
    );
    foreach ($overridden as $name => $value) {
      $form['revert']['#tree'] = TRUE;
      $form['revert'][$name] = array(
        '#type' => 'checkbox',
      );
      $form['name'][$name] = array(
        '#type' => 'markup',
        '#value' => $name,
      );
      $form['current_value'][$name] = array(
        '#type' => 'markup',
        '#value' => check_plain(_strongarm_readable($overridden[$name])),
      );
      $form['default_value'][$name] = array(
        '#type' => 'markup',
        '#value' => check_plain(_strongarm_readable($var_conf[$name])),
      );
      $form['culprit'][$name] = array(
        '#type' => 'markup',
        '#value' => $culprits[$name],
      );
    }
    $form['submit'] = array(
      '#type' => 'submit',
      '#value' => t('Revert'),
      '#submit' => array(
        'strongarm_admin_revert_submit',
      ),
    );
  }
  return $form;
}