subsite::upload_allowed (public)

 subsite::upload_allowed

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

Verifies SolicitPortraitP parameter to ensure upload portrait security.

Author:

Hector Amado <hr_amado@galileo.edu>

Created:

2004-06-16

Testcases:

No testcase defined.

Source code:

    set package_id [ad_conn subsite_id]

    if { ![parameter::get -package_id $package_id -parameter SolicitPortraitP -default 1]  } {
        if { ![acs_user::site_wide_admin_p] } {
            ns_log notice "user is tried to see user/portrait/upload without permission"
            ad_return_forbidden  "Permission Denied"  "<blockquote>You don't have permission to see this page.</blockquote>"
            ad_script_abort
        }
    }

XQL Not present:

Generic

PostgreSQL XQL file:

packages/acs-subsite/tcl/subsite-procs-postgresql.xql

Oracle XQL file:

packages/acs-subsite/tcl/subsite-procs-oracle.xql