FTP
HTTP
HTTP GET
--proto
--proto-redir
followlocation
#
# Server-side
HTTP/1.1 301 OK swsclose
Date: Thu, 09 Nov 2010 14:49:00 GMT
Server: test-server/fake
Content-Length: 0
Location: ftp://127.0.0.1:8992/1245
Connection: close
#
# Client-side
http
ftp
--proto deny must override --proto-redir allow
--location --proto +all,-ftp --proto-redir -all,+ftp http://%HOSTIP:%HTTPPORT/1245
# The data section doesn't do variable substitution, so we must assert this
perl -e "print 'Test requires default test server host and port' if ( '%HOSTIP' ne '127.0.0.1' || '%FTPPORT' ne '8992' );"
#
# Verify data after the test has been "shot"
^User-Agent:.*
GET /1245 HTTP/1.1
Host: %HOSTIP:%HTTPPORT
Accept: */*
# 1 - Protocol ftp not supported or disabled in libcurl
1