2001-01-05 05:57:04 +00:00
|
|
|
import urlparse
|
|
|
|
|
|
|
|
errors = 0
|
|
|
|
|
|
|
|
RFC1808_BASE = "http://a/b/c/d;p?q#f"
|
|
|
|
|
|
|
|
def checkJoin(relurl, expected):
|
|
|
|
global errors
|
|
|
|
result = urlparse.urljoin(RFC1808_BASE, relurl)
|
|
|
|
print "%-13s = %r" % (relurl, result)
|
|
|
|
if result != expected:
|
|
|
|
errors += 1
|
|
|
|
print "urljoin(%r, %r)" % (RFC1808_BASE, relurl)
|
|
|
|
print ("expected %r,\n"
|
|
|
|
" got %r") % (expected, result)
|
|
|
|
|
|
|
|
print "urlparse.urljoin() tests"
|
|
|
|
print
|
|
|
|
|
|
|
|
# "normal" cases from RFC 1808:
|
|
|
|
checkJoin('g:h', 'g:h')
|
|
|
|
checkJoin('g', 'http://a/b/c/g')
|
|
|
|
checkJoin('./g', 'http://a/b/c/g')
|
|
|
|
checkJoin('g/', 'http://a/b/c/g/')
|
|
|
|
checkJoin('/g', 'http://a/g')
|
|
|
|
checkJoin('//g', 'http://g')
|
|
|
|
checkJoin('?y', 'http://a/b/c/d;p?y')
|
|
|
|
checkJoin('g?y', 'http://a/b/c/g?y')
|
|
|
|
checkJoin('g?y/./x', 'http://a/b/c/g?y/./x')
|
|
|
|
checkJoin('#s', 'http://a/b/c/d;p?q#s')
|
|
|
|
checkJoin('g#s', 'http://a/b/c/g#s')
|
|
|
|
checkJoin('g#s/./x', 'http://a/b/c/g#s/./x')
|
|
|
|
checkJoin('g?y#s', 'http://a/b/c/g?y#s')
|
|
|
|
checkJoin(';x', 'http://a/b/c/d;x')
|
|
|
|
checkJoin('g;x', 'http://a/b/c/g;x')
|
|
|
|
checkJoin('g;x?y#s', 'http://a/b/c/g;x?y#s')
|
|
|
|
checkJoin('.', 'http://a/b/c/')
|
|
|
|
checkJoin('./', 'http://a/b/c/')
|
|
|
|
checkJoin('..', 'http://a/b/')
|
|
|
|
checkJoin('../', 'http://a/b/')
|
|
|
|
checkJoin('../g', 'http://a/b/g')
|
|
|
|
checkJoin('../..', 'http://a/')
|
|
|
|
checkJoin('../../', 'http://a/')
|
|
|
|
checkJoin('../../g', 'http://a/g')
|
|
|
|
|
|
|
|
# "abnormal" cases from RFC 1808:
|
|
|
|
checkJoin('', 'http://a/b/c/d;p?q#f')
|
|
|
|
checkJoin('../../../g', 'http://a/../g')
|
|
|
|
checkJoin('../../../../g', 'http://a/../../g')
|
|
|
|
checkJoin('/./g', 'http://a/./g')
|
|
|
|
checkJoin('/../g', 'http://a/../g')
|
|
|
|
checkJoin('g.', 'http://a/b/c/g.')
|
|
|
|
checkJoin('.g', 'http://a/b/c/.g')
|
|
|
|
checkJoin('g..', 'http://a/b/c/g..')
|
|
|
|
checkJoin('..g', 'http://a/b/c/..g')
|
|
|
|
checkJoin('./../g', 'http://a/b/g')
|
|
|
|
checkJoin('./g/.', 'http://a/b/c/g/')
|
|
|
|
checkJoin('g/./h', 'http://a/b/c/g/h')
|
|
|
|
checkJoin('g/../h', 'http://a/b/c/h')
|
|
|
|
|
|
|
|
# RFC 1808 and RFC 1630 disagree on these (according to RFC 1808),
|
|
|
|
# so we'll not actually run these tests (which expect 1808 behavior).
|
|
|
|
#checkJoin('http:g', 'http:g')
|
|
|
|
#checkJoin('http:', 'http:')
|
|
|
|
|
|
|
|
print errors, "errors"
|