Mercurial > hg > nginx-tests

comparison range_mp4.t @ 397:847ea345becb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: removed TODO and try_run() checks for legacy versions.
author Sergey Kandaurov <pluknet@nginx.com>
date Mon, 05 May 2014 11:46:01 +0400
parents 7a65ebfdb02e
children d5bf5942a8b2
comparison
equal deleted inserted replaced
396:5eb0df61f371 397:847ea345becb
64 my $fsz = http_head('/test.mp4?start=1') =~ /Content-Length: (\d+)/ && $1; 64 my $fsz = http_head('/test.mp4?start=1') =~ /Content-Length: (\d+)/ && $1;
65 isnt($fsz0, $fsz, 'mp4 start argument works'); 65 isnt($fsz0, $fsz, 'mp4 start argument works');
66 66
67 my $t1; 67 my $t1;
68 68
69 TODO: {
70 local $TODO = 'not yet' unless $t->has_version('1.5.13');
71
72 # MP4 has minimally 16 byte ftyp object at start 69 # MP4 has minimally 16 byte ftyp object at start
73 70
74 my $start = $fsz - 10; 71 my $start = $fsz - 10;
75 my $last = $fsz - 1; 72 my $last = $fsz - 1;
76 73
88 $t1 = http_get_range('/test.mp4?start=1', 'Range: bytes=0-99'); 85 $t1 = http_get_range('/test.mp4?start=1', 'Range: bytes=0-99');
89 like($t1, qr/206/, 'multi buffers - 206 partial reply'); 86 like($t1, qr/206/, 'multi buffers - 206 partial reply');
90 like($t1, qr/Content-Length: 100/, 'multi buffers - content length'); 87 like($t1, qr/Content-Length: 100/, 'multi buffers - content length');
91 like($t1, qr/Content-Range: bytes 0-99\/$fsz/, 88 like($t1, qr/Content-Range: bytes 0-99\/$fsz/,
92 'multi buffers - content range'); 89 'multi buffers - content range');
93
94 }
95 90
96 TODO: { 91 TODO: {
97 local $TODO = 'multipart range on mp4'; 92 local $TODO = 'multipart range on mp4';
98 93
99 $t1 = http_get_range('/test.mp4?start=1', 'Range: bytes=0-10,11-99'); 94 $t1 = http_get_range('/test.mp4?start=1', 'Range: bytes=0-10,11-99');