util::split_host (public)

 util::split_host hostspec hostnameVar portVar

Defined in packages/acs-tcl/tcl/utilities-procs.tcl

Split host potentially into a hostname and a port

Parameters:

hostspec (required)

hostnameVar (required)

portVar (required)

Partial Call Graph (max 5 caller/called nodes):

Testcases:

No testcase defined.

Source code:

    upvar $hostnameVar hostname $portVar port
    if {![regexp {^(.*):(\d+)$} $hostspec . hostname port]} {
        set port ""
        set hostname $hostspec
    }
    regexp {^\[(.+)\]$} $hostname . hostname

XQL Not present:

PostgreSQL, Oracle

Generic XQL file:

packages/acs-tcl/tcl/utilities-procs.xql