TclHTTPS: Difference between revisions

From EggWiki
Jump to navigation Jump to search
No edit summary
No edit summary
 
Line 18: Line 18:
putlog [http::data $req]
putlog [http::data $req]
</pre>
</pre>
see also https://tcl.tk/man/tcl8.6/TclCmd/http.htm#M50

Latest revision as of 20:38, 4 May 2024

The http package is a common package required by Tcl scripts that need to connect to websites. However, the "default" commands don't make it easy to understand how to connect to an https website instead of an http website, and will often generate an error if the user tries to do so. Below is an example of how to do so.

NOTE: You have to install both the http AND tls Tcl libraries on the host for this to work- on Debian-based systems, this is done by an administrator running sudo apt-get install tcl-tls. The http package comes standard with Tcl; you shouldn't need to install it separately.

To connect to a webpage and display its contents, you can use the following code example:

package require http
package require tls

http::register https 443 [list ::tls::socket -autoservername true]
catch {set req [http::geturl https://my.secure.site/ -timeout 10000]} error    
set status [http::status $req]
if {$status != "ok"} {
  putlog "HTTP request error: $error"
  return
}
putlog [http::data $req]

see also https://tcl.tk/man/tcl8.6/TclCmd/http.htm#M50