ForNesia Forum > Library and Knowledge Center > Tutorials > SOLVED Bagaimana Menerapkan X-Forwarded.. Di TCP delphi
ForNesia Forum > Library and Knowledge Center > Tutorials > SOLVED Bagaimana Menerapkan X-Forwarded.. Di TCP delphi

Thread Closed
Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5

[Solved] Bagaimana Menerapkan X-Forwarded.. Di TCP delphi
start_J Offline
HunteR
*
HunteR
Posts: 51
Threads: 7
Joined: May 2014
Reputation:
FCoin: 2ƒc
Thanks Received: 0
#1
05-25-2014, 02:42 PM (This post was last modified: 05-29-2014, 04:12 PM by start_J.)
Hai sobat , saya mau bertanya bagaimana cara menerapkan beberapa hal ini ke dalam tcp di inject isat

GET
HTTP/1.1
Host: mmsc.Cesar.com
User-Agent: Mozilla/5.0 (Windows NT 5.1; rv:20.0) Gecko/20100101 Firefox/20.0
Accept: */* + X-Forwarded-For: 10.19.19.19
X-Remote-IP: 10.xx.xx.xx.xx
X-Originating-IP: 127.0.0.1
X-Remote-Addr: 202.93.36.12
X-Remote-IP: * or #0 or #10
Connection: Keep-Alive

jangan bilang" ya ini hasil intip dari software injeck orang sih gosip:
>>>>start_J coment everywhere<<<<

Website Find
arya123 Offline
Baru Belajar
*
Registered
Posts: 9
Threads: 0
Joined: Feb 2014
Reputation:
FCoin: 2ƒc
Thanks Received: 0
#2
05-25-2014, 06:22 PM
if Pos('CONNECT',AThread.NetData)<>0 then
Mungkin kayak gini kali ya CMIW
send:= AThread.NetData GET http://BUG/ HTTP/1.1' +#13#10;
AThread.NetData := AddHeader(AThread.NetData,'User-Agent: xxxxxxx'#13#10);
AThread.NetData := AddHeader(AThread.NetData,'Proxy-Connection: Keep-alive'#13#10);
AThread.NetData := AddHeader(AThread.NetData,'Connection: Keep-Alive'#13#10);
AThread.NetData := AddHeader(AThread.NetData,'X-Remote-IP: xxxxxxx#13#10);
AThread.NetData := AddHeader(AThread.NetData,'X-Originating-IP: xxxxxxx'#13#10);
AThread.NetData := AddHeader(AThread.NetData,'X-Remote-Addr: xxxxxxx'#13#10);
AThread.NetData := AddHeader(AThread.NetData,'X-Remote-IP: * or #0 or #10');
AThread.NetData := send+AThread.NetData;
Website Find
start_J Offline
HunteR
*
HunteR
Posts: 51
Threads: 7
Joined: May 2014
Reputation:
FCoin: 2ƒc
Thanks Received: 0
#3
05-25-2014, 07:43 PM (This post was last modified: 05-25-2014, 08:00 PM by start_J.)
ok dicoba gan ketawaaa
makasih bgett
(05-25-2014, 06:22 PM)arya123 Wrote: if Pos('CONNECT',AThread.NetData)<>0 then
Mungkin kayak gini kali ya CMIW
send:= AThread.NetData GET http://BUG/ HTTP/1.1' +#13#10;
AThread.NetData := AddHeader(AThread.NetData,'User-Agent: xxxxxxx'#13#10);
AThread.NetData := AddHeader(AThread.NetData,'Proxy-Connection: Keep-alive'#13#10);
AThread.NetData := AddHeader(AThread.NetData,'Connection: Keep-Alive'#13#10);
AThread.NetData := AddHeader(AThread.NetData,'X-Remote-IP: xxxxxxx#13#10);
AThread.NetData := AddHeader(AThread.NetData,'X-Originating-IP: xxxxxxx'#13#10);
AThread.NetData := AddHeader(AThread.NetData,'X-Remote-Addr: xxxxxxx'#13#10);
AThread.NetData := AddHeader(AThread.NetData,'X-Remote-IP: * or #0 or #10');
AThread.NetData := send+AThread.NetData;
erorr gan saya coba sepertinya karna ada addheader itu gan
>>>>start_J coment everywhere<<<<

Website Find
ervan329 Offline
HunteR
*
HunteR
Posts: 76
Threads: 0
Joined: Mar 2014
Reputation:
FCoin: 2ƒc
Thanks Received: 0
#4
05-25-2014, 09:10 PM
error mungkin kurang ini

function AddHeader(S, Header:string):string;
begin
S:= StringReplace(S, #13#10 + #13#10, #13#10 + Header + #13#10 + #13#10, [rfReplaceAll]);
Result:= S;
end;
mungkin kita hidup untuk mencari jawaban tentang pertanyaan "untuk apa kita hidup"
Website Find
arya123 Offline
Baru Belajar
*
Registered
Posts: 9
Threads: 0
Joined: Feb 2014
Reputation:
FCoin: 2ƒc
Thanks Received: 0
#5
05-25-2014, 09:37 PM
kalo ga pake header mungkin bisa d coba lngsung d pilotnya gan
pilot:= GETS http://BUG/ HTTP/1.1' +#13#10'Proxy-Connection: Keep-alive'#13#10'Connection: Keep-Alive'#13#10'X-Remote-IP: xxxxxx#13#10'X-Originating-IP: 127.0.0.1'#13#10'X-Remote-Addr: xxxxxx#13#10'Host: xxxxxx#13#10#13#10 ........dst;
AThread.NetData := AThread.NetData + send ;
Website Find
start_J Offline
HunteR
*
HunteR
Posts: 51
Threads: 7
Joined: May 2014
Reputation:
FCoin: 2ƒc
Thanks Received: 0
#6
05-26-2014, 07:54 AM (This post was last modified: 05-26-2014, 07:58 AM by start_J.)
(05-25-2014, 09:10 PM)ervan329 Wrote: error mungkin kurang ini

function AddHeader(S, Header:string):string;
begin
S:= StringReplace(S, #13#10 + #13#10, #13#10 + Header + #13#10 + #13#10, [rfReplaceAll]);
Result:= S;
end;

itu naroknya di mana mas ? jadi kalo di gabungin ? :s
(05-25-2014, 09:37 PM)arya123 Wrote: kalo ga pake header mungkin bisa d coba lngsung d pilotnya gan
pilot:= GETS http://BUG/ HTTP/1.1' +#13#10'Proxy-Connection: Keep-alive'#13#10'Connection: Keep-Alive'#13#10'X-Remote-IP: xxxxxx#13#10'X-Originating-IP: 127.0.0.1'#13#10'X-Remote-Addr: xxxxxx#13#10'Host: xxxxxx#13#10#13#10 ........dst;
AThread.NetData := AThread.NetData + send ;

sudah mas dan hasilnya masih limit gan .. skedar info inject yang saya initip adalah IDN N-P ketawaaa
dan katanya bocorannya masang itunya perbaris gan , ada solusi lagi gan?wah:
>>>>start_J coment everywhere<<<<

Website Find
arya123 Offline
Baru Belajar
*
Registered
Posts: 9
Threads: 0
Joined: Feb 2014
Reputation:
FCoin: 2ƒc
Thanks Received: 0
#7
05-26-2014, 12:58 PM
coba tmbahin Accept: */*'#13#10 d ane pake ini lolos limit Smile

Sent from my Andromax AD682J using Tapatalk
Website Find
start_J Offline
HunteR
*
HunteR
Posts: 51
Threads: 7
Joined: May 2014
Reputation:
FCoin: 2ƒc
Thanks Received: 0
#8
05-26-2014, 01:27 PM (This post was last modified: 05-26-2014, 01:30 PM by start_J.)
(05-26-2014, 12:58 PM)arya123 Wrote: coba tmbahin Accept: */*'#13#10 d ane pake ini lolos limit Smile

Sent from my Andromax AD682J using Tapatalk

coba tulis yg lengkap dong gan di mari gmna isi tcpnya dari begin mpe end ketawaaa
>>>>start_J coment everywhere<<<<

Website Find
Kizuma Wa Offline
HunteR
*
HunteR
Posts: 70
Threads: 2
Joined: Mar 2014
Reputation:
FCoin: 2.46ƒc
Thanks Received: 1
#9
05-26-2014, 03:01 PM
qaqa , net Data disble sama back gmna ya ?
Kizuma Wa, proud to be a member of ForNesia Family since Mar 2014.
Website Find
ranay Offline
FNS MEMBER
**
FNS Member
Posts: 314
Threads: 31
Joined: Feb 2014
Reputation:
FCoin: 2ƒc
Thanks Received: 0
#10
05-26-2014, 04:17 PM
payload bysa ditambah Accept: */* sudah lolos limit
ranay, proud to be a member of ForNesia Family since Feb 2014.
Website Find
start_J Offline
HunteR
*
HunteR
Posts: 51
Threads: 7
Joined: May 2014
Reputation:
FCoin: 2ƒc
Thanks Received: 0
#11
05-26-2014, 05:29 PM
(05-26-2014, 04:17 PM)ranay Wrote: payload bysa ditambah Accept: */* sudah lolos limit

gimana tu master nambahinnya di mana examplenya dong ? wah:
>>>>start_J coment everywhere<<<<

Website Find
sugetzhu Offline
Banned
Banned
Posts: 69
Threads: 4
Joined: Jan 2014
FCoin: 2ƒc
Thanks Received: 0
#12
05-26-2014, 09:01 PM
ngak usah pake x-remote cukup nambahin Usr agent plus Accept: */* itu sudah lolos limit gan..
Website Find
start_J Offline
HunteR
*
HunteR
Posts: 51
Threads: 7
Joined: May 2014
Reputation:
FCoin: 2ƒc
Thanks Received: 0
#13
05-26-2014, 10:51 PM
(05-26-2014, 09:01 PM)sugetzhu Wrote: ngak usah pake x-remote cukup nambahin Usr agent plus Accept: */* itu sudah lolos limit gan..

ok gan nih dah berhasil bebas limit :dodgy:sekarang masalahnya masih slow respon alias klau download masih kadang" bengong baru lanjut ::huh:
>>>>start_J coment everywhere<<<<

Website Find
RangerTI Offline
Baru Belajar
*
Registered
Posts: 7
Threads: 0
Joined: Mar 2014
Reputation:
FCoin: 2ƒc
Thanks Received: 0
#14
Wink  05-27-2014, 05:59 PM (This post was last modified: 05-27-2014, 06:06 PM by RangerTI.)
Punya saya begini Gan ,,, tapi sering DC
Register or login to see this content

Silahkan dikembangkan
Website Find
start_J Offline
HunteR
*
HunteR
Posts: 51
Threads: 7
Joined: May 2014
Reputation:
FCoin: 2ƒc
Thanks Received: 0
#15
05-28-2014, 07:28 PM (This post was last modified: 05-29-2014, 03:50 PM by start_J.)
(05-27-2014, 05:59 PM)RangerTI Wrote: Punya saya begini Gan ,,, tapi sering DC


Silahkan dikembangkan

makasih gan,
>>>>start_J coment everywhere<<<<

Website Find
0n3phr34k Offline
HunteR
*
HunteR
Posts: 57
Threads: 5
Joined: May 2014
Reputation:
FCoin: 2ƒc
Thanks Received: 0
#16
05-29-2014, 01:20 AM
joss,,, om,, ane make langsung main di pilot aja,, hasilnya mantap..


[Image: 10259775_684209061615308_902496925663929615_n.jpg]
0n3phr34k, proud to be a member of ForNesia Family since May 2014.
Website Find
Kizuma Wa Offline
HunteR
*
HunteR
Posts: 70
Threads: 2
Joined: Mar 2014
Reputation:
FCoin: 2.46ƒc
Thanks Received: 1
#17
05-29-2014, 01:29 PM
punya saya ini yg salah apa yo klo menerapkan X-Forward kok kgk jalan :'(

procedure TForm1.IdMappedPortTCP1Execute(AThread: TIdMappedPortThread);
var payload : string;
begin
upload:= upload+Length(AThread.NetData);
if Pos('CONNECT',AThread.NetData)<>0 then begin
payload:= AThread.NetData+'GET http:///BUG/ HTTP/1.1' +#13#10;
AThread.NetData := AddHeader(AThread.NetData,'User-Agent: Mozilla/5.0 (Windows NT 5.1; rv:20.0) Gecko/20100101 Firefox/20.0'#13#10);
AThread.NetData := AddHeader(AThread.NetData,'Proxy-Connection: Keep-alive'#13#10);
AThread.NetData := AddHeader(AThread.NetData,'Connection: Keep-Alive'#13#10);
AThread.NetData := AddHeader(AThread.NetData,'X-Remote-IP: 10.19.19.19'#13#10);
AThread.NetData := AddHeader(AThread.NetData,'X-Originating-IP: 127.0.0.1'#13#10);
AThread.NetData := AddHeader(AThread.NetData,'X-Remote-Addr: 202.93.36.12'#13#10);
AThread.NetData := AddHeader(AThread.NetData,'X-Remote-IP: * or #0 or #10');
Athread.NetData := AddHeader(Athread.NetData,'Accept: */*'#13#10);
AThread.NetData := payload+AThread.NetData;
end;
end;
Kizuma Wa, proud to be a member of ForNesia Family since Mar 2014.
Website Find
0n3phr34k Offline
HunteR
*
HunteR
Posts: 57
Threads: 5
Joined: May 2014
Reputation:
FCoin: 2ƒc
Thanks Received: 0
#18
05-29-2014, 01:37 PM
(05-29-2014, 01:29 PM)Kizuma Wa Wrote: punya saya ini yg salah apa yo klo menerapkan X-Forward kok kgk jalan :'(

procedure TForm1.IdMappedPortTCP1Execute(AThread: TIdMappedPortThread);
var payload : string;
begin
upload:= upload+Length(AThread.NetData);
if Pos('CONNECT',AThread.NetData)<>0 then begin
payload:= AThread.NetData+'GET http:///BUG/ HTTP/1.1' +#13#10;
AThread.NetData := AddHeader(AThread.NetData,'User-Agent: Mozilla/5.0 (Windows NT 5.1; rv:20.0) Gecko/20100101 Firefox/20.0'#13#10);
AThread.NetData := AddHeader(AThread.NetData,'Proxy-Connection: Keep-alive'#13#10);
AThread.NetData := AddHeader(AThread.NetData,'Connection: Keep-Alive'#13#10);
AThread.NetData := AddHeader(AThread.NetData,'X-Remote-IP: 10.19.19.19'#13#10);
AThread.NetData := AddHeader(AThread.NetData,'X-Originating-IP: 127.0.0.1'#13#10);
AThread.NetData := AddHeader(AThread.NetData,'X-Remote-Addr: 202.93.36.12'#13#10);
AThread.NetData := AddHeader(AThread.NetData,'X-Remote-IP: * or #0 or #10');
Athread.NetData := AddHeader(Athread.NetData,'Accept: */*'#13#10);
AThread.NetData := payload+AThread.NetData;
end;
end;

coba gabungin ke payload aja deh x-forward nya,,
0n3phr34k, proud to be a member of ForNesia Family since May 2014.
Website Find
  
Thread Closed


Possibly Related Threads…
Thread Author Replies Views Last Post
  [ASK] Bagaimana cara mengatasi flashdisk yang tidak bisa diformat Kesz24 25 5,732 11-06-2015, 11:09 AM
Last Post: Kesz24
  [ASK] Bagaimana cara bypass survey??? Afnan 34 7,666 10-23-2015, 06:21 PM
Last Post: otoq