bdbff42001-09-05Martin Nilsson 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" ); }