Очистка ЧС
Скриптец для очитки чёрного списка. Накатал чтобы наконец избавится от 300к людей в чс. Мб кому пригодится, Цензура знает. В секунду минус 10-15 человек.
Код:
<? $mail = ''; $pass = ''; curl("http://login.vk.com/?act=login&email=$mail&pass=$pass"); echo "Working...".PHP_EOL; while (true) { $getBlackList = curl("http://vk.com/settings?act=blacklist"); preg_match_all('/delFromBl\((.*?), \'(.*?)\',/', $getBlackList, $users); if (empty($users[1])) { break; } for ($i = 0; $i != 500; $i++) { curl("http://vk.com/al_settings.php", "act=a_del_from_bl&al=1&from=settings&hash=".$users[2][$i]."&id=".$users[1][$i]); echo "Del user: ".$users[1][$i].PHP_EOL; } } echo "blacklist clear!"; function curl($url, $post = false) { $ch = curl_init($url); curl_setopt($ch, CURLOPT_RETURNTRANSFER, true); curl_setopt($ch, CURLOPT_FOLLOWLOCATION, 1); if ($post) { curl_setopt($ch, CURLOPT_POST, 1); curl_setopt($ch, CURLOPT_POSTFIELDS, $post); } curl_setopt($ch, CURLOPT_COOKIEJAR, './cookie'); curl_setopt($ch, CURLOPT_COOKIEFILE, './cookie'); $response = curl_exec ($ch); curl_close($ch); return $response; } ?>