<?php

// Yahoo Yql Thesaurus Search Tutorial - RJM Programming - 2014

$selname = "";
$language = "en_US";
$selnam2 = "";
$languag2 = "en_US";
$dprefix = "http://www.thefreedictionary.com/";
if (isset($_POST['selname'])) $selname = str_replace(" ","%20",$_POST['selname']);
if (isset($_GET['selname'])) $selname = str_replace(" ","%20",$_GET['selname']);
if (isset($_POST['language'])) $language = str_replace(" ","%20",$_POST['language']);
if (isset($_GET['language'])) $language = str_replace(" ","%20",$_GET['language']);
if (isset($_POST['selnam2'])) $selnam2 = str_replace(" ","%20",$_POST['selnam2']);
if (isset($_GET['selnam2'])) $selnam2 = str_replace(" ","%20",$_GET['selnam2']);
if (isset($_POST['languag2'])) $languag2 = str_replace(" ","%20",$_POST['languag2']);
if (isset($_GET['languag2'])) $languag2 = str_replace(" ","%20",$_GET['languag2']);
if ($language == "fr_FR") $dprefix = "http://www.systranet.com/dictionary/fr-en/";
if ($language == "de_DE") $dprefix = "http://www.dict.cc/?s=";
if ($language == "es_ES") $dprefix = "http://www.wordreference.com/es/en/translation.asp?spen=";
if ($language == "it_IT") $dprefix = "http://www.wordreference.com/iten/";
$bcolours = array("white", "pink", "aqua", "lime", "silver", "lightyellow", "cyan", "fuchsia", "orange", "lightblue", "lightgreen", "lightgray");
$bonload = "";

if ($selnam2 != "" && $selname == "") {
  // https://translate.google.com/#fr/es/bonjour
  // http://api.mymemory.translated.net/get?q=hello&langpair=en|it
  // echo "https://translate.google.com/#" .  substr($languag2,0,2)  . "/" . substr($language,0,2) . "/" . urldecode(urldecode($selnam2));
  $pageContent = file_get_contents("http://api.mymemory.translated.net/get?q=" . str_replace(" ", "%20", urlencode($selnam2)) . "&langpair=" . substr($languag2,0,2)  . "|" . substr($language,0,2));
  //echo "http://api.mymemory.translated.net/get?q=" . urldecode(urldecode($selnam2)) . "&langpair=" . substr($languag2,0,2)  . "/" . substr($language,0,2);
  //exit;
  $trans=explode(',"translation":"', $pageContent);
  if (sizeof($trans) > 1) {
    $wtrans=explode('"', $trans[1]);
    $selname=urlencode($wtrans[0]);
    $bonload = ' onload=" parent.document.getElementById(' . "'" . 'selname' . "'" . ').value=' . "'" . str_replace("'", "' + String.fromCharCode(39) + '", $wtrans[0]) . "';  parent.document.getElementById(" . "'" . 'aselname' . "'" . ").href='" . $dprefix . urldecode($wtrans[0]) .  "'; parent.document.getElementById(" . "'" . 'aselname' . "'" . ").innerHTML='" . $wtrans[0] . "'; " . ' "';
  }
}
if ($selname != "") {
 $pageContent = file_get_contents("https://query.yahooapis.com/v1/public/yql?q=select%20*%20from%20thesaurus%20where%20key%3D%225r3uguAhHMoAQJIlShGL%22%20and%20word%3D%22".$selname."%22%20and%20language%3D%22" . $language . "%22&format=json&diagnostics=true&env=store%3A%2F%2Fdatatables.org%2Falltableswithkeys&callback=");
 //$json_output = json_decode($pageContent); 
 
 $mylist = explode('"synonyms":"', $pageContent);
 
 echo "<!doctype HTML><html><head><link href='//www.rjmprogramming.com.au/PHP/emboss_h1.css' rel='stylesheet' type='text/css'></head><body " . $bonload . " align='center' style='background-color:yellow;'><h1 align='center'>" . urldecode($selname) . " ... Thesaurus</h1><br>\n<div align='center'>";
 echo "<table style='border:8px blue solid;' border=5 cellspacing=8 cellpadding=8><thead><tr><th>Similar Meaning</th><th>Opposite Meaning</th></tr><tbody>";
 for ($i=1; $i<sizeof($mylist); $i++) {
   $myline = explode('"', $mylist[$i]);
   $mywords = explode("|", $myline[0]);
   for ($ii=0; $ii<sizeof($mywords); $ii++) {
    $preword = explode(" (", $mywords[$ii]);
    if (strpos($mywords[$ii], " (antonym)") !== false) {
	  echo "<tr><td style='background-color:white;'></td><td style='background-color:white;'><a style='text-decoration:none;' target=_blank title='" . str_replace(" (antonym)", "", str_replace(" (related term)", "", str_replace(" (similar term)", "", $mywords[$ii]))) . "' href='" . $dprefix . str_replace(" (antonym)", "", str_replace(" (related term)", "", str_replace(" (similar term)", "", $preword[0]))) . "'>" . str_replace(" (antonym)", "", str_replace(" (related term)", "", str_replace(" (similar term)", "", $mywords[$ii]))) . "</a></td></tr>";
    } else {
	  echo "<tr><td style='background-color:white;'><a style='text-decoration:none;' target=_blank title='" . str_replace(" (antonym)", "", str_replace(" (related term)", "", str_replace(" (similar term)", "", $mywords[$ii]))) . "' href='" . $dprefix . str_replace(" (antonym)", "", str_replace(" (related term)", "", str_replace(" (similar term)", "", $preword[0]))) . "'>" . str_replace(" (antonym)", "", str_replace(" (related term)", "", str_replace(" (similar term)", "", $mywords[$ii]))) . "</a></td><td style='background-color:white;'></td></tr>";
	}
   }
 }
 echo "</tbody></table></div></body></html>";
  
}
?> 

