Leadtools.Jpip.HttpServer Namespace > HttpClientRequest Class > HttpClientRequest Constructor : HttpClientRequest Constructor(IPEndPoint) |
public HttpClientRequest( IPEndPoint remoteEndPoint )
'Declaration Public Function New( _ ByVal remoteEndPoint As IPEndPoint _ )
'Usage Dim remoteEndPoint As IPEndPoint Dim instance As New HttpClientRequest(remoteEndPoint)
public HttpClientRequest( IPEndPoint remoteEndPoint )
function HttpClientRequest( remoteEndPoint )
public: HttpClientRequest( IPEndPoint^ remoteEndPoint )
Public Class HttpServerCommunication Private Sub ProcessClientRequests() Dim clientRequest As HttpClientRequest = Nothing Dim decoder As HttpRequestDecoder = Nothing Dim client As Socket client = GetClientSocket() clientRequest = New HttpClientRequest() Dim clientData As Byte() Dim received As Integer Do clientData = New Byte(client.ReceiveBufferSize - 1) {} received = client.Receive(clientData) clientRequest.Process(clientData, 0, received) Loop While clientRequest.Execute 'receive data until a complete request is received Console.WriteLine("Client request received: {0}", clientRequest.CompleteMessage) File.WriteAllBytes(Path.Combine(LEAD_VARS.ImagesDir, "ServerRequests.dat"), clientRequest.BodyData) decoder = New HttpRequestDecoder(clientRequest) Console.WriteLine("Server will process client image {0}", decoder.Fields.RequestTargetFields.Target) 'Process client request... '... client.Close() End Sub Private Function GetClientSocket() As Socket Dim listenSocket As Socket = New Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp) Dim hostIP As IPAddress = IPAddress.Parse("127.0.0.1") Dim port As Integer = 107 Dim ep As IPEndPoint = New IPEndPoint(hostIP, port) listenSocket.Bind(ep) ' start listening listenSocket.Listen(10) 'a client should send a request to the listening address Dim client As Socket = listenSocket.Accept() listenSocket.Close() Return client End Function End Class Public NotInheritable Class LEAD_VARS Public Const ImagesDir As String = "C:\Users\Public\Documents\LEADTOOLS Images" End Class
public void ProcessClientRequests() { #if LEADTOOLS_V175_OR_LATER Leadtools.Examples.Support.SetLicense(); #else Leadtools.Examples.Support.Unlock(); #endif // #if LEADTOOLS_V175_OR_LATER HttpClientRequest clientRequest = null; HttpRequestDecoder decoder = null; Socket client; client = GetClientSocket(); clientRequest = new HttpClientRequest(); byte[] clientData ; int received; do { clientData = new byte[client.ReceiveBufferSize]; received = client.Receive(clientData); clientRequest.Process(clientData, 0, received); } while (clientRequest.Execute); //receive data until a complete request is received Console.WriteLine( "Client request received: {0}", clientRequest.CompleteMessage); File.WriteAllBytes(Path.Combine(LEAD_VARS.ImagesDir, "ServerRequests.dat"), clientRequest.BodyData); decoder = new HttpRequestDecoder(clientRequest); Console.WriteLine( "Server will process client image {0}", decoder.Fields.RequestTargetFields.Target); //Process client request... client.Close(); } private Socket GetClientSocket() { Socket listenSocket = new Socket( AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp); IPAddress hostIP = IPAddress.Parse("127.0.0.1"); int port = 107; IPEndPoint ep = new IPEndPoint(hostIP, port); listenSocket.Bind(ep); // start listening listenSocket.Listen(10); //a client should send a request to the listening address Socket _client = listenSocket.Accept(); listenSocket.Close(); return _client; } static class LEAD_VARS { public const string ImagesDir = @"C:\Users\Public\Documents\LEADTOOLS Images"; }
Target Platforms: Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2