<?php
// $Id: pathauto_taxonomy.inc,v 1.42 2010-02-10 00:14:09 greggles Exp $

/**
 * @file
 * Hook implementations for taxonomy module integration.
 *
 * @ingroup pathauto
 */

/**
 * Implement hook_pathauto() for taxonomy module.
 */
function taxonomy_pathauto($op) {
  switch ($op) {
    case 'settings':
      $settings = array();
      $settings['module'] = 'taxonomy';
      $settings['token_type'] = 'term';
      $settings['groupheader'] = t('Taxonomy term path settings');
      $settings['patterndescr'] = t('Default path pattern (applies to all vocabularies with blank patterns below)');
      $settings['patterndefault'] = t('category/[vocabulary:name]/[term:catpath]');

      $tokens = token_info();
      foreach ($tokens['tokens']['term'] as $key => $info) {
        $settings['tokens']["[term:$key]"] = $info['description'];
      }
      foreach ($tokens['tokens']['vocabulary'] as $key => $info) {
        $settings['tokens']["[vocabulary:$key]"] = $info['description'];
      }
      $settings['supportsfeeds'] = '0/feed';
      $settings['bulkname'] = t('Bulk generate aliases for terms that are not aliased');
      $settings['bulkdescr'] = t('Generate aliases for all existing terms which do not already have aliases.');

      $vocabularies = taxonomy_get_vocabularies();
      if (sizeof($vocabularies) > 0) {
        $settings['patternitems'] = array();
        $forum_vid = variable_get('forum_nav_vocabulary', '');
        foreach ($vocabularies as $vocab) {
          if ($vocab->vid != $forum_vid) {
            $vocabname = $vocab->name;
            $fieldlabel = t('Pattern for all %vocab-name paths', array('%vocab-name' => $vocabname));
            $settings['patternitems'][$vocab->vid] = $fieldlabel;
          }
        }
      }
      return (object) $settings;
    default:
      break;
  }
}

/**
 * Generate aliases for all categories without aliases.
 */
function taxonomy_pathauto_bulkupdate() {
  // Initialize db_or().
  $pattern_or = db_or();

  // From all vocabularies, only attempt to update those with patterns.
  foreach (taxonomy_get_vocabularies() as $vid => $info) {
    $pattern = trim(variable_get('pathauto_taxonomy_' . $vid . '_pattern', ''));

    // If it's not set, check the default
    // TODO - If there's a default we shouldn't do this crazy where statement because all vocabularies get aliases.
    // TODO - Special casing to exclude the forum vid (and the images vid and...?).
    if (empty($pattern)) {
      $pattern = trim(variable_get('pathauto_taxonomy_pattern', ''));
    }
    if (!empty($pattern)) {
      $pattern_or->condition('vid', $vid);
    }
  }

  // Set up the query object.
  $query = db_select('taxonomy_term_data', 'td');
  $query->leftJoin('url_alias', 'ua', "CONCAT('taxonomy/term/', CAST(tid AS CHAR)) = source");
  $query->fields('td', array('tid', 'vid', 'name'));
  $query->fields('ua', array('source', 'alias'));
  $query->isNull('source');

  // Exclude the forums.
  $query->condition('vid', variable_get('forum_nav_vocabulary', ''), '<>');

  // Add $pattern_or condition to query.
  $query->condition($pattern_or);

  // Add range to query.
  $query->range(0, variable_get('pathauto_max_bulk_update', 50));

  // Execute query.
  $result = $query->execute();

  $count = 0;
  $placeholders = array();
  foreach ($result as $term) {
    $count += _taxonomy_pathauto_alias($term, 'bulkupdate');
  }

  drupal_set_message(format_plural($count,
    'Bulk generation of terms completed, one alias generated.',
    'Bulk generation of terms completed, @count aliases generated.'));
}

/**
 * Create aliases for taxonomy objects.
 *
 * @param $category
 *   A taxonomy object.
 */
function _taxonomy_pathauto_alias($term, $op) {
  $count = 0;
  $term = taxonomy_term_load($term->tid);
  $vocabulary = taxonomy_vocabulary_load($term->vid);

  $forum_vid = variable_get('forum_nav_vocabulary', '');
  // If we're in a forum vocabulary, also create a forum container, forum, or forum topic alias.
  if (module_exists('forum') && $forum_vid == (int)$term->vid) {
    $source = 'forum/' . $term->tid;
    if (pathauto_create_alias('forum', $op, $source, array('term' => $term, 'vocabulary' => $vocabulary), $term->vid)) {
      $count++;
    }
  }
  else {
    $source = 'taxonomy/term/' . $term->tid;
    if (pathauto_create_alias('taxonomy', $op, $source, array('term' => $term, 'vocabulary' => $vocabulary), $term->vid)) {
      $count++;
    }
  }
  return $count;
}

/**
 * Implement hook_pathauto() for forum module.
 */
function forum_pathauto($op) {
  switch ($op) {
    case 'settings':
      $settings = array();
      $settings['module'] = 'forum';
      $settings['token_type'] = 'term';
      $settings['groupheader'] = t('Forum path settings');
      $settings['patterndescr'] = t('Pattern for forums and forum containers');
      $settings['patterndefault'] = t('[vocabulary:name]/[term:catpath]');

      $tokens = token_info();
      foreach ($tokens['tokens']['term'] as $key => $info) {
        $settings['tokens']["[term:$key]"] = $info['description'];
      }
      foreach ($tokens['tokens']['vocabulary'] as $key => $info) {
        $settings['tokens']["[vocabulary:$key]"] = $info['description'];
      }
      $settings['supportsfeeds'] = '0/feed';
      $settings['bulkname'] = t('Bulk generate forum paths');
      $settings['bulkdescr'] = t('Generate aliases for all existing forums and forum containers which do not already have aliases.');

      return (object) $settings;
    default:
      break;
  }
}

/**
 * Generate aliases for all forums and forum containers without aliases.
 */
function forum_pathauto_bulkupdate() {
  // Set up the query object and limit it to the forum vocabulary.
  $query = db_select('taxonomy_term_data', 'td');
  $query->leftJoin('url_alias', 'ua', "CONCAT('forum/', CAST(tid AS CHAR)) = source");
  $query->condition('vid', variable_get('forum_nav_vocabulary', ''));
  $query->fields('td', array('tid', 'vid', 'name'));
  $query->fields('ua', array('source', 'alias'));
  $query->isNull('source');

  // Add range to query.
  $query->range(0, variable_get('pathauto_max_bulk_update', 50));

  // Execute query.
  $result = $query->execute();

  $count = 0;
  $placeholders = array();
  foreach ($result as $term) {
    $count += _taxonomy_pathauto_alias($term, 'bulkupdate');
  }

  drupal_set_message(format_plural($count,
    'Bulk update of forums and forum containers completed, one alias generated.',
    'Bulk update of forums and forum containers completed, @count aliases generated.'));
}