Add test with overly long index name to confirm exception

Author: alcaeus

tests/Doctrine/ODM/MongoDB/Tests/Functional/Ticket/GH1344Test.php

@@ -4,6 +4,7 @@
 
 use Doctrine\ODM\MongoDB\Mapping\Annotations as ODM;
 use Doctrine\ODM\MongoDB\Tests\BaseTest;
+use MongoResultException;
 
 class GH1344Test extends BaseTest
 {
@@ -18,6 +19,16 @@ public function testGeneratingIndexesDoesNotThrowException()
 
         $this->dm->getSchemaManager()->ensureDocumentIndexes(GH1344Main::class);
     }
+
+    public function testGeneratingIndexesWithTooLongIndexNameThrowsException()
+    {
+        // Ensure that at least the beginning of the index name is contained in
+        // the exception message. This can vary between driver/server versions.
+        $this->expectException(MongoResultException::class);
+        $this->expectExceptionMessageRegExp('#GH1344TooLongIndexName.\$embedded1_this_is_a_really_long_name_that#');
+
+        $this->dm->getSchemaManager()->ensureDocumentIndexes(GH1344TooLongIndexName::class);
+    }
 }
 
 /** @ODM\Document */
@@ -55,3 +66,23 @@ class GH1344EmbeddedNested
     /** @ODM\Field */
     public $property;
 }
+
+/** @ODM\Document */
+class GH1344TooLongIndexName
+{
+    /** @ODM\Id */
+    public $id;
+
+    /** @ODM\EmbedOne(targetDocument=GH1344TooLongIndexNameEmbedded::class) */
+    public $embedded1;
+}
+
+/**
+ * @ODM\EmbeddedDocument
+ * @ODM\Index(keys={"property"="asc"}, name="this_is_a_really_long_name_that_will_cause_problems_for_whoever_tries_to_use_it_whether_in_an_embedded_field_or_not")
+ */
+class GH1344TooLongIndexNameEmbedded
+{
+    /** @ODM\Field */
+    public $property;
+}