Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(Go) SSL Server ExampleDemonstrates how to create an SSL socket for accepting connections. This example is *very* simple in that it will create an SSL socket for accepting a single connection. It will read a message from the client, send a reply, and exit.
// This example requires the Chilkat API to have been previously unlocked. // See Global Unlock Sample for sample code. listenSslSocket := chilkat.NewSocket() // An SSL server needs a digital certificate. This example loads it from a PFX file. // Create an instance of a certificate store object, load a PFX file, // locate the certificate we need, and use it. // (a PFX file may contain more than one certificate.) certStore := chilkat.NewCertStore() // The 1st argument is the filename, the 2nd arg is the // PFX file's password: success := certStore.LoadPfxFile("chilkat.pfx","test") if success != true { fmt.Println(certStore.LastErrorText()) listenSslSocket.DisposeSocket() certStore.DisposeCertStore() return } // Find the certificate to be used for SSL: // cert is a Cert cert := certStore.FindCertBySubject("Chilkat Software, Inc.") if certStore.LastMethodSuccess() == false { fmt.Println(certStore.LastErrorText()) listenSslSocket.DisposeSocket() certStore.DisposeCertStore() return } // Use the certificate: success = listenSslSocket.InitSslServer(cert) if success != true { cert.DisposeCert() fmt.Println(listenSslSocket.LastErrorText()) listenSslSocket.DisposeSocket() certStore.DisposeCertStore() return } cert.DisposeCert() // Bind and listen on a port: myPort := 8123 // Allow for a max of 5 queued connect requests. backLog := 5 success = listenSslSocket.BindAndListen(myPort,backLog) if success != true { fmt.Println(listenSslSocket.LastErrorText()) listenSslSocket.DisposeSocket() certStore.DisposeCertStore() return } // If accepting an SSL/TLS connection, the SSL handshake is part of the connection // establishment process. This involves a few back-and-forth messages between the // client and server to establish algorithms and a shared key to create the secure // channel. The sending and receiving of these messages are governed by the // MaxReadIdleMs and MaxSendIdleMs properties. If these properties are set to 0 // (and this is the default unless changed by your application), then the // AcceptNextConnection can hang indefinitely during the SSL handshake process. // Make sure these properties are set to appropriate values before calling AcceptNextConnection. // Set a 10 second max for waiting to read/write. This is for the SSL/TLS handshake establishment. listenSslSocket.SetMaxReadIdleMs(10000) listenSslSocket.SetMaxSendIdleMs(10000) // Accept a single client connection and establish the secure SSL/TLS channel: // clientSock is a Socket maxWaitMillisec := 20000 clientSock := listenSslSocket.AcceptNextConnection(maxWaitMillisec) if listenSslSocket.LastMethodSuccess() == false { fmt.Println(listenSslSocket.LastErrorText()) listenSslSocket.DisposeSocket() certStore.DisposeCertStore() return } // The client (in this example) is going to send a "Hello Server! -EOM-" // message. Read it: receivedMsg := clientSock.ReceiveUntilMatch("-EOM-") if clientSock.LastMethodSuccess() != true { fmt.Println(clientSock.LastErrorText()) listenSslSocket.DisposeSocket() certStore.DisposeCertStore() return } fmt.Println(*receivedMsg) // Send a "Hello Client! -EOM-" message: success = clientSock.SendString("Hello Client! -EOM-") if success != true { fmt.Println(clientSock.LastErrorText()) listenSslSocket.DisposeSocket() certStore.DisposeCertStore() return } // Close the connection with the client // Wait a max of 20 seconds (20000 millsec) success = clientSock.Close(20000) clientSock.DisposeSocket() listenSslSocket.DisposeSocket() certStore.DisposeCertStore() |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.