<?php

/**
 * @file
 * Admin page callbacks for the Twitter Block module.
 */

/**
 * Implements hook_admin_settings() for module settings configuration.
 */
function twitter_block_admin_settings_form($form, &$form_state) {
  // Advanced feature configurations.
  $form['advanced'] = array(
    '#type' => 'fieldset',
    '#title' => t('Advanced settings'),
    '#collapsible' => TRUE,
    '#collapsed' => TRUE,
  );

  $form['advanced']['twitter_block_cache'] = array(
    '#type' => 'checkbox',
    '#title' => t('Locally cache widget code'),
    '#description' => t("If checked, the widget code is retrieved from Twitter and cached locally. It is updated daily from Twitter's servers to ensure updates to widget code are reflected in the local copy."),
    '#default_value' => variable_get('twitter_block_cache', 0),
  );

  return system_settings_form($form);
}

/**
 * Form constructor for the add block form.
 *
 * @see twitter_block_add_block_form_validate()
 * @see twitter_block_add_block_form_submit()
 * @ingroup forms
 */
function twitter_block_add_block_form($form, &$form_state) {
  module_load_include('inc', 'block', 'block.admin');
  $form = block_admin_configure($form, $form_state, 'twitter_block', NULL);

  // Other modules should be able to use hook_form_block_add_block_form_alter()
  // to modify this form, so add a base form ID.
  $form_state['build_info']['base_form_id'] = 'block_add_block_form';

  // Prevent block_add_block_form_validate/submit() from being automatically
  // added because of the base form ID by providing these handlers manually.
  $form['#validate'] = array('twitter_block_add_block_form_validate');
  $form['#submit'] = array('twitter_block_add_block_form_submit');

  return $form;
}

/**
 * Form validation handler for twitter_block_add_block_form().
 *
 * @see twitter_block_add_block_form()
 * @see twitter_block_add_block_form_submit()
 */
function twitter_block_add_block_form_validate($form, &$form_state) {
  $unique_description = (bool) db_query_range('SELECT 1 FROM {twitter_block} WHERE info = :info', 0, 1, array(':info' => $form_state['values']['info']))->fetchField();

  if (empty($form_state['values']['info']) || $unique_description) {
    form_set_error('info', t('Ensure that each block description is unique.'));
  }

  $unique_widget_id = (bool) db_query_range('SELECT 1 FROM {twitter_block} WHERE widget_id = :widget_id', 0, 1, array(':widget_id' => $form_state['values']['widget_id']))->fetchField();

  if (empty($form_state['values']['widget_id']) || $unique_widget_id) {
    form_set_error('widget_id', t('Ensure that each block widget ID is unique.'));
  }
}

/**
 * Form submission handler for twitter_block_add_block_form().
 *
 * Saves the new custom Twitter block.
 *
 * @see twitter_block_add_block_form()
 * @see twitter_block_add_block_form_validate()
 */
function twitter_block_add_block_form_submit($form, &$form_state) {
  // The serialized 'data' column contains the timeline settings.
  $data = array(
    'theme' => $form_state['values']['theme'],
    'link_color' => $form_state['values']['link_color'],
    'width' => $form_state['values']['width'],
    'height' => $form_state['values']['height'],
    'chrome' => $form_state['values']['chrome'],
    'border_color' => $form_state['values']['border_color'],
    'language' => $form_state['values']['language'],
    'tweet_limit' => $form_state['values']['tweet_limit'],
    'related' => $form_state['values']['related'],
    'polite' => $form_state['values']['polite'],
  );

  // Save the block configuration.
  $delta = db_insert('twitter_block')
    ->fields(array(
      'info' => $form_state['values']['info'],
      'widget_id' => $form_state['values']['widget_id'],
      'username' => $form_state['values']['username'],
      'data' => serialize($data),
    ))
    ->execute();

  // Store block delta to allow other modules to work with new block.
  $form_state['values']['delta'] = $delta;

  // Run the normal new block submission (borrowed from block_add_block_form_submit).
  $query = db_insert('block')->fields(array('visibility', 'pages', 'custom', 'title', 'module', 'theme', 'status', 'weight', 'delta', 'cache'));
  foreach (list_themes() as $key => $theme) {
    if ($theme->status) {
      $query->values(array(
        'visibility' => (int) $form_state['values']['visibility'],
        'pages' => trim($form_state['values']['pages']),
        'custom' => (int) $form_state['values']['custom'],
        'title' => $form_state['values']['title'],
        'module' => $form_state['values']['module'],
        'theme' => $theme->name,
        'status' => 0,
        'weight' => 0,
        'delta' => $delta,
        'cache' => DRUPAL_NO_CACHE,
      ));
    }
  }
  $query->execute();

  $query = db_insert('block_role')->fields(array('rid', 'module', 'delta'));
  foreach (array_filter($form_state['values']['roles']) as $rid) {
    $query->values(array(
      'rid' => $rid,
      'module' => $form_state['values']['module'],
      'delta' => $delta,
    ));
  }
  $query->execute();

  // Store regions per theme for this block.
  foreach ($form_state['values']['regions'] as $theme => $region) {
    db_merge('block')
      ->key(array('theme' => $theme, 'delta' => $delta, 'module' => $form_state['values']['module']))
      ->fields(array(
        'region' => ($region == BLOCK_REGION_NONE ? '' : $region),
        'pages' => trim($form_state['values']['pages']),
        'status' => (int) ($region != BLOCK_REGION_NONE),
      ))
      ->execute();
  }

  drupal_set_message(t('The block has been created.'));
  cache_clear_all();
  $form_state['redirect'] = 'admin/structure/block';
}

/**
 * Form constructor for the custom Twitter block deletion form.
 *
 * @param $delta
 *   The unique ID of the block within the context of $module.
 *
 * @see twitter_block_delete_submit()
 */
function twitter_block_delete($form, &$form_state, $delta) {
  $block = block_load('twitter_block', $delta);
  $twitter_block = twitter_block_block_get($block->delta);
  $form['info'] = array('#type' => 'hidden', '#value' => $twitter_block['info'] ? $twitter_block['info'] : $twitter_block['title']);
  $form['bid'] = array('#type' => 'hidden', '#value' => $block->delta);

  return confirm_form($form, t('Are you sure you want to delete the block %name?', array('%name' => $twitter_block['info'])), 'admin/structure/block', '', t('Delete'), t('Cancel'));
}

/**
 * Form submission handler for twitter_block_delete().
 *
 * @see twitter_block_delete()
 */
function twitter_block_delete_submit($form, &$form_state) {
  db_delete('twitter_block')
    ->condition('bid', $form_state['values']['bid'])
    ->execute();
  db_delete('block')
    ->condition('module', 'twitter_block')
    ->condition('delta', $form_state['values']['bid'])
    ->execute();
  db_delete('block_role')
    ->condition('module', 'twitter_block')
    ->condition('delta', $form_state['values']['bid'])
    ->execute();
  drupal_set_message(t('The block %name has been removed.', array('%name' => $form_state['values']['info'])));
  cache_clear_all();
  $form_state['redirect'] = 'admin/structure/block';
  return;
}