server_cluster_authorized_p

one of the documented procedures in this installation of the ACS
Usage:
server_cluster_authorized_p   ip
What it does:
Can a request coming from $ip be a valid cluster request, i.e., matches some value in ClusterIPMask or is 127.0.0.1?
Defined in: /web/philip/tcl/ad-server-cluster.tcl

Source code:


    if { ![server_cluster_enabled_p] } {
	return 0
    }

    if { $ip == "127.0.0.1" } {
	return 1
    }
    # lsearch -glob appears to crash AOLserver 2. Oh well.
    foreach glob [ad_parameter_all_values_as_list ClusterAuthorizedIP server-cluster] {
	if { [string match $glob $ip] } {
	    return 1
	}
    }
    return 0


philg@mit.edu