Tcl

HTTPS Requests over Squid Proxy Direct TLS Connection

See more HTTP Examples

Demonstrates how to send HTTP requests through an HTTP proxy that supports Direct TLS Connections. (Chilkat tests with a squid 4.11 proxy.)

A direct TLS connection to an HTTP proxy is where the initial connection to the proxy server is TLS.

Note: This example requires Chilkat v9.5.0.83 or greater.

Tcl

load ./chilkat.dll

# This example requires the Chilkat API to have been previously unlocked.
# See Global Unlock Sample for sample code.

set http [new_CkHttp]

# Set the HTTP proxy domain or IP address.
CkHttp_put_ProxyDomain $http "172.16.16.46"
# The proxy port..
CkHttp_put_ProxyPort $http 3128

# Indicate that we are to use a direct TLS connection with the HTTP proxy
# (we use a Squid Cache: Version 4.11 for testing)
CkHttp_put_ProxyDirectTls $http 1

# If the proxy requires a login or password, we can set it here.
# Otherwise comment out these lines.
CkHttp_put_ProxyLogin $http "myProxyLogin"
CkHttp_put_ProxyPassword $http "myProxyPassword"

# All requests sent on the http object will now go through the proxy.
# Give it a test:
set s [CkHttp_quickGetStr $http "https://www.chilkatsoft.com/helloWorld.html"]
if {[CkHttp_get_LastMethodSuccess $http] == 0} then {
    puts [CkHttp_lastErrorText $http]
    delete_CkHttp $http
    exit
}

# The LastErrorText property also contains information when method call succeeds.
# Have a look to see that the request was sent through the proxy:
puts [CkHttp_lastErrorText $http]

puts "---"
puts "$s"
puts "---"
puts "Success for TLS destination over direct TLS HTTP proxy."

delete_CkHttp $http