HTMLMediaElement::webMediaPlayer() should never be null if m_readyState >= HAVE_METADATA (media eng…

LayoutTests/http/tests/media/video-load-metadata-decode-error.cgi

+#!/usr/bin/perl -wT
+
+use strict;
+
+use CGI;
+use File::stat;
+
+my $query = new CGI;
+
+my $name = $query->param('name');
+my $filesize = stat($name)->size;
+
+# Get MIME type if provided.  Default to video/mp4.
+my $type = $query->param('type') || "video/mp4";

[acolwell GONE FROM CHROMIUM, 2014/06/18 23:46:27]

nit: Please remove the default so this parameter must be specified. Could a 400
error be returned if this parameter is not provided?

[Srirama, 2014/06/19 03:35:15]

I will remove the default parameter. But I feel we should not return 400 because
our test expects atleast meta data to load and then give some error.
On 2014/06/18 23:46:27, acolwell wrote:

[acolwell GONE FROM CHROMIUM, 2014/06/23 16:35:28]

But returning 400 will likely cause a test to fail if the type parameter is not
specified. That failure would then prompt someone to properly specify the type
parameter in the URL.

You should be able to add something like the following.
if (!$type) {
    print "Status: 400 Bad Request\r\n";
    return;
}

[Srirama, 2014/06/24 05:23:01]

Done.

+
+my $rangeEnd = $filesize - 1;
+
+# Print HTTP Header, disabling cache.
+print "Cache-Control: no-cache\n";

[acolwell GONE FROM CHROMIUM, 2014/06/18 23:46:27]

What is responsible for printing the HTTP status line?

[Srirama, 2014/06/19 03:35:15]

I think based on the CGI output apache server will generate the http status
line. As long as there is no error in CGI execution it appends 200 status.
On 2014/06/18 23:46:27, acolwell wrote:

+print "Content-Length: " . $filesize . "\n";
+print "Content-Type: " . $type . "\n";
+
+print "\n";
+
+open FILE, $name or die;
+binmode FILE;
+my ($data, $n);
+my $total = 0;
+my $break = $filesize / 4;
+my $string = "corrupt video";
+seek(FILE, 0, 0);
+
+while (($n = read FILE, $data, 1024) != 0) {
+    print $data;
+
+    $total += $n;
+    if ($total >= $filesize) {
+        last;
+    }
+    
+    if ($total >= $break) {
+        print $string;
+        $total += length($string);
+    }
+
+}
+close(FILE);