cryptoFunctions

<?php 
 
 /***************************************************************************
 * cryptoFunctions.php
 *				  		v1.0
 * =================================================================
 * contains functions to encode-decode/crypt-decrypt/cipher-encipher 
 * messages using a number of different methods, not included in php
 *
 ****************************************************************************
 ****************************************************************************
 * Changelog
 * =========
 * v 1.0 - 2010/09/03
 * - initial release
 * **************************************************************************/
 
//ASCII to Binary conversion
function asc2bin($str) {
	$newstring = 0;
    $text_array = explode("\r\n", chunk_split($str, 1));
    for ($n = 0; $n < count($text_array) - 1; $n++) {
    	$newstring .= substr("0000".base_convert(ord($text_array[$n]), 10, 2), -8);
    }
    $newstring = chunk_split($newstring, 8, " ");
    return $newstring;
}
 
	//Binary to ASCII conversion
function bin2asc($str) {
	$newstring = 0;
    $str = str_replace(" ", "", $str);
    $text_array = explode("\r\n", chunk_split($str, 8));
    for ($n = 0; $n < count($text_array) - 1; $n++) {
    	$newstring .= chr(base_convert($text_array[$n], 2, 10));
    }
    return $newstring;
}
 
//ASCII to Hexadecimal conversion
function asc2hex($str) {
	return chunk_split(bin2hex($str), 2, " ");
}
 
//Hexadecimal to ASCII conversion
function hex2asc($str) {
	$newstring = 0;
    $str = str_replace(" ", "", $str);
    for ($n=0; $n<strlen($str); $n+=2) {
    	$newstring .=  pack("C", hexdec(substr($str, $n, 2)));
    }
    return $newstring;
}
 
//Binary to Hexadecimal conversion
function binary2hex($str) {
	$newstring = 0;	
    $str = str_replace(" ", "", $str);
    $text_array = explode("\r\n", chunk_split($str, 8));
    for ($n = 0; $n < count($text_array) - 1; $n++) {
    	$newstring .= str_pad(base_convert($text_array[$n], 2, 16), 2, "0", STR_PAD_LEFT);
    }
    $newstring = chunk_split($newstring, 2, " ");
    return $newstring;
}
 
//Hexadecimal to Binary conversion
function hex2binary($str) {
	$newstring = 0;	
    $str = str_replace(" ", "", $str);
    $text_array = explode("\r\n", chunk_split($str, 2));
    for ($n = 0; $n < count($text_array) - 1; $n++) {
    	$newstring .= substr("0000".base_convert($text_array[$n], 16, 2), -8);
    }
    $newstring = chunk_split($newstring, 8, " ");
    return $newstring;
}
 
//Ceasar Cipher Bruteforce <http://en.wikipedia.org/wiki/Caesar_cipher>
function caesarbf($str) {
	$alpha = 'abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ';
	echo "<table width=\"85%\" cellpadding=\"2\" align=\"center\">\n";
	for ($n = 1; $n < 26; $n++) {
		$cipher = substr($alpha, $n, 26 - $n) . substr($alpha, 0, $n) . substr($alpha, 26+$n, 52-$n) . substr($alpha, 26, $n);
		if ($n % 2 == 0) {
			echo '<tr bgcolor="#eeeeee">'; } 
		else {
			echo '<tr bgcolor="#cccccc">';
		}
		echo "<td>ROT-$n: ". htmlentities(strtr($str, $alpha, $cipher)) ."</td>";
	  }
	  echo "<tr>\n</table>\n";
}
 
//HTML encode
function entityenc($str) {
	$newstring = 0;	
    $text_array = explode("\r\n", chunk_split($str, 1));
    for ($n = 0; $n < count($text_array) - 1; $n++) {
    	$newstring .= "&#" . ord($text_array[$n]) . ";";
    }
    return $newstring;
}
 
//HTML decode
function entitydec($str) {
	$newstring = 0;
    $str = str_replace(';', '; ', $str);
    $text_array = explode(' ', $str);
    for ($n = 0; $n < count($text_array) - 1; $n++) {
    	$newstring .= chr(substr($text_array[$n], 2, 3));
    }
    return $newstring;
}
 
//l33t 5pe4k encode <http://en.wikipedia.org/wiki/Leet>
function l33t($str) {
	$newstring = 0;	
    $from = 'ieastoIEASTO';
    $to = '134570134570';
    	$newstring = strtr($str, $from, $to);
    return $newstring;
}
 
//l33t 5pe4k decode <http://en.wikipedia.org/wiki/Leet>
function del33t($str) {
	$newstring = 0;	
    $from = '134570';
    $to = 'ieasto';
    	$newstring = strtr($str, $from, $to); 
	return $newstring;
}
 
//Pig-Latin encode <http://en.wikipedia.org/wiki/PigLatin>
function igpay($str) {
	$newstring = 0;
    $text_array = explode(" ", $str);
    for ($n = 0; $n < count($text_array); $n++) {
    	$newstring .= substr($text_array[$n], 1) . substr($text_array[$n], 0, 1) . "ay ";
    }
    return $newstring;
}
 
//Pig-Latin decode <http://en.wikipedia.org/wiki/PigLatin>
function unigpay($str) {
	$newstring = 0;
    $text_array = explode(" ", $str);
    for ($n = 0; $n < count($text_array); $n++) {
    	$newstring .= substr($text_array[$n], -3, 1) . substr($text_array[$n], 0, strlen($text_array[$n]) - 3) . " ";
    }
    return $newstring;
}
 
//ROT13 DE/ENcode <http://en.wikipedia.org/wiki/Rot_13>
function rot13($str) {
	$newstring = 0;	
    $from = 'abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ';
    $to   = 'nopqrstuvwxyzabcdefghijklmNOPQRSTUVWXYZABCDEFGHIJKLM';
    	$newstring = strtr($str, $from, $to);
	return $newstring;
}
 
//DE/ENchipher Atbash <http://en.wikipedia.org/wiki/Atbash>
function atbash($str) {
	$newstring = 0;
	$from = 'abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ';
	$to   = 'zyxwvutsrqponmlkjihgfedcbaZYXWVUTSRQPONMLKJIHGFEDCBA';
		$newstring = strtr($str, $from, $to);
	return $newstring;
	}
 
//NOT A CRYPTO FUNCTION, BUT STILL KINDA USEFULL
//strip spaces from a string
function strip_spaces($str)	{
	$str = str_replace(" ", "", $str);
    return $str;
}
 
?>