server_cluster_all_hosts (public)

 server_cluster_all_hosts

Defined in packages/acs-tcl/tcl/server-cluster-procs.tcl

Returns a list of all hosts in the server cluster, possibly including the current host.

Partial Call Graph (max 5 caller/called nodes):
%3 Class ::acs::Cluster Class ::acs::Cluster (public) server_cluster_all_hosts server_cluster_all_hosts Class ::acs::Cluster->server_cluster_all_hosts acs::Cluster instproc peer_nodes acs::Cluster instproc peer_nodes (protected) acs::Cluster instproc peer_nodes->server_cluster_all_hosts packages/acs-admin/www/cluster.tcl packages/acs-admin/ www/cluster.tcl packages/acs-admin/www/cluster.tcl->server_cluster_all_hosts parameter::get parameter::get (public) server_cluster_all_hosts->parameter::get server_cluster_enabled_p server_cluster_enabled_p (public) server_cluster_all_hosts->server_cluster_enabled_p

Testcases:
No testcase defined.
Source code:
    if { ![server_cluster_enabled_p] } {
        return {}
    }
    #
    # For now, include the CanonicalServer as well in the all_hosts
    # list, since the eases the configuration. Later, we might want to
    # have a canonical server, which is not a worker node, so it would
    # not need to receive all the cache-flush operations.
    #
    set canonicalServer [acs::cluster eval {
        :preferred_location [:qualified_location  [parameter::get -package_id $::acs::kernel_id -parameter CanonicalServer]]
    }]
    set nodes [lsort -unique [concat  $canonicalServer  [parameter::get -package_id $::acs::kernel_id -parameter ClusterPeerIP]  [parameter::get -package_id $::acs::kernel_id -parameter DynamicClusterPeers] ]]

    #ns_log notice "server_cluster_all_hosts returns <$nodes>"
    return $nodes
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: