1 <testcase> 2 <info> 3 <keywords> 4 HTTP 5 progressbar 6 </keywords> 7 </info> 8 9 # 10 # Server-side 11 <reply> 12 <data> 13 HTTP/1.1 200 OK 14 Date: Thu, 09 Nov 2010 14:49:00 GMT 15 Server: test-server/fake 16 Last-Modified: Tue, 13 Jun 2000 12:10:00 GMT 17 ETag: "21025-dc7-39462498" 18 Accept-Ranges: bytes 19 Content-Length: 60 20 Connection: close 21 Content-Type: text/html 22 Funny-head: yesyes 23 24 zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz 25 </data> 26 </reply> 27 28 # 29 # Client-side 30 <client> 31 <server> 32 http 33 </server> 34 <name> 35 progress-bar 36 </name> 37 <command> 38 http://%HOSTIP:%HTTPPORT/1148 -# --stderr log/stderrlog1148 39 </command> 40 <precheck> 41 perl -e '$ENV{"LC_NUMERIC"} = "en_US.UTF-8"; print "Test requires point as decimal separator" if system("./libtest/chkdecimalpoint");' 42 </precheck> 43 <setenv> 44 LC_ALL= 45 LC_NUMERIC=en_US.UTF-8 46 </setenv> 47 </client> 48 49 # 50 <verify> 51 <strip> 52 ^User-Agent:.* 53 </strip> 54 <protocol> 55 GET /1148 HTTP/1.1 56 Host: %HOSTIP:%HTTPPORT 57 Accept: */* 58 59 </protocol> 60 # This allows the last 4 letters of the bar to get updated without it 61 # matters. We're mostly checking the width of it anyway. 62 <file name="log/stderrlog1148" mode="text"> 63 bar 100.0% 65 </file> 66 <stripfile> 67 s/####################################################################..../bar/ 68 </stripfile> 69 </verify> 70 </testcase> 71
