Blame view

src/ModbusAdapter.cpp 8.47 KB
cadcf24a   Peter M. Groen   Setting up workin...
1
2
  
  #include "ConnectionConfig.h"
cadcf24a   Peter M. Groen   Setting up workin...
3
  #include "ModbusAdapter.h"
cadcf24a   Peter M. Groen   Setting up workin...
4
5
6
  
  #include <cstring>  /// Added for memset functionality
  
cadcf24a   Peter M. Groen   Setting up workin...
7
8
9
  ModbusAdapter::ModbusAdapter()
      : m_modbus( nullptr )
  {
5735b406   Peter M. Groen   Revert "Setting u...
10
      this->InitBuffers();
cadcf24a   Peter M. Groen   Setting up workin...
11
12
13
14
15
16
17
  }
  
  ModbusAdapter::~ModbusAdapter()
  {
  
  }
  
5735b406   Peter M. Groen   Revert "Setting u...
18
  bool ModbusAdapter::ModbusConnect( const ConnectionConfig &conncfg )
cadcf24a   Peter M. Groen   Setting up workin...
19
20
21
  {
      if( m_connected )
      {
b85a3e4a   Peter M. Groen   Setting up workin...
22
          this->ModbusDisconnect();   // Will already set m_connected
cadcf24a   Peter M. Groen   Setting up workin...
23
24
      }
  
5735b406   Peter M. Groen   Revert "Setting u...
25
      m_connType = conncfg.getType();
cadcf24a   Peter M. Groen   Setting up workin...
26
27
28
29
  
      switch( m_connType )
      {
          case ConnectionType::CT_SERIAL:
5735b406   Peter M. Groen   Revert "Setting u...
30
              m_connected = this->ModbusConnectRTU( conncfg.getPort(), conncfg.getBaudRate(), conncfg.getParity(), conncfg.getDataBits(), conncfg.getStopBits(), conncfg.getTimeOut(), MODBUS_RTU_RTS_NONE );
cadcf24a   Peter M. Groen   Setting up workin...
31
32
33
              break;
  
          case ConnectionType::CT_TCP:
5735b406   Peter M. Groen   Revert "Setting u...
34
              m_connected = this->ModbusConnectTCP( conncfg.getIpAddress(), conncfg.getTcpPort(), 10 );
cadcf24a   Peter M. Groen   Setting up workin...
35
36
37
38
39
40
              break;
  
          default:
              // throw a sensible message or return an errorcode.
              break;
      }
b85a3e4a   Peter M. Groen   Setting up workin...
41
      return m_connected;
cadcf24a   Peter M. Groen   Setting up workin...
42
43
  }
  
b85a3e4a   Peter M. Groen   Setting up workin...
44
  bool ModbusAdapter::ModbusDisconnect()
cadcf24a   Peter M. Groen   Setting up workin...
45
46
47
48
49
50
51
52
53
54
55
  {
      if( m_modbus != nullptr )
      {
          if( m_connected )
          {
              modbus_close( m_modbus );
              modbus_free( m_modbus );
          }
          // Clean up after ourselves.
          m_modbus = nullptr;
      }
b85a3e4a   Peter M. Groen   Setting up workin...
56
  
cadcf24a   Peter M. Groen   Setting up workin...
57
      m_connected = false;
b85a3e4a   Peter M. Groen   Setting up workin...
58
      return true;
cadcf24a   Peter M. Groen   Setting up workin...
59
60
61
62
63
64
65
66
67
68
  }
  
  modbusData ModbusAdapter::ModbusReadData( int slaveId, int functionCode, int startAddress, int noOfItems )
  {
      if( m_modbus == nullptr )
      {
          // No context
          return modbusData();
      }
  
cadcf24a   Peter M. Groen   Setting up workin...
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
      int resultValue = -1;
      bool is16Bit = false;
  
      modbus_set_slave( m_modbus, slaveId );
  
      // Request data from modbus.
      switch( functionCode )
      {
          case MODBUS_FC_READ_COILS:
              resultValue = modbus_read_bits( m_modbus, startAddress, noOfItems, m_dest );
              break;
          case MODBUS_FC_READ_DISCRETE_INPUTS:
              resultValue = modbus_read_input_bits( m_modbus, startAddress, noOfItems, m_dest );
              break;
          case MODBUS_FC_READ_HOLDING_REGISTERS:
              resultValue = modbus_read_registers( m_modbus, startAddress, noOfItems, m_dest16 );
              break;
          case MODBUS_FC_READ_INPUT_REGISTERS:
              resultValue = modbus_read_input_registers( m_modbus, startAddress, noOfItems, m_dest16 );
              break;
  
          default:
              break;
  
      }
  
      // Read the databuffers
      if( resultValue != noOfItems )
      {
          return modbusData();
      }
  
      modbusData resultData;
      for( int index = 0; index < noOfItems; ++index )
      {
          resultData.push_back( (is16Bit ? static_cast<uint16_t>(m_dest16[index]) : static_cast<uint16_t>(m_dest[index])) );
      }
  
      modbus_flush( m_modbus );   // flush data
      this->ClearBuffers();
  
      return resultData;
  }
  
  modbusData ModbusAdapter::ModbusReadHoldReg( int slaveId, int startAddress, int noOfItems )
  {
      if( m_modbus == nullptr )
      {
          return modbusData();
      }
  
      int resultValue = -1;       /// Return value from read functions
  
      // -- Start Critical Section --- ?? //
  
      modbus_set_slave( m_modbus, slaveId );
      /// Request data from modbus
      resultValue = modbus_read_registers( m_modbus, startAddress, noOfItems, m_dest16 );
  
      /// Read the databuffers
      if( resultValue != noOfItems )
      {
          return modbusData();
      }
  
      modbusData resultData;
      for( int index = 0; index < noOfItems; ++index )
      {
          resultData.push_back( static_cast<uint16_t>(m_dest16[index]) );
      }
  
      modbus_flush( m_modbus );
5735b406   Peter M. Groen   Revert "Setting u...
141
      this->ClearBuffers();
cadcf24a   Peter M. Groen   Setting up workin...
142
143
144
145
146
147
148
149
150
151
  
      // -- End Critical Section --- ?? //
  
      return resultData;
  }
  
  void ModbusAdapter::ModBusWriteData( int slaveId, int functionCode, int startAddress, int noOfItems, std::vector<int>values )
  {
      if( m_modbus == nullptr )
      {
b85a3e4a   Peter M. Groen   Setting up workin...
152
          // No modbus context. Sensible log-line and exit.
cadcf24a   Peter M. Groen   Setting up workin...
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
          return;
      }
  
      // ------------------------------------------------
      // Create 8 bits databuffer
      auto * data8 = new uint8_t[noOfItems];
      for( int index = 0; index < noOfItems; ++index )
      {
          data8[index] = values[index];
      }
  
      // Create same buffer for 16 bits data
      auto * data16 = new uint8_t[noOfItems];
      for( int index = 0; index < noOfItems; ++index )
      {
          data16[index] = values[index];
      }
      // ------------------------------------------------
  
      int resultValue = -1;
  
      modbus_set_slave( m_modbus, slaveId );
  
      // Request data from modbus
      switch( functionCode )
      {
          case MODBUS_FC_WRITE_SINGLE_COIL:
              resultValue = modbus_write_bit( m_modbus, startAddress, values[0] );
              noOfItems = 1;
              break;
          case MODBUS_FC_WRITE_SINGLE_REGISTER:
              resultValue = modbus_write_register( m_modbus, startAddress, values[0] );
              noOfItems = 1;
              break;
          case MODBUS_FC_WRITE_MULTIPLE_COILS:
  
              resultValue = modbus_write_bits( m_modbus, startAddress, noOfItems, data8 );
              break;
          case MODBUS_FC_WRITE_MULTIPLE_REGISTERS:
              resultValue = modbus_write_bits( m_modbus, startAddress, noOfItems, data16 );
              break;
      }
  
5735b406   Peter M. Groen   Revert "Setting u...
196
197
      delete[]  data8;
      delete[] data16;
cadcf24a   Peter M. Groen   Setting up workin...
198
199
200
201
202
203
204
205
206
207
208
209
210
      modbus_flush(m_modbus); // Flush data.
  
      if( resultValue != noOfItems )
      {
          // Create a log line that writing the register failed. Maybe increment ErrorCounter(s)
      }
  }
  
  bool ModbusAdapter::isConnected() const
  {
      return m_connected;
  }
  
46785270   Peter M. Groen   Setting up workin...
211
  std::string ModbusAdapter::ErrorString( int errnum ) const
cadcf24a   Peter M. Groen   Setting up workin...
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
  {
      switch(errnum)
      {
          case EINVAL:
              return "Protocol context is NULL";
              break;
          case ETIMEDOUT:
              return "Timeout";
              break;
          case ECONNRESET:
              return "Connection reset";
              break;
          case ECONNREFUSED:
              return "Connection refused";
              break;
          case EPIPE:
              return "Socket error";
              break;
          default:
              return modbus_strerror(errno);
      }
  }
  
  /* ============= PRIVATE METHODS ============= */
5735b406   Peter M. Groen   Revert "Setting u...
236
  bool ModbusAdapter::ModbusConnectRTU( const std::string &serialport, int baud, char parity, int dataBits, int stopBits, int RTS, int timeOut )
cadcf24a   Peter M. Groen   Setting up workin...
237
  {
5735b406   Peter M. Groen   Revert "Setting u...
238
      m_modbus = modbus_new_rtu( serialport.c_str(), baud, parity, dataBits, stopBits, RTS );
cadcf24a   Peter M. Groen   Setting up workin...
239
240
241
242
243
244
245
246
247
  
  #ifdef LIB_MODBUS_DEBUG_OUTPUT
      // Do sensible logging through PRIVA_LOG
      m_modbus_set_debug( m_modbus, 1 );
  #endif
      if( m_modbus == nullptr )
      {
          // We can stop here. Nothing to be done as we don't have a valid context
          // Log to PRIVA_LOG
b85a3e4a   Peter M. Groen   Setting up workin...
248
249
          m_connected = false;
          return m_connected;
cadcf24a   Peter M. Groen   Setting up workin...
250
251
252
253
254
255
256
      }
      else if( m_modbus && modbus_connect( m_modbus ) == -1 )
      {
          // We could not connect to the selected serial port.
          // We can stop here. Nothing to be done as we don't have a valid connection
          modbus_free( m_modbus );
          m_connected = false;
b85a3e4a   Peter M. Groen   Setting up workin...
257
          return m_connected;
cadcf24a   Peter M. Groen   Setting up workin...
258
259
      }
  
b85a3e4a   Peter M. Groen   Setting up workin...
260
261
      m_connected = true;
  
cadcf24a   Peter M. Groen   Setting up workin...
262
      // Set recovery mode
5735b406   Peter M. Groen   Revert "Setting u...
263
      modbus_set_error_recovery( m_modbus, MODBUS_ERROR_RECOVERY_PROTOCOL );
cadcf24a   Peter M. Groen   Setting up workin...
264
265
266
267
  
      // Set the response timeout
      modbus_set_response_timeout( m_modbus, timeOut, 0 );
  
b85a3e4a   Peter M. Groen   Setting up workin...
268
      return m_connected;
cadcf24a   Peter M. Groen   Setting up workin...
269
270
  }
  
b85a3e4a   Peter M. Groen   Setting up workin...
271
  bool ModbusAdapter::ModbusConnectTCP( const std::string &ip, int port, int timeOut )
cadcf24a   Peter M. Groen   Setting up workin...
272
273
274
275
  {
      if( ip.empty() )
      {
          // Nothing to be done. Set an Logline to PRIVA_LOG and exit.
b85a3e4a   Peter M. Groen   Setting up workin...
276
          return false;
cadcf24a   Peter M. Groen   Setting up workin...
277
278
279
280
281
282
283
284
285
286
287
288
289
      }
  
      m_modbus = modbus_new_tcp( ip.c_str(), port );
  
  #ifdef LIB_MODBUS_DEBUG_OUTPUT
      // Do sensible logging through PRIVA_LOG
      m_modbus_set_debug( m_modbus, 1 );
  #endif
  
      if( m_modbus == nullptr )
      {
          // We can stop here. Nothing to be done as we don't have a valid context
          // Log to PRIVA_LOG
b85a3e4a   Peter M. Groen   Setting up workin...
290
          return false;
cadcf24a   Peter M. Groen   Setting up workin...
291
292
293
294
295
296
297
      }
      else if( m_modbus && modbus_connect( m_modbus ) == -1 )
      {
          // We could not connect to the selected serial port.
          // We can stop here. Nothing to be done as we don't have a valid connection
          modbus_free( m_modbus );
          m_connected = false;
b85a3e4a   Peter M. Groen   Setting up workin...
298
          return m_connected;
cadcf24a   Peter M. Groen   Setting up workin...
299
300
      }
  
b85a3e4a   Peter M. Groen   Setting up workin...
301
302
      m_connected = true;
  
cadcf24a   Peter M. Groen   Setting up workin...
303
      // Set recovery mode
5735b406   Peter M. Groen   Revert "Setting u...
304
      modbus_set_error_recovery( m_modbus, MODBUS_ERROR_RECOVERY_PROTOCOL );
cadcf24a   Peter M. Groen   Setting up workin...
305
306
307
308
  
      // Set the response timeout
      modbus_set_response_timeout( m_modbus, timeOut, 0 );
  
b85a3e4a   Peter M. Groen   Setting up workin...
309
      return m_connected;
cadcf24a   Peter M. Groen   Setting up workin...
310
  }
5735b406   Peter M. Groen   Revert "Setting u...
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
  
  void ModbusAdapter::InitBuffers()
  {
      // Setup memory for Data.
      m_dest = (uint8_t *)malloc(2000 + sizeof(uint8_t));
      m_dest16 = (uint16_t *)malloc(125 * sizeof(uint16_t));
  
      this->ClearBuffers();
  }
  
  void ModbusAdapter::ClearBuffers()
  {
      memset(m_dest, 0, 2000 * sizeof(uint8_t));
      memset(m_dest16, 0, 125 * sizeof(uint16_t));
  }