Парсинг сообщений в контакте

SarDoX · 6 Apr 2012

Всем доброго времени суток. Долго искал скрипт, читающий сообщения вконакте с последующей записью в файл, однако все оказались очень старыми и неработоспособными.
из разных кусков чужого кода и ужасно кривого своего получился полурабочий скрипт(пхп никогда не занимался).
на данный момент скрипт открвает вк, логинится, открывает страницу мэил.пхп, ищет в коде верхнее сообщение и получает айди письма. затем циклом по очереди заходит на страницы с http://vk.com/mail?act=show&id=айдипиьсма, считывает автора и текст сообщения. затем выводит все в виде "Автор: тело сообщения"

криво, медленно, но работает.
щас я понимаю, что двигаюсь не в том направление, что парситься должно совсем иначе...

подскажите, подтолкните. буду очень рад.

<?php

set_time_limit(0);

$mail = "";//Логин или е-маил от кнтакта
$pass = "";// пароль от контакта
$mobile = "1111";

function grabb($str, $start, $end) {
$start = strpos($str, $start) + strlen($start);
$end = strpos($str, $end, $start);
$result = substr($str, $start, $end - $start);
flush();
return $result;
}

function connect($link,$cookie=null,$post=null){
$ch = curl_init();
curl_setopt($ch, CURLOPT_URL,$link);
curl_setopt($ch, CURLOPT_RETURNTRANSFER,1);
curl_setopt($ch, CURLOPT_TIMEOUT, 0);
curl_setopt($ch, CURLOPT_HEADER, 1);
curl_setopt($ch, CURLOPT_FOLLOWLOCATION, 0);
if($cookie !== null)
curl_setopt($ch, CURLOPT_COOKIE, $cookie);
if($post !== null)
{
curl_setopt($ch, CURLOPT_POST, 1);
curl_setopt($ch, CURLOPT_POSTFIELDS, $post);
}
$otvet = curl_exec($ch);
curl_close($ch);
return $otvet;
}

$otvet=connect("http://login.vk.com/?act=login&email=$mail&pass=$pass");
If(!preg_match("/hash=(.*?)&/",$otvet,$hash)){
die("Login incorrect");
}

$otvet=connect("http://vk.com/login.php?act=slogin&fast=1&hash=".$hash[1]."&s=1");
preg_match("/remixsid=(.*?);/",$otvet,$sid);
$cookie = "remixchk=5; remixsid=$sid[1]";
$html = connect("http://vk.com/mail.php",$cookie);

$pos = strpos($html, 'mess');
$max = substr($html, $pos+4, 4);
// $max -- последнее айди
$maxLast=1800; //предыдущее последнее айди(скажем, когда в предыдущий раз запускали парсер)

$x=$maxLast;
$m;
$m1;
$m2;

//циклом перебираем сообщения от самого нового до нужного

for ($x=$max; $x>$maxLast; $x--) {
$s="http://vk.com/mail.php?act=show&id=";
$s .=$x;
$inbox_page = connect($s,$cookie);
preg_match('|mem_link(.*)</a|', $inbox_page, $m1);
$pos = strpos($m1[1], 'id');
$m2=substr($m1[1], $pos+11, 50); //получаем имя отправителя(неправильно работает)

//ищем запись mail_envelope возле которой находится тело сообщения; вытаскиваем сообщение
preg_match('|<div class="mail_envelope_body wall_module wrapped" style="width: 285px;">(.*)</div|', $inbox_page, $m);
echo "<br>";
$sss;
$s =": ";
$m2 .= $s;
$m2 .= $m[1];
echo $m2;

}
Click to expand...

justonline · 6 Apr 2012

SarDoX said:

Всем доброго времени суток. Долго искал скрипт, читающий сообщения вконакте с последующей записью в файл, однако все оказались очень старыми и неработоспособными.
из разных кусков чужого кода и ужасно кривого своего получился полурабочий скрипт(пхп никогда не занимался).
на данный момент скрипт открвает вк, логинится, открывает страницу мэил.пхп, ищет в коде верхнее сообщение и получает айди письма. затем циклом по очереди заходит на страницы с http://vk.com/mail?act=show&id=айдипиьсма, считывает автора и текст сообщения. затем выводит все в виде "Автор: тело сообщения"

криво, медленно, но работает.
щас я понимаю, что двигаюсь не в том направление, что парситься должно совсем иначе...

подскажите, подтолкните. буду очень рад.
Click to expand...

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

SarDoX · 6 Apr 2012

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

mironich · 6 Apr 2012

зря что ли я пол дня читал про курл
Click to expand...

Мало читал, для авт приема сообщений нужно гемор. приличный осилить.

SarDoX · 6 Apr 2012

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

SarDoX · 6 Apr 2012

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

<?php

set_time_limit(0);

$mail = "@.ru";//Логин или е-маил от кнтакта
$pass = "";// пароль от контакта
$mobile = "1111";

function grabb($str, $start, $end) {
$start = strpos($str, $start) + strlen($start);
$end = strpos($str, $end, $start);
$result = substr($str, $start, $end - $start);
flush();
return $result;
}
$m;
$m1;
$m2;
$m3;
$max2;
$max1;
$max;

function connect($link,$cookie=null,$post=null){
$ch = curl_init();
curl_setopt($ch, CURLOPT_URL,$link);
curl_setopt($ch, CURLOPT_RETURNTRANSFER,1);
curl_setopt($ch, CURLOPT_TIMEOUT, 0);
curl_setopt($ch, CURLOPT_HEADER, 1);
curl_setopt($ch, CURLOPT_FOLLOWLOCATION, 0);
if($cookie !== null)
curl_setopt($ch, CURLOPT_COOKIE, $cookie);
if($post !== null)
{
curl_setopt($ch, CURLOPT_POST, 1);
curl_setopt($ch, CURLOPT_POSTFIELDS, $post);
}
$otvet = curl_exec($ch);
curl_close($ch);
return $otvet;
}

$otvet=connect("http://login.vk.com/?act=login&email=$mail&pass=$pass");
If(!preg_match("/hash=(.*?)&/",$otvet,$hash)){
die("Login incorrect");
}

$otvet=connect("http://vk.com/login.php?act=slogin&fast=1&hash=".$hash[1]."&s=1");
preg_match("/remixsid=(.*?);/",$otvet,$sid);
$cookie = "remixchk=5; remixsid=$sid[1]";

$html = connect("http://vk.com/mail.php?section=outbox",$cookie);
$pos = strpos($html, 'mess'); // получаем макс айди из отправленных
$max1 = substr($html, $pos+4, 4);

$html = connect("http://vk.com/mail.php",$cookie);
$pos = strpos($html, 'mess'); // получаем макс айди из полученных
$max2 = substr($html, $pos+4, 4);

if ($max2>$max1) $max=$max2; else $max=$max1;

$maxLast=0;
$mytext;
$fp = fopen('id.txt', 'r'); //читаем из файла номер айди последнего записанное сообщение
$maxLast = fgets($fp, 6);
fclose($fp);

$x=$maxLast;

for ($x=$max; $x>$maxLast; $x--) {
$s="http://m.vk.com/mail.php?act=msg&id=";
$s .=$x;
$inbox_page = connect($s,$cookie); //открываем страницу с мессагой
preg_match('|<div class="head">(.*)</a></div>|', $inbox_page, $m1);//ищем автора
preg_match('|<div class="text">(.*)/div>|', $inbox_page, $m3);//ищем тело соообщения
$m1[1].=$m3[1]; //выводим тело

записываем инфу в файл вида автор:сообщение

$fp = fopen("mess.txt", "a"); // Открываем файл в режиме записи
$test = fwrite($fp, $m1[1]."\r\n"); // Запись в файл
fclose($fp); //Закрытие файла
}
;

в самом конце перезаписываем максимальный номер айди что б в следующий раз начать парсить с него
$fp = fopen("id.txt", "a"); // Открываем файл в режиме записи
ftruncate($fp, 0);
$test = fwrite($fp, $max); // Запись в файл
fclose($fp); //Закрытие файла
Click to expand...

SarDoX · 6 Apr 2012

а так впринципе работает - заходит, проверяет новые сообщения, если есть - дописывает в файл.

Парсинг сообщений в контакте

SarDoX New Member

justonline network ninja

SarDoX New Member

mironich Elder - Старейшина

SarDoX New Member

SarDoX New Member

SarDoX New Member

Useful Searches

Парсинг сообщений в контакте

SarDoX New Member

justonline network ninja

SarDoX New Member

mironich Elder - Старейшина

SarDoX New Member

SarDoX New Member

SarDoX New Member