From 8694b9002f011d0c93b6e25fae381508c4ce54b0 Mon Sep 17 00:00:00 2001
From: Robin Burchell <robin.burchell@crimson.no>
Date: Fri, 21 Apr 2017 12:29:22 +0200
Subject: Add an autotest for GC crashes on some platforms

Related to QTBUG-59977, where crashes were seen on some platforms.
Try to prevent this from creeping out and inconveniencing other modules again.

Task-number: QTBUG-59977
Change-Id: I89730c7882e4d87e6049f087724988a7aa52d5a5
Reviewed-by: Lars Knoll <lars.knoll@qt.io>
---
 .../auto/qml/qqmlengine/data/testGCCorruption.qml  | 29 ++++++++++++++++++++++
 tests/auto/qml/qqmlengine/tst_qqmlengine.cpp       | 11 +++++++-
 2 files changed, 39 insertions(+), 1 deletion(-)
 create mode 100644 tests/auto/qml/qqmlengine/data/testGCCorruption.qml

diff --git a/tests/auto/qml/qqmlengine/data/testGCCorruption.qml b/tests/auto/qml/qqmlengine/data/testGCCorruption.qml
new file mode 100644
index 0000000000..8728b9b915
--- /dev/null
+++ b/tests/auto/qml/qqmlengine/data/testGCCorruption.qml
@@ -0,0 +1,29 @@
+import QtQml 2.0
+
+QtObject {
+    id: root
+    property int count: 10000;
+    property var items: [];
+
+    property Component component: Component {
+        id: component;
+        QtObject {
+        }
+    }
+
+    property int iterations: 0
+    Component.onCompleted: {
+        for (var iterations = 0; iterations < 5; ++iterations) {
+            for (var i=0; i<items.length; ++i) {
+                items[i].destroy();
+            }
+
+            for (var i=0; i<root.count; ++i) {
+                var object = component.createObject();
+                items[i] = object
+            }
+        }
+
+        // if we crash, then something bad has happened. :)
+    }
+}
diff --git a/tests/auto/qml/qqmlengine/tst_qqmlengine.cpp b/tests/auto/qml/qqmlengine/tst_qqmlengine.cpp
index e170920486..3f6107ab2b 100644
--- a/tests/auto/qml/qqmlengine/tst_qqmlengine.cpp
+++ b/tests/auto/qml/qqmlengine/tst_qqmlengine.cpp
@@ -70,8 +70,8 @@ private slots:
     void qtqmlModule();
     void urlInterceptor_data();
     void urlInterceptor();
-
     void qmlContextProperties();
+    void testGCCorruption();
 
 public slots:
     QObject *createAQObjectForOwnershipTest ()
@@ -836,6 +836,15 @@ void tst_qqmlengine::qmlContextProperties()
     QVERIFY(o);
 }
 
+void tst_qqmlengine::testGCCorruption()
+{
+    QQmlEngine e;
+
+    QQmlComponent c(&e, testFileUrl("testGCCorruption.qml"));
+    QObject *o = c.create();
+    QVERIFY2(o, qPrintable(c.errorString()));
+}
+
 QTEST_MAIN(tst_qqmlengine)
 
 #include "tst_qqmlengine.moc"
-- 
cgit v1.2.3