百度網盤視頻解析，獲取真實源地址

function s($j,$r)
{
　　$a = array();
　　$p = array();
　　$o = "";
　　$v = strlen($j);
　　$j = str_split($j,1);

　　for($q=0;$q<256;$q++)
　　{
　　　　$a[$q] = charCodeAt($j[$q%$v]);
　　　　$p[$q]=$q;
　　}

　　for($u=$q=0;$q<256;$q++)
　　{
　　　　$u=($u+$p[$q]+$a[$q])%256;
　　　　$t=$p[$q];
　　　　$p[$q]=$p[$u];
　　　　$p[$u]=$t;
　　}

　　for($i=$u=$q=0;$q<strlen($r);$q++)
　　{
　　　　$i=($i+1)%256;
　　　　$u=($u+$p[$i])%256;
　　　　$t=$p[$i];
　　　　$p[$i]=$p[$u];
　　　　$p[$u]=$t;
　　　　$k=$p[(($p[$i]+$p[$u])%256)];
　　　　$r2 = str_split($r,1);
　　　　$o.=fromCharCode(charCodeAt($r2[$q])^$k);
　　}
　　return base64_encode($o);
}

function charCodeAt($str)
{
　　$ret = mb_convert_encoding($str, 'UTF-32BE', 'UTF-8');
　　return hexdec(bin2hex($ret));
}

function fromCharCode($codes)
{
　　if (is_scalar($codes))
　　　　$codes= func_get_args();
　　$str= '';
　　foreach ($codes as $code)
　　　　$str.= chr($code);
　　return $str;
}