For help, how can I use TIcsproxy?

[yshejia 0]

I am using icsproxy component to proxy forward eth mining data. But I want to modify the data in the "icsproxydatasendtar" and "icsproxydatarecvtar" events and then forward it. How to operate? Can you give me a simple example?

[FPiette 385]

Did you read the explanation that is in TIcsProxy source code ?

[yshejia 0]

1 hour ago, FPiette said:

Did you read the explanation that is in TIcsProxy source code ?

I read the comments in ticsprox and "targetbufxmit" and "sourcebufxmit", but I'm not sure how to deal with "dataptr: = @ ftarbuffer [0]". I even modified the source code of icsproxy, "procedure icsproxydatarecvtar (sender: tobject; proxyclient: tproxyclient; VAR dataptr: pointer; VAR datalen: integer);", Although I finally modified the data, I always felt that there was a simpler way.

[yshejia 0]

Just now, yshejia said:

I read the comments in ticsprox and "targetbufxmit" and "sourcebufxmit", but I'm not sure how to deal with "dataptr: = @ ftarbuffer [0]". I even modified the source code of icsproxy, "procedure icsproxydatarecvtar (sender: tobject; proxyclient: tproxyclient; VAR dataptr: pointer; VAR datalen: integer);", Although I finally modified the data, I always felt that there was a simpler way.

================Here's how I use it====================

 

procedure TFrmMain.IcsProxyDataSendTar(Sender: TObject; ProxyClient: TProxyClient; var DataPtr: Pointer; var DataLen: Integer);
var
  CMDData: TBytes;
  CMDStr: string;
begin

  CMDData := TBytes(DataPtr);
  SetLength(CMDData, DataLen);
  CMDStr := TEncoding.Default.GetString(CMDData);

  //Here, I will modify the content of "cmdstr"

  CMDStr := ReplaceText(CMDStr, "A", "B");

 

  CMDData := TEncoding.Default.GetBytes(CMDStr);
  DataLen := Length(CMDData);
  DataPtr := @CMDData[0];

end;

============================================================

[Angus Robertson 577]

Please stop sending your comments as private messages as well, I do read this forum, when I'm in the office.

 

Why do you specifically want to use OnDataSendTar and OnDataRevcTar events, they are very low level.

 

If you want to modify headers and/or body, you should be using onHttpReqBody, onHttpRespBody, onHttpReqHdr, onHttpRespHdr, which have a simple String property you can update.  

 

If you change the body length, you map also need to change header fields.

 

Angus

 

[yshejia 0]

32 minutes ago, Angus Robertson said:

Please stop sending your comments as private messages as well, I do read this forum, when I'm in the office.

 

Why do you specifically want to use OnDataSendTar and OnDataRevcTar events, they are very low level.

 

If you want to modify headers and/or body, you should be using onHttpReqBody, onHttpRespBody, onHttpReqHdr, onHttpRespHdr, which have a simple String property you can update.  

 

If you change the body length, you map also need to change header fields.

 

Angus

 

I use the "ticsproxy" component, not "ticshttpproxy", because the packets I want to process are TCP protocol, not HTTP protocol. I try to use ticshttpproxy, but I can't receive anything in httpreqbody, httprespbody, httpreqhdr and httpresphdr events

[FPiette 385]

26 minutes ago, yshejia said:

because the packets I want to process are TCP protocol, not HTTP protocol.

For your information, HTTP is based on TCP as many other high level protocols such as FTP, SMTP, POP3 and more.

 

You are right that the HTTP proxy will only work for HTTP. Maybe you can have a look at it to understand how it works?

Or you have to study how TIcsProxy: you have full source code.

 

[Angus Robertson 577]

So there is no HTML and your questions are not really about our proxy, but just how to convert a binary buffer into a string, for which you can use IcsMoveTBytesToString and IcsMoveStringToTBytes which is what the proxy uses. 

 

Angus

 

[yshejia 0]

On 1/19/2022 at 10:00 PM, Angus Robertson said:

So there is no HTML and your questions are not really about our proxy, but just how to convert a binary buffer into a string, for which you can use IcsMoveTBytesToString and IcsMoveStringToTBytes which is what the proxy uses. 

 

Angus

 

Thank you very much. I have done some wh on the basis of the source code