Форум АНТИЧАТ

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)
-   E-Mail (https://forum.antichat.xyz/forumdisplay.php?f=14)
-   -   Грабим "моймир"mail.ru по странам (https://forum.antichat.xyz/showthread.php?t=173833)

Kusto 26.01.2010 03:38

Грабим "моймир"mail.ru по странам
 
Видел что многие на ачате интересуються как насобирать мыла с "моймир"mail.ru по определенной стране, поэтому на коленке набросал скрипт, который должен облегчить эту задачу, сразу говорю что недостатков куча как например медленная скорость (пришлось для корректной работы скрипта воткнуть паузу 4 сек), больше всего меня добило количество стран (дошел до буквы "В" если кто сам несможет добавить страну- обращайтесь- помогу( ну правда стран реально много- больше чем строк самого скрипта))
Как запустить скрипт- думаю разберетесь (для этого нужен акк майловский зарегестрированный в "моймир"mail.ru, далее выбираете страну- жмете кнопку "ПОЕХАЛИ" и..... идете пить чай(я ведь предупреждал что долго работает) Думаю сами разберетесь, Кстати если кто может что то похожее сотворить например на делфи- и выложит сюда- обещаю оценить труд как подабает
Ну а сам собственно говоря скрипт вот
PHP код:

 <html>
<head>

<body bgcolor=#c0c0c0>
 <form method="POST"> 
<p align=center>

<form name="cauntry" >
    <dl> <!-- oClassElement -->
        <dt><label for="input-select">Страна</label></dt>
        <dd>
            <select name="cauntry" id="input-select">
                <option value="24">Россия</option>
                <option value="40">Австрия</option>
                <option value="123">Австралия</option>
                <option value="81">Азербайджан</option>
                <option value="32">Албания</option>
                <option value="174">Алжир</option>
                <option value="454">Американское Самоа</option>
                <option value="3200">Ангилья(Брит)</option>
                <option value="175">Ангола</option>
                <option value="33">Андора</option>
                <option value="140">Антигуа и Барбуда</option>
                <option value="141">Аргентина</option>
                <option value="82">Армения</option>
                <option value="3202">Аруба(Нид)</option>
                <option value="97">Афганистан</option>
                <option value="142">Багамы</option>
                <option value="96">Бангладеш</option>
                <option value="143">Барбадос</option>
                <option value="99">Бахрейн</option>
                <option value="146">Белиз</option>
                <option value="340">Беларусь</option>
                <option value="38">Бельгия</option>
                <option value="176">Бенин</option>
                <option value="320">Бермуды</option>
                <option value="41">Болгария</option>
                <option value="144">Боливия</option>                                
                <option value="42">Босния и Герцеговина</option>                
                <option value="177">Ботсвана</option>
                <option value="145">Бразилия</option>
                <option value="3228">Британская территория в Инд Океане</option>
                <option value="100">Бруней Даруссалам</option>
                <option value="178">Буркина-Фасо</option>
                <option value="179">Бурунди</option>
                <option value="101">Бутан</option>
                <option value="124">Вануату</option>
                <option value="43">Ватикан</option>
                <option value="45">Великобритания</option>
                <option value="44">Венгрия</option>
                <option value="147">Венесуэла</option>
                <option value="320">Виргинские Острова</option>
                <option value="452">Виргинские Острова(США)</option>
                <option value="102">Вьетнам</option>
                 <option value="180">Габон</option>

                                                 
            </select>
        </dd>
    </dl>


email:<input type="text" name="email"><br> <br> 
pass:<input type="text" name="pass"><br> <br>  

<input type=submit value="ПОЕХАЛИ!!!"> 

</form>
</p>

</body>

<marquee loop="infinite" behavior="slide " scrollamount="3"
        bgcolor=#c0c0c0 direction="left " height="20" width="1000">
Выберите страну по которой вас интересует спам-база, авторизируйтесь (в вашем майле должен быть создан "мой мир") и жмем кнопку "ПОЕХАЛИ", Ваш комп не висит- просто ждем пока скрипт обработает данные
</marquee>

</html>
<?php
// (с) Kusto
set_time_limit(0);
function 
curl($url,$post

$cfile 'cookies.txt'
$ch curl_init(); 
curl_setopt($chCURLOPT_RETURNTRANSFER1); 
curl_setopt($chCURLOPT_URL$url); 
curl_setopt($chCURLOPT_HEADER0); 
curl_setopt($chCURLOPT_POSTFIELDS$post); 
curl_setopt($chCURLOPT_COOKIEJAR$cfile); 
curl_setopt($chCURLOPT_COOKIEFILE$cfile); 
curl_setopt($chCURLOPT_FOLLOWLOCATIONtrue); 
curl_setopt($chCURLOPT_POST1); 
$result curl_exec($ch); 
curl_close($ch); 
return 
$result
};

$email $_POST['email']; 
$pass $_POST['pass'];
$cauntry =$_POST['cauntry']; 

if(!
$email||!$pass)exit;
else
{
$arrawexplode("@"$email);
$login$arraw[0];
$domain=$arraw[1];

$result curl("http://win.mail.ru/cgi-bin/auth""Login=".$login."&Domain=".$domain."&Password=".$pass);
if (
preg_match('#Входящие(.*)#iU',$result,$avt)){

echo 
"<B><U><FONT SIZE=5 COLOR=RED>Авторизация прошла успешно, ждем результат работы скрипта</FONT></U></B></br>";
}
else
 {
 echo 
"<B><U><FONT SIZE=7 COLOR=RED>Произошол косяк с авторизацией, читай бегущую строку!!!!</FONT></U></B>";
exit;
}

for(
$page=1$page<=1000$page++) 
  {   

    
$result curl("http://my.mail.ru/my/search?","page=".$page."&search=1&type=1&typeSimple=1&query=&firstname=&lastname=&country=".$cauntry."&age="); 

//  echo $result; //хотите видеть страницу которая обрабатываеться в данный момент- раскоментируйте данную строку
     

    
if (preg_match('#По вашему запросу ничего не найдено(.*)#iU',$result,$avtoriz)) 
    { 
    
$count=$page -1;
       
$page 10001
    }
    else
    {
    
preg_match_all('#email=\"([\.\-_A-Za-z0-9]+?@[\.\-A-Za-z0-9]+?[\.A-Za-z0-9]{2,})#iU',$result $out); 

$arr $out[1]; 


  }
  
sleep(3);
  
  for (
$i 0$i <= count($arr); $i++) 
  { 
    
    
$exs[]=$arr[$i];
 } 

}


$res array_unique($exs);
$a=fopen("mail.txt","a+" );
  
  for (
$qwer 0$qwer <= count($res); $qwer++)
  {
  
$value=$res[$qwer];
 
fwrite($a,"$value \r\n");  
   echo
"$value </br>";    
  
  
}

fclose($a);
 echo 
"<B><U><FONT SIZE=5 COLOR=RED>обработанно $count страниц </FONT></U></B></br>";
echo 
"<B><U><FONT SIZE=7 COLOR=RED>Конец работы скрипта</FONT></U></B>";
}
?>


Выражаю свою благодарность юзеру Freedom и переношу его творение в 1-ый пост

автор Freedom

Профиль автора на странице

http://forum.antichat.ru/member.php?userid=38414


Держите многопоточная и проксёвая версия ))))))

http://s003.radikal.ru/i203/1002/5c/675e06720ab1.jpg

http://elv1s.ifolder.ru/16264634


обновление проги от 12.06.2010

Цитата:

Сообщение от Freedom
держите обновление ))))))))))))))))))))))))) работает на ура ))))
добавлено и оптимизировано много чего.


http://s56.radikal.ru/i151/1006/9f/d05a986d04b7.jpg

Качаем отсюда


nonamez 26.01.2010 04:00

ты просто пиздец) Завтро +5 заставлю кого-нить влепить)

Kusto 26.01.2010 04:03

счас посмотрел- они только 17 страниц открывают (или это только моему акку я с ним испытывал), если болше страниц например откроет тебе- надо переделывать скрипт и менять акки (если стоит ограничение просмотра с одного акка)
P.S.Можно попытаться надурить судьбу и попытаться еще возраст участников добавлять- теоретически- должно больше страниц открыться т е если на возраст до 18 найдет 17 страниц, потом на возраст от19 до 23 еще 17 страниц и т д- короче если завтра время будет продумаю....

nonamez 26.01.2010 04:11

Уходил на рестарт-щас затещу нужные мне страны)

nonamez 26.01.2010 04:16

Нажал-грузит.Такой вопрос-а можно добавить какой-нить статусбар или прогресбар?

nonamez 26.01.2010 04:17

И сохранение можно в фаил?

И можно ли сделать игнор на --Rating@Mail.ru
-он скатина на каждой странице

Kusto 26.01.2010 04:22

Завтра будет время доработаю, и еще считаю что надо сделать так например забить Таня с Украины- выдало 17 страниц- сграбил затем из списка выбираеться Маша с Украины- это еще 17 страниц и т д т е поик до бесконечности раздуть можно (просто надо еще список с именами прикрутить)

Цитата:

Сообщение от nonamez

И можно ли сделать игнор на --Rating@Mail.ru

сделаю и еще надо чтоб и твое мыло непопадало в список, (единственное я еще незнаю как не собирать тех чудиков кто в онлайне и желает общаться (посмотрю что можно сделать))

nonamez 26.01.2010 04:24

Та это не так важно,я к примеру могу раз 5 нажать запуск.Самое главное щас это сохранение в файл и выкидывание этого --рейтинг@маил.ру

nonamez 26.01.2010 04:36

Цитата:

Сообщение от Kusto
Завтра будет время доработаю, и еще считаю что надо сделать так например забить Таня с Украины- выдало 17 страниц- сграбил затем из списка выбираеться Маша с Украины- это еще 17 страниц и т д т е поик до бесконечности раздуть можно (просто надо еще список с именами прикрутить)

сделаю и еще надо чтоб и твое мыло непопадало в список, (единственное я еще незнаю как не собирать тех чудиков кто в онлайне и желает общаться (посмотрю что можно сделать))

чудики-пофиг,а вот рейтинг это пиздец,щас вот сижу пытаюсь notepad++ заставить его стереть и затем пустую строчку,нифига не понимает(((

nonamez 26.01.2010 04:42

и еще добавь конфиг лучше,что бы id страны вписывал сам и там же был логин и пароль. Это конечно гламурно выбирать из списка,но там много лишнего и в противопоставление гламурности каждый раз вбивать логин и пасс в лом)

nonamez 26.01.2010 04:49

еще одна бага-жуткое повторение.....

Kusto 26.01.2010 04:59

Цитата:

Сообщение от nonamez
еще одна бага-жуткое повторение.....

немного подправил скрипт в первом посте- счас вроде нет повторений и зделал запись в файл

Tesson 28.01.2010 04:09

возрост от, до
и онлайн добавь спс!:)

nonamez 30.01.2010 00:02

сча поюзаем)

Kusto 30.01.2010 02:09

Привет работникам майлру- ваша скорость с которой вы фиксите баги достойна уважения, наконец то вы поставили каптчу (а ведь скрипту нет и недели))), так что корректно работает скрипт только один раз (собирает порядка 500-600 мыл) далее каптча и если она неразгаданна бан по ИПу......, счас придеться прикручивать прокси и грабить не с одного аккаунта а со списка...... (будет время доделаю (если вы меня не опередите :D :D :D )

buxmanager 30.01.2010 02:36

чего Вы тягаетесь с меилпочтой?:) там все давно уже пофиксено!

Kusto 31.01.2010 13:29

странно, но вроде каптчу убрали....и теперь снова все работает (не пишет уже что с вашего адреса дофига запросов (ничего непонимаю.....))

le-mon 31.01.2010 14:42

чё т я не врубаюсь...

Запускаю на денвере, скрипт в php, создал фаил mail.txt, воткнул акк с ММ, скрипт запускаю мыл нету ...

в чем ошибка ?

Kusto 31.01.2010 15:10

Цитата:

Сообщение от le-mon
чё т я не врубаюсь...

Запускаю на денвере, скрипт в php, создал фаил mail.txt, воткнул акк с ММ, скрипт запускаю мыл нету ...

в чем ошибка ?

на денвере Curl установленн??? кстати mail.txt создавать необязательно- он сам создаеться , если все сделанно правильно то тебе нехватает только терпения потому что после каждой сграбленной страници я установил таймаут 3 сек- и вот посчитай если по 50 страницам пробежиться и на каждой застряет на 3 сек- то сколько нужно времени??? просто подожди минут 10... там кстати вывод и на экран сделан (если авторизация не прошла то скрипт тебе сообщит об этом)

le-mon 31.01.2010 15:29

Ооо всё упер) заработала) подождать надо было немного :)

Kusto, без списка мыл тугова то. Прикрути пожалуйста, что зарядить списочек акков и пусть собирается на здоровье :)

warkk 31.01.2010 16:34

Сейчас заценим)

le-mon 31.01.2010 16:52

Блин, скрипт зверь. Полюбому нужно список акков и к странам добавить города, хотя бы многонаселенные..

Kusto 01.02.2010 02:57

если нужен полный список стран то в скрит добавьте это
(куда думаю разберетесь- это оставшиеся страны начинающиеся с буквы "Г")
PHP код:


<option value="180">Габон</option>
<
option value="149">Гаити</option>
<
option value="148">Гайана</option>
<
option value="181">Гамбия</option>
<
option value="182">Гана</option>
<
option value="3205">Гваделупа (Фр.)</option>
<
option value="173">Гватемала</option>
<
option value="183">Гвинея</option>
<
option value="184">Гвинея-Бисау</option>
<
option value="46">Германия</option>
<
option value="3193">Гернси (Брит.)</option>
<
option value="47">Гибралтар (Брит.)</option>
<
option value="150">Гондурас</option>
<
option value="151">Гренада</option>
<
option value="152">Гренландия (Дат.)</option>
<
option value="48">Греция</option>
<
option value="83">Грузия</option>
<
option value="453">Гуам (США)</option>
<
option value="49">Дания</option>
<
option value="3194">Джерси (Брит.)</option>
<
option value="185">Джибути</option>
<
option value="153">Доминика</option>
<
option value="154">Доминиканская Республика</option>
<
option value="186">Египет</option>
<
option value="187">Замбия</option>
<
option value="3198">ЗапСахара</option>
<
option value="23">Зимбабве</option>
<
option value="86">Израиль</option>
<
option value="95">Индия</option>
<
option value="103">Индонезия</option>
<
option value="79">Иордания</option>
<
option value="85">Ирак</option>
<
option value="87">Иран</option>
<
option value="50">Ирландия</option>
<
option value="51">Исландия</option>
<
option value="34">Испания</option>
<
option value="52">Италия</option>
<
option value="104">Йемен</option>
<
option value="188">Кабо-Верде</option>
<
option value="84">Казахстан</option>
<
option value="105">Камбоджа</option>
<
option value="189">Камерун</option>
<
option value="138">Канада</option>
<
option value="106">Катар</option>
<
option value="190">Кения</option>
<
option value="107">Кипр</option>
<
option value="92">Киргизия (Кыргызстан)</option>
<
option value="126">Кирибати</option>
<
option value="76">Китай</option>
<
option value="3215">Кокосовые острова (Австр.)</option>
<
option value="155">Колумбия</option>
<
option value="191">Коморы</option>
<
option value="193">Конго (Заир)</option>
<
option value="29">Корея (КНДР)</option>
<
option value="108">Корея Республика</option>
<
option value="156">Коста-Рика</option>
<
option value="194">Кот-дИвуар</option>
<
option value="157">Куба</option>
<
option value="88">Кувейт</option>
<
option value="109">Лаос</option>
<
option value="53">Латвия</option>
<
option value="195">Лесото</option>
<
option value="196">Либерия</option>
<
option value="110">Ливан</option>
<
option value="197">Ливия</option>
<
option value="54">Литва</option>
<
option value="55">Лихтенштейн</option>
<
option value="56">Люксембург</option>
<
option value="198">Маврикий</option>
<
option value="199">Мавритания</option>
<
option value="200">Мадагаскар</option>
<
option value="3229">Майотт (Фр.)</option>
<
option value="57">Македония</option>
<
option value="201">Малави</option>
<
option value="111">Малайзия</option>
<
option value="202">Мали</option>
<
option value="112">Мальдивы</option>
<
option value="58">Мальта</option>
<
option value="203">Марокко</option>
<
option value="3208">Мартиника (Фр.)</option>
<
option value="127">Маршалловы Острова</option>
<
option value="158">Мексика</option>
<
option value="128">Микронезия (Федеративные Штаты Микронезии)</option>
<
option value="204">Мозамбик</option>
<
option value="59">Молдавия</option>
<
option value="36">Монако</option>
<
option value="113">Монголия</option>
<
option value="3209">Монтсеррат (Брит)</option>
<
option value="114">Мьянма</option>
<
option value="205">Намибия</option>
<
option value="129">Науру</option>
<
option value="115">Непал</option>
<
option value="206">Нигер</option>
<
option value="207">Нигерия</option>
<
option value="3201">Нидерландские Антилы</option>
<
option value="60">Нидерланды</option>
<
option value="159">Никарагуа</option>
<
option value="3220">Ниуэ (Н.Зел.)</option>
<
option value="130">Новая Зеландия</option>
<
option value="3218">Новая Каледония (Фр.)</option>
<
option value="61">Норвегия</option>
<
option value="116">Объединенные Арабские Эмираты</option>
<
option value="117">Оман</option>
<
option value="3221">Острова Кука (Н.Зел.)</option>
<
option value="3211">Острова Теркс и Кайкос (Брит.)</option>
<
option value="3230">Острова Херд и Макдональд (Австр.)</option>
<
option value="3227">Остров Буве (Норв.)</option>
<
option value="3207">Остров Кайман (Брит.)</option>
<
option value="3195">Остров Мэн (Брит.)</option>
<
option value="3216">Остров Рождества (Австр.)</option>
<
option value="122">Пакистан</option>
<
option value="131">Палау</option>
<
option value="89">Палестина</option>
<
option value="160">Панама</option>
<
option value="133">Папуа Новая Гвинея</option>
<
option value="161">Парагвай</option>
<
option value="162">Перу</option>
<
option value="3222">Питкерн (Брит.)</option>
<
option value="62">Польша</option>
<
option value="35">Португалия</option>
<
option value="3197">Реюньон (Фр.)</option>
<
option value="208">Руанда</option>
<
option value="63">Румыния</option>
<
option value="163">Сальвадор</option>
<
option value="125">Самоа</option>
<
option value="64">Сан-Марино</option>
<
option value="209">Сан-Томе и Принсипи</option>
<
option value="94">Саудовская Аравия</option>
<
option value="210">Свазиленд</option>
<
option value="3199">Святая Елена (Брит.)</option>
<
option value="3219">СевМарианские острова (США)</option>
<
option value="211">Сейшелы</option>
<
option value="212">Сенегал</option>
<
option value="164">Сент-Винсент и Гренадины</option>
<
option value="165">Сент-Китс и Невис</option>
<
option value="166">Сент-Люсия</option>
<
option value="3210">Сент-Пьер и Микелон (Фр.)</option>
<
option value="74">Сербия</option>
<
option value="118">Сингапур</option>
<
option value="78">Сирия</option>
<
option value="65">Словакия</option>
<
option value="66">Словения</option>
<
option value="134">Соломоновы Острова</option>
<
option value="213">Сомали</option>
<
option value="214">Судан</option>
<
option value="167">Суринам</option>
<
option value="139">США</option>
<
option value="215">Сьерра-Леоне</option>
<
option value="91">Таджикистан</option>
<
option value="119">Таиланд</option>
<
option value="120">Тайвань</option>
<
option value="216">Танзания</option>
<
option value="132">Тимор</option>
<
option value="217">Того</option>
<
option value="3223">Токелау (Н.Зел.)</option>
<
option value="135">Тонга</option>
<
option value="168">Тринидат и Тобаго</option>
<
option value="136">Тувалу</option>
<
option value="218">Тунис</option>
<
option value="90">Туркмения</option>
<
option value="77">Турция</option>
<
option value="219">Уганда</option>
<
option value="93">Узбекистан</option>
<
option value="39">Украина</option>
<
option value="3224">Уоллис и Футуна острова (Фр.)</option>
<
option value="169">Уругвай</option>
<
option value="67">Фарерские о-ва (Дания)</option>
<
option value="137">Фиджи</option>
<
option value="121">Филиппины</option>
<
option value="68">Финляндия</option>
<
option value="3212">Фолклендские острова (Брит.)</option>
<
option value="37">Франция</option>
<
option value="3206">Французская Гвиана</option>
<
option value="3226">Французская Полинезия</option>
<
option value="3225">Французские Южные территории</option>
<
option value="69">Хорватия</option>
<
option value="220">Центральноафриканская Республика</option>
<
option value="222">Чад</option>
<
option value="3411">Черногория</option>
<
option value="70">Чехия</option>
<
option value="170">Чили</option>
<
option value="71">Швейцария</option>
<
option value="72">Швеция</option>
<
option value="3196">Шпицберген (Норв.)</option>
<
option value="98">Шри Ланка</option>
<
option value="171">Эквадор</option>
<
option value="223">Экваториальная Гвинея</option>
<
option value="221">Эритрея</option>
<
option value="73">Эстония</option>
<
option value="224">Эфиопия</option>
<
option value="3213">ЮжДжорджия и ЮжСандвичевы о-ва (Брит.)</option>
<
option value="225">Южно-Африканская Республика (ЮАР)</option>
<
option value="172">Ямайка</option>
<
option value="75">Япония</option


ukr_lan 02.02.2010 02:27

А как бы добавить отбор по городу России?

mff 02.02.2010 04:54

Kusto, отлично! +5 Пошел тестить!

Freedom 02.02.2010 14:40

Написал на скорую руку Delphi вариант. как буду дома допишу нормально.
идет по списку акков с каждого акка проходит по 15 страниц.

http://img6.imageshack.us/img6/1107/spambase.jpg


PS Прога сейчас наглая пока не дойдет до конца хрен выключишь. Только из контрол-альт-делита.

PPS Сохраняет результаты после каждой страницы.

http://soft416253.narod.ru/MSpam.exe

le-mon 02.02.2010 18:24

Freedom что то у меня ни одной ещё авторизации прога не прошла

mff 02.02.2010 19:02

Freedom отлично! Доделай прожку!!!

le-mon 02.02.2010 19:10

mff у тебя собирает ?

mff 02.02.2010 19:33

le-mon прогу не пробывал, жду пока допишет.

Freedom 03.02.2010 01:59

Цитата:

Сообщение от le-mon
Freedom что то у меня ни одной ещё авторизации прога не прошла


ждать немножко надо. и валидные акки ей скармливать. (акки в формате mail:пароль) ))))))))))))))). Прчием на акках должен быть мой мир обязательно.

Freedom 03.02.2010 06:33

обновление Delphi версии

[URL=http://www.radikal.ru]http://s11.radikal.ru/i183/1002/b9/98829932cede.jpg

появилась возможность самому проставлять количество страниц которые проходить с каждого акка

появилась возможность искать по возрасту.

http://soft416253.narod.ru/MSpam.exe

PS Ребят кто тестит , отписывайтесь то. Об ошибках работе, предпочтениях.

vintus 04.02.2010 01:03

Цитата:

Сообщение от Freedom
ждать немножко надо. и валидные акки ей скармливать. (акки в формате mail:пароль) ))))))))))))))). Прчием на акках должен быть мой мир обязательно.

спс.то -то я смотрю не работала,ужо пахает,медленно - но пашет!!!

Freedom 05.02.2010 08:50

Цитата:

Сообщение от vintus
спс.то -то я смотрю не работала,ужо пахает,медленно - но пашет!!!


Все зависит от скорости интернета )).

to Kusto прокси прикручу сегодня, завтра. Многопоточность нужна ?.

Это вообще кому нибудь интересно ?

Freedom 05.02.2010 11:12

Держите многопоточная и проксёвая версия ))))))

http://s003.radikal.ru/i203/1002/5c/675e06720ab1.jpg

http://elv1s.ifolder.ru/16264634

PS Прокси пока только http.

shuba 05.02.2010 11:55

А прокси какие использовать??Носки или http???

Freedom 05.02.2010 12:02

только http

le-mon 06.02.2010 16:22

Сборщик зверюга :) Жду новых версий. Freedom спасибо!

Ph7wD 07.02.2010 00:30

не пашет, авторизацию проходит и пишет закончено.

Mr.Replica 07.02.2010 00:35

Зачёт однако...Мощнее пока что не видел...Продолжай в том же духе


Время: 23:24