?><? 

/**
 * This program is free software; you can redistribute it and/or modify it
 * under the terms of the GNU General Public License as published by the 
 * Free Software Foundation; either version 2 of the License, or (at your
 * option) any later version.
 *
 * This program is distributed in the hope that it will be useful, but 
 * WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General
 * Public License for more details.
 */
 
/**
 * Poseidon PHP Content Document
 * Author:  Torben Jensen
 * Contact: Torben@GreyStork.com
 *
 * Automatic Site Map generation script for use as an 
 * active PHP document in Poseidon content management system.
 *
 * Requirements: PCRE (Perl Compatible Regular Expressions) Support
 *
 * February 6, 2004: V1.1.2
 * - Fixed a bug that prevented unregistered users from seeing anything but 
 *   menu items.
 * February 2, 2004: V1.1.1
 * ! Modified the parseLinkTree function to use regular expressions.
 * January 31, 2004: V1.1.0
 * + As it turned out, the overhead associated with regenerating the sitemap 
 *   every time the page is viewed is in fact negligible. Hence, I've added 
 *   an option that will make the manual update a thing of the past, unless
 *   your server is really slow and you have a really complex site map tree.
 *   It should be noted that generating the site map on-the-fly is safer, 
 *   since every single link is then checked against the user's credentials 
 *   instead of simply inheriting the credentials check for its menu item.
 * January 31, 2004: V1.0.0
 * ! Admins will be able to update the site map at the click of a button. 
 * ! When generating the site map, the script will parse HTML content and
 *   search for links to other content items, i.e. URLs in the form 
 *   content.php?title=... or content.php?id=...
 * ! PHP content items will not be parsed - hence, links inside this type of
 *   document will not show up in the site map.
 * ! Any identified link will only be followed once, thus preventing circular
 *   recursive linking from resulting in infinite loops.
 */
 
/**
 * Set AutoGenerateSiteMap to false if your server can't handle the load
 * associated with generating a new sitemap every time it is viewed.
 */
$AutoGenerateSiteMap = true;
 
$SiteMapVersion    = "1.1.2";
$MenuSection       = "Location";
$MenuItemText      = "Site Map";
$MenuItemTooltip   = "A bird''s eye view of this whole pile of spaghetti";
$MenuErrorText     = "Failed to create menu item";
$UpdateButtonText  = "Update";

$nl = chr(13) . chr(10);

if (POSEIDON_VERSION >= "0.6" && !getPluginByName("SiteMap"))
{
	$SiteMapCode  = "\$sitemap = new plugin();" . $nl;
	$SiteMapCode .= "\$sitemap->name = \"SiteMap\";" . $nl;
	$SiteMapCode .= "\$sitemap->version = \"" . $SiteMapVersion."\";" . $nl;
	$SiteMapCode .= "\$sitemap->createMenuItem(\"" . $MenuSection . "\", \"" . $MenuItemText . "\", \"content.php?title=" . urlencode($item->title) . "\", \"" . $MenuItemTooltip . ".\", 0);" . $nl;
	if (!installPlugin ("SiteMap", $SiteMapVersion, "", $SiteMapCode, 1))
	{
		print "
			<p align=\"center\">
				<b>" . $MenuErrorText . ".</b>
			</p>" . $nl;
	}
}

print "<b>" . $nl;
print "<ul>" . $nl;

global $sitemap;

$excludelinks = array();

foreach($menu as $section)
{
	if ($userinfo->userlevel >= $section['minlevel'] && $userinfo->userlevel <= $section['maxlevel'])
	{
		print "<li>" . $section['name'] . "</li>" . $nl;
		print "<ul>" . $nl;
		foreach($section['items'] as $menuitem)
		{
			if ($userinfo->userlevel >= $menuitem['minlevel'] && $userinfo->userlevel <= $menuitem['maxlevel'])
			{
				print "<li><a href=\"" . $menuitem['link'] . "\" title=\"" . $menuitem['description'] . "\">" . $menuitem['name'] . "</a></li>" . $nl;
				$settingName = str_replace("'", "''", $section['name'] . "_" . $menuitem['name']);
				if ($AutoGenerateSiteMap || (isset($_GET['update']) && $userinfo->userlevel >= USERLEVEL_ADMIN))
				{
					$menuitemtree = parseLinkTree($menuitem['link'], $excludelinks);
					$menuitemtree = substr($menuitemtree, strpos($menuitemtree, $nl));
					if (!$AutoGenerateSiteMap)
						$sitemap->saveSetting($settingName, $menuitemtree);
				}
				else
					$menuitemtree = $sitemap->getSetting($settingName);
				if ($menuitemtree)
					print $menuitemtree . $nl;
			}
		}
		print "</ul>" . $nl;
	} 
}
print "</ul>" . $nl;

if (!$AutoGenerateSiteMap && $userinfo->userlevel >= USERLEVEL_ADMIN) 
{
	print "
		<p>
			<form method=\"GET\" action=\"\">
				<input type=\"hidden\" name=\"id\" value=\"" . $item->id . "\" />
				&nbsp; &nbsp; 
				<input type=\"submit\" name=\"update\" value=\"" . $UpdateButtonText . "\" />
			</form>
		</p>" . $nl;
}
print "</b>" . $nl;

/**
 * Function: parseLinkTree
 *
 * Parses linked HTML content items and returns a link tree 
 * in an unordered list.
 *
 * Parameters:
 *
 *     link       - The link to follow.
 *     parentlink - An array of links not to follow.
 *
 * Returns:
 *
 *     String containing the link tree list.
 */
function parseLinkTree($link, &$parentlink)
{
	global $userinfo;
		
	$nl = chr(13) . chr(10);
	$linkmatch = array();

	if (array_search($link, $parentlink) === false)
		$parentlink[] = $link;
	else
		return "";
		
	if (preg_match("/([^:]+?|)content\.php\?.*?(title|id)=([^\s&#]*)/i", $link, $linkmatch))
	{
		if ($linkmatch[2] = "title")
		{
			$contentItem = getContentByTitle(urldecode($linkmatch[3]));
			if (count($contentItem) > 1)
				return "";
		}
		else
			$contentItem = getContentById($linkmatch[3]);
		if ($contentItem === false || ($contentItem->userlevel && $userinfo->userlevel < $contentItem->userlevel))
			return "";
	}
	else
		return "";

	$list = "<li><a href=\"$linkmatch[0]\">" . $contentItem->title . "</a></li>" . $nl;

	if ($contentItem->type == 'html')
	{
		if (preg_match_all("/<a\s[^>]*?href\s*?=\s*?\"(.*?)\"/i", $contentItem->content, $linkmatch, PREG_PATTERN_ORDER))
		{
			$subliststr = "";
			foreach ($linkmatch[1] as $linkURL)
				$subliststr .= parseLinkTree($linkURL, $parentlink);
			if ($subliststr != "")
				$list .= "<ul>" . $nl . $subliststr . $nl . "</ul>" . $nl;
		}
	}
	return $list;
}

/**
 * Function: getPluginByName
 *
 * Retrieves the specified plugin object from the database.
 *
 * Parameters:
 *
 *     name - Plugin name.
 *
 * Returns:
 *
 *     Plugin object on success, *false* on error.
 *
 * See Also:
 *     <getPluginById>
 */
function getPluginByName($name)
{
	global $db;
	
	$result = $db->query("SELECT * FROM ".DBTABLEPREFIX."plugins WHERE name = '$name'");
	
	if (count($result) == 1)
		return $result[0];
	else
		return false;
}