site_node::exists_p (public)

 site_node::exists_p -url url

Defined in packages/acs-tcl/tcl/site-nodes-procs.tcl

Returns 1 if a site node exists at the given url and 0 otherwise.

Switches:

-url

(required)

URL path starting with a slash.

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

Testcases:

site_node_verify_folder_name, xowiki_test_cases

Source code:

    set url_no_trailing [expr {$url eq "/" ? "/" : [string trimright $url "/"]}]
    #
    # The function "get_node_id" returns always a node_id, which
    # might be the node_id of the root. In order to check, whether
    # the provided URL is really a site-node, we do an inverse
    # lookup and check whether the returned node_id has the same
    # URL as the provided one.
    #
    set node_id [::acs::site_node get_node_id -url $url_no_trailing]
    return [expr {[::acs::site_node get_url -node_id $node_id] eq "$url_no_trailing/"}]

Generic XQL file:

packages/acs-tcl/tcl/site-nodes-procs.xql

PostgreSQL XQL file:

packages/acs-tcl/tcl/site-nodes-procs-postgresql.xql

Oracle XQL file:

packages/acs-tcl/tcl/site-nodes-procs-oracle.xql