My_Cript v1.0

[ATGOnLine]

Deseo compartir con todos ustedes el codigo de encriptacion que uso en mis aplicaciones, he agregado un nivel mas de seguridad a las funciones base64_XXcode:

Ojala puedan ayudarme a mejorar este codigo:

<?

function encripta($cadena)
{
mt_srand((double)microtime()*32767);
$veces=mt_rand(1,9);
$claves=array();
for($i=0; $i<$veces; $i++)
{
if (!$i)
$claves[]=base64_encode($cadena);
else
{
$claves[]=base64_encode($claves[$i-1]);
}
}

$pos=mt_rand(1,9);
$encrip=substr($claves[$veces-1],0,$pos-1) . $veces . substr($claves[$veces-1],$pos-1,strlen($claves[$veces-1]));
$encrip=$encrip . $pos;

return (strrev($encrip));
}

function decripta($cadena)
{
$cadena=strrev($cadena);
$pos=substr($cadena,strlen($cadena)-1,1);
$veces=substr($cadena,$pos-1,1);
$subcad = substr($cadena,$pos,strlen($cadena));
$clave=substr($cadena,0,$pos-1) . substr($cadena,$pos,strlen($subcad)-1);
$repositorio=array();

for ($i=0; $i<$veces; $i++)
{
if ($i==0)
$repositorio[]=base64_decode($clave);
else
$repositorio[]=base64_decode($repositorio[$i-1]);
}

return($repositorio[$veces-1]);
}

?>