www-thermferm/getalog.php

Thu, 02 Apr 2015 22:08:15 +0200

author
Michiel Broek <mbroek@mbse.eu>
date
Thu, 02 Apr 2015 22:08:15 +0200
changeset 357
64cd9865bd11
child 397
00ca08f5a6f8
permissions
-rw-r--r--

Added ARCHIVE LOG view.

357
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
1 <?php
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
2 /*****************************************************************************
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
3 * Copyright (C) 2015
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
4 *
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
5 * Michiel Broek <mbroek at mbse dot eu>
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
6 *
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
7 * This file is part of ThermFerm
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
8 *
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
9 * This is free software; you can redistribute it and/or modify it
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
10 * under the terms of the GNU General Public License as published by the
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
11 * Free Software Foundation; either version 2, or (at your option) any
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
12 * later version.
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
13 *
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
14 * ThermFerm is distributed in the hope that it will be useful, but
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
15 * WITHOUT ANY WARRANTY; without even the implied warranty of
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
17 * General Public License for more details.
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
18 *
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
19 * You should have received a copy of the GNU General Public License
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
20 * along with ThermFerm; see the file COPYING. If not, write to the Free
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
21 * Software Foundation, 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
22 *****************************************************************************/
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
23
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
24 require_once('utilities.php');
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
25
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
26
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
27 $answer = send_cmd("ARCHIVE LOG ".$_GET["name"]);
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
28 $arr = explode("\r\n", $answer);
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
29
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
30
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
31 $row = '[';
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
32
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
33 /* We don't use json_encode because it doesn't work for our purpose */
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
34 if (startsWith($arr[0], "212")) {
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
35 $j = 1;
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
36 while (1) {
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
37 if (strcmp($arr[$j], ".") == 0)
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
38 break;
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
39 if ($j > 1)
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
40 $row .= ',';
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
41 $f = explode(",", $arr[$j]);
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
42 $heater = $f[5] / 100;
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
43 $cooler = $f[6] / 100;
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
44 $row .= '{"Date":"'.$f[0].'","Mode":"'.$f[1].'","Air":"'.$f[2].'","Beer":"'.$f[3].'","Target":"'.$f[4].'",';
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
45 $row .= '"Heater":'.$heater.',"Cooler":'.$cooler.',"HeatUse":'.$f[7].',"CoolUse":"'.$f[8].'","Room":"'.$f[9].'"}';
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
46 $j++;
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
47 }
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
48 }
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
49
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
50 $row .= ']';
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
51 echo $row;
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
52
64cd9865bd11 Added ARCHIVE LOG view.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
53 ?>

mercurial