Roxen.git/ server/ protocols/ http.pike

1997-07-19

1997-07-19 23:26:24 by Henrik Grubbström (Grubba) <grubba@grubba.org>

• 0ddff6e1fda7bd62491dca2664d9d9dc09a71629 (45 lines) (+31/-14) ^{[ Show | Annotate ]}
  Branch: 5.2

Some prestate-handling changes.

Rev: server/protocols/http.pike:1.32

1:   // This is a roxen module. (c) Informationsvävarna AB 1996.    - string cvs_version = "$Id: http.pike,v 1.31 1997/07/06 16:00:56 grubba Exp $"; + string cvs_version = "$Id: http.pike,v 1.32 1997/07/19 23:26:24 grubba Exp $";   // HTTP protocol module.   #include <config.h>   private inherit "roxenlib";
172:    ({"<",">","<",">"})),"/<%*s>/%s",url)!=2)    url = "/";    +  if ((base[-1] == '/') && (url[0] == '/')) { +  url = base + url[1..]; +  } else {    url = base + url; -  +  }    -  my_fd->write(prot+" 302 Config in cookie!\r\n" +  my_fd->write(prot + " 302 Config in cookie!\r\n"    "Set-Cookie: " -  +http_roxen_config_cookie(indices(config)*",")+"\r\n" -  "Location: "+url+"\r\n" +  + http_roxen_config_cookie(indices(config) * ",") + "\r\n" +  "Location: " + url + "\r\n"    "Content-Type: text/html\r\n"    "Content-Length: 0\r\n\r\n");    } else {
191:    else    prestate[m]=1;    -  sscanf(replace(raw_url, ({ "%3c", "%3e", "%3C", "%3E" }), -  ({ "<", ">", "<", ">" })), "/<%*s>/%s", url); -  sscanf(replace(url, ({ "%28", "%29" }), ({ "(", ")" })),"/(%*s)/%s", url); +  if (sscanf(replace(raw_url, ({ "%3c", "%3e", "%3C", "%3E" }), +  ({ "<", ">", "<", ">" })), "/<%*s>/%s", url) == 2) { +  url = "/" + url; +  } +  if (sscanf(replace(url, ({ "%28", "%29" }), ({ "(", ")" })), +  "/(%*s)/%s", url) == 2) { +  url = "/" + url; +  }    -  my_fd->write(prot+" 302 Config In Prestate!\r\n" -  +"\r\nLocation: "+conf->query("MyWorldLocation")+ -  add_pre_state(url, prestate)+"\r\n" -  +"Content-Type: text/html\r\n" -  +"Content-Length: 0\r\n\r\n"); +  url = add_pre_state(url, prestate); +  +  if (base[-1] == '/') { +  url = base + url[1..]; +  } else { +  url = base + url;    } -  +  +  my_fd->write(prot + " 302 Config In Prestate!\r\n" +  "\r\nLocation: " + url + "\r\n" +  "Content-Type: text/html\r\n" +  "Content-Length: 0\r\n\r\n"); +  }    return -2;   }