Extension:MarketResearch
<?php /**
* MarketResearch extensionTemplate:Php
* * Version 0.0.1 started 2008-07-12 * * @package MediaWiki * @subpackage Extensions * @licence GNU General Public Licence 2.0 or later */
if (!defined('MEDIAWIKI')) die('Not an entry point.');
define('MARKETRESEARCH_VERSION', '0.2.5, 2008-08-31');
$wgMarketResearchPartner = 'partnerid-not-set'; $wgMarketResearchSearch = 'http://www.marketresearch.com/feed/search_results.asp?bquery=$2&partnerid=$1'; $wgMarketResearchCart = 'http://www.marketresearch.com/feed/cart/addtocart.asp'; $wgMarketResearchView = 'http://www.marketresearch.com/feed/cart/ViewCart.asp'; $wgMarketResearchExpiry = 600; # Number of seconds a cached entry should live for $wgMarketResearchDescSize = 500; # Max characters to render of a description $wgMarketResearchLink = 'http://www.govitwiki.com'; $wgMarketResearchName = 'GovITwiki Research Report Store'; $wgMarketResearchImages = preg_replace('|^.+(?=[/\\\\]extensions)|', $wgScriptPath, dirname(__FILE__).'/images');
- Extension credits that show up on Special:Version
$wgExtensionCredits['parserhook'][] = array( 'name' => 'MarketResearch', 'author' => 'Nad for WikiExpert', 'url' => 'http://www.organicdesign.co.nz/Extension:MarketResearch', 'description' => 'Display market research information' );
$wgSpecialPages['MarketResearch'] = 'SpecialMarketResearch'; $wgExtensionFunctions[] = "wfSetupMarketResearch";
require_once "$IP/includes/SpecialPage.php";
/**
* The callback function for converting the input text to HTML output */
function wfMarketResearchTag($input) { global $wgTitle, $wgMarketResearchPartner, $wgMarketResearchSearch, $wgMarketResearchDescSize, $wgMarketResearchTable, $wgMarketResearchExpiry, $wgMarketResearchImages;
# Add keywords and product id into feed URL $keywords = preg_split('/[\x00-\x1f+,]+/', strtolower(trim($input))); $search = str_replace('$1', $wgMarketResearchPartner, $wgMarketResearchSearch); $search = str_replace('$2', join('+', $keywords), $search); $keywords = join(',', $keywords); $ts = time(); $db = &wfGetDB(DB_MASTER); $return = urlencode($wgTitle->getFullURL()); $html = "";
# Remove expired items & attempt to read current item $xml = false; if ($wgMarketResearchTable) { $db->delete($wgMarketResearchTable, array("mrc_time < ".($ts-$wgMarketResearchExpiry)), __FUNCTION__); if ($row = $db->selectRow($wgMarketResearchTable, 'mrc_xml', "mrc_keywords = '$keywords'", __FUNCTION__)) $xml = $row->mrc_xml; }
# If no XML yet, read from feed and store in cache if ($xml === false) { $xml = file_get_contents($search); if ($wgMarketResearchTable) { $row = array( 'mrc_keywords' => $keywords, 'mrc_time' => $ts, 'mrc_xml' => $xml ); $db->insert($wgMarketResearchTable, $row, __FUNCTION__); } }
# Read the feed into a DOM object $doc = new DOMDocument(); $doc->loadXML($xml); if (is_object($doc)) {
$jump = Title::makeTitle(NS_SPECIAL, 'MarketResearch'); $buy = "<img src=\"$wgMarketResearchImages/more-info.gif\" />";
# Loop through products foreach ($doc->getElementsByTagName('PRODUCT') as $product) { $id = $product->getAttribute('id'); foreach ($product->getElementsByTagName('TITLE') as $i) $title = $i->textContent; foreach ($product->getElementsByTagName('VENDOR') as $i) $vendor = $i->textContent; foreach ($product->getElementsByTagName('DESCRIPTION') as $i) $desc = $i->textContent; if (strlen($desc) > $wgMarketResearchDescSize) $desc = substr($desc, 0, $wgMarketResearchDescSize).'...';
# Jump page link $link = "<a href=\"".$jump->getLocalURL("keywords=$keywords&productid=$id&returnURL=$return")."\">$buy</a>\n";
# render this item
$html .= "
$title by $vendor
\n$desc
\n$link\n";
} } else $html = 'no valid XML returned';
return "
";
}
/**
* An unlisted special page used as the "jump page" to a product */
class SpecialMarketResearch extends SpecialPage {
function __construct() { SpecialPage::SpecialPage('MarketResearch', , false, false, false, false); }
public function execute($param) { global $wgOut, $wgParser, $wgRequest, $wgMarketResearchTable, $wgMarketResearchPartner, $wgMarketResearchCart, $wgMarketResearchView, $wgMarketResearchLink, $wgMarketResearchName, $wgMarketResearchImages;
$this->setHeaders(); $title = Title::makeTitle(NS_SPECIAL, 'MarketResearch'); $keywords = $wgRequest->getText('keywords'); $product = $wgRequest->getText('productid'); $return = urlencode($wgRequest->getText('returnURL'));
# Read query XML from cache $db = &wfGetDB(DB_SLAVE); if ($row = $db->selectRow($wgMarketResearchTable, 'mrc_xml', "mrc_keywords = '$keywords'", __FUNCTION__)) { $doc = new DOMDocument(); $xml = $row->mrc_xml; $doc->loadXML($xml); } else $doc = false;
# Parse XML and render
if (is_object($doc)) {
$wgOut->addHTML("<form name=\"mr-form\" action=\"$wgMarketResearchCart\" method=\"GET\">\n");
foreach ($doc->getElementsByTagName('PRODUCT') as $p) if ($p->getAttribute('id') == $product) {
foreach ($p->getElementsByTagName('TITLE') as $i) $title = $i->textContent;
foreach ($p->getElementsByTagName('VENDOR') as $i) $vendor = $i->textContent;
foreach ($p->getElementsByTagName('DESCRIPTION') as $i) $desc = $i->textContent;
$wgOut->addWikiText("== $title by $vendor ==\n");
$wgOut->addHTML($desc);
$options = "";
foreach ($p->getElementsByTagName('BUY') as $i) {
$id = $i->getAttribute('id');
$name = $i->textContent;
$price = '$'.$i->getAttribute('price').'.00';
$options .= "<option value=\"$id\">$price ($name)</option>\n";
}
$wgOut->addHTML("
<select name=\"productid\">$options</select>");
$wgOut->addHTML(" <input type=\"image\" src=\"$wgMarketResearchImages/add-to-cart.gif\" />\n");
$wgOut->addHTML("
<a href=\"$wgMarketResearchView?partnerid=$wgMarketResearchPartner&returnURL=$return\">View cart</a>");
$wgOut->addHTML(" | <a href=\"$wgMarketResearchLink\">$wgMarketResearchName</a>");
$wgOut->addHTML(" | <a href=\"javascript:history.go(-1)\">Back</a>");
}
$wgOut->addHTML("<input type=\"hidden\" name=\"partnerid\" value=\"$wgMarketResearchPartner\" />\n");
$wgOut->addHTML("<input type=\"hidden\" name=\"returnURL\" value=\"$return\" />\n");
$wgOut->addHTML("</form>\n");
} else $wgOut->addWikiText('no valid XML returned');
}
}
/**
* Install the hook and special page */
function wfSetupMarketResearch() { global $wgParser, $wgRequest, $wgOut, $egSelenium, $wgLanguageCode, $wgMessageCache, $wgMarketResearchTable; $wgParser->setHook("marketresearch", "wfMarketResearchTag");
# Create cache DB table if it doesn't exist $db = &wfGetDB(DB_MASTER); $wgMarketResearchTable = $db->tableName('MarketResearchCache'); if (!$db->tableExists($wgMarketResearchTable)) { $query = "CREATE TABLE $wgMarketResearchTable (mrc_keywords TINYBLOB, mrc_time INTEGER NOT NULL, mrc_xml MEDIUMBLOB);"; $result = $db->query($query); }
# If the table couldn't be created, disable IPN and add error to site notice if (!$db->tableExists($wgMarketResearchTable)) { global $wgSiteNotice; $wgMarketResearchTable = false;
$wgSiteNotice = "
Please ensure the wiki database user has CREATE permission, or add the table manually with the following query:
$query
";
}
# Add any messages if ($wgLanguageCode == 'en') { $wgMessageCache->addMessages(array( 'marketresearch' => "Details on This Report" )); }
SpecialPage::addPage(new SpecialMarketResearch()); }