[ Previous ] [ Contents ] [ Index ] [ Next ]

ns_register_filter

Overview

Register a filter function for a method/URL combination

Syntax

ns_register_filter when method URLpattern script ?args?

proc script {?conn? args why} {

...

}

Description

ns_register_filter registers a Tcl filter script for the specified method/URL combination on a virtual server. The script can be called at one or more of three given times: pre-authorization, post-authorization before page data has been returned to the user, and after the connection has been processed and closed.

This function will be called at the specified stage of a connection, if the method/URL combination for the filter matches the method/URL combination for the connection using glob style matching.

The URLpattern can contain standard string-matching characters. For example, these are valid URLpatterns:

    /employees/*.tcl
    /accounts/*/out

Valid values for the when argument are: preauth, postauth, and trace.

Using pre-authorization, the procedure will be called (assuming that the method/URL combination matches) just before authorization. If the procedure returns with a code of:

Using post-authorization, the procedure will be called (assuming that the method/URL combination matches) just after successful authorization. If the procedure returns:

Using trace, the procedure will be called (assuming that the method/URL combination match) after the connection has been totally processed and closed. If the procedure returns:

Syntax for the registered procedure:

The conn (connection) argument is optional for procedures registered by ns_register_filter if the procedure has 1 or 2 arguments (including why but not including conn). The following examples show the variations that can be used in this case:

    ns_register_filter trace GET /noargs filter_noargs
    ns_register_filter trace GET /context filter_context fnord
    ns_register_filter trace GET /conncontext filter_conncontext
    proc filter_noargs { why } {
        ns_log Notice "filter noargs"
        return filter_ok
    } ;# filter_noargs
    proc filter_context { arg why } {
        ns_log Notice "filter context. Arg: $arg"
        return filter_ok
    } ;# filter_noargs
    proc filter_conncontext { conn arg why } {
        ns_log Notice "filter conn context"
        return filter_ok
    } ;# filter_noargs

The conn (connection) argument is required for procedures registered by ns_register_filter if the procedure has 3 or more arguments (including why but not including conn). The conn argument is automatically filled with the connection information. The first argument following conn will always take the value supplied by ns_register_filter, if there is one, or an empty value. The why argument at the end is automatically filled with the type of filter requested. All other arguments must supply a default value. The following examples show the variations that can be used in this case:

    ns_register_filter postauth GET /threeargs threeargs aaa
    ns_register_filter postauth GET /fourargs fourargs aaa bbb ccc
    proc threeargs { conn context { greeble bork } why } {
       ...
    } ;
    proc fourargs { conn context {greeble bork} {hoover quark} why } {
    ...
    } ;

When a GET of /threeargs is requested, the conn and why arguments will be filled automatically, the context argument will be assigned "aaa" and the greeble argument will be assigned the default value "bork".

When a GET of /fourargs is requested, the conn and why arguments will be filled automatically, the context argument will be assigned "aaa", the greeble argument will be assigned "bbb", and the hoover argument will be assigned the default value "quark".

Notes

ns_register_filter and ns_register_proc are similar, but significantly different. With ns_register_proc, the specified URL is used to match that URL and any URL below it in the hierarchy. Wildcards such as "*" are meaningful only for the final part of the URL, such as /scripts/*.tcl. With ns_register_filter, the URLpattern is used to match URLs as a string with standard string-matching characters. ns_register_proc results in a single match, whereas multiple ns_register_filters can be matched and will be called.

Be aware that executing the same ns_register_filter statement more than once (as you might do when re-initializing Tcl) will add the filter more than once! You may want to have a shared variable set so that you don't do this.

Examples

This example expires all HTML files after an hour.

    ns_share -init {set filters_installed 0} filters_installed
    if {!$filters_installed} {
    	set filters_installed 1
    	ns_register_filter postauth GET /*.html ExpireSoon 3600
    }
       
    proc ExpireSoon {seconds why} {
    	ns_set update [ns_conn outputheaders] Expires \
    		[ns_httptime [expr $seconds + [ns_time]]]
    }

Top of Page

[ Previous ] [ Contents ] [ Index ] [ Next ]
Copyright © 1998-99 America Online, Inc.