Central Heating controller using the real time clock, PHY module for internet, 1-wire interface for temperature sensors, a system log and a configuration file
Dependencies: net 1-wire lpc1768 crypto clock web fram log
/media/uploads/andrewboyson/heating.sch
/media/uploads/andrewboyson/heating.brd
/media/uploads/andrewboyson/eagle.epf
heating/values.c
- Committer:
- andrewboyson
- Date:
- 2021-04-23
- Revision:
- 106:41ed3ea0bbba
- Parent:
- 105:1899f7ed17ec
File content as of revision 106:41ed3ea0bbba:
#include <stdint.h> #include <string.h> #include <stdbool.h> #include "tftp.h" #include "dnslabel.h" //#include "fram.h" #include "clk.h" #include "clktime.h" #include "mstimer.h" #include "clktm.h" #include "ds18b20.h" #include "radiator.h" #include "boiler.h" #include "hot-water.h" #include "log.h" #include "net.h" #include "settings.h" bool ValuesTrace = false; static char serverName[DNS_MAX_LABEL_LENGTH+1]; static char fileName [DNS_MAX_LABEL_LENGTH+1]; static int32_t writeSize; static int32_t readInterval; static int64_t startTime; static int32_t count; char* ValuesGetServerName ( ) { return serverName; } char* ValuesGetFileName ( ) { return fileName; } int ValuesGetWriteSize ( ) { return (int) writeSize; } int ValuesGetReadInterval ( ) { return (int) readInterval; } void ValuesGetStartTm (struct tm* ptm) { ClkTimeToTmUtc(startTime, ptm); } int64_t ValuesGetStartTime ( ) { return startTime >> CLK_TIME_ONE_SECOND_SHIFT;} int ValuesGetCount ( ) { return (int) count; } void ValuesSetServerName (char* value) { DnsLabelCopy(serverName, value); SetValuesServerName ( value); } void ValuesSetFileName (char* value) { DnsLabelCopy( fileName, value); SetValuesFileName ( value); } void ValuesSetWriteSize (int value) { writeSize = value ; SetValuesWriteSize (&value); } void ValuesSetReadInterval (int value) { readInterval = value ; SetValuesReadInterval(&value); } static void setStartTime (int64_t value) { startTime = value ; SetValuesStartTime (&value); } static void setCount (int value) { count = value ; SetValuesCount (&value); } static int readValuesFromFram() { int address; int32_t def4; GetValuesServerName ( serverName); GetValuesFileName ( fileName); GetValuesWriteSize ( &writeSize); GetValuesReadInterval(&readInterval); GetValuesStartTime ( &startTime); GetValuesCount ( &count); return 0; } static uint32_t readStartMs; static int writeIndex; static int nextByteOfWriteStream() { int byteAfterData = count * 8; if (writeIndex >= byteAfterData) { setCount(0); return -1; } char c; GetValuesData(writeIndex, &c); writeIndex++; return c; } static void readValues() { uint64_t record = 0; uint16_t value; value = RadiatorGetHallDS18B20Value(); value &= 0x0FFF; record |= value; //0000 0000 0000 0AAA record <<= 12; //0000 0000 00AA A000 value = BoilerGetTankDS18B20Value(); value &= 0x0FFF; record |= value; //0000 0000 00AA ABBB record <<= 12; //0000 000A AABB B000 value = BoilerGetOutputDS18B20Value(); value &= 0x0FFF; record |= value; //0000 000A AABB BCCC record <<= 12; //0000 AAAB BBCC C000 //value = BoilerGetReturnDS18B20Value(); value = BoilerGetRtnDelDS18B20Value(); value &= 0x0FFF; record |= value; //0000 AAAB BBCC CDDD record <<= 12; //0AAA BBBC CCDD D000 value = HotWaterGetDS18B20Value(); value &= 0x0FFF; record |= value; //0AAA BBBC CCDD DEEE record <<= 4; //AAAB BBCC CDDD EEE0 record |= RadiatorPump << 0; record |= BoilerCall << 1; record |= BoilerPump << 2; //AAAB BBCC CDDD EEEF if (count <= 0) { count = 0; setStartTime(ClkNowTai()); } SetValuesData(count, &record); setCount(count + 1); } static void writeValues() { if (!serverName[0] ) return; //Do nothing if have no server name if ( !fileName[0] ) return; //Do nothing if have no file name if (TftpWriteStatus) return; //Do nothing if the TFTP client is busy strcpy(TftpServerName, serverName); struct tm tm; ClkTimeToTmUtc(startTime, &tm); int len = strftime(TftpFileName, DNS_MAX_LABEL_LENGTH+1, fileName, &tm); if (len == 0) { LogTimeF("Values - cannot make filename from template '%s'\r\n", count, fileName); return; } if (ValuesTrace) { if (NetTraceNewLine) Log("\r\n"); LogTimeF("Values - requesting backup of %d values to %s\r\n", count, TftpFileName); } writeIndex = 0; TftpWriteStatus = TFTP_WRITE_STATUS_REQUEST; //This is reset by TFTP when finished } void ValuesMain() { if (!readInterval) readStartMs = MsTimerCount; if (writeSize && count < writeSize && readInterval) { if (MsTimerRelative(readStartMs, readInterval * 1000)) { readValues(); //Only read values if they are going to be backed up readStartMs = MsTimerCount; } } else { readStartMs = MsTimerCount; } if (writeSize && count >= writeSize) writeValues(); //Backup the values once the backup size is reached } int ValuesInit() { if (readValuesFromFram()) return -1; readStartMs = MsTimerCount; TftpGetNextByteFunction = nextByteOfWriteStream; if (count > 0) writeValues(); //Backup the values if there are any return 0; }