IMPORT TikiPro CLYDE FINAL

1 files changed, 54 insertions, 0 deletions

diff --git a/view_cache.php b/view_cache.php
new file mode 100644
index 0000000..a72555a
--- /dev/null
+++ b/view_cache.php
@@ -0,0 +1,54 @@
+<?php
+
+// $Header: /cvsroot/bitweaver/_bit_kernel/view_cache.php,v 1.1 2005/06/19 04:52:53 bitweaver Exp $
+
+// Copyright (c) 2002-2003, Luis Argerich, Garland Foster, Eduardo Polidor, et. al.
+// All Rights Reserved. See copyright.txt for details and a complete list of authors.
+// Licensed under the GNU LESSER GENERAL PUBLIC LICENSE. See license.txt for details.
+
+// Initialization
+require_once( '../bit_setup_inc.php' );
+require_once( WIKI_PKG_PATH.'BitPage.php' );
+
+/*
+if($gBitSystem->getPreference('feature_listPages') != 'y') {
+  $smarty->assign('msg',tra("This feature is disabled"));
+  $gBitSystem->display( 'error.tpl' );
+  die;  
+}
+*/
+if (isset($_REQUEST['url'])) {
+	$id = $wikilib->isCached($_REQUEST['url']);
+
+	if (!$id) {
+		$smarty->assign('msg', tra("No cache information available"));
+
+		$gBitSystem->display( 'error.tpl' );
+		die;
+	}
+
+	$_REQUEST["cache_id"] = $id;
+}
+
+if (!isset($_REQUEST["cache_id"])) {
+	$smarty->assign('msg', tra("No page indicated"));
+
+	$gBitSystem->display( 'error.tpl' );
+	die;
+}
+
+// Get a list of last changes to the Wiki database
+$info = $gBitSystem->get_cache($_REQUEST["cache_id"]);
+$ggcacheurl = 'http://google.com/search?q=cache:'.urlencode(strstr($info['url'],'http://'));
+
+// test if url ends with .txt : formatting for text
+if (substr($info["url"], -4, 4) == ".txt") {
+	$info["data"] = "<pre>" . $info["data"] . "</pre>";
+}
+
+$smarty->assign('ggcacheurl', $ggcacheurl);
+$smarty->assign_by_ref('info', $info);
+$gBitSystem->display( 'bitpackage:kernel/view_cache.tpl');
+$smarty->display('bitpackage:kernel/view_cache.tpl');
+
+?>