| lh | 9ed821d | 2023-04-07 01:36:19 -0700 | [diff] [blame] | 1 | <testcase> |
| 2 | <info> |
| 3 | <keywords> |
| 4 | HTTP |
| 5 | HTTP PUT |
| 6 | followlocation |
| 7 | FTP |
| 8 | EPSV |
| 9 | STOR |
| 10 | </keywords> |
| 11 | </info> |
| 12 | |
| 13 | # |
| 14 | # Server-side |
| 15 | <reply> |
| 16 | <data> |
| 17 | HTTP/1.1 307 OK
|
| 18 | Date: Thu, 09 Nov 2010 14:49:00 GMT
|
| 19 | Server: test-server/fake swsclose
|
| 20 | Content-Type: text/html
|
| 21 | Location: ftp://127.0.0.1:8992/1055
|
| 22 | Content-Length: 0
|
| 23 | Connection: close
|
| 24 |
|
| 25 | </data> |
| 26 | </reply> |
| 27 | |
| 28 | # |
| 29 | # Client-side |
| 30 | <client> |
| 31 | <server> |
| 32 | http |
| 33 | ftp |
| 34 | </server> |
| 35 | <name> |
| 36 | HTTP PUT Location: redirect to FTP URL |
| 37 | </name> |
| 38 | <command> |
| 39 | http://%HOSTIP:%HTTPPORT/1055 -L -T log/test1055.txt |
| 40 | </command> |
| 41 | # The data section doesn't do variable substitution, so we must assert this |
| 42 | <precheck> |
| 43 | perl -e "print 'Test requires default test server host and port' if ( '%HOSTIP' ne '127.0.0.1' || '%FTPPORT' ne '8992' );" |
| 44 | </precheck> |
| 45 | <file name="log/test1055.txt"> |
| 46 | Weird |
| 47 | file |
| 48 | to |
| 49 | upload |
| 50 | for |
| 51 | testing |
| 52 | the |
| 53 | PUT |
| 54 | feature |
| 55 | </file> |
| 56 | </client> |
| 57 | |
| 58 | # |
| 59 | # Verify data after the test has been "shot" |
| 60 | <verify> |
| 61 | <strip> |
| 62 | ^User-Agent:.* |
| 63 | </strip> |
| 64 | <protocol> |
| 65 | PUT /1055 HTTP/1.1
|
| 66 | Host: %HOSTIP:%HTTPPORT
|
| 67 | Accept: */*
|
| 68 | Content-Length: 78
|
| 69 | Expect: 100-continue
|
| 70 |
|
| 71 | Weird |
| 72 | file |
| 73 | to |
| 74 | upload |
| 75 | for |
| 76 | testing |
| 77 | the |
| 78 | PUT |
| 79 | feature |
| 80 | USER anonymous
|
| 81 | PASS ftp@example.com
|
| 82 | PWD
|
| 83 | EPSV
|
| 84 | TYPE I
|
| 85 | STOR 1055
|
| 86 | QUIT
|
| 87 | </protocol> |
| 88 | <upload> |
| 89 | Weird |
| 90 | file |
| 91 | to |
| 92 | upload |
| 93 | for |
| 94 | testing |
| 95 | the |
| 96 | PUT |
| 97 | feature |
| 98 | </upload> |
| 99 | </verify> |
| 100 | </testcase> |