2009-06-02 21 views
5

Qualcuno sa di esempi di un'applicazione proxy socket TCP scritta in Delphi? Sto creando una piccola applicazione broker che deve ascoltare le connessioni socket su una determinata porta TCP, leggere un pacchetto dati XML inviato tramite la connessione, servire la richiesta via TCP a un server scelto da un pool di server back-end disponibili e fornire la risposta risultante alla connessione TCP di origine.Proxy trasparente Delphi per una connessione TCP

Sono molto familiare con TCP e programmazione a livello socket, ma preferirei trovare codice di esempio come punto di partenza. Se c'è qualcosa a disposizione, risparmiarebbe molto tempo e fatica poiché non avrei bisogno di reinventare la ruota. Ricordo di aver visto un piccolo proxy TCP scritto in Delphi nel 2003/2004, ma sembra che abbia perso la traccia del link.

risposta

7

Stai cercando un'implementazione proxy per i calzini? In caso contrario, è sufficiente iniziare con un server (http potrebbe molto probabilmente essere un buon inizio) e creare in esso la capacità di elaborare il pacchetto di dati XML in entrata e effettuare le chiamate appropriate. Qualcosa come il framework Synapse renderebbe questo un progetto abbastanza semplice. Se prendi Synapse, scarica l'ultima versione da SVN. Supporta tutte le ultime versioni di Delphi.

C'è una demo httpproxy per synapse disponibile, che potrebbe essere di aiuto se si desidera implementare qualcosa di più tradizionale. È disponibile anche un buon server http iniziale example.

+0

Sì, io sto cercando un'implementazione socket TCP semplice. Il broker si troverà in realtà tra BizTalk e un sistema ERP, quindi so che il 100% dei dati è XML, ma non è incorniciato come una richiesta HTTP. Io uso Synapse sotto D2009 e darò un'occhiata al proxy HTTP. Grazie. –

-1

IPWorks di nSoftware deve essere considerato un'alternativa commerciale a Synapse. Hanno anche alcuni adattatori Biztalk disponibili.

Ho usato sia Synapse che IPWorks e sono entrambi abbastanza buoni. Non ho usato gli adattatori BizTalk di riferimento.

BizTalk Adapters

IPWorks

+0

Il nome di una suite di componenti non conta come un collegamento al codice di esempio, penso ... – reiniero

Problemi correlati