Tue, 22 Jul 2014 17:56:56 +0200
Initial setup to draw charts
100 | 1 | <?php |
2 | /***************************************************************************** | |
3 | * Copyright (C) 2014 | |
4 | * | |
5 | * Michiel Broek <mbroek at mbse dot eu> | |
6 | * | |
7 | * This file is part of ThermFerm | |
8 | * | |
9 | * This is free software; you can redistribute it and/or modify it | |
10 | * under the terms of the GNU General Public License as published by the | |
11 | * Free Software Foundation; either version 2, or (at your option) any | |
12 | * later version. | |
13 | * | |
14 | * ThermFerm is distributed in the hope that it will be useful, but | |
15 | * WITHOUT ANY WARRANTY; without even the implied warranty of | |
16 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
17 | * General Public License for more details. | |
18 | * | |
19 | * You should have received a copy of the GNU General Public License | |
20 | * along with ThermFerm; see the file COPYING. If not, write to the Free | |
21 | * Software Foundation, 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA. | |
22 | *****************************************************************************/ | |
23 | ||
24 | ||
25 | require_once('utilities.php'); | |
26 | ||
27 | ||
28 | ||
113
cf3f906ffe0d
Created control panel layout
Michiel Broek <mbroek@mbse.eu>
parents:
112
diff
changeset
|
29 | function showunit($unit, $unr) |
100 | 30 | { |
117 | 31 | global $my_style; |
32 | ||
100 | 33 | $outstr = ''; |
102
e37b9c571a56
Units can display the temperature
Michiel Broek <mbroek@mbse.eu>
parents:
100
diff
changeset
|
34 | $air_state = $beer_state = 1; |
100 | 35 | |
36 | $sock = open_socket(); | |
37 | if ($sock == false) { | |
38 | return ''; | |
39 | } | |
40 | ||
41 | socket_write($sock, "UNIT " . $unit, 4096); | |
42 | $answer = ""; | |
43 | while (1) { | |
44 | $line = socket_read($sock, 4096); | |
45 | if ($line === '') | |
46 | break; | |
47 | $answer .= $line; | |
48 | } | |
49 | socket_close($sock); | |
50 | ||
51 | $sock = open_socket(); | |
52 | if ($sock == false) { | |
53 | return ''; | |
54 | } | |
55 | ||
56 | socket_write($sock, "LIST UNIT", 4096); | |
57 | $answer = ""; | |
58 | while (1) { | |
59 | $line = socket_read($sock, 4096); | |
60 | if ($line === '') | |
61 | break; | |
62 | $answer .= $line; | |
63 | } | |
64 | socket_close($sock); | |
65 | $arr = explode("\r\n", $answer); | |
66 | ||
67 | if (startsWith($arr[0], "213")) { | |
68 | ||
117 | 69 | $outstr .= ' <script type="text/javascript">'.PHP_EOL; |
70 | $outstr .= ' $(document).ready(function () {'.PHP_EOL; | |
121
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
71 | |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
72 | $outstr .= ' var sampleData'.$unr.' = ['.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
73 | $outstr .= ' { Date:\'2014-07-15 20:44\',Mode:\'NONE\',Air:20.625,Beer:\'23.687\' },'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
74 | $outstr .= ' { Date:\'2014-07-15 21:00\',Mode:\'NONE\',Air:20.250,Beer:\'23.437\' },'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
75 | $outstr .= ' { Date:\'2014-07-15 22:00\',Mode:\'NONE\',Air:20.375,Beer:\'22.812\' },'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
76 | $outstr .= ' { Date:\'2014-07-15 23:00\',Mode:\'NONE\',Air:20.500,Beer:\'22.437\' },'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
77 | $outstr .= ' { Date:\'2014-07-16 00:00\',Mode:\'NONE\',Air:20.437,Beer:\'22.250\' },'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
78 | $outstr .= ' { Date:\'2014-07-16 01:00\',Mode:\'NONE\',Air:20.375,Beer:\'22.000\' },'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
79 | $outstr .= ' { Date:\'2014-07-16 02:00\',Mode:\'NONE\',Air:20.312,Beer:\'21.750\' },'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
80 | $outstr .= ' { Date:\'2014-07-16 03:00\',Mode:\'NONE\',Air:20.375,Beer:\'21.687\' },'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
81 | $outstr .= ' { Date:\'2014-07-16 04:00\',Mode:\'NONE\',Air:20.312,Beer:\'21.562\' },'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
82 | $outstr .= ' { Date:\'2014-07-16 05:00\',Mode:\'NONE\',Air:20.187,Beer:\'21.500\' },'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
83 | $outstr .= ' { Date:\'2014-07-16 06:00\',Mode:\'NONE\',Air:20.125,Beer:\'21.500\' }'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
84 | $outstr .= ' ];'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
85 | |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
86 | $outstr .= ' var settings'.$unr.' = {'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
87 | $outstr .= ' title: "Fermentation temperature '.$unr.'",'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
88 | $outstr .= ' description: "",'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
89 | $outstr .= ' padding: { left: 5, top: 5, right: 5, bottom: 5 },'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
90 | $outstr .= ' titlePadding: { left: 90, top: 0, right: 0, bottom: 10 },'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
91 | $outstr .= ' enabled: true,'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
92 | $outstr .= ' source: sampleData'.$unr.','.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
93 | $outstr .= ' categoryAxis:'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
94 | $outstr .= ' {'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
95 | $outstr .= ' dataField: \'Date\','.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
96 | $outstr .= ' textRotationAngle: 45,'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
97 | $outstr .= ' showGridLines: false'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
98 | $outstr .= ' },'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
99 | $outstr .= ' colorScheme: \'scheme01\','.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
100 | $outstr .= ' seriesGroups:'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
101 | $outstr .= ' [{'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
102 | $outstr .= ' type: \'line\','.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
103 | $outstr .= ' columnsGapPercent: 30,'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
104 | $outstr .= ' seriesGapPercent: 0,'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
105 | $outstr .= ' valueAxis:'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
106 | $outstr .= ' {'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
107 | // $outstr .= ' minValue: 0,'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
108 | // $outstr .= ' maxValue: 35,'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
109 | // $outstr .= ' unitInterval: 5,'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
110 | $outstr .= ' description: \'Degrees C\''.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
111 | $outstr .= ' },'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
112 | $outstr .= ' series: ['.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
113 | $outstr .= ' { dataField: \'Air\', displayText: \'Air\' },'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
114 | $outstr .= ' { dataField: \'Beer\', displayText: \'Beer\' }'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
115 | $outstr .= ' ]'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
116 | $outstr .= ' }]'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
117 | $outstr .= ' };'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
118 | $outstr .= ' $("#fermentor_chart_'.$unr.'").jqxChart(settings'.$unr.');'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
119 | |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
120 | $outstr .= ' var initChart'.$unr.' = function() {'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
121 | $outstr .= ' $("#fermentor_chart_'.$unr.'").jqxChart(\'refresh\');'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
122 | $outstr .= ' }'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
123 | |
117 | 124 | $outstr .= ' $("#fermentor_setup_'.$unr.'").jqxButton({ width: \'150\', height: \'25\', theme: \''.$my_style.'\'});'.PHP_EOL; |
125 | $outstr .= ' });'.PHP_EOL; | |
126 | $outstr .= ' </script>'.PHP_EOL; | |
100 | 127 | $outstr .= ' <div id="fermentor">'.PHP_EOL; |
121
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
128 | $outstr .= ' <div id="fermentor_chart_'.$unr.'" style="width:600px; height:377px; float:left"></div>'.PHP_EOL; |
100 | 129 | |
115 | 130 | $set_temperature = "N/A"; |
131 | $air_temperature = "N/A"; | |
132 | $beer_temperature = "N/A"; | |
133 | ||
100 | 134 | foreach($arr as $l) { |
135 | $vals = explode(",", $l); | |
136 | if (strcmp($vals[0], "MODE") == 0) { | |
113
cf3f906ffe0d
Created control panel layout
Michiel Broek <mbroek@mbse.eu>
parents:
112
diff
changeset
|
137 | $mode = $vals[1]; |
100 | 138 | } |
102
e37b9c571a56
Units can display the temperature
Michiel Broek <mbroek@mbse.eu>
parents:
100
diff
changeset
|
139 | if (strcmp($vals[0], "AIR_STATE") == 0) { |
e37b9c571a56
Units can display the temperature
Michiel Broek <mbroek@mbse.eu>
parents:
100
diff
changeset
|
140 | $air_state = $vals[1]; |
e37b9c571a56
Units can display the temperature
Michiel Broek <mbroek@mbse.eu>
parents:
100
diff
changeset
|
141 | } |
115 | 142 | if ((strcmp($vals[0], "AIR_TEMPERATURE") == 0) && ($air_state == 0)) { |
143 | $air_temperature = $vals[1]; | |
102
e37b9c571a56
Units can display the temperature
Michiel Broek <mbroek@mbse.eu>
parents:
100
diff
changeset
|
144 | } |
e37b9c571a56
Units can display the temperature
Michiel Broek <mbroek@mbse.eu>
parents:
100
diff
changeset
|
145 | if (strcmp($vals[0], "BEER_STATE") == 0) { |
e37b9c571a56
Units can display the temperature
Michiel Broek <mbroek@mbse.eu>
parents:
100
diff
changeset
|
146 | $beer_state = $vals[1]; |
e37b9c571a56
Units can display the temperature
Michiel Broek <mbroek@mbse.eu>
parents:
100
diff
changeset
|
147 | } |
115 | 148 | if ((strcmp($vals[0], "BEER_TEMPERATURE") == 0) && ($beer_state == 0)) { |
149 | $beer_temperature = $vals[1]; | |
102
e37b9c571a56
Units can display the temperature
Michiel Broek <mbroek@mbse.eu>
parents:
100
diff
changeset
|
150 | } |
100 | 151 | } |
113
cf3f906ffe0d
Created control panel layout
Michiel Broek <mbroek@mbse.eu>
parents:
112
diff
changeset
|
152 | $outstr .= ' <div id="fermentor_panel">'.PHP_EOL; |
cf3f906ffe0d
Created control panel layout
Michiel Broek <mbroek@mbse.eu>
parents:
112
diff
changeset
|
153 | $outstr .= ' <div id="fermentor_selector">'.PHP_EOL; |
cf3f906ffe0d
Created control panel layout
Michiel Broek <mbroek@mbse.eu>
parents:
112
diff
changeset
|
154 | $outstr .= ' Mode '.$mode.PHP_EOL; |
116
065a242ed7ec
Added jquery script. Added radio buttons for unit mode
Michiel Broek <mbroek@mbse.eu>
parents:
115
diff
changeset
|
155 | $outstr .= ' <form>'.PHP_EOL; |
065a242ed7ec
Added jquery script. Added radio buttons for unit mode
Michiel Broek <mbroek@mbse.eu>
parents:
115
diff
changeset
|
156 | strcmp($mode, "OFF") ? $se = "" : $se = " checked"; |
065a242ed7ec
Added jquery script. Added radio buttons for unit mode
Michiel Broek <mbroek@mbse.eu>
parents:
115
diff
changeset
|
157 | $outstr .= ' <input type="radio" name="mode'.$unr.'" value="OFF"'.$se.'>Off<br>'.PHP_EOL; |
065a242ed7ec
Added jquery script. Added radio buttons for unit mode
Michiel Broek <mbroek@mbse.eu>
parents:
115
diff
changeset
|
158 | strcmp($mode, "NONE") ? $se = "" : $se = " checked"; |
065a242ed7ec
Added jquery script. Added radio buttons for unit mode
Michiel Broek <mbroek@mbse.eu>
parents:
115
diff
changeset
|
159 | $outstr .= ' <input type="radio" name="mode'.$unr.'" value="NONE"'.$se.'>None<br>'.PHP_EOL; |
065a242ed7ec
Added jquery script. Added radio buttons for unit mode
Michiel Broek <mbroek@mbse.eu>
parents:
115
diff
changeset
|
160 | strcmp($mode, "FRIDGE") ? $se = "" : $se = " checked"; |
065a242ed7ec
Added jquery script. Added radio buttons for unit mode
Michiel Broek <mbroek@mbse.eu>
parents:
115
diff
changeset
|
161 | $outstr .= ' <input type="radio" name="mode'.$unr.'" value="FRIDGE"'.$se.' disabled>Fridge<br>'.PHP_EOL; |
065a242ed7ec
Added jquery script. Added radio buttons for unit mode
Michiel Broek <mbroek@mbse.eu>
parents:
115
diff
changeset
|
162 | strcmp($mode, "BEER") ? $se = "" : $se = " checked"; |
065a242ed7ec
Added jquery script. Added radio buttons for unit mode
Michiel Broek <mbroek@mbse.eu>
parents:
115
diff
changeset
|
163 | $outstr .= ' <input type="radio" name="mode'.$unr.'" value="BEER"'.$se.' disabled>Beer<br>'.PHP_EOL; |
065a242ed7ec
Added jquery script. Added radio buttons for unit mode
Michiel Broek <mbroek@mbse.eu>
parents:
115
diff
changeset
|
164 | strcmp($mode, "PROFILE") ? $se = "" : $se = " checked"; |
065a242ed7ec
Added jquery script. Added radio buttons for unit mode
Michiel Broek <mbroek@mbse.eu>
parents:
115
diff
changeset
|
165 | $outstr .= ' <input type="radio" name="mode'.$unr.'" value="PROFILE"'.$se.' disabled>Profile'.PHP_EOL; |
065a242ed7ec
Added jquery script. Added radio buttons for unit mode
Michiel Broek <mbroek@mbse.eu>
parents:
115
diff
changeset
|
166 | $outstr .= ' </form>'.PHP_EOL; |
113
cf3f906ffe0d
Created control panel layout
Michiel Broek <mbroek@mbse.eu>
parents:
112
diff
changeset
|
167 | $outstr .= ' </div>'.PHP_EOL; |
cf3f906ffe0d
Created control panel layout
Michiel Broek <mbroek@mbse.eu>
parents:
112
diff
changeset
|
168 | $outstr .= ' <div id="fermentor_powerled">'.PHP_EOL; |
115 | 169 | $outstr .= ' PwrLED'.PHP_EOL; |
113
cf3f906ffe0d
Created control panel layout
Michiel Broek <mbroek@mbse.eu>
parents:
112
diff
changeset
|
170 | $outstr .= ' </div>'.PHP_EOL; |
cf3f906ffe0d
Created control panel layout
Michiel Broek <mbroek@mbse.eu>
parents:
112
diff
changeset
|
171 | $outstr .= ' <div id="fermentor_display1">'.PHP_EOL; |
115 | 172 | $outstr .= ' '.$set_temperature.'<br>Set'.PHP_EOL; |
113
cf3f906ffe0d
Created control panel layout
Michiel Broek <mbroek@mbse.eu>
parents:
112
diff
changeset
|
173 | $outstr .= ' </div>'.PHP_EOL; |
cf3f906ffe0d
Created control panel layout
Michiel Broek <mbroek@mbse.eu>
parents:
112
diff
changeset
|
174 | $outstr .= ' <div id="fermentor_display2">'.PHP_EOL; |
115 | 175 | $outstr .= ' '.$air_temperature.'<br>Air'.PHP_EOL; |
113
cf3f906ffe0d
Created control panel layout
Michiel Broek <mbroek@mbse.eu>
parents:
112
diff
changeset
|
176 | $outstr .= ' </div>'.PHP_EOL; |
cf3f906ffe0d
Created control panel layout
Michiel Broek <mbroek@mbse.eu>
parents:
112
diff
changeset
|
177 | $outstr .= ' <div id="fermentor_display3">'.PHP_EOL; |
115 | 178 | $outstr .= ' '.$beer_temperature.'<br>Beer'.PHP_EOL; |
113
cf3f906ffe0d
Created control panel layout
Michiel Broek <mbroek@mbse.eu>
parents:
112
diff
changeset
|
179 | $outstr .= ' </div>'.PHP_EOL; |
cf3f906ffe0d
Created control panel layout
Michiel Broek <mbroek@mbse.eu>
parents:
112
diff
changeset
|
180 | $outstr .= ' <div id="fermentor_led1">'.PHP_EOL; |
115 | 181 | $outstr .= ' CoolLED'.PHP_EOL; |
113
cf3f906ffe0d
Created control panel layout
Michiel Broek <mbroek@mbse.eu>
parents:
112
diff
changeset
|
182 | $outstr .= ' </div>'.PHP_EOL; |
cf3f906ffe0d
Created control panel layout
Michiel Broek <mbroek@mbse.eu>
parents:
112
diff
changeset
|
183 | $outstr .= ' <div id="fermentor_led2">'.PHP_EOL; |
115 | 184 | $outstr .= ' HeatLED'.PHP_EOL; |
113
cf3f906ffe0d
Created control panel layout
Michiel Broek <mbroek@mbse.eu>
parents:
112
diff
changeset
|
185 | $outstr .= ' </div>'.PHP_EOL; |
cf3f906ffe0d
Created control panel layout
Michiel Broek <mbroek@mbse.eu>
parents:
112
diff
changeset
|
186 | $outstr .= ' <div id="fermentor_led3">'.PHP_EOL; |
115 | 187 | $outstr .= ' FanLED'.PHP_EOL; |
113
cf3f906ffe0d
Created control panel layout
Michiel Broek <mbroek@mbse.eu>
parents:
112
diff
changeset
|
188 | $outstr .= ' </div>'.PHP_EOL; |
cf3f906ffe0d
Created control panel layout
Michiel Broek <mbroek@mbse.eu>
parents:
112
diff
changeset
|
189 | $outstr .= ' <div id="fermentor_toggle1">'.PHP_EOL; |
117 | 190 | $outstr .= ' <form>'.PHP_EOL; |
191 | strcmp($mode, "NONE") ? $se = " disabled" : $se = ""; | |
192 | $ch = " checked"; | |
193 | $outstr .= ' <input type="radio" name="cooler'.$unr.'" value="OFF"'.$se.$ch.'>Off<br>'.PHP_EOL; | |
194 | $outstr .= ' <input type="radio" name="cooler'.$unr.'" value="ON"'.$se.'>On<br>'.PHP_EOL; | |
195 | $outstr .= ' Cooler'.PHP_EOL; | |
196 | $outstr .= ' </form>'.PHP_EOL; | |
113
cf3f906ffe0d
Created control panel layout
Michiel Broek <mbroek@mbse.eu>
parents:
112
diff
changeset
|
197 | $outstr .= ' </div>'.PHP_EOL; |
cf3f906ffe0d
Created control panel layout
Michiel Broek <mbroek@mbse.eu>
parents:
112
diff
changeset
|
198 | $outstr .= ' <div id="fermentor_toggle2">'.PHP_EOL; |
117 | 199 | $outstr .= ' <form>'.PHP_EOL; |
200 | strcmp($mode, "NONE") ? $se = " disabled" : $se = ""; | |
201 | $outstr .= ' <input type="radio" name="heater'.$unr.'" value="OFF"'.$se.$ch.'>Off<br>'.PHP_EOL; | |
202 | $outstr .= ' <input type="radio" name="heater'.$unr.'" value="ON"'.$se.'>On<br>'.PHP_EOL; | |
203 | $outstr .= ' Heater'.PHP_EOL; | |
204 | $outstr .= ' </form>'.PHP_EOL; | |
113
cf3f906ffe0d
Created control panel layout
Michiel Broek <mbroek@mbse.eu>
parents:
112
diff
changeset
|
205 | $outstr .= ' </div>'.PHP_EOL; |
cf3f906ffe0d
Created control panel layout
Michiel Broek <mbroek@mbse.eu>
parents:
112
diff
changeset
|
206 | $outstr .= ' <div id="fermentor_toggle3">'.PHP_EOL; |
117 | 207 | $outstr .= ' <form>'.PHP_EOL; |
208 | strcmp($mode, "NONE") ? $se = " disabled" : $se = ""; | |
209 | $outstr .= ' <input type="radio" name="fan'.$unr.'" value="OFF"'.$se.$ch.'>Off<br>'.PHP_EOL; | |
210 | $outstr .= ' <input type="radio" name="fan'.$unr.'" value="ON"'.$se.'>On<br>'.PHP_EOL; | |
211 | $outstr .= ' Fan'.PHP_EOL; | |
212 | $outstr .= ' </form>'.PHP_EOL; | |
113
cf3f906ffe0d
Created control panel layout
Michiel Broek <mbroek@mbse.eu>
parents:
112
diff
changeset
|
213 | $outstr .= ' </div>'.PHP_EOL; |
121
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
214 | $outstr .= ' <div id="fermentor_control">'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
215 | $outstr .= ' <button id="fermentor_setup_'.$unr.'">Edit fermentor</button>'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
216 | $outstr .= ' </div>'.PHP_EOL; |
03306c3bfd60
Initial setup to draw charts
Michiel Broek <mbroek@mbse.eu>
parents:
118
diff
changeset
|
217 | $outstr .= ' </div> <!-- fermentor_panel -->'.PHP_EOL; |
112 | 218 | $outstr .= ' </div> <!-- fermentor -->'.PHP_EOL; |
100 | 219 | } |
220 | ||
221 | return $outstr; | |
222 | } | |
223 | ||
224 | ||
225 | ||
226 | function liveview() | |
227 | { | |
228 | $outstr = PHP_EOL; | |
229 | ||
230 | $sock = open_socket(); | |
231 | if ($sock !== false) { | |
232 | socket_write($sock, "LIST", 4096); | |
233 | ||
234 | /* | |
235 | * Multiple reads until the remote closed the connection | |
236 | */ | |
237 | $answer = ""; | |
238 | while (1) { | |
239 | $line = socket_read($sock, 4096); | |
240 | if ($line === '') | |
241 | break; | |
242 | $answer .= $line; | |
243 | } | |
244 | socket_close($sock); | |
245 | $arr = explode("\r\n", $answer); | |
246 | ||
117 | 247 | $outstr .= ' <div id="jqxTabs">'.PHP_EOL; |
248 | $outstr .= ' <ul>'.PHP_EOL; | |
100 | 249 | if (startsWith($arr[0], "212")) { |
250 | $i = 1; | |
251 | while (1) { | |
252 | if (strcmp($arr[$i], ".") == 0) | |
253 | break; | |
254 | $parts = explode(",", $arr[$i]); | |
117 | 255 | $outstr .= ' <li style="margin-left: 30px;">'.$parts[2].'</li>'.PHP_EOL; |
256 | $i++; | |
257 | } | |
258 | } | |
259 | $outstr .= ' </ul>'.PHP_EOL; | |
260 | ||
261 | if (startsWith($arr[0], "212")) { | |
262 | $i = 1; | |
263 | while (1) { | |
264 | if (strcmp($arr[$i], ".") == 0) | |
265 | break; | |
266 | $parts = explode(",", $arr[$i]); | |
113
cf3f906ffe0d
Created control panel layout
Michiel Broek <mbroek@mbse.eu>
parents:
112
diff
changeset
|
267 | $outstr .= showunit($parts[1], $i); |
100 | 268 | $i++; |
269 | } | |
270 | } | |
117 | 271 | $outstr .= ' </div> <!-- jqxTabs -->'.PHP_EOL; |
100 | 272 | } |
273 | ||
274 | return $outstr; | |
275 | } | |
276 | ||
277 | ||
278 | ||
279 | ?> |