bf72780f001753081afaa6adb04b05ccddc7a6a0
[weathermon.git] / mysql / meteo_routines.sql
1 -- MySQL dump 10.13  Distrib 5.5.38, for debian-linux-gnu (x86_64)
2 --
3 -- Host: localhost    Database: meteo
4 -- ------------------------------------------------------
5 -- Server version       5.5.38-0ubuntu0.14.04.1
6
7 /*!40101 SET @OLD_CHARACTER_SET_CLIENT=@@CHARACTER_SET_CLIENT */;
8 /*!40101 SET @OLD_CHARACTER_SET_RESULTS=@@CHARACTER_SET_RESULTS */;
9 /*!40101 SET @OLD_COLLATION_CONNECTION=@@COLLATION_CONNECTION */;
10 /*!40101 SET NAMES utf8 */;
11 /*!40103 SET @OLD_TIME_ZONE=@@TIME_ZONE */;
12 /*!40103 SET TIME_ZONE='+00:00' */;
13 /*!40014 SET @OLD_UNIQUE_CHECKS=@@UNIQUE_CHECKS, UNIQUE_CHECKS=0 */;
14 /*!40014 SET @OLD_FOREIGN_KEY_CHECKS=@@FOREIGN_KEY_CHECKS, FOREIGN_KEY_CHECKS=0 */;
15 /*!40101 SET @OLD_SQL_MODE=@@SQL_MODE, SQL_MODE='NO_AUTO_VALUE_ON_ZERO' */;
16 /*!40111 SET @OLD_SQL_NOTES=@@SQL_NOTES, SQL_NOTES=0 */;
17
18 --
19 -- Dumping routines for database 'meteo'
20 --
21 /*!50003 DROP FUNCTION IF EXISTS `unitconv` */;
22 /*!50003 SET @saved_cs_client      = @@character_set_client */ ;
23 /*!50003 SET @saved_cs_results     = @@character_set_results */ ;
24 /*!50003 SET @saved_col_connection = @@collation_connection */ ;
25 /*!50003 SET character_set_client  = utf8 */ ;
26 /*!50003 SET character_set_results = utf8 */ ;
27 /*!50003 SET collation_connection  = utf8_general_ci */ ;
28 /*!50003 SET @saved_sql_mode       = @@sql_mode */ ;
29 /*!50003 SET sql_mode              = '' */ ;
30 DELIMITER ;;
31 CREATE DEFINER=`admin`@`%` FUNCTION `unitconv`(pValue float, pFromUnit integer, pToUnit integer) RETURNS float
32 BEGIN
33   declare result float;
34   declare a,b,c float;
35   if pFromUnit=pToUnit then 
36     set result = pValue;
37   else
38     select u.a,u.b,u.c into a,b,c from unit_conv u where from_unit=pFromUnit and to_unit=pToUnit;
39     set result=b;
40     set result = (pValue+a)*b+c;
41   end if;
42   return result;
43 END ;;
44 DELIMITER ;
45 /*!50003 SET sql_mode              = @saved_sql_mode */ ;
46 /*!50003 SET character_set_client  = @saved_cs_client */ ;
47 /*!50003 SET character_set_results = @saved_cs_results */ ;
48 /*!50003 SET collation_connection  = @saved_col_connection */ ;
49 /*!50003 DROP PROCEDURE IF EXISTS `submit_value` */;
50 /*!50003 SET @saved_cs_client      = @@character_set_client */ ;
51 /*!50003 SET @saved_cs_results     = @@character_set_results */ ;
52 /*!50003 SET @saved_col_connection = @@collation_connection */ ;
53 /*!50003 SET character_set_client  = utf8 */ ;
54 /*!50003 SET character_set_results = utf8 */ ;
55 /*!50003 SET collation_connection  = utf8_general_ci */ ;
56 /*!50003 SET @saved_sql_mode       = @@sql_mode */ ;
57 /*!50003 SET sql_mode              = '' */ ;
58 DELIMITER ;;
59 CREATE DEFINER=`admin`@`%` PROCEDURE `submit_value`(pSType varchar(32),pSID varchar(32),pParam varchar(32),pValue float,pTimestamp datetime)
60 BEGIN
61   declare lSTID int;
62   declare lSID int;
63   declare lSTPID int;
64   declare lTime DATETIME;
65   declare lDay DATE;
66   declare lCnt integer;
67   select max(id) into lSTID from sensor_types where st_name=pSType;
68   if lSTID is not null then 
69     select max(id) into lSID from sensors where st_id=lSTID and s_id=pSID;
70     if lSID is not null then
71           select max(id) into lSTPID from st_parameters where st_id=lSTID and st_name=pParam;
72       if lSTPID is not null then
73
74         if lSTPID>=0 then
75
76           if pTimestamp is null then
77                     set lTime:=current_timestamp();
78                   else
79             set lTime:=pTimestamp;
80           end if;
81
82           insert into sensor_values(sensor_id,parameter_id,timestamp,value)
83             values(lSID,lSTPID,lTime,pValue);
84
85           set lDay:=DATE(lTime);
86           select count(*) into lCnt from calendar where sensor=lSID and day=lDay;
87           if lCnt=0 then
88             insert into calendar(day,sensor) values(lDay,lSID);
89           end if;
90
91           select count(*) into lCnt from sensors_ranges where sensor=lSID and day=lDay and parameter=lSTPID;
92           if lCnt=0 then
93             insert into sensors_ranges(day,sensor,parameter,min,max) values (lDay,lSID,lSTPID,pValue,pValue);
94           else
95             update sensors_ranges
96             set
97               min=LEAST(min,pValue),
98               max=GREATEST(max,pValue)
99             where
100               day=lDay and sensor=lSID and parameter=lSTPID;
101           end if;
102         end if;
103       else
104         insert into error_log(timestamp,text)
105         values (current_timestamp(),CONCAT("Failed to submit ",pSType,",",pSID,",",pParam,",",pValue));
106       end if;
107     else
108       insert into error_log(timestamp,text)
109       values (current_timestamp(),CONCAT("Failed to submit ",pSType,",",pSID,",",pParam,",",pValue));
110     end if;
111   else
112     insert into error_log(timestamp,text)
113     values (current_timestamp(),CONCAT("Failed to submit ",pSType,",",pSID,",",pParam,",",pValue));
114   end if;
115 END ;;
116 DELIMITER ;
117 /*!50003 SET sql_mode              = @saved_sql_mode */ ;
118 /*!50003 SET character_set_client  = @saved_cs_client */ ;
119 /*!50003 SET character_set_results = @saved_cs_results */ ;
120 /*!50003 SET collation_connection  = @saved_col_connection */ ;
121 /*!40103 SET TIME_ZONE=@OLD_TIME_ZONE */;
122
123 /*!40101 SET SQL_MODE=@OLD_SQL_MODE */;
124 /*!40014 SET FOREIGN_KEY_CHECKS=@OLD_FOREIGN_KEY_CHECKS */;
125 /*!40014 SET UNIQUE_CHECKS=@OLD_UNIQUE_CHECKS */;
126 /*!40101 SET CHARACTER_SET_CLIENT=@OLD_CHARACTER_SET_CLIENT */;
127 /*!40101 SET CHARACTER_SET_RESULTS=@OLD_CHARACTER_SET_RESULTS */;
128 /*!40101 SET COLLATION_CONNECTION=@OLD_COLLATION_CONNECTION */;
129 /*!40111 SET SQL_NOTES=@OLD_SQL_NOTES */;
130
131 -- Dump completed on 2014-09-25 14:45:45