materio-base-d7/sites/all/modules/contrib/admin/xmlsitemap/xmlsitemap_engines/xmlsitemap_engines.module

<?php
// $Id: xmlsitemap_engines.module,v 1.7 2009/12/22 23:43:57 davereid Exp $

/**
 * Implements hook_help().
 */
function xmlsitemap_engines_help($path, $arg) {
  $output = '';
  switch ($path) {
    case 'admin/config/search/xmlsitemap/engines':
      if (!module_exists('site_verify')) {
        $output .= t('In order to verify site ownership with the search engines listed below, it is highly recommended to download and install the <a href="@site-verify">Site verification module</a>.', array('@site-verify' => 'http://drupal.org/project/site_verify'));
      }
      break;
  }

  return $output;
}

/**
 * Implements hook_menu().
 */
function xmlsitemap_engines_menu() {
  $items['admin/config/search/xmlsitemap/engines'] = array(
    'title' => 'Search Engines',
    'page callback' => 'drupal_get_form',
    'page arguments' => array('xmlsitemap_engines_settings_form'),
    'access arguments' => array('administer xmlsitemap'),
    'type' => MENU_LOCAL_TASK,
    'file' => 'xmlsitemap_engines.admin.inc',
  );
  //$items['admin/config/search/xmlsitemap/engines/submit'] = array(
  //  'page callback' => 'xmlsitemap_engines_submit',
  //  'access callback' => 'xmlsitemap_engines_submit_access',
  //  'type' => MENU_CALLBACK,
  //);

  return $items;
}

/**
 * Implements hook_cron().
 */
function xmlsitemap_engines_cron() {
  if (xmlsitemap_engines_submit_access()) {
    xmlsitemap_engines_submit_engines();
  }
}

function xmlsitemap_engines_submit_access() {
  // Skip if the site is offline since search engines will not be able to
  // access the site's content.
  if (variable_get('site_offline', 0)) {
    return FALSE;
  }

  // Allow manual submissions to run.
  //if ($_GET['q'] == 'admin/config/search/xmlsitemap/engines/submit' && user_access('administer xmlsitemap')) {
  //  return TRUE;
  //}

  $submit_updated = variable_get('xmlsitemap_engines_submit_updated', TRUE);
  $submitted_last = variable_get('xmlsitemap_engines_submit_last', 0);
  $minimum_lifetime = variable_get('xmlsitemap_engines_minimum_lifetime', 86400);

  // Skip if sitemap data has not been updated since last submission.
  if ($submit_updated && variable_get('xmlsitemap_generated_last', 0) <= $submitted_last) {
    return FALSE;
  }

  // Skip if the time since last submission is less than the minimum lifetime.
  if ((REQUEST_TIME - $submitted_last) < $minimum_lifetime) {
    return FALSE;
  }

  return TRUE;
}

/**
 * Submit the sitemaps to all the specified search engines.
 */
function xmlsitemap_engines_submit_engines() {
  $sitemaps = xmlsitemap_get_sitemaps();
  $engines = variable_get('xmlsitemap_engines_engines', array());
  $engine_info = xmlsitemap_engines_get_engine_info();

  foreach ($engines as $engine) {
    xmlsitemap_engines_submit_sitemaps($engine_info[$engine]['url'], $sitemaps);
  }

  $custom_urls = variable_get('xmlsitemap_engines_custom_urls', '');
  $custom_urls = preg_split('/[\r\n]+/', $custom_urls, -1, PREG_SPLIT_NO_EMPTY);
  foreach ($custom_urls as $custom_url) {
    xmlsitemap_engines_submit_sitemaps($custom_url, $sitemaps);
  }

  variable_set('xmlsitemap_engines_submit_last', REQUEST_TIME);
}

/**
 * Submit the sitemaps to a specific URL.
 *
 * @param $url
 *   The URL for sitemap submission.
 * @param $sitemaps
 *   An array of URLs of the sitemaps to submit.
 */
function xmlsitemap_engines_submit_sitemaps($url, $sitemaps = array()) {
  foreach ($sitemaps as $sitemap) {
    $url = xmlsitemap_engines_prepare_url($url, $sitemap);
    $request = drupal_http_request($url);
    watchdog('xmlsitemap', 'Submitted the sitemap to %url and received response @code.', array('%url' => $url, '@code' => $request->code));
  }
}

/**
 * Replace valid tokens in the URL with their appropriate values.
 *
 * @param $url
 *   An un-tokenized URL.
 * @return
 *   A tokenized URL.
 */
function xmlsitemap_engines_prepare_url($url, $sitemap) {
  return str_replace('[sitemap]', $sitemap, $url);
}

/**
 * Returns information about supported search engines.
 *
 * @param $engine
 *   (optional) The engine to return information for. If omitted, information
 *   for all engines is returned.
 * @param $reset
 *   (optional) Boolean whether to reset the static cache and do nothing. Only
 *   used for tests.
 *
 * @see hook_xmlsitemap_engines_info()
 * @see hook_xmlsitemap_engines_info_alter()
 */
function xmlsitemap_engines_get_engine_info($engine = NULL, $reset = FALSE) {
  global $language;
  static $engines;

  if ($reset) {
    $engines = NULL;
  }

  if (!isset($engines)) {
    if ($cached = cache_get('xmlsitemap:engines:' . $language->language)) {
      $engines = $cached->data;
    }
    else {
      // Fetch the results of all hook_xmlsitemap_engine_info() implementations.
      $engines = module_invoke_all('xmlsitemap_engine_info');
      // Allow other modulse to alter the engine info.
      drupal_alter('xmlsitemap_engine_info', $engines);
      // Cache by language since engine names are translated.
      cache_set('xmlsitemap:engines:' . $language->language, $engines);
    }
  }

  if (isset($engine)) {
    return isset($engines[$engine]) ? $engines[$engine] : NULL;
  }
  else {
    return $engines;
  }
}

/**
 * Implements hook_xmlsitemap_engine_info().
 */
function xmlsitemap_engines_xmlsitemap_engine_info() {
  $engines['google'] = array(
    'name' => t('Google'),
    'url' => 'http://www.google.com/webmasters/tools/ping?sitemap=[sitemap]',
  );
  $engines['yahoo'] = array(
    'name' => t('Yahoo!'),
    'url' => 'http://search.yahooapis.com/SiteExplorerService/V1/ping?sitemap=[sitemap]',
  );
  $engines['ask'] = array(
    'name' => t('Ask.com'),
    'url' => 'http://submissions.ask.com/ping?sitemap=[sitemap]',
  );
  $engines['bing'] = array(
    'name' => t('Bing (formerly Live Search)'),
    'url' => 'http://www.bing.com/webmaster/ping.aspx?siteMap=[sitemap]',
  );
  $engines['moreover'] = array(
    'name' => t('Moreover'),
    'url' => 'http://api.moreover.com/ping?u=[sitemap]',
  );
  return $engines;
}

/**
 * Implements hook_variables().
 */
function xmlsitemap_engines_variables() {
  $variables = array(
    'xmlsitemap_engines_engines' => array(),
    'xmlsitemap_engines_custom_urls' => '',
    'xmlsitemap_engines_minimum_lifetime' => 86400,
    'xmlsitemap_engines_submit_last' => 0,
    'xmlsitemap_engines_submit_updated' => TRUE,
  );
  return $variables;
}