Mercurial > ~darius > hgwebdir.cgi > stm32temp
annotate tempctrl.c @ 58:0e7d687a2322
Get timezone offsets right.
author | Daniel O'Connor <darius@dons.net.au> |
---|---|
date | Mon, 08 Apr 2013 23:10:25 +0930 |
parents | adc9b1555f9d |
children | bbdf5642a7b7 |
rev | line source |
---|---|
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
1 /* |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
2 * Temperature control logic, copied from AVR version |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
3 * |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
4 * Copyright (c) 2012 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
5 * Daniel O'Connor <darius@dons.net.au>. All rights reserved. |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
6 * |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
7 * Redistribution and use in source and binary forms, with or without |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
8 * modification, are permitted provided that the following conditions |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
9 * are met: |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
10 * 1. Redistributions of source code must retain the above copyright |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
11 * notice, this list of conditions and the following disclaimer. |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
12 * 2. Redistributions in binary form must reproduce the above copyright |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
13 * notice, this list of conditions and the following disclaimer in the |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
14 * documentation and/or other materials provided with the distribution. |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
15 * |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
16 * THIS SOFTWARE IS PROVIDED BY AUTHOR AND CONTRIBUTORS ``AS IS'' AND |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
17 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
19 * ARE DISCLAIMED. IN NO EVENT SHALL AUTHOR OR CONTRIBUTORS BE LIABLE |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
20 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
21 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
22 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
24 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
25 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
26 * SUCH DAMAGE. |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
27 */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
28 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
29 #include <assert.h> |
42
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
30 #include <ctype.h> |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
31 #include <stdio.h> |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
32 #include <stdint.h> |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
33 #include <stdlib.h> |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
34 #include <string.h> |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
35 #include <sys/time.h> |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
36 #include <time.h> |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
37 #include "stm32f10x.h" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
38 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
39 #include "1wire.h" |
57
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
40 #include "ff.h" |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
41 #include "flash.h" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
42 #include "tempctrl.h" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
43 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
44 /* Holds all the settings needed */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
45 typedef struct { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
46 uint8_t fermenter_ROM[8]; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
47 uint8_t fridge_ROM[8]; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
48 uint8_t ambient_ROM[8]; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
49 int16_t target_temp; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
50 uint16_t hysteresis; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
51 /* How much to under/overshoot on heating/cooling */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
52 int16_t minheatovershoot; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
53 int16_t mincoolovershoot; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
54 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
55 /* Minimum time the cooler can be on/off */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
56 int16_t mincoolontime; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
57 int16_t mincoolofftime; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
58 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
59 /* Minimum time the heater can be on/off */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
60 int16_t minheatontime; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
61 int16_t minheatofftime; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
62 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
63 #define TC_MODE_AUTO 'a' /* Automatic control */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
64 #define TC_MODE_HEAT 'h' /* Force heating */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
65 #define TC_MODE_COOL 'c' /* Force cooling */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
66 #define TC_MODE_IDLE 'i' /* Force idle */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
67 #define TC_MODE_NOTHING 'n' /* Do nothing (like idle but log nothing) */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
68 char mode; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
69 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
70 /* GPIO port the heater & cooler are on */ |
42
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
71 char coolport; |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
72 uint16_t coolpin; |
42
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
73 uint8_t coolinv; |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
74 |
42
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
75 char heatport; |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
76 uint16_t heatpin; |
42
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
77 uint8_t heatinv; |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
78 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
79 /* Check/stale times */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
80 int16_t check_interval; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
81 int16_t stale_factor; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
82 |
57
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
83 char logfilefmt[64]; |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
84 |
42
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
85 uint8_t pad[1]; /* Pad to multiple of 4 bytes */ |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
86 } settings_t; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
87 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
88 /* Current settings in RAM */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
89 static settings_t settings; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
90 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
91 /* Defaults that are shoved into SPI flash if it isn't inited */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
92 const settings_t default_settings = { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
93 .fermenter_ROM = { 0x10, 0x4c, 0x7d, 0x53, 0x01, 0x08, 0x00, 0xff }, |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
94 .fridge_ROM = { 0x10, 0x6d, 0x40, 0x53, 0x01, 0x08, 0x00, 0x16 }, |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
95 .ambient_ROM = { 0x10, 0x76, 0x05, 0x53, 0x01, 0x08, 0x00, 0x8e }, |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
96 .target_temp = 1000, |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
97 .hysteresis = 100, |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
98 .minheatovershoot = 50, |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
99 .mincoolovershoot = -50, |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
100 .mincoolontime = 300, |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
101 .mincoolofftime = 600, |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
102 .minheatontime = 60, |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
103 .minheatofftime = 60, |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
104 .mode = TC_MODE_AUTO, |
42
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
105 .coolport = 'E', |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
106 .coolpin = 4, |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
107 .coolinv = 1, |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
108 .heatport = 'E', |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
109 .heatpin = 5, |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
110 .heatinv = 1, |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
111 .check_interval = 10, |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
112 .stale_factor = 3, |
57
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
113 .logfilefmt = "/%Y%M%D.log" |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
114 }; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
115 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
116 /* Local variable declarations */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
117 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
118 /* Local function prototypes */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
119 static void tempctrl_load_or_init_settings(void); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
120 static void tempctrl_default_settings(void); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
121 static void tempctrl_write_settings(void); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
122 static void setstate(char state); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
123 static const char * state2long(char s); |
57
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
124 static int fmttemp(char *buf, const char *name, int tmp, const char *trailer); |
42
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
125 static GPIO_TypeDef *char2port(char port); |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
126 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
127 /* |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
128 * tempctrl_init |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
129 * |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
130 */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
131 void |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
132 tempctrl_init(void) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
133 tempctrl_load_or_init_settings(); |
42
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
134 setstate('i'); |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
135 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
136 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
137 /* |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
138 * tempctrl_update |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
139 * |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
140 * Should be called in a normal context, could run things that take a long time. |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
141 * (ie 1wire bus stuff) |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
142 * |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
143 */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
144 void |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
145 tempctrl_update(void) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
146 /* State variables */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
147 static int32_t checktime = 0; // Time of next check |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
148 static int32_t lastdata = INT32_MIN; // Last time we got data |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
149 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
150 static int16_t fermenter_temp = 0; // Fermenter temperature |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
151 static int16_t fridge_temp = 0; // Fridge temperature |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
152 static int16_t ambient_temp = 0; // Ambient temperature |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
153 static int32_t lastheaton = INT32_MIN; // Last time the heater was on |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
154 static int32_t lastheatoff = INT32_MIN;// Last time the heater was off |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
155 static int32_t lastcoolon = INT32_MIN; // Last time the cooler was on |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
156 static int32_t lastcooloff = INT32_MIN;// Last time the cooler was off |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
157 static char currstate = 'i'; // Current state |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
158 /* We init to times to INT32_MIN so that things function properly when |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
159 * now < settings.minheat/cool/on/offtime */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
160 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
161 /* Temporary variables */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
162 int32_t tempt; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
163 int16_t diff; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
164 char nextstate; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
165 int forced; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
166 int stale; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
167 time_t t; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
168 struct tm tm; |
57
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
169 char linebuf[90], *p; |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
170 FRESULT fserr; |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
171 FIL f; |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
172 char fbuf[20]; |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
173 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
174 t = time(NULL); |
57
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
175 stale = 0; |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
176 tempt = 0; |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
177 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
178 /* Time to check temperatures? */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
179 if (t < checktime) |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
180 return; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
181 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
182 checktime = t + settings.check_interval; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
183 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
184 /* Don't do any logging, just force idle and leave */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
185 if (settings.mode == TC_MODE_NOTHING) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
186 nextstate = 'i'; |
43 | 187 goto skip; |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
188 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
189 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
190 /* Update our temperatures |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
191 * Can take a while (800ms each!) |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
192 */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
193 tempt = OWGetTemp(settings.fermenter_ROM); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
194 fridge_temp = OWGetTemp(settings.fridge_ROM); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
195 ambient_temp = OWGetTemp(settings.ambient_ROM); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
196 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
197 /* We only care about this one, only update the value we decide on |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
198 * only if it is valid |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
199 */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
200 if (tempt > OW_TEMP_BADVAL) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
201 fermenter_temp = tempt; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
202 lastdata = t; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
203 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
204 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
205 /* Check for stale data */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
206 if (lastdata + (settings.check_interval * settings.stale_factor) < t) |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
207 stale = 1; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
208 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
209 /* Default to remaining as we are */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
210 nextstate = '-'; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
211 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
212 /* Temperature diff, -ve => too cold, +ve => too warm */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
213 diff = fermenter_temp - settings.target_temp; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
214 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
215 switch (currstate) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
216 case 'i': |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
217 /* If we're idle then only heat or cool if the temperate difference is out of the |
43 | 218 * hysteresis band and the heater/cooler have been off long enough |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
219 */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
220 if (abs(diff) > settings.hysteresis) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
221 if (diff < 0 && settings.minheatofftime + lastheatoff < t) |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
222 nextstate = 'h'; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
223 else if (diff > 0 && settings.mincoolofftime + lastcooloff < t) |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
224 nextstate = 'c'; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
225 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
226 break; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
227 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
228 case 'c': |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
229 /* Work out if we should go idle (based on min on time & overshoot) */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
230 if (diff + settings.mincoolovershoot < 0 && |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
231 settings.mincoolontime + lastcoolon < t) |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
232 nextstate = 'i'; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
233 break; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
234 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
235 case 'h': |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
236 if (diff - settings.minheatovershoot > 0 && |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
237 settings.minheatontime + lastheaton < t) |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
238 nextstate = 'i'; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
239 break; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
240 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
241 default: |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
242 printf("\r\nUnknown state %c, going to idle\n", currstate); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
243 nextstate = 'i'; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
244 break; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
245 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
246 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
247 /* Override if we have stale data */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
248 if (stale) |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
249 nextstate = 'i'; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
250 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
251 /* Handle state forcing */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
252 if (settings.mode != TC_MODE_AUTO) |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
253 forced = 1; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
254 else |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
255 forced = 0; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
256 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
257 if (settings.mode == TC_MODE_IDLE) |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
258 nextstate = 'i'; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
259 else if (settings.mode == TC_MODE_HEAT) |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
260 nextstate = 'h'; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
261 else if (settings.mode == TC_MODE_COOL) |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
262 nextstate = 'c'; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
263 |
43 | 264 /* Keep track of when we last turned things on or off */ |
265 skip: | |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
266 switch (nextstate) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
267 case 'c': |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
268 if (currstate == 'h') |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
269 lastheatoff = t; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
270 lastcoolon = t; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
271 break; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
272 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
273 case 'h': |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
274 if (currstate == 'c') |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
275 lastcooloff = t; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
276 lastheaton = t; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
277 break; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
278 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
279 default: |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
280 if (currstate == 'c') |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
281 lastcooloff = t; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
282 if (currstate == 'h') |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
283 lastheatoff = t; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
284 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
285 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
286 if (nextstate != '-') |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
287 currstate = nextstate; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
288 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
289 |
43 | 290 if (settings.mode != TC_MODE_NOTHING) { |
291 localtime_r(&t, &tm); | |
57
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
292 p = linebuf; |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
293 p += strftime(p, sizeof(linebuf) - 1, "%Y/%m/%d %H:%M:%S: ", &tm); |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
294 p += fmttemp(p, "Tr", settings.target_temp, ", "); |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
295 p += fmttemp(p, "Fm", tempt, ", "); |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
296 p += fmttemp(p, "Fr", fridge_temp, ", "); |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
297 p += fmttemp(p, "Am", ambient_temp, ", "); |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
298 sprintf(p, "St: %s, Fl: %s%s\r\n", state2long(currstate), |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
299 forced ? "F" : "", |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
300 stale ? "S" : ""); |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
301 fputs(linebuf, stdout); |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
302 if (settings.logfilefmt[0] != '\0') { |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
303 strftime(fbuf, sizeof(fbuf) - 1, settings.logfilefmt, &tm); |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
304 |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
305 if ((fserr = f_open(&f, fbuf, FA_WRITE | FA_OPEN_ALWAYS)) != FR_OK) { |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
306 printf("Failed to open file: %d\n", fserr); |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
307 goto openerr; |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
308 } |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
309 |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
310 if ((fserr = f_lseek(&f, f_size(&f))) != FR_OK) { |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
311 printf("Failed to seek to end of file: %d\n", fserr); |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
312 goto openerr; |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
313 } |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
314 |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
315 f_puts(linebuf, &f); |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
316 f_close(&f); |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
317 } |
43 | 318 } |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
319 |
57
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
320 openerr: |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
321 setstate(currstate); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
322 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
323 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
324 /* |
57
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
325 * Format a temperature (or short error code) with specified trailer |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
326 */ |
57
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
327 static int |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
328 fmttemp(char *buf, const char *name, int tmp, const char *trailer) { |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
329 if (tmp > OW_TEMP_BADVAL) |
57
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
330 return sprintf(buf, "%s: %d.%02d%s", name, GETWHOLE(tmp), GETFRAC(tmp), trailer); |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
331 else |
57
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
332 return sprintf(buf, "%s: %s%s", name, OWTempStatusStr(tmp, 1), trailer); |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
333 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
334 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
335 /* Read the settings from SPI flash |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
336 * If the CRC fails then reload from onboard flash |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
337 */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
338 static void |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
339 tempctrl_load_or_init_settings(void) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
340 /* XXX: todo */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
341 if (!flashreadblock(0, sizeof(settings), &settings)) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
342 fputs("CRC fails, loading defaults\r\n", stdout); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
343 tempctrl_default_settings(); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
344 tempctrl_write_settings(); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
345 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
346 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
347 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
348 /* Load in the defaults from flash */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
349 static void |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
350 tempctrl_default_settings(void) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
351 memcpy(&settings, &default_settings, sizeof(settings_t)); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
352 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
353 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
354 /* Write the current settings out to SPI flash */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
355 static void |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
356 tempctrl_write_settings(void) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
357 flashwriteblock(0, sizeof(settings), &settings); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
358 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
359 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
360 /* Set the relays to match the desired state */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
361 static void |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
362 setstate(char state) { |
42
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
363 uint8_t cool, heat; |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
364 |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
365 switch (state) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
366 case 'c': |
42
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
367 cool = 1; |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
368 heat = 0; |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
369 break; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
370 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
371 case 'h': |
42
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
372 cool = 0; |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
373 heat = 1; |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
374 break; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
375 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
376 default: |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
377 printf("Unknown state %c, setting idle\r\n", state); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
378 /* fallthrough */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
379 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
380 case 'i': |
42
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
381 cool = 0; |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
382 heat = 0; |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
383 break; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
384 } |
42
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
385 |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
386 if (cool ^ settings.coolinv) |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
387 GPIO_SetBits(char2port(settings.coolport), 1 << settings.coolpin); |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
388 else |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
389 GPIO_ResetBits(char2port(settings.coolport), 1 << settings.coolpin); |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
390 |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
391 if (heat ^ settings.heatinv) |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
392 GPIO_SetBits(char2port(settings.heatport), 1 << settings.heatpin); |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
393 else |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
394 GPIO_ResetBits(char2port(settings.heatport), 1 << settings.heatpin); |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
395 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
396 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
397 /* Handle user command |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
398 * |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
399 */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
400 void |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
401 tempctrl_cmd(int argc, char **argv) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
402 int16_t data; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
403 uint8_t ROM[8]; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
404 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
405 if (argc < 1) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
406 printf("Unable to parse tc subcommand\r\n"); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
407 return; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
408 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
409 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
410 if (!strcasecmp(argv[0], "help")) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
411 printf("tc help This help\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
412 "tc save Save settings to EEPROM\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
413 "tc load Load or default settings from EEPROM\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
414 "tc dflt Load defaults from flash\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
415 "tc list List current settings\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
416 "tc mode [achin] Change control mode, must be one of\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
417 " a Auto\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
418 " c Always cool\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
419 " h Always heat\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
420 " i Always idle\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
421 " n Like idle but don't log anything\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
422 "tc X Y Set X to Y where X is one of\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
423 " targ Target temperature\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
424 " hys Hysteresis range\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
425 " mhov Minimum heat overshoot\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
426 " mcov Minimum cool overshoot\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
427 " mcon Minimum cool on time\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
428 " mcoff Minimum cool off time\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
429 " mhin Minimum heat on time\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
430 " mhoff Minimum heat off time\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
431 "tc A B Set temperature sensor ID\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
432 " Where A is ferm, frg or amb\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
433 " and B is of the form xx:xx:xx:xx:xx:xx:xx:xx\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
434 "\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
435 " Times are in seconds\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
436 " Temperatures are in hundredths of degrees Celcius\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
437 ); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
438 return; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
439 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
440 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
441 if (!strcasecmp(argv[0], "save")) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
442 tempctrl_write_settings(); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
443 return; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
444 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
445 if (!strcasecmp(argv[0], "load")) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
446 tempctrl_load_or_init_settings(); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
447 return; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
448 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
449 if (!strcasecmp(argv[0], "dflt")) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
450 tempctrl_default_settings(); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
451 return; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
452 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
453 if (!strcasecmp(argv[0], "list")) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
454 printf("Fermenter ROM ID %02x:%02x:%02x:%02x:%02x:%02x:%02x:%02x\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
455 "Fridge ROM ID %02x:%02x:%02x:%02x:%02x:%02x:%02x:%02x\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
456 "Ambient ROM ID %02x:%02x:%02x:%02x:%02x:%02x:%02x:%02x\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
457 "Mode - %c, Target - %d, Hystersis - %d\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
458 "Min heat overshoot - %d, Min cool overshoot - %d\r\n" |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
459 "Min cool on time - %d, Min cool off time - %d\r\n" |
42
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
460 "Min heat on time - %d, Min heat off time - %d\r\n" |
57
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
461 "Cool: Port %c Pin %d Inv %d, Heat: Port %c Pin %d Inv %d\r\n" |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
462 "Log format: %s\n", |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
463 settings.fermenter_ROM[0], settings.fermenter_ROM[1], settings.fermenter_ROM[2], settings.fermenter_ROM[3], |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
464 settings.fermenter_ROM[4], settings.fermenter_ROM[5], settings.fermenter_ROM[6], settings.fermenter_ROM[7], |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
465 settings.fridge_ROM[0], settings.fridge_ROM[1], settings.fridge_ROM[2], settings.fridge_ROM[3], |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
466 settings.fridge_ROM[4], settings.fridge_ROM[5], settings.fridge_ROM[6], settings.fridge_ROM[7], |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
467 settings.ambient_ROM[0], settings.ambient_ROM[1], settings.ambient_ROM[2], settings.ambient_ROM[3], |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
468 settings.ambient_ROM[4], settings.ambient_ROM[5], settings.ambient_ROM[6], settings.ambient_ROM[7], |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
469 settings.mode, settings.target_temp, settings.hysteresis, |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
470 settings.minheatovershoot, settings.mincoolovershoot, |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
471 settings.mincoolontime, settings.minheatontime, |
42
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
472 settings.minheatontime, settings.minheatofftime, |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
473 settings.coolport, settings.coolpin, settings.coolinv, |
57
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
474 settings.heatport, settings.heatpin, settings.heatinv, |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
475 settings.logfilefmt[0] == '\0' ? "none" : settings.logfilefmt |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
476 ); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
477 return; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
478 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
479 if (!strcasecmp(argv[0], "mode")) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
480 if (argc < 2) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
481 fputs("Incorrect number of arguments\r\n", stdout); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
482 return; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
483 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
484 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
485 switch (argv[1][0]) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
486 case TC_MODE_AUTO: |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
487 case TC_MODE_HEAT: |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
488 case TC_MODE_COOL: |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
489 case TC_MODE_IDLE: |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
490 case TC_MODE_NOTHING: |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
491 settings.mode = argv[1][0]; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
492 break; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
493 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
494 default: |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
495 printf("Unknown mode character '%c'\r\n", argv[1][0]); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
496 break; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
497 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
498 return; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
499 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
500 if (!strcasecmp(argv[0], "ferm") || |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
501 !strcasecmp(argv[0], "frg") || |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
502 !strcasecmp(argv[0], "amb")) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
503 if (argc < 2) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
504 fputs("Incorrect number of arguments\r\n", stdout); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
505 return; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
506 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
507 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
508 if (sscanf(argv[1], "%hhx:%hhx:%hhx:%hhx:%hhx:%hhx:%hhx:%hhx", |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
509 &ROM[0], &ROM[1], &ROM[2], &ROM[3], |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
510 &ROM[4], &ROM[5], &ROM[6], &ROM[7]) != 8) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
511 printf("Unable to parse ROM ID\r\n"); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
512 } else { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
513 if (!strcasecmp(argv[0], "ferm")) |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
514 memcpy(&settings.fermenter_ROM, ROM, sizeof(ROM)); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
515 if (!strcasecmp(argv[0], "frg")) |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
516 memcpy(&settings.fridge_ROM, ROM, sizeof(ROM)); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
517 if (!strcasecmp(argv[0], "amb")) |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
518 memcpy(&settings.ambient_ROM, ROM, sizeof(ROM)); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
519 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
520 return; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
521 } |
57
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
522 if (!strcasecmp(argv[0], "log")) { |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
523 if (argc == 1) |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
524 bzero(settings.logfilefmt, sizeof(settings.logfilefmt)); |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
525 else { |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
526 if (strlen(argv[1]) > sizeof(settings.logfilefmt) - 1) |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
527 printf("New path too log (%d > %d)\n", strlen(argv[1]), sizeof(settings.logfilefmt)); |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
528 else |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
529 strcpy(settings.logfilefmt, argv[1]); |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
530 return; |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
531 } |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
532 } |
31
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
533 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
534 /* Handle setting the multitude of variables |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
535 * It's last to simplify things */ |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
536 if (argc < 3) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
537 fputs("Incorrect number of arguments for variable/value\r\n", stdout); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
538 return; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
539 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
540 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
541 if (sscanf(argv[2], "%hd", &data) != 1) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
542 printf("Unable to parse value for variable\r\n"); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
543 return; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
544 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
545 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
546 if (!strcasecmp(argv[1], "targ")) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
547 settings.target_temp = data; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
548 } else if (!strcasecmp(argv[1], "hys")) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
549 settings.hysteresis = data; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
550 } else if (!strcasecmp(argv[1], "mhov")) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
551 settings.minheatovershoot = data; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
552 } else if (!strcasecmp(argv[1], "mcov")) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
553 settings.mincoolovershoot = data; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
554 } else if (!strcasecmp(argv[1], "mcon")) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
555 settings.mincoolontime = data; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
556 } else if (!strcasecmp(argv[1], "mcoff")) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
557 settings.mincoolofftime = data; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
558 } else if (!strcasecmp(argv[1], "mhon")) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
559 settings.minheatontime = data; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
560 } else if (!strcasecmp(argv[1], "mhoff")) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
561 settings.minheatofftime = data; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
562 } else { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
563 printf("Unknown setting\r\n"); |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
564 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
565 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
566 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
567 static const char* |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
568 state2long(char s) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
569 switch (s) { |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
570 case 'i': |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
571 return "idle"; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
572 break; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
573 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
574 case 'c': |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
575 return "cool"; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
576 break; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
577 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
578 case 'h': |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
579 return "heat"; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
580 break; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
581 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
582 case '-': |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
583 return "-"; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
584 break; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
585 |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
586 default: |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
587 return "unknown"; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
588 break; |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
589 } |
03592ca4d37e
Port tempctrl.c from AVR. I removed the beep code as I don't have a
Daniel O'Connor <darius@dons.net.au>
parents:
diff
changeset
|
590 } |
42
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
591 |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
592 /* Convert a port name into a number */ |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
593 static GPIO_TypeDef * |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
594 char2port(char port) { |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
595 char p; |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
596 |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
597 p = toupper(port); |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
598 assert(p >= 'A' && p <= 'E'); |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
599 |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
600 switch (p) { |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
601 case 'A': |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
602 return GPIOA; |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
603 case 'B': |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
604 return GPIOB; |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
605 case 'C': |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
606 return GPIOC; |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
607 case 'D': |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
608 return GPIOD; |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
609 case 'E': |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
610 return GPIOE; |
57
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
611 default: |
adc9b1555f9d
Add the ability to log temperatures to SD card.
Daniel O'Connor <darius@dons.net.au>
parents:
43
diff
changeset
|
612 assert(1 == 0); /* Silence GCC warning */ |
42
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
613 } |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
614 } |
56b32b0c9a40
Store port & pin as char & number and map.
Daniel O'Connor <darius@dons.net.au>
parents:
33
diff
changeset
|
615 |