Lines Matching refs:name
210 proc wapp-set-cookie {name value} {
212 dict lappend wapp .new-cookies $name $value
217 proc wapp-clear-cookie {name} {
218 wapp-set-cookie $name {}
223 proc wapp-reply-extra {name value} {
225 dict lappend wapp .reply-extra $name $value
248 proc wapp-param {name {dflt {}}} {
250 if {![dict exists $wapp $name]} {return $dflt}
251 return [dict get $wapp $name]
256 proc wapp-param-exists {name} {
258 return [dict exists $wapp $name]
263 proc wapp-set-param {name value} {
265 dict set wapp $name $value
533 if {![regexp {^(.+): +(.*)$} $x all name value]} {
536 set name [string toupper $name]
537 switch -- $name {
538 REFERER {set name HTTP_REFERER}
539 USER-AGENT {set name HTTP_USER_AGENT}
540 CONTENT-LENGTH {set name CONTENT_LENGTH}
541 CONTENT-TYPE {set name CONTENT_TYPE}
542 HOST {set name HTTP_HOST}
543 COOKIE {set name HTTP_COOKIE}
544 ACCEPT-ENCODING {set name HTTP_ACCEPT_ENCODING}
545 default {set name .hdr:$name}
547 dict set W $name $value
590 $hdr hr name filename mimetype]} {
595 } elseif {[regexp {name="(.*)"} $hdr hr name]} {
596 dict set wapp $name $content
716 foreach {name value} [dict get $wapp .reply-extra] {
717 puts $chan "$name: $value\r"