<?php
/*
 * URL Encoder script.
 * Version 1.0 - February 2002
 * Version 1.1 - December 2007 - added transpose2 - a delayed action on decoding
 * Version 1.2 - August 2008 - renamed transpose2 to encodelink_delayed and updated encodelink_delayed to allow it to be used multiple times in a page
 * (c) 2002-2008, Paul Gregg <pgregg@pgregg.com>
 * http://www.pgregg.com
 *
 * Function: Take an href link and the visible text and make an obfuscated
 * link to prevent search engines (or spam harvesters) from picking it up.
 *
 * Open Source Code:   If you use this code on your site for public
 * access (i.e. on the Internet) then you must attribute the author and
 * source web site: http://www.pgregg.com/projects/
 * You must also make this original source code available for download
 * unmodified or provide a link to the source.  Additionally you must provide
 * the source to any modified or translated versions or derivatives.
 *
 */

$DOCUMENT_ROOT $_SERVER['DOCUMENT_ROOT'];
$REQUEST_URI $_SERVER['REQUEST_URI'];
$PHP_SELF $_SERVER['PHP_SELF'];

include_once(
$DOCUMENT_ROOT '/functions.php');
$href = isset($_GET['href']) ? $_GET['href'] : '';
$text = isset($_GET['text']) ? $_GET['text'] : '';
$func = isset($_GET['func']) ? $_GET['func'] : '';

echo 
'<p align=right><a href="content.phps">Source code</a></p>';
print 
"<p align=right><a href=\"encode_link.inc.phps\">PHP includable</a></p>\n";

$encoder_functions = array (
    
"encodelink_delayed" => "Delayed Transpose characters / Javascript",
    
"encodelink" => "Transpose characters / Javascript",
    
"encodehash" => "Hashes characters / No Javscript"
    
);
$valid_functions array_keys($encoder_functions);


if (
$href != "") {
  
# Encode the $href string according to the selected function

  
if ($text == "")
    
$text "No text specified.";

  
# replace wierd chars in the href
  
$href preg_replace("/[;,]/"""$href);

  if (! isset(
$func) ) {
    
$func "encodelink";
  } else {
    if (! 
in_array($func$valid_functions) )
      
$func "encodelink";  # prevent bogus functions
  
}

  
printf("<p>Encoding link <b>%s</b> using function <b>%s</b></p>\n",
    
htmlspecialchars($href), $func);

  include 
'encode_link.inc.php';
  
$UserCode call_user_func($func$href$text);
#echo '<pre>';
#var_dump($UserCode);

  
printf("<p>Cut and paste the following code into your page where you want the link to be:</p><textarea rows=2 cols=60>\n%s\n</textarea>\n<hr>\n</p>\n",
    
htmlspecialchars($UserCode));

} else {

  if (!isset(
$_SERVER['HTTPS']) || $_SERVER['HTTPS'] != 'on') {
    print 
"<a href='$shome$PHP_SELF'><h4>You can use this form securely.</h4></a><br><br>\n";
  }
  print 
"<p>Tired of spammer's crawlers picking up your email address and spamming you? The solution is here - Encode your email address.<br></p>\n";
  print 
"Add encoded mailto: (or not) links into webpages preventing spammers robots from harvesting them.\n";
  print 
"<form method=GET action=\"$PHP_SELF\">";
?>
  <table>
   <tr><td>Link/href</td>
   <td><input type=text name=href value="mailto:" size=30></td>
   </tr>
   <tr><td>Displayed text</td>
   <td><input type=text name=text value="" size=30></td>
   </tr>
   <tr><td>Encoding Function</td>
   <td><select name=func>
<?php
   
foreach ($encoder_functions as $key => $value)
     
printf("<option value=\"%s\">%s</option>"$key$value);
?>
       </select></td>
   </tr>
   <tr><td></td><td><input type=submit value="Encode"></td></tr>
  </table>
  </form>

<?php
  
if (isset($_SERVER['HTTP_REFERER'])
   && 
preg_match("|http://spamlinks.datapacket.net/spambots.htm|",
    
$_SERVER['HTTP_REFERER'])) {
    print 
"<p>Note: The referring page says '(javascript option fails?)' - it should work just fine. Please let me know if it doesn't work for you.</p>";
  }
}

?>