Andrew Boyson / oldheating

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@38:2bfeefa8709a, 2019-03-11 (annotated)

Committer:
andrewboyson
Date:
Mon Mar 11 16:47:54 2019 +0000
Revision:
38:2bfeefa8709a
Parent:
33:6694d7c515a0
Child:
41:6413522ed343
Updated net library

Who changed what in which revision?

UserRevisionLine numberNew contents of line
andrewboyson 0:3c04f4b47041 1 #include <stdint.h>
andrewboyson 0:3c04f4b47041 2 #include <string.h>
andrewboyson 0:3c04f4b47041 3 #include <stdbool.h>
andrewboyson 0:3c04f4b47041 4
andrewboyson 0:3c04f4b47041 5 #include "tftp.h"
andrewboyson 38:2bfeefa8709a 6 #include "dnslabel.h"
andrewboyson 0:3c04f4b47041 7 #include "fram.h"
andrewboyson 20:904a4f043f2c 8 #include "clk.h"
andrewboyson 11:fa01ea25b62d 9 #include "mstimer.h"
andrewboyson 11:fa01ea25b62d 10 #include "clktm.h"
andrewboyson 0:3c04f4b47041 11 #include "ds18b20.h"
andrewboyson 0:3c04f4b47041 12 #include "radiator.h"
andrewboyson 0:3c04f4b47041 13 #include "boiler.h"
andrewboyson 0:3c04f4b47041 14 #include "program.h"
andrewboyson 0:3c04f4b47041 15 #include "log.h"
andrewboyson 0:3c04f4b47041 16 #include "net.h"
andrewboyson 0:3c04f4b47041 17
andrewboyson 0:3c04f4b47041 18 bool ValuesTrace = false;
andrewboyson 0:3c04f4b47041 19
andrewboyson 0:3c04f4b47041 20 static char serverName[DNS_MAX_LABEL_LENGTH+1]; static int iServerName;
andrewboyson 20:904a4f043f2c 21 static char fileName[DNS_MAX_LABEL_LENGTH+1]; static int iFileName;
andrewboyson 0:3c04f4b47041 22 static int32_t writeSize; static int iWriteSize;
andrewboyson 0:3c04f4b47041 23 static int32_t readInterval; static int iReadInterval;
andrewboyson 0:3c04f4b47041 24 static int64_t startTime; static int iStartTime;
andrewboyson 0:3c04f4b47041 25 static int32_t count; static int iCount;
andrewboyson 0:3c04f4b47041 26 static int iData;
andrewboyson 0:3c04f4b47041 27
andrewboyson 11:fa01ea25b62d 28 char* ValuesGetServerName ( ) { return serverName; }
andrewboyson 11:fa01ea25b62d 29 char* ValuesGetFileName ( ) { return fileName; }
andrewboyson 11:fa01ea25b62d 30 int ValuesGetWriteSize ( ) { return (int) writeSize; }
andrewboyson 1:ccc66fdf858d 31 int ValuesGetReadInterval ( ) { return (int) readInterval; }
andrewboyson 13:2ca12dd42e91 32 void ValuesGetStartTm (struct tm* ptm) { ClkTimeToTmUtc(startTime, ptm);}
andrewboyson 11:fa01ea25b62d 33 int ValuesGetCount ( ) { return (int) count; }
andrewboyson 0:3c04f4b47041 34
andrewboyson 38:2bfeefa8709a 35 void ValuesSetServerName (char* value) { DnsLabelCopy(serverName, value); FramWrite(iServerName , DNS_MAX_LABEL_LENGTH, serverName ); }
andrewboyson 38:2bfeefa8709a 36 void ValuesSetFileName (char* value) { DnsLabelCopy( fileName, value); FramWrite(iFileName , DNS_MAX_LABEL_LENGTH, fileName ); }
andrewboyson 38:2bfeefa8709a 37 void ValuesSetWriteSize (int value) { writeSize = value ; FramWrite(iWriteSize , 4, &writeSize ); }
andrewboyson 38:2bfeefa8709a 38 void ValuesSetReadInterval (int value) { readInterval = value ; FramWrite(iReadInterval, 4, &readInterval ); }
andrewboyson 38:2bfeefa8709a 39 static void setStartTime (int64_t value) { startTime = value ; FramWrite(iStartTime , 8, &startTime ); }
andrewboyson 38:2bfeefa8709a 40 static void setCount (int value) { count = value ; FramWrite(iCount , 4, &count ); }
andrewboyson 0:3c04f4b47041 41
andrewboyson 0:3c04f4b47041 42 static int readValuesFromFram()
andrewboyson 0:3c04f4b47041 43 {
andrewboyson 0:3c04f4b47041 44 int address;
andrewboyson 0:3c04f4b47041 45 int32_t def4;
andrewboyson 0:3c04f4b47041 46
andrewboyson 0:3c04f4b47041 47 address = FramLoad( DNS_MAX_LABEL_LENGTH+1, serverName , NULL ); if (address < 0) return -1; iServerName = address;
andrewboyson 0:3c04f4b47041 48 address = FramLoad( DNS_MAX_LABEL_LENGTH+1, fileName , NULL ); if (address < 0) return -1; iFileName = address;
andrewboyson 0:3c04f4b47041 49 def4 = 100; address = FramLoad( 4, &writeSize , &def4); if (address < 0) return -1; iWriteSize = address;
andrewboyson 0:3c04f4b47041 50 def4 = 15; address = FramLoad( 4, &readInterval, &def4); if (address < 0) return -1; iReadInterval = address;
andrewboyson 0:3c04f4b47041 51 address = FramLoad( 8, &startTime , NULL ); if (address < 0) return -1; iStartTime = address;
andrewboyson 0:3c04f4b47041 52 address = FramLoad( 4, &count , NULL ); if (address < 0) return -1; iCount = address;
andrewboyson 0:3c04f4b47041 53 address = FramAllocate( 1 ); if (address < 0) return -1; iData = address;
andrewboyson 0:3c04f4b47041 54 return 0;
andrewboyson 0:3c04f4b47041 55 }
andrewboyson 0:3c04f4b47041 56
andrewboyson 0:3c04f4b47041 57
andrewboyson 11:fa01ea25b62d 58 static uint32_t readStartMs;
andrewboyson 0:3c04f4b47041 59
andrewboyson 0:3c04f4b47041 60 static int writeIndex;
andrewboyson 0:3c04f4b47041 61
andrewboyson 0:3c04f4b47041 62 static int nextByteOfWriteStream()
andrewboyson 0:3c04f4b47041 63 {
andrewboyson 0:3c04f4b47041 64 int byteAfterData = count * 8;
andrewboyson 0:3c04f4b47041 65 if (writeIndex >= byteAfterData || writeIndex + iData >= FRAM_SIZE)
andrewboyson 0:3c04f4b47041 66 {
andrewboyson 0:3c04f4b47041 67 setCount(0);
andrewboyson 0:3c04f4b47041 68 return -1;
andrewboyson 0:3c04f4b47041 69 }
andrewboyson 0:3c04f4b47041 70 char c;
andrewboyson 0:3c04f4b47041 71 FramRead(writeIndex + iData, 1, &c);
andrewboyson 0:3c04f4b47041 72 writeIndex++;
andrewboyson 0:3c04f4b47041 73 return c;
andrewboyson 0:3c04f4b47041 74 }
andrewboyson 0:3c04f4b47041 75
andrewboyson 0:3c04f4b47041 76 static void readValues()
andrewboyson 11:fa01ea25b62d 77 {
andrewboyson 0:3c04f4b47041 78 uint64_t record = 0;
andrewboyson 0:3c04f4b47041 79 uint16_t value;
andrewboyson 0:3c04f4b47041 80 value = DS18B20ValueFromRom(RadiatorGetHallRom());
andrewboyson 0:3c04f4b47041 81 value &= 0x0FFF;
andrewboyson 0:3c04f4b47041 82 record |= value; //0000 0000 0000 0AAA
andrewboyson 0:3c04f4b47041 83 record <<= 12; //0000 0000 00AA A000
andrewboyson 0:3c04f4b47041 84 value = DS18B20ValueFromRom(BoilerGetTankRom ());
andrewboyson 0:3c04f4b47041 85 value &= 0x0FFF;
andrewboyson 0:3c04f4b47041 86 record |= value; //0000 0000 00AA ABBB
andrewboyson 0:3c04f4b47041 87 record <<= 12; //0000 000A AABB B000
andrewboyson 0:3c04f4b47041 88 value = DS18B20ValueFromRom(BoilerGetOutputRom());
andrewboyson 0:3c04f4b47041 89 value &= 0x0FFF;
andrewboyson 0:3c04f4b47041 90 record |= value; //0000 000A AABB BCCC
andrewboyson 0:3c04f4b47041 91 record <<= 12; //0000 AAAB BBCC C000
andrewboyson 0:3c04f4b47041 92 value = DS18B20ValueFromRom(BoilerGetReturnRom());
andrewboyson 0:3c04f4b47041 93 value &= 0x0FFF;
andrewboyson 0:3c04f4b47041 94 record |= value; //0000 AAAB BBCC CDDD
andrewboyson 0:3c04f4b47041 95 record <<= 16; //AAAB BBCC CDDD 0000
andrewboyson 0:3c04f4b47041 96
andrewboyson 0:3c04f4b47041 97 record |= ProgramTimerOutput << 0;
andrewboyson 0:3c04f4b47041 98 record |= RadiatorGetMode() << 1;
andrewboyson 0:3c04f4b47041 99 record |= RadiatorGetOverride() << 2;
andrewboyson 0:3c04f4b47041 100 record |= RadiatorPump << 3;
andrewboyson 0:3c04f4b47041 101 record |= BoilerCall << 4;
andrewboyson 0:3c04f4b47041 102 record |= BoilerPump << 5; //AAAB BBCC CDDD 003F
andrewboyson 0:3c04f4b47041 103
andrewboyson 33:6694d7c515a0 104 if (count == 0) setStartTime(ClkNowTai());
andrewboyson 0:3c04f4b47041 105
andrewboyson 0:3c04f4b47041 106 FramWrite(iData + 8 * count, 8, &record);
andrewboyson 0:3c04f4b47041 107 setCount(count + 1);
andrewboyson 0:3c04f4b47041 108 }
andrewboyson 0:3c04f4b47041 109
andrewboyson 0:3c04f4b47041 110 static void writeValues()
andrewboyson 0:3c04f4b47041 111 {
andrewboyson 0:3c04f4b47041 112 if (!serverName[0] ) return; //Do nothing if have no server name
andrewboyson 0:3c04f4b47041 113 if ( !fileName[0] ) return; //Do nothing if have no file name
andrewboyson 0:3c04f4b47041 114 if (TftpWriteStatus) return; //Do nothing if the TFTP client is busy
andrewboyson 0:3c04f4b47041 115
andrewboyson 0:3c04f4b47041 116 strcpy(TftpServerName, serverName);
andrewboyson 0:3c04f4b47041 117 struct tm tm;
andrewboyson 13:2ca12dd42e91 118 ClkTimeToTmUtc(startTime, &tm);
andrewboyson 0:3c04f4b47041 119 strftime(TftpFileName, DNS_MAX_LABEL_LENGTH+1, fileName, &tm);
andrewboyson 0:3c04f4b47041 120
andrewboyson 0:3c04f4b47041 121 if (ValuesTrace)
andrewboyson 0:3c04f4b47041 122 {
andrewboyson 0:3c04f4b47041 123 if (NetTraceNewLine) Log("\r\n");
andrewboyson 0:3c04f4b47041 124 LogTimeF("Values - requesting backup of %d values to %s\r\n", count, TftpFileName);
andrewboyson 0:3c04f4b47041 125 }
andrewboyson 28:bb55def47737 126
andrewboyson 0:3c04f4b47041 127 writeIndex = 0;
andrewboyson 0:3c04f4b47041 128 TftpWriteStatus = TFTP_WRITE_STATUS_REQUEST; //This is reset by TFTP when finished
andrewboyson 0:3c04f4b47041 129 }
andrewboyson 0:3c04f4b47041 130
andrewboyson 0:3c04f4b47041 131 void ValuesMain()
andrewboyson 0:3c04f4b47041 132 {
andrewboyson 11:fa01ea25b62d 133 if (!readInterval) readStartMs = MsTimerCount;
andrewboyson 28:bb55def47737 134 if (writeSize && count < writeSize && readInterval)
andrewboyson 0:3c04f4b47041 135 {
andrewboyson 11:fa01ea25b62d 136 if (MsTimerHasElapsed(readStartMs, readInterval * 1000))
andrewboyson 11:fa01ea25b62d 137 {
andrewboyson 11:fa01ea25b62d 138 readValues(); //Only read values if they are going to be backed up
andrewboyson 11:fa01ea25b62d 139 readStartMs = MsTimerCount;
andrewboyson 11:fa01ea25b62d 140 }
andrewboyson 0:3c04f4b47041 141 }
andrewboyson 11:fa01ea25b62d 142 else
andrewboyson 11:fa01ea25b62d 143 {
andrewboyson 11:fa01ea25b62d 144 readStartMs = MsTimerCount;
andrewboyson 11:fa01ea25b62d 145 }
andrewboyson 28:bb55def47737 146 if (writeSize && count >= writeSize) writeValues(); //Backup the values once the backup size is reached
andrewboyson 0:3c04f4b47041 147 }
andrewboyson 0:3c04f4b47041 148
andrewboyson 0:3c04f4b47041 149 int ValuesInit()
andrewboyson 0:3c04f4b47041 150 {
andrewboyson 0:3c04f4b47041 151 if (readValuesFromFram()) return -1;
andrewboyson 11:fa01ea25b62d 152 readStartMs = MsTimerCount;
andrewboyson 0:3c04f4b47041 153 TftpGetNextByteFunction = nextByteOfWriteStream;
andrewboyson 0:3c04f4b47041 154 if (count > 0) writeValues(); //Backup the values if there are any
andrewboyson 0:3c04f4b47041 155 return 0;
andrewboyson 0:3c04f4b47041 156 }