<?php
// $Id: freelinking_dev.inc,v 1.1.2.1 2010-03-28 06:10:19 grayside Exp $
/**
 * Drupal Developer Plugins
 *
 * drupalorgnid, drupalproject
 */ 

/*
 * Allows for a link like [[donid:12345]] to be expanded to
 * a link to drupal.org/node/12345
 */
$freelinking['drupalorgnid'] = array(
  'indicator' => '/d(rupal)?o(rg)?/',
  'callback' => 'freelinking_drupalorgnid_callback',
  'tip' => t('Link to a drupal.org node.'),
);

function freelinking_drupalorgnid_callback($target, $plugin) { // resolve nid to a node title
  if (!is_numeric($target['dest'])) {
    return array('failover' => 'error', 'message' =>
      t('Invalid Node ID !nid', array('!nid' => $target['dest'])));
  }

  $url = 'http://drupal.org/node/' . $target['dest'];
  if (!$target['text'] && variable_get('freelinking_drupalorgnid_http_request', TRUE)) {
    $result = drupal_http_request($url, array(), 'GET');
    $found_title = preg_match('/<h1.*>(.*)<\/h1>/', $result->data, $matches);

    if ($found_title) { // regex worked to scarf title of page
      $replacement = array('Drupal.org: "' . $matches[1] . '"', $url);
    }
  }
  elseif ($target['text']) {
    $replacement = array($target['text'], $url);
  }

  if (empty($replacement)) {
    $replacement = array('Drupal.org Node: ' . $target['dest'], $url);
  }

  return $replacement;
} // endfunction freelinking_drupalorgnid_callback

function freelinking_drupalorgnid_settings() {
  $form['freelinking_drupalorgnid_http_request'] = array(
    '#type' => 'checkbox',
    '#title' => t('Get node title'),
    '#default_value' => variable_get('freelinking_drupalorgnid_http_request', TRUE),
    '#description' => t('Get node title from drupal.org.'),
  );
  return $form;
}

/*
 * Allows for a link like [[drupalproject:Freelinking]] to be expanded to
 * drupal.org/project/freelinking
 */
$freelinking['drupalproject'] = array(
  'indicator' => '/d(rupal)?project/',
  'translate' => array(' ' => '_'),
  'replacement' => 'http://drupal.org/project/%1',
  'tip' => t('Link to a project on drupal.org by name.'),
);

// vim:tw=300 nowrap syn=php