Transparent Delphi proxy for TCP connection

Does anyone know of any TCP socket proxy examples written in Delphi? I am creating a small broker application that needs to listen on socket connections on a given TCP port, read the XML data packet sent over the connection, serve the request through TCP to a server selected from the pool of available server servers, and deliver the resulting response back to the original TCP compound.

I am very familiar with programming at the TCP and socket level, but would prefer to find sample code as a starting point. If there is something available, it will save a lot of time and effort, since I do not need to reinvent the wheel. I remember that I saw a small TCP proxy written in Delphi back in 2003/2004, but it seems to have lost the link to the link.

+5
source share
2 answers

Are you looking for a socks proxy implementation? If not, just start from the server (http is likely to be a good start) and make it possible to process the incoming XML data packet and make the appropriate calls. Something like a Synapse structure would make this a pretty simple project. If you capture Synapse, get the latest version from SVN. It supports all latest Delphi versions.

There is a demo version of httpproxy for the synapse, which can help if you want to implement something more traditional. A good http start server is also available.

+7
source

IPWorks nSoftware Synapse. Biztalk.

Synapse, IPWorks, . BizTalk.

BizTalk Adapters

IPWorks

-1

All Articles