diff --git a/ext/mcrypt/tests/bug62102_rfc2144.phpt b/ext/mcrypt/tests/bug62102_rfc2144.phpt
new file mode 100644
index 00000000000..d2bfa7b7666
--- /dev/null
+++ b/ext/mcrypt/tests/bug62102_rfc2144.phpt
@@ -0,0 +1,25 @@
+--TEST--
+RFC 2144 test vectors for CAST-128 in ECB mode (bug #62102)
+--SKIPIF--
+<?php extension_loaded('mcrypt') OR print 'skip'; ?>
+--FILE--
+<?php
+$plaintext = "\x01\x23\x45\x67\x89\xAB\xCD\xEF";
+
+echo
+
+"128-bit: ",
+bin2hex(mcrypt_encrypt('cast-128', "\x01\x23\x45\x67\x12\x34\x56\x78\x23\x45\x67\x89\x34\x56\x78\x9A", $plaintext, 'ecb')),
+"\n",
+"80-bit: ",
+bin2hex(mcrypt_encrypt('cast-128', "\x01\x23\x45\x67\x12\x34\x56\x78\x23\x45", $plaintext, 'ecb')),
+"\n",
+"40-bit: ",
+bin2hex(mcrypt_encrypt('cast-128', "\x01\x23\x45\x67\x12", $plaintext, 'ecb')),
+"\n";
+
+?>
+--EXPECT--
+128-bit: 238b4fe5847e44b2
+80-bit: eb6a711a2c02271b
+40-bit: 7ac816d16e9b302e