<?php
/*
Plugin Name: AlchemyTagger
Plugin URI: http://www.alchemyapi.com/tools/alchemytagger/
Description: Auto-tag your blog posts with people, locations, companies, and other named entities.  Uses the AlchemyAPI.com tagging service.
Author: Orchestr8, LLC
Author URI: http://www.alchemyapi.com/
Version: 1.0
*/

require("AlchemyAPI.php");

add_action('admin_menu', 'AlchemyAPI_Setup');

add_action('wp_ajax_AlchemyAPI_TagPost', 'AlchemyAPI_TagPost');

function AlchemyAPI_ParseEntityResponse($result)
{
	$doc = simplexml_load_string($result);

	$entities = $doc->xpath("//entity");

	$resultArr = array();

	foreach ($entities as $key => $value)
	{
        	$typeArr = $doc->xpath("/results/entities/entity[$key]/type");
	        $textArr = $doc->xpath("/results/entities/entity[$key]/text");

	        if (count($typeArr) > 0 && count($textArr) > 0 && strlen($typeArr[0]) > 0)
        	{
	                $type = "$typeArr[0]";
        	        $text = "$textArr[0]";

	                $disambArr = $doc->xpath("/results/entities/entity[$key]/disambiguated/name");

        	        if (count($disambArr) > 0 && strlen($disambArr[0]) > 0)
                	{
				$doDisamb = get_option('alchemyapi-disamb-enabled');
				if (strlen($doDisamb) < 1)
				{
					$doDisamb = "true";
				}

				if ($doDisamb == "true")
				{
		                        $text = "$disambArr[0]";
				}
	                }

        	        if (!array_key_exists($type, $resultArr))
	                {
        	                $resultArr[$type] = array();
                	}

	                if (!in_array($text, $resultArr[$type]))
	                {
        	                $resultArr[$type][] = $text;
                	}
	        }
	}

	return $resultArr;
}

function AlchemyAPI_CheckAPIKey()
{
	$apiKey = get_option('alchemyapi-key');
	if (strlen($apiKey) < 1)
	{
		return false;
	}

	// Create an AlchemyAPI object.
	$alchemyObj = new AlchemyAPI();

	$alchemyObj->_apiKey = $apiKey;

	$postContent = "This is an API key validation check.";

	try
	{
		$result = $alchemyObj->TextGetRankedNamedEntities($postContent);
	}
	catch (Exception $e)
	{
		return false;
	}

	return true;
}

function AlchemyAPI_TagPost()
{
	$apiKey = get_option('alchemyapi-key');
	if (strlen($apiKey) < 1)
	{
		die("You must first configure an AlchemyAPI Access Key from within your plugins settings screen.");
	}

	// Create an AlchemyAPI object.
	$alchemyObj = new AlchemyAPI();

	$alchemyObj->_apiKey = $apiKey;

	$postContent = stripslashes($_POST['text']);

	$result = "";

	$error = false;
	$errorMsg = "";
	try
	{
		$result = $alchemyObj->HTMLGetRankedNamedEntities($postContent, "http://www.alchemyapi.com/tools/alchemytagger/?type=post");
	}
	catch (Exception $e)
	{
		$error = true;
		$errorMsg = $e->getMessage();
	}

	if ($error == false)
	{
		$resultArr = AlchemyAPI_ParseEntityResponse($result);

		if (count($resultArr) < 1)
		{
			$error = true;
		}
	}

	if ($error == true)
	{
		$error = false;
		try
		{
			// Extract a ranked list of named entities for this text
			$result = $alchemyObj->TextGetRankedNamedEntities($postContent);
		}
		catch (Exception $e)
		{
			$error = true;
			$errorMsg = $e->getMessage();
		}
	}

	if ($error == true)
	{
		if ("Enter some text to analyze." == $errorMsg)
		{
			die("Type some text first.");
		}
		else if ("Error making API call: unsupported-text-language" == $errorMsg)
		{
			die("Type some text first.");
		}
		else
		{
			//die($errorMsg);
			die("Check your API key!");
		}
	}

	$resultArr = AlchemyAPI_ParseEntityResponse($result);

	if (count($resultArr) < 1)
	{
		die("No tag suggestions at this time.");
	}

	$outTable = "{\"tags\":[";

	$firstT = true;
	foreach ($resultArr as $typeKey => $typeVal)
	{
		if ($firstT == false)
		{
			$outTable = "$outTable,";
		}
		$firstT = false;
		$outTable = "$outTable{\"type\":\"$typeKey\",\"phrases\":[";

		$firstV = true;
		foreach ($typeVal as $valuesKey => $valuesVal)
		{
			if ($firstV == false)
			{
				$outTable = "$outTable,";
			}
			$firstV = false;

			$segs = explode("\"", $valuesVal);

			$outTable = "$outTable\"$segs[0]\"";
		}

		$outTable = "$outTable]}";
	}

	$outTable = "$outTable]}";

	header('Content-type: application/json');

	echo "$outTable\n";
}


function AlchemyAPI_Setup()
{
	if (function_exists('add_meta_box'))
	{
		$mode = 'normal';
		$guiMode = get_option('alchemyapi-gui-mode');
		if (strlen($guiMode) > 0 && $guiMode == "advanced")
		{
			$mode = 'advanced';
		}
		$priority = 'low';
		$replaceGui = get_option('alchemyapi-replace-tag-gui');
		if (strlen($replaceGui) < 1 || $replaceGui == "true")
		{
			$priority = 'high';
		}

		add_meta_box('alchemyapi', 'AlchemyTagger', 'AlchemyAPI_GUI', 'post', $mode, $priority);
	} 
	else
	{
		add_action('dbx_post_sidebar', 'AlchemyAPI_GUI', 1);
	}

	add_submenu_page('plugins.php', 'AlchemyTagger Configuration', 'AlchemyTagger Configuration',
			 'manage_options', 'alchemytagger-config', 'AlchemyAPI_Config');
}

function AlchemyAPI_Config()
{
	if (isset($_POST['alchemyapi-key']))
	{
		$thisKey = $_POST['alchemyapi-key'];
		$thisKey = trim($thisKey);

		update_option('alchemyapi-key', $thisKey);

		if (isset($_POST['alchemyapi-gui-mode']))
		{
			update_option('alchemyapi-gui-mode', $_POST['alchemyapi-gui-mode']);
		}
		else
		{
			update_option('alchemyapi-gui-mode', 'normal');
		}
		if (isset($_POST['alchemyapi-replace-tag-gui']))
		{
			update_option('alchemyapi-replace-tag-gui', $_POST['alchemyapi-replace-tag-gui']);
		}
		else
		{
			update_option('alchemyapi-gui-mode', 'false');
		}
		if (isset($_POST['alchemyapi-disamb-enabled']))
		{
			update_option('alchemyapi-disamb-enabled', $_POST['alchemyapi-disamb-enabled']);
		}
		else
		{
			update_option('alchemyapi-disamb-enabled', 'false');
		}
		if (isset($_POST['alchemyapi-async-enabled']))
		{
			update_option('alchemyapi-async-enabled', $_POST['alchemyapi-async-enabled']);
		}
		else
		{
			update_option('alchemyapi-async-enabled', 'false');
		}
		if (isset($_POST['alchemyapi-async-timeout']))
		{
			$timeout = $_POST['alchemyapi-async-timeout'];
			$asyncTimeout = (int)$_POST['alchemyapi-async-timeout'];
			if ($asyncTimeout < 10)
			{
				$timeout = "10";
			}
			if ($asyncTimeout > 120)
			{
				$timeout = "120";
			}
			update_option('alchemyapi-async-timeout', $timeout);
		}
		else
		{
			update_option('alchemyapi-async-timeout', '10');
		}
	}
	?>

	<div class="wrap">
	<h2>AlchemyTagger Configuration</h2>
	<div class="narrow">
	<form action="" method="post" id="alchemyapi-config" style="">

	<p>AlchemyTagger automatically works in the background as you're writing new blog posts, analyzing your writing and suggesting useful categorization tags.  Tags make your posts easier to navigate, better-ranked by search engines, and more!
	</p>

	<p>AlchemyTagger requires an API key to operate. To create an API key, <a href="http://www.alchemyapi.com/api/register.html" target="_blank">click here</a>.</p>
	
	<p>
		<label for="alchemyapi-key"><b><font size="+1">AlchemyAPI.com API Key</font></b></label><br />
	<?php

	$isValid = false;
	$key = get_option('alchemyapi-key');
	if (strlen($key) > 0)
	{
			$isValid = AlchemyAPI_CheckAPIKey();
	}
	$disambOn = get_option('alchemyapi-disamb-enabled');
	if (strlen($disambOn) < 1)
	{
		update_option('alchemyapi-disamb-enabled', 'true');
	}
	$asyncOn = get_option('alchemyapi-async-enabled');
	if (strlen($asyncOn) < 1)
	{
		update_option('alchemyapi-async-enabled', 'true');
	}
	$asyncTimeout = get_option('alchemyapi-async-timeout');
	if (strlen($asyncTimeout) < 1)
	{
		update_option('alchemyapi-async-timeout', '10');
	}
	$guiMode = get_option('alchemyapi-gui-mode');
	if (strlen($guiMode) < 1)
	{
		update_option('alchemyapi-gui-mode', 'normal');
	}
	$guiMode = get_option('alchemyapi-replace-tag-gui');
	if (strlen($guiMode) < 1)
	{
		update_option('alchemyapi-replace-tag-gui', 'true');
	}
	if ($isValid == false)
	{
		?>
		<div style="width:300px; background:#ff0000; border: 1px solid #000000;">
		API Key is *not* valid
		</div>
		<?php
	}
	else
	{
		?>
		<div style="width: 300px; background:#00ff00; border: 1px solid #000000;">
		API Key is valid!
		</div>
		<?php
	}
	?>
		<table><tr><td>
		<input type="text" name="alchemyapi-key" value="<?php echo get_option('alchemyapi-key'); ?>" />
		</td><td>(<a href="http://www.alchemyapi.com/api/register.html">What is this?</a>)
		</td></tr></table>
	</p>

	<p>
		<label><input value="true" <?php if (get_option('alchemyapi-replace-tag-gui') == 'true') { echo "checked=\"checked\""; } ?> type="checkbox" name="alchemyapi-replace-tag-gui" />&nbsp;&nbsp;Replace the default WordPress tagging interface.</label>
	</p>

	<p>
		<label><input value="advanced" <?php if (get_option('alchemyapi-gui-mode') == 'advanced') { echo "checked=\"checked\""; } ?> type="checkbox" name="alchemyapi-gui-mode" />&nbsp;&nbsp;Display AlchemyTagger under 'Advanced Options' on 'Write' page.</label>
	</p>

	<p>
		<table><tr><td>
		<label><input value="true" <?php if (get_option('alchemyapi-disamb-enabled') == 'true') { echo "checked=\"checked\""; } ?> type="checkbox" name="alchemyapi-disamb-enabled" />&nbsp;&nbsp;Enable tag disambiguation.</label>
		</td><td>(<a href="http://www.alchemyapi.com/api/entity/disamb.html">What is this?</a>)
		</td></tr></table>
	</p>

	<p>
		<label><input value="true" <?php if (get_option('alchemyapi-async-enabled') == 'true') { echo "checked=\"checked\""; } ?> type="checkbox" name="alchemyapi-async-enabled" />&nbsp;&nbsp;Enable automatic tag suggestions (tags appear as you type).</label>
	</p>

	<p>
		<table><tr><td>
		Automatic tag suggestions polling frequency (in seconds):
		</td><td>
		<input type="text" name="alchemyapi-async-timeout" value="<?php echo get_option('alchemyapi-async-timeout'); ?>" />
		</td><td><i>(Enter a value from 10-120)</i>
		</td></tr></table>
	</p>

	<p class="submit">
		<input type="submit" value="Update Settings" />
	</p>
		
	</form>
	</div>
	</div>

	<?php	
}

function AlchemyAPI_InsertJS()
{
	if ( ! defined( 'WP_CONTENT_URL' ) )
	      define( 'WP_CONTENT_URL', get_option( 'siteurl' ) . '/wp-content' );
	if ( ! defined( 'WP_CONTENT_DIR' ) )
	      define( 'WP_CONTENT_DIR', ABSPATH . 'wp-content' );
	if ( ! defined( 'WP_PLUGIN_URL' ) )
	      define( 'WP_PLUGIN_URL', WP_CONTENT_URL. '/plugins' );
	if ( ! defined( 'WP_PLUGIN_DIR' ) )
	      define( 'WP_PLUGIN_DIR', WP_CONTENT_DIR . '/plugins' );

	?>
	<script type="text/javascript" src="<?php $var = WP_PLUGIN_URL.'/AlchemyTagger/webtoolkit.scrollabletable.js'; echo $var; ?>"></script>
	<script type="text/javascript" src="<?php $var = WP_PLUGIN_URL.'/AlchemyTagger/webtoolkit.jscrollable.js'; echo $var; ?>"></script>
	<?php
}

function AlchemyAPI_GUI()
{
	AlchemyAPI_InsertJS();

	$asyncEnabled = get_option('alchemyapi-async-enabled');
	if (strlen($asyncEnabled) < 1)
	{
		$asyncEnabled = "true";
	}
	$asyncTimeout = get_option('alchemyapi-async-timeout');
	$timeout = 10;
	if (strlen($asyncTimeout) > 0)
	{
		$timeout = (int)$asyncTimeout;
	}
	$replaceGui = get_option('alchemyapi-replace-tag-gui');
	if (strlen($replaceGui) < 1 || $replaceGui == "true")
	{
		?>
		<script type="text/javascript">
		//<![CDATA[

		jQuery(document).ready( function() {
			jQuery('#tagsdiv').hide();
			AlchemyAPI_ShowActiveTags();
		<?php
	if ($asyncEnabled == "true")
	{
		?>
			window.setTimeout('AlchemyAPI_AsyncUpdate();', 1500);
		<?php
	}
		?>
			});
		//]]>
		</script>
		<?php
	}

	?>
	<script type="text/javascript">
	//<![CDATA[

	var g_AlchemyAPI_SuggestionsVisible = false;
	var g_userClickedSuggest = false;

	function AlchemyAPI_GetPost()
	{
		var l_form = document.getElementById('post');

		if (typeof tinyMCE != 'undefined' &&
		    typeof tinyMCE.selectedInstance != 'undefined' && 
		    !tinyMCE.selectedInstance.spellcheckerOn)
		{
			if (typeof tinyMCE.triggerSave == 'function')
			{
				tinyMCE.triggerSave();
			}
			else
			{
				tinyMCE.wpTriggerSave();
			}	
		}

		return l_form.content.value;
	}
	
	function AlchemyAPI_TagPost(a_isUser)
	{
		g_userClickedSuggest = a_isUser;

		jQuery.post('<?php bloginfo( 'wpurl' );?>/wp-admin/admin-ajax.php',
			    {text: AlchemyAPI_GetPost(),
			     action: 'AlchemyAPI_TagPost',
			     cookie: document.cookie},
			    AlchemyAPI_DisplayTags);
	}

	var g_lastAsyncPostText = "";

	function AlchemyAPI_TagPostAsync()
	{
		var l_text = AlchemyAPI_GetPost();

		if (l_text != g_lastAsyncPostText)
		{
			g_lastAsyncPostText = l_text;

			g_userClickedSuggest = false;

			jQuery.post('<?php bloginfo( 'wpurl' );?>/wp-admin/admin-ajax.php',
				    {text: l_text,
				     action: 'AlchemyAPI_TagPost',
				     cookie: document.cookie},
				    AlchemyAPI_DisplayTags);
		}
	}

	var g_lastAsyncTime = 0;

	function AlchemyAPI_AsyncUpdate()
	{
		<?php
		if ($asyncEnabled == "true")
		{
		?>
		var l_date = new Date();

		if ((l_date.getTime() / 1000) > ((g_lastAsyncTime / 1000) + <?php echo $timeout; ?>))
		{
			g_lastAsyncTime = l_date.getTime();

			AlchemyAPI_TagPostAsync();
		}
		window.setTimeout('AlchemyAPI_AsyncUpdate();', 1500);
		<?php
		}
		?>
	}

	function AlchemyAPI_TrimStr(a_str)
	{
		return a_str.replace(/^\s\s*/, '').replace(/\s\s*$/, '');
	}
	
	function AlchemyAPI_AddTag(a_tagArr, a_tag)
	{
		var l_found = false;
		for (var k = 0;k < a_tagArr.length;++k)
		{
			if (a_tagArr[k].toLowerCase() == AlchemyAPI_TrimStr(a_tag.toLowerCase()))
			{
				l_found = true;
				break;
			}
		}

		if (l_found == false)
		{
			a_tagArr[a_tagArr.length] = AlchemyAPI_TrimStr(a_tag);
		}

		return a_tagArr;
	}

	function AlchemyAPI_IsTagActive(a_tag)
	{
		var l_tag = AlchemyAPI_TrimStr(a_tag);

		var l_tags = jQuery('#tags-input').val();

		var l_tagArr = l_tags.split(',');

		var l_newTagArr = new Array();

		for (var i = 0;i < l_tagArr.length;++i)
		{
			l_tagArr[i] = AlchemyAPI_TrimStr(l_tagArr[i]);

			if (l_tagArr[i].toLowerCase() == a_tag.toLowerCase())
			{
				return true;
			}
		}

		return false;
	}

	function AlchemyAPI_RemoveSingleTag(a_tag)
	{
		var l_tag = AlchemyAPI_TrimStr(a_tag);

		var l_tags = jQuery('#tags-input').val();

		var l_tagArr = l_tags.split(',');

		var l_newTagArr = new Array();

		for (var i = 0;i < l_tagArr.length;++i)
		{
			l_tagArr[i] = AlchemyAPI_TrimStr(l_tagArr[i]);

			if (l_tagArr[i] != a_tag)
			{
				l_newTagArr[l_newTagArr.length] = l_tagArr[i];
			}
		}

		var l_tagText = "";
		for (var i = 0;i < l_newTagArr.length;++i)
		{
			if (l_tagText.length > 0) l_tagText += ",";
			l_tagText += l_newTagArr[i];
		}

		jQuery('#tags-input').val(l_tagText);

		if (typeof tag_update_quickclicks == 'function')
		{
			tag_update_quickclicks();
		}

		AlchemyAPI_DisplayTagSuggestions();

		AlchemyAPI_ShowActiveTags();
	}

	function AlchemyAPI_AddSingleTag(a_tag, a_mode)
	{
		var l_tag = AlchemyAPI_TrimStr(a_tag);

		var l_tags = jQuery('#tags-input').val();

		var l_tagArr = l_tags.split(',');

		for (var i = 0;i < l_tagArr.length;++i)
		{
			l_tagArr[i] = AlchemyAPI_TrimStr(l_tagArr[i]);
		}

		AlchemyAPI_AddTag(l_tagArr, l_tag);

		var l_tagText = "";
		for (var i = 0;i < l_tagArr.length;++i)
		{
			if (l_tagText.length > 0) l_tagText += ",";
			l_tagText += l_tagArr[i];
		}

		jQuery('#tags-input').val(l_tagText);

		if (typeof tag_update_quickclicks == 'function')
		{
			tag_update_quickclicks();
		}

		if (a_mode == true)
		{	
			AlchemyAPI_ShowActiveTags();

			AlchemyAPI_DisplayTagSuggestions();
		}
	}

	function AlchemyAPI_AddSingleUserTag()
	{
		g_userClickedSuggest = false;

		var l_flag = false;
		if (g_AlchemyAPI_SuggestionsVisible == false)
		{
			AlchemyAPI_DisplayTags('{"tags":[]}');
			l_flag = true;
		}

		var l_tags = jQuery('#myOwnTags').val();

		jQuery('#myOwnTags').val('');

		var l_tagArr = l_tags.split(',');

		for (var i = 0;i < l_tagArr.length;++i)
		{
			l_tagArr[i] = AlchemyAPI_TrimStr(l_tagArr[i]);

			AlchemyAPI_AddSingleTag(l_tagArr[i], false);	
		}

		AlchemyAPI_ShowActiveTags();

		if (l_flag == true)
		{
			AlchemyAPI_TagPost(false);
		}
	}

	function AlchemyAPI_ShowActiveTags()
	{
		var l_tags = jQuery('#tags-input').val();

		var l_tagArr = l_tags.split(',');

		var l_html = "";

		if ( l_tagArr.length > 0 && l_tagArr[0].length > 0)
		{
			for (var i = 0;i < l_tagArr.length;++i)
			{
				if (l_html.length > 0) l_html += " ";
	
				l_tagArr[i] = AlchemyAPI_TrimStr(l_tagArr[i]);
	
				l_html += "<div style='margin:5px; float:left;'><span style=\"background:#cccccc; margin-top:10px; margin-bottom:10px; margin-right:8px; padding-left:3px; padding-right:3px; padding-top:1px; padding-bottom:1px;\">[&nbsp;<a href=\"#\" onclick=\"AlchemyAPI_RemoveSingleTag('" + l_tagArr[i] + "'); return false;\">X</a>&nbsp;]&nbsp;" + l_tagArr[i] + "</span></div>";
			}
		}

		jQuery('#tActiveTags1').html(l_html);

		if (l_tagArr.length > 0 && l_tagArr[0].length > 0)
		{
			AlchemyAPI_SetupScrollableB();
			jQuery('#tActiveTagsTable').show();
			jQuery('#tActiveTagsHeading').show();
		}
	}

	function AlchemyAPI_SetTags()
	{
		if (g_tagSuggestions == null)
		{
			return;
		}

		var l_tags = jQuery('#tags-input').val();

		var l_tagArr = l_tags.split(',');

		for (var i = 0;i < l_tagArr.length;++i)
		{
			l_tagArr[i] = AlchemyAPI_TrimStr(l_tagArr[i]);
		}

		for (var i = 0;i < g_tagSuggestions.tags.length;++i)
		{
			for (var j = 0;j < g_tagSuggestions.tags[i].phrases.length;++j)
			{
				var l_tag = g_tagSuggestions.tags[i].phrases[j].split(',');

				l_tagArr = AlchemyAPI_AddTag(l_tagArr, l_tag[0]);
			}
		}

		var l_tagText = "";
		for (var i = 0;i < l_tagArr.length;++i)
		{
			if (l_tagText.length > 0) l_tagText += ",";
			l_tagText += l_tagArr[i];
		}

		jQuery('#tags-input').val(l_tagText);

		if (typeof tag_update_quickclicks == 'function')
		{
			tag_update_quickclicks();
		}

		AlchemyAPI_ShowActiveTags();

		AlchemyAPI_DisplayTagSuggestions();
	}

	function parseJSONObj(a_json)
	{
		try
		{
			var j = eval('(' + a_json + ')');
			return j;
		}
		catch(e)
		{
		}

		if (a_json == "Type some text first.")
		{
			if (g_userClickedSuggest == true)
			{
				var l_form = document.getElementById('post');
				var l_text = "" + l_form.content.value;
				if (l_text.length < 50)
				{
					jQuery('#alchemyapi_tags').html("Type some additional text to receive tag suggestions.");
				}
				else
				{
					jQuery('#alchemyapi_tags').html("No tag suggestions are available for this text.");
				}
			}
		}
		else if (a_json == "No tag suggestions at this time.")
		{
			AlchemyAPI_DisplayTags('{"tags":[]}');
		}
		else jQuery('#alchemyapi_tags').html(a_json);

		throw new SyntaxError("parseJSONObj");
	}
	
	var g_tagSuggestions = null;

	function AlchemyAPI_DisplayTags(a_tags)
	{
		g_AlchemyAPI_SuggestionsVisible = true;

		var l_txt = a_tags.split("\n");
		var l_tags = l_txt[0];

		var l_tObjs = null;

		try
		{
			l_tObjs = parseJSONObj(l_tags);
		}
		catch (e)
		{
			return;
		}

		g_tagSuggestions = l_tObjs;

		for (var i = 0;i < g_tagSuggestions.tags.length;++i)
		{
			for (var j = 0;j < g_tagSuggestions.tags[i].phrases.length;++j)
			{
				var l_tag = g_tagSuggestions.tags[i].phrases[j].split('(');
				var l_tagB = l_tag[0].split(',');
				g_tagSuggestions.tags[i].phrases[j] = l_tagB[0];
			}
		}

		if (g_tagSuggestions.tags != 'undefined' || g_tagSuggestions.tags.length < 1)
		{
			if (g_userClickedSuggest == true)
			{
				var l_form = document.getElementById('post');
				var l_text = "" + l_form.content.value;
				if (l_text.length < 50)
				{
					jQuery('#alchemyapi_tags').html("Type some additional text to receive tag suggestions.");
				}
				else
				{
					jQuery('#alchemyapi_tags').html("No tag suggestions are available for this text.");
				}
			}
		}

		AlchemyAPI_DisplayTagSuggestions();
	}

	function AlchemyAPI_DisplayTagSuggestions()
	{
		var l_html = "<table><tr><td><table id='tTable1'>";

		if (g_tagSuggestions != null)
		{
		var l_total = 0;
		for (var i = 0;i < g_tagSuggestions.tags.length;++i)
		{
			for (var j = 0;j < g_tagSuggestions.tags[i].phrases.length;++j)
			{
				var l_text = AlchemyAPI_TrimStr(g_tagSuggestions.tags[i].phrases[j]);
				var l_origText = l_text;
				if (l_text.length > 20)
				{
					l_text = l_text.substr(0, 20) + "...";
				}

				if (AlchemyAPI_IsTagActive(AlchemyAPI_TrimStr(g_tagSuggestions.tags[i].phrases[j])) == false)
				{
					l_html += "<tr><td>" + l_text + "</td><td style='padding-right:10px; width:80px;'> [&nbsp;<a href='#' onclick=\"AlchemyAPI_AddSingleTag('" + l_origText + "', true); return false;\">Use&nbsp;Tag</a>&nbsp;] </td></tr>";

					++l_total;
				}
			}
		}
		}

		l_html += "</table></td></tr></table>";

		jQuery('#alchemyapi_tags').html(l_html);
		if (l_total > 0)
		{
			jQuery('#alchemyapi_tags_label').show();
		}
		else
		{
			jQuery('#alchemyapi_tags_label').hide();
		}
		if (l_total > 1)
		{
			jQuery('#alchemyapi_tags_add').show();
		}
		else
		{
			jQuery('#alchemyapi_tags_add').hide();
		}

		AlchemyAPI_SetupScrollableA();
		AlchemyAPI_SetupScrollableB();
	}

	function AlchemyAPI_SetupScrollableA()
	{
		jQuery('#tTable1').Scrollable(150,300);
	}

	function AlchemyAPI_SetupScrollableB()
	{
		jQuery('#tActiveTagsTable').Scrollable(150,350);
	}

	
	function AlchemyAPI_disableEnterKey(e)
	{
     		var key;     
	     
		if(window.event)
			key = window.event.keyCode; //IE
		else
			key = e.which; //firefox     

		if (key == 13)
		{
			AlchemyAPI_AddSingleUserTag();
		}

		return (key != 13);
	}

	//]]>
	</script>

	<?php if (!function_exists('add_meta_box')): ?>
	<fieldset id="alchemyapi_dbx" class="dbx-box">
	<div class="dbx-handle"><h3>AlchemyTagger</h3></div>
	<div class="dbx-content">
	<?php endif; ?>
	
	<table style="width:100%;">
	<tr><td style="width:50%; padding-top:10px; vertical-align:top;">
		<input type="button" class="button" onclick="AlchemyAPI_TagPost(true)" value="Suggest Tags" /><br /><br />
	</td>
	<td style="text-align:right; vertical-align:top; width:50%;">
		<table>
		<tr><td>
				<table style="width:100%;">
				<tr><td>
					Or, enter your own tags:&nbsp;<br/><input onkeypress="return AlchemyAPI_disableEnterKey(event);" type="text" value="" id="myOwnTags" maxlength="25"/>
				</td><td>
					<input type="button" class="button" onclick="AlchemyAPI_AddSingleUserTag(); return false;" value="Add" />
				</td></tr></table>
		</td></tr>
		<tr><td>
			<div style="width:100%; text-align:right;"><i>Separate tags with commas</i></div>
		</td></tr>
		</table>
	</td></tr>
	<tr><td style="vertical-align:top;">
		<span style='font-size: 10pt; font-weight: bold; display: none' id="alchemyapi_tags_label"><font size="3">Tag Suggestions</font></span>
	
		<div id="alchemyapi_tags" style='font-size: 10pt; margin-bottom: 10px'>
		</div>

		<input type="button" class="button" id="alchemyapi_tags_add" 
			onclick="AlchemyAPI_SetTags()" value="Use all Suggested Tags" style="display: none" />
	</td>
	<td style="vertical-align:top;">
		<div id="tActiveTagsHeading" style="display:none; padding-left:50px;"><b><font size='3'>Active Tags</font></b></div>
		<table id="tActiveTagsTable" style="display:none;">
		<tr><td>
			<div id='tActiveTags1' style='vertical-align:top; padding-top:0px; padding-left:50px;'></div>
		</td></tr>
		<tr><td>&nbsp;</td></tr>
		</table>
	</td></tr></table>

	<?php if (!function_exists('add_meta_box')): ?>
	</div>
	</fieldset>
	<?php endif; ?>
        <?php 
}

?>