ad_page_contract_filter_proc_html (public)

 ad_page_contract_filter_proc_html name value_varname

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

Checks whether the value contains naughty HTML

Parameters:
name
value_varname
Author:
Lars Pind <lars@pinds.com>
Created:
25 July 2000

Partial Call Graph (max 5 caller/called nodes):
%3 test_ad_page_contract_filters ad_page_contract_filters (test acs-tcl) ad_page_contract_filter_proc_html ad_page_contract_filter_proc_html test_ad_page_contract_filters->ad_page_contract_filter_proc_html ad_complain ad_complain (public) ad_page_contract_filter_proc_html->ad_complain ad_html_security_check ad_html_security_check (public) ad_page_contract_filter_proc_html->ad_html_security_check

Testcases:
ad_page_contract_filters
Source code:
upvar $value_varname value

    set naughty_prompt [ad_html_security_check $value]
    if { $naughty_prompt ne "" } {
        ad_complain $naughty_prompt
        return 0
    }
    return 1
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: