nemcov_av

if (getGlobal('ThisComputer.Econom')) {
  say('Перехожу в режим экономии');
  runScript('EconomyEnable',0);
} else {
  say('Выхожу из режима экономии');
  runScript('EconomyDisable',0);
}

say("Выполняем выход из режима экономии");

say("Выполняем действия по переходу в режим экономии");

if (getGlobal('ThisComputer.nobodyHome')) {
	sg('ThisComputer.nobodyHome',0);
	say("Домой кто-то пришел",5);
} else {
	say('Эй, домашние, папа идет',1);
}
if (getGlobal('ThisComputer.Econom')) {
	sg('ThisComputer.Econom',0);
	runScript("EconomChanged");
}

say("Папа дома",1);

$res=getObjectsByClass("Room");
$total=count($res);
for($i=0;$i<$total;$i++) {
	$title = $res[$i]['TITLE'];
	$pr['OLD_VALUE']=1; //gg($title.'.lightLevel');
	$pr['VALUE']=0;
	sg($title.'.lastLevel',gg($title.'.lightLevel'));
	sg($title.'.lightLevel',0);
	callMethod($title.".onlightLevelChanged",$pr);
}

$res=getObjectsByClass("Room");
$total=count($res);
for($i=0;$i<$total;$i++) {
	$title = $res[$i]['TITLE'];
	$pr['OLD_VALUE']=0; //gg($title.'.lightLevel');
	$pr['VALUE']=gg($title.'.lastLevel');
	//sg($title.'.lastLevel',gg($title.'.lightLevel'));
	sg($title.'.lightLevel',gg($title.'.lastLevel'));
	callMethod($title.".onlightLevelChanged",$pr);
}

if (gg('ThisComputer.nobodyHome')==1){
	say("Все ушли");
	sg('ThisComputer.Econom',1);
	RunScript('EconomChanged');
	RunScript("LightReset");
	RunScript("Video_Start");
} else {
	say('Режим присутствия включен вручную');
	sg('ThisComputer.Econom',0);
	RunScript('EconomChanged');
	RunScript("LightRestore");
	RunScript("Video_Stop");
}

if (gg('ThisComputer.quietMode')==1){
	sg('ThisComputer.minMsgLevel',5);
	say("Переход в тихий режим");
} else {
	sg('ThisComputer.minMsgLevel',0);
	say('Выход из тихого режима');
}

if (gg('ThisComputer.VideoActive')==1){
	say("Включено видеонаблюдение");
	RunScript("Video_Start");
} else {
	say("Отключено видеонаблюдение");
	RunScript("Video_Stop");
}

shell_exec('wget "http://192.168.0.36:8083/start"');

shell_exec('wget "http://192.168.0.36:8083/stop"');

$res=getObjectsByClass("Health");
$total=count($res);
$n=0;
$fh=0;
for($i=0;$i<$total;$i++) {
	$title = $res[$i]['TITLE'];
	callMethod($title.'.getHealth');
	$fh=$fh+(int)gg($title.'.Health');
	$n=$n+1;
}
if($n!=0){
	$fh=(int)($fh/$n);
	sg("ThisComputer.health",$fh);
} else {
	say("Ошибка опроса данных HEALTH");
}

$res=getObjectsByClass("Meters");
$total=count($res);
for($i=0;$i<$total;$i++) {
	$title = $res[$i]['TITLE'];
	callMethod($title.'.getData');
}

$res=getObjectsByClass("MobilePhone");
$total=count($res);
for($i=0;$i<$total;$i++) {
	$title = $res[$i]['TITLE'];
	if(gg($title.'.active')>0){
		$operator = gg($title.'.operator');
		$number = gg($title.'.Number');
		$pass = gg($title.'.Password');
		$balance=shell_exec('/var/www/pbal.sh '.$operator.' '.$number.' '.$pass);
		$cb=(string)((float)$balance);
		if(trim((string)$balance)==trim($cb)){
			sg($title.'.balance',(float)$balance);
			echo('Balance '.$title.': '.$balance.' руб.<br>');
			callMethod($title.'.balanceChanged');
		} else {
			say('Ошибка получения баланса для '.$title,0);
			DebMes("Ошибка получения баланса для ".$title);
			DebMes('Balance '.$balance.' dump:'.var_dump($balance));
			DebMes('Cont.bl '.$cb.' dump:'.var_dump($cb));
		}
	}
}

exec("sensors",$asensors);
for($i=0;$i<count($asensors);$i++) {
   ereg("[^:]*\:[ ]*([0-9+-.]*)",$asensors[$i],$arr);
   $temp = trim($arr[1]);
   $temp = str_replace('+','',$temp);
   switch (substr($asensors[$i],0,5)) {
    case 'fan2:':
        sg('system_fan1',$temp);
        break;
    case 'temp1':
        sg('system_temp1',$temp);
        break;
    case 'temp2':
        sg('system_mbtemp',$temp);
        break;
    };
};
$temp=exec("\/usr\/sbin\/hddtemp \/dev\/sda");      
ereg("[^:]*\:[ ]*[^:]*\:[ ]*([0-9+-.]*)",$temp,$arr);
$temp = trim($arr[1]);
$temp = str_replace('+','',$temp);
sg('system_hdd1temp',$temp);
        
$data = shell_exec('uptime');
$uptime = explode(' up ', $data);
$uptime = explode(',', $uptime[1]);
sg('system_uptime',trim($uptime[0]));
        
$bytes = disk_free_space("."); 
$si_prefix = array( 'B', 'KB', 'MB', 'GB', 'TB', 'EB', 'ZB', 'YB' );
$base = 1024;
$class = min((int)log($bytes , $base) , count($si_prefix) - 1);
$temp = round($bytes / pow($base,$class)) . ' ' . $si_prefix[$class];
sg('system_freespace',$temp);

echo(shell_exec('/var/www/pbal.sh mts 9112749645 233304'));

 $url='http://192.168.0.36:8080';  // это собственно страница, на которую нам надо заходить уже залогинившись
   $ch = curl_init();   
   //curl_setopt($ch, CURLOPT_COOKIEFILE, $cookie_file);
   curl_setopt($ch, CURLOPT_URL, $url);
   curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);
   curl_setopt($ch, CURLOPT_CONNECTTIMEOUT, 30);
   curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, FALSE);
   curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, 2); 
   $result = curl_exec($ch);
   $balance='UNKNOWN';
   curl_close($ch);
   //sg("CameraZal.DetectionStatus",$result);
   if (preg_match('/Detection status (.+)<\/body>/is',$result,$m)) { // здесь как раз ищем нужную нам информацию
 	$status=$m[1];
 }
 	
echo("==".$result."==");
echo('<br>');
echo($status);

say(timeNow());

$new=$params['VALUE'];
$old=gg('ThisComputer.Atm_press');
sg('ThisComputer.Atm_press',$new);
sg('ThisComputer.Atm_press_old',$old);
RunScript('Prognoz');

if ( date('G') < 0 )
$z = "расчет возможен только после 21 часа";
else
{
    // Считываем из БД или другим способом значение температуры в час дня
    $t13 = 9;
    // Считываем из БД или другим способом значение температуры в 21 час вечера
    $t21 = 4;

    $z = "0%";
    $x = $t13 - $t21;

    if ( $t21 >= $t13 )
    $z = "расчет невозможен. Температура растет";
    elseif ( $t21 < 0 )
    $z = "расчет невозможен. Температура ниже нуля";
    elseif ( $t21 < 11 && $x < 11 )
    {
        $t_graph = array(
            0 => array(0.375, 11, 0),
            1 => array(0.391, 8.7, 10),
            2 => array(0.382, 6.7, 20),
            3 => array(0.382, 4.7, 40),
            4 => array(0.391, 2.7, 60),
            5 => array(0.4, 1.6, 80));

        $z = "100%";
        for ( $i = 0; $i < count($t_graph); $i++ )
        {
            $y1 = $t_graph[$i][0] * $x + $t_graph[$i][1];
    
            if ( $t21 > $y1)
            {
                $z = $t_graph[$i][2]."%";
                break;
            }
        }
    }
}

echo "Вероятность заморозков: $z";

include_once(DOC_ROOT.'/betel_cast.php');
//давление в гПа
$mrs=gg('ThisComputer.Atm_press');
$gpa=(int)$mrs*1.33377;
//направление ветра в латинице
$wind= mb_strtoupper(gg('ThisComputer.Wind_dir'), "utf-8");
$wind=str_replace('С','N',$wind);
$wind=str_replace('Ю','S',$wind);
$wind=str_replace('З','W',$wind);
$wind=str_replace('В','E',$wind);
//тренд давления
$np=gg('ThisComputer.Atm_press');
$op=gg('ThisComputer.Atm_press_old');
$trend=0;
if((int)$np>(int)$op){
	$trend=1;
} elseif ((int)$np<(int)$op) {
	$trend=2;
}
$temp=gg('ThisComputer.TempOutside');
$h=(int)date('n',time());
$res= betel_cast( $gpa, $h, $wind, $trend, 1, 1050, 950, $temp);
sg('ThisComputer.prognozText',$res);
sendMail('MajorDomo <AlexNemcov@yandex.ru>','anemcov@gmail.com','Weather update','Время: '.date('d-m-Y H:i',time())."\r\n".$res."\r\n"."Давление: ".$mrs." мм.рт.ст."."\r\n"."Направление ветра: ".$wind."\r\n"."Скорость ветра: ".gg('ThisComputer.Wind_speed')." м/с"."\r\n"."Влажность: ".gg('ThisComputer.dumpness')." %");