ANTICHAT

ANTICHAT (https://forum.antichat.io/index.php)
-   Уязвимости Mail-сервис (https://forum.antichat.io/forumdisplay.php?f=14)
-   -   Вытащить e-mail адреса (https://forum.antichat.io/showthread.php?t=264361)

HIMIKAT 14.03.2011 16:45

Имеется файл, вот такого содержания:

PHP код:

[COLOR="#000000"][COLOR="#0000BB"][/COLOR][COLOR="#007700"][/COLOR][COLOR="#0000BB"]102[/COLOR][COLOR="#007700"][/COLOR][COLOR="#0000BB"]bonuswm[/COLOR][COLOR="#007700"].[/COLOR][COLOR="#0000BB"]ru[/COLOR][COLOR="#007700"]Private[/COLOR][COLOR="#0000BB"]person[/COLOR][COLOR="#007700"][/COLOR][COLOR="#0000BB"]ns0[/COLOR][COLOR="#007700"].[/COLOR][COLOR="#0000BB"]s0t[/COLOR][COLOR="#007700"].[/COLOR][COLOR="#0000BB"]ru[/COLOR][COLOR="#007700"].[/COLOR][COLOR="#0000BB"]ns1[/COLOR][COLOR="#007700"].[/COLOR][COLOR="#0000BB"]s0t[/COLOR][COLOR="#007700"].[/COLOR][COLOR="#0000BB"]ru[/COLOR][COLOR="#007700"]. +[/COLOR][COLOR="#0000BB"]7 9500036527[/COLOR][COLOR="#007700"]+[/COLOR][COLOR="#0000BB"]7 8124270200[/COLOR][COLOR="#007700"][/COLOR][COLOR="#0000BB"]REGTIME[/COLOR][COLOR="#007700"]-[/COLOR][COLOR="#0000BB"]REG[/COLOR][COLOR="#007700"]-[/COLOR][COLOR="#0000BB"]RIPN[/COLOR][COLOR="#007700"][/COLOR][COLOR="#0000BB"]12[/COLOR][COLOR="#007700"]-[/COLOR][COLOR="#0000BB"]01[/COLOR][COLOR="#007700"]-[/COLOR][COLOR="#0000BB"]2007[/COLOR][COLOR="#007700"][/COLOR][COLOR="#0000BB"]12[/COLOR][COLOR="#007700"]-[/COLOR][COLOR="#0000BB"]01[/COLOR][COLOR="#007700"]-[/COLOR][COLOR="#0000BB"]2012[/COLOR][COLOR="#007700"]

[/
COLOR][COLOR="#0000BB"]103[/COLOR][COLOR="#007700"][/COLOR][COLOR="#0000BB"]bonuswmr[/COLOR][COLOR="#007700"].[/COLOR][COLOR="#0000BB"]ru[/COLOR][COLOR="#007700"]Private[/COLOR][COLOR="#0000BB"]Person[/COLOR][COLOR="#007700"][/COLOR][COLOR="#0000BB"]reg[/COLOR][COLOR="#007700"].[/COLOR][COLOR="#0000BB"]ru[/COLOR][COLOR="#007700"] +[/COLOR][COLOR="#0000BB"]79278820270[/COLOR][COLOR="#007700"][/COLOR][COLOR="#0000BB"]REGRU[/COLOR][COLOR="#007700"]-[/COLOR][COLOR="#0000BB"]REG[/COLOR][COLOR="#007700"]-[/COLOR][COLOR="#0000BB"]RIPN[/COLOR][COLOR="#007700"][/COLOR][COLOR="#0000BB"]15[/COLOR][COLOR="#007700"]-[/COLOR][COLOR="#0000BB"]01[/COLOR][COLOR="#007700"]-[/COLOR][COLOR="#0000BB"]2009[/COLOR][COLOR="#007700"][/COLOR][COLOR="#0000BB"]15[/COLOR][COLOR="#007700"]-[/COLOR][COLOR="#0000BB"]01[/COLOR][COLOR="#007700"]-[/COLOR][COLOR="#0000BB"]2012[/COLOR][COLOR="#007700"][/COLOR][/COLOR

В нем есть вот такие строки:

PHP код:

[COLOR="#000000"][COLOR="#0000BB"][/COLOR][COLOR="#007700"]/[/COLOR][COLOR="#0000BB"]email[/COLOR][COLOR="#007700"].[/COLOR][COLOR="#0000BB"]php[/COLOR][COLOR="#007700"]?[/COLOR][COLOR="#0000BB"]e[/COLOR][COLOR="#007700"]=[/COLOR][COLOR="#0000BB"]ZG5zQHMwdC5ydQ[/COLOR][COLOR="#007700"]==

/[/
COLOR][COLOR="#0000BB"]email[/COLOR][COLOR="#007700"].[/COLOR][COLOR="#0000BB"]php[/COLOR][COLOR="#007700"]?[/COLOR][COLOR="#0000BB"]e[/COLOR][COLOR="#007700"]=[/COLOR][COLOR="#0000BB"]YWRteG9zdEBnbWFpbC5jb20[/COLOR][COLOR="#007700"]=[/COLOR][/COLOR

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

Код:

dns@s0t.ru
admxost@gmail.com


Fepsis 14.03.2011 17:09

Код:

#!/usr/bin/perl

use MIME::Base64;

my $data = "

102

bonuswm.ru
Private person
ns0.s0t.ru.
ns1.s0t.ru.
 
+7 9500036527
+7 8124270200

REGTIME-REG-RIPN12-01-2007
12-01-2012
 

103

bonuswmr.ru
Private Person
reg.ru
+79278820270

REGRU-REG-RIPN15-01-2009
15-01-2012

";

my @emeils = $data =~/email\.php\?e=(.+?)'/g;

open(OUT, '> out.txt');

foreach $encoded (@emeils)

    {

        $decoded = decode_base64($encoded);
        print OUT "$decoded\n";

    }

close(OUT);


Shturmgewehr 21.03.2011 14:34

в Cain есть утилитка, раскодирующая Base64...

leaderru 26.03.2011 18:28

Цитата:

Сообщение от Shturmgewehr
в Cain есть утилитка, раскодирующая Base64...

Ага полностью согласен, а до этого просто поставь отправку имэилов тебе на мыло

malahi 18.04.2011 00:43

тут ты можешь раскодировать base64

http://www.kruglov.ru/useful/base64/

а где можна наити закадированиые mail в басе 64?

(сорри за руски! узаю Транслит! )

Mr.Replica 22.04.2011 11:43

В данном случае нужно использовать регулярные выражения,для парсинга Мыл.В VB.NET Это будет выглядеть примерно так:

[CODE]
Dim rssourcecode As String = sr.ReadToEnd

Dim r As New System.Text.RegularExpressions.Regex("


Время: 12:08