'. t('Enabling the Drupalnet module will allow you to register your site with a server, including (optionally) posting information on your installed modules and themes and summary statistics on your number of posts and users, information that can help rank Drupal modules and themes and optionally to enable other sites to register with your site.') .'
'; + $output .= ''. t('The Drupalnet module administration page allows you to set the xml-rpc server page and other related options.') .'
'; + $output .= t('If you maintain a directory of sites, you can list them on a page using the drupal_client_page() function. Sample instructions:
+<?php +print drupalnet_client_page(); +?> ++
'. t('For more information please read the configuration and customization handbook Drupalnet page.', array('@drupal' => 'http://drupal.org/handbook/modules/drupal/')) .'
'; + return $output; + case 'admin/settings/sites-registry': + return ''. t('Using this your site can "call home" to another Drupal server. By calling home to drupal.org and sending a list of your installed modules and themes, you help rank projects on drupal.org and so assist all Drupal administrators to find the best components for meeting their needs. If you want to register with a different server, you can change the Drupal XML-RPC server setting -- but the server has to be able to handle Drupal XML. Some XML-RPC servers may present directories of all registered sites. To get all your site information listed, go to the site information settings page and set the site name, the e-mail address, the slogan, and the mission statement.', array('@site-settings' => url('admin/settings/site-information'))) .'
'; + } +} + +function drupalnet_sites_registry_settings() { + // Check if all required fields are present + if ((variable_get('site_name', 'Drupal') == 'Drupal') || (variable_get('site_name', 'Drupal') == '')) { + form_set_error('drupal_directory', t('You must set the name of your site on the administer » settings » site information page.', array('@url' => url('admin/settings/site-information')))); + } + else if (variable_get('site_mail', ini_get('sendmail_from')) == '') { + form_set_error('drupal_directory', t('You must set an e-mail address for your site on the site information settings page.', array('@url' => url('admin/settings/site-information')))); + } + else if (variable_get('site_slogan', '') == '') { + form_set_error('drupal_directory', t('You must set your site slogan on the site information settings page.', array('@url' => url('admin/settings/site-information')))); + } + else if (variable_get('site_mission', '') == '') { + form_set_error('drupal_directory', t('You must set your site mission on the site information settings page.' , array('@url' => url('admin/settings/site-information')))); + } + + $options = array('1' => t('Enabled'), '0' => t('Disabled')); + + $form['drupal_register'] = array( + '#type' => 'radios', + '#title' => t('Register with a Drupal server'), + '#default_value' => variable_get('drupal_register', 0), + '#options' => $options, + '#description' => t("If enabled, your Drupal site will register itself with the specified Drupal XML-RPC server. For this to work properly, you must set your site's name, e-mail address, slogan and mission statement. When the Drupal XML-RPC server field is set to %drupal-xml-rpc, your web site will register itself with drupal.org. Requires the cron feature to be enabled.", array("%drupal-xml-rpc" => "http://drupal.org/xmlrpc.php")) + ); + + $form['drupal_server'] = array( + '#type' => 'textfield', + '#title' => t('Drupal XML-RPC server'), + '#default_value' => variable_get('drupal_server', 'http://drupal.org/xmlrpc.php'), + '#description' => t('The URL of the Drupal XML-RPC server you wish to register with.') + ); + + $form['drupal_system'] = array( + '#type' => 'radios', + '#title' => t('Send system information'), + '#default_value' => variable_get('drupal_system', 0), + '#options' => $options, + '#description' => t("If enabled, your site will send information on its installed components (modules, themes, and theme engines). This information can help in compiling statistics on usage of Drupal projects.") + ); + + $form['drupal_statistics'] = array( + '#type' => 'radios', + '#title' => t('Send statistics'), + '#default_value' => variable_get('drupal_statistics', 0), + '#options' => $options, + '#description' => t("If enabled, your site will send summary statistics on the number of registered users and the total number of posts. No private information will be sent. These data help to improve the ranking statistics of Drupal projects.") + ); +; + + $form['drupal_client_service'] = array( + '#type' => 'radios', + '#title' => t('Allow other Drupal sites to register'), + '#default_value' => variable_get('drupal_client_service', 0), + '#options' => $options, + '#description' => t('If enabled, your Drupal site will allow other sites to register with your site and send information to this site. This functionality can be used to maintain a list of related sites.') + ); + + return system_settings_form($form); +} + +/** + * Implementation of hook_cron(); handles pings to and from the site. + */ +function drupalnet_cron() { + if (time() - variable_get('cron_last', 0) > 21600) { + + // If this site acts as a Drupal XML-RPC server, delete the sites that + // stopped sending "ping" messages. + if (variable_get('drupal_client_service', 0)) { + $result = db_query("SELECT cid FROM {client} WHERE changed < %d", time() - 259200); + while ($client = db_fetch_object($result)) { + db_query("DELETE FROM {client_system} WHERE cid = %d", $client->cid); + db_query("DELETE FROM {client} WHERE cid = %d", $client->cid); + } + } + + // If this site acts as a Drupal XML-RPC client, send a message to the + // Drupal XML-RPC server. + if (variable_get('drupal_register', 0) && variable_get('drupal_server', 0)) { + drupalnet_notify(variable_get('drupal_server', '')); + } + } +} + +/** + * Callback function from drupal_xmlrpc() called when another site pings this one. + */ +function drupalnet_client_ping($client, $system) { + /* + ** Parse our parameters: + */ + + foreach (array('link', 'name', 'mail', 'slogan', 'mission') as $key) { + $client[$key] = strip_tags($client[$key]); + } + + /* + ** Update the data in our database and send back a reply: + */ + + if ($client['link'] && $client['name'] && $client['mail'] && $client['slogan'] && $client['mission']) { + $result = db_query("SELECT cid FROM {client} WHERE link = '%s'", $client['link']); + if (db_num_rows($result)) { + $record = db_fetch_object($result); + $client['cid'] = $record->cid; + // We have an existing record. + db_query("UPDATE {client} SET link = '%s', name = '%s', mail = '%s', slogan = '%s', mission = '%s', users = %d, nodes = %d, version = '%s', changed = '%s' WHERE cid = %d", $client['uid'], $client['link'], $client['name'], $client['mail'], $client['slogan'], $client['mission'], $client['users'], $client['nodes'], $client['version'], time(), $client['cid']); + } + else { + $client['cid'] = db_next_id('{client}_cid'); + db_query("INSERT INTO {client} (cid, link, name, mail, slogan, mission, users, nodes, version, created, changed) VALUES (%d, '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s')", $client['cid'], $client['link'], $client['name'], $client['mail'], $client['slogan'], $client['mission'], $client['users'], $client['nodes'], $client['version'], time(), time()); + } + if (is_array($system)) { + db_query("DELETE FROM {client_system} WHERE cid = %d", $client['cid']); + foreach ($system as $item) { + db_query("INSERT INTO {client_system} (cid, name, type) VALUES (%d, '%s', '%s')", $client['cid'], $item['name'], $item['type']); + } + } + watchdog('client ping', t('Ping from %name (%link).', array('%name' => $client['name'], '%link' => $client['link'])), WATCHDOG_NOTICE, 'view'); + + return TRUE; + } + else { + return 0; + } + +} + +/** + * Formats a list of all clients. + * + * This function may be called from a custom page on sites that are + * Drupal directory servers. + */ +function drupalnet_client_page($sort = 'name') { + $result = db_query('SELECT * FROM {client} ORDER BY %s', $sort); + + $clients = array(); + while ($client = db_fetch_object($result)) { + $clients[] = $client; + } + + return theme('client_list', $clients); +} + +/** + * Theme a client list. + */ +function theme_client_list($clients) { + // Note: All fields except the mission are treated as plain-text. + // The mission is stripped of any HTML tags to keep the output simple and consistent. + $output = "\n