| Current File : //opt/RZphp5/includes/doc/Text_Wiki/doc/test_Text_Wiki.php |
<?php
ini_set('display_errors', true);
error_reporting(E_ALL);
// needed for error checking
require_once 'PEAR.php';
// base class
require_once 'Text/Wiki.php';
/**
* Eventually set an include path if all parsers/renderers not installed
* $Id: test_Text_Wiki.php,v 1.19 2006/03/03 17:54:06 toggg Exp $
*/
$parser = $render = $source = '';
$plist = array('Default', 'BBCode', 'Cowiki', 'Doku', 'Mediawiki', 'Tiki', 'X-choice');
$rlist = array('Xhtml', 'Plain', 'Latex', 'Cowiki', 'Doku', 'Tiki', 'Ooosxw', 'Pdf', 'Docbook');
/**
* Here we need to know if we are running from command line or from web
* That runs anyway: if (isset($_SERVER['SERVER_NAME'])) {
* but have some o(l|d)d compatibility problem ...
*/
if (in_array(php_sapi_name(), array('cli', 'cgi'))) {
$html = false;
$parser = isset($_SERVER['argv'][1]) ? $_SERVER['argv'][1] : 'BBCode';
$render = isset($_SERVER['argv'][2]) ? $_SERVER['argv'][2] : 'Xhtml';
if (!isset($_SERVER['argv'][3]) or !is_readable($sou = $_SERVER['argv'][3])) {
die("Enter a text file to be processed as 3d argument\n First and second are parser and renderer\n");
}
$source = file_get_contents ($sou);
} else {
$html = true;
$elist = findExamples(dirname(__FILE__));
if (isset($_REQUEST['example'])
&& in_array($_REQUEST['exchoice'], $elist)) {
$_REQUEST['source'] = file_get_contents ($_REQUEST['exchoice']);
if (preg_match('#(\b'.implode('\b|\b', $plist).'\b)#',
$_REQUEST['source'], $match)) {
$_REQUEST['parser'] = $match[1];
}
$_REQUEST['translate'] = true;
}
foreach (array('parser'=>$plist[0], 'render'=>$rlist[0],
'exchoice'=>($elist ? $elist[0] : ''), 'source'=>'')
as $fld=>$def) {
if(!isset($_REQUEST[$fld])) {
$_REQUEST[$fld] = $def;
}
$$fld = $_REQUEST[$fld];
}
if (!isset($_REQUEST['translate'])) {
echo bldHtml('', $plist, $rlist, $elist);
die();
}
}
// instantiate a Text_Wiki object from the given class
$wiki = & Text_Wiki::singleton($parser);
// If you want to include rules, use
//$wiki = & Text_Wiki::singleton($parser, $rules);
// If you want to get a new copy of the class use factory
//$wiki =& Text_Wiki::factory($parser);
//print "<pre>\n";
//print_r($wiki);
//print "</pre>\n";
// when rendering XHTML, make sure wiki links point to a
// specific base URL
//$wiki->setRenderConf('xhtml', 'wikilink', 'view_url',
// 'http://example.com/view.php?page=');
// set an array of pages that exist in the wiki
// and tell the XHTML renderer about them
//$pages = array('HomePage', 'AnotherPage', 'SomeOtherPage');
$wiki->setRenderConf('xhtml', 'code', 'css_filename', 'codefilename');
// transform the wiki text into given rendering
$result = $wiki->transform($source, $render);
// display the transformed text
if ($html) {
echo bldHtml($result, $plist, $rlist, $elist);
} else {
if (PEAR::isError($result)) {
var_dump($result);
} else {
echo $result;
}
}
function bldOpt($name, $list) {
$ret = '';
foreach($list as $opt) {
$ret .= "<option value='{$opt}'".
($opt == $_REQUEST[$name]? " selected" : "").
">{$opt}</option>\n";
}
return $ret;
}
function bldHtml($result, $plist, $rlist, $elist) {
$optparser = bldOpt('parser', $plist);
$optrender = bldOpt('render', $rlist);
$optexample = bldOpt('exchoice', $elist);
if (PEAR::isError($result)) {
$hresult = '<span class="error">' .
nl2br(htmlentities($result->toString ())) . '</span>';
$result = '';
} else {
$hresult = nl2br(htmlentities($result));
}
if ($_REQUEST['render'] != 'Xhtml') {
$result = '';
}
$_REQUEST['source'] = htmlspecialchars($_REQUEST['source']);
return <<<EOT
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>PEAR::Text_Wiki Demo</title>
<meta name="AUTHOR" content="bertrand Gugger / Toggg">
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
<meta name="KEYWORDS" content="PEAR, Wiki, Parse, Render, Convert, PHP, BBCode, Xhtml, Plain, Latex">
<style type="text/css">
blockquote, pre {
border: solid;
}
.codefilename {
color: blue;
background-color:orange;
text-decoration: underline;
}
.error {
color: red;
}
</style>
</head>
<body>
<h3>PEAR::Text_Wiki Demo</h3>
<div style="float: left;">
<FORM method="post">
Translate from
<SELECT name="parser">{$optparser}</SELECT>
to
<SELECT name="render">{$optrender}</SELECT>
<INPUT type="submit" name="translate" value="translate" />
<br />
<textarea name="source" cols="60" rows="25">{$_REQUEST['source']}</textarea>
<br />
<h4> Or choose
<SELECT name="exchoice">{$optexample}</SELECT>
and
<INPUT type="submit" name="example" value="Load example" />
</h4>
</FORM>
</div>
<div style="float: down; font-family: monospace;">
{$hresult}
</div>
<div>
{$result}
</div>
</body>
</html>
EOT;
}
function findExamples($dir=null) {
$ret = array();
$dh=opendir($dir? $dir : '.');
while ($subfil = readdir($dh)) {
if (!is_dir($subfil) && is_readable($subfil)
&& (substr($subfil, -4) == '.txt')) {
$ret[] = $subfil;
}
}
closedir($dh);
return $ret;
}
?>