Erick / Mbed 2 deprecated ICE_BLE_TEST

Dependencies:   NaturalTinyShell_ice libmDot-12Sept mbed-rtos mbed

Fork of ICE by Erick

Committer:
davidjhoward
Date:
Thu Oct 06 20:59:59 2016 +0000
Revision:
197:594afd088f32
Parent:
190:af7ab603c9fe
Child:
199:d65ed41d4dd4
adding modbus writes

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 197:594afd088f32 12 #include "ModbusMasterApi.h"
davidjhoward 190:af7ab603c9fe 13 #include "mod.h"
davidjhoward 8:abe51ae5ef8b 14 #include "MbedJSONValue.h"
jmarkel44 0:65cfa4873284 15
davidjhoward 81:d45bfa16953a 16 DigitalOut dout1(PC_1);
davidjhoward 81:d45bfa16953a 17 DigitalOut dout2(PA_1);
davidjhoward 148:ee3cbaafe355 18 DigitalIn flow_switch(PA_0);
davidjhoward 148:ee3cbaafe355 19 DigitalIn dinp2(PC_13);
davidjhoward 81:d45bfa16953a 20
jmarkel44 0:65cfa4873284 21 /*****************************************************************************
jmarkel44 0:65cfa4873284 22 * Function: ModbusMaster
jmarkel44 0:65cfa4873284 23 * Description: entry point for the Modbus Master
jmarkel44 0:65cfa4873284 24 *
jmarkel44 0:65cfa4873284 25 * @param (IN) args (user-defined arguments)
jmarkel44 0:65cfa4873284 26 * @return none
jmarkel44 0:65cfa4873284 27 *****************************************************************************/
davidjhoward 149:950c90425f7c 28 std::map<std::string,VirtualCommand> VirtualCommandMap;
davidjhoward 149:950c90425f7c 29
jmarkel44 177:9ec90c8e3ce1 30 char ModbusMasterScratchBuf[MAX_FILE_SIZE];
jmarkel44 0:65cfa4873284 31 void ModbusMaster(void const *args)
jmarkel44 0:65cfa4873284 32 {
davidjhoward 31:4b1587034318 33 logInfo("%s ModbusMaster has started...", __func__);
davidjhoward 15:a6ee32969e8e 34 bool status;
davidjhoward 149:950c90425f7c 35 RegisterType_t regType;
davidjhoward 81:d45bfa16953a 36
davidjhoward 190:af7ab603c9fe 37 mod_init();
davidjhoward 190:af7ab603c9fe 38 DigitalOut mod_power(PA_11);
davidjhoward 190:af7ab603c9fe 39 mod_power = 0; // provide power to the modbus
jmarkel44 0:65cfa4873284 40
davidjhoward 39:9287c7d59016 41 while( true ) {
davidjhoward 8:abe51ae5ef8b 42
davidjhoward 173:acfb464a4aec 43 MbedJSONValue json_value;
davidjhoward 173:acfb464a4aec 44
davidjhoward 39:9287c7d59016 45 // configure modbus registers based in all files that start with "input"
davidjhoward 39:9287c7d59016 46 std::vector<mDot::mdot_file> file_list = GLOBAL_mdot->listUserFiles();
davidjhoward 39:9287c7d59016 47 for (std::vector<mDot::mdot_file>::iterator i = file_list.begin(); i != file_list.end(); ++i) {
davidjhoward 149:950c90425f7c 48 if( (strncmp( i->name, "vcmd", (strlen("input")-1)) == 0) ) {
jmarkel44 177:9ec90c8e3ce1 49 status = GLOBAL_mdot->readUserFile(i->name, ModbusMasterScratchBuf, MAX_FILE_SIZE);
davidjhoward 149:950c90425f7c 50 if( status != true ) {
davidjhoward 149:950c90425f7c 51 logInfo("(%d)read file failed, status=%d", __LINE__, status);
davidjhoward 149:950c90425f7c 52 } else {
davidjhoward 151:9d47fe5ba805 53 logInfo("(%s:%d)loading File: %s", __func__, __LINE__, i->name );
davidjhoward 149:950c90425f7c 54 }
davidjhoward 8:abe51ae5ef8b 55
davidjhoward 149:950c90425f7c 56 parse( json_value, ModbusMasterScratchBuf );
davidjhoward 162:5e8948b8044d 57
davidjhoward 149:950c90425f7c 58 std::string id = json_value["id"].get<std::string>().c_str();
davidjhoward 149:950c90425f7c 59 VirtualCommandMap[id].constant = atof(json_value["constant"].get<std::string>().c_str());
davidjhoward 149:950c90425f7c 60 VirtualCommandMap[id].opl = json_value["opl"].get<std::string>().c_str();
davidjhoward 149:950c90425f7c 61 VirtualCommandMap[id].opr = json_value["opr"].get<std::string>().c_str();
davidjhoward 149:950c90425f7c 62 VirtualCommandMap[id].op = json_value["op"].get<std::string>().c_str();
davidjhoward 151:9d47fe5ba805 63 logInfo("Processd virtual command file: id=%s", id.c_str());
davidjhoward 149:950c90425f7c 64 continue;
davidjhoward 149:950c90425f7c 65 }
davidjhoward 149:950c90425f7c 66
davidjhoward 149:950c90425f7c 67 regType = REG_TYPE_NONE;
davidjhoward 149:950c90425f7c 68
davidjhoward 149:950c90425f7c 69 if( (strncmp( i->name, "input", (strlen("input")-1)) == 0) ) {
davidjhoward 149:950c90425f7c 70 regType = REG_TYPE_INPUT;
davidjhoward 149:950c90425f7c 71 } else if( (strncmp( i->name, "output", (strlen("output")-1)) == 0) ) {
davidjhoward 149:950c90425f7c 72 regType = REG_TYPE_OUTPUT;
davidjhoward 149:950c90425f7c 73 } else if( (strncmp( i->name, "vinput", (strlen("vinput")-1)) == 0) ) {
davidjhoward 149:950c90425f7c 74 regType = REG_TYPE_VINPUT;
davidjhoward 149:950c90425f7c 75 } else if( (strncmp( i->name, "voutput", (strlen("voutput")-1)) == 0) ) {
davidjhoward 149:950c90425f7c 76 regType = REG_TYPE_VOUTPUT;
davidjhoward 149:950c90425f7c 77 }
davidjhoward 149:950c90425f7c 78
davidjhoward 149:950c90425f7c 79 if( regType != REG_TYPE_NONE ) {
davidjhoward 81:d45bfa16953a 80
jmarkel44 177:9ec90c8e3ce1 81 status = GLOBAL_mdot->readUserFile(i->name, ModbusMasterScratchBuf, MAX_FILE_SIZE);
davidjhoward 39:9287c7d59016 82 if( status != true ) {
davidjhoward 45:3b9e1923cb15 83 logInfo("(%d)read file failed, status=%d", __LINE__, status);
davidjhoward 39:9287c7d59016 84 } else {
davidjhoward 151:9d47fe5ba805 85 logInfo("(%s:%d)loading File: %s", __func__, __LINE__, i->name );
davidjhoward 39:9287c7d59016 86 }
davidjhoward 81:d45bfa16953a 87
davidjhoward 42:c703a60993b1 88 parse( json_value, ModbusMasterScratchBuf );
davidjhoward 9:ef0ca2f8a8a6 89
davidjhoward 39:9287c7d59016 90 std::string id = json_value["id"].get<std::string>().c_str();
davidjhoward 39:9287c7d59016 91 ModbusRegisterMap[id].name = json_value["name"].get<std::string>().c_str();
davidjhoward 39:9287c7d59016 92 ModbusRegisterMap[id].units = json_value["units"].get<std::string>().c_str();
davidjhoward 39:9287c7d59016 93 ModbusRegisterMap[id].min = atof(json_value["min"].get<std::string>().c_str());
davidjhoward 39:9287c7d59016 94 ModbusRegisterMap[id].max = atof(json_value["max"].get<std::string>().c_str());
davidjhoward 39:9287c7d59016 95 ModbusRegisterMap[id].node = atoi(json_value["node"].get<std::string>().c_str());
davidjhoward 39:9287c7d59016 96 ModbusRegisterMap[id].reg = atoi(json_value["reg"].get<std::string>().c_str());
davidjhoward 39:9287c7d59016 97 ModbusRegisterMap[id].rtype = atoi(json_value["rtype"].get<std::string>().c_str());
davidjhoward 39:9287c7d59016 98 ModbusRegisterMap[id].type = atoi(json_value["type"].get<std::string>().c_str());
davidjhoward 39:9287c7d59016 99 ModbusRegisterMap[id].size = atoi(json_value["size"].get<std::string>().c_str());
davidjhoward 39:9287c7d59016 100 ModbusRegisterMap[id].order = atoi(json_value["order"].get<std::string>().c_str());
davidjhoward 39:9287c7d59016 101 ModbusRegisterMap[id].fmt = json_value["fmt"].get<std::string>().c_str();
davidjhoward 49:0456ee2271be 102 ModbusRegisterMap[id].rfreq = atoi(json_value["rfreq"].get<std::string>().c_str());
davidjhoward 149:950c90425f7c 103 ModbusRegisterMap[id].regType = regType;
davidjhoward 82:f3e495a98877 104 ModbusRegisterMap[id].simulated = false;
davidjhoward 190:af7ab603c9fe 105 ModbusRegisterMap[id].errflag = 0;
davidjhoward 149:950c90425f7c 106 if( (regType == REG_TYPE_VINPUT) || (regType == REG_TYPE_VOUTPUT) ) {
davidjhoward 149:950c90425f7c 107 ModbusRegisterMap[id].vcmd = json_value["vcmd"].get<std::string>().c_str();
davidjhoward 149:950c90425f7c 108 }
davidjhoward 15:a6ee32969e8e 109 }
davidjhoward 4:c35db3946fd8 110 }
davidjhoward 162:5e8948b8044d 111
davidjhoward 151:9d47fe5ba805 112 osSignalSet(mainThreadId, sig_output_continue);
davidjhoward 31:4b1587034318 113
davidjhoward 39:9287c7d59016 114 // read modbus registers that have been configured.
davidjhoward 39:9287c7d59016 115 while ( true ) {
davidjhoward 39:9287c7d59016 116
davidjhoward 39:9287c7d59016 117 std::map<std::string, ModbusRegister>::iterator iter;
davidjhoward 39:9287c7d59016 118 for (iter = ModbusRegisterMap.begin(); iter != ModbusRegisterMap.end(); ++iter) {
davidjhoward 82:f3e495a98877 119 if( iter->second.simulated == true ) {
davidjhoward 181:e2c982c94e98 120 // printf("\r\nsimulating input=%s, min=%2.2f, max=%2.2f, start_value=%2.2f, up_step=%2.2f, down_step=%2.2f moving_up=%d\r\n",iter->first.c_str(), SimulateInputMap[iter->first].min, SimulateInputMap[iter->first].max, SimulateInputMap[iter->first].start_value, SimulateInputMap[iter->first].up_step, SimulateInputMap[iter->first].down_step, SimulateInputMap[iter->first].moving_up);
davidjhoward 176:492cfa856521 121 if( (SimulateInputMap[iter->first].min == 0) && (SimulateInputMap[iter->first].max == 0) ) {
davidjhoward 176:492cfa856521 122 ModbusRegisterMap[iter->first].float_value = SimulateInputMap[iter->first].start_value;
davidjhoward 181:e2c982c94e98 123 // printf("simulating input=%s, value=%2.2f\r\n",iter->first.c_str(), ModbusRegisterMap[iter->first].float_value);
davidjhoward 176:492cfa856521 124 } else {
davidjhoward 176:492cfa856521 125 if( ModbusRegisterMap[iter->first].float_value >= SimulateInputMap[iter->first].max ) {
davidjhoward 179:a31ea334e2b7 126 SimulateInputMap[iter->first].moving_up = false;
davidjhoward 181:e2c982c94e98 127 // printf("simulating down input=%s, value=%2.2f - %2.2f\r\n",iter->first.c_str(), ModbusRegisterMap[iter->first].float_value, SimulateInputMap[iter->first].down_step);
davidjhoward 176:492cfa856521 128 ModbusRegisterMap[iter->first].float_value = ModbusRegisterMap[iter->first].float_value - SimulateInputMap[iter->first].down_step;
davidjhoward 176:492cfa856521 129 } else if( ModbusRegisterMap[iter->first].float_value <= SimulateInputMap[iter->first].min ) {
davidjhoward 179:a31ea334e2b7 130 SimulateInputMap[iter->first].moving_up = true;
davidjhoward 181:e2c982c94e98 131 // printf("simulating up input=%s, value=%2.2f + %2.2f\r\n",iter->first.c_str(), ModbusRegisterMap[iter->first].float_value, SimulateInputMap[iter->first].up_step);
davidjhoward 176:492cfa856521 132 ModbusRegisterMap[iter->first].float_value = ModbusRegisterMap[iter->first].float_value + SimulateInputMap[iter->first].up_step;
davidjhoward 82:f3e495a98877 133 } else {
davidjhoward 179:a31ea334e2b7 134 if( SimulateInputMap[iter->first].moving_up == true ) {
davidjhoward 181:e2c982c94e98 135 // printf("continue simulate up input=%s, value=%2.2f + %2.2f\r\n",iter->first.c_str(), ModbusRegisterMap[iter->first].float_value, SimulateInputMap[iter->first].up_step);
davidjhoward 150:4db35c8234b4 136 ModbusRegisterMap[iter->first].float_value = ModbusRegisterMap[iter->first].float_value + SimulateInputMap[iter->first].up_step;
davidjhoward 82:f3e495a98877 137 } else {
davidjhoward 181:e2c982c94e98 138 // printf("continue simulate down input=%s, value=%2.2f - %2.2f\r\n",iter->first.c_str(), ModbusRegisterMap[iter->first].float_value, SimulateInputMap[iter->first].down_step);
davidjhoward 176:492cfa856521 139 ModbusRegisterMap[iter->first].float_value = ModbusRegisterMap[iter->first].float_value - SimulateInputMap[iter->first].down_step;
davidjhoward 82:f3e495a98877 140 }
davidjhoward 82:f3e495a98877 141 }
davidjhoward 181:e2c982c94e98 142 // printf("simulating input=%s, value=%2.2f\r\n\r\n",iter->first.c_str(), ModbusRegisterMap[iter->first].float_value);
davidjhoward 82:f3e495a98877 143 }
davidjhoward 82:f3e495a98877 144 continue;
davidjhoward 82:f3e495a98877 145 }
davidjhoward 148:ee3cbaafe355 146
davidjhoward 147:105bcf234f81 147 if( iter->second.node != 0 ) {
davidjhoward 197:594afd088f32 148 unsigned char rd_buf[16];
davidjhoward 197:594afd088f32 149 memset( rd_buf, 0, 16 );
davidjhoward 149:950c90425f7c 150 logInfo("Processing Input: tag=%s, node=%d, reg=%d, size=%d, order=%d", iter->first.c_str(), iter->second.node, iter->second.reg, iter->second.size, iter->second.order );
davidjhoward 190:af7ab603c9fe 151 int ret = mod_read(iter->second.node, iter->second.rtype, iter->second.reg, iter->second.size, rd_buf);
davidjhoward 147:105bcf234f81 152 switch( iter->second.type ) {
davidjhoward 147:105bcf234f81 153 case TYPE_32BIT_FLOAT:
davidjhoward 147:105bcf234f81 154 float float_value;
davidjhoward 190:af7ab603c9fe 155 if( ret != MOD_ERROR_NONE ) {
davidjhoward 190:af7ab603c9fe 156 ModbusRegisterMap[iter->first].errflag = ret;
davidjhoward 190:af7ab603c9fe 157 break;
davidjhoward 190:af7ab603c9fe 158 }
davidjhoward 190:af7ab603c9fe 159 status = ReadModbus_32bit_float( &float_value, iter->second.order, rd_buf );
davidjhoward 147:105bcf234f81 160 if( status == true ) {
davidjhoward 147:105bcf234f81 161 ModbusRegisterMap[iter->first].float_value = float_value;
davidjhoward 190:af7ab603c9fe 162 ModbusRegisterMap[iter->first].errflag = 0;
davidjhoward 148:ee3cbaafe355 163 // logInfo("Modbus Tag:%s value=%2.2f", iter->first.c_str(), float_value );
davidjhoward 147:105bcf234f81 164 } else {
davidjhoward 190:af7ab603c9fe 165 ModbusRegisterMap[iter->first].errflag = 1000;
davidjhoward 148:ee3cbaafe355 166 // logInfo("Modbus Read Failed, tag=%s", iter->first.c_str() );
davidjhoward 147:105bcf234f81 167 }
davidjhoward 147:105bcf234f81 168 break;
davidjhoward 147:105bcf234f81 169 case TYPE_32BIT_INT:
davidjhoward 186:16912aa18c2a 170 int32_t int32_value;
davidjhoward 190:af7ab603c9fe 171 if( ret != MOD_ERROR_NONE ) {
davidjhoward 190:af7ab603c9fe 172 ModbusRegisterMap[iter->first].errflag = ret;
davidjhoward 190:af7ab603c9fe 173 break;
davidjhoward 190:af7ab603c9fe 174 }
davidjhoward 190:af7ab603c9fe 175 status = ReadModbus_32bit_int( &int32_value, iter->second.order, rd_buf );
davidjhoward 186:16912aa18c2a 176 if( status == true ) {
davidjhoward 186:16912aa18c2a 177 ModbusRegisterMap[iter->first].float_value = int32_value;
davidjhoward 190:af7ab603c9fe 178 ModbusRegisterMap[iter->first].errflag = 0;
davidjhoward 186:16912aa18c2a 179 logInfo("Modbus Tag:%s value=%2.2f", iter->first.c_str(), ModbusRegisterMap[iter->first].float_value );
davidjhoward 186:16912aa18c2a 180 } else {
davidjhoward 190:af7ab603c9fe 181 ModbusRegisterMap[iter->first].errflag = 1000;
davidjhoward 186:16912aa18c2a 182 logInfo("Modbus Read Failed, tag=%s", iter->first.c_str() );
davidjhoward 186:16912aa18c2a 183 }
davidjhoward 147:105bcf234f81 184 break;
davidjhoward 147:105bcf234f81 185 case TYPE_32BIT_UINT:
davidjhoward 147:105bcf234f81 186 break;
davidjhoward 147:105bcf234f81 187 case TYPE_16BIT_INT:
davidjhoward 147:105bcf234f81 188 break;
davidjhoward 147:105bcf234f81 189 case TYPE_16BIT_UINT:
davidjhoward 147:105bcf234f81 190 break;
davidjhoward 147:105bcf234f81 191 default:
davidjhoward 147:105bcf234f81 192 break;
davidjhoward 147:105bcf234f81 193 }
davidjhoward 39:9287c7d59016 194 }
davidjhoward 82:f3e495a98877 195
davidjhoward 149:950c90425f7c 196 if( (iter->second.node == 0) && (iter->second.regType == REG_TYPE_OUTPUT) ) {
davidjhoward 148:ee3cbaafe355 197 // logInfo("processing PIN output=%s, reg=%d, value=%d",iter->first.c_str(), ModbusRegisterMap[iter->first].reg, (bool)ModbusRegisterMap[iter->first].float_value);
davidjhoward 148:ee3cbaafe355 198 if( ModbusRegisterMap[iter->first].reg == 1 ) {
davidjhoward 189:546b04f89b19 199 dout1 = (bool)((int)ModbusRegisterMap[iter->first].float_value&0x1);
davidjhoward 148:ee3cbaafe355 200 } else {
davidjhoward 189:546b04f89b19 201 dout2 = (bool)((int)ModbusRegisterMap[iter->first].float_value&0x1);
davidjhoward 148:ee3cbaafe355 202 }
davidjhoward 148:ee3cbaafe355 203 }
davidjhoward 149:950c90425f7c 204 if( (iter->second.node == 0) && (iter->second.regType == REG_TYPE_INPUT) ) {
davidjhoward 148:ee3cbaafe355 205 // logInfo("processing PIN input=%s, reg=%d, value=%d",iter->first.c_str(), ModbusRegisterMap[iter->first].reg, (bool)ModbusRegisterMap[iter->first].float_value);
davidjhoward 148:ee3cbaafe355 206 if( ModbusRegisterMap[iter->first].reg == 1 ) {
davidjhoward 148:ee3cbaafe355 207 // digital input
davidjhoward 148:ee3cbaafe355 208 ModbusRegisterMap[iter->first].float_value = (float)flow_switch.read();
davidjhoward 148:ee3cbaafe355 209 } else {
davidjhoward 148:ee3cbaafe355 210 ModbusRegisterMap[iter->first].float_value = (float)dinp2.read();
davidjhoward 81:d45bfa16953a 211 }
davidjhoward 81:d45bfa16953a 212 }
davidjhoward 39:9287c7d59016 213 }
davidjhoward 39:9287c7d59016 214
davidjhoward 149:950c90425f7c 215 // now update all of the virtual registers
davidjhoward 149:950c90425f7c 216 for (iter = ModbusRegisterMap.begin(); iter != ModbusRegisterMap.end(); ++iter) {
davidjhoward 149:950c90425f7c 217 if( (ModbusRegisterMap[iter->first].regType != REG_TYPE_VINPUT) && (ModbusRegisterMap[iter->first].regType != REG_TYPE_VOUTPUT) ) {
davidjhoward 149:950c90425f7c 218 continue;
davidjhoward 149:950c90425f7c 219 }
davidjhoward 149:950c90425f7c 220 logInfo("Processing Virtual Input: vcmd:%s, tag:%s, opl:%s, opr:%s, op:%s, constant:%.4f", iter->second.vcmd.c_str(), iter->first.c_str(),
davidjhoward 149:950c90425f7c 221 VirtualCommandMap[iter->second.vcmd].opl.c_str(),
davidjhoward 149:950c90425f7c 222 VirtualCommandMap[iter->second.vcmd].opr.c_str(),
davidjhoward 149:950c90425f7c 223 VirtualCommandMap[iter->second.vcmd].op.c_str(),
davidjhoward 149:950c90425f7c 224 VirtualCommandMap[iter->second.vcmd].constant
davidjhoward 149:950c90425f7c 225 );
davidjhoward 149:950c90425f7c 226 switch( VirtualCommandMap[iter->second.vcmd].op.c_str()[0] ) {
davidjhoward 149:950c90425f7c 227 case '=':
davidjhoward 149:950c90425f7c 228 ModbusRegisterMap[iter->first].float_value = ModbusRegisterMap[VirtualCommandMap[iter->second.vcmd].opl].float_value;
davidjhoward 149:950c90425f7c 229 logInfo("Setting tag=%s, equal to (value=%2.2f)", iter->first.c_str(),
jmarkel44 169:c503848823aa 230 //VirtualCommandMap[iter->second.vcmd].opl.c_str(),
davidjhoward 149:950c90425f7c 231 ModbusRegisterMap[VirtualCommandMap[iter->second.vcmd].opl].float_value
davidjhoward 149:950c90425f7c 232 );
davidjhoward 149:950c90425f7c 233 break;
davidjhoward 149:950c90425f7c 234 case '*':
davidjhoward 162:5e8948b8044d 235 ModbusRegisterMap[iter->first].float_value =
davidjhoward 162:5e8948b8044d 236 ModbusRegisterMap[VirtualCommandMap[iter->second.vcmd].opl].float_value *
davidjhoward 162:5e8948b8044d 237 ModbusRegisterMap[VirtualCommandMap[iter->second.vcmd].opr].float_value;
davidjhoward 162:5e8948b8044d 238 logInfo("Setting tag=%s, equal to (%2.2f*%2.2f) = %2.2f", iter->first.c_str(),
jmarkel44 169:c503848823aa 239 //VirtualCommandMap[iter->second.vcmd].opl.c_str(),
davidjhoward 162:5e8948b8044d 240 ModbusRegisterMap[VirtualCommandMap[iter->second.vcmd].opl].float_value,
davidjhoward 162:5e8948b8044d 241 ModbusRegisterMap[VirtualCommandMap[iter->second.vcmd].opr].float_value,
davidjhoward 162:5e8948b8044d 242 ModbusRegisterMap[iter->first].float_value
davidjhoward 162:5e8948b8044d 243 );
davidjhoward 149:950c90425f7c 244 case '/':
davidjhoward 162:5e8948b8044d 245 if( ModbusRegisterMap[VirtualCommandMap[iter->second.vcmd].opr].float_value != 0 ) {
davidjhoward 162:5e8948b8044d 246 ModbusRegisterMap[iter->first].float_value =
davidjhoward 162:5e8948b8044d 247 ModbusRegisterMap[VirtualCommandMap[iter->second.vcmd].opl].float_value /
davidjhoward 162:5e8948b8044d 248 ModbusRegisterMap[VirtualCommandMap[iter->second.vcmd].opr].float_value;
davidjhoward 162:5e8948b8044d 249 logInfo("Setting tag=%s, equal to (%2.2f/%2.2f) = %2.2f", iter->first.c_str(),
jmarkel44 169:c503848823aa 250 //VirtualCommandMap[iter->second.vcmd].opl.c_str(),
davidjhoward 162:5e8948b8044d 251 ModbusRegisterMap[VirtualCommandMap[iter->second.vcmd].opl].float_value,
davidjhoward 162:5e8948b8044d 252 ModbusRegisterMap[VirtualCommandMap[iter->second.vcmd].opr].float_value,
davidjhoward 162:5e8948b8044d 253 ModbusRegisterMap[iter->first].float_value
davidjhoward 162:5e8948b8044d 254 );
davidjhoward 162:5e8948b8044d 255 } else {
davidjhoward 162:5e8948b8044d 256 logInfo("NOT DOING DIVIDE BY ZERO");
davidjhoward 162:5e8948b8044d 257 }
davidjhoward 162:5e8948b8044d 258 break;
davidjhoward 149:950c90425f7c 259 case '+':
davidjhoward 149:950c90425f7c 260 case '-':
davidjhoward 149:950c90425f7c 261 default:
davidjhoward 149:950c90425f7c 262 break;
davidjhoward 149:950c90425f7c 263 }
davidjhoward 149:950c90425f7c 264 }
davidjhoward 149:950c90425f7c 265
davidjhoward 39:9287c7d59016 266 osEvent evt = ModbusMasterMailBox.get(50);
davidjhoward 39:9287c7d59016 267 if (evt.status == osEventMail) {
davidjhoward 39:9287c7d59016 268 Message_t *mail = (Message_t*)evt.value.p;
davidjhoward 197:594afd088f32 269 printf("Mail Received: Action: %d, New Input File: %s\r\n", mail->action, mail->controlFile);
davidjhoward 197:594afd088f32 270 if( mail->action == ACTION_EXEC_CMD ) {
davidjhoward 197:594afd088f32 271 ModbusMasterExecCmd( mail->controlFile );
davidjhoward 197:594afd088f32 272 } else {
davidjhoward 197:594afd088f32 273 ModbusRegisterMap.clear();
davidjhoward 197:594afd088f32 274 }
davidjhoward 39:9287c7d59016 275 ModbusMasterMailBox.free(mail);
davidjhoward 39:9287c7d59016 276 break;
davidjhoward 39:9287c7d59016 277 }
davidjhoward 57:5f18ae91c7c7 278 Thread::wait(5000);
davidjhoward 31:4b1587034318 279 }
jmarkel44 0:65cfa4873284 280 }
davidjhoward 4:c35db3946fd8 281 }
davidjhoward 4:c35db3946fd8 282
davidjhoward 190:af7ab603c9fe 283 bool ReadModbus_32bit_float( float *float_value, int order, unsigned char *rd_buf )
davidjhoward 4:c35db3946fd8 284 {
davidjhoward 15:a6ee32969e8e 285 MR_REGISTER_32_BIT_FLOAT value;
davidjhoward 31:4b1587034318 286
davidjhoward 15:a6ee32969e8e 287 switch( order ) {
davidjhoward 31:4b1587034318 288 case BigEndian:
davidjhoward 190:af7ab603c9fe 289 value.b.lo_lo = rd_buf[3];
davidjhoward 190:af7ab603c9fe 290 value.b.lo_hi = rd_buf[2];
davidjhoward 190:af7ab603c9fe 291 value.b.hi_lo = rd_buf[1];
davidjhoward 190:af7ab603c9fe 292 value.b.hi_hi = rd_buf[0];
davidjhoward 15:a6ee32969e8e 293 break;
davidjhoward 15:a6ee32969e8e 294 case BigEndianReverseWord:
davidjhoward 190:af7ab603c9fe 295 value.b.lo_lo = rd_buf[1];
davidjhoward 190:af7ab603c9fe 296 value.b.lo_hi = rd_buf[0];
davidjhoward 190:af7ab603c9fe 297 value.b.hi_lo = rd_buf[3];
davidjhoward 190:af7ab603c9fe 298 value.b.hi_hi = rd_buf[2];
davidjhoward 15:a6ee32969e8e 299 break;
davidjhoward 15:a6ee32969e8e 300 default:
davidjhoward 197:594afd088f32 301 printf("%s:%d: order not supported\r\n",__func__,__LINE__);
davidjhoward 15:a6ee32969e8e 302 return false;
davidjhoward 15:a6ee32969e8e 303 }
davidjhoward 188:d35a74bf4e92 304 // printf("0x%x 0x%x 0x%x 0x%x (%2.2f)\r\n", value.b.hi_hi, value.b.hi_lo, value.b.lo_hi, value.b.lo_lo, value.f);
davidjhoward 15:a6ee32969e8e 305 *float_value = value.f;
davidjhoward 4:c35db3946fd8 306 return true;
davidjhoward 4:c35db3946fd8 307 }
davidjhoward 186:16912aa18c2a 308
davidjhoward 197:594afd088f32 309 bool WriteModbus_32bit_float( float float_value, int order, unsigned char *xmt_buf )
davidjhoward 197:594afd088f32 310 {
davidjhoward 197:594afd088f32 311 MR_REGISTER_32_BIT_FLOAT value;
davidjhoward 197:594afd088f32 312
davidjhoward 197:594afd088f32 313 value.f = float_value;
davidjhoward 197:594afd088f32 314
davidjhoward 197:594afd088f32 315 switch( order ) {
davidjhoward 197:594afd088f32 316 case BigEndian:
davidjhoward 197:594afd088f32 317 xmt_buf[3] = value.b.lo_lo;
davidjhoward 197:594afd088f32 318 xmt_buf[2] = value.b.lo_hi;
davidjhoward 197:594afd088f32 319 xmt_buf[1] = value.b.hi_lo;
davidjhoward 197:594afd088f32 320 xmt_buf[0] = value.b.hi_hi;
davidjhoward 197:594afd088f32 321 break;
davidjhoward 197:594afd088f32 322 case BigEndianReverseWord:
davidjhoward 197:594afd088f32 323 xmt_buf[1] = value.b.lo_lo;
davidjhoward 197:594afd088f32 324 xmt_buf[0] = value.b.lo_hi;
davidjhoward 197:594afd088f32 325 xmt_buf[3] = value.b.hi_lo;
davidjhoward 197:594afd088f32 326 xmt_buf[2] = value.b.hi_hi;
davidjhoward 197:594afd088f32 327 break;
davidjhoward 197:594afd088f32 328 default:
davidjhoward 197:594afd088f32 329 printf("%s:%d: order not supported\r\n",__func__,__LINE__);
davidjhoward 197:594afd088f32 330 return false;
davidjhoward 197:594afd088f32 331 }
davidjhoward 197:594afd088f32 332 printf("%s:%d: 0x%x 0x%x 0x%x 0x%x (%2.2f)\r\n",__func__,__LINE__, value.b.hi_hi, value.b.hi_lo, value.b.lo_hi, value.b.lo_lo, value.f);
davidjhoward 197:594afd088f32 333 return true;
davidjhoward 197:594afd088f32 334 }
davidjhoward 197:594afd088f32 335
davidjhoward 190:af7ab603c9fe 336 bool ReadModbus_32bit_int( int32_t *int32_value, int order, unsigned char *rd_buf )
davidjhoward 186:16912aa18c2a 337 {
davidjhoward 186:16912aa18c2a 338 MR_REGISTER_32BIT_INT value;
davidjhoward 186:16912aa18c2a 339
davidjhoward 186:16912aa18c2a 340 switch( order ) {
davidjhoward 186:16912aa18c2a 341 case BigEndian:
davidjhoward 190:af7ab603c9fe 342 value.b.lo_lo = rd_buf[3];
davidjhoward 190:af7ab603c9fe 343 value.b.lo_hi = rd_buf[2];
davidjhoward 190:af7ab603c9fe 344 value.b.hi_lo = rd_buf[1];
davidjhoward 190:af7ab603c9fe 345 value.b.hi_hi = rd_buf[0];
davidjhoward 186:16912aa18c2a 346 break;
davidjhoward 186:16912aa18c2a 347 case BigEndianReverseWord:
davidjhoward 190:af7ab603c9fe 348 value.b.lo_lo = rd_buf[1];
davidjhoward 190:af7ab603c9fe 349 value.b.lo_hi = rd_buf[0];
davidjhoward 190:af7ab603c9fe 350 value.b.hi_lo = rd_buf[3];
davidjhoward 190:af7ab603c9fe 351 value.b.hi_hi = rd_buf[2];
davidjhoward 186:16912aa18c2a 352 break;
davidjhoward 186:16912aa18c2a 353 default:
davidjhoward 197:594afd088f32 354 printf("%s:%d: order not supported\r\n",__func__,__LINE__);
davidjhoward 186:16912aa18c2a 355 return false;
davidjhoward 186:16912aa18c2a 356 }
davidjhoward 188:d35a74bf4e92 357 // printf("0x%x 0x%x 0x%x 0x%x (%d)\r\n", value.b.hi_hi, value.b.hi_lo, value.b.lo_hi, value.b.lo_lo, value.i);
davidjhoward 186:16912aa18c2a 358 *int32_value = value.i;
davidjhoward 186:16912aa18c2a 359 return true;
davidjhoward 197:594afd088f32 360 }
davidjhoward 197:594afd088f32 361
davidjhoward 197:594afd088f32 362 bool WriteModbus_32bit_int( int32_t int32_value, int order, unsigned char *xmt_buf )
davidjhoward 197:594afd088f32 363 {
davidjhoward 197:594afd088f32 364 MR_REGISTER_32BIT_INT value;
davidjhoward 197:594afd088f32 365
davidjhoward 197:594afd088f32 366 value.i = int32_value;
davidjhoward 197:594afd088f32 367
davidjhoward 197:594afd088f32 368 switch( order ) {
davidjhoward 197:594afd088f32 369 case BigEndian:
davidjhoward 197:594afd088f32 370 xmt_buf[3] = value.b.lo_lo;
davidjhoward 197:594afd088f32 371 xmt_buf[2] = value.b.lo_hi;
davidjhoward 197:594afd088f32 372 xmt_buf[1] = value.b.hi_lo;
davidjhoward 197:594afd088f32 373 xmt_buf[0] = value.b.hi_hi;
davidjhoward 197:594afd088f32 374 break;
davidjhoward 197:594afd088f32 375 case BigEndianReverseWord:
davidjhoward 197:594afd088f32 376 xmt_buf[1] = value.b.lo_lo;
davidjhoward 197:594afd088f32 377 xmt_buf[0] = value.b.lo_hi;
davidjhoward 197:594afd088f32 378 xmt_buf[3] = value.b.hi_lo;
davidjhoward 197:594afd088f32 379 xmt_buf[2] = value.b.hi_hi;
davidjhoward 197:594afd088f32 380 break;
davidjhoward 197:594afd088f32 381 default:
davidjhoward 197:594afd088f32 382 printf("%s:%d: order not supported\r\n",__func__,__LINE__);
davidjhoward 197:594afd088f32 383 return false;
davidjhoward 197:594afd088f32 384 }
davidjhoward 197:594afd088f32 385 printf("%s:%d: 0x%x 0x%x 0x%x 0x%x (%d)\r\n", __func__, __LINE__, value.b.hi_hi, value.b.hi_lo, value.b.lo_hi, value.b.lo_lo, value.i);
davidjhoward 197:594afd088f32 386 return true;
davidjhoward 197:594afd088f32 387 }
davidjhoward 197:594afd088f32 388
davidjhoward 197:594afd088f32 389 bool WriteModbus_16bit_int( int16_t int16_value, int order, unsigned char *xmt_buf )
davidjhoward 197:594afd088f32 390 {
davidjhoward 197:594afd088f32 391 MR_REGISTER_16BIT_INT value;
davidjhoward 197:594afd088f32 392
davidjhoward 197:594afd088f32 393 value.w = int16_value;
davidjhoward 197:594afd088f32 394
davidjhoward 197:594afd088f32 395 switch( order ) {
davidjhoward 197:594afd088f32 396 case BigEndian:
davidjhoward 197:594afd088f32 397 case BigEndianReverseWord:
davidjhoward 197:594afd088f32 398 xmt_buf[1] = value.b.lo;
davidjhoward 197:594afd088f32 399 xmt_buf[0] = value.b.hi;
davidjhoward 197:594afd088f32 400 break;
davidjhoward 197:594afd088f32 401 default:
davidjhoward 197:594afd088f32 402 printf("%s:%d: order not supported\r\n",__func__,__LINE__);
davidjhoward 197:594afd088f32 403 return false;
davidjhoward 197:594afd088f32 404 }
davidjhoward 197:594afd088f32 405 printf("%s:%d: 0x%x 0x%x (%d)\r\n", __func__,__LINE__, value.b.hi, value.b.lo, value.w);
davidjhoward 197:594afd088f32 406 return true;
davidjhoward 197:594afd088f32 407 }
davidjhoward 197:594afd088f32 408
davidjhoward 197:594afd088f32 409 void ModbusMasterExecCmd( char *cmd )
davidjhoward 197:594afd088f32 410 {
davidjhoward 197:594afd088f32 411 MbedJSONValue json_cmd;
davidjhoward 197:594afd088f32 412 bool status;
davidjhoward 197:594afd088f32 413 int ret;
davidjhoward 197:594afd088f32 414 unsigned char rd_buf[16];
davidjhoward 197:594afd088f32 415
davidjhoward 197:594afd088f32 416 // printf("%s:%d: command=%s\r\n", __func__, __LINE__, cmd );
davidjhoward 197:594afd088f32 417
davidjhoward 197:594afd088f32 418 parse( json_cmd, cmd );
davidjhoward 197:594afd088f32 419
davidjhoward 197:594afd088f32 420 std::string id = json_cmd["id"].get<std::string>().c_str();
davidjhoward 197:594afd088f32 421 int node = atoi(json_cmd["node"].get<std::string>().c_str());
davidjhoward 197:594afd088f32 422 int func = atoi(json_cmd["func"].get<std::string>().c_str());
davidjhoward 197:594afd088f32 423 int sreg = atoi(json_cmd["sreg"].get<std::string>().c_str());
davidjhoward 197:594afd088f32 424 int nreg = atoi(json_cmd["nreg"].get<std::string>().c_str());
davidjhoward 197:594afd088f32 425 int dtype = atoi(json_cmd["dtype"].get<std::string>().c_str());
davidjhoward 197:594afd088f32 426 int order = atoi(json_cmd["order"].get<std::string>().c_str());
davidjhoward 197:594afd088f32 427 float value = atof(json_cmd["value"].get<std::string>().c_str());
davidjhoward 197:594afd088f32 428
davidjhoward 197:594afd088f32 429 switch( func ) {
davidjhoward 197:594afd088f32 430 case MOD_FUNC_GET_HREG: // read holding register
davidjhoward 197:594afd088f32 431 case MOD_FUNC_GET_IREG: // read input register
davidjhoward 197:594afd088f32 432 ret = mod_read(node, func, sreg, nreg, rd_buf);
davidjhoward 197:594afd088f32 433 switch( dtype ) {
davidjhoward 197:594afd088f32 434 case TYPE_32BIT_FLOAT: {
davidjhoward 197:594afd088f32 435 float float_value;
davidjhoward 197:594afd088f32 436 if( ret != MOD_ERROR_NONE ) {
davidjhoward 197:594afd088f32 437 printf("CMD: %s:%d: %s failed, errflag=%d\r\n", __func__, __LINE__, id.c_str(), ret );
davidjhoward 197:594afd088f32 438 break;
davidjhoward 197:594afd088f32 439 }
davidjhoward 197:594afd088f32 440 status = ReadModbus_32bit_float( &float_value, order, rd_buf );
davidjhoward 197:594afd088f32 441 if( status == true ) {
davidjhoward 197:594afd088f32 442 printf("CMD: %s:%d: %s value=%2.2f\r\n", __func__, __LINE__, id.c_str(), float_value );
davidjhoward 197:594afd088f32 443 } else {
davidjhoward 197:594afd088f32 444 printf("CMD: %s:%d: %s failed\r\n", __func__, __LINE__, id.c_str() );
davidjhoward 197:594afd088f32 445 }
davidjhoward 197:594afd088f32 446 break;
davidjhoward 197:594afd088f32 447 }
davidjhoward 197:594afd088f32 448 case TYPE_32BIT_INT:
davidjhoward 197:594afd088f32 449 case TYPE_32BIT_UINT: {
davidjhoward 197:594afd088f32 450 int32_t int32_value;
davidjhoward 197:594afd088f32 451 if( ret != MOD_ERROR_NONE ) {
davidjhoward 197:594afd088f32 452 printf("CMD: %s:%d: %s failed, errflag=%d\r\n", __func__, __LINE__, id.c_str(), ret );
davidjhoward 197:594afd088f32 453 break;
davidjhoward 197:594afd088f32 454 }
davidjhoward 197:594afd088f32 455 status = ReadModbus_32bit_int( &int32_value, order, rd_buf );
davidjhoward 197:594afd088f32 456 if( status == true ) {
davidjhoward 197:594afd088f32 457 printf("CMD: %s:%d: %s value=%d\r\n", __func__, __LINE__, id.c_str(), int32_value );
davidjhoward 197:594afd088f32 458 } else {
davidjhoward 197:594afd088f32 459 printf("CMD: %s:%d: %s failed\r\n", __func__, __LINE__, id.c_str() );
davidjhoward 197:594afd088f32 460 }
davidjhoward 197:594afd088f32 461 break;
davidjhoward 197:594afd088f32 462 }
davidjhoward 197:594afd088f32 463 case TYPE_16BIT_INT:
davidjhoward 197:594afd088f32 464 case TYPE_16BIT_UINT:
davidjhoward 197:594afd088f32 465 break;
davidjhoward 197:594afd088f32 466 default:
davidjhoward 197:594afd088f32 467 break;
davidjhoward 197:594afd088f32 468 }
davidjhoward 197:594afd088f32 469 break;
davidjhoward 197:594afd088f32 470 case MOD_FUNC_SET_HREG: // write holding register
davidjhoward 197:594afd088f32 471 case MOD_FUNC_SET_HREGS: // write multiple registers (only supports 2 right now)
davidjhoward 197:594afd088f32 472 case MOD_FUNC_SET_COIL: { // write coil
davidjhoward 197:594afd088f32 473 unsigned char xmt_buf[10];
davidjhoward 197:594afd088f32 474 switch( dtype ) {
davidjhoward 197:594afd088f32 475 case TYPE_32BIT_FLOAT: {
davidjhoward 197:594afd088f32 476 status = WriteModbus_32bit_float( value, order, xmt_buf );
davidjhoward 197:594afd088f32 477 if( status != true ) {
davidjhoward 197:594afd088f32 478 printf("CMD: %s:%d: %s failed\r\n", __func__, __LINE__, id.c_str() );
davidjhoward 197:594afd088f32 479 return;
davidjhoward 197:594afd088f32 480 }
davidjhoward 197:594afd088f32 481 printf("%s:%d: 0x%x 0x%x 0x%x 0x%x\r\n", __func__,__LINE__, xmt_buf[0], xmt_buf[1], xmt_buf[2], xmt_buf[3]);
davidjhoward 197:594afd088f32 482 break;
davidjhoward 197:594afd088f32 483 }
davidjhoward 197:594afd088f32 484 case TYPE_32BIT_INT:
davidjhoward 197:594afd088f32 485 case TYPE_32BIT_UINT: {
davidjhoward 197:594afd088f32 486 status = WriteModbus_32bit_int( (int32_t)value, order, xmt_buf );
davidjhoward 197:594afd088f32 487 if( status != true ) {
davidjhoward 197:594afd088f32 488 printf("CMD: %s:%d: %s failed\r\n", __func__, __LINE__, id.c_str() );
davidjhoward 197:594afd088f32 489 return;
davidjhoward 197:594afd088f32 490 }
davidjhoward 197:594afd088f32 491 break;
davidjhoward 197:594afd088f32 492 }
davidjhoward 197:594afd088f32 493 case TYPE_16BIT_INT:
davidjhoward 197:594afd088f32 494 case TYPE_16BIT_UINT:
davidjhoward 197:594afd088f32 495 status = WriteModbus_16bit_int( (int16_t)value, order, xmt_buf );
davidjhoward 197:594afd088f32 496 if( status != true ) {
davidjhoward 197:594afd088f32 497 printf("CMD: %s:%d: %s failed\r\n", __func__, __LINE__, id.c_str() );
davidjhoward 197:594afd088f32 498 return;
davidjhoward 197:594afd088f32 499 }
davidjhoward 197:594afd088f32 500 printf("%s:%d: 0x%x 0x%x\r\n", __func__,__LINE__, xmt_buf[0], xmt_buf[1]);
davidjhoward 197:594afd088f32 501 break;
davidjhoward 197:594afd088f32 502 default:
davidjhoward 197:594afd088f32 503 printf("CMD: %s:%d: %s NOT IMPLEMENTED\r\n", __func__, __LINE__, id.c_str() );
davidjhoward 197:594afd088f32 504 return;
davidjhoward 197:594afd088f32 505 }
davidjhoward 197:594afd088f32 506 printf("%s:%d: 0x%x 0x%x 0x%x 0x%x\r\n", __func__,__LINE__, xmt_buf[0], xmt_buf[1], xmt_buf[2], xmt_buf[3]);
davidjhoward 197:594afd088f32 507 ret = mod_write(node, func, sreg, nreg, xmt_buf);
davidjhoward 197:594afd088f32 508 if( ret != MOD_ERROR_NONE ) {
davidjhoward 197:594afd088f32 509 printf("CMD: %s:%d: %s failed, errflag=%d\r\n", __func__, __LINE__, id.c_str(), ret );
davidjhoward 197:594afd088f32 510 } else {
davidjhoward 197:594afd088f32 511 printf("CMD: %s:%d: %s wrote to modbus func=%d reg=%d value=%2.2f, errflag=%d\r\n", __func__, __LINE__, id.c_str(), func, sreg, value, ret );
davidjhoward 197:594afd088f32 512 }
davidjhoward 197:594afd088f32 513 break;
davidjhoward 197:594afd088f32 514 }
davidjhoward 197:594afd088f32 515 default:
davidjhoward 197:594afd088f32 516 printf("CMD: %s:%d: %s failed, errflag=%d\r\n", __func__, __LINE__, id.c_str(), ret );
davidjhoward 197:594afd088f32 517 break;
davidjhoward 197:594afd088f32 518 }
davidjhoward 197:594afd088f32 519
davidjhoward 186:16912aa18c2a 520 }