apm_invoke_install_proc (public)

 apm_invoke_install_proc [ -install_from_repository ] [ -type type ] \
    -node node

Defined in packages/acs-tcl/tcl/apm-install-procs.tcl

read an XML install element and invoke the appropriate processing procedure.

Switches:

-install_from_repository

(boolean) (optional)

-type

(defaults to "action") (optional)

the type of element to search for

-node

(required)

the XML node to process

Returns:

the result of the invoked proc

Author:

Lee Denison

Created:

2004-06-16

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

Testcases:

No testcase defined.

Source code:

    set name [xml_node_get_name $node]
    set command [namespace which ::install::xml::${type}::${name}]

    if {$command eq ""} {
        error "Error: got bad node \"$name\""
    }

    #ns_log notice "apm_invoke_install_proc: call [list ::install::xml::${type}::${name} $node]"
    if {$install_from_repository_p && $name eq "install"} {
        ns_log notice "apm_invoke_install_proc: skip [list ::install::xml::${type}::${name} $node] (install from repo)"
        set result 1
    } else {
        set result [::install::xml::${type}::${name} $node]
    }
    return $result

Generic XQL file:

packages/acs-tcl/tcl/apm-install-procs.xql

PostgreSQL XQL file:

packages/acs-tcl/tcl/apm-install-procs-postgresql.xql

Oracle XQL file:

packages/acs-tcl/tcl/apm-install-procs-oracle.xql