Roxen.git
/
server
/
etc
/
test
/
tests
/
http
/
http09.pike
version
»
Context lines:
10
20
40
80
file
none
3
Roxen.git/server/etc/test/tests/http/http09.pike:1:
inherit "http_common"; void main(int argc, array argv) {
-
if( argc
!=
4 ) exit( BADARG );
+
string sep;
+
if( argc
<
4 ) exit( BADARG );
+
if( argc == 5 ) sep = "\n"; else sep = "\r\n";
-
Stdio.File f = connect(
argv[1] );
+
Stdio.File f = connect( argv[1] );
-
f->write( "GET "+argv[2]
+"\r\n"
);
+
f->write( "GET "+argv[2]
+sep
);
string data = f->read(); if( sizeof( data / "\r\n\r\n" ) != 1 ) exit( HEADERS ); if( (int)argv[3] ) if( data != ("\0" * (int)argv[3]) ) exit( BADDATA ); exit( OK ); }