QA - ftp_rawlist - check list return value

Co-authored-by: Christoph M. Becker <[email protected]>

Closes phpGH-9012.

Author: jcm

ext/ftp/tests/ftp_rawlist_basic1.phpt

@@ -13,7 +13,19 @@ $ftp = ftp_connect('127.0.0.1', $port);
 ftp_login($ftp, 'user', 'pass');
 $ftp or die("Couldn't connect to the server");
 
-var_dump(is_array(ftp_rawlist($ftp, 'www/')));
+$result = ftp_rawlist($ftp, 'www/');
+var_dump(is_array($result));
+var_dump($result);
+ftp_close($ftp);
 ?>
 --EXPECT--
 bool(true)
+array(3) {
+  [0]=>
+  string(5) "file1"
+  [1]=>
+  string(5) "file1"
+  [2]=>
+  string(9) "file
+b0rk"
+}

ext/ftp/tests/server.inc

@@ -446,8 +446,27 @@ if ($pid) {
             fputs($s, "200 " . $matches[1] . " bytes allocated\r\n");
 
         }elseif (preg_match('/^LIST www\//', $buf, $matches)) {
-            fputs($s, "226 Transfer complete\r\n");
+            if (empty($pasv)) {
+                fputs($s, "150 File status okay; about to open data connection\r\n");
+                if (!$fs = stream_socket_client("tcp://$host:$port")) {
+                    fputs($s, "425 Can't open data connection\r\n");
+                    continue;
+                }
+            } else {
+                fputs($s, "125 Data connection already open; transfer starting.\r\n");
+                $fs = $pasvs;
+            }
+
 
+            if ((!empty($ssl)) && (!stream_socket_enable_crypto($pasvs, true, STREAM_CRYPTO_METHOD_SSLv23_SERVER))) {
+                die("SSLv23 handshake failed.\n");
+            }
+
+            fputs($fs, "file1\r\nfile1\r\nfile\nb0rk\r\n");
+            fputs($s, "226 Closing data Connection.\r\n");
+            fclose($fs);
+            
+            fputs($s, "226 Transfer complete\r\n");
         }elseif (preg_match('/^LIST no_exists\//', $buf, $matches)) {
             fputs($s, "425 Error establishing connection\r\n");