?><? 

/**
 * 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
 *
 * Q&A submission and management script for use as an 
 * active PHP document in Poseidon content management system.
 *
 * February 3, 2005: V1.0.0 Release
 */

/**
 * Userlevel required to manage questions. 
 * The default value (USERLEVEL_ADMIN) is recommended.
 */
$QandAAdminLevel   = USERLEVEL_ADMIN;

/**
 * Whether users are allowed to write comments to answers. 
 * Set to zero if you don't want to allow comments.
 */
$QandAComments     = 1;

$QandAVersion      = "1.0.0";
$QandASubmit       = "Submit";
$QandAUpdate       = "Update";
$QandANoneYet      = "No questions have been posted yet.";
$QandAHeadings     = array("Question", "Edit", "Delete");
$QandAEdit         = "Edit";
$QandACreate       = "Create";
$QandAEnter        = "Enter your question here:";
$QandATheQ         = "The question";
$QandAAlready      = "is already on file!";
$QandAIsFiled      = "is now on file and will be answered as soon as possible.";
$QandAThanks       = "Thank you for your participation!";

$MenuSection       = "User Tools";
$MenuItemText      = "Q&A";
$MenuItemTooltip   = "Ask the all-knowing Oracle!";
$MenuErrorText     = "Failed to create menu item.";
$MenuSuccessText   = "Menu item created. Please reload this page.";
$PoseidonErrorText = "Sorry, your version of Poseidon doesn't support plugins.<br />Please <a href=\"http://wonko.com/poseidon/\">upgrade</a>!";

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

if (POSEIDON_VERSION >= "0.6" && !getPluginByName("QandA"))
{
	$QandACode  = "\$qanda = new plugin();" . $nl;
	$QandACode .= "\$qanda->name = \"QandA\";" . $nl;
	$QandACode .= "\$qanda->version = \"" . $QandAVersion."\";" . $nl;
	$QandACode .= "\$qanda->createMenuItem(\"" . $MenuSection . "\", \"" . $MenuItemText . "\", \"content.php?title=" . urlencode($item->title) . "\", \"" . $MenuItemTooltip . "\", 10);" . $nl;
	if (!installPlugin ("QandA", $QandAVersion, "", $QandACode, 1))
	{
		print "
			<p align=\"center\">
				<b>" . $MenuErrorText . ".</b>
			</p>" . $nl;
	}
	else
	{
		print "
			<p align=\"center\">
				<b>" . $MenuSuccessText . ".</b>
			</p>" . $nl;
	}
}
elseif (POSEIDON_VERSION >= "0.6")
{
	print "<br />" . $nl;
	
	global $qanda;
	
	$questions = array();
	$s_questions = $qanda->getSetting("questions");
	if ($s_questions)
		$questions = unserialize($s_questions);
	
	if (@$_POST['qanda_op'] == 'Submit')
	{
		if (array_key_exists($_POST['question'], $questions))
		{
			print "<blockquote>$QandATheQ (".stripslashes($_POST['question']).") $QandAAlready</blockquote>" . $nl;
		}
		else
		{
			$questions[$_POST['question']] = 0;
			$qanda->saveSetting("questions", serialize($questions));
			print "<blockquote>$QandATheQ (".stripslashes($_POST['question']).") $QandAIsFiled<br />$QandAThanks</blockquote>" . $nl;
			$_POST['question'] = "";
		}
	}
	
	if ($userinfo->userlevel >= $QandAAdminLevel)
	{
		if (@$_POST['qanda_op'] == "Create")
		{
			$qtitle = $_POST['qstrings'][$_POST['createindex']];
			$occurrences = contentExists($qtitle);
			if ($occurrences !== false)
			{
				if ($occurrences == 0)
					postContent($qtitle, "", "html", 1, 10, $QandAComments);
				if ($occurrences <= 1)
					$questions[$qtitle] = getContentIdByTitle($qtitle);
			}
		}
		elseif (@$_POST['qanda_op'] == "Update")
		{
			$strkeys = $_POST['qstrings'];
			$qkeys = array_keys($questions);
			for($idx = 0; $idx < count($strkeys); ++$idx)
			{
				if (@$_POST['qdelete'][$idx])
				{
					if ($questions[$qkeys[$idx]])
						deleteContent($questions[$qkeys[$idx]]);
				}
				else
				{
					$qnew[$strkeys[$idx]] = $questions[$qkeys[$idx]];
					if ($strkeys[$idx] != $qkeys[$idx])
						updateContentTitle($qnew[$strkeys[$idx]], $strkeys[$idx]);
				}
			}
			if (is_array(@$qnew))
				$questions = $qnew;
			else
				$questions = array();
		}
	
		if (count($questions))
		{
			$qanda->saveSetting("questions", serialize($questions));
			?>
	
			<form name="qadminform" method="POST" action="content.php">
				<table border="0" cellpadding="2">
					<tr>
	
			<?
			foreach($QandAHeadings as $heading)
				print "\t\t\t\t\t<td class=\"genericTableHeader\">$heading</td>" . $nl;
			?>
	
					</tr>
	
			<?
			$idx = 0;
			foreach(array_keys($questions) as $question)
			{
				?>
	
					<tr>
						<td class="genericTableCell">
							<input type="text" size="50" maxlength="255" name="qstrings[<? print $idx; ?>]" value="<? print htmlspecialchars(stripslashes($question)); ?>" />
						</td>
						<td class="genericTableCell">
							<? if ($questions[$question]) { ?><a href="post.php?op=edit&id=<? print $questions[$question]; ?>"><? print $QandAEdit; ?></a><? } else { ?><input type="submit" name="qanda_op" value="<? print $QandACreate; ?>" onclick="javascript:document.qadminform.createindex.value=<? print $idx; ?>;" /><? } ?>
						</td>
						<td class="genericTableCell">
							<input type="checkbox" name="qdelete[<? print $idx; ?>]" value="1" />
						</td>
					</tr>
	
				<?
				++$idx;
			}
			?>
	
					<tr>
						<td class="genericTableCell" colspan="3">
							<input type="submit" name="qanda_op" value="<? print $QandAUpdate; ?>" />
						</td>
					</tr>
				</table>
				<input type="hidden" name="createindex" value="0" />
				<input type="hidden" name="id" value="<? print $item->id ?>" />
			</form>
	
			<?
		}
		else
		{
			$qanda->deleteSetting("questions");
			print "<blockquote>$QandANoneYet</blockquote>" . $nl;
		}
	}
	
	?>
	
	<p>
	<b><? print $QandAEnter; ?></b><br />
	<form method="POST" action="content.php">
		<input type="text" size="70" maxlength="255" name="question" value="<? print htmlspecialchars(@$_POST['question']); ?>" />
		</p><p>
		<input type="hidden" name="id" value="<? print $item->id; ?>" />
		<input type="submit" name="qanda_op" value="<? print $QandASubmit; ?>" />
	</form>
	</p>
	
	<?
	
	print "<ul>" . $nl;
	foreach(array_reverse(array_keys($questions)) as $question)
	{
		if ($questions[$question])
		{
			$strquestion = stripslashes($question);
			print "<li><a href=\"content.php?id=".$questions[$question]."\">$strquestion/a></li>" . $nl;
		}
	}
	print "</ul>" . $nl;
}
else
{
	print "
		<p align=\"center\">
			<b>" . $PoseidonErrorText . "</b>
		</p>" . $nl;
}

/**
 * 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;
}


/**
 * Function: contentExists
 *
 * Determines whether a given title exists in the content table.
 *
 * Parameters:
 *
 *     title - Content title.
 *
 * Returns:
 *
 *     Number of occurrences of the specified title, *false* on error.
 *
 */
function contentExists($title)
{
	global $db;
	
	$result = $db->query("SELECT count(*) AS occurences FROM ".DBTABLEPREFIX."content WHERE title = '".$title."'");
	
	if (count($result) == 1)
		return $result[0]->occurences;
	else
		return false;
}


/**
 * Function: getContentIdByTitle
 *
 * Get content id associated with a title.
 *
 * Parameters:
 *
 *     title - Content title.
 *
 * Returns:
 *
 *     Content id, *false* on error (i.e. if multiple items are found).
 *
 */
function getContentIdByTitle($title)
{
	global $db;
	
	$result = $db->query("SELECT id FROM ".DBTABLEPREFIX."content WHERE title = '".$title."'");
	
	if (count($result) == 1)
		return $result[0]->id;
	else
		return false;
}


/**
 * Function: updateContentTitle
 *
 * Change the title of a given content item.
 *
 * Parameters:
 *
 *     id    - Content id.
 *     title - Content title.
 *
 * Returns:
 *
 *     *true* on success, *false* on error.
 *
 */
function updateContentTitle($id, $title)
{
	global $db;
	
	return $db->execute("UPDATE  ".DBTABLEPREFIX."content SET title='".$title."' WHERE id=".$id);
}