Defined in
- Partial Call Graph (max 5 caller/called nodes):
- Testcases:
-
No testcase defined.
Source code:
set cookieString [ns_set iget [ns_conn headers] cookie]
if {[string match *pires* $cookieString]} {
ad_log warning "received a probably invalid cookie: $cookieString"
set newCookies {}
foreach line [split $cookieString \n] {
if {[regexp {^([^;]*);} $line . c]} {
lappend newCookies $c
}
}
if {[llength $newCookies] > 0} {
ad_log notice "fixed cookies [join $newCookies {;}]"
ns_set update [ns_conn headers] cookie [join $newCookies ";"]
}
}
XQL Not present:Generic, PostgreSQL, Oracle