ds_collection_enabled_p (public)

 ds_collection_enabled_p

Defined in packages/acs-developer-support/tcl/acs-developer-support-procs.tcl

Returns whether we're collecting information about this request

Partial Call Graph (max 5 caller/called nodes):
%3 test_ds_features_enabled_test ds_features_enabled_test (test acs-developer-support) ds_collection_enabled_p ds_collection_enabled_p test_ds_features_enabled_test->ds_collection_enabled_p ad_conn ad_conn (public) ds_collection_enabled_p->ad_conn ds_add ds_add (public) ds_add->ds_collection_enabled_p ds_collect_connection_info ds_collect_connection_info (public) ds_collect_connection_info->ds_collection_enabled_p ds_collect_db_call ds_collect_db_call (public) ds_collect_db_call->ds_collection_enabled_p ds_get_db_command_info ds_get_db_command_info (private) ds_get_db_command_info->ds_collection_enabled_p ds_get_page_serve_time_ms ds_get_page_serve_time_ms (private) ds_get_page_serve_time_ms->ds_collection_enabled_p

Testcases:
ds_features_enabled_test
Source code:
    if { [info exists ::ad_conn(ds_collection_enabled_p)] } {
        return $::ad_conn(ds_collection_enabled_p)
    }
    if { ![info exists ::ad_conn(request)] } {
        return 0
    }
    foreach pattern [nsv_get ds_properties enabled_ips] {
        if { [string match $pattern [ad_conn peeraddr]] } {
            set ::ad_conn(ds_collection_enabled_p) 1
            return 1
        }
    }
    set ::ad_conn(ds_collection_enabled_p) 0
    return 0
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: