diff -r 5a237a99a793 -r d5bc44183aa4 brewco/brewco.c
--- a/brewco/brewco.c	Thu Feb 25 22:42:54 2016 +0100
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,1633 +0,0 @@
-/*****************************************************************************
- * Copyright (C) 2015
- *   
- * Michiel Broek <mbroek at mbse dot eu>
- *
- * This file is part of the mbsePi-apps
- *
- * This 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 2, or (at your option) any
- * later version.
- *
- * mbsePi-apps 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 ThermFerm; see the file COPYING.  If not, write to the Free
- * Software Foundation, 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
- *****************************************************************************/
-
-#include "brewco.h"
-#include "rdconfig.h"
-#include "rdsession.h"
-#include "rdrecipes.h"
-#include "util.h"
-#include "xutil.h"
-#include "lcd-pcf8574.h"
-#include "slcd.h"
-#include "lock.h"
-#include "devices.h"
-#include "keyboard.h"
-#include "simulator.h"
-#include "prompt.h"
-#include "setup.h"
-#include "logger.h"
-
-
-
-int			my_shutdown = FALSE;
-int			mlt_pump_state = 0;
-
-double			hltInput;			/* HLT PID variables		*/
-double			hltOutput;
-double			hltSetpoint;
-double			mltInput;			/* MLT PID variables		*/
-double			mltOutput;
-double			mltSetpoint;
-
-extern int              debug;
-extern sys_config       Config;
-extern a_recipe		*recipes;
-extern int              lcdHandle;
-extern int		slcdHandle;
-extern int		sock;
-
-#ifdef USE_SIMULATOR
-extern int		SIM_cooler;
-#endif
-char			*etcpath = NULL;
-char			*varpath = NULL;
-
-
-
-#ifndef HAVE_WIRINGPI_H
-pthread_t               threads[5];
-#endif
-
-
-#define	MANUAL_NONE	0
-#define	MANUAL_SELHLT	1
-#define	MANUAL_SELMLT	2
-#define	MANUAL_HLT	11
-#define	MANUAL_MLT	12
-
-#define	PERC_INIT	0
-#define	PERC_MLT	1
-#define	PERC_HLT	2
-#define	PERC_REST	3
-
-
-int manual		= MANUAL_NONE;
-
-
-
-/*
- * CGRAM characters
- */
-unsigned char	degC[8] 	= { 0b01000, 0b10100, 0b01000, 0b00111, 0b01000, 0b01000, 0b01000, 0b00111 };
-unsigned char	degF[8] 	= { 0b01000, 0b10100, 0b01000, 0b00111, 0b00100, 0b00110, 0b00100, 0b00100 };
-unsigned char	SP_Symbol[8]	= { 0b11100, 0b10000, 0b11100, 0b00111, 0b11101, 0b00111, 0b00100, 0b00100 };
-unsigned char	PumpONOFF[8]	= { 0b00000, 0b01110, 0b01010, 0b01110, 0b01000, 0b01000, 0b01000, 0b00000 };
-unsigned char	RevPumpONOFF[8]	= { 0b11111, 0b10001, 0b10101, 0b10001, 0b10111, 0b10111, 0b10111, 0b11111 };
-unsigned char	HeatONOFF[8]	= { 0b00000, 0b01010, 0b01010, 0b01110, 0b01110, 0b01010, 0b01010, 0b00000 };
-unsigned char	RevHeatONOFF[8]	= { 0b11111, 0b10101, 0b10101, 0b10001, 0b10001, 0b10101, 0b10101, 0b11111 };
-unsigned char	Language[8]	= { 0b11111, 0b00010, 0b01000, 0b11111, 0b00000, 0b10001, 0b10101, 0b11111 };
-
-
-void help(void);
-void die(int);
-
-
-
-void help(void)
-{
-    fprintf(stdout, "mbsePi-apps brewco v%s starting\n\n", VERSION);
-    fprintf(stdout, "Usage: brewco [-d] [-h]\n");
-    fprintf(stdout, "  -d --debug              Debug and run in foreground\n");
-    fprintf(stdout, "  -h --help               Display this help\n");
-}
-
-
-
-void die(int onsig)
-{
-    switch (onsig) {
-#ifdef USE_SIMULATOR
-	case SIGUSR1:	syslog(LOG_NOTICE, "Got SIGUSR1, start cooler");
-			SIM_cooler = TRUE;
-			return;
-	case SIGUSR2:	syslog(LOG_NOTICE, "Got SIGUSR2, stop cooler");
-			SIM_cooler = FALSE;
-			return;
-#endif
-	case SIGHUP:    syslog(LOG_NOTICE, "Got SIGHUP, shutting down");
-			break;
-	case SIGINT:    syslog(LOG_NOTICE, "Keyboard interrupt, shutting down");
-			break;
-	case SIGTERM:   syslog(LOG_NOTICE, "Got SIGTERM, shutting down");
-			break;
-	case SIGSEGV:   syslog(LOG_NOTICE, "Got SIGSEGV, shutting down");
-			my_shutdown = TRUE;
-			exit(SIGSEGV);
-			break;
-	default:        syslog(LOG_NOTICE, "die() on signal %d", onsig);
-    }
-
-    my_shutdown = TRUE;
-}
-
-
-
-void tempstatus(void)
-{
-    char	text[81];
-
-    snprintf(text, 8, "%6.2f\001", hltInput);
-#ifdef HAVE_WIRINGPI_H
-    piLock(LOCK_LCD);
-    lcdPosition(lcdHandle, 1, 1);
-    lcdPuts(lcdHandle, text);
-#endif
-    slcdPosition(slcdHandle, 1, 1);
-    slcdPuts(slcdHandle, text);
-
-    snprintf(text, 8, "%6.2f\001", mltInput);
-#ifdef HAVE_WIRINGPI_H
-    piLock(LOCK_LCD);
-    lcdPosition(lcdHandle, 10, 1);
-    lcdPuts(lcdHandle, text);
-#endif
-    slcdPosition(slcdHandle, 10, 1);
-    slcdPuts(slcdHandle, text);
-}
-
-
-
-/*
- * Third line, show setPoints or heater percentage.
- */
-void percstatus(int which)
-{
-    char	text[21];
-
-    if (which)
-	snprintf(text, 8, "%6.2f\002", hltSetpoint);
-    else
-    	snprintf(text, 8, "HLT%3d%%", (int)hltOutput);
-#ifdef HAVE_WIRINGPI_H
-    piLock(LOCK_LCD);
-    lcdPosition(lcdHandle, 1, 2);
-    lcdPuts(lcdHandle, text);
-#endif
-    slcdPosition(slcdHandle, 1, 2);
-    slcdPuts(slcdHandle, text);
-
-    if (which)
-	snprintf(text, 8, "%6.2f\002", mltSetpoint);
-    else
-    	snprintf(text, 8, "MLT%3d%%", (int)mltOutput);
-#ifdef HAVE_WIRINGPI_H
-    piLock(LOCK_LCD);
-    lcdPosition(lcdHandle, 10, 2);
-    lcdPuts(lcdHandle, text);
-#endif
-    slcdPosition(slcdHandle, 10, 2);
-    slcdPuts(slcdHandle, text);
-}
-
-
-
-/*
- * Third line during boil, only MLT status
- */
-void mltstatus(void)
-{
-    char        text[21];
-
-    snprintf(text, 20, "MLT %3d%%  %6.2f\002      ", (int)mltOutput, mltSetpoint);
-#ifdef HAVE_WIRINGPI_H
-    piLock(LOCK_LCD);
-    lcdPosition(lcdHandle, 0, 2);
-    lcdPuts(lcdHandle, text);
-#endif
-    slcdPosition(slcdHandle, 0, 2);
-    slcdPuts(slcdHandle, text);
-}
-
-
-
-void timestatus(int row, int timeval)
-{
-    char	text[21];
-    int		hours, mins, val = timeval;
-
-    hours = val / 3600;
-    val -= (hours * 3600);
-    mins = val / 60;
-    val -= (mins * 60);
- 
-    snprintf(text, 20, "      %02d:%02d:%02d      ", hours, mins, val);
-#ifdef HAVE_WIRINGPI_H
-    piLock(LOCK_LCD);
-    lcdPosition(lcdHandle, 0, row);
-    lcdPuts(lcdHandle, text);
-#endif
-    slcdPosition(slcdHandle, 0, row);
-    slcdPuts(slcdHandle, text);
-}
-
-
-
-int set_HLT_heater(units_list *unit, int state, double val)
-{
-    if (strcmp(unit->hlt_heater.uuid, (char *)"00000000-0000-0000-0000-000000000000") == 0)
-	return 0;
-
-    hltSetpoint = val;
-
-    if (state && (PID_getMode(unit->PID_hlt) == P_MANUAL)) {
-	hlt_status(1);
-	PID_setMode(unit->PID_hlt, P_AUTOMATIC);
-	return 1;
-    }
-    if (! state && (PID_getMode(unit->PID_hlt) == P_AUTOMATIC)) {
-	hlt_status(0);
-	PID_setMode(unit->PID_hlt, P_MANUAL);
-	return 1;
-    }
-
-    return 0;
-}
-
-
-
-int set_MLT_heater(units_list *unit, int state, double val)
-{
-    if (strcmp(unit->mlt_heater.uuid, (char *)"00000000-0000-0000-0000-000000000000") == 0)
-	return 0;
-
-    mltSetpoint = val;
-
-    if (state && (PID_getMode(unit->PID_mlt) == P_MANUAL)) {
-	mlt_status(1);
-	PID_setMode(unit->PID_mlt, P_AUTOMATIC);
-	return 1;
-    }
-    if (! state && (PID_getMode(unit->PID_mlt) == P_AUTOMATIC)) {
-	mlt_status(0);
-	PID_setMode(unit->PID_mlt, P_MANUAL);
-	return 1;
-    }
-
-    return 0;
-}
-
-
-
-int set_MLT_pump(units_list *unit, int state)
-{
-    if (strcmp(unit->mlt_pump.uuid, (char *)"00000000-0000-0000-0000-000000000000") == 0)
-	return 0;
-
-    if (state && ! mlt_pump_state) {
-	device_out(unit->mlt_pump.uuid, 1);
-	mlt_pump_state = 1;
-	return 1;
-    }
-    if (! state && mlt_pump_state) {
-	device_out(unit->mlt_pump.uuid, 0);
-	mlt_pump_state = 0;
-	return 1;
-    }
-
-    return 0;
-}
-
-
-
-void automatic_brew(units_list *, brew_session *, a_recipe *, int, int);
-void automatic_brew(units_list *unit, brew_session *brew, a_recipe *recipe, int dosave, int seconds)
-{
-    int		key, save = dosave, i;
-    char	data[128];
-    static int	mash_fase = MASH_NA, hopstand = 0, last_step = STEP_NA, last_fase = -1, oldsec = 75, startdelay = 0;
-
-    if (brew->brewstep != last_step) {
-	snprintf(data, 40, brewstep_name(last_step));
-	syslog(LOG_NOTICE, "AUTO: brewstep %s to %s", data, brewstep_name(brew->brewstep));
-    }
-
-    switch (brew->brewstep) {
-	case STEP_NA:		if (debug)
-				    fprintf(stdout, "auto: init recipe: %s-%s  unit: %s\n", recipe->code, recipe->name, unit->name);
-				syslog(LOG_NOTICE, "AUTO: starting new brew, recipe: %s-%s  unit: %s", recipe->code, recipe->name, unit->name);
-				brew->brewstep = STEP_BREWINIT;
-				break;
-
-	case STEP_BREWINIT:	prompt(103, NULL);		/* "   AUTOMATIC MODE   " */
-				prompt(207, NULL);		/* "    Delay start?    " */
-				prompt(300, NULL);		/* "                    " */
-				prompt(407, NULL);		/* "---  ---   No   Yes " */
-				if (debug)
-					fprintf(stdout, "step brewinit\n");
-				key = keywait();
-				if (key == KEY_RETURN) {
-				    brew->brewstep = STEP_WATERCHECK;
-				    startdelay = 0;
-				    syslog(LOG_NOTICE, "AUTO: brew initialize, direct start selected");
-				    break;
-				}
-				if (key == KEY_ENTER) {
-				    startdelay = 30;
-				    editInteger(&startdelay, 10, 960, 10, (char *)"Start delay", (char *)"mins");
-				}
-				syslog(LOG_NOTICE, "AUTO: brew initialize");
-				brew->brewstep = STEP_WATERCHECK;
-				break;
-
-	case STEP_WATERCHECK:	if (brew->brewstep != last_step) {
-				    prompt(111, NULL);		/* "AUTO --> Mash In    " */
-				    prompt(209, NULL);		/* "    Water Added?    " */
-				    prompt(300, NULL);
-				    prompt(407, NULL);          /* "---  ---   No   Yes " */
-				    last_step = brew->brewstep;
-				}
-				slcdDummy(slcdHandle);
-				key = keycheck();
-				if (key == KEY_ENTER) {
-				    brew->brewstep = STEP_PUMPPRIME;
-				    syslog(LOG_NOTICE, "AUTO: confirmed water added");
-				}
-				if (key == KEY_RETURN) {
-				    syslog(LOG_NOTICE, "AUTO: aborted water added");
-				    brew->brewstep = STEP_CLEANUP;
-				}
-				break;
-
-	case STEP_PUMPPRIME:	if (brew->brewstep != last_step) {
-				    prompt(100, NULL);		/* "                    " */
-				    prompt(210, NULL);		/* "     Pump Prime     " */
-				    prompt(300, NULL);		/* "                    " */
-				    prompt(400, NULL);		/* "                    " */
-				    hlt_status(0);
-				    mlt_status(0);
-				    last_step = brew->brewstep;
-				}
-				for (i = 1; i < 6; i++) {
-				    if (set_MLT_pump(unit, 1))
-					syslog(LOG_NOTICE, "AUTO: pump prime %d turn %s MLT pump", i, mlt_pump_state ? "on":"off");
-				    usleep(750000 + (i * 250000));	/* 250 + i * 250 mSec */
-				    if (set_MLT_pump(unit, 0))
-					syslog(LOG_NOTICE, "AUTO: pump prime %d turn %s MLT pump", i, mlt_pump_state ? "on":"off");
-				    usleep(350000);			/* 350 mSec */
-				}
-				brew->brewstep = STEP_WAITSTART;
-				break;
-
-	case STEP_WAITSTART:	if (startdelay == 0) {
-				    brew->brewstep = STEP_PREMASH;
-				    break;
-				}
-				if (brew->brewstep != last_step) {
-				    brew->timeout = startdelay * 60;
-				    prompt(111, NULL);          /* "AUTO --> Mash In    " */
-				    prompt(212, NULL);          /* "  To be started in  " */
-				    prompt(410, NULL);          /* " Continue: Yes  No  " */
-				    last_step = brew->brewstep;
-				}
-				if (oldsec != seconds) {
-				    timestatus(2, brew->timeout);
-				    brew->timeout--;
-				    if (brew->timeout <= 0) {
-					syslog(LOG_NOTICE, "AUTO: delayed start time reached");
-					brew->brewstep = STEP_PREMASH;
-				    }
-				    oldsec = seconds;
-				}
-				slcdDummy(slcdHandle);
-				key = keycheck();
-				if (key == KEY_RETURN) {
-				    syslog(LOG_NOTICE, "AUTO: delayed start skipped by user");
-				    brew->brewstep = STEP_PREMASH;
-				}
-				break;
-
-	case STEP_PREMASH:	if (brew->brewstep != last_step) {
-				    prompt(111, NULL);     	/* "AUTO --> Prepare    " */
-				    prompt(300, NULL);          /* "                    " */
-				    prompt(418, NULL);          /* "---  ---  Pause --- " */
-				    tempstatus();
-				    hlt_status(1);
-				    mlt_status(1);
-				    pump_status(unit->pump_premash);
-				    last_step = brew->brewstep;
-				    initlog(brew->name);
-				}
-				if (oldsec != seconds) {
-				    tempstatus();
-				    percstatus((seconds / 2) % 4);
-				    oldsec = seconds;
-				}
-				if (set_HLT_heater(unit, 1, 85.0))
-				    syslog(LOG_NOTICE, "AUTO: premash turn on HLT at %6.2f", hltSetpoint);
-				if (set_MLT_heater(unit, 1, 10.0))
-				    syslog(LOG_NOTICE, "AUTO: premash turn on MLT at %6.2f", mltSetpoint);
-				if (set_MLT_pump(unit, unit->pump_premash))
-				    syslog(LOG_NOTICE, "AUTO: premash turn %s MLT pump", mlt_pump_state ? "on":"off");
-				if (hltInput >= 85.0) {
-				    brew->brewstep = STEP_MASHING;
-				    brew->mashstep = 0;
-				    mash_fase = MASH_NA;
-				    save = TRUE;
-				}
-				break;
-
-	case STEP_MASHING:	if (brew->brewstep != last_step) {
-				    prompt(111 + brew->mashstep, NULL);     /* "AUTO --> [mashname] " */
-				    prompt(300, NULL);                      /* "                    " */
-				    prompt(418, NULL);                      /* "---  ---  Pause --- " */
-				    tempstatus();
-				    hlt_status(1);
-				    mlt_status(1);
-				    pump_status(unit->pump_onmash);
-				    last_step = brew->brewstep;
-				}
-				if (set_HLT_heater(unit, 1, 85.0))
-				    syslog(LOG_NOTICE, "AUTO: mash turn on HLT at %6.2f", hltSetpoint);
-				if (set_MLT_heater(unit, 1, recipe->mash[brew->mashstep].setpoint))
-				    syslog(LOG_NOTICE, "AUTO: mash turn on MLT at %6.2f", mltSetpoint);
-
-				switch (mash_fase) {
-				    case MASH_NA:	if (recipe->mash[brew->mashstep].skip) {
-							    syslog(LOG_NOTICE, "AUTO: skipping mash step %d", brew->mashstep);
-							    brew->mashstep++;
-							} else {
-					    		    mltSetpoint = recipe->mash[brew->mashstep].setpoint;
-							    brew->timeout = recipe->mash[brew->mashstep].duration * 60;
-							    mash_fase = MASH_HEATING;
-							    syslog(LOG_NOTICE, "AUTO: mash step %d fase NA, setpoint %6.2f, duration %d", 
-									brew->mashstep, mltSetpoint, brew->timeout);
-							}
-							if (brew->mashstep == 0) {
-							    brew->starttime = time(NULL);
-							    save = TRUE;
-							}
-					    		break;
-
-				    case MASH_PROMPT:	if (last_fase != mash_fase) {
-							    prompt(111 + brew->mashstep, NULL);	/* "AUTO --> [mashname] " */
-							    prompt(219, NULL);              	/* "    Mash added?     " */
-							    prompt(300, NULL);
-							    prompt(407, NULL);              	/* "---  ---   No   Yes " */
-							    last_fase = mash_fase;
-							}
-							if (set_MLT_pump(unit, 0))	/* Off during mash add */
-							    syslog(LOG_NOTICE, "AUTO: mash turn %s MLT pump", mlt_pump_state ? "on":"off");
-							slcdDummy(slcdHandle);
-							key = keycheck();
-							if (key == KEY_ENTER) {
-							    mash_fase = MASH_NA;
-							    brew->mashstep++;
-							    syslog(LOG_NOTICE, "AUTO: confirmed mash added");
-							}
-							if (key == KEY_RETURN) {
-							    syslog(LOG_NOTICE, "AUTO: aborted mash added");
-							    brew->brewstep = STEP_CLEANUP;
-							    brew->mashstep = 0;
-							}
-							break;
-
-				    case MASH_IODINE:	if (last_fase != mash_fase) {
-							    prompt(118, NULL);          /* "AUTO --> Mash Out   " */
-							    prompt(213, NULL);          /* "    Iodine test     " */
-							    timestatus(2, brew->timeout);
-							    prompt(410, NULL);          /* " Continue: Yes  No  " */
-							    last_fase = mash_fase;
-							}
-							if (set_MLT_pump(unit, unit->pump_onmash))
-							    syslog(LOG_NOTICE, "AUTO: mash turn %s MLT pump", mlt_pump_state ? "on":"off");
-							if (oldsec != seconds) {
-							    brew->timeout--;
-							    timestatus(2, brew->timeout);
-							    if (brew->timeout <= 0) {
-								syslog(LOG_NOTICE, "AUTO: mash IODINE test timeout");
-								mash_fase = MASH_NA;
-								brew->mashstep++;
-							    }
-							    oldsec = seconds;
-							}
-							slcdDummy(slcdHandle);
-							key = keycheck();
-							if (key == KEY_RETURN) {
-							    syslog(LOG_NOTICE, "AUTO: mash IODINE test confirmed");
-							    mash_fase = MASH_NA;
-							    brew->mashstep++;
-							}
-							if (key == KEY_ENTER) {
-							    syslog(LOG_NOTICE, "AUTO: mash IODINE test declined");
-							    mash_fase = MASH_REST;
-							    brew->timeout = 600;	/* Add 10 more minutes */
-							}
-							break;
-
-				    case MASH_HEATING:	if (last_fase != mash_fase) {
-							    prompt(111 + brew->mashstep, NULL);     /* "AUTO --> [mashname] " */
-							    prompt(200, NULL);
-							    prompt(300, NULL);
-							    prompt(418, NULL);                      /* "---  ---  Pause --- " */
-							    hlt_status(1);
-							    mlt_status(1);
-							    pump_status(unit->pump_onmash);
-							    last_fase = mash_fase;
-							    syslog(LOG_NOTICE, "AUTO: mash step %d fase HEATING started", brew->mashstep);
-							}
-							if (set_MLT_pump(unit, unit->pump_onmash))
-							    syslog(LOG_NOTICE, "AUTO: mash turn %s MLT pump", mlt_pump_state ? "on":"off");
-							if (oldsec != seconds) {
-							    tempstatus();
-							    percstatus((seconds / 2) % 4);
-							    oldsec = seconds;
-							}
-							if (mltInput > mltSetpoint) {
-							    syslog(LOG_NOTICE, "AUTO: mash step %d fase HEATING reached %6.2f", brew->mashstep, mltSetpoint);
-							    mash_fase = MASH_REST;
-							}
-							break;
-
-				    case MASH_REST:	if (last_fase != mash_fase) {
-							    prompt(111 + brew->mashstep, NULL);     /* "AUTO --> [mashname] " */
-							    prompt(200, NULL);
-							    prompt(300, NULL);
-							    prompt(418, NULL);                      /* "---  ---  Pause --- " */
-							    hlt_status(1);
-							    mlt_status(1);
-							    pump_status(unit->pump_onmash);
-							    last_fase = mash_fase;
-							}
-							if (oldsec != seconds) {
-							    tempstatus();
-							    timestatus(2, brew->timeout);
-							    if (brew->mashstep == 7) {
-								/*
-								 * During mash-out rest, allow the grain to sink
-								 */
-								if (set_MLT_pump(unit, unit->pump_mashout))
-								    syslog(LOG_NOTICE, "AUTO: mash-out turn %s MLT pump", mlt_pump_state ? "on":"off");
-							    } else {
-								if (set_MLT_pump(unit, unit->pump_onmash))
-								    syslog(LOG_NOTICE, "AUTO: mash turn %s MLT pump", mlt_pump_state ? "on":"off");
-							    }
-							    brew->timeout--;
-							    if (brew->timeout <= 0) {
-								syslog(LOG_NOTICE, "AUTO: mash step %d fase REST done", brew->mashstep);
-								if ((brew->mashstep == 0) && ! unit->skip_add) {
-								    mash_fase = MASH_PROMPT;
-								} else if ((brew->mashstep == 6) && ! unit->skip_iodine) {
-								    mash_fase = MASH_IODINE;
-								    brew->timeout = unit->iodine_time * 60;
-								} else if (brew->mashstep == 7) {
-								    mash_fase = MASH_DONE;
-								} else {
-								    mash_fase = MASH_NA;
-								    brew->mashstep++;
-								}
-							    }
-							    oldsec = seconds;
-							}
-							break;
-
-				    case MASH_DONE:	syslog(LOG_NOTICE, "AUTO: mash step %d fase DONE", brew->mashstep);
-							if (set_MLT_heater(unit, 1, recipe->mash[7].setpoint))
-							    syslog(LOG_NOTICE, "AUTO: mash done turn MLT off");
-							if (set_MLT_pump(unit, 0))
-							    syslog(LOG_NOTICE, "AUTO: mash done turn %s MLT pump", mlt_pump_state ? "on":"off");
-							brew->mashstep = 0;
-							brew->brewstep = STEP_MASHREMOVE;
-							break;
-				}
-				break;
-
-	case STEP_MASHREMOVE:	if (unit->skip_remove) {
-				    syslog(LOG_NOTICE, "AUTO: skipping Mash remove");
-				    brew->brewstep = STEP_PREBOIL;
-				} else {
-				    if (brew->brewstep != last_step) {
-					prompt(118, NULL);          /* "AUTO --> Mash Out   " */
-					prompt(220, NULL);          /* "   Mash Removed?    " */
-					prompt(300, NULL);
-					prompt(407, NULL);          /* "---  ---   No   Yes " */
-					last_step = brew->brewstep;
-				    }
-				    slcdDummy(slcdHandle);
-				    key = keycheck();
-				    if (key == KEY_ENTER) {
-					syslog(LOG_NOTICE, "AUTO: Confirmed Mash removed");
-					brew->brewstep = STEP_PREBOIL;
-				    }
-				}
-				break;
-
-	case STEP_PREBOIL:	if (brew->brewstep != last_step) {
-				    prompt(119, NULL);          /* "AUTO --> Boil       " */
-				    prompt(200, NULL);
-				    prompt(300, NULL);
-				    tempstatus();
-				    mltstatus();
-				    prompt(418, NULL);          /* "---  ---  Pause --- " */
-				    hlt_status(0);
-				    mlt_status(1);
-				    pump_status(unit->pump_onboil && (mltInput < unit->pump_stop));
-				    last_step = brew->brewstep;
-				}
-				if (oldsec != seconds) {
-				    tempstatus();
-				    mltstatus();
-				    oldsec = seconds;
-				}
-				if (set_HLT_heater(unit, 0, 10.0))
-				    syslog(LOG_NOTICE, "AUTO: preboil turn off HLT");
-				if (set_MLT_heater(unit, 1, 100.1))
-				    syslog(LOG_NOTICE, "AUTO: preboil turn on MLT to boil");
-				if (set_MLT_pump(unit, unit->pump_onboil && (mltInput < unit->pump_stop)))
-				    syslog(LOG_NOTICE, "AUTO: preboil turn %s MLT pump", mlt_pump_state ? "on":"off");
-				if (mltInput > 99.2) {
-				    syslog(LOG_NOTICE, "AUTO: reached boil temperature %.2f, start %d minutes boil", mltInput, recipe->boiltime);
-				    brew->brewstep = STEP_BOILING;
-				    brew->boiltimer = recipe->boiltime * 60;
-				}
-				break;
-
-	case STEP_BOILING:	if (set_HLT_heater(unit, 0, 10.0))
-				    syslog(LOG_NOTICE, "AUTO: boil turn off HLT");
-				if (set_MLT_heater(unit, 1, 100.1))
-				    syslog(LOG_NOTICE, "AUTO: boil turn on MLT to boil");
-				if (set_MLT_pump(unit, unit->pump_onboil && (mltInput < unit->pump_stop)))
-				    syslog(LOG_NOTICE, "AUTO: boil turn %s MLT pump", mlt_pump_state ? "on":"off");
-				if (brew->brewstep != last_step) {
-				    prompt(119, NULL);          /* "AUTO --> Boil       " */
-				    prompt(200, NULL);
-				    prompt(300, NULL);
-				    tempstatus();
-				    mltstatus();
-				    prompt(418, NULL);          /* "---  ---  Pause --- " */
-				    hlt_status(0);
-				    mlt_status(1);
-				    pump_status(unit->pump_onboil && (mltInput < unit->pump_stop));
-				    last_step = brew->brewstep;
-				}
-				if (oldsec != seconds) {
-				    tempstatus();
-				    if ((seconds / 2) % 4) {
-				        timestatus(2, brew->boiltimer);
-				    } else {
-					mltstatus();
-				    }
-				    if (brew->boiltimer >= 0) {
-				    	brew->boiltimer--;
-				    } else {
-					brew->brewstep = STEP_BOILDONE;
-				        syslog(LOG_NOTICE, "AUTO: boil is done");
-				    }
-				    oldsec = seconds;
-				}
-				break;
-
-	case STEP_BOILDONE:	if (set_MLT_heater(unit, 0, 10.0))
-				    syslog(LOG_NOTICE, "AUTO: after boil turn off MLT heater");
-				if (set_MLT_pump(unit, 0))
-				    syslog(LOG_NOTICE, "AUTO: after boil turn %s MLT pump", mlt_pump_state ? "on":"off");
-				if (brew->brewstep != last_step) {
-				    prompt(120, NULL);          /* "AUTO --> Cooling    " */
-				    prompt(214, NULL);          /* "   START COOLING    " */
-				    prompt(300, NULL);
-				    prompt(410, NULL);		/* " Continue: Yes  No  " */
-				    last_step = brew->brewstep;
-				}
-				slcdDummy(slcdHandle);
-				key = keycheck();
-				if (key == KEY_ENTER) {
-				    brew->brewstep = STEP_CLEANUP;
-				    syslog(LOG_NOTICE, "AUTO: user skipped cooling");
-				}
-				if (key == KEY_RETURN) {
-				    brew->brewstep = STEP_COOLING;
-				    syslog(LOG_NOTICE, "AUTO: user started cooling");
-				}
-				break;
-
-	case STEP_COOLING:	for (i = 0; i < 3; i++) {
-				    if ((recipe->hopstand[i].skip == 0) && (mltInput <= recipe->hopstand[i].max) && (mltInput >= recipe->hopstand[i].min)) {
-				        brew->brewstep = STEP_HOPSTAND;
-					hopstand = i;
-					syslog(LOG_NOTICE, "AUTO: starting hopstand %d", i+1);
-				    }
-				}
-				if (brew->brewstep == STEP_HOPSTAND)
-				    break;
-				// hot whirlpool start at 85 degrees
-				// cold whirlpool start at 30 degrees
-
-				if (brew->brewstep != last_step) {
-				    prompt(120, NULL);          /* "AUTO --> Cooling    " */
-				    prompt(200, NULL);
-				    tempstatus();
-				    prompt(300, NULL);
-				    prompt(418, NULL);          /* "---  ---  Pause --- " */
-				    hlt_status(0);
-				    mlt_status(0);
-				    pump_status(0);
-				    last_step = brew->brewstep;
-				}
-				if (oldsec != seconds) {
-				    tempstatus();
-				    oldsec = seconds;
-				}
-				if (mltInput <= recipe->coolto) {
-				    syslog(LOG_NOTICE, "AUTO: cool temperture %.2f reached", recipe->coolto);
-				    brew->brewstep = STEP_CLEANUP;
-				}
-				break;
-
-	case STEP_HOPSTAND:	if (brew->brewstep != last_step) {
-				    prompt(122 + hopstand, NULL);	/* "AUTO --> Hopstand n " */
-				    tempstatus();
-				    timestatus(2, brew->timeout);
-				    prompt(418, NULL);			/* "---  ---  Pause --- " */
-				    brew->boiltimer = recipe->hopstand[hopstand].duration * 60;
-				    last_step = brew->brewstep;
-				}
-
-				if (recipe->hopstand[hopstand].hold) {
-				    if (set_MLT_heater(unit, 1, recipe->hopstand[hopstand].setpoint))
-					syslog(LOG_NOTICE, "AUTO: hopstand 1 turn on MLT at %6.2f", mltSetpoint);
-				}
-				if (set_MLT_pump(unit, 1))
-				    syslog(LOG_NOTICE, "AUTO: hopstand 1 turn %s MLT pump", mlt_pump_state ? "on":"off");
-				if (oldsec != seconds) {
-				    tempstatus();
-				    timestatus(2, brew->timeout);
-				    brew->boiltimer--;
-				    if (brew->boiltimer <= 0) {
-					syslog(LOG_NOTICE, "AUTO: hopstand %d done", hopstand+1);
-					if (set_MLT_heater(unit, 0, 10.0))
-					    syslog(LOG_NOTICE, "AUTO: hopstand 1 turn off MLT at %6.2f", mltSetpoint);
-					brew->brewstep = STEP_COOLING;
-				    }
-				    oldsec = seconds;
-				}
-				break;
-
-	case STEP_WHIRLPOOL:	prompt(121, NULL);		/* "AUTO --> Whirlpool  " */
-				break;
-
-	case STEP_CLEANUP:	if (brew->brewstep != last_step) {
-				    prompt(101, NULL);              /* "    Brewco x.x.x    " */
-				    prompt(200, NULL);              /* "                    " */
-				    prompt(300, NULL);              /* "                    " */
-				    prompt(400, NULL);              /* "                    " */
-				    last_step = brew->brewstep;
-				}
-				syslog(LOG_NOTICE, "AUTO: cleanup");
-				if (set_HLT_heater(unit, 0, 10.0))
-				    syslog(LOG_NOTICE, "AUTO: cleanup turn on HLT at %6.2f", hltSetpoint);
-				if (set_MLT_heater(unit, 0, 10.0))
-				    syslog(LOG_NOTICE, "AUTO: cleanup turn on MLT at %6.2f", mltSetpoint);
-				if (set_MLT_pump(unit, 0))
-				    syslog(LOG_NOTICE, "AUTO: cleanup turn %s MLT pump", mlt_pump_state ? "on":"off");
-				brew->brewstep = STEP_BREWDONE;
-				break;
-
-	case STEP_BREWDONE:	if (brew->brewstep != last_step) {
-				    prompt(101, NULL);              /* "    Brewco x.x.x    " */
-				    prompt(200, NULL);              /* "                    " */
-				    prompt(301, NULL);              /* "      Finished      " */
-				    prompt(408, NULL);              /* "---  ---   Ok   --- " */
-				    last_step = brew->brewstep;
-				}
-				syslog(LOG_NOTICE, "AUTO: brew done");
-				brew->brewstep = -1;
-				brew->endtime = time(NULL);
-				save = TRUE;
-				do {
-				    key = keywait();
-				} while (key != KEY_RETURN);
-				/*
-				 * Rewrite the display
-				 */
-				prompt(101, NULL);      	/* "    Brewco x.x.x    " */
-				tempstatus();
-				prompt(300, NULL);      	/* "                    " */
-				prompt(401, NULL);      	/* "---  MAN  AUTO SETUP" */
-				break;
-    }
-
-    if (save) {
-	snprintf(data, 127, "%d,%.2f,%.2f,%.2f,%.2f,%.2f,%.2f", brew->brewstep,
-			hltInput, hltOutput, hltSetpoint, mltInput, mltOutput, mltSetpoint);
-	logger(brew->name, data);
-	wrsession(brew);
-    }
-}
-
-
-
-void manual_prompt(void)
-{
-    switch (manual) {
-	case MANUAL_SELHLT:	prompt(104, NULL);      /* "    MANUAL MODE     " */
-				prompt(303, NULL);      /* "     Manual HLT     " */
-				prompt(402, NULL);      /* "---  dwn  quit  ok  " */
-				break;
-	case MANUAL_SELMLT:	prompt(104, NULL);      /* "    MANUAL MODE     " */
-				prompt(304, NULL);      /* "     Manual MLT     " */
-				prompt(404, NULL);      /* " up  ---  quit  ok  " */
-				break;
-	case MANUAL_HLT:	prompt(104, NULL);      /* "    MANUAL MODE     " */
-				prompt(300, NULL);	/* "                    " */
-				prompt(413, NULL);      /* "UP* *DWN  heat  --- " */
-				break;
-	case MANUAL_MLT:	prompt(104, NULL);      /* "    MANUAL MODE     " */
-				prompt(300, NULL);	/* "                    " */
-				prompt(406, NULL);      /* "UP* *DWN  heat  pmp " */
-				break;
-    }
-}
-
-
-
-/*
- * Manual menu for testing your equipment.
- */
-int manual_menu(units_list *, int);
-int manual_menu(units_list *unit, int seconds)
-{
-    int		key;
-
-    switch (manual) {
-        case MANUAL_SELHLT:     slcdDummy(slcdHandle);
-				key = keycheck();
-                                if (key == KEY_DOWN) {
-                                    manual = MANUAL_SELMLT;
-				    manual_prompt();
-				}
-                                if (key == KEY_RETURN) {
-                                    manual = MANUAL_NONE;
-				    mlt_pump_state = 0;
-				    PID_setMode(unit->PID_mlt, P_MANUAL);
-				    PID_setMode(unit->PID_hlt, P_MANUAL);
-				    hlt_status(0);
-				    mlt_status(0);
-				    device_out(unit->mlt_pump.uuid, mlt_pump_state);
-				}
-                                if (key == KEY_ENTER) {
-                                                // TODO: prompt for water
-                                    manual = MANUAL_HLT;
-				    manual_prompt();
-                                }
-                                break;
-        case MANUAL_SELMLT:     slcdDummy(slcdHandle);
-				key = keycheck();
-                                if (key == KEY_UP) {
-                                    manual = MANUAL_SELHLT;
-				    manual_prompt();
-				}
-                                if (key == KEY_RETURN) {
-                                    manual = MANUAL_NONE;
-				    mlt_pump_state = 0;
-				    PID_setMode(unit->PID_mlt, P_MANUAL);
-				    PID_setMode(unit->PID_hlt, P_MANUAL);
-				    hlt_status(0);
-				    mlt_status(0);
-				    device_out(unit->mlt_pump.uuid, mlt_pump_state);
-				}
-                                if (key == KEY_ENTER) {
-                                                // TODO: prompt for water
-                                    manual = MANUAL_MLT;
-				    manual_prompt();
-                                }
-                                break;
-        case MANUAL_HLT:        tempstatus();
-				percstatus((seconds / 2) % 4);
-
-				slcdDummy(slcdHandle);
-                                key = keycheck();
-                                if (key == KEY_RETURN) {
-				    if (PID_getMode(unit->PID_hlt) == P_MANUAL) {
-					PID_setMode(unit->PID_hlt, P_AUTOMATIC);
-					hlt_status(1);
-				    } else {
-					PID_setMode(unit->PID_hlt, P_MANUAL);
-					hlt_status(0);
-				    }
-                                }
-				if ((key == KEY_DOWN) && (hltSetpoint > 10))
-				    hltSetpoint -= 1.0;
-				if ((key == KEY_UP) && (hltSetpoint < 100))
-				    hltSetpoint += 1.0;
-                                if (key == KEY_ESCAPE) {
-                                    manual = MANUAL_SELHLT;
-				    manual_prompt();
-                                }
-                                break;
-        case MANUAL_MLT:        tempstatus();
-				percstatus((seconds / 2) % 4);
-
-				slcdDummy(slcdHandle);
-				key = keycheck();
-                                if (key == KEY_RETURN) {
-				    if (PID_getMode(unit->PID_mlt) == P_MANUAL) {
-					PID_setMode(unit->PID_mlt, P_AUTOMATIC);
-					mlt_status(1);
-				    } else {
-					PID_setMode(unit->PID_mlt, P_MANUAL);
-					mlt_status(0);
-				    }
-                                }
-				if ((key == KEY_DOWN) && (mltSetpoint > 10))
-				    mltSetpoint -= 1.0;
-				if ((key == KEY_UP) && (mltSetpoint < 100))
-				    mltSetpoint += 1.0;
-                                if (key == KEY_ENTER) {
-                                    if (mlt_pump_state)
-					set_MLT_pump(unit, 0);
-				    else
-					set_MLT_pump(unit, 1);
-                                }
-                                if (key == KEY_ESCAPE) {
-                                    manual = MANUAL_SELMLT;
-				    manual_prompt();
-                                }
-                                device_out(unit->mlt_pump.uuid, mlt_pump_state);
-                                break;
-    }
-
-    return 0;
-}
-
-
-
-char *choose_recipe(void);
-char *choose_recipe(void)
-{
-    int			total, i, key, choice = 1;
-    static char		uuid[37];
-    a_recipe		*recipe;
-    char		pmpt[81];
-
-    strcpy(uuid, (char *)"00000000-0000-0000-0000-000000000000");
-    for (;;) {
-	total = 0;
-	for (recipe = recipes; recipe; recipe = recipe->next)
-	    total++;
-
-	if (total == 0)
-	    return uuid;
-
-	i = 0;
-	for (recipe = recipes; recipe; recipe = recipe->next) {
-	    i++;
-	    if (i == choice)
-		break;
-	}
-
-	prompt(102, NULL);          /* "     SETUP MENU     " */
-	prompt(221, NULL);          /* "   Select Recipe    " */
-	if (total) {
-	    snprintf(pmpt, Config.lcd_cols + 1, "%s %s                   ", recipe->code, recipe->name);
-	    prompt(300, pmpt);
-	}
-	if (total == 1)
-	    prompt(405, NULL);      /* "---  ---  quit  ok  " */
-	else if (choice == 1)
-	    prompt(402, NULL);      /* "---  dwn  quit  ok  " */
-	else if (choice == total)
-	    prompt(404, NULL);      /* " up  ---  quit  ok  " */
-	else
-	    prompt(403, NULL);      /* " up  dwn  quit  ok  " */
-
-	key = keywait();
-	if ((key == KEY_RETURN) || my_shutdown)
-	    return uuid;
-	if (key == KEY_ENTER) {
-	    strcpy(uuid, recipe->uuid);
-	    return uuid;
-	}
-	if ((key == KEY_UP) && (total > 1) && (choice > 1)) {
-	    choice--;
-	}
-	if ((key == KEY_DOWN) && (total > 1) && (choice < total))
-	    choice++;
-    }
-}
-
-
-
-int server(void);
-int server(void)
-{
-    int 		rc = 0, run = 1, dosave, key, temp, MLTp, HLTp, percslot, percfase = PERC_INIT;
-    int			do_init = TRUE, seconds = 0, minutes = 0;
-    units_list		*unit;
-    a_recipe		*recipe = NULL;
-    brew_session	*brew = NULL;
-#ifndef HAVE_WIRINGPI_H
-    long		t = 0;
-#endif
-    time_t		now, last = (time_t)0;
-    long		nowmillis, perctimer;
-    struct tm		*tm;
-
-    prompt(101, NULL);
-
-    /*
-     * Define special characters in the display CGRAM
-     */
-    if (Config.tempFormat == 'C')
-    	slcdCharDef(slcdHandle, 1, degC);
-    else
-	slcdCharDef(slcdHandle, 1, degF);
-    slcdCharDef(slcdHandle, 2, SP_Symbol);
-    slcdCharDef(slcdHandle, 3, PumpONOFF);
-    slcdCharDef(slcdHandle, 4, RevPumpONOFF);
-    slcdCharDef(slcdHandle, 5, HeatONOFF);
-    slcdCharDef(slcdHandle, 6, RevHeatONOFF);
-    slcdCharDef(slcdHandle, 7, Language);
-
-    if (lockprog((char *)"brewco")) {
-	syslog(LOG_NOTICE, "Can't lock");
-	return 1;
-    }
-
-    if (debug)
-	fprintf(stdout, "Begin server()\n");
-
-    if ((rc = devices_detect())) {
-	syslog(LOG_NOTICE, "Detected %d new devices", rc);
-	if (debug)
-	    fprintf(stdout, "Detected %d new devices\n", rc);
-	wrconfig();
-    }
-
-#ifdef HAVE_WIRINGPI_H
-    rc = piThreadCreate(my_devices_loop);
-#else
-    rc = pthread_create(&threads[t], NULL, my_devices_loop, (void *)t );
-#endif
-    if (rc) {
-	fprintf(stderr, "my_devices_loop thread didn't start rc=%d\n", rc);
-	syslog(LOG_NOTICE, "my_devices_loop thread didn't start rc=%d", rc);
-#ifndef HAVE_WIRINGPI_H
-    } else {
-	t++;
-#endif
-    }
-
-#ifdef HAVE_WIRINGPI_H
-    rc = piThreadCreate(my_keyboard_loop);
-#else
-    rc = pthread_create(&threads[t], NULL, my_keyboard_loop, (void *)t );
-#endif
-    if (rc) {
-	fprintf(stderr, "my_keyboard_loop thread didn't start rc=%d\n", rc);
-	syslog(LOG_NOTICE, "my_keyboard_loop thread didn't start rc=%d", rc);
-#ifndef HAVE_WIRINGPI_H
-    } else {
-	t++;
-#endif
-    }
-
-#ifdef USE_SIMULATOR
-#ifdef HAVE_WIRINGPI_H
-    rc = piThreadCreate(my_simulator_loop);
-#else
-    rc = pthread_create(&threads[t], NULL, my_simulator_loop, (void *)t );
-#endif
-    if (rc) {
-	fprintf(stderr, "my_simulator_loop thread didn't start rc=%d\n", rc);
-	syslog(LOG_NOTICE, "my_simulator_loop thread didn't start rc=%d", rc);
-#ifndef HAVE_WIRINGPI_H
-    } else {
-	t++;
-#endif
-    }
-#endif
-
-    if (! Config.units) {
-	/*
-	 * No brewsystems defined, add the first
-	 */
-	prompt(218, NULL);	/*   Add Brewsystem?   */
-	prompt(407, NULL);	/* ---  ---   Ok   --- */
-
-	do {
-	    key = keywait();
-	} while (key != KEY_RETURN);
-
-	if (key == KEY_RETURN) {
-	    addUnit(1);
-	}
-    }
-
-    /*
-     * Initialize units for processing
-     */
-    for (unit = Config.units; unit; unit = unit->next) {
-	if (unit->active)
-	    break;
-    }
-
-    if (! unit->active) {
-	fprintf(stdout, "No active units found\n");
-    }
-
-    /*
-     * Safety, turn everything off
-     */
-    if (unit->active) {
-	if (debug)
-	    fprintf(stdout, "Starting brewsystem %d `%s'\n", unit->number, unit->name);
-	syslog(LOG_NOTICE, "Starting brewsystem %d `%s'", unit->number, unit->name);
-    }
-
-    /*
-     * During automation there will be a state file:
-     * ~/.brewco/var/brewing.xml
-     * If this file is present, there has been a crash.
-     */
-    brew = (brew_session *)malloc(sizeof(brew_session));
-    rc = rdsession(brew);
-    syslog(LOG_NOTICE, "rdsession: rc=%d", rc);
-    if (debug)
-	fprintf(stdout, "rdsession: rc=%d\n", rc);
-
-    char *mypath = xstrcpy(etcpath);
-    mypath = xstrcat(mypath, (char *)"brewing.xml");
-    if (rc == 0) {
-	if (debug)
-	    fprintf(stdout, "Active brew session found\n");
-    } else if (rc == -1) {
-	free(brew);
-	brew = NULL;
-	if (debug)
-	    fprintf(stdout, "No active brew session found\n");
-    } else {
-	unlink(mypath);
-	free(brew);
-	brew = NULL;
-	if (debug)
-	    fprintf(stdout, "Error brew session found\n");
-    }
-    free(mypath);
-    mypath = NULL;
-
-    do {
-	if (my_shutdown) {
-	    run = 0;
-	    unit->hlt_heater.value = 0;
-	    unit->mlt_heater.value = 0;
-	    unit->mlt_pump.value = 0;
-	    device_out(unit->hlt_heater.uuid, 0);
-	    device_out(unit->mlt_heater.uuid, 0);
-	    device_out(unit->mlt_pump.uuid, 0);
-	    hlt_status(0);
-	    mlt_status(0);
-	    break;
-	}
-
-	/*
-	 * Do we need to initialize this unit?
-	 */
-	if (do_init) {
-	    if (debug)
-		fprintf(stdout, "Initialize brewsystem %d `%s'\n", unit->number, unit->name);
-	    syslog(LOG_NOTICE, "Initialize brewsystem %d `%s'", unit->number, unit->name);
-
-	    prompt(0, NULL);
-	    prompt(101, NULL);		/* "    Brewco x.x.x    " */
-	    prompt(401, NULL);		/* "---  MAN  AUTO SETUP" */
-
-	    /*
-	     * Turn everything off
-	     */
-	    unit->hlt_heater.value = 0;
-	    unit->mlt_heater.value = 0;
-	    unit->mlt_pump.value = 0;
-	    device_out(unit->hlt_heater.uuid, 0);
-	    device_out(unit->mlt_heater.uuid, 0);
-	    device_out(unit->mlt_pump.uuid, 0);
-
-	    /*
-	     * Initialize PID's
-	     */
-	    hltInput = hltSetpoint = mltInput = mltSetpoint = 20.0;
-	    hltOutput = mltOutput = 0;
-	    PID_init(unit->PID_hlt, &hltInput, &hltOutput, &hltSetpoint, unit->PID_hlt->dispKp, unit->PID_hlt->dispKi, unit->PID_hlt->dispKd, unit->PID_hlt->Direction);
-	    PID_setOutputLimits(unit->PID_hlt, 0, 100);
-	    PID_setSampleTime(unit->PID_hlt, unit->PID_hlt->SampleTime);
-	    PID_init(unit->PID_mlt, &mltInput, &mltOutput, &mltSetpoint, unit->PID_mlt->dispKp, unit->PID_mlt->dispKi, unit->PID_mlt->dispKd, unit->PID_mlt->Direction);
-	    PID_setOutputLimits(unit->PID_mlt, 0, 100);
-	    PID_setSampleTime(unit->PID_mlt, unit->PID_mlt->SampleTime);
-	    hlt_status(0);
-	    mlt_status(0);
-
-	    manual = MANUAL_NONE;
-
-	    do_init = FALSE;
-	    nowmillis = perctimer = millis();
-	    percslot = 0;
-	    percfase = PERC_INIT;
-	    dosave = 0;
-
-	    if (brew) {
-		/*
-		 * Restore session
-		 */
-		if (debug)
-		    fprintf(stdout, "loop_init: restoring brew session\n");
-	    	for (recipe = recipes; recipe; recipe = recipe->next) {
-		    if (strcmp(recipe->uuid, brew->uuid_recipe) == 0) {
-			break;
-		    }
-		}
-		if (debug)
-		    fprintf(stdout, "loop_init: brewstep=%d mashstep=%d recipe=%s\n", brew->brewstep, brew->mashstep, recipe->code);
-	    }
-	}
-
-	/* run_pause code here */
-
-	/*
-	 * Update PID's, even if they are off. Both PID's will do
-	 * the scheduling by themselves.
-	 */
-	rc = PID_compute(unit->PID_hlt);
-	rc = PID_compute(unit->PID_mlt);
-
-	/*
-	 * This is the serial heaters schedule loop. The total
-	 * loop time is 5 seconds, heating is 0..100% so we
-	 * have 5 mSeconds timeslots. The MLT has priority over
-	 * the HLT heater, so the HLT heater can get too little
-	 * power. TODO: simultaneous use must be implemented.
-	 * In sequentiel mode, the total drawn power is the same
-	 * as the power used by the largest heater element.
-	 */
-	nowmillis = millis();
-	if (nowmillis > (perctimer + 50)) {
-	    percslot++;
-	    if (percfase == PERC_INIT) {
-		HLTp = (int)hltOutput;
-		MLTp = (int)mltOutput;
-		if ((MLTp + HLTp) > 100)
-		    HLTp = 100 - MLTp;		/* The HLT has lower priority	*/
-		if (MLTp) {
-		    percfase = PERC_MLT;
-		    device_out(unit->hlt_heater.uuid, 0);
-		    device_out(unit->mlt_heater.uuid, 1);
-		} else if (HLTp) {
-		    percfase = PERC_HLT;
-		    device_out(unit->hlt_heater.uuid, 1);
-		    device_out(unit->mlt_heater.uuid, 0);
-		} else { 
-		    percfase = PERC_REST;
-		    device_out(unit->hlt_heater.uuid, 0);
-		    device_out(unit->mlt_heater.uuid, 0);
-		}
-//		if (debug)
-//		    fprintf(stdout, "  perslot=%d MLT=%d%% HLT=%d%% fase=%d\n", percslot, MLTp, HLTp, percfase);
-	    } else if (percfase == PERC_MLT) {
-		if (percslot > MLTp) {
-		    device_out(unit->mlt_heater.uuid, 0);
-		    if (HLTp) {
-			device_out(unit->hlt_heater.uuid, 1);
-			percfase = PERC_HLT;
-		    } else {
-			percfase = PERC_REST;
-		    }
-		}
-	    } else if (percfase == PERC_HLT) {
-		if (percslot > (MLTp + HLTp)) {
-		    device_out(unit->hlt_heater.uuid, 0);
-		    percfase = PERC_REST;
-		}
-	    }
-	    if (percslot == 100) {	/* End of the loop, start over */
-		percslot = 0;
-		percfase = PERC_INIT;
-	    }
-	    perctimer = nowmillis;
-	}
-
-	now = time(NULL);
-	if (now != last) {
-	    /*
-	     * Each second
-	     */
-	    last = now;
-	    seconds++;
-
-	    if (seconds > 59) {
-		seconds = 0;
-		minutes++;
-		dosave = 1;
-	    }
-
-	    rc = device_in(unit->hlt_sensor.uuid, &temp);
-	    if (rc == DEVPRESENT_YES) {
-		hltInput = temp / 1000.0;
-		unit->hlt_sensor.state = 0;
-	    } else if (rc == DEVPRESENT_ERROR) {
-		unit->hlt_sensor.state = 1;
-	    } else {
-		unit->hlt_sensor.state = 2;
-	    }
-	    rc = device_in(unit->mlt_sensor.uuid, &temp);
-	    if (rc == DEVPRESENT_YES) {
-		mltInput = temp / 1000.0;
-		unit->mlt_sensor.state = 0;
-	    } else if (rc == DEVPRESENT_ERROR) {
-		unit->mlt_sensor.state = 1;
-	    } else {
-		unit->mlt_sensor.state = 2;
-	    }
-
-	    if (debug && ((seconds % 10) == 1)) {
-		fprintf(stdout, "MLT: In=%.2lf Out=%.2lf Set=%.2lf Stat=%d  HLT: In=%.2lf Out=%.2lf Set=%.2lf Stat=%d\n",
-				mltInput, mltOutput, mltSetpoint, PID_getMode(unit->PID_mlt), 
-				hltInput, hltOutput, hltSetpoint, PID_getMode(unit->PID_hlt));
-	    }
-
-	}
-
-	if (brew) {
-	    /*
-	     * Automate mode
-	     */
-	    automatic_brew(unit, brew, recipe, dosave, seconds);
-	    dosave = 0;
-	    if (brew->brewstep == -1) {
-		/*
-		 * Save session and move it
-		 */
-		wrsession(brew);
-		char	*fpath, *tpath;
-		fpath = xstrcpy(etcpath);
-		fpath = xstrcat(fpath, (char *)"brewing.xml");
-		tpath = xstrcpy(varpath);
-		tpath = xstrcat(tpath, (char *)"old/brewing.xml.");
-		mkdirs(tpath, 0755);
-		tpath = xstrcat(tpath, brew->name);
-		if (debug)
-		    fprintf(stdout, "auto: saving as %s\n", tpath);
-		file_cp(fpath, tpath);
-		unlink(fpath);
-		free(fpath);
-		free(tpath);
-
-		/*
-		 * Free memory, session is over.
-		 */
-		if (brew->name)
-		    free(brew->name);
-		if (brew->uuid_recipe)
-		    free(brew->uuid_recipe);
-		if (brew->uuid_unit)
-		    free(brew->uuid_unit);
-		free(brew);
-		brew = NULL;
-	    }
-
-	} else if (manual != MANUAL_NONE) {
-	    /*
-	     * Manual mode
-	     */
-	    manual_menu(unit, seconds);
-	    if (manual == MANUAL_NONE) {
-		/*
-		 * Rewrite the display
-		 */
-		prompt(101, NULL);	/* "    Brewco x.x.x    " */
-		prompt(300, NULL);	/* "                    " */
-		prompt(401, NULL);	/* "---  MAN  AUTO SETUP" */
-	    }
-	} else {
-	    /*
-	     * Not running.
-	     */
-	    tempstatus();
-	    key = keycheck();
-	    if (key == KEY_ENTER) {
-		setup();
-		prompt(101, NULL);	/* "    Brewco x.x.x    " */
-		prompt(200, NULL);
-		prompt(300, NULL);
-		hlt_status(0);
-		mlt_status(0);
-		pump_status(0);
-		prompt(401, NULL);	/* "---  MAN  AUTO SETUP" */
-	    } else if (key == KEY_RETURN && ! brew) {
-		int     i, isOk = TRUE;
-		char    message[41];
-
-		tm = localtime(&now);
-		snprintf(message, 40, "%04d%02d%02d-%02d%02d", tm->tm_year + 1900, tm->tm_mon + 1, tm->tm_mday, tm->tm_hour, tm->tm_min);
-		brew = (brew_session *)malloc(sizeof(brew_session));
-		brew->uuid_recipe = xstrcpy(choose_recipe());
-		brew->uuid_unit = xstrcpy(unit->uuid);
-		brew->name = xstrcpy(message);
-		brew->brewstep = STEP_NA;
-		brew->mashstep = MASH_NA;
-		brew->timeout = brew->boiltimer = 0;
-		brew->starttime = brew->endtime = (time_t)0;
-		/*
-		 * Now check if everything is sane
-		 */
-		if (strcmp(brew->uuid_recipe, (char *)"00000000-0000-0000-0000-000000000000") == 0) {
-		    isOk = FALSE;
-		    snprintf(message, Config.lcd_cols + 1, " No recipe selected ");
-		    if (debug)
-			fprintf(stdout, "brew init: No recipe selected\n");
-		}
-		if (isOk) {
-		    isOk = FALSE;
-		    for (recipe = recipes; recipe; recipe = recipe->next) {
-			if (strcmp(recipe->uuid, brew->uuid_recipe) == 0) {
-			    isOk = TRUE;
-			    if (! recipe->boiltime)
-				isOk = FALSE;
-			    for (i = 0; i < 8; i++) {
-				if (! recipe->mash[i].skip && ! recipe->mash[i].setpoint)
-				    isOk = FALSE;
-			    }
-			    for (i = 0; i < 3; i++) {
-				if (! recipe->hopstand[i].skip && recipe->hopstand[i].hold && (recipe->hopstand[i].setpoint == 0))
-				    isOk = FALSE;
-			    }
-			    break;
-			}
-		    }
-		    if (isOk == FALSE) {
-			snprintf(message, Config.lcd_cols + 1, "    Recipe error    ");
-			if (debug)
-			    fprintf(stdout, "brew init: recipe error\n");
-		    }
-		}
-
-		if (debug)
-		    fprintf(stdout, "init brew: %s\n", isOk ? (char *)"Ok":(char *)"Error");
-
-		if (isOk) {
-		    wrsession(brew);
-		} else {
-		    prompt(300, message);
-		    prompt(408, NULL);		/* "---  ---   Ok   --- " */
-		    key = keywait();
-		    if (brew->name)
-			free(brew->name);
-		    if (brew->uuid_recipe)
-			free(brew->uuid_recipe);
-		    if (brew->uuid_unit)
-			free(brew->uuid_unit);
-		    free(brew);
-		    brew = NULL;
-		    /*
-		     * Rewrite the display
-		     */
-		    prompt(101, NULL);      /* "    Brewco x.x.x    " */
-		    prompt(300, NULL);      /* "                    " */
-		    prompt(401, NULL);      /* "---  MAN  AUTO SETUP" */
-		}
-
-	    } else if (key == KEY_DOWN) {
-		manual = MANUAL_SELHLT;
-		manual_prompt();
-	    }
-	}
-
-	usleep(5000);	/* 5 mSec */
-
-    } while (run);
-
-    syslog(LOG_NOTICE, "Out of loop");
-    if (debug)
-	fprintf(stdout, (char *)"Out of loop\n");
-
-    prompt(0, NULL);
-    prompt(101, NULL);		/* "    Brewco x.x.x    " */
-    prompt(302, NULL);		/* "   Shutting down    " */
-
-    /*
-     * Give threads time to cleanup
-     */
-    usleep(1500000);
-    prompt(0, NULL);
-    setBacklight(0);
-
-    if (sock != -1) {
-	if (shutdown(sock, SHUT_RDWR)) {
-	    syslog(LOG_NOTICE, "Can't shutdown socket: %s", strerror(errno));
-	}
-	sock = -1;
-    }
-
-    wrrecipes();
-    wrconfig();
-    ulockprog((char *)"brewco");
-    return 0;
-}
-
-
-
-int main(int argc, char *argv[])
-{
-    int		rc = 0, c, i;
-    char	*homepath = NULL;
-
-    while (1) {
-	int option_index = 0;
-	static struct option long_options[] = {
-	    {"debug", 0, 0, 'c'},
-	    {"help", 0, 0, 'h'},
-	    {0, 0, 0, 0}
-	};
-
-	c = getopt_long(argc, argv, "dh", long_options, &option_index);
-	if (c == -1)
-	    break;
-
-	switch (c) {
-	    case 'd':   debug = TRUE;
-			break;
-	    case 'h':   help();
-			return 1;
-	}
-    }
-
-    openlog("brewco", LOG_PID|LOG_CONS|LOG_NOWAIT, LOG_USER);
-    syslog(LOG_NOTICE, "mbsePi-apps brewco v%s starting", VERSION);
-    if (debug)
-	fprintf(stdout, "mbsePi-apps brewco v%s starting\n", VERSION);
-
-    /*
-     * Set home directory path
-     */
-    if (getenv((char *)"USER") == NULL) {
-	homepath = xstrcpy((char *)"/root");
-    } else {
-	homepath = xstrcpy(getenv((char *)"HOME"));
-    }
-    varpath = xstrcpy(homepath);
-    varpath = xstrcat(varpath, (char *)"/.brewco/var/");
-    etcpath = xstrcpy(homepath);
-    etcpath = xstrcat(etcpath, (char *)"/.brewco/etc/");
-    mkdirs(varpath, 0755);
-    mkdirs(etcpath, 0755);
-
-    if (rdconfig()) {
-	fprintf(stderr, "Error reading configuration\n");
-	syslog(LOG_NOTICE, "Error reading configuration: halted");
-	return 1;
-    }
-    if (debug)
-	fprintf(stdout, "configuration loaded\n");
-
-    if (rdrecipes()) {
-	fprintf(stderr, "Error reading recipes\n");
-    	syslog(LOG_NOTICE, "Error reading recipes: halted");
-	return 1;
-    }
-    if (debug)
-	fprintf(stdout, "recipes loaded\n");
-
-    /*
-     *  Catch all the signals we can, and ignore the rest. Note that SIGKILL can't be ignored
-     *  but that's live. This daemon should only be stopped by SIGTERM.
-     *  Don't catch SIGCHLD.
-     */
-    for (i = 0; i < NSIG; i++) {
-	if ((i != SIGCHLD) && (i != SIGKILL) && (i != SIGSTOP))
-	    signal(i, (void (*))die);
-    }
-
-#ifdef HAVE_WIRINGPI_H
-    if (wiringPiSetup () )
-	return 1;
-#endif
-
-    if ((rc = initLCD (Config.lcd_cols, Config.lcd_rows))) {
-	fprintf(stderr, "Cannot initialize LCD display, rc=%d\n", rc);
-	return 1;
-    }
-
-    rc = server();
-
-    syslog(LOG_NOTICE, "Finished, rc=%d", rc);
-    if (debug)
-	fprintf(stdout, "Finished, rc=%d\n", rc);
-    return rc;
-}
-
-