Storet routines and MySQL data example added
[weathermon.git] / web / image.php
1 <?php // content="text/plain; charset=utf-8"
2
3 error_reporting(E_ALL & ~E_STRICT & ~E_NOTICE);
4
5 include ('config_local.php');
6
7 require_once ('jpgraph/jpgraph.php');
8 require_once ('jpgraph/jpgraph_line.php');
9 require_once ('jpgraph/jpgraph_date.php');
10 require_once ('jpgraph/jpgraph_scatter.php');
11 require_once ('jpgraph/jpgraph_regstat.php');
12
13 if (! ($db = new PDO("mysql:host=$mysql_host;port=$mysql_port;dbname=$mysql_schema",$mysql_user,$mysql_pwd,array( PDO::ATTR_PERSISTENT => false)))) {
14
15   die('Не могу подключиться к БД');
16
17 }  
18
19 $db -> exec('SET CHARACTER SET utf8');
20   
21 $type = $_REQUEST['type'];
22 $sensor=$_REQUEST['sensor'];
23 $param=$_REQUEST['param'];
24
25 if ($type and $param) {
26   
27   $sensor = intval($sensor);
28   $param = intval($param);
29
30   $q = $db -> prepare(
31     'select s_description from sensors where id='.$sensor
32   );
33   $q -> execute();
34
35   while ($row = $q -> fetch(PDO::FETCH_ASSOC)) {
36     $sensor_name = $row['s_description'];
37   }                                                                
38
39   $q = $db -> prepare(
40     'select st.st_dot_color,st.st_line_color,st.st_description,u.id,u.unit_group from st_parameters st,units u where st.id='.$param.' and st.st_unit=u.id'
41   );
42   $q -> execute();
43
44   while ($row = $q -> fetch(PDO::FETCH_ASSOC)) {
45     $param_name = $row['st_description'];
46     $from_unit = $row['id'];
47     $unit_group = $row['unit_group'];
48     $dot_color = $row['st_dot_color'];
49     $line_color = $row['st_line_color'];
50   }                                                                
51
52   if (!empty($_COOKIE['unit_'.$unit_group])) {
53     $to_unit=intval($_COOKIE['unit_'.$unit_group]);
54   } else {
55     $to_unit=$from_unit;
56   }  
57
58   $q = $db -> prepare(
59     'select u.name_short from units u where u.id='.$to_unit
60   );
61   $q -> execute();
62
63   while ($row = $q -> fetch(PDO::FETCH_ASSOC)) {
64     $param_unit = $row['name_short'];
65   }                                                                
66   
67   $xdata = array();
68   $ydata = array();
69
70   if ($type == 'last24') { 
71
72     $q = $db -> prepare(
73       'select unix_timestamp(timestamp) as x,unitconv(value,'.$from_unit.','.$to_unit.') as y from sensor_values where timestamp>adddate(now(), -1) and sensor_id='.$sensor.' and parameter_id='.$param.' order by timestamp'
74     );
75
76     $height = 130;
77     
78   } elseif ($type == 'range') {
79
80     $from = intval($_REQUEST['fromdate']);
81     $to = intval($_REQUEST['todate']);
82
83     $q = $db -> prepare(
84       'select unix_timestamp(timestamp) as x,unitconv(value,'.$from_unit.','.$to_unit.') as y from sensor_values where timestamp>=str_to_date("'.$from.'","%Y%m%d%H%i%s") and timestamp<=str_to_date("'.$to.'","%Y%m%d%H%i%s") and sensor_id='.$sensor.' and parameter_id='.$param.' order by timestamp'
85     );
86   
87     $height = 60;
88   
89   }
90
91   $q -> execute();
92     
93   while ($row = $q -> fetch(PDO::FETCH_ASSOC)) {
94     
95     $xdata[] = $row['x'];
96     $ydata[] = $row['y'];
97     
98   }                                                                
99
100
101   for ($i = 0; $i < count($xdata); ++$i) {
102
103     $total_weight=0;
104     $sum=0;
105     $maxdelta = 900;
106     
107     for ($j = $i; $j < count($xdata); ++$j) {
108     
109       $delta = abs($xdata[$i]-$xdata[$j]);
110       if ($delta > $maxdelta) { break; }
111     
112       $weight = 1-$delta/$maxdelta;
113       $total_weight += $weight;
114       $sum += $weight*$ydata[$j];
115       
116     }
117
118     for ($j = $i-1; $j >=0 ; --$j) {
119     
120       $delta = abs($xdata[$i]-$xdata[$j]);
121       if ($delta > $maxdelta) { break; }
122     
123       $weight = 1-$delta/$maxdelta;
124       $total_weight += $weight;
125       $sum += $weight*$ydata[$j];
126       
127     }
128     
129     $new_val = $sum/$total_weight;
130     $f_ydata[$i] = $new_val; 
131     
132   }
133
134   // Create the graph
135   $g = new Graph(640,480);
136   $g->graph_theme = null;
137
138   //$g->img->SetAntiAliasing();
139
140   // We need a linlin scale since we provide both
141   // x and y coordinates for the data points.
142   $g->SetScale('datlin');
143   $g->xaxis->SetLabelAngle(90);
144   $g->xaxis->SetPos("min");
145
146   // We use a scatterplot to illustrate the original
147   // contro points.
148   $splot = new ScatterPlot($ydata,$xdata);
149   $g->Add($splot);
150
151   // 
152   $splot->mark->SetFillColor($dot_color);
153   $splot->mark->SetColor($dot_color);
154   $splot->mark->SetType(MARK_FILLEDCIRCLE);
155   $splot->mark->SetSize(2);
156
157   $fplot = new LinePlot($f_ydata,$xdata);
158   $g->Add($fplot);
159   $fplot->SetColor($line_color);
160   $fplot->SetWeight(2);
161
162   $g->SetMargin(50,30,40,$height);
163   $g->title->Set($sensor_name.'/'.$param_name.', '.$param_unit);
164   $g->title->SetFont(FF_DV_SANSSERIF,FS_BOLD,12);
165   $g->SetMarginColor('silver');
166
167   // Add the plots to the graph and stroke
168   $g->Stroke();
169   
170 } else {
171
172   header("Content-Type: text/html; charset=UTF-8");
173   die('Сенсор не выбран!');
174
175 }  
176
177 ?>