Erick / Mbed 2 deprecated ICE_BLE_TEST

Important changes to repositories hosted on mbed.com

Mbed hosted mercurial repositories are deprecated and are due to be permanently deleted in July 2026.

To keep a copy of this software download the repository Zip archive or clone locally using Mercurial.

It is also possible to export all your personal repositories from the account settings page.

Dependencies:   NaturalTinyShell_ice libmDot-12Sept mbed-rtos mbed

Fork of ICE by Erick

src/ModbusMaster/ModbusMaster.cpp@147:105bcf234f81, 2016-09-28 (annotated)

Committer:
davidjhoward
Date:
Wed Sep 28 12:34:34 2016 +0000
Revision:
147:105bcf234f81
Parent:
123:ce602c91a9c3
Child:
148:ee3cbaafe355
clean up destroy command from cloud

Who changed what in which revision?

UserRevisionLine numberNew contents of line
jmarkel44 0:65cfa4873284 1 /******************************************************************************
davidjhoward 4:c35db3946fd8 2 *
jmarkel44 0:65cfa4873284 3 * File: ModbusMaster.cpp
jmarkel44 0:65cfa4873284 4 * Desciption: source for the ICE Modbus Master
jmarkel44 0:65cfa4873284 5 *
jmarkel44 0:65cfa4873284 6 *****************************************************************************/
jmarkel44 0:65cfa4873284 7 #include "global.h"
jmarkel44 0:65cfa4873284 8 #include <stdio.h>
davidjhoward 31:4b1587034318 9 #include "MTSLog.h"
jmarkel44 0:65cfa4873284 10 #include "BLEDataHandler.h"
davidjhoward 4:c35db3946fd8 11 #include "ModbusMaster.h"
davidjhoward 8:abe51ae5ef8b 12 #include "MbedJSONValue.h"
jmarkel44 0:65cfa4873284 13
davidjhoward 81:d45bfa16953a 14 DigitalOut dout1(PC_1);
davidjhoward 81:d45bfa16953a 15 DigitalOut dout2(PA_1);
davidjhoward 81:d45bfa16953a 16
jmarkel44 0:65cfa4873284 17 /*****************************************************************************
jmarkel44 0:65cfa4873284 18 * Function: ModbusMaster
jmarkel44 0:65cfa4873284 19 * Description: entry point for the Modbus Master
jmarkel44 0:65cfa4873284 20 *
jmarkel44 0:65cfa4873284 21 * @param (IN) args (user-defined arguments)
jmarkel44 0:65cfa4873284 22 * @return none
jmarkel44 0:65cfa4873284 23 *****************************************************************************/
davidjhoward 42:c703a60993b1 24 char ModbusMasterScratchBuf[1024];
jmarkel44 0:65cfa4873284 25 void ModbusMaster(void const *args)
jmarkel44 0:65cfa4873284 26 {
davidjhoward 31:4b1587034318 27 logInfo("%s ModbusMaster has started...", __func__);
davidjhoward 15:a6ee32969e8e 28 bool status;
davidjhoward 81:d45bfa16953a 29 bool input;
davidjhoward 82:f3e495a98877 30 bool move_up = true;
davidjhoward 8:abe51ae5ef8b 31 MbedJSONValue json_value;
davidjhoward 81:d45bfa16953a 32
davidjhoward 54:ec1b03064bbd 33 modbus_init(MB_BAUD_RATE);
davidjhoward 54:ec1b03064bbd 34 DigitalOut flu_power(PA_11);
davidjhoward 54:ec1b03064bbd 35 flu_power = 0; // provide power to the modbus
jmarkel44 0:65cfa4873284 36
davidjhoward 39:9287c7d59016 37 while( true ) {
davidjhoward 8:abe51ae5ef8b 38
davidjhoward 39:9287c7d59016 39 // configure modbus registers based in all files that start with "input"
davidjhoward 39:9287c7d59016 40 std::vector<mDot::mdot_file> file_list = GLOBAL_mdot->listUserFiles();
davidjhoward 39:9287c7d59016 41 for (std::vector<mDot::mdot_file>::iterator i = file_list.begin(); i != file_list.end(); ++i) {
davidjhoward 8:abe51ae5ef8b 42
davidjhoward 81:d45bfa16953a 43 input = true;
davidjhoward 81:d45bfa16953a 44 if( (strncmp( i->name, "input", (strlen("input")-1)) == 0) ||
davidjhoward 81:d45bfa16953a 45 (strncmp( i->name, "output", (strlen("output")-1)) == 0)) {
davidjhoward 8:abe51ae5ef8b 46
davidjhoward 81:d45bfa16953a 47 if( (strncmp( i->name, "output", (strlen("output")-1)) == 0) ) {
davidjhoward 81:d45bfa16953a 48 input = false;
davidjhoward 81:d45bfa16953a 49 }
davidjhoward 81:d45bfa16953a 50
davidjhoward 81:d45bfa16953a 51 logInfo("(%d)FOUND FILE: %s", __LINE__, i->name);
davidjhoward 42:c703a60993b1 52
davidjhoward 49:0456ee2271be 53 status = GLOBAL_mdot->readUserFile(i->name, ModbusMasterScratchBuf, 1024);
davidjhoward 39:9287c7d59016 54 if( status != true ) {
davidjhoward 45:3b9e1923cb15 55 logInfo("(%d)read file failed, status=%d", __LINE__, status);
davidjhoward 39:9287c7d59016 56 } else {
davidjhoward 45:3b9e1923cb15 57 logInfo("(%d)Read File SUCCESS: %s", __LINE__, ModbusMasterScratchBuf );
davidjhoward 39:9287c7d59016 58 }
davidjhoward 81:d45bfa16953a 59
davidjhoward 42:c703a60993b1 60 parse( json_value, ModbusMasterScratchBuf );
davidjhoward 9:ef0ca2f8a8a6 61
davidjhoward 39:9287c7d59016 62 std::string id = json_value["id"].get<std::string>().c_str();
davidjhoward 39:9287c7d59016 63 ModbusRegisterMap[id].name = json_value["name"].get<std::string>().c_str();
davidjhoward 39:9287c7d59016 64 ModbusRegisterMap[id].units = json_value["units"].get<std::string>().c_str();
davidjhoward 39:9287c7d59016 65 ModbusRegisterMap[id].min = atof(json_value["min"].get<std::string>().c_str());
davidjhoward 39:9287c7d59016 66 ModbusRegisterMap[id].max = atof(json_value["max"].get<std::string>().c_str());
davidjhoward 39:9287c7d59016 67 ModbusRegisterMap[id].node = atoi(json_value["node"].get<std::string>().c_str());
davidjhoward 39:9287c7d59016 68 ModbusRegisterMap[id].reg = atoi(json_value["reg"].get<std::string>().c_str());
davidjhoward 39:9287c7d59016 69 ModbusRegisterMap[id].rtype = atoi(json_value["rtype"].get<std::string>().c_str());
davidjhoward 39:9287c7d59016 70 ModbusRegisterMap[id].type = atoi(json_value["type"].get<std::string>().c_str());
davidjhoward 39:9287c7d59016 71 ModbusRegisterMap[id].size = atoi(json_value["size"].get<std::string>().c_str());
davidjhoward 39:9287c7d59016 72 ModbusRegisterMap[id].order = atoi(json_value["order"].get<std::string>().c_str());
davidjhoward 39:9287c7d59016 73 ModbusRegisterMap[id].fmt = json_value["fmt"].get<std::string>().c_str();
davidjhoward 49:0456ee2271be 74 ModbusRegisterMap[id].rfreq = atoi(json_value["rfreq"].get<std::string>().c_str());
davidjhoward 81:d45bfa16953a 75 ModbusRegisterMap[id].input = input;
davidjhoward 82:f3e495a98877 76 ModbusRegisterMap[id].simulated = false;
davidjhoward 15:a6ee32969e8e 77 }
davidjhoward 4:c35db3946fd8 78 }
davidjhoward 31:4b1587034318 79
davidjhoward 39:9287c7d59016 80 // read modbus registers that have been configured.
davidjhoward 39:9287c7d59016 81 while ( true ) {
davidjhoward 39:9287c7d59016 82
davidjhoward 39:9287c7d59016 83 std::map<std::string, ModbusRegister>::iterator iter;
davidjhoward 39:9287c7d59016 84 for (iter = ModbusRegisterMap.begin(); iter != ModbusRegisterMap.end(); ++iter) {
davidjhoward 82:f3e495a98877 85 if( iter->second.simulated == true ) {
davidjhoward 82:f3e495a98877 86 std::map<std::string, SimulateInput>::iterator iter;
davidjhoward 82:f3e495a98877 87 for (iter = SimulateInputMap.begin(); iter != SimulateInputMap.end(); ++iter) {
davidjhoward 82:f3e495a98877 88 if( (SimulateInputMap[iter->first].min == 0) && (SimulateInputMap[iter->first].max == 0) ) {
davidjhoward 82:f3e495a98877 89 ModbusRegisterMap[iter->first].float_value = SimulateInputMap[iter->first].start_value;
davidjhoward 82:f3e495a98877 90 } else {
davidjhoward 82:f3e495a98877 91 if( ModbusRegisterMap[iter->first].float_value >= SimulateInputMap[iter->first].max ) {
davidjhoward 82:f3e495a98877 92 move_up = false;
davidjhoward 82:f3e495a98877 93 ModbusRegisterMap[iter->first].float_value = ModbusRegisterMap[iter->first].float_value - SimulateInputMap[iter->first].step;
davidjhoward 82:f3e495a98877 94 } else if( ModbusRegisterMap[iter->first].float_value <= SimulateInputMap[iter->first].min ) {
davidjhoward 82:f3e495a98877 95 move_up = true;
davidjhoward 82:f3e495a98877 96 ModbusRegisterMap[iter->first].float_value = ModbusRegisterMap[iter->first].float_value + SimulateInputMap[iter->first].step;
davidjhoward 82:f3e495a98877 97 } else {
davidjhoward 82:f3e495a98877 98 if( move_up == true ) {
davidjhoward 82:f3e495a98877 99 ModbusRegisterMap[iter->first].float_value = ModbusRegisterMap[iter->first].float_value + SimulateInputMap[iter->first].step;
davidjhoward 82:f3e495a98877 100 } else {
davidjhoward 82:f3e495a98877 101 ModbusRegisterMap[iter->first].float_value = ModbusRegisterMap[iter->first].float_value - SimulateInputMap[iter->first].step;
davidjhoward 82:f3e495a98877 102 }
davidjhoward 82:f3e495a98877 103 }
davidjhoward 147:105bcf234f81 104 logInfo("simulating input=%s, value=%2.2f",iter->first.c_str(), ModbusRegisterMap[iter->first].float_value);
davidjhoward 82:f3e495a98877 105 }
davidjhoward 82:f3e495a98877 106 }
davidjhoward 82:f3e495a98877 107 continue;
davidjhoward 82:f3e495a98877 108 }
davidjhoward 147:105bcf234f81 109
davidjhoward 147:105bcf234f81 110 if( iter->second.node != 0 ) {
davidjhoward 147:105bcf234f81 111
davidjhoward 147:105bcf234f81 112 logInfo("Processing Input: node=%d, reg=%d, size=%d, order=%d", iter->second.node, iter->second.reg, iter->second.size, iter->second.order );
davidjhoward 147:105bcf234f81 113 SendModbusCommand(iter->second.node, iter->second.reg, iter->second.size);
davidjhoward 147:105bcf234f81 114 Thread::wait(30);
davidjhoward 39:9287c7d59016 115
davidjhoward 147:105bcf234f81 116 switch( iter->second.type ) {
davidjhoward 147:105bcf234f81 117 case TYPE_32BIT_FLOAT:
davidjhoward 147:105bcf234f81 118 float float_value;
davidjhoward 147:105bcf234f81 119 status = ReadModbus_32bit_float( &float_value, iter->second.order );
davidjhoward 147:105bcf234f81 120 if( status == true ) {
davidjhoward 147:105bcf234f81 121 ModbusRegisterMap[iter->first].float_value = float_value;
davidjhoward 147:105bcf234f81 122 logInfo("Modbus Tag:%s value=%2.2f", iter->first.c_str(), float_value );
davidjhoward 147:105bcf234f81 123 } else {
davidjhoward 147:105bcf234f81 124 logInfo("Modbus Read Failed, tag=%s", iter->first.c_str() );
davidjhoward 147:105bcf234f81 125 }
davidjhoward 147:105bcf234f81 126 break;
davidjhoward 147:105bcf234f81 127 case TYPE_32BIT_INT:
davidjhoward 147:105bcf234f81 128 break;
davidjhoward 147:105bcf234f81 129 case TYPE_32BIT_UINT:
davidjhoward 147:105bcf234f81 130 break;
davidjhoward 147:105bcf234f81 131 case TYPE_16BIT_INT:
davidjhoward 147:105bcf234f81 132 break;
davidjhoward 147:105bcf234f81 133 case TYPE_16BIT_UINT:
davidjhoward 147:105bcf234f81 134 break;
davidjhoward 147:105bcf234f81 135 default:
davidjhoward 147:105bcf234f81 136 break;
davidjhoward 147:105bcf234f81 137 }
davidjhoward 39:9287c7d59016 138 }
davidjhoward 82:f3e495a98877 139
davidjhoward 82:f3e495a98877 140 if( iter->second.input == false ) {
davidjhoward 83:0f76cfbb4eba 141 if( iter->second.node == 0 ) {
davidjhoward 83:0f76cfbb4eba 142 logInfo("processing PIN output=%s, reg=%d, value=%d",iter->first.c_str(), ModbusRegisterMap[iter->first].reg, (bool)ModbusRegisterMap[iter->first].float_value);
davidjhoward 83:0f76cfbb4eba 143 if( ModbusRegisterMap[iter->first].reg == 1 ) {
davidjhoward 83:0f76cfbb4eba 144 dout1 = (bool)ModbusRegisterMap[iter->first].float_value;
davidjhoward 83:0f76cfbb4eba 145 } else {
davidjhoward 83:0f76cfbb4eba 146 dout2 = (bool)ModbusRegisterMap[iter->first].float_value;
davidjhoward 83:0f76cfbb4eba 147 }
jmarkel44 88:8a1a2bba8850 148
davidjhoward 81:d45bfa16953a 149 }
davidjhoward 81:d45bfa16953a 150 }
davidjhoward 39:9287c7d59016 151 }
davidjhoward 39:9287c7d59016 152
davidjhoward 39:9287c7d59016 153 osEvent evt = ModbusMasterMailBox.get(50);
davidjhoward 39:9287c7d59016 154 if (evt.status == osEventMail) {
davidjhoward 39:9287c7d59016 155 Message_t *mail = (Message_t*)evt.value.p;
davidjhoward 39:9287c7d59016 156 logInfo("Mail Received: Action: %d, New Input File: %s", mail->action, mail->controlFile);
davidjhoward 39:9287c7d59016 157 ModbusMasterMailBox.free(mail);
davidjhoward 39:9287c7d59016 158 ModbusRegisterMap.clear();
davidjhoward 39:9287c7d59016 159 break;
davidjhoward 39:9287c7d59016 160 }
davidjhoward 57:5f18ae91c7c7 161 Thread::wait(5000);
davidjhoward 31:4b1587034318 162 }
jmarkel44 0:65cfa4873284 163 }
davidjhoward 4:c35db3946fd8 164 }
davidjhoward 4:c35db3946fd8 165
davidjhoward 4:c35db3946fd8 166
davidjhoward 4:c35db3946fd8 167 volatile char modbus_buffer_char;
davidjhoward 4:c35db3946fd8 168 volatile bool modbus_interrupt_complete = false;
davidjhoward 4:c35db3946fd8 169
davidjhoward 4:c35db3946fd8 170 uint8_t modbus_input_buffer[SIZE_MB_BUFFER];// 1byte address + 1 byte function +1 byte number of regs + 12 bytes of data + 2 bytes for crc response frame from slave
davidjhoward 4:c35db3946fd8 171 volatile uint8_t modbus_input_buffer_counter = 0;
davidjhoward 4:c35db3946fd8 172
davidjhoward 4:c35db3946fd8 173 //Frame crc calucation
davidjhoward 4:c35db3946fd8 174 uint16_t modbus_crc(uint8_t* buf, int len)
davidjhoward 4:c35db3946fd8 175 {
davidjhoward 4:c35db3946fd8 176 uint16_t crc = 0xFFFF;
davidjhoward 4:c35db3946fd8 177
davidjhoward 4:c35db3946fd8 178 for (int pos = 0; pos < len; pos++) {
davidjhoward 4:c35db3946fd8 179 crc ^= (uint16_t)buf[pos]; // XOR byte into least sig. byte of crc
davidjhoward 4:c35db3946fd8 180
davidjhoward 4:c35db3946fd8 181 for (int i = 8; i != 0; i--) {
davidjhoward 4:c35db3946fd8 182 // Loop over each bit
davidjhoward 4:c35db3946fd8 183 if ((crc & 0x0001) != 0) {
davidjhoward 4:c35db3946fd8 184 // If the LSB is set
davidjhoward 4:c35db3946fd8 185 crc >>= 1; // Shift right and XOR 0xA001
davidjhoward 4:c35db3946fd8 186 crc ^= 0xA001;
davidjhoward 4:c35db3946fd8 187 } else // Else LSB is not set
davidjhoward 4:c35db3946fd8 188 crc >>= 1; // Just shift right
davidjhoward 4:c35db3946fd8 189 }
davidjhoward 4:c35db3946fd8 190 }
davidjhoward 4:c35db3946fd8 191 // Note, this number has low and high bytes swapped, so use it accordingly (or swap bytes)
davidjhoward 4:c35db3946fd8 192 return crc;
davidjhoward 4:c35db3946fd8 193 }
davidjhoward 4:c35db3946fd8 194
davidjhoward 4:c35db3946fd8 195 RawSerial modbus(PA_2, PA_3);
davidjhoward 57:5f18ae91c7c7 196 DigitalOut mod_de(PB_0);
davidjhoward 57:5f18ae91c7c7 197 DigitalOut mod_re(PB_1);
davidjhoward 4:c35db3946fd8 198
davidjhoward 4:c35db3946fd8 199 void modbus_init( uint16_t baudRate )
davidjhoward 4:c35db3946fd8 200 {
davidjhoward 4:c35db3946fd8 201 modbus.baud(baudRate);
davidjhoward 4:c35db3946fd8 202 modbus.attach(&modbus_recv, RawSerial::RxIrq);
davidjhoward 4:c35db3946fd8 203 }
davidjhoward 4:c35db3946fd8 204
davidjhoward 4:c35db3946fd8 205 //call back when character goes into RX buffer for RS485 modbus
davidjhoward 4:c35db3946fd8 206 void modbus_recv()
davidjhoward 4:c35db3946fd8 207 {
davidjhoward 4:c35db3946fd8 208
davidjhoward 4:c35db3946fd8 209 if (modbus.readable()) {
davidjhoward 4:c35db3946fd8 210 modbus_buffer_char = modbus.getc();
davidjhoward 4:c35db3946fd8 211 if (modbus_input_buffer_counter == 0 && modbus_buffer_char == 0x00) {
davidjhoward 4:c35db3946fd8 212 modbus_input_buffer_counter = 0;
davidjhoward 4:c35db3946fd8 213 } else {
davidjhoward 4:c35db3946fd8 214 modbus_input_buffer[modbus_input_buffer_counter] = modbus_buffer_char;
davidjhoward 4:c35db3946fd8 215 modbus_input_buffer_counter++;
davidjhoward 4:c35db3946fd8 216 }
davidjhoward 4:c35db3946fd8 217 }
davidjhoward 4:c35db3946fd8 218
davidjhoward 4:c35db3946fd8 219 if (modbus_input_buffer_counter > modbus_input_buffer[2] + 4) {
davidjhoward 4:c35db3946fd8 220 modbus_interrupt_complete = true;
davidjhoward 4:c35db3946fd8 221 modbus_input_buffer_counter = 0;
davidjhoward 4:c35db3946fd8 222 }
davidjhoward 4:c35db3946fd8 223 }
davidjhoward 4:c35db3946fd8 224
davidjhoward 4:c35db3946fd8 225 // Read modbus master frame
davidjhoward 9:ef0ca2f8a8a6 226 void SendModbusCommand(uint8_t slave_address, uint16_t firstReg, uint16_t noRegs)
davidjhoward 4:c35db3946fd8 227 {
davidjhoward 4:c35db3946fd8 228 uint8_t L1V[8] = {slave_address, 0x04, 0x00, 0x02, 0x00, 0x02, 0xD1, 0x16};
davidjhoward 4:c35db3946fd8 229
davidjhoward 4:c35db3946fd8 230 L1V[2] = (firstReg >> 8) & 0xFF;
davidjhoward 4:c35db3946fd8 231 L1V[3] = firstReg & 0xFF;
davidjhoward 4:c35db3946fd8 232 L1V[4] = (noRegs >> 8) & 0xFF;
davidjhoward 4:c35db3946fd8 233 L1V[5] = noRegs & 0xFF;
davidjhoward 4:c35db3946fd8 234 L1V[6] = modbus_crc(L1V,6) & 0xFF;
davidjhoward 4:c35db3946fd8 235 L1V[7] = (modbus_crc(L1V,6)>>8) & 0xFF;
davidjhoward 4:c35db3946fd8 236
davidjhoward 57:5f18ae91c7c7 237 mod_de = 1;
davidjhoward 57:5f18ae91c7c7 238 mod_re = 1;
davidjhoward 57:5f18ae91c7c7 239 Thread::wait(1);
davidjhoward 4:c35db3946fd8 240 for (uint8_t i = 0; i < 8; i++)
davidjhoward 4:c35db3946fd8 241 modbus.putc(L1V[i]);
davidjhoward 4:c35db3946fd8 242
davidjhoward 57:5f18ae91c7c7 243 Thread::wait(2);
davidjhoward 57:5f18ae91c7c7 244 mod_de = 0;
davidjhoward 57:5f18ae91c7c7 245 mod_re = 0;
davidjhoward 4:c35db3946fd8 246
davidjhoward 4:c35db3946fd8 247 }
davidjhoward 4:c35db3946fd8 248
davidjhoward 4:c35db3946fd8 249 bool mbInterruptComplete()
davidjhoward 4:c35db3946fd8 250 {
davidjhoward 4:c35db3946fd8 251 if (modbus_interrupt_complete) {
davidjhoward 4:c35db3946fd8 252 modbus_interrupt_complete = false;
davidjhoward 4:c35db3946fd8 253 return true;
davidjhoward 4:c35db3946fd8 254 } else {
davidjhoward 4:c35db3946fd8 255 return false;
davidjhoward 4:c35db3946fd8 256 }
davidjhoward 4:c35db3946fd8 257 }
davidjhoward 4:c35db3946fd8 258
davidjhoward 15:a6ee32969e8e 259 bool ReadModbus_32bit_float( float *float_value, int order )
davidjhoward 4:c35db3946fd8 260 {
davidjhoward 15:a6ee32969e8e 261 MR_REGISTER_32_BIT_FLOAT value;
davidjhoward 31:4b1587034318 262
davidjhoward 4:c35db3946fd8 263 if (mbInterruptComplete() != true ) {
davidjhoward 4:c35db3946fd8 264 return false;
davidjhoward 4:c35db3946fd8 265 }
davidjhoward 4:c35db3946fd8 266
davidjhoward 15:a6ee32969e8e 267 switch( order ) {
davidjhoward 31:4b1587034318 268 case BigEndian:
davidjhoward 15:a6ee32969e8e 269 value.b.lo_lo = modbus_input_buffer[6];
davidjhoward 15:a6ee32969e8e 270 value.b.lo_hi = modbus_input_buffer[5];
davidjhoward 15:a6ee32969e8e 271 value.b.hi_lo = modbus_input_buffer[4];
davidjhoward 15:a6ee32969e8e 272 value.b.hi_hi = modbus_input_buffer[3];
davidjhoward 15:a6ee32969e8e 273 break;
davidjhoward 15:a6ee32969e8e 274 case BigEndianReverseWord:
davidjhoward 15:a6ee32969e8e 275 value.b.lo_lo = modbus_input_buffer[4];
davidjhoward 15:a6ee32969e8e 276 value.b.lo_hi = modbus_input_buffer[3];
davidjhoward 15:a6ee32969e8e 277 value.b.hi_lo = modbus_input_buffer[6];
davidjhoward 15:a6ee32969e8e 278 value.b.hi_hi = modbus_input_buffer[5];
davidjhoward 15:a6ee32969e8e 279 break;
davidjhoward 15:a6ee32969e8e 280 default:
davidjhoward 15:a6ee32969e8e 281 return false;
davidjhoward 15:a6ee32969e8e 282 }
davidjhoward 15:a6ee32969e8e 283 *float_value = value.f;
davidjhoward 4:c35db3946fd8 284 return true;
davidjhoward 4:c35db3946fd8 285 }