ad_verify_install (public)

 ad_verify_install

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

Returns 1 if the acs is properly installed, 0 otherwise.

Partial Call Graph (max 5 caller/called nodes):
%3 packages/acs-bootstrap-installer/bootstrap.tcl packages/acs-bootstrap-installer/ bootstrap.tcl ad_verify_install ad_verify_install packages/acs-bootstrap-installer/bootstrap.tcl->ad_verify_install ad_acs_administrator_exists_p ad_acs_administrator_exists_p (private) ad_verify_install->ad_acs_administrator_exists_p apm_package_installed_p apm_package_installed_p (public) ad_verify_install->apm_package_installed_p db_table_exists db_table_exists (public) ad_verify_install->db_table_exists

Testcases:
No testcase defined.
Source code:
    # Define util_memoize with proc here to avoid error messages about multiple
    # defines.
    if { ![db_table_exists apm_packages] || ![db_table_exists site_nodes] } {
        ns_log warning "ad_verify_install: apm_packages [db_table_exists apm_packages] site_nodes [db_table_exists site_nodes]"
        proc util_memoize {script {max_age ""}} {{*}$script}
        return 0
    }
    set kernel_install_p [apm_package_installed_p acs-kernel]
    set admin_exists_p [ad_acs_administrator_exists_p]

    if { $kernel_install_p && $admin_exists_p} {
        return 1
    } else {
        ns_log warning "ad_verify_install: kernel_install_p $kernel_install_p admin_exists_p $admin_exists_p"
        proc util_memoize {script {max_age ""}} {{*}$script}
        return 0
    }
XQL Not present:
Generic
PostgreSQL XQL file:
packages/acs-tcl/tcl/acs-kernel-procs-postgresql.xql

Oracle XQL file:
packages/acs-tcl/tcl/acs-kernel-procs-oracle.xql

[ hide source ] | [ make this the default ]
Show another procedure: