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