$outputFilename = @$_REQUEST['outputFilename'] ? "" . HEURIST_HTML_PUBPATH . $_REQUEST['outputFilename'] : (@$_REQUEST['recID'] ? "" . HEURIST_HTML_PUBPATH . $style . "-" . HEURIST_DBID . "-" . $recID . ".html" : null);
// outName returns the hml direct.
$pos = strpos(HEURIST_HTML_PUBPATH, HEURIST_DOCUMENT_ROOT);
if ($pos !== false || file_exists(HEURIST_DOCUMENT_ROOT . HEURIST_HTML_PUBPATH)) {
$outputURI = 'http://' . HEURIST_SERVER_NAME . ($pos !== false ? substr(HEURIST_HTML_PUBPATH, $pos + strlen(HEURIST_DOCUMENT_ROOT)) : HEURIST_HTML_PUBPATH) . (@$_REQUEST['outputFilename'] ? $_REQUEST['outputFilename'] : (@$_REQUEST['recID'] ? $style . "-" . HEURIST_DBID . "-" . $_REQUEST['recID'] . ".html" : "unknown.html"));
}
if (!$inputFilename || !file_exists($inputFilename)) {
returnXMLErrorMsgPage("unable to find input file '{$inputFilename}'");
}
//set the style filename and check that it exist
$styleFilename = $style ? "" . HEURIST_XSL_TEMPLATES_DIR . $style . ".xsl" : null;
if (!$styleFilename || !file_exists($styleFilename)) {
returnXMLErrorMsgPage("unable to find style file '{$styleFilename}'");
}
loadRecordHTML($inputFilename, $styleFilename);
returnXMLSuccessMsgPage("Successfully wrote output file" . ($outputURI ? " <a href=\"{$outputURI}\" target=\"_blank\">{$outputURI}</a>" : "Unable to determine URI. Not in website path! {$outputFilename}"));
function loadRecordHTML($recHMLFilename, $styleFilename)
{
global $recID, $outputFilename;
$recHmlDoc = new DOMDocument();
$recHmlDoc->load($recHMLFilename);
$recHmlDoc->xinclude();
if (!$styleFilename) {
return $recHmlDoc->saveHTMLFile($outputFilename);
}
$xslDoc = DOMDocument::load($styleFilename);
$xslProc = new XSLTProcessor();
$xslProc->importStylesheet($xslDoc);
// set up common parameters for stylesheets.
// $xslProc->setParameter('','hbaseURL',HEURIST_BASE_URL);
// $xslProc->setParameter('','dbName',HEURIST_DBNAME);
* @package Heurist academic knowledge management system
* @subpackage !!!subpackagename for file such as Administration, Search, Edit, Application, Library
*/
require_once dirname(__FILE__) . '/../../common/config/initialise.php';
require_once dirname(__FILE__) . '/../../common/connect/applyCredentials.php';
require_once dirname(__FILE__) . '/../../common/php/dbMySqlWrappers.php';
// Deals with all the database connections stuff
mysql_connection_overwrite(DATABASE);
if (!is_logged_in()) {
header("Location: " . HEURIST_BASE_URL . "common/connect/login.php?db=" . HEURIST_DBNAME);
return;
}
if (!is_admin()) {
print "<html><head><link rel=stylesheet href='../../common/css/global.css'></head><body><div class=wrap>" . "<div id=errorMsg><span>You must be an adminstrator of the owner's group to unlock the database '" . HEURIST_DBNAME . "'</span>" . "<p><a href=" . HEURIST_BASE_URL . "common/connect/login.php?logout=1&db=" . HEURIST_DBNAME . " target='_top'>Log out</a></p></div></div></body></html>";
return;
}
mysql_query("delete from sysLocks where 1");
/*****DEBUG****/
//error_log("in unlock ".print_r(HEURIST_DBNAME,true));
if (!mysql_error()) {
returnXMLSuccessMsgPage(" Successfully unlocked '" . HEURIST_DBNAME . "'");
}
returnXMLErrorMsgPage("The was a problem unlocking '" . HEURIST_DBNAME . "' error - " . mysql_error());
function returnXMLSuccessMsgPage($msg)
{
die("<html><body><success>{$msg}</success></body></html>");
}
function returnXMLErrorMsgPage($msg)
{
die("<?xml version='1.0' encoding='UTF-8'?>\n<error>{$msg}</error>");
}
function saveTransformOutput($recHMLFilename, $styleFilename, $outputFilename = null)
{
global $outputURI;
$recHmlDoc = new DOMDocument();
if (preg_match("/http/", $recHMLFilename)) {
$suc = $recHmlDoc->loadXML(loadRemoteFile($recHMLFilename));
} else {
$suc = $recHmlDoc->load($recHMLFilename);
}
if (!$suc) {
returnXMLErrorMsgPage("Unable to load file {$recHMLFilename}");
}
$recHmlDoc->xinclude();
//todo write code here to squash xincludes down to some limit.
if (!$styleFilename) {
if (!$outputFilename) {
returnXMLErrorMsgPage("No transform filename or outputFilename provided for {$recHMLFilename}");
}
if (is_logged_in()) {
$cntByte = $recHmlDoc->saveHTMLFile($outputFilename);
}
if ($cntByte > 0) {
returnXMLSuccessMsgPage("Successfully wrote {$cntByte} bytes of untransformed file {$recHMLFilename} to {$outputFilename}");
} else {
returnXMLErrorMsgPage("Unable to output untransformed file {$recHMLFilename} to {$outputFilename}");
}
} else {
$xslDoc = new DOMDocument();
if (preg_match("/http/", $styleFilename)) {
$suc = $xslDoc->loadXML(loadRemoteFile($styleFilename));
} else {
$suc = $xslDoc->load($styleFilename);
}
if (!$suc) {
returnXMLErrorMsgPage("Unable to load XSLT transform file {$styleFilename}");
}
}
$xslProc = new XSLTProcessor();
$xslProc->importStylesheet($xslDoc);
// set up common parameters for stylesheets.
$xslProc->setParameter('', 'hbaseURL', HEURIST_BASE_URL);
$xslProc->setParameter('', 'dbName', HEURIST_DBNAME);
$xslProc->setParameter('', 'dbID', HEURIST_DBID);
$xslProc->setParameter('', 'transform', $styleFilename);
$xslProc->setParameter('', 'standalone', '1');
if ($outputFilename && is_logged_in()) {
$cntByte = $xslProc->transformToURI($recHmlDoc, $outputFilename);
if ($cntByte > 0) {
returnXMLSuccessMsgPage("Successfully wrote {$cntByte} bytes of {$recHMLFilename} transformed by {$styleFilename} to {$outputFilename}" . ($outputURI ? " <a href=\"{$outputURI}\" target=\"_blank\">{$outputURI}</a>" : "Unable to determine URI for {$outputFilename} because is does not match website path!"));
} else {
returnXMLErrorMsgPage("Unable to transform and/or output file {$recHMLFilename} transformed by {$styleFilename} to {$outputFilename}");
}
} else {
$doc = $xslProc->transformToDoc($recHmlDoc);
// echo $xslProc->transformToXML($recHmlDoc);
echo $doc->saveHTML();
}
}
