ping.module

<?php

/**
 * @file
 * Alerts other sites that your site has been updated.
 */

/**
 * Implementation of hook_help().
 */
function ping_help($section) {
  switch ($section) {
    case 'admin/help#ping':
      $output .= t("\n      <p>Drupal can automatically send notifications (called \"pings\") to the %pingomatic to tell them that your site has changed.  In turn pingomatic.com will ping other services like weblogs.com, Technorati, blo.gs, BlogRolling, Feedster.com, Moreover, etc.</p>\n      <p>The ping feature requires crontab.</p>", array(
        '%pingomatic' => '<a href="http://pingomatic.com/">http://pingomatic.com/</a>',
      ));
      break;
    case 'admin/modules#description':
      $output = t('Alerts other sites when your site has been updated.');
      break;
  }
  return $output;
}

/**
 * Implementation of hook_cron().
 *
 * Fire off notifications of updates to remote sites.
 */
function ping_cron() {
  global $base_url;
  if (variable_get('site_name', 0) && variable_get('site_slogan', 0)) {
    if (db_num_rows(db_query("SELECT nid FROM {node} WHERE status = 1 AND moderate = 0 AND (created > '" . variable_get('ping_cron_last', time()) . "' OR changed > '" . variable_get('ping_cron_last', time()) . "')"), 1)) {
      _ping_notify(variable_get('site_name', '') . ' - ' . variable_get('site_slogan', ''), $base_url);
    }
    variable_set('ping_cron_last', time());
  }
}

/**
 * Call hook_ping() in all modules to notify remote sites that there is
 * new content at this one.
 */
function _ping_notify($name, $url) {
  module_invoke_all('ping', $name, $url);
}

/**
 * Implementation of hook_ping().
 *
 * Notifies pingomatic.com, blo.gs, and technorati.com of changes at this site.
 */
function ping_ping($name = '', $url = '') {
  $result = xmlrpc('http://rpc.pingomatic.com', 'weblogUpdates.ping', $name, $url);
  if ($result === FALSE) {
    watchdog('directory ping', t('Failed to notify pingomatic.com (site).'), WATCHDOG_WARNING);
  }
}