Roxen.git
/
server
/
etc
/
test
/
tests
/
http
/
RoxenTest_InternalImg.pike
version
»
Context lines:
10
20
40
80
file
none
3
Roxen.git/server/etc/test/tests/http/RoxenTest_InternalImg.pike:1:
+
inherit "../pike_async_process_test_common";
-
+
+
string simple_check( )
+
{
+
return
+
common_wait( ([ 2:"Illegal headers",
+
3:"Illegal data",
+
4:"Connection failed",
+
5:"Bad protocol value in reply",
+
6:"Bad response code in reply",
+
7:"No date header",
+
8:"Bad or no content-length header",
+
9:"Bad or no last-modified header",
+
11:"Did not expect headers",
+
12:"Did not expect data",
+
13:"Did not expect connection",
+
]) );
+
}
+
+
function run( string url, string ... more )
+
{
+
return lambda() {
+
run_pikescript( "http/internal.pike", url, @more );
+
};
+
}
+
+
#define ir(X) "/internal-roxen-"+X
+
#define ig(X) "/internal-gopher-"+X
+
+
#define test_r_c( X,Y ) atest( ir(X), run(ir(X), Y), simple_check )
+
#define test_r( X ) atest( ir(X), run(ir(X)), simple_check )
+
#define test_g_c( X,Y ) atest( ig(X), run(ig(X), Y), simple_check )
+
#define test_g( X ) atest( ig(X), run(ig(X)), simple_check )
+
+
void setup( )
+
{
+
test_r_c( "unit", "5kd0hnfnfrsjjtlfutmbik7q22" );
+
test_r_c( "colsel", "7o7msa9m802m7e4ia09vhebgqf" );
+
test_r_c( "colsel-small", "3lf70uo7cmqqhour7kfqsoe7p4" );
+
test_r_c( "squares", "7t969it672etl25fkdcf3uap00" );
+
+
test_g( "binary" );
+
test_g( "image" );
+
test_g( "menu" );
+
test_g( "movie" );
+
test_g( "sound" );
+
test_g( "text" );
+
test_g( "unknown" );
+
+
test_r( "help" );
+
test_r( "pike" );
+
test_r( "power" );
+
test_r( "roxen" );
+
test_r( "testimage" );
+
+
test_r( "colorbar:0,0,0" );
+
test_r( "colorbar:50,50,50" );
+
test_r( "colorbar:255,255,2550" );
+
test_r( "colorbar:500,500,500" );
+
}
Newline at end of file added.