<?php

// $Id: system.admin.inc,v 1.63.2.8 2009/06/09 10:58:09 goba Exp $

/**

 * @file

 * Admin page callbacks for the system module.

 */

/**

 * Menu callback; Provide the administration overview page.

 */

function system_main_admin_page($arg = NULL) {

  // If we received an argument, they probably meant some other page.

  // Let's 404 them since the menu system cannot be told we do not

  // accept arguments.

  if (isset($arg) && substr($arg, 0, 3) != 'by-') {

    return drupal_not_found();

  }

  // Check for status report errors.

  if (system_status(TRUE) && user_access('administer site configuration')) {

    drupal_set_message(t('One or more problems were detected with your Drupal installation. Check the <a href="@status">status report</a> for more information.', array('@status' => url('admin/reports/status'))), 'error');

  }

  $blocks = array();

  if ($admin = db_fetch_array(db_query("SELECT menu_name, mlid FROM {menu_links} WHERE link_path = 'admin' AND module = 'system'"))) {

    $result = db_query("

      SELECT m.*, ml.*

      FROM {menu_links} ml

      INNER JOIN {menu_router} m ON ml.router_path = m.path

      WHERE ml.link_path != 'admin/help' AND menu_name = '%s' AND ml.plid = %d AND hidden = 0", $admin);

    while ($item = db_fetch_array($result)) {

      _menu_link_translate($item);

      if (!$item['access']) {

        continue;

      }

      // The link 'description' either derived from the hook_menu 'description'

      // or entered by the user via menu module is saved as the title attribute.

      if (!empty($item['localized_options']['attributes']['title'])) {

        $item['description'] = $item['localized_options']['attributes']['title'];

      }

      $block = $item;

      $block['content'] = '';

      if ($item['block_callback'] && function_exists($item['block_callback'])) {

        $function = $item['block_callback'];

        $block['content'] .= $function();

      }

      $block['content'] .= theme('admin_block_content', system_admin_menu_block($item));

      // Prepare for sorting as in function _menu_tree_check_access().

      // The weight is offset so it is always positive, with a uniform 5-digits.

      $blocks[(50000 + $item['weight']) .' '. $item['title'] .' '. $item['mlid']] = $block;

    }

  }

  if ($blocks) {

    ksort($blocks);

    return theme('admin_page', $blocks);

  }

  else {

    return t('You do not have any administrative items.');

  }

}

/**

 * Provide a single block from the administration menu as a page.

 * This function is often a destination for these blocks.

 * For example, 'admin/content/types' needs to have a destination to be valid

 * in the Drupal menu system, but too much information there might be

 * hidden, so we supply the contents of the block.

 *

 * @return

 *   The output HTML.

 */

function system_admin_menu_block_page() {

  $item = menu_get_item();

  if ($content = system_admin_menu_block($item)) {

    $output = theme('admin_block_content', $content);

  }

  else {

    $output = t('You do not have any administrative items.');

  }

  return $output;

}

/**

 * Menu callback; Sets whether the admin menu is in compact mode or not.

 *

 * @param $mode

 *   Valid values are 'on' and 'off'.

 */

function system_admin_compact_page($mode = 'off') {

  global $user;

  user_save($user, array('admin_compact_mode' => ($mode == 'on')));

  drupal_goto('admin');

}

/**

 * Menu callback; prints a listing of admin tasks for each installed module.

 */

function system_admin_by_module() {

  $modules = module_rebuild_cache();

  $menu_items = array();

  $help_arg = module_exists('help') ? drupal_help_arg() : FALSE;

  foreach ($modules as $file) {

    $module = $file->name;

    if ($module == 'help') {

      continue;

    }

    $admin_tasks = system_get_module_admin_tasks($module);

    // Only display a section if there are any available tasks.

    if (count($admin_tasks)) {

      // Check for help links.

      if ($help_arg && module_invoke($module, 'help', "admin/help#$module", $help_arg)) {

        $admin_tasks[100] = l(t('Get help'), "admin/help/$module");

      }

      // Sort.

      ksort($admin_tasks);

      $menu_items[$file->info['name']] = array($file->info['description'], $admin_tasks);

    }

  }

  return theme('system_admin_by_module', $menu_items);

}

/**

 * Menu callback; displays a module's settings page.

 */

function system_settings_overview() {

  // Check database setup if necessary

  if (function_exists('db_check_setup') && empty($_POST)) {

    db_check_setup();

  }

  $item = menu_get_item('admin/settings');

  $content = system_admin_menu_block($item);

  $output = theme('admin_block_content', $content);

  return $output;

}

/**

 * Form builder; This function allows selection of the theme to show in administration sections.

 *

 * @ingroup forms

 * @see system_settings_form()

 */

function system_admin_theme_settings() {

  $themes = system_theme_data();

  uasort($themes, 'system_sort_modules_by_info_name');

  $options[0] = '<'. t('System default') .'>';

  foreach ($themes as $theme) {

    $options[$theme->name] = $theme->info['name'];

  }

  $form['admin_theme'] = array(

    '#type' => 'select',

    '#options' => $options,

    '#title' => t('Administration theme'),

    '#description' => t('Choose which theme the administration pages should display in. If you choose "System default" the administration pages will use the same theme as the rest of the site.'),

    '#default_value' => variable_get('admin_theme', '0'),

  );

  $form['node_admin_theme'] = array(

    '#type' => 'checkbox',

    '#title' => t('Use administration theme for content editing'),

    '#description' => t('Use the administration theme when editing existing posts or creating new ones.'),

    '#default_value' => variable_get('node_admin_theme', '0'),

  );

  $form['#submit'][] = 'system_admin_theme_submit';

  return system_settings_form($form);

}

/**

 * Menu callback; displays a listing of all themes.

 *

 * @ingroup forms

 * @see system_themes_form_submit()

 */

function system_themes_form() {

  drupal_clear_css_cache();

  $themes = system_theme_data();

  uasort($themes, 'system_sort_modules_by_info_name');

  $status = array();

  $incompatible_core = array();

  $incompatible_php = array();

  foreach ($themes as $theme) {

    $screenshot = NULL;

    $theme_key = $theme->name;

    while ($theme_key) {

      if (file_exists($themes[$theme_key]->info['screenshot'])) {

        $screenshot = $themes[$theme_key]->info['screenshot'];

        break;

      }

      $theme_key = isset($themes[$theme_key]->info['base theme']) ? $themes[$theme_key]->info['base theme'] : NULL;

    }

    $screenshot = $screenshot ? theme('image', $screenshot, t('Screenshot for %theme theme', array('%theme' => $theme->info['name'])), '', array('class' => 'screenshot'), FALSE) : t('no screenshot');

    $form[$theme->name]['screenshot'] = array('#value' => $screenshot);

    $form[$theme->name]['info'] = array(

      '#type' => 'value',

      '#value' => $theme->info,

    );

    $options[$theme->name] = '';

    if (!empty($theme->status) || $theme->name == variable_get('admin_theme', '0')) {

      $form[$theme->name]['operations'] = array('#value' => l(t('configure'), 'admin/build/themes/settings/'. $theme->name) );

    }

    else {

      // Dummy element for drupal_render. Cleaner than adding a check in the theme function.

      $form[$theme->name]['operations'] = array();

    }

    if (!empty($theme->status)) {

      $status[] = $theme->name;

    }

    else {

      // Ensure this theme is compatible with this version of core.

      if (!isset($theme->info['core']) || $theme->info['core'] != DRUPAL_CORE_COMPATIBILITY) {

        $incompatible_core[] = $theme->name;

      }

      if (version_compare(phpversion(), $theme->info['php']) < 0) {

        $incompatible_php[$theme->name] = $theme->info['php'];

      }

    }

  }

  $form['status'] = array(

    '#type' => 'checkboxes',

    '#options' => $options,

    '#default_value' => $status,

    '#incompatible_themes_core' => drupal_map_assoc($incompatible_core),

    '#incompatible_themes_php' => $incompatible_php,

  );

  $form['theme_default'] = array(

    '#type' => 'radios',

    '#options' => $options,

    '#default_value' => variable_get('theme_default', 'garland'),

  );

  $form['buttons']['submit'] = array(

    '#type' => 'submit',

    '#value' => t('Save configuration'),

  );

  $form['buttons']['reset'] = array(

    '#type' => 'submit',

    '#value' => t('Reset to defaults'),

  );

  return $form;

}

/**

 * Process system_themes_form form submissions.

 */

function system_themes_form_submit($form, &$form_state) {

  // Store list of previously enabled themes and disable all themes

  $old_theme_list = $new_theme_list = array();

  foreach (list_themes() as $theme) {

    if ($theme->status) {

      $old_theme_list[] = $theme->name;

    }

  }

  db_query("UPDATE {system} SET status = 0 WHERE type = 'theme'");

  if ($form_state['values']['op'] == t('Save configuration')) {

    if (is_array($form_state['values']['status'])) {

      foreach ($form_state['values']['status'] as $key => $choice) {

        // Always enable the default theme, despite its status checkbox being checked:

        if ($choice || $form_state['values']['theme_default'] == $key) {

          system_initialize_theme_blocks($key);

          $new_theme_list[] = $key;

          db_query("UPDATE {system} SET status = 1 WHERE type = 'theme' and name = '%s'", $key);

        }

      }

    }

    if (($admin_theme = variable_get('admin_theme', '0')) != '0' && $admin_theme != $form_state['values']['theme_default']) {

      drupal_set_message(t('Please note that the <a href="!admin_theme_page">administration theme</a> is still set to the %admin_theme theme; consequently, the theme on this page remains unchanged. All non-administrative sections of the site, however, will show the selected %selected_theme theme by default.', array(

        '!admin_theme_page' => url('admin/settings/admin'),

        '%admin_theme' => $admin_theme,

        '%selected_theme' => $form_state['values']['theme_default'],

      )));

    }

    variable_set('theme_default', $form_state['values']['theme_default']);

  }

  else {

    // Revert to defaults: only Garland is enabled.

    variable_del('theme_default');

    db_query("UPDATE {system} SET status = 1 WHERE type = 'theme' AND name = 'garland'");

    $new_theme_list = array('garland');

  }

  list_themes(TRUE);

  menu_rebuild();

  drupal_rebuild_theme_registry();

  drupal_set_message(t('The configuration options have been saved.'));

  $form_state['redirect'] = 'admin/build/themes';

  // Notify locale module about new themes being enabled, so translations can

  // be imported. This might start a batch, and only return to the redirect

  // path after that.

  module_invoke('locale', 'system_update', array_diff($new_theme_list, $old_theme_list));

  return;

}

/**

 * Form builder; display theme configuration for entire site and individual themes.

 *

 * @param $key

 *   A theme name.

 * @return

 *   The form structure.

 * @ingroup forms

 * @see system_theme_settings_submit()

 */

function system_theme_settings(&$form_state, $key = '') {

  $directory_path = file_directory_path();

  file_check_directory($directory_path, FILE_CREATE_DIRECTORY, 'file_directory_path');

  // Default settings are defined in theme_get_settings() in includes/theme.inc

  if ($key) {

    $settings = theme_get_settings($key);

    $var = str_replace('/', '_', 'theme_'. $key .'_settings');

    $themes = system_theme_data();

    $features = $themes[$key]->info['features'];

  }

  else {

    $settings = theme_get_settings('');

    $var = 'theme_settings';

  }

  $form['var'] = array('#type' => 'hidden', '#value' => $var);

  // Check for a new uploaded logo, and use that instead.

  if ($file = file_save_upload('logo_upload', array('file_validate_is_image' => array()))) {

    $parts = pathinfo($file->filename);

    $filename = ($key) ? str_replace('/', '_', $key) .'_logo.'. $parts['extension'] : 'logo.'. $parts['extension'];

    // The image was saved using file_save_upload() and was added to the

    // files table as a temporary file. We'll make a copy and let the garbage

    // collector delete the original upload.

    if (file_copy($file, $filename, FILE_EXISTS_REPLACE)) {

      $_POST['default_logo'] = 0;

      $_POST['logo_path'] = $file->filepath;

      $_POST['toggle_logo'] = 1;

    }

  }

  // Check for a new uploaded favicon, and use that instead.

  if ($file = file_save_upload('favicon_upload')) {

    $parts = pathinfo($file->filename);

    $filename = ($key) ? str_replace('/', '_', $key) .'_favicon.'. $parts['extension'] : 'favicon.'. $parts['extension'];

    // The image was saved using file_save_upload() and was added to the

    // files table as a temporary file. We'll make a copy and let the garbage

    // collector delete the original upload.

    if (file_copy($file, $filename)) {

      $_POST['default_favicon'] = 0;

      $_POST['favicon_path'] = $file->filepath;

      $_POST['toggle_favicon'] = 1;

    }

  }

  // Toggle settings

  $toggles = array(

    'logo'                 => t('Logo'),

    'name'                 => t('Site name'),

    'slogan'               => t('Site slogan'),

    'mission'              => t('Mission statement'),

    'node_user_picture'    => t('User pictures in posts'),

    'comment_user_picture' => t('User pictures in comments'),

    'search'               => t('Search box'),

    'favicon'              => t('Shortcut icon'),

    'primary_links'        => t('Primary links'),

    'secondary_links'      => t('Secondary links'),

  );

  // Some features are not always available

  $disabled = array();

  if (!variable_get('user_pictures', 0)) {

    $disabled['toggle_node_user_picture'] = TRUE;

    $disabled['toggle_comment_user_picture'] = TRUE;

  }

  if (!module_exists('search')) {

    $disabled['toggle_search'] = TRUE;

  }

  $form['theme_settings'] = array(

    '#type' => 'fieldset',

    '#title' => t('Toggle display'),

    '#description' => t('Enable or disable the display of certain page elements.'),

  );

  foreach ($toggles as $name => $title) {

    if ((!$key) || in_array($name, $features)) {

      $form['theme_settings']['toggle_'. $name] = array('#type' => 'checkbox', '#title' => $title, '#default_value' => $settings['toggle_'. $name]);