Sample code for 30+ languages & platforms
Tcl

Receive an Exact Number of Bytes as Encoded Text

See more Socket/SSL/TLS Examples

Demonstrates Socket.ReceiveNBytesENC, which receives exactly the requested number of bytes and returns them encoded using a named encoding. It waits until the full count is received.

Background. Inactivity is controlled by MaxReadIdleMs: the call fails if incoming bytes halt for longer than MaxReadIdleMs milliseconds before the full amount is received. The ENC methods move raw binary data to and from printable text using a named encoding such as base64 or hex.

Chilkat Tcl Downloads

Tcl

load ./chilkat.dll

set success 0

set socket [new_CkSocket]

#  Connect to the server using TLS.
set bTls 1
set maxWaitMs 5000
set success [CkSocket_Connect $socket "example.com" 5000 $bTls $maxWaitMs]
if {$success == 0} then {
    puts [CkSocket_lastErrorText $socket]
    delete_CkSocket $socket
    exit
}

#  MaxReadIdleMs controls the inactivity limit for receiving.  The ReceiveNBytesENC call will fail if
#  incoming bytes halt for longer than this many milliseconds before the full amount is received.
CkSocket_put_MaxReadIdleMs $socket 15000

#  Receive exactly the requested number of bytes and return them encoded using the named encoding.
#  Unlike ReceiveBytesENC, this waits until the full count has been received.
set hex [CkSocket_receiveNBytesENC $socket 16 "hex"]
if {[CkSocket_get_LastMethodSuccess $socket] == 0} then {
    puts [CkSocket_lastErrorText $socket]
    delete_CkSocket $socket
    exit
}

puts "$hex"

delete_CkSocket $socket