kopia lustrzana https://github.com/weetmuts/wmbusmeters
297 wiersze
11 KiB
C++
297 wiersze
11 KiB
C++
/*
|
|
Copyright (C) 2018-2020 Fredrik Öhrström
|
|
Copyright (C) 2020 Eric Bus
|
|
Copyright (C) 2020 Nikodem Jędrzejczak
|
|
|
|
This program is free software: you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation, either version 3 of the License, or
|
|
(at your option) any later version.
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
#include"meters.h"
|
|
#include"meters_common_implementation.h"
|
|
#include"dvparser.h"
|
|
#include"wmbus.h"
|
|
#include"wmbus_utils.h"
|
|
#include"util.h"
|
|
|
|
#define INFO_CODE_VOLTAGE_INTERRUPTED 1
|
|
#define INFO_CODE_LOW_BATTERY_LEVEL 2
|
|
#define INFO_CODE_EXTERNAL_ALARM 4
|
|
#define INFO_CODE_SENSOR_T1_ABOVE_MEASURING_RANGE 8
|
|
#define INFO_CODE_SENSOR_T2_ABOVE_MEASURING_RANGE 16
|
|
#define INFO_CODE_SENSOR_T1_BELOW_MEASURING_RANGE 32
|
|
#define INFO_CODE_SENSOR_T2_BELOW_MEASURING_RANGE 64
|
|
#define INFO_CODE_TEMP_DIFF_WRONG_POLARITY 128
|
|
|
|
struct MeterMultical803 : public virtual HeatMeter, public virtual MeterCommonImplementation {
|
|
MeterMultical803(MeterInfo &mi);
|
|
|
|
double totalEnergyConsumption(Unit u);
|
|
string status();
|
|
double totalVolume(Unit u);
|
|
double volumeFlow(Unit u);
|
|
|
|
// Water temperatures
|
|
double t1Temperature(Unit u);
|
|
bool hasT1Temperature();
|
|
double t2Temperature(Unit u);
|
|
bool hasT2Temperature();
|
|
|
|
private:
|
|
void processContent(Telegram *t);
|
|
|
|
uchar info_codes_ {};
|
|
double total_energy_mj_ {};
|
|
double total_volume_m3_ {};
|
|
double volume_flow_m3h_ {};
|
|
double t1_temperature_c_ { 127 };
|
|
bool has_t1_temperature_ {};
|
|
double t2_temperature_c_ { 127 };
|
|
bool has_t2_temperature_ {};
|
|
string target_date_ {};
|
|
|
|
uint32_t energy_forward_mj_ {};
|
|
uint32_t energy_returned_mj_ {};
|
|
};
|
|
|
|
MeterMultical803::MeterMultical803(MeterInfo &mi) :
|
|
MeterCommonImplementation(mi, MeterDriver::MULTICAL803)
|
|
{
|
|
setExpectedELLSecurityMode(ELLSecurityMode::AES_CTR);
|
|
|
|
addLinkMode(LinkMode::C1);
|
|
|
|
addPrint("total_energy_consumption", Quantity::Energy,
|
|
[&](Unit u){ return totalEnergyConsumption(u); },
|
|
"The total energy consumption recorded by this meter.",
|
|
true, true);
|
|
|
|
addPrint("total_volume", Quantity::Volume,
|
|
[&](Unit u){ return totalVolume(u); },
|
|
"Total volume of media.",
|
|
true, true);
|
|
|
|
addPrint("volume_flow", Quantity::Flow,
|
|
[&](Unit u){ return volumeFlow(u); },
|
|
"The current flow.",
|
|
true, true);
|
|
|
|
addPrint("t1_temperature", Quantity::Temperature,
|
|
[&](Unit u){ return t1Temperature(u); },
|
|
"The T1 temperature.",
|
|
true, true);
|
|
|
|
addPrint("t2_temperature", Quantity::Temperature,
|
|
[&](Unit u){ return t2Temperature(u); },
|
|
"The T2 temperature.",
|
|
true, true);
|
|
|
|
addPrint("at_date", Quantity::Text,
|
|
[&](){ return target_date_; },
|
|
"Date when total energy consumption was recorded.",
|
|
false, true);
|
|
|
|
addPrint("current_status", Quantity::Text,
|
|
[&](){ return status(); },
|
|
"Status of meter.",
|
|
true, true);
|
|
|
|
addPrint("energy_forward", Quantity::Energy,
|
|
[&](Unit u){ assertQuantity(u, Quantity::Energy); return convert(energy_forward_mj_, Unit::MJ, u); },
|
|
"Energy forward.",
|
|
false, true);
|
|
|
|
addPrint("energy_returned", Quantity::Energy,
|
|
[&](Unit u){ assertQuantity(u, Quantity::Energy); return convert(energy_returned_mj_, Unit::MJ, u); },
|
|
"Energy returned.",
|
|
false, true);
|
|
}
|
|
|
|
shared_ptr<HeatMeter> createMultical803(MeterInfo &mi) {
|
|
return shared_ptr<HeatMeter>(new MeterMultical803(mi));
|
|
}
|
|
|
|
double MeterMultical803::totalEnergyConsumption(Unit u)
|
|
{
|
|
assertQuantity(u, Quantity::Energy);
|
|
return convert(total_energy_mj_, Unit::MJ, u);
|
|
}
|
|
|
|
double MeterMultical803::totalVolume(Unit u)
|
|
{
|
|
assertQuantity(u, Quantity::Volume);
|
|
return convert(total_volume_m3_, Unit::M3, u);
|
|
}
|
|
|
|
double MeterMultical803::t1Temperature(Unit u)
|
|
{
|
|
assertQuantity(u, Quantity::Temperature);
|
|
return convert(t1_temperature_c_, Unit::C, u);
|
|
}
|
|
|
|
bool MeterMultical803::hasT1Temperature()
|
|
{
|
|
return has_t1_temperature_;
|
|
}
|
|
|
|
double MeterMultical803::t2Temperature(Unit u)
|
|
{
|
|
assertQuantity(u, Quantity::Temperature);
|
|
return convert(t2_temperature_c_, Unit::C, u);
|
|
}
|
|
|
|
bool MeterMultical803::hasT2Temperature()
|
|
{
|
|
return has_t2_temperature_;
|
|
}
|
|
|
|
double MeterMultical803::volumeFlow(Unit u)
|
|
{
|
|
assertQuantity(u, Quantity::Flow);
|
|
return convert(volume_flow_m3h_, Unit::M3H, u);
|
|
}
|
|
|
|
void MeterMultical803::processContent(Telegram *t)
|
|
{
|
|
/*
|
|
(wmbus) 14: 04 dif (32 Bit Integer/Binary Instantaneous value)
|
|
(wmbus) 15: 0F vif (Energy 10⁷ J)
|
|
(wmbus) 16: 00000000
|
|
(wmbus) 1a: 04 dif (32 Bit Integer/Binary Instantaneous value)
|
|
(wmbus) 1b: FF vif (Vendor extension)
|
|
(wmbus) 1c: 07 vife (?)
|
|
(wmbus) 1d: 00000000
|
|
(wmbus) 21: 04 dif (32 Bit Integer/Binary Instantaneous value)
|
|
(wmbus) 22: FF vif (Vendor extension)
|
|
(wmbus) 23: 08 vife (?)
|
|
(wmbus) 24: 00000000
|
|
(wmbus) 28: 04 dif (32 Bit Integer/Binary Instantaneous value)
|
|
(wmbus) 29: 14 vif (Volume 10⁻² m³)
|
|
(wmbus) 2a: 00000000
|
|
(wmbus) 2e: 84 dif (32 Bit Integer/Binary Instantaneous value)
|
|
(wmbus) 2f: 40 dife (subunit=1 tariff=0 storagenr=0)
|
|
(wmbus) 30: 14 vif (Volume 10⁻² m³)
|
|
(wmbus) 31: 00000000
|
|
(wmbus) 35: 84 dif (32 Bit Integer/Binary Instantaneous value)
|
|
(wmbus) 36: 80 dife (subunit=0 tariff=0 storagenr=0)
|
|
(wmbus) 37: 40 dife (subunit=2 tariff=0 storagenr=0)
|
|
(wmbus) 38: 14 vif (Volume 10⁻² m³)
|
|
(wmbus) 39: 00000000
|
|
(wmbus) 3d: 04 dif (32 Bit Integer/Binary Instantaneous value)
|
|
(wmbus) 3e: 3B vif (Volume flow l/h)
|
|
(wmbus) 3f: 00000000
|
|
(wmbus) 43: 02 dif (16 Bit Integer/Binary Instantaneous value)
|
|
(wmbus) 44: 59 vif (Flow temperature 10⁻² °C)
|
|
(wmbus) 45: 0000
|
|
(wmbus) 47: 02 dif (16 Bit Integer/Binary Instantaneous value)
|
|
(wmbus) 48: 5D vif (Return temperature 10⁻² °C)
|
|
(wmbus) 49: 0000
|
|
(wmbus) 4b: 14 dif (32 Bit Integer/Binary Maximum value)
|
|
(wmbus) 4c: 2D vif (Power 10² W)
|
|
(wmbus) 4d: 00000000
|
|
(wmbus) 51: 84 dif (32 Bit Integer/Binary Instantaneous value)
|
|
(wmbus) 52: 10 dife (subunit=0 tariff=1 storagenr=0)
|
|
(wmbus) 53: 0F vif (Energy 10⁷ J)
|
|
(wmbus) 54: 00000000
|
|
(wmbus) 58: 84 dif (32 Bit Integer/Binary Instantaneous value)
|
|
(wmbus) 59: 20 dife (subunit=0 tariff=2 storagenr=0)
|
|
(wmbus) 5a: 0F vif (Energy 10⁷ J)
|
|
(wmbus) 5b: 00000000
|
|
(wmbus) 5f: 04 dif (32 Bit Integer/Binary Instantaneous value)
|
|
(wmbus) 60: FF vif (Vendor extension)
|
|
(wmbus) 61: 22 vife (per hour)
|
|
(wmbus) 62: 60000100
|
|
(wmbus) 66: 02 dif (16 Bit Integer/Binary Instantaneous value)
|
|
(wmbus) 67: 6C vif (Date type G)
|
|
(wmbus) 68: 892B
|
|
(wmbus) 6a: 44 dif (32 Bit Integer/Binary Instantaneous value storagenr=1)
|
|
(wmbus) 6b: 0F vif (Energy 10⁷ J)
|
|
(wmbus) 6c: 00000000
|
|
(wmbus) 70: 44 dif (32 Bit Integer/Binary Instantaneous value storagenr=1)
|
|
(wmbus) 71: 14 vif (Volume 10⁻² m³)
|
|
(wmbus) 72: 00000000
|
|
(wmbus) 76: C4 dif (32 Bit Integer/Binary Instantaneous value storagenr=1)
|
|
(wmbus) 77: 40 dife (subunit=1 tariff=0 storagenr=1)
|
|
(wmbus) 78: 14 vif (Volume 10⁻² m³)
|
|
(wmbus) 79: 00000000
|
|
(wmbus) 7d: C4 dif (32 Bit Integer/Binary Instantaneous value storagenr=1)
|
|
(wmbus) 7e: 80 dife (subunit=0 tariff=0 storagenr=1)
|
|
(wmbus) 7f: 40 dife (subunit=2 tariff=0 storagenr=1)
|
|
(wmbus) 80: 14 vif (Volume 10⁻² m³)
|
|
(wmbus) 81: 00000000
|
|
(wmbus) 85: 42 dif (16 Bit Integer/Binary Instantaneous value storagenr=1)
|
|
(wmbus) 86: 6C vif (Date type G)
|
|
(wmbus) 87: 812B
|
|
*/
|
|
|
|
int offset;
|
|
string key;
|
|
|
|
extractDVuint8(&t->values, "04FF22", &offset, &info_codes_);
|
|
t->addMoreExplanation(offset, " info codes (%s)", status().c_str());
|
|
|
|
extractDVuint32(&t->values, "04FF07", &offset, &energy_forward_mj_);
|
|
t->addMoreExplanation(offset, " energy forward mj (%zu)", energy_forward_mj_);
|
|
|
|
extractDVuint32(&t->values, "04FF08", &offset, &energy_returned_mj_);
|
|
t->addMoreExplanation(offset, " energy returned mj (%zu)", energy_returned_mj_);
|
|
|
|
if(findKey(MeasurementType::Instantaneous, ValueInformation::EnergyMJ, 0, 0, &key, &t->values)) {
|
|
extractDVdouble(&t->values, key, &offset, &total_energy_mj_);
|
|
t->addMoreExplanation(offset, " total energy consumption (%f MJ)", total_energy_mj_);
|
|
}
|
|
|
|
if(findKey(MeasurementType::Instantaneous, ValueInformation::Volume, 0, 0, &key, &t->values)) {
|
|
extractDVdouble(&t->values, key, &offset, &total_volume_m3_);
|
|
t->addMoreExplanation(offset, " total volume (%f m3)", total_volume_m3_);
|
|
}
|
|
|
|
if(findKey(MeasurementType::Unknown, ValueInformation::VolumeFlow, 0, 0, &key, &t->values)) {
|
|
extractDVdouble(&t->values, key, &offset, &volume_flow_m3h_);
|
|
t->addMoreExplanation(offset, " volume flow (%f m3/h)", volume_flow_m3h_);
|
|
}
|
|
|
|
if(findKey(MeasurementType::Instantaneous, ValueInformation::FlowTemperature, 0, 0, &key, &t->values)) {
|
|
has_t1_temperature_ = extractDVdouble(&t->values, key, &offset, &t1_temperature_c_);
|
|
t->addMoreExplanation(offset, " T1 flow temperature (%f °C)", t1_temperature_c_);
|
|
}
|
|
|
|
if(findKey(MeasurementType::Instantaneous, ValueInformation::ReturnTemperature, 0, 0, &key, &t->values)) {
|
|
has_t2_temperature_ = extractDVdouble(&t->values, key, &offset, &t2_temperature_c_);
|
|
t->addMoreExplanation(offset, " T2 flow temperature (%f °C)", t2_temperature_c_);
|
|
}
|
|
|
|
if (findKey(MeasurementType::Unknown, ValueInformation::Date, 0, 0, &key, &t->values)) {
|
|
struct tm datetime;
|
|
extractDVdate(&t->values, key, &offset, &datetime);
|
|
target_date_ = strdatetime(&datetime);
|
|
t->addMoreExplanation(offset, " target date (%s)", target_date_.c_str());
|
|
}
|
|
}
|
|
|
|
string MeterMultical803::status()
|
|
{
|
|
string s;
|
|
if (info_codes_ & INFO_CODE_VOLTAGE_INTERRUPTED) s.append("VOLTAGE_INTERRUPTED ");
|
|
if (info_codes_ & INFO_CODE_LOW_BATTERY_LEVEL) s.append("LOW_BATTERY_LEVEL ");
|
|
if (info_codes_ & INFO_CODE_EXTERNAL_ALARM) s.append("EXTERNAL_ALARM ");
|
|
if (info_codes_ & INFO_CODE_SENSOR_T1_ABOVE_MEASURING_RANGE) s.append("SENSOR_T1_ABOVE_MEASURING_RANGE ");
|
|
if (info_codes_ & INFO_CODE_SENSOR_T2_ABOVE_MEASURING_RANGE) s.append("SENSOR_T2_ABOVE_MEASURING_RANGE ");
|
|
if (info_codes_ & INFO_CODE_SENSOR_T1_BELOW_MEASURING_RANGE) s.append("SENSOR_T1_BELOW_MEASURING_RANGE ");
|
|
if (info_codes_ & INFO_CODE_SENSOR_T2_BELOW_MEASURING_RANGE) s.append("SENSOR_T2_BELOW_MEASURING_RANGE ");
|
|
if (info_codes_ & INFO_CODE_TEMP_DIFF_WRONG_POLARITY) s.append("TEMP_DIFF_WRONG_POLARITY ");
|
|
if (s.length() > 0) {
|
|
s.pop_back(); // Remove final space
|
|
return s;
|
|
}
|
|
return s;
|
|
}
|