Roxen.git/
server/
protocols/
http.pike
Branch:
Tag:
Non-build tags
All tags
No tags
2001-07-31
2001-07-31 10:36:45 by Per Hedbor <ph@opera.com>
e9d1173a63859cf442e7868da21394f33f3668cc (
9
lines) (+
5
/-
4
)
[
Show
|
Annotate
]
Branch:
5.2
Fixed [Bug
1778 (#1778)
]
Rev: server/protocols/http.pike:1.324
2:
// Modified by Francesco Chemolli to add throttling capabilities. // Copyright © 1996 - 2000, Roxen IS.
-
constant cvs_version = "$Id: http.pike,v 1.
323
2001/07/
21
12
:
01
:
44
mast
Exp $";
+
constant cvs_version = "$Id: http.pike,v 1.
324
2001/07/
31
10
:
36
:
45
per
Exp $";
// #define REQUEST_DEBUG #define MAGIC_ERROR
387:
void send (string|object what, int|void len) { REQUEST_WERR(sprintf("send(%O, %O)\n", what, len));
-
if( len && port_obj->minimum_bitrate )
+
if( len && port_obj
&& port_obj
->minimum_bitrate )
call_out( end, len / port_obj->minimum_bitrate ); if(!what) return;
1233:
mixed err = _err; _err = 0; // hide in backtrace, they are bad enough anyway... array err2;
-
if(port_obj->query("show_internals"))
+
if(port_obj
&& port_obj
->query("show_internals"))
{ err2 = catch { file = Roxen.http_low_answer(500, format_backtrace(store_error(err)));
1895:
if (!cached_url_base) { // First look at the host header in the request. if (string tmp = misc->host) {
-
string default_port = ":" + port_obj->default_port;
+
string default_port = ":" +
(
port_obj
&& port_obj
->default_port
)
;
if (has_suffix (tmp, default_port)) // Remove redundant port number. cached_url_base = port_obj->prot_name + "://" +