Minggu, 04 Oktober 2015

Cara Buat Injek Delete Host dan Reset Limit All Operator Terbaru 2015

Berikut adalah Info dengan Cara Buat Injek Delete Host dan Reset Limit All Operator Terbaru 2015 dan sebelumnya juga sudah dibahas dengan Cara Mudah Cek Harga Data Internet Telkomsel 2015 ok berikut adalah penjelasan singkatnya dari saya tentang buat injek reset limit dan delet host.

Sebelum saya bahas lebih jauh bagi sahabat yang mempunyai blog juga dimohon jika ingin share ulang source code atau listing program ini untuk selalu memberikan link sumbernya sebagai pembuatnya, he he itu saja, buat eye eye silahkan kalau mau ikutan bikin juga,, hi hi hi

Ok Untuk membuat inject reset limit atau RELIT yang saat ini tengah naik daun ha ha kaya artis holywood saja, kita akan membahas dulu konsep konsep dasarnya dulu, yang paling banyak dibahas payload atau source code injek reset limit adalah pada dasarnya dengan konsep manual karena kita menjalankan reset lewat button, sebenarnya konsepnya sangat simple kita hanya perlu menambahkan sebuah timer aktif contoh timer1:= enabled; pada tombol aktif timer1.enabled:=false; pada tombol mati, tetapi pada form.active jangan lupa di buat false timernya karena jika tidak dibuat false berarti contoh timer1:= enabled; sama saja sudah diaktifkan sebelum tombol dijalankan lah jadinya gimana ko reset limit sebelum ada koneksi terjadi,, he he

Kita lanjutkan kembali apakah reset limit harus menggunakan manual tombol untuk melakukan resetnya sebenarnya tidak juga kita bisa melakukan reset limit secara otomatis dengan tanpa harus melakukan on click pada button yaitu dengan menambahkan fungsi array,,

Kita akan membuat topologi sederhananya yaitu misalkan kita akan melakukan reset data dibawah 50Kbps misalakan dengan array minimum 50. . . . . xxxx dan secara defaultnya execute yang biasa anda kenal sebenarnya netdata menjalankan fungsi array hanya saja array tersebut dijalankan di server dengan awal string 0.....xxx atau zero string nah pada penulisan array tersebut kita bisa mengatur minimum string yang muncul pada netdata , ingat ya netdata ditujukan atau kotak atau wadah untuk sebuah server host.

Sekarang anda paham bahwa reset limit atau relit bisa dilakukan secara otomatis, tetapi pada konsep yang pernah saya bahas kita juga sudah pernah belajar konsep SIP silahkan baca lagi tentang Session Initiation Protocol, untuk jenis payloadnya sudah lama pernah saya bahas, ok dan untuk payload reset limit kita akan bahas kembali dipostingan selanjutnya, dan sekarang kita akan belajar membuat inject delet host, serta payload roll host akan saya bahas di postingan selanjutnya juga.

Untuk membuat injek delet host saya tidak akan banyak bahas ini itu dulu nanti kita akan sambung lagi disini kita akan langsung praktek penulisan kode programnya, ingat ini hanya baru dasarnya saja sisanya bisa anda kembangkan kembali, oh iya injek delet host bisa dikatakan sebagai injek pengganti multy header, atau yang sering anda temui dengan penambahan fungsi addheader karena kemungkinan besar sebentar lagi akan tewas karena banyak eye eye berkeliaran,, he he

Yuk ah Kita Praktekin Saja dan Berikut adalah Listing Codingnya:

1. Pertama buka dulu delphi anda lalu tambahkan 4 Komponennya yaitu TCP pada Indy Server (1), TCP Pada Indy Client (1), Button (1), Memo (2), jika anda tidak suka memo sebagai lognya bisa anda hilangkan atau ganti dengan yang lainnya. untuk nama nama komponennya silahkan sesuaikan dengan keinginan masing masing saja.

type
  TForm1 = class(TForm)
    IdMappedPortTCP1: TIdMappedPortTCP;
    IdTCPClient1: TIdTCPClient;
    Button1: TButton;
    Request: TMemo;
    Respone: TMemo;

Cara Buat Injek Sakti Indosat XL Axis 3 Telkomsel 2015

2. Yang kedua lalu tambahkan dulu fungsi Get Host , Get Port , dan Delet Host kaya gambar dibawah ini:

function GetHost(URL: string):string;
function GetPort(URL: string):integer;
function DelHostOfURL(URL,Host:string;Port:integer):string;

Oh iya agar button ketahan silahkan diakhir anda tambahkan bevel, lalu anda tambahkan kode dibawah ini:

  private
  zonksel:boolean;
    { Private declarations }

Kode diatas agar button bisa menjalankan fungis ON OFF saja (Single Button) simplenya gitu,, he he

Cara Buat Injek Sakti Indosat XL Axis 3 Telkomsel 2015

3. Yang ketiga lalu tambahkan kode uses wininet, idUri; dibawah implementation dan diatas {$R *.dfm} lalu dibawah {$R *.dfm} tambahkan kode dibawah ini, lihat saja gambarnya:

function TForm1.GetHost(URL: string):string;
var
  LURI:TIdURI;
begin
  LURI:=TIdURI.Create(URL);
  result:=LURI.Host;
  LURI.Free;
end; //Mengambil Host

function TForm1.GetPort(URL: string):integer;
var
  LURI:TIdURI;
begin
  LURI:=TIdURI.Create(URL);
  if Length(LURI.Port)<>0 then
  result:=StrToInt(LURI.Port)
  else
  result:=80;
  LURI.Free;
end; //Mengambil Port

function TForm1.DelHostOfURL(URL,Host:string;Port:integer):string;
var
  s:string;
begin
  result:= URL;
  s:='http://'+Host;
  if Port <> 80 then
  s:= s + ':' + IntToStr(Port);
  Delete(result,pos(s,result),length(s));
end; //Menghapus Host Dalam URL

Cara Buat Injek Sakti Indosat XL Axis 3 Telkomsel 2015

4. Yang keempat silahkan onclick buttonnya atau Klik Saja buttonnya lalu masukan kode dibawah ini:

procedure TForm1.Button1Click(Sender: TObject);
var
I: Integer;
Thread: TIdMappedPortThread;
 begin
 if Zonksel then
begin
with IdMappedPortTcp1.Threads.LockList do
try
for I := 0 to Count-1 do
begin
Thread := TIdMappedPortThread(Items[I]);
Thread.Connection.Disconnect;
Thread.OutboundClient.Disconnect;
end;
finally
IdMappedPortTcp1.Threads.UnlockList;
end;
 IdMappedPortTcp1.Active := False;
 IdMappedPortTcp1.Bindings.Clear;
Button1.Caption :='ON TCP';
Zonksel := False;
end else
begin
 Button1.Caption :='OFF TCP';
IdMappedPortTCP1.DefaultPort := 9201; // Buat Listen Port
IdMappedPortTCP1.MappedHost := '10.1.89.130'; // Proxy Sesuaikan dengan OP Masing2
IdMappedPortTCP1.ListenQueue := 15;
IdMappedPortTCP1.MaxConnections := 0;
IdMappedPortTCP1.TerminateWaitTime := 3000;
IdMappedPortTCP1.MappedPort := 8000;  // Port Sesuaikan dengan OP Masing2
IdMappedPortTCP1.Active := true;
Zonksel := True;
end;
end;

Cara Buat Injek Sakti Indosat XL Axis 3 Telkomsel 2015

5. Yang kelima silahkan menuju Mapped TCP > Event > OnExecute lalu tambahkan kode dibawah ini:

procedure TForm1.IdMappedPortTCP1Execute(AThread: TIdMappedPortThread);
var
  RequestHost:string;
  RequestPort:integer;
begin
 Request.Lines.Add(Athread.NetData);
  //Mengambil
  try
  RequestHost:=GetHost(AThread.NetData);
  RequestPort:=GetPort(AThread.NetData);
     if (RequestHost<>IdMappedPortTcp1.MappedHost) or
     (RequestPort<>IdMappedPortTcp1.MappedPort) then
     begin
        IdMappedPortTCP1.MappedHost:=RequestHost;
        IdMappedPortTCP1.MappedPort:=RequestPort;
        TidTcpClient(AThread.OutboundClient).Host:=RequestHost;
        TidTcpClient(AThread.OutboundClient).Port:=RequestPort;
        TidTcpClient(AThread.OutboundClient).Disconnect;
        TidTcpClient(AThread.OutboundClient).Connect(AThread.ConnectTimeOut);
     end; //Mengolah
  finally
  //Menghubungkan
  end;
end;

Cara Buat Injek Sakti Indosat XL Axis 3 Telkomsel 2015

6. Yang keenam lalu menuju ke Outboundata masih di event mapped TCP  lalu tambahkan kode:

procedure TForm1.IdMappedPortTCP1OutboundData(
  AThread: TIdMappedPortThread);
begin
Respone.Lines.Add(Athread.NetData);
// Tambahkan Replace
end;

Cara Buat Injek Sakti Indosat XL Axis 3 Telkomsel 2015

Jadi itulah konsep sederhana dari maskud payload delet host sisanya tinggal anda kembangkan sedikit lagi, ya itu sebenarnya sudah jadi tinggal sedikit lagi ko, mungkin anda bingung dimana sih bug harus ditaruh, bug host tetap harus di load oleh execute anda perhatikan lagi saja diatas ada ko bug anda taruh pada fungsinya yang terhubung ke execute jangan lupa juga karakter CRLF tidak ikut diinputkan setelah bug host anda , and happy coding.

Catatan: NETDATA ditujukan untuk Bug host, CONNECT ditujukan untuk layer SS/VPN pastikan anda menambahkan fungsi tersebut, silahkan uwik uwik lagi ya. he he

Ya itu saja dulu ya postingan kali ini tentang Cara Buat Injek Delete Host dan Reset Limit All Operator Terbaru 2015 semoga bermanfaat dan terima kasih dan silahkan pelajari kembali.

Download Juga: Download Software ISPCE