Use new QObjectPrivate connection mechanism in dynamic connections

Old API assumes sender == receiver, which results in wrong handling of
connections when receiver is deleted: connection is not removed or
notified elsehow as it's not really tied to a valid receiver

Task-number: QTBUG-86368
Pick-to: 5.15 6.0
Change-Id: I0f3115f1b0f26cf353752ba2b8fd88e0f3bdd388
Reviewed-by: Ulf Hermann <ulf.hermann@qt.io>

3 files changed, 105 insertions, 0 deletions

diff --git a/tests/auto/qml/qqmlecmascript/data/scriptConnect.dynamic.1.qml b/tests/auto/qml/qqmlecmascript/data/scriptConnect.dynamic.1.qml
new file mode 100644
index 0000000000..4814ff33f4
--- /dev/null
+++ b/tests/auto/qml/qqmlecmascript/data/scriptConnect.dynamic.1.qml
@@ -0,0 +1,32 @@
+import Qt.test 1.0
+import QtQuick 2.0
+import "scriptConnect.6.js" as Script
+
+Item {
+    id: root
+
+    property int test: 0
+    property var dynamicObjectProperty: undefined
+
+    signal outer
+    Component {
+        id: comp
+        Item {
+            signal inner
+            onInner: { Script.testFunction(); root.destroyDynamicObject(); }
+        }
+    }
+
+    function destroyDynamicObject() {
+        if (dynamicObjectProperty) {
+            dynamicObjectProperty.destroy();
+            dynamicObjectProperty = undefined;
+            gc();
+        }
+    }
+
+    Component.onCompleted: {
+        dynamicObjectProperty = comp.createObject(root);
+        root.outer.connect(dynamicObjectProperty.inner);
+    }
+}
diff --git a/tests/auto/qml/qqmlecmascript/data/scriptConnect.dynamic.2.qml b/tests/auto/qml/qqmlecmascript/data/scriptConnect.dynamic.2.qml
new file mode 100644
index 0000000000..9f1f67bbeb
--- /dev/null
+++ b/tests/auto/qml/qqmlecmascript/data/scriptConnect.dynamic.2.qml
@@ -0,0 +1,33 @@
+import Qt.test 1.0
+import QtQuick 2.0
+import "scriptConnect.6.js" as Script
+
+Item {
+    id: root
+
+    property int test: 0
+    property var dynamicObjectProperty: undefined
+
+    signal outer
+    Component {
+        id: comp
+        Item {
+            signal inner
+            onInner: { Script.testFunction(); root.disconnectAndDestroyDynamicObject(); }
+        }
+    }
+
+    function disconnectAndDestroyDynamicObject() {
+        if (dynamicObjectProperty) {
+            root.outer.disconnect(dynamicObjectProperty.inner);
+            dynamicObjectProperty.destroy();
+            dynamicObjectProperty = undefined;
+            gc();
+        }
+    }
+
+    Component.onCompleted: {
+        dynamicObjectProperty = comp.createObject(root);
+        root.outer.connect(dynamicObjectProperty.inner);
+    }
+}
diff --git a/tests/auto/qml/qqmlecmascript/tst_qqmlecmascript.cpp b/tests/auto/qml/qqmlecmascript/tst_qqmlecmascript.cpp
index 13b6ad7700..02d044aa63 100644
--- a/tests/auto/qml/qqmlecmascript/tst_qqmlecmascript.cpp
+++ b/tests/auto/qml/qqmlecmascript/tst_qqmlecmascript.cpp
@@ -3500,6 +3500,46 @@ void tst_qqmlecmascript::scriptConnect()
 
         delete object;
     }
+
+    {
+        QQmlComponent component(&engine, testFileUrl("scriptConnect.dynamic.1.qml"));
+
+        QObject *object = component.create();
+        QVERIFY(object != nullptr);
+
+        QCOMPARE(object->property("test").toInt(), 0);
+
+        QMetaObject::invokeMethod(object, "outer");
+        QCOMPARE(object->property("test").toInt(), 1);
+
+        // process the dynamic object deletion queried with deleteLater()
+        QCoreApplication::sendPostedEvents(nullptr, QEvent::DeferredDelete);
+        QCoreApplication::processEvents();
+
+        // after deletion, further invocations do not update the property
+        QMetaObject::invokeMethod(object, "outer");
+        QCOMPARE(object->property("test").toInt(), 1);
+
+        delete object;
+    }
+
+    {
+        QQmlComponent component(&engine, testFileUrl("scriptConnect.dynamic.2.qml"));
+
+        QObject *object = component.create();
+        QVERIFY(object != nullptr);
+
+        QCOMPARE(object->property("test").toInt(), 0);
+        QMetaObject::invokeMethod(object, "outer");
+        QCOMPARE(object->property("test").toInt(), 1);
+
+        // no need to manually process events here, as we disconnect explicitly
+
+        QMetaObject::invokeMethod(object, "outer");
+        QCOMPARE(object->property("test").toInt(), 1);
+
+        delete object;
+    }
 }
 
 void tst_qqmlecmascript::scriptDisconnect()