Ec (2); ** & nbsp; * @ string $ str the string to be encoded & nbsp; * @ string $ ende operation ENCODE encoding, DECODE decoding & nbsp; * @ string $ keyhash Value & nbsp; * @ returnstring & nbsp; * functioncode ($ str, $ ende, $ key) {& nbsp; $ coded script ec (2); script
/**
* @ String $ str the string to be encoded
* @ String $ ende operation ENCODE encoding and DECODE Decoding
* @ String $ key hash Value
* @ Return string
*/
Function code ($ str, $ ende, $ key = ''){
$ Coded = '';
$ Keylength = strlen ($ key );
$ Str = $ ende = 'decode '? Base64_decode ($ str): $ str;
For ($ I = 0; $ I <strlen ($ str); $ I + = $ keylength ){
$ Coded. = substr ($ str, $ I, $ keylength) ^ $ key;
}
$ Coded = $ ende = 'encoding '? Str_replace ('=', '', base64_encode ($ coded): $ coded;
Return $ coded;
}
We need ENCODE encoding. For DECODE decoding, we only need to set the $ ende parameter.