File content as of revision 57:72c1c1357861:

#include <stdint.h>
#include <string.h>
#include <stdbool.h>
#include <stdint.h>

#include "gpio.h"
#include "program.h"
#include "ds18b20.h"
#include "fram.h"
#include "radiator.h"
#include "led.h"


#define RADIATOR_PUMP_DIR FIO2DIR(03) // P2.03 == p23;
#define RADIATOR_PUMP_PIN FIO2PIN(03)
#define RADIATOR_PUMP_SET FIO2SET(03)
#define RADIATOR_PUMP_CLR FIO2CLR(03)

static char      htgWinter;      static int iWinter;
static char      htgOverride;    static int iOverride;
static char*    hallRom;         static int iHallRom;
static int32_t nightTemperature; static int iNightTemperature;
static int32_t frostTemperature; static int iFrostTemperature;

bool     RadiatorGetWinter          (){ return (bool)htgWinter;        } 
bool     RadiatorGetOverride        (){ return (bool)htgOverride;      } 
uint16_t RadiatorGetHallDS18B20Value(){ return DS18B20ValueFromRom(hallRom); }
int      RadiatorGetNightTemperature(){ return  (int)nightTemperature; } 
int      RadiatorGetFrostTemperature(){ return  (int)frostTemperature; } 

static void  setWinter           ( bool value) { htgWinter         =   (char)value; FramWrite(iWinter,           1, &htgWinter       ); }
static void  setOverride         ( bool value) { htgOverride      =    (char)value; FramWrite(iOverride,         1, &htgOverride     ); }
static void  setHallRom          (char* value) { memcpy(hallRom,  value, 8);        FramWrite(iHallRom,          8,  hallRom         ); }
void RadiatorSetNightTemperature ( int  value) { nightTemperature = (int32_t)value; FramWrite(iNightTemperature, 4, &nightTemperature); }
void RadiatorSetFrostTemperature ( int  value) { frostTemperature = (int32_t)value; FramWrite(iFrostTemperature, 4, &frostTemperature); }

static bool outputBeforeOverride = false;
static void makeOutputBeforeOverride()
{
    //See if the temperature is too low
    int  hallTemp16ths = DS18B20ValueFromRom(hallRom);
    int nightTemp16ths = nightTemperature << 4;
    int frostTemp16ths = frostTemperature << 4;

    static bool tooCold = false; //This is static to ride through invalid temperature reads
    if (DS18B20IsValidValue(hallTemp16ths))
    {
        tooCold = hallTemp16ths < frostTemp16ths;
        if (htgWinter) tooCold |= hallTemp16ths < nightTemp16ths;
    }
    
    outputBeforeOverride = htgWinter && ProgramTimerOutput || tooCold;
}
static void adjustOverride()
{
    static bool previousOutput = false;
    if (previousOutput != outputBeforeOverride) setOverride(false);
    previousOutput = outputBeforeOverride;
}
bool RadiatorPump = false;
static void makeOutputWithOverride()
{
    RadiatorPump = htgOverride ? !outputBeforeOverride : outputBeforeOverride ;
}

void RadiatorSetWinter(bool value) //Summer is false, Winter is true
{
    if (htgWinter == (char)value) return; //Ignore no change
    setWinter(value);                     //Change to the new value
    
    bool prevOutputBeforeOverride = outputBeforeOverride;
    makeOutputBeforeOverride();
    
    if (htgOverride) //Only deal with an override that is already set; if it wasn't set don't change it
    {
        if (htgWinter) //Summer -> Winter
        {
            if (outputBeforeOverride != prevOutputBeforeOverride) setOverride(0); //Adjust the override to leave the heat as it was - off or on.
        }
        else //Winter -> Summer
        {
            setOverride(0); //turn off the heat.
        }
    }
        
    makeOutputWithOverride();
}
void RadiatorSetOverride(bool value)
{
    setOverride(value);
    makeOutputBeforeOverride();
    makeOutputWithOverride(); }

void RadiatorChgWinter  (){ RadiatorSetWinter  (!RadiatorGetWinter  ()); }
void RadiatorChgOverride(){ RadiatorSetOverride(!RadiatorGetOverride()); }

int RadiatorInit()
{
    hallRom = DS18B20Roms + 8 * DS18B20RomCount;
    DS18B20RomSetters[DS18B20RomCount] = setHallRom;
    DS18B20RomNames[DS18B20RomCount] = "Hall";
    DS18B20RomCount++;

    int  address;
    char    def1;
    int32_t def4;
    def1 =  0; address = FramLoad( 1, &htgWinter,        &def1); if (address < 0) return -1; iWinter           = address; 
    def1 =  0; address = FramLoad( 1, &htgOverride,      &def1); if (address < 0) return -1; iOverride         = address; 
               address = FramLoad( 8,  hallRom,              0); if (address < 0) return -1; iHallRom          = address;
    def4 = 15; address = FramLoad( 4, &nightTemperature, &def4); if (address < 0) return -1; iNightTemperature = address; 
    def4 =  8; address = FramLoad( 4, &frostTemperature, &def4); if (address < 0) return -1; iFrostTemperature = address; 
    
    RADIATOR_PUMP_DIR = 1; //Set the direction to 1 == output
    
    return 0;
}
void RadiatorMain()
{
    //Make the radiator output
    makeOutputBeforeOverride();
    adjustOverride();
    makeOutputWithOverride();
    
    //Pump output
    if (RadiatorPump) RADIATOR_PUMP_SET;
    else              RADIATOR_PUMP_CLR;

}