1/****************************************************************************
2**
3** Copyright (C) 2017 The Qt Company Ltd.
4** Contact: https://www.qt.io/licensing/
5**
6** This file is part of the examples of the QtSerialBus module.
7**
8** $QT_BEGIN_LICENSE:BSD$
9** Commercial License Usage
10** Licensees holding valid commercial Qt licenses may use this file in
11** accordance with the commercial license agreement provided with the
12** Software or, alternatively, in accordance with the terms contained in
13** a written agreement between you and The Qt Company. For licensing terms
14** and conditions see https://www.qt.io/terms-conditions. For further
15** information use the contact form at https://www.qt.io/contact-us.
16**
17** BSD License Usage
18** Alternatively, you may use this file under the terms of the BSD license
19** as follows:
20**
21** "Redistribution and use in source and binary forms, with or without
22** modification, are permitted provided that the following conditions are
23** met:
24** * Redistributions of source code must retain the above copyright
25** notice, this list of conditions and the following disclaimer.
26** * Redistributions in binary form must reproduce the above copyright
27** notice, this list of conditions and the following disclaimer in
28** the documentation and/or other materials provided with the
29** distribution.
30** * Neither the name of The Qt Company Ltd nor the names of its
31** contributors may be used to endorse or promote products derived
32** from this software without specific prior written permission.
33**
34**
35** THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
36** "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
37** LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
38** A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
39** OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
40** SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
41** LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
42** DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
43** THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
44** (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
45** OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE."
46**
47** $QT_END_LICENSE$
48**
49****************************************************************************/
50
51#ifndef MODBUSTCPCLIENT_P_H
52#define MODBUSTCPCLIENT_P_H
53
54#include "modbustcpclient.h"
55
56#include <QDebug>
57#include <QModbusReply>
58
59#include <private/qmodbustcpclient_p.h>
60
61QT_USE_NAMESPACE
62
63class ModbusTcpClientPrivate : private QModbusTcpClientPrivate
64{
65 Q_DECLARE_PUBLIC(ModbusTcpClient)
66
67public:
68 QModbusReply *enqueueRequest(const QModbusRequest &request, int, const QModbusDataUnit &unit,
69 QModbusReply::ReplyType type) override
70 {
71 auto writeToSocket = [this](const QModbusRequest &request) {
72 QByteArray buffer;
73 QDataStream output(&buffer, QIODevice::WriteOnly);
74 output << m_tId << m_pId << m_length << m_uId << request;
75
76 qint64 writtenBytes = m_socket->write(data: buffer);
77 if (writtenBytes == -1 || writtenBytes < buffer.size()) {
78 Q_Q(ModbusTcpClient);
79 qDebug() << "Cannot write request to socket.";
80 q->setError(errorText: QModbusTcpClient::tr(s: "Could not write request to socket."),
81 error: QModbusDevice::WriteError);
82 return false;
83 }
84 qDebug() << "Sent TCP ADU:" << buffer.toHex();
85 qDebug() << "Sent TCP PDU:" << request << "with tId:" << Qt::hex << m_tId;
86 return true;
87 };
88
89 if (!writeToSocket(request))
90 return nullptr;
91
92 Q_Q(ModbusTcpClient);
93 auto reply = new QModbusReply(type, m_uId, q);
94 const auto element = QueueElement{reply, request, unit, m_numberOfRetries,
95 m_responseTimeoutDuration};
96 m_transactionStore.insert(akey: m_tId, avalue: element);
97
98 q->connect(sender: q, signal: &QModbusClient::timeoutChanged,
99 receiver: element.timer.data(), slot: QOverload<int>::of(ptr: &QTimer::setInterval));
100 QObject::connect(sender: element.timer.data(), signal: &QTimer::timeout, context: q, slot: [this, writeToSocket]() {
101 if (!m_transactionStore.contains(akey: m_tId))
102 return;
103
104 QueueElement elem = m_transactionStore.take(akey: m_tId);
105 if (elem.reply.isNull())
106 return;
107
108 if (elem.numberOfRetries > 0) {
109 elem.numberOfRetries--;
110 if (!writeToSocket(elem.requestPdu))
111 return;
112 m_transactionStore.insert(akey: m_tId, avalue: elem);
113 elem.timer->start();
114 qDebug() << "Resend request with tId:" << Qt::hex << m_tId;
115 } else {
116 qDebug() << "Timeout of request with tId:" << Qt::hex << m_tId;
117 elem.reply->setError(error: QModbusDevice::TimeoutError,
118 errorText: QModbusClient::tr(s: "Request timeout."));
119 }
120 });
121 element.timer->start();
122 return reply;
123 }
124
125 quint16 m_tId = 0;
126 quint16 m_pId = 0;
127 quint16 m_length = 0;
128 quint8 m_uId = 0;
129};
130
131#endif // MODBUSTCPCLIENT_P_H
132

source code of qtserialbus/examples/serialbus/modbus/adueditor/modbustcpclient_p.h