Difference between revisions of "Xmlwiki.php"

From Organic Design wiki
Line 3: Line 3:
 
# xmlWiki - MediaWiki XML Hack
 
# xmlWiki - MediaWiki XML Hack
 
# Nad - 2005-05-18
 
# Nad - 2005-05-18
 +
 +
# Maybe only use XML transforms
 +
# - use PHP via processing instructions
 +
 +
# AdminPage should be moved out to a separate file again
 +
# - so that hack can still be unhooked even if it has fatal errors
  
 
# DTD's
 
# DTD's
Line 70: Line 76:
 
$xwMessages = array();
 
$xwMessages = array();
 
$xwArticleCache = array();
 
$xwArticleCache = array();
$xwPreTransforms = array();
 
 
$xwPostTransforms = array('geshi', 'default');
 
$xwPostTransforms = array('geshi', 'default');
  
$xwArticleTitle = $wgTitle->mTextform;
+
$xwArticle = $wgArticle->getContent(false);
$xwArticle = xwGetArticle($xwArticleTitle);
+
$xwArticleTitle = $wgTitle->getPrefixedURL();
$xwDocType = null;
 
$xwDocRoot = null;
 
  
 
$xwEdit = isset($_REQUEST['action'])&&($_REQUEST['action'] == 'edit');
 
$xwEdit = isset($_REQUEST['action'])&&($_REQUEST['action'] == 'edit');
Line 87: Line 90:
  
 
$xwUserName = $wgUser->mName;
 
$xwUserName = $wgUser->mName;
$xwUserArticle = xwGetArticle("User:$xwUserName");
+
$xwUserArticle = xwDomificateArticle(xwArticleContent("User:$xwUserName"));
 
$xwReadable = true;
 
$xwReadable = true;
 
$xwWritable = true;
 
$xwWritable = true;
  
# If article is an object...
+
# Try to convert article from XML to a DOM object
 +
xwDomificateArticle($xwArticle);
 +
 
 +
# If successfully converted, get perms (?)
 
if (is_object($xwArticle)) {
 
if (is_object($xwArticle)) {
# Get doc info
 
$xwDocType = $xwArticle->doctype();
 
$xwDocType = $xwDocType->name;
 
$xwDocRoot = $xwArticle->document_element();
 
# Get perms
 
 
$xwUserGroups[] = $xwUserName;
 
$xwUserGroups[] = $xwUserName;
 
$xwReadable = null;
 
$xwReadable = null;
Line 116: Line 117:
 
global $xwArticle;
 
global $xwArticle;
 
global $xwArticleTitle;
 
global $xwArticleTitle;
global $xwDocRoot;
 
global $xwDocType;
 
  
 
global $xwSave;
 
global $xwSave;
Line 143: Line 142:
 
global $xwArticle;
 
global $xwArticle;
 
global $xwArticleTitle;
 
global $xwArticleTitle;
global $xwDocRoot;
 
global $xwDocType;
 
  
 
global $xwView;
 
global $xwView;
Line 180: Line 177:
 
elseif ($xwView) {
 
elseif ($xwView) {
 
if (preg_match('/^(.+<!-- start content -->)(.+)(<!-- end content -->.+)$/ms', $out, $m)) {
 
if (preg_match('/^(.+<!-- start content -->)(.+)(<!-- end content -->.+)$/ms', $out, $m)) {
xwMessage("Viewing doctype: $xwDocType");
 
 
$out = xwTransformArticle();
 
$out = xwTransformArticle();
 
} else xwMessage('xmlWiki couldn\'t match view-output!', 'red');
 
} else xwMessage('xmlWiki couldn\'t match view-output!', 'red');
Line 188: Line 184:
 
elseif ($xwPreview) {
 
elseif ($xwPreview) {
 
if (preg_match('/^(.+<!-- start content -->.+Remember.+saved!.+?<\\/p>.+?<p>)(.+?)(<\\/p>.+<!-- end content -->.+)$/s', $out, $m)) {
 
if (preg_match('/^(.+<!-- start content -->.+Remember.+saved!.+?<\\/p>.+?<p>)(.+?)(<\\/p>.+<!-- end content -->.+)$/s', $out, $m)) {
xwMessage("Previewing doctype: $xwDocType");
 
 
# We have to transform the content in wikiOutput not the article itself
 
# We have to transform the content in wikiOutput not the article itself
 
$xwArticle = html_entity_decode($m[2]);
 
$xwArticle = html_entity_decode($m[2]);
 
# It must be converted to DOM if its XML
 
# It must be converted to DOM if its XML
$xwArticle = xwGetArticle();
+
$xwArticle = xwDomificateArticle();
 
$out = xwTransformArticle();
 
$out = xwTransformArticle();
 
} else xwMessage('xmlWiki couldn\'t match preview-output!', 'red');
 
} else xwMessage('xmlWiki couldn\'t match preview-output!', 'red');
Line 240: Line 235:
 
global $xwArticle;
 
global $xwArticle;
 
global $xwRaw;
 
global $xwRaw;
global $xwPreTranforms;
 
 
global $xwPostTransforms;
 
global $xwPostTransforms;
  
Line 249: Line 243:
 
 
 
# Get doc info
 
# Get doc info
$docType = $article->doctype();
+
$docType = $article->doctype();
$docType = $docType->name;
+
$docType = $docType->name;
$docRoot = $article->document_element();  
+
$docRoot = $article->document_element();  
 
xwMessage("Transforming doctype \"$docType\"");
 
xwMessage("Transforming doctype \"$docType\"");
  
 
# If it's one of ours,
 
# If it's one of ours,
 
if (ereg('^xmlwiki:', $docType)) {
 
if (ereg('^xmlwiki:', $docType)) {
xwMessage('It\'s one of ours, getting transform list...');
 
 
# Get the documents transforms
 
# Get the documents transforms
 
# - the first transforms adjust the document while its still a DOM object
 
# - the first transforms adjust the document while its still a DOM object
 
# - but at some point it would normally transform to text,
 
# - but at some point it would normally transform to text,
 
# - it may then have some further text-based transforms
 
# - it may then have some further text-based transforms
$xwTransforms = $docRoot->get_elements_by_tagname('transform');
+
xwMessage('Applying object\'s transforms...');
 
+
foreach ($docRoot->get_elements_by_tagname('transform') as $element) {
#   - add php-transform-articles,CSS's & XSLT's to $xwEnv
+
# Get transform name
#  - $xwPreTransforms first if not 'raw'
+
$tName = $element->get_content();
 +
# If name(), try to execute from a local function declaration
 +
# - probably this is not needed soon, only accept article-transforms
 +
if (ereg('^(.+)\\(\\)$', $tName, $m)) {
 +
$tName = $m[1];
 +
if ($result = @call_user_func("xwTransform_$tName", $article)) $article = $result;
 +
else xwMessage("Unknown transform \"$tName\"!", 'red');
 +
}
 +
else {
 +
# Transform is not name(), so try getting transform-article-object
 +
if ($tText = xwArticleContent($tName)) {
 +
$tType = xwArticleType($tName, $tText);
 +
if ($tType == 'php') {
 +
}
 +
elseif ($tType == 'xslt') {
 +
}
 +
elseif ($tType == 'css') {
 +
}
 +
}
 +
else xwMessage("No such article \"$tName\"!", 'red');
 +
}
 +
}
 +
#xwMessage(join(',',$xwTransforms));
 +
# - add php-transform-articles,CSS's & XSLT's to $xwEnv
 
}
 
}
  
Line 271: Line 287:
 
xwMessage('Dumping article-object to string');
 
xwMessage('Dumping article-object to string');
 
# validate, report errors
 
# validate, report errors
 
 
# apply stylesheet/XSLT if xml asks for one,
 
# apply stylesheet/XSLT if xml asks for one,
 
 
# Convert DOM back to XML
 
# Convert DOM back to XML
 
$article = $article->dump_mem(true);
 
$article = $article->dump_mem(true);
Line 280: Line 294:
  
 
# Apply post transforms unless 'raw' requested
 
# Apply post transforms unless 'raw' requested
 +
xwMessage('Applying xmlWiki post-transforms...');
 
if (!$xwRaw) foreach ($xwPostTransforms as $transform)
 
if (!$xwRaw) foreach ($xwPostTransforms as $transform)
 
$article = call_user_func("xwTransform_$transform", $article);
 
$article = call_user_func("xwTransform_$transform", $article);
Line 302: Line 317:
 
return "<html><head><title>xmlWiki - $xwArticleTitle</title></head><body bgcolor=#cccccc>
 
return "<html><head><title>xmlWiki - $xwArticleTitle</title></head><body bgcolor=#cccccc>
 
<table border=1 width=100% cellpadding=0 cellspacing=0>
 
<table border=1 width=100% cellpadding=0 cellspacing=0>
<tr><td colspan=3 valign=top>".join('<br>',$xwArticleLinks)."<td align=center><table border=0 width=30%>
+
<tr><td colspan=3 valign=top>".join('<br>',$xwArticleLinks)."<td align=center><table border=0 width=75%>
 
<tr><td align=center>
 
<tr><td align=center>
 
<a href=\"./index.php/xmlWiki\"><img src=\"/wiki/xmlwiki.jpg\" border=0 alt=\"xmlWiki\"></a>
 
<a href=\"./index.php/xmlWiki\"><img src=\"/wiki/xmlwiki.jpg\" border=0 alt=\"xmlWiki\"></a>
Line 382: Line 397:
 
# Include Geshi syntax highlighting
 
# Include Geshi syntax highlighting
 
# - Remember, Geshi should be removed from LocalSettings.php
 
# - Remember, Geshi should be removed from LocalSettings.php
function xwTransform_geshi() {
+
function xwTransform_geshi($article) {
 
xwMessage("Hi, Geshi here, sorry I'm not currently functional.");
 
xwMessage("Hi, Geshi here, sorry I'm not currently functional.");
return false;
+
return $article;
 
 
 
global $xwArticle;
 
global $xwArticle;
Line 390: Line 405:
  
 
# First check for entire article highlighting
 
# First check for entire article highlighting
if (ereg('\\.as$', $xwArticleTitle)) $xwLang = 'actionscript';
 
elseif (ereg('\\.py$', $xwArticleTitle)) $xwLang = 'python';
 
elseif (ereg('\\.java$', $xwArticleTitle)) $xwLang = 'java';
 
elseif (ereg('\\.(cpp)|(h)$', $xwArticleTitle)) $xwLang = 'cpp';
 
elseif (ereg('\\.js$', $xwArticleTitle)) $xwLang = 'javascript';
 
elseif (ereg('\\.css$', $xwArticleTitle)) $xwLang = 'css';
 
elseif (ereg('^#![/a-zA-Z0-9]+\\/perl', $xwArticle)) $xwLang = 'perl';
 
elseif (ereg('^#![/a-zA-Z0-9]+sh', $xwArticle)) $xwLang = 'bash';
 
elseif (ereg('^<?xml', $xwArticle)) $xwLang = 'xml';
 
elseif (ereg('^<?html', $xwArticle)) $xwLang = 'html4strict';
 
else {
 
# Otherwise, parse article for internal highlights
 
# <?,<% lang (default % is asp, default ? is php)
 
# <script language= (default is javascript)
 
 
$xwLang = false;
 
}
 
  
 
# Highlight entire article if xwLang has been set
 
# Highlight entire article if xwLang has been set
Line 430: Line 428:
  
 
# Retreive wiki-article
 
# Retreive wiki-article
# - A DOM object is returned if possible,
+
function xwArticleContent($articleTitle) {
# - or otherwise string content is returned (which can be parsed for highlighting)
 
# - if nothing/false passed, then the global $xwArticle is used
 
function xwGetArticle($articleTitle = false) {
 
 
global $xwArticleCache;
 
global $xwArticleCache;
global $xwArticle;
 
 
# Return with results if already cached
 
# Return with results if already cached
if ($articleTitle && isset($xwArticleCache[$articleTitle]))
+
if (isset($xwArticleCache[$articleTitle]))
 
return $xwArticleCache[$articleTitle];
 
return $xwArticleCache[$articleTitle];
 
# Get wiki article content (or use global if no article passed)
 
# Get wiki article content (or use global if no article passed)
if ($articleTitle) {
+
if ($article = new Article(Title::newFromText($articleTitle)))
$article = new Article(Title::newFromText($articleTitle));
 
 
$article = $article->getContent(false);
 
$article = $article->getContent(false);
} else $article = $xwArticle;
+
if ($article == '(There is currently no text in this page)')
# If article is XML, try to convert it to a DOM object (trap output for parser warnings)
+
return false; # Return without caching
if (ereg('^<\\?xml', $article)) {
 
ob_start();
 
if ($doc = domxml_open_mem($article)) $article = $doc;
 
else {
 
# Could not convert, extract error messages from output
 
xwMessage("\"$articleTitle\" is not well-formed XML:", 'red');
 
$err = preg_replace("/<.+?>/", "", ob_get_contents());
 
$err = preg_replace('/ in .+? on line.+?[0-9]+/', '', $err);
 
$err = preg_replace('/Warning.+?\\(\\): /', '', $err);
 
foreach (split("\n", $err) as $msg) if ($msg) xwMessage($msg, 'red');
 
}
 
ob_end_clean();
 
}
 
# Cache contents
 
 
if ($articleTitle) $xwArticleCache[$articleTitle] = $article;
 
if ($articleTitle) $xwArticleCache[$articleTitle] = $article;
 
return $article;
 
return $article;
 +
}
 +
 +
# Decide kind of article from content and title
 +
function xwArticleType($title, $article) {
 +
# Name based matches
 +
if (ereg('\\.php$', $title)) return 'php';
 +
if (ereg('\\.css$', $title)) return 'css';
 +
if (ereg('\\.as$', $title)) return 'actionscript';
 +
if (ereg('\\.py$', $title)) return 'python';
 +
if (ereg('\\.java$', $title)) return 'java';
 +
if (ereg('\\.(cpp)|(h)$', $title)) return 'cpp';
 +
if (ereg('\\.js$', $title)) return 'javascript';
 +
if (ereg('\\.css$', $title)) return 'css';
 +
# Content based matches
 +
if (preg_match('/^<\\?xml.+?\\?>\\s*<xsl:stylesheet/', $article)) return 'xslt';
 +
if (ereg('^<\\?xml', $article)) return 'xml';
 +
if (ereg('^<\\?html', $article)) return 'html4strict';
 +
if (ereg('^#![/a-zA-Z0-9]+\\/perl', $article)) return 'perl';
 +
if (ereg('^#![/a-zA-Z0-9]+sh', $article)) return 'bash';
 +
}
 +
 +
# Convert passed article to a DOM object
 +
# - Article is unchanged if not valid XML
 +
function xwDomificateArticle(&$article) {
 +
ob_start();
 +
if ($dom = domxml_open_mem($article)) $article = $dom else {
 +
# Could not convert, extract error messages from output
 +
xwMessage("Domification faled:", 'red');
 +
$err = preg_replace("/<.+?>/", "", ob_get_contents());
 +
$err = preg_replace('/ in .+? on line.+?[0-9]+/', '', $err);
 +
$err = preg_replace('/Warning.+?\\(\\): /', '', $err);
 +
foreach (split("\n", $err) as $msg) if ($msg) xwMessage($msg, 'red');
 +
}
 +
ob_end_clean();
 
}
 
}
  

Revision as of 21:37, 5 June 2005

<php> <?php

  1. xmlWiki - MediaWiki XML Hack
  2. Nad - 2005-05-18
  1. Maybe only use XML transforms
  2. - use PHP via processing instructions
  1. AdminPage should be moved out to a separate file again
  2. - so that hack can still be unhooked even if it has fatal errors
  1. DTD's
  2. - using xmlwiki:document, xmlwiki:image etc is for validation purposes
  3. - xwTransformArticle is generic and cares only for xmlwiki:*
  1. CSS STYLES
  2. the are accessed via http, so their article url can be referred to locally in the html
  3. - maybe make the default request 'raw' and must specifically request 'view'
  4. - the default CSS's should deal with geshi colour/tab etc
  1. LATER:
  2. allow XIncludes to build large docs from others
  3. allow docBook and DSSSL content
  1. ---------------------------------------------------------------------------------------------------------------------- #
  2. SCRIPT CONTENTS
  1. INIT
  2. - do admin and exit if running directly
  3. - include geshi
  4. - get wiki & request environment
  5. - get article (as an object if possible)
  6. - get user-info
  7. - get object-specific info (perms, doc-root, doc-type)
  8. - build env (if action=raw, env is empty)
  9. INPUT
  10. - deny access if !writable
  11. - currently not doing anything else
  12. OUTPUT
  13. - trap MediaWiki output
  14. - extract links (not used yet)
  15. - apply security
  16. - transform for raw, view, preview
  17. - if saving, do publishing
  18. - render output & messages
  19. TRANSFORM
  20. - if article is an object,
  21. - process transforms if doctype is one of ours,
  22. - validate and apply XSLT if not
  23. - apply geshi on article
  24. TRANSFORMS
  25. - document transforms
  26. - image transforms
  27. - layout transforms
  28. - database table transforms
  29. - transform object to php-nav-tree
  30. FUNCTIONS
  31. - get article
  32. - etxract hrefs from text
  33. - message/log
  34. - geshi syntax highlighting
  35. ADMIN
  36. - enable/disable patch
  1. ---------------------------------------------------------------------------------------------------------------------- #
  2. INIT
  1. If xmlwiki.php requested directly, return admin page

if (eregi("xmlwiki\\.php", $_SERVER['SCRIPT_NAME'])) xwAdminPage(); else {

# Geshi syntax highlighting is called from xmlWiki and should be removed from LocalSettings.php require_once("extensions/GeshiSyntaxHighlight.php");

# Otherwise set up xmlWiki global environment ready for input and output processing $xwMessages = array(); $xwArticleCache = array(); $xwPostTransforms = array('geshi', 'default');

$xwArticle = $wgArticle->getContent(false); $xwArticleTitle = $wgTitle->getPrefixedURL();

$xwEdit = isset($_REQUEST['action'])&&($_REQUEST['action'] == 'edit'); $xwView = (!isset($_REQUEST['action'])||(isset($_REQUEST['action'])&&($_REQUEST['action'] == 'view'))); $xwRaw = isset($_REQUEST['action'])&&($_REQUEST['action'] == 'raw'); $xwPreview = isset($_REQUEST['wpPreview']); $xwSave = isset($_REQUEST['wpSave']); $xwUserLinks = array(); $xwArticleLinks = array();

$xwUserName = $wgUser->mName; $xwUserArticle = xwDomificateArticle(xwArticleContent("User:$xwUserName")); $xwReadable = true; $xwWritable = true;

# Try to convert article from XML to a DOM object xwDomificateArticle($xwArticle);

# If successfully converted, get perms (?) if (is_object($xwArticle)) { $xwUserGroups[] = $xwUserName; $xwReadable = null; $xwWritable = null; }

}

  1. ---------------------------------------------------------------------------------------------------------------------- #
  2. INPUT
  1. No input processing for now
  2. - used later for custom edit forms (database table article will need it)
  1. Parse and process input from forms

function xwProcessInput() {

global $xwArticle; global $xwArticleTitle;

global $xwSave;

global $xwReadable; global $xwWritable; global $xwMessages;

# If article is being updated, if ($xwSave) { #global $_POST; #if (!$xwReadable || !$xwWritable) die("I'm sorry Dave, I'm afraid I can't do that."); }

}

  1. ---------------------------------------------------------------------------------------------------------------------- #
  2. OUTPUT
  1. Generate new output to send back to browser

function xwProcessOutput() {

global $wgOut;

global $xwArticle; global $xwArticleTitle;

global $xwView; global $xwPreview; global $xwSave; global $xwRaw; global $xwUserLinks; global $xwArticleLinks;

global $xwUserName; global $xwUserArticle; global $xwReadable; global $xwWritable; global $xwMessages;

# First trap Wiki output and extract content and links (should use $ver like Admin Page) ob_start(); $wgOut->output(); $out = ob_get_clean(); $xwUserLinks = preg_match('/id="p-personal"(.+?)<\/div>/s', $out, $m) ? xwExtractHrefs($m[1]) : array(); $xwArticleLinks = preg_match('/id="p-cactions"(.+?)<\/div>/s', $out, $m) ? xwExtractHrefs($m[1]) : array();

# Security if (!$xwReadable) { # change output to access denied message if !readable } if (!$xwWritable) { # remove edit link }

# If raw, output consists only of transformed article if ($xwRaw) $out = xwTransformArticle();

# If normal view, article must appear within wiki content elseif ($xwView) { if (preg_match('/^(.+)(.+)(.+)$/ms', $out, $m)) { $out = xwTransformArticle(); } else xwMessage('xmlWiki couldn\'t match view-output!', 'red'); }

# If preview, article must appear in wiki content preserving wiki editing content elseif ($xwPreview) {

if (preg_match('/^(.+.+Remember.+saved!.+?<\\/p>.+?

)(.+?)(<\\/p>.+.+)$/s', $out, $m)) { # We have to transform the content in wikiOutput not the article itself $xwArticle = html_entity_decode($m[2]); # It must be converted to DOM if its XML $xwArticle = xwDomificateArticle(); $out = xwTransformArticle(); } else xwMessage('xmlWiki couldn\'t match preview-output!', 'red'); } # If saving, check the publishing list elseif (0&& $xwSave && is_object($xwArticle)) { $transformedArticle = xwTransformArticle(); # Get publish list $publist = $xwDocRoot->get_elements_by_tagname('publish'); if (count($publist)) $publist = $publist[0]->dump_mem(true); $publist = split(',', $publist); # Publish each item foreach ($publist as $url) { if ($FH = fopen($url, 'a')) { fwrite($FH, $transformedArticle); fclose($FH); xwMessage("Article published to $url"); } else xwMessage("Failed to publish to $url", 'red'); } } else { # This is probably a special page # - we'll just extract the content and do only post-default-transform if (preg_match('/^(.+)(.+)(.+)$/ms', $out, $m)) $out = xwTransform_default($m[2]); else xwMessage('xmlWiki couldn\'t match special-output!', 'red'); } # Add messages to output unless 'raw' requested if (!$xwRaw) $out = preg_replace('//', .join("\n",$xwMessages), $out); # Render final output and messages xwMessage('Rendering output'); print $out; }

  1. ---------------------------------------------------------------------------------------------------------------------- #
  2. TRANSFORM
  1. Transform an article object
  2. - non objects (strings) can't be transformed because they can't store any transform properties
  3. - but the environment post-transforms (incl. geshi) will be applied

function xwTransformArticle($article = false) { global $xwArticle; global $xwRaw; global $xwPostTransforms; # Use global current article if none passed if ($article === false) $article = $xwArticle; if (is_object($article)) { # Get doc info $docType = $article->doctype(); $docType = $docType->name; $docRoot = $article->document_element(); xwMessage("Transforming doctype \"$docType\""); # If it's one of ours, if (ereg('^xmlwiki:', $docType)) { # Get the documents transforms # - the first transforms adjust the document while its still a DOM object # - but at some point it would normally transform to text, # - it may then have some further text-based transforms xwMessage('Applying object\'s transforms...'); foreach ($docRoot->get_elements_by_tagname('transform') as $element) { # Get transform name $tName = $element->get_content(); # If name(), try to execute from a local function declaration # - probably this is not needed soon, only accept article-transforms if (ereg('^(.+)\\(\\)$', $tName, $m)) { $tName = $m[1]; if ($result = @call_user_func("xwTransform_$tName", $article)) $article = $result; else xwMessage("Unknown transform \"$tName\"!", 'red'); } else { # Transform is not name(), so try getting transform-article-object if ($tText = xwArticleContent($tName)) { $tType = xwArticleType($tName, $tText); if ($tType == 'php') { } elseif ($tType == 'xslt') { } elseif ($tType == 'css') { } } else xwMessage("No such article \"$tName\"!", 'red'); } } #xwMessage(join(',',$xwTransforms)); # - add php-transform-articles,CSS's & XSLT's to $xwEnv } # If object hasn't been transformed into a string yet (or it isn't one of our kind)... if (!is_string($article)) { xwMessage('Dumping article-object to string'); # validate, report errors # apply stylesheet/XSLT if xml asks for one, # Convert DOM back to XML $article = $article->dump_mem(true); } } # Apply post transforms unless 'raw' requested xwMessage('Applying xmlWiki post-transforms...'); if (!$xwRaw) foreach ($xwPostTransforms as $transform) $article = call_user_func("xwTransform_$transform", $article); return $article; }

  1. ---------------------------------------------------------------------------------------------------------------------- #
  2. TRANSFORMS
  3. - these transforms are only temporarily here - they should be articles
  4. - we should use DTD's for each kind: document, image, layout, table
  1. This is the default postTransform which surrounds the page
  2. - most transforms do not reference the global-current-article like this one
  3. - this is a special transform, because it affects all pages, even special pages

function xwTransform_default($article) { xwMessage("Hi defaultTransform here :-)"); global $xwArticle; global $xwArticleTitle; global $xwUserLinks; global $xwArticleLinks; return "

xmlWiki - $xwArticleTitle
".join('
',$xwArticleLinks)."
\"xmlWiki\"
$xwArticleTitle
$article

"; } function xwTransform_document_xxx() { # documents are built from parts, # the parts are a tree in its body # includes 'edit' link for each (like section, and also like table) }

  1. A document object is finalised by transforming it to its body's text

function xwTransform_document_render() { global $xwArticle; $root = $xwArticle->document_element(); $body = $root->get_elements_by_tagname('body'); if (count($body)) $xwArticle = $body[0]->dump_mem(true); } function xwTransform_layout_xxx() { # for layout container style article } function xwTransform_image_xxx() { # object contains properties for loading and transforming an image # image needs no body # Get the global image on which imageTransforms work global $xwArticleImage; }

  1. Converts the in-memory-working image into article content

function xwTransform_image_render() { global $xwArticle; global $xwArticleTitle; global $xwArticleImage; global $xwRaw; if ($xwRaw) { # render article directly if 'raw' request imagePng($xwArticleImage); # Clear article or it will render as xml $xwArticle = ; # set header to image header("Content-type: image/png"); } else { # the raw image is not being requested, render image in-page with info instead $xwArticle = "<img src=\"$xwArticleTitle?action=raw\" alt=\"$xwArticleTitle\"/>"; } }

  1. A table object is an interface to a database table
  2. - this can't be implimented fully until the 'edit' hook is done
  3. - the query result is a list in document body, so any normal document transforms can follow it

function xwTransform_table_xxx() { # - view lists the table/result with links to edit each (like a normal composition-doc) # - also form for create/edit/edlete # - result rows are in document body (just like a content-tree in a document would be) # NODE-LIKE-DB # - if all tables have GUID for pri-key, # - and all have time/duration (or cycle?), # - and we have master list of cols-to-table # - then we could create a meta-query (resulting in pri-key-list of all matches) }

  1. Transform the body content to a xtml/javascript tree

function xwTransform_tree() { # import php-tree-component }

  1. Include Geshi syntax highlighting
  2. - Remember, Geshi should be removed from LocalSettings.php

function xwTransform_geshi($article) { xwMessage("Hi, Geshi here, sorry I'm not currently functional."); return $article; global $xwArticle; global $xwArticleTitle; # First check for entire article highlighting # Highlight entire article if xwLang has been set if ($xwLang) { $xwGeshi = new GeSHi($xwArticle, $xwLang, "extensions/geshi/geshi"); $xwGeshi->set_tab_width(4); $geshi->set_keywords_style(1, 'font-weight: 100;', true); #$geshi->set_comments_style #$geshi->set_escape_char_style #$geshi->set_brackets_style #$geshi->set_strings_style #$geshi->set_numbers_style #$geshi->set_methods_style #$geshi->set_symbols_style #$geshi->set_regexps_style #$geshi->set_script_style #$xwArticle = $xwGeshi->parse_code(); } }

  1. ---------------------------------------------------------------------------------------------------------------------- #
  2. FUNCTIONS
  1. Retreive wiki-article

function xwArticleContent($articleTitle) { global $xwArticleCache; # Return with results if already cached if (isset($xwArticleCache[$articleTitle])) return $xwArticleCache[$articleTitle]; # Get wiki article content (or use global if no article passed) if ($article = new Article(Title::newFromText($articleTitle))) $article = $article->getContent(false); if ($article == '(There is currently no text in this page)') return false; # Return without caching if ($articleTitle) $xwArticleCache[$articleTitle] = $article; return $article; }

  1. Decide kind of article from content and title

function xwArticleType($title, $article) { # Name based matches if (ereg('\\.php$', $title)) return 'php'; if (ereg('\\.css$', $title)) return 'css'; if (ereg('\\.as$', $title)) return 'actionscript'; if (ereg('\\.py$', $title)) return 'python'; if (ereg('\\.java$', $title)) return 'java'; if (ereg('\\.(cpp)|(h)$', $title)) return 'cpp'; if (ereg('\\.js$', $title)) return 'javascript'; if (ereg('\\.css$', $title)) return 'css'; # Content based matches if (preg_match('/^<\\?xml.+?\\?>\\s*<xsl:stylesheet/', $article)) return 'xslt'; if (ereg('^<\\?xml', $article)) return 'xml'; if (ereg('^<\\?html', $article)) return 'html4strict'; if (ereg('^#![/a-zA-Z0-9]+\\/perl', $article)) return 'perl'; if (ereg('^#![/a-zA-Z0-9]+sh', $article)) return 'bash'; }

  1. Convert passed article to a DOM object
  2. - Article is unchanged if not valid XML

function xwDomificateArticle(&$article) { ob_start(); if ($dom = domxml_open_mem($article)) $article = $dom else { # Could not convert, extract error messages from output xwMessage("Domification faled:", 'red'); $err = preg_replace("/<.+?>/", "", ob_get_contents()); $err = preg_replace('/ in .+? on line.+?[0-9]+/', , $err); $err = preg_replace('/Warning.+?\\(\\): /', , $err); foreach (split("\n", $err) as $msg) if ($msg) xwMessage($msg, 'red'); } ob_end_clean(); }

  1. Return a list of the hrefs found in the passed content

function xwExtractHrefs($content) { preg_match_all('/(<a.+?<\/a>)/', $content, $match); return $match[1]; }

  1. Add message to queue

function xwMessage($msg, $col = 'blue') { global $xwMessages; return $xwMessages[] = "

$msg

\n";

}

  1. ---------------------------------------------------------------------------------------------------------------------- #
  2. ADMIN

function xwAdminPage() {

?>xmlWiki Admin Page

xmlWiki
xmlWiki Admin Page





output\\(\\);/m"; # Apply patches if (preg_match($requireMatch[$ver], $file = join('', file('./index.php'))) && preg_match($inputMatch[$ver], $file) && preg_match($outputMatch[$ver], $file)) { $file = preg_replace($requireMatch[$ver], "wfProfileOut( 'main-misc-setup' );\nrequire_once( './xmlwiki.php' );", $file); $file = preg_replace($inputMatch[$ver], "xwProcessInput();\nwfProfileIn( 'main-action' );", $file); $file = preg_replace($outputMatch[$ver], "xwProcessOutput();", $file); if ($handle = fopen('./index.php', 'w')) { fwrite($handle, $file); fclose($handle); } else print xwMessage('Could not open index.php for writing!', '#d00000'); } else print xwMessage('Could not match content of index.php script!', '#d00000'); } elseif (array_key_exists('disable', $_GET)) { # Replace from backup if (!copy('./index.bak', './index.php')) print xwMessage('Could not copy index.bak over index.php', '#d00000'); } # Print current state if (filesize('./index.php') == filesize('./index.bak')) print xwMessage('xmlWiki is currently disabled. [ enable ]', '#003366'); else print xwMessage('xmlWiki is currently enabled. [ disable ]', '#003366'); ?>


XHTML1.0 PHP MediaWiki



<? }

?> </php>