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