1// Copyright (C) 2021 The Qt Company Ltd.
2// SPDX-License-Identifier: LicenseRef-Qt-Commercial OR GPL-3.0-only
3
4#include "qmlutils_p.h"
5
6#include <QtCore/QDebug>
7#include <QtCore/QMutexLocker>
8#include <QtQml/QQmlComponent>
9#include <QtQml/QQmlEngine>
10#include <private/qqmlengine_p.h>
11
12QT_BEGIN_NAMESPACE
13
14QQmlDataTest *QQmlDataTest::m_instance = nullptr;
15
16QQmlDataTest::QQmlDataTest(
17 const char *qmlTestDataDir, FailOnWarningsPolicy failOnWarningsPolicy,
18 const char *dataSubDir)
19 : m_qmlTestDataDir(qmlTestDataDir)
20#ifdef QT_TESTCASE_BUILDDIR
21 , m_dataDirectory(QTest::qFindTestData(basepath: dataSubDir, file: m_qmlTestDataDir, line: 0, QT_TESTCASE_BUILDDIR))
22#else
23 , m_dataDirectory(QTest::qFindTestData(dataSubDir, m_qmlTestDataDir, 0))
24#endif
25 , m_dataDirectoryUrl(m_dataDirectory.startsWith(c: QLatin1Char(':'))
26 ? QUrl(QLatin1String("qrc") + m_dataDirectory + QLatin1Char('/'))
27 : QUrl::fromLocalFile(localfile: m_dataDirectory + QLatin1Char('/')))
28 , m_failOnWarningsPolicy(failOnWarningsPolicy)
29{
30 m_instance = this;
31 if (m_cacheDir.isValid() && !qEnvironmentVariableIsSet(varName: "QML_DISK_CACHE_PATH")) {
32 m_usesOwnCacheDir = true;
33 qputenv(varName: "QML_DISK_CACHE_PATH", value: m_cacheDir.path().toLocal8Bit());
34 }
35}
36
37QQmlDataTest::~QQmlDataTest()
38{
39 m_instance = nullptr;
40 if (m_usesOwnCacheDir)
41 qunsetenv(varName: "QML_DISK_CACHE_PATH");
42}
43
44void QQmlDataTest::initTestCase()
45{
46 QVERIFY2(!m_dataDirectory.isEmpty(), qPrintable(
47 QLatin1String("'%1' directory not found in %2").arg(
48 QString::fromUtf8(m_dataSubDir),
49 QFileInfo(QString::fromUtf8(m_qmlTestDataDir)).absolutePath())));
50 m_directory = QFileInfo(m_dataDirectory).absolutePath();
51 if (m_dataDirectoryUrl.scheme() != QLatin1String("qrc"))
52 QVERIFY2(QDir::setCurrent(m_directory), qPrintable(QLatin1String("Could not chdir to ") + m_directory));
53}
54
55void QQmlDataTest::init()
56{
57 if (m_failOnWarningsPolicy == FailOnWarningsPolicy::FailOnWarnings)
58 QTest::failOnWarning(messagePattern: QRegularExpression(QStringLiteral(".?")));
59}
60
61QString QQmlDataTest::testFile(const QString &fileName) const
62{
63 if (m_directory.isEmpty())
64 qFatal(msg: "QQmlDataTest::initTestCase() not called.");
65 QString result = m_dataDirectory;
66 result += QLatin1Char('/');
67 result += fileName;
68 return result;
69}
70
71bool QQmlDataTest::canImportModule(const QString &importTestQmlSource) const
72{
73 QQmlEngine engine;
74 QQmlComponent component(&engine);
75 component.setData(importTestQmlSource.toLatin1(), baseUrl: QUrl());
76 return !component.isError();
77}
78
79Q_GLOBAL_STATIC(QMutex, qQmlTestMessageHandlerMutex)
80
81QQmlTestMessageHandler *QQmlTestMessageHandler::m_instance = nullptr;
82
83void QQmlTestMessageHandler::messageHandler(QtMsgType, const QMessageLogContext &context, const QString &message)
84{
85 QMutexLocker locker(qQmlTestMessageHandlerMutex());
86 if (QQmlTestMessageHandler::m_instance) {
87 if (QQmlTestMessageHandler::m_instance->m_includeCategories) {
88 QQmlTestMessageHandler::m_instance->m_messages.push_back(
89 t: QString::fromLatin1(ba: "%1: %2").arg(args: QString::fromUtf8(utf8: context.category), args: message));
90 } else {
91 QQmlTestMessageHandler::m_instance->m_messages.push_back(t: message);
92 }
93 }
94}
95
96QQmlTestMessageHandler::QQmlTestMessageHandler()
97{
98 QMutexLocker locker(qQmlTestMessageHandlerMutex());
99 Q_ASSERT(!QQmlTestMessageHandler::m_instance);
100 QQmlTestMessageHandler::m_instance = this;
101 m_oldHandler = qInstallMessageHandler(messageHandler);
102 m_includeCategories = false;
103}
104
105QQmlTestMessageHandler::~QQmlTestMessageHandler()
106{
107 QMutexLocker locker(qQmlTestMessageHandlerMutex());
108 Q_ASSERT(QQmlTestMessageHandler::m_instance);
109 qInstallMessageHandler(m_oldHandler);
110 QQmlTestMessageHandler::m_instance = nullptr;
111}
112
113
114bool gcDone(const QV4::ExecutionEngine *engine) {
115 return !engine->memoryManager->gcStateMachine->inProgress();
116}
117
118void gc(QV4::ExecutionEngine &engine, GCFlags flags)
119{
120 engine.memoryManager->runGC();
121 while (!gcDone(engine: &engine))
122 engine.memoryManager->gcStateMachine->step();
123 if (int(GCFlags::DontSendPostedEvents) & int(flags))
124 return;
125 QCoreApplication::sendPostedEvents(receiver: nullptr, event_type: QEvent::DeferredDelete);
126 QCoreApplication::processEvents();
127}
128
129bool gcDone(QQmlEngine *engine) {
130 auto priv = QQmlEnginePrivate::get(e: engine);
131 return gcDone(engine: priv->v4engine());
132}
133
134void gc(QQmlEngine &engine, GCFlags flags)
135{
136 auto priv = QQmlEnginePrivate::get(e: &engine);
137 gc(engine&: *priv->v4engine(), flags);
138}
139
140
141QT_END_NAMESPACE
142
143#include "moc_qmlutils_p.cpp"
144

source code of qtdeclarative/src/quicktestutils/qml/qmlutils.cpp