Roxen.git/ server/ protocols/ http.pike

2002-03-22

2002-03-22 12:30:20 by Ian Delahorne <ian@roxen.com>

• 55533af544cf2fea263e57af3355f76925fd24b6 (55 lines) (+37/-18) ^{[ Show | Annotate ]}
  Branch: 5.2

Applied patch similar to the one in [bug 2878 (#2878)].
Fixes [bug 2878 (#2878)].

Rev: server/base_server/roxen.pike:1.784
Rev: server/protocols/http.pike:1.362

2:   // Modified by Francesco Chemolli to add throttling capabilities.   // Copyright © 1996 - 2001, Roxen IS.    - constant cvs_version = "$Id: http.pike,v 1.361 2002/03/20 18:45:55 per-bash Exp $"; + constant cvs_version = "$Id: http.pike,v 1.362 2002/03/22 12:30:20 grubba Exp $";   // #define REQUEST_DEBUG   #define MAGIC_ERROR   
565:   #endif   }    + //! Parse a cookie string. + //! + //! @param contents + //! HTTP transport-encoded cookie header value. + //! + //! @returns + //! Returns the resulting current cookie mapping. + mapping(string:string) parse_cookies( string contents ) + { +  if(!contents) +  return cookies; +  + // misc->cookies += ({contents}); +  foreach(((contents/";") - ({""})), string c) +  { +  string name, value; +  while(sizeof(c) && c[0]==' ') c=c[1..]; +  if(sscanf(c, "%s=%s", name, value) == 2) +  { +  value=http_decode_string(value); +  name=http_decode_string(name); +  cookies[ name ]=value; + #ifdef OLD_RXML_CONFIG +  if( (name == "RoxenConfig") && strlen(value) ) +  config = mkmultiset( value/"," ); + #endif +  } +  } +  return cookies; + } +    int things_to_do_when_not_sending_from_cache( )   {   #ifdef OLD_RXML_CONFIG
589:       if( contents = request_headers[ "cookie" ] )    { +  // FIXME: +  // "misc->cookies"? Shouldn't it be just "cookies"? +  // /grubba 2002-03-22    misc->cookies = ({});    foreach( arrayp( contents )? contents : ({ contents }), contents )    { -  string c; - // misc->cookies += ({contents}); -  foreach(((contents/";") - ({""})), c) -  { -  string name, value; -  while(sizeof(c) && c[0]==' ') c=c[1..]; -  if(sscanf(c, "%s=%s", name, value) == 2) -  { -  value=http_decode_string(value); -  name=http_decode_string(name); -  cookies[ name ]=value; - #ifdef OLD_RXML_CONFIG -  if( (name == "RoxenConfig") && strlen(value) ) -  config = mkmultiset( value/"," ); - #endif +  parse_cookies(contents);    }    } -  } -  } +        string f = raw_url;