Получение реального IP адреса пользователя Skype

  1. 1. Качаем отсюда пропатченный скайп версии 5.5:

    2. Включаем создание файла с дебаг-логом через добавление нескольких ключей реестр.

    3. Выбираем функцию добавить скайп контакт, но не добавляем, а только кликаем на него, чтобы посмотреть vcard. Этого будет достаточно.

    4. Смотрим в логах нужный скайпнейм.


    В записи такого вида будет его реальный ип: -r195.100.213.25:31101
    А вот в такой, внутренний ип сетевой карты: -l172.10.5.17

    21:16:45.818 T#3668 PresenceManager: аїљnoticingskypetestuser10x3e54a539a91a19fc-s-s65.55.223.23:40013-r195.100.213.25:31101-l172.10.5.17:2296023d2310982f328ff

    5. Смотрим его по whois.

    Получаем город, страну, провайдера и внутренний ип юзера.

    Перл скрипт для автоматизации поиска в дебаг логе:

    Код:
    #!perl
    $LOGFILE="debug-20120420-2257.log";
    $SKYPENAME="skypetestuser1";
    
    open(RD,$LOGFILE);
    open(WR,">_ip_logger.txt");
    while(){ chomp;
    $line=$_;
    
    if( ($line=~ /PresenceManager:/) and ($line=~ /noticing/) ){
    $line=~ /-r(\d+.\d+.\d+.\d+)/;
    $ip=$1;
    
    print WR $line."\n";
    print WR "IP: $ip\n";
    
    if ($line=~ /$SKYPENAME/){
    print $line."\n";
    print "${SKYPENAME} IP: $ip\n";
    };
    };
    
    };
    close(RD);
    close(WR);

    P.S. Или используем онлайн-сервис

    Источники: pastebin, habr, grabberz.com
     
    2 пользователям это понравилось.
  2. chimatii,
    Файлы удалили, кто успел скачать залейте на какой нибудь хостинг пожалуйста
     
  3. Подскажи пожалуйста: Skype сделал лог. В нём естественно куча IP адресов. Попробовал найти нужный рядом с искомым логином. Выдает, что этот IP принадлежит SKYPE. Пробую выполнить скрипт (естественно перед этим установил ActivePerl). В самом скрипте в двух верхних строчках прописал свой полученный файл лога и искомый скайп-логин. Сохранил, запускаю скрипт и получаю чёрное дос окно и текстовый файл _ip_logger.txt с нулевым размером. Дос окно не закрывается. Может чего не так делаю?